Mercurial > emacs
comparison lisp/files.el @ 16214:fa8dbed4d40e
(file-locked-p): Alias to `ignore' if no file locking.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 16 Sep 1996 09:43:42 +0000 |
| parents | 8a28d7f7cddb |
| children | 5c4b76c66de2 |
comparison
equal
deleted
inserted
replaced
| 16213:3b8851bebc76 | 16214:fa8dbed4d40e |
|---|---|
| 255 ;; Avoid losing in versions where CLASH_DETECTION is disabled. | 255 ;; Avoid losing in versions where CLASH_DETECTION is disabled. |
| 256 (or (fboundp 'lock-buffer) | 256 (or (fboundp 'lock-buffer) |
| 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 |
| 263 ;; completion operations. Having this here avoids the need | 265 ;; completion operations. Having this here avoids the need |
| 264 ;; to load ange-ftp when it's not really in use. | 266 ;; to load ange-ftp when it's not really in use. |