emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

General tweaks

Browse source
This commit is contained in:
Henrik Lissner 2017-03-19 22:50:52 -04:00
parent 3d30844070
commit db7cf68775
8 changed files with 24 additions and 21 deletions
Download patch file Download diff file Expand all files Collapse all files

1
core/autoload/buffers.el
View file

@ -192,6 +192,7 @@ See `doom-real-buffer-p' for what 'real' means."
(or (not process-buffer) (or (not process-buffer)
(and (bufferp process-buffer) (and (bufferp process-buffer)
(get-buffer-window-list process-buffer nil t)))) (get-buffer-window-list process-buffer nil t))))
(message "Killing %s" (process-name p))
(delete-process p) (delete-process p)
(setq n (1+ n))))) (setq n (1+ n)))))
n)) n))

2
core/core.el
View file

@ -86,7 +86,7 @@ or unstable files.")
custom-file (concat doom-etc-dir "custom.el") custom-file (concat doom-etc-dir "custom.el")
enable-recursive-minibuffers nil enable-recursive-minibuffers nil
debug-on-error (and (not noninteractive) doom-debug-mode) debug-on-error (and (not noninteractive) doom-debug-mode)
idle-update-delay 1 ; update ui less often idle-update-delay 2 ; update ui less often
url-configuration-directory (concat doom-cache-dir "url/") url-configuration-directory (concat doom-cache-dir "url/")
;; keep the point out of the minibuffer ;; keep the point out of the minibuffer
minibuffer-prompt-properties '(read-only t point-entered minibuffer-avoid-prompt face minibuffer-prompt) minibuffer-prompt-properties '(read-only t point-entered minibuffer-avoid-prompt face minibuffer-prompt)

19
modules/feature/eval/config.el
View file

@ -65,16 +65,17 @@ invokes the repl. Takes the same arguements as `rtog/add-repl'."
and COMMAND is a key (for `quickrun--language-alist'), and will be registered and COMMAND is a key (for `quickrun--language-alist'), and will be registered
in `quickrun--major-mode-alist'. in `quickrun--major-mode-alist'.
3. If MODE is not a string and COMMAND is an alist, see `quickrun-add-command': 3. If MODE is not a string and COMMAND is an alist, see `quickrun-add-command':
(quickrun-add-command MODE COMMAND :mode MODE)" (quickrun-add-command MODE COMMAND :mode MODE)."
`(after! quickrun `(after! quickrun
,(if (stringp command) ,(cond ((stringp command)
`(push ',(cons mode command) `(push ',(cons mode command)
,(if (stringp mode) ,(if (stringp mode)
'quickrun-file-alist 'quickrun-file-alist
'quickrun--major-mode-alist)) 'quickrun--major-mode-alist)))
`(quickrun-add-command ((listp command)
,(symbol-name mode) `(quickrun-add-command
',command :mode ',mode)))) ,(symbol-name mode)
',command :mode ',mode)))))
(def-package! quickrun (def-package! quickrun
:commands (quickrun :commands (quickrun

2
modules/feature/evil/config.el
View file

@ -86,8 +86,8 @@
(evil-ex-nohighlight))) (evil-ex-nohighlight)))
(advice-add 'evil-force-normal-state :after '+evil*esc) (advice-add 'evil-force-normal-state :after '+evil*esc)
;; Don't move cursor on indent
(defun +evil*static-reindent (orig-fn &rest args) (defun +evil*static-reindent (orig-fn &rest args)
"Don't move cursor on indent."
(save-excursion (apply orig-fn args))) (save-excursion (apply orig-fn args)))
(advice-add 'evil-indent :around '+evil*static-reindent) (advice-add 'evil-indent :around '+evil*static-reindent)

3
modules/feature/syntax-checker/config.el
View file

@ -27,7 +27,8 @@
(advice-add 'evil-force-normal-state :after '+syntax-checkers|flycheck-buffer)) (advice-add 'evil-force-normal-state :after '+syntax-checkers|flycheck-buffer))
(def-package! flycheck-pos-tip :after flycheck (def-package! flycheck-pos-tip
:after flycheck
:config :config
(setq flycheck-pos-tip-timeout 10 (setq flycheck-pos-tip-timeout 10
flycheck-display-errors-delay 0.5) flycheck-display-errors-delay 0.5)

1
modules/lang/python/autoload.el
View file

@ -3,4 +3,5 @@
;;;###autoload ;;;###autoload
(defun +python/repl () (defun +python/repl ()
"Open the Python REPL." "Open the Python REPL."
(interactive)
(process-buffer (run-python python-shell-interpreter t t))) (process-buffer (run-python python-shell-interpreter t t)))

6
modules/lang/web/+css.el
View file

@ -37,15 +37,15 @@
:mode ("\\.scss$" . scss-mode) :mode ("\\.scss$" . scss-mode)
:config :config
(set! :company-backend '(css-mode scss-mode) '(company-css company-yasnippet)) (set! :company-backend '(css-mode scss-mode) '(company-css company-yasnippet))
(set! :build 'scss 'scss-mode '+css/scss-build)) (set! :build 'compile 'scss-mode '+css/scss-build))
(def-package! sass-mode (def-package! sass-mode
:mode "\\.sass$" :mode "\\.sass$"
:config :config
(setq sass-command-options '("--style compressed")) (setq sass-command-options '("--style compressed"))
(set! :build 'sass 'sass-mode '+css/sass-build) (set! :company-backend 'sass-mode '(company-css company-yasnippet))
(set! :company-backend 'sass-mode '(company-css company-yasnippet))) (set! :build 'compile 'sass-mode '+css/sass-build))
(def-package! less-css-mode (def-package! less-css-mode

11
modules/ui/doom-dashboard/config.el
View file

@ -18,16 +18,15 @@
(defvar +doom-dashboard-widgets '(banner shortmenu loaded) (defvar +doom-dashboard-widgets '(banner shortmenu loaded)
"List of widgets to display in a blank scratch buffer.") "List of widgets to display in a blank scratch buffer.")
(defvar +doom-dashboard--old-fringe-indicator fringe-indicator-alist
"")
(defvar +doom-dashboard--width 0)
(defvar +doom-dashboard--height 0)
(define-derived-mode +doom-dashboard-mode fundamental-mode (define-derived-mode +doom-dashboard-mode fundamental-mode
(concat "v" doom-version) (concat "v" doom-version)
"Major mode for the DOOM dashboard buffer.") "Major mode for the DOOM dashboard buffer.")
(defvar +doom-dashboard--width 0)
(defvar +doom-dashboard--height 0)
(defvar +doom-dashboard--old-fringe-indicator fringe-indicator-alist)
(def-package! all-the-icons :when (display-graphic-p)) (def-package! all-the-icons :when (display-graphic-p))