diff --git a/conf.el b/conf.el index 1e54c78..b3c18e4 100644 --- a/conf.el +++ b/conf.el @@ -294,6 +294,12 @@ event of an error or nonlocal exit." (insert region) (setq end (point)))))) +(defun nd/switch-to-previous-buffer () + (interactive) + (switch-to-buffer (other-buffer (current-buffer) 1))) + +(global-set-key (kbd "M-b") 'nd/switch-to-previous-buffer) + (setq inferior-R-args "--quiet --no-save") (load "ess-site") (setq ess-history-file "session.Rhistory") @@ -524,7 +530,6 @@ event of an error or nonlocal exit." (setq org-refile-use-outline-path t) (setq org-outline-path-complete-in-steps nil) -;; (setq org-completion-use-ido t) (setq org-refile-allow-creating-parent-nodes 'confirm) diff --git a/conf.org b/conf.org index 8156b6b..cb8d57e 100644 --- a/conf.org +++ b/conf.org @@ -397,6 +397,14 @@ event of an error or nonlocal exit." (setq end (point)))))) #+END_SRC (goto-char (+ origin (* (length region) arg) arg))))) +** previous buffer +#+BEGIN_SRC emacs-lisp +(defun nd/switch-to-previous-buffer () + (interactive) + (switch-to-buffer (other-buffer (current-buffer) 1))) + +(global-set-key (kbd "M-b") 'nd/switch-to-previous-buffer) +#+END_SRC * ess #+begin_src emacs-lisp (setq inferior-R-args "--quiet --no-save")