Commit 6ab719f5 authored by David Kågedal's avatar David Kågedal
Browse files

Prefix till kom-recover gör att cachen töms

parent 16e179ab
......@@ -19,6 +19,11 @@ Thu Jul 23 15:03:10 1998 Peter Liljenberg <petli@lysator.liu.se>
(lyskom-sv-edit-mode-map): Se ovan.
Thu Jul 16 12:57:57 1998 David Kgedal <davidk@lysator.liu.se>
* lyskom-rest.el (kom-recover): Anropar clear-all-caches nr man
anropar med prefixargument.
Wed Jul 8 13:12:48 1998 David Kagedal <davidk@lysator.liu.se>
* startup.el (lyskom): Den frgade inte om man ville fortstta med
......
......@@ -163,7 +163,8 @@ assoc list."
(defun kom-recover (&optional refetch)
"Try to recover from an error.
If the optional argument REFETCH is non-nil, `lyskom-refetch' is called."
If the optional argument REFETCH is non-nil, all caches are cleared and
`lyskom-refetch' is called."
(interactive "p")
(lyskom-init-parse lyskom-buffer)
(setq lyskom-call-data nil)
......@@ -175,7 +176,9 @@ If the optional argument REFETCH is non-nil, `lyskom-refetch' is called."
(++ i)))
(setq lyskom-number-of-pending-calls 0)
(setq lyskom-is-parsing nil)
(if refetch (lyskom-refetch))
(when refetch
(clear-all-caches)
(lyskom-refetch))
(lyskom-tell-internat 'kom-tell-recover)
(lyskom-end-of-command))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment