Mercurial > emacs
comparison lisp/files.el @ 3056:2edea0c54dc3
(find-file-read-only-other-window): Use find-file-other-window.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 25 May 1993 03:56:02 +0000 |
| parents | 4bdac10d920a |
| children | c6c87b7f85b8 |
comparison
equal
deleted
inserted
replaced
| 3055:6e19d9e130c0 | 3056:2edea0c54dc3 |
|---|---|
| 388 (defun find-file-read-only-other-window (filename) | 388 (defun find-file-read-only-other-window (filename) |
| 389 "Edit file FILENAME in another window but don't allow changes. | 389 "Edit file FILENAME in another window but don't allow changes. |
| 390 Like \\[find-file-other-window] but marks buffer as read-only. | 390 Like \\[find-file-other-window] but marks buffer as read-only. |
| 391 Use \\[toggle-read-only] to permit editing." | 391 Use \\[toggle-read-only] to permit editing." |
| 392 (interactive "fFind file read-only other window: ") | 392 (interactive "fFind file read-only other window: ") |
| 393 (find-file filename) | 393 (find-file-other-window filename) |
| 394 (setq buffer-read-only t)) | 394 (setq buffer-read-only t)) |
| 395 | 395 |
| 396 (defun find-file-read-only-other-frame (filename) | 396 (defun find-file-read-only-other-frame (filename) |
| 397 "Edit file FILENAME in another frame but don't allow changes. | 397 "Edit file FILENAME in another frame but don't allow changes. |
| 398 Like \\[find-file-other-frame] but marks buffer as read-only. | 398 Like \\[find-file-other-frame] but marks buffer as read-only. |