Selaa lähdekoodia

Fix to use cl-assert

master
10sr 6 vuotta sitten
vanhempi
commit
dc3fdee407
Allekirjoittanut: 10sr GPG Key ID: 7BEC428194130EB2
1 muutettua tiedostoa jossa 2 lisäystä ja 2 poistoa
  1. +2
    -2
      emacs.el

+ 2
- 2
emacs.el Näytä tiedosto

@@ -1853,7 +1853,7 @@ and search from projectile root (if projectile is available)."
(defun recently-write ()
"Write to file."
;; Failsafe to avoid purging all existing entries
(assert recently-list)
(cl-assert recently-list)
(with-temp-buffer
(prin1 recently-list
(current-buffer))
@@ -1895,7 +1895,7 @@ read."
if (string-match re path) return nil
finally return t)
(recently-reload)
(let* ((l (copy-list recently-list))
(let* ((l (cl-copy-list recently-list))
(l (delete path
l))
(l (cl-loop for e in l


Ladataan…
Peruuta
Tallenna