Skip to content

Instantly share code, notes, and snippets.

@kawaguchi
Created October 21, 2009 09:42
Show Gist options
  • Save kawaguchi/214993 to your computer and use it in GitHub Desktop.
Save kawaguchi/214993 to your computer and use it in GitHub Desktop.
(defvar killed-buffers '())
(defun add-killed-buffer-list ()
(let ((b (buffer-file-name)))
(unless (null b)
(add-to-list 'killed-buffers b))))
(add-hook 'kill-buffer-hook 'add-killed-buffer-list)
(defun rebirth-of-buffer ()
(interactive)
(if (car killed-buffers)
(let ((b (car killed-buffers)))
(setq killed-buffers (cdr killed-buffers))
(find-file b))))
(global-set-key (kbd "C-x u") 'rebirth-of-buffer)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment