diff --git a/core/core-ui.el b/core/core-ui.el index 0f130a0ae..fe6f740a6 100644 --- a/core/core-ui.el +++ b/core/core-ui.el @@ -20,7 +20,7 @@ fringes-outside-margins t hl-line-sticky-flag nil ; only highlight in one window - jit-lock-defer-time 0 + jit-lock-defer-time nil jit-lock-stealth-time 1 resize-mini-windows t) diff --git a/core/core.el b/core/core.el index 886574e22..12693901f 100644 --- a/core/core.el +++ b/core/core.el @@ -151,7 +151,9 @@ (require 'server) (unless (server-running-p) - (server-start))) + (server-start)) + + (add-hook! after-init (setq gc-cons-threshold 800000))) (provide 'core) ;;; core.el ends here diff --git a/init.el b/init.el index c7ea44cce..aec20be37 100644 --- a/init.el +++ b/init.el @@ -40,6 +40,8 @@ ;; ;;; License: GPLv3 +(setq gc-cons-threshold 169715200) + (defconst narf-theme 'narf-dark) (defconst narf-default-font (font-spec :family "DejaVu Sans Mono" :size 12)) (defconst narf-big-font (font-spec :family "Inconsolata" :size 20)) diff --git a/modules/module-python.el b/modules/module-python.el index 7f2172483..6530de4db 100644 --- a/modules/module-python.el +++ b/modules/module-python.el @@ -14,54 +14,55 @@ (define-env-command! python-mode "python --version | cut -d' ' -f2") ;; interferes with smartparens - (define-key python-mode-map (kbd "DEL") nil)) + (define-key python-mode-map (kbd "DEL") nil) -(use-package nose - :commands nose-mode - :preface (defvar nose-mode-map (make-sparse-keymap)) - :init - (associate! nose-mode :pattern "/test_.+\\.py\\'") - :config - (bind! :map nose-mode-map - :n ",tr" 'nosetests-again - :n ",ta" 'nosetests-all - :n ",ts" 'nosetests-one - :n ",tv" 'nosetests-module - :n ",tA" 'nosetests-pdb-all - :n ",tO" 'nosetests-pdb-one - :n ",tV" 'nosetests-pdb-module)) + (use-package nose + :commands nose-mode + :preface (defvar nose-mode-map (make-sparse-keymap)) + :init + (associate! nose-mode :pattern "/test_.+\\.py\\'") + :config + (bind! :map nose-mode-map + :n ",tr" 'nosetests-again + :n ",ta" 'nosetests-all + :n ",ts" 'nosetests-one + :n ",tv" 'nosetests-module + :n ",tA" 'nosetests-pdb-all + :n ",tO" 'nosetests-pdb-one + :n ",tV" 'nosetests-pdb-module)) -(use-package anaconda-mode - :diminish anaconda-mode - :defines (anaconda-mode-map anaconda-nav-mode-map) - :functions (anaconda-mode-running-p) - :init - (add-hook! python-mode '(anaconda-mode eldoc-mode)) - (setq anaconda-mode-installation-directory (concat narf-temp-dir "anaconda/")) - :config - (bind! :map anaconda-mode-map :m "gd" 'anaconda-mode-goto-definitions) - (bind! :map anaconda-nav-mode-map :n [escape] 'anaconda-nav-quit) + (use-package anaconda-mode + :diminish anaconda-mode + :defines (anaconda-mode-map anaconda-nav-mode-map) + :functions (anaconda-mode-running-p) + :init + (add-hook! python-mode '(anaconda-mode eldoc-mode)) + (setq anaconda-mode-installation-directory (concat narf-temp-dir "anaconda/")) + :config + (bind! :map anaconda-mode-map :m "gd" 'anaconda-mode-goto-definitions) + (bind! :map anaconda-nav-mode-map :n [escape] 'anaconda-nav-quit) - (advice-add 'anaconda-mode-doc-buffer :after 'narf*anaconda-mode-doc-buffer) + (advice-add 'anaconda-mode-doc-buffer :after 'narf*anaconda-mode-doc-buffer) - (require 'company-anaconda) - (define-company-backend! python-mode (anaconda)) - (after! emr - (mapc (lambda (x) - (let ((command-name (car x)) - (title (cadr x)) - (region-p (caddr x)) - predicate) - (setq predicate (lambda () (and (anaconda-mode-running-p) - (not (use-region-p)) - (not (sp-point-in-string-or-comment))))) - (emr-declare-command (intern (format "anaconda-mode-%s" (symbol-name command-name))) - :title title :modes 'python-mode :predicate predicate))) - '((show-doc "view documentation" t) - (find-assignments "find assignments" t) - (find-definitions "find definitions" t) - (find-file "find assignments" t) - (find-references "show usages" nil))))) + (after! company + (require 'company-anaconda) + (define-company-backend! python-mode (anaconda))) + (after! emr + (mapc (lambda (x) + (let ((command-name (car x)) + (title (cadr x)) + (region-p (caddr x)) + predicate) + (setq predicate (lambda () (and (anaconda-mode-running-p) + (not (use-region-p)) + (not (sp-point-in-string-or-comment))))) + (emr-declare-command (intern (format "anaconda-mode-%s" (symbol-name command-name))) + :title title :modes 'python-mode :predicate predicate))) + '((show-doc "view documentation" t) + (find-assignments "find assignments" t) + (find-definitions "find definitions" t) + (find-file "find assignments" t) + (find-references "show usages" nil)))))) (provide 'module-python) ;;; module-python.el ends here diff --git a/private/my-bindings.el b/private/my-bindings.el index 16379b892..de12a55aa 100644 --- a/private/my-bindings.el +++ b/private/my-bindings.el @@ -171,7 +171,7 @@ :n "w" 'narf:helm-wg :n "W" 'narf:workgroup-display) - :n "K" 'smart-up + :nv "K" 'smart-up ;; Don't move cursor on indent :n "=" (λ (save-excursion (call-interactively 'evil-indent)))