From 3a81cc5cc3e4e671ae19a40163b5ab4adbe15228 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sat, 20 Jun 2015 10:23:13 +0200 Subject: [PATCH] Clean up --- core/lib/defuns-compile.el | 1 - core/lib/defuns-quickrun.el | 2 +- init.el | 3 ++- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/core/lib/defuns-compile.el b/core/lib/defuns-compile.el index d01ad7d82..8b6fd01eb 100644 --- a/core/lib/defuns-compile.el +++ b/core/lib/defuns-compile.el @@ -6,7 +6,6 @@ (append (list narf-core-dir narf-contrib-dir) (list (concat narf-modules-dir "lib/") (concat narf-core-dir "lib/")) - (f-directories narf-contrib-dir) (list narf-modules-dir narf-private-dir))) ;;;###autoload diff --git a/core/lib/defuns-quickrun.el b/core/lib/defuns-quickrun.el index 36c8ea947..fbaef2e03 100644 --- a/core/lib/defuns-quickrun.el +++ b/core/lib/defuns-quickrun.el @@ -50,7 +50,7 @@ If ARG is nil this function calls `recompile', otherwise it calls (setq-local scroll-margin 0) (erase-buffer) (insert out) - (beginning-of-buffer) + (goto-char (point-min)) (read-only-mode 1) (popwin:popup-buffer buf :height (if (> lines 25) 25 (1+ lines)))))))) (t (quickrun-region beg end)))) diff --git a/init.el b/init.el index 03243c317..18bd1f03a 100644 --- a/init.el +++ b/init.el @@ -42,7 +42,8 @@ (defconst narf-debug-mode nil) -(defconst narf-default-theme (if window-system 'narf-dark 'wombat)) +(defconst narf-default-theme 'narf-dark) +(defconst narf-term-theme 'wombat) (defconst narf-default-font '(:family "terminus (ttf)" :size 12 :antialias nil)) (defconst narf-big-font '(:family "Inconsolata" :size 18 :antialias t))