From db7cf687758332bd1517137465e215bdc4d81004 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sun, 19 Mar 2017 22:50:52 -0400 Subject: [PATCH] General tweaks --- core/autoload/buffers.el | 1 + core/core.el | 2 +- modules/feature/eval/config.el | 19 ++++++++++--------- modules/feature/evil/config.el | 2 +- modules/feature/syntax-checker/config.el | 3 ++- modules/lang/python/autoload.el | 1 + modules/lang/web/+css.el | 6 +++--- modules/ui/doom-dashboard/config.el | 11 +++++------ 8 files changed, 24 insertions(+), 21 deletions(-) diff --git a/core/autoload/buffers.el b/core/autoload/buffers.el index 96718e965..9edbbc4c5 100644 --- a/core/autoload/buffers.el +++ b/core/autoload/buffers.el @@ -192,6 +192,7 @@ See `doom-real-buffer-p' for what 'real' means." (or (not process-buffer) (and (bufferp process-buffer) (get-buffer-window-list process-buffer nil t)))) + (message "Killing %s" (process-name p)) (delete-process p) (setq n (1+ n))))) n)) diff --git a/core/core.el b/core/core.el index dedec513c..58ab6e341 100644 --- a/core/core.el +++ b/core/core.el @@ -86,7 +86,7 @@ or unstable files.") custom-file (concat doom-etc-dir "custom.el") enable-recursive-minibuffers nil 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/") ;; keep the point out of the minibuffer minibuffer-prompt-properties '(read-only t point-entered minibuffer-avoid-prompt face minibuffer-prompt) diff --git a/modules/feature/eval/config.el b/modules/feature/eval/config.el index 0d757bebc..e6a667336 100644 --- a/modules/feature/eval/config.el +++ b/modules/feature/eval/config.el @@ -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 in `quickrun--major-mode-alist'. 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 - ,(if (stringp command) - `(push ',(cons mode command) - ,(if (stringp mode) - 'quickrun-file-alist - 'quickrun--major-mode-alist)) - `(quickrun-add-command - ,(symbol-name mode) - ',command :mode ',mode)))) + ,(cond ((stringp command) + `(push ',(cons mode command) + ,(if (stringp mode) + 'quickrun-file-alist + 'quickrun--major-mode-alist))) + ((listp command) + `(quickrun-add-command + ,(symbol-name mode) + ',command :mode ',mode))))) (def-package! quickrun :commands (quickrun diff --git a/modules/feature/evil/config.el b/modules/feature/evil/config.el index 5fab05768..7f05c52a4 100644 --- a/modules/feature/evil/config.el +++ b/modules/feature/evil/config.el @@ -86,8 +86,8 @@ (evil-ex-nohighlight))) (advice-add 'evil-force-normal-state :after '+evil*esc) -;; Don't move cursor on indent (defun +evil*static-reindent (orig-fn &rest args) + "Don't move cursor on indent." (save-excursion (apply orig-fn args))) (advice-add 'evil-indent :around '+evil*static-reindent) diff --git a/modules/feature/syntax-checker/config.el b/modules/feature/syntax-checker/config.el index 0163ae00a..c60775ac6 100644 --- a/modules/feature/syntax-checker/config.el +++ b/modules/feature/syntax-checker/config.el @@ -27,7 +27,8 @@ (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 (setq flycheck-pos-tip-timeout 10 flycheck-display-errors-delay 0.5) diff --git a/modules/lang/python/autoload.el b/modules/lang/python/autoload.el index e59d71450..ea19e6eb6 100644 --- a/modules/lang/python/autoload.el +++ b/modules/lang/python/autoload.el @@ -3,4 +3,5 @@ ;;;###autoload (defun +python/repl () "Open the Python REPL." + (interactive) (process-buffer (run-python python-shell-interpreter t t))) diff --git a/modules/lang/web/+css.el b/modules/lang/web/+css.el index c6a3749f5..d1a904406 100644 --- a/modules/lang/web/+css.el +++ b/modules/lang/web/+css.el @@ -37,15 +37,15 @@ :mode ("\\.scss$" . scss-mode) :config (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 :mode "\\.sass$" :config (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 diff --git a/modules/ui/doom-dashboard/config.el b/modules/ui/doom-dashboard/config.el index fbc7fee26..aff29fe5e 100644 --- a/modules/ui/doom-dashboard/config.el +++ b/modules/ui/doom-dashboard/config.el @@ -18,16 +18,15 @@ (defvar +doom-dashboard-widgets '(banner shortmenu loaded) "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 (concat "v" doom-version) "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))