procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Reset sys to nil in define-abbrevs

Browse source 
Otherwise all abbrevs after are regarded as system ones and not saved
to disk, causing data loss.
This commit is contained in:
Leo Liu 2012-02-29 23:05:42 +08:00
parent f8425af235
commit 2d44d9cc70
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,3 +1,7 @@
2012-02-29 Leo Liu <sdl.web@gmail.com>
* abbrev.el (define-abbrevs): Reset sys to nil.
2012-02-28 Thierry Volpiatto <thierry.volpiatto@gmail.com>
* files.el (file-equal-p): Rename from `files-equal-p'.

3
lisp/abbrev.el
View file

@ -191,7 +191,8 @@ the ones defined from the buffer now."
(not (eolp)))
(setq name (read buf) count (read buf))
(if (equal count '(sys))
(setq sys t count (read buf)))
(setq sys t count (read buf))
(setq sys nil))
(setq exp (read buf))
(skip-chars-backward " \t\n\f")
(setq hook (if (not (eolp)) (read buf)))