diff options
| author | Ravi R Kiran <aine.marina@gmail.com> | 2021-04-25 02:33:45 (GMT) |
|---|---|---|
| committer | Ravi R Kiran <aine.marina@gmail.com> | 2021-04-25 02:33:45 (GMT) |
| commit | db776935ebb4a3911299a0404beeed7111cefbd0 (patch) | |
| tree | b87dc1afb314152867b9af6b261021beb1e24271 | |
| parent | 7ba42d3467214fbe5de2f63d13af65144c7bf1a1 (diff) | |
| download | dotemacs-db776935ebb4a3911299a0404beeed7111cefbd0.zip dotemacs-db776935ebb4a3911299a0404beeed7111cefbd0.tar.gz dotemacs-db776935ebb4a3911299a0404beeed7111cefbd0.tar.bz2 | |
rtog/active does nothing in c-base-mode buffers
| -rw-r--r-- | lisp/ravi-init-cpp.el | 1 | ||||
| -rw-r--r-- | lisp/ravi-init-repl.el | 17 |
2 files changed, 6 insertions, 12 deletions
diff --git a/lisp/ravi-init-cpp.el b/lisp/ravi-init-cpp.el index f6779c7..5162eb1 100644 --- a/lisp/ravi-init-cpp.el +++ b/lisp/ravi-init-cpp.el @@ -147,6 +147,7 @@ ;; (define-key c-mode-base-map [return] 'c-context-line-break) (bind-key "<return>" 'c-context-line-break c-mode-base-map) (bind-key "RET" 'c-context-line-break c-mode-base-map) ; needed on non-X + (bind-key "<f5>" 'compile-dwim c-mode-base-map) (unbind-key "M-j" c-mode-base-map) (bind-key "C-c C-i" 'c-includes-current-file c-mode-base-map) diff --git a/lisp/ravi-init-repl.el b/lisp/ravi-init-repl.el index 33d1cc8..1ba1e4e 100644 --- a/lisp/ravi-init-repl.el +++ b/lisp/ravi-init-repl.el @@ -45,24 +45,17 @@ :ensure nil) (use-package repl-toggle - :commands (rtog/activate ravi/repl-toggle-or-compile-dwim) + :commands (rtog/activate rtog/toggle-repl) :bind (:map repl-toggle-mode-map - ("<f5>" . ravi/repl-toggle-or-compile-dwim)) + ("<f5>" . rtog/toggle-repl)) + :hook ((python-mode-hook . rtog/activate) + (octave-mode-hook . rtog/activate) + (emacs-lisp-mode-hook . rtog/activate)) :config (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) - (add-hook 'c-mode-common-hook #'rtog/activate) - - (defun ravi/repl-toggle-or-compile-dwim () - (interactive) - (if (or rtog/--last-buffer (assoc major-mode rtog/mode-repl-alist)) - (call-interactively 'rtog/toggle-repl) - (call-interactively 'compile-dwim))) ;; The default keybinding is not great (unbind-key "C-c C-z" repl-toggle-mode-map) |