1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

* lisp/emacs-lisp/cconv.el: Use car-safe' rather than car' to access

a "ref-cell", since it gets better optimized.

Fixes: debbugs:14883
This commit is contained in:
Stefan Monnier 2013-09-04 23:05:44 -04:00
parent a7e43722c7
commit 4c528aabaa
3 changed files with 16 additions and 12 deletions

View file

@ -224,8 +224,7 @@ Another is that undo information is not kept."
"Eval CODE when the current buffer's process is done.
If the current buffer has no process, just evaluate CODE.
Else, add CODE to the process' sentinel.
CODE can be either a function of no arguments, or an expression
to evaluate."
CODE should be a function of no arguments."
(let ((proc (get-buffer-process (current-buffer))))
(cond
;; If there's no background process, just execute the code.