hua*_*uan 12
(require 'cl)
(require 'recentf)
(defun find-last-killed-file ()
(interactive)
(let ((active-files (loop for buf in (buffer-list)
when (buffer-file-name buf) collect it)))
(loop for file in recentf-list
unless (member file active-files) return (find-file file))))
(define-key global-map (kbd "C-S-t") 'find-last-killed-file)
Run Code Online (Sandbox Code Playgroud)