Clean up

core/core.el

@@ -146,7 +146,7 @@
 
 (defun narf-init ()
   (setq-default
-   gc-cons-threshold 16777216
+   gc-cons-threshold 8388608
    gc-cons-percentage 0.3)
 
   (defadvice save-buffers-kill-emacs (around no-query-kill-emacs activate)

core/lib/defuns-workgroup.el

@@ -26,8 +26,8 @@
     (wg-save-session)))
 
 ;;;###autoload (autoload 'narf:load-session "defuns-workgroup" nil t)
-(evil-define-command narf:load-session (&optional bang session-name)
+(evil-define-command narf:load-session (&optional session-name)
-  (interactive "<!><a>")
+  (interactive "<a>")
   (wg-open-session (if session-name
                        (concat wg-workgroup-directory session-name)
                      wg-session-file))

private/my-commands.el

@@ -66,10 +66,7 @@
 (exmap "proj[ect]"       'narf:org-crm-project)
 (exmap "invo[ice]"       'narf:org-crm-invoice)
 
-;; Plugins
+;; Sessions/tabs
-(after! flycheck
-  (exmap "er[rors]"      (λ! (flycheck-buffer) (flycheck-list-errors))))
-
 (exmap "sl[oad]"       'narf:load-session)
 (exmap "ss[ave]"       'narf:save-session)
 (exmap "tabs"          'narf/tab-display)
@@ -81,5 +78,9 @@
 (exmap "tabp[rev]"     'narf:switch-to-tab-left)
 (exmap "tabl[ast]"     'narf:switch-to-tab-last)
 
+;; Plugins
+(after! flycheck
+  (exmap "er[rors]"      (λ! (flycheck-buffer) (flycheck-list-errors))))
+
 (provide 'my-commands)
 ;;; my-commands.el ends here