Move main emacs directory out of load path

This follows the official emacs recommendation for lisp code inside
emacs.d.

1 files changed, 67 insertions, 0 deletions

diff --git a/lisp/ravi-init-repl.el b/lisp/ravi-init-repl.el
new file mode 100644
index 0000000..8cc343b
--- /dev/null
+++ b/lisp/ravi-init-repl.el
@@ -0,0 +1,67 @@
+;;; ravi-init-repl.el --- REPL utilities
+
+;; Copyright (C) 2014
+
+;; Author:  <ravi@nero.lan>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Read-eval-print-loop support
+
+;;; Code:
+
+(use-package comint
+  :defer t
+  :config
+  (progn
+    (bind-key "<up>" 'comint-previous-matching-input-from-input comint-mode-map)
+    (bind-key "<down>" 'comint-next-matching-input-from-input comint-mode-map)
+    )
+  )
+
+(use-package octave-mod
+  :mode ("\\.m\\'" . octave-mode)
+  :config
+  (progn
+    (defun ravi/octave-shell-switch-to-shell ()
+      "Make sure that `inferior-octave-buffer' exists and is displayed."
+      (interactive)
+      (if (get-buffer inferior-octave-buffer)
+          (pop-to-buffer (get-buffer inferior-octave-buffer))
+        (inferior-octave nil))) )
+  )
+
+(use-package repl-toggle
+  :config
+  (progn
+    (setq rtog/mode-repl-alist '((python-mode . python-shell-switch-to-shell)
+                                 (octave-mode . ravi/octave-shell-switch-to-shell)
+                                 (emacs-lisp-mode . ielm)))
+    (setq rtog/goto-buffer-fun 'pop-to-buffer)
+    (add-hook 'python-mode-hook 'rtog/activate)
+    (add-hook 'octave-mode-hook 'rtog/activate)
+    (add-hook 'emacs-lisp-mode-hook 'rtog/activate)
+
+    ; The default keybinding is not great
+    (unbind-key "C-c C-z" repl-toggle-mode-map)
+    (bind-key "<f5>" 'rtog/toggle-repl repl-toggle-mode-map)
+    )
+  :diminish repl-toggle-mode
+  :ensure t)
+
+(provide 'ravi-init-repl)
+;;; ravi-init-repl.el ends here