diff options
| author | Stefan Monnier | 2013-09-04 23:05:44 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2013-09-04 23:05:44 -0400 |
| commit | 4c528aabaa750d9a4e739dde482b307b734dcd62 (patch) | |
| tree | c541b14775eb8ee37f092de44cdcf189da4c85ae /lisp/vc | |
| parent | a7e43722c705f2b124fe7fa6a41cac76d0fe5b3a (diff) | |
| download | emacs-4c528aabaa750d9a4e739dde482b307b734dcd62.tar.gz emacs-4c528aabaa750d9a4e739dde482b307b734dcd62.zip | |
* lisp/emacs-lisp/cconv.el: Use `car-safe' rather than `car' to access
a "ref-cell", since it gets better optimized.
Fixes: debbugs:14883
Diffstat (limited to 'lisp/vc')
| -rw-r--r-- | lisp/vc/vc-dispatcher.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/vc/vc-dispatcher.el b/lisp/vc/vc-dispatcher.el index 1b8bfa274f8..7888752553e 100644 --- a/lisp/vc/vc-dispatcher.el +++ b/lisp/vc/vc-dispatcher.el | |||
| @@ -224,8 +224,7 @@ Another is that undo information is not kept." | |||
| 224 | "Eval CODE when the current buffer's process is done. | 224 | "Eval CODE when the current buffer's process is done. |
| 225 | If the current buffer has no process, just evaluate CODE. | 225 | If the current buffer has no process, just evaluate CODE. |
| 226 | Else, add CODE to the process' sentinel. | 226 | Else, add CODE to the process' sentinel. |
| 227 | CODE can be either a function of no arguments, or an expression | 227 | CODE should be a function of no arguments." |
| 228 | to evaluate." | ||
| 229 | (let ((proc (get-buffer-process (current-buffer)))) | 228 | (let ((proc (get-buffer-process (current-buffer)))) |
| 230 | (cond | 229 | (cond |
| 231 | ;; If there's no background process, just execute the code. | 230 | ;; If there's no background process, just execute the code. |