diff options
| author | Jose Antonio Ortega Ruiz <jao@imladris.local> | 2018-12-22 00:03:20 +0000 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@imladris.local> | 2018-12-22 00:03:20 +0000 |
| commit | bb36dc67df4de4af9cefd3882f9998f4f78e2b8f (patch) | |
| tree | c372d63dc119e09a81e53c9de4b16747df540eb0 | |
| parent | edcd9b854083eaa1a618c2ff82e5d17545d54da7 (diff) | |
| download | elibs-bb36dc67df4de4af9cefd3882f9998f4f78e2b8f.tar.gz elibs-bb36dc67df4de4af9cefd3882f9998f4f78e2b8f.tar.bz2 | |
doc-view: disregard non-existing files when loading sessions
| -rw-r--r-- | doc/jao-doc-view.el | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/doc/jao-doc-view.el b/doc/jao-doc-view.el index a4a16c5..8fce662 100644 --- a/doc/jao-doc-view.el +++ b/doc/jao-doc-view.el @@ -1,6 +1,6 @@ ;; jao-doc-view.el -- Remembering visited documents -;; Copyright (c) 2013, 2015, 2017 Jose Antonio Ortega Ruiz +;; Copyright (c) 2013, 2015, 2017, 2018 Jose Antonio Ortega Ruiz ;; This file is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by @@ -52,12 +52,11 @@ (defun jao-doc-view-purge-bmks () (interactive) - (let ((ht jao-doc-view--current-bmks)) - (when ht - (maphash (lambda (k v) - (when (or (= 1 v) (not (file-exists-p k))) - (remhash k ht))) - ht)))) + (when jao-doc-view--current-bmks + (maphash (lambda (k v) + (when (or (= 1 v) (not (file-exists-p k))) + (remhash k jao-doc-view--current-bmks))) + jao-doc-view--current-bmks))) (defun jao-doc-view-goto-bmk () (interactive) @@ -76,7 +75,9 @@ (when (string-equal (buffer-file-name (car buffs)) file) (throw 'done (car buffs))) (setq buffs (cdr buffs)))))) - (if b (pop-to-buffer b) (find-file file)))) + (if b + (pop-to-buffer b) + (when (file-exists-p file) (find-file file))))) (defun jao-doc-view-session (&optional file) (let ((file (or file jao-doc-view-session-file))) |