martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(combine-run-hooks): Only run-hooks if there's a hook to run.

Browse Source
This commit is contained in:
Stefan Monnier
2000-11-29 14:53:45 +00:00
parent 62fb5c6645
commit 6ad948eb50
2 changed files with 8 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ChangeLog
View File

@@ -1,3 +1,9 @@
2000-11-29 Stefan Monnier <monnier@cs.yale.edu>
* subr.el (combine-run-hooks): Only run-hooks if there's a hook to run.
* sort.el (sort-columns): Don't concat strings with numbers.
2000-11-29 Dave Love <fx@gnu.org>
* cus-edit.el (face): Fix :format.

3
lisp/subr.el
View File

@@ -1140,7 +1140,8 @@ in BODY."
(setq ,saved-combine-run-hooks combine-run-hooks)
(fset 'run-hooks ,saved-run-hooks)
(setq combine-run-hooks t)
(apply 'run-hooks ,saved-combine-run-hooks))))))
(if ,saved-combine-run-hooks
(apply 'run-hooks ,saved-combine-run-hooks)))))))
(defmacro with-syntax-table (table &rest body)