diff options
| author | Richard M. Stallman | 1996-09-16 09:43:42 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-09-16 09:43:42 +0000 |
| commit | a7305f6e9f63ad31a8b59174f85782fb690c5b24 (patch) | |
| tree | df861cc6f1600b507326c404c23fb06b99d931de /lisp | |
| parent | 2509d35657414f76c27a8c6c8d5302acaad11ecd (diff) | |
| download | emacs-a7305f6e9f63ad31a8b59174f85782fb690c5b24.tar.gz emacs-a7305f6e9f63ad31a8b59174f85782fb690c5b24.zip | |
(file-locked-p): Alias to `ignore' if no file locking.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/files.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/files.el b/lisp/files.el index 380ab5398d5..b23bac8faf5 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -257,6 +257,8 @@ and ignores this variable.") | |||
| 257 | (defalias 'lock-buffer 'ignore)) | 257 | (defalias 'lock-buffer 'ignore)) |
| 258 | (or (fboundp 'unlock-buffer) | 258 | (or (fboundp 'unlock-buffer) |
| 259 | (defalias 'unlock-buffer 'ignore)) | 259 | (defalias 'unlock-buffer 'ignore)) |
| 260 | (or (fboundp 'file-locked-p) | ||
| 261 | (defalias 'file-locked-p 'ignore)) | ||
| 260 | 262 | ||
| 261 | ;; This hook function provides support for ange-ftp host name | 263 | ;; This hook function provides support for ange-ftp host name |
| 262 | ;; completion. It runs the usual ange-ftp hook, but only for | 264 | ;; completion. It runs the usual ange-ftp hook, but only for |