diff options
| author | Stefan Monnier | 2000-04-17 10:36:52 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2000-04-17 10:36:52 +0000 |
| commit | 84e4ce49e660637c4f1bfef655b7307b3d619955 (patch) | |
| tree | c329681acb19c97635872531239c8bef0b564f20 | |
| parent | 8cfd634fbe676cd31d4b7009dfc572c7ad9a5cd4 (diff) | |
| download | emacs-84e4ce49e660637c4f1bfef655b7307b3d619955.tar.gz emacs-84e4ce49e660637c4f1bfef655b7307b3d619955.zip | |
(backup-enable-predicate): Unquote the lambda.
| -rw-r--r-- | lisp/files.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index d4a828c9d19..61db4b6a608 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -134,7 +134,7 @@ This variable is relevant only if `backup-by-copying' and | |||
| 134 | :group 'backup) | 134 | :group 'backup) |
| 135 | 135 | ||
| 136 | (defvar backup-enable-predicate | 136 | (defvar backup-enable-predicate |
| 137 | '(lambda (name) | 137 | (lambda (name) |
| 138 | (and (let ((comp (compare-strings temporary-file-directory 0 nil | 138 | (and (let ((comp (compare-strings temporary-file-directory 0 nil |
| 139 | name 0 nil))) | 139 | name 0 nil))) |
| 140 | (and (not (eq comp t)) | 140 | (and (not (eq comp t)) |