diff options
| author | Alexander Gramiak | 2017-10-31 21:10:52 -0600 |
|---|---|---|
| committer | Noam Postavsky | 2018-08-09 08:12:07 -0400 |
| commit | 96be6b6eb99ae1d77702932c97e8b3a147c6265a (patch) | |
| tree | d5d5bc19838fb4902b803a0a4f91b055d0a6923f /lisp | |
| parent | 00fb12703142938e7dfcfb0b3373a38f1dddecc0 (diff) | |
| download | emacs-96be6b6eb99ae1d77702932c97e8b3a147c6265a.tar.gz emacs-96be6b6eb99ae1d77702932c97e8b3a147c6265a.zip | |
Improve error messages regarding initial-buffer-choice (Bug#29098)
* lisp/startup.el (command-line-1) <initial-buffer-choice>: Make the
messages conform to Emacs conventions, and show the invalid return
value in the message.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/startup.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 33f8ca63f8d..63b831ee38d 100644 --- a/lisp/startup.el +++ b/lisp/startup.el | |||
| @@ -2515,9 +2515,9 @@ nil default-directory" name) | |||
| 2515 | ((eq initial-buffer-choice t) | 2515 | ((eq initial-buffer-choice t) |
| 2516 | (get-buffer-create "*scratch*")) | 2516 | (get-buffer-create "*scratch*")) |
| 2517 | (t | 2517 | (t |
| 2518 | (error "initial-buffer-choice must be a string, a function, or t."))))) | 2518 | (error "`initial-buffer-choice' must be a string, a function, or t"))))) |
| 2519 | (unless (buffer-live-p buf) | 2519 | (unless (buffer-live-p buf) |
| 2520 | (error "initial-buffer-choice is not a live buffer.")) | 2520 | (error "Value returned by `initial-buffer-choice' is not a live buffer: %S" buf)) |
| 2521 | (setq displayable-buffers (cons buf displayable-buffers)))) | 2521 | (setq displayable-buffers (cons buf displayable-buffers)))) |
| 2522 | 2522 | ||
| 2523 | ;; Display the first two buffers in `displayable-buffers'. If | 2523 | ;; Display the first two buffers in `displayable-buffers'. If |