add buffer switch

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)
 

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")