Mercurial > emacs
changeset 98537:acd509f38a6a
* bookmark.el (bookmark-unload-function): New function.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Mon, 06 Oct 2008 11:49:59 +0000 |
| parents | 55ce7d80f7dc |
| children | e216a9ffc756 |
| files | lisp/ChangeLog lisp/bookmark.el |
| diffstat | 2 files changed, 15 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Mon Oct 06 10:03:59 2008 +0000 +++ b/lisp/ChangeLog Mon Oct 06 11:49:59 2008 +0000 @@ -1,3 +1,7 @@ +2008-10-06 Juanma Barranquero <lekktu@gmail.com> + + * bookmark.el (bookmark-unload-function): New function. + 2008-10-06 Andreas Schwab <schwab@suse.de> * emacs-lisp/syntax.el (syntax-ppss): Doc fix. @@ -7,9 +11,9 @@ * mail/footnote.el: Remove * in defcustom docstrings and tell for most options that customizing them doesn't affect buffers already displaying footnotes. - (Footnote-refresh-footnotes, Footnote-renumber-footnotes): Fix - handling of text properties and identical start/end tags. Do - not use format when renumbering. + (Footnote-refresh-footnotes, Footnote-renumber-footnotes): + Fix handling of text properties and identical start/end tags. + Do not use format when renumbering. (Footnote-set-style): Make it work. (Footnote-insert-numbered-footnote): Simplify. (Footnote-narrow-to-footnotes, Footnote-insert-footnote) @@ -214,9 +218,9 @@ * calc/calc-units.el (math-standard-units): Add entries used to display the the values in the units buffer. - (math-build-units-table): Add entries to the units table to be used + (math-build-units-table): Add entries to the units table to be used to display the values in the units buffer. - (math-build-units-table-buffer): Use the display entry of the units + (math-build-units-table-buffer): Use the display entry of the units table when non-nil. (calc-define-unit): Add option to enter display value of unit.
--- a/lisp/bookmark.el Mon Oct 06 10:03:59 2008 +0000 +++ b/lisp/bookmark.el Mon Oct 06 11:49:59 2008 +0000 @@ -2078,6 +2078,12 @@ (add-hook 'kill-emacs-hook 'bookmark-exit-hook-internal) +(defun bookmark-unload-function () + "Unload the Bookmark library." + (when bookmark-save-flag (bookmark-save)) + ;; continue standard unloading + nil) + (run-hooks 'bookmark-load-hook)