diff options
| author | Stefan Monnier | 2012-04-10 13:53:31 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2012-04-10 13:53:31 -0400 |
| commit | ede141ac13b356380e03c510da185c2bd781bd4c (patch) | |
| tree | 1f8660230b4c0bf2e9897e3bd30d5127d9a3d925 | |
| parent | d0203d61449b1e907a0b5d0b2d4bb9d989145cc1 (diff) | |
| download | emacs-ede141ac13b356380e03c510da185c2bd781bd4c.tar.gz emacs-ede141ac13b356380e03c510da185c2bd781bd4c.zip | |
* lisp/startup.el (command-line-1): Inhibit splash from daemon.
Fixes: debbugs:10996
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/startup.el | 5 |
2 files changed, 6 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5b2ede24777..fdd3919b13b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2012-04-10 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * startup.el (command-line-1): Inhibit splash from daemon (bug#10996). | ||
| 4 | |||
| 1 | 2012-04-10 Andreas Schwab <schwab@linux-m68k.org> | 5 | 2012-04-10 Andreas Schwab <schwab@linux-m68k.org> |
| 2 | 6 | ||
| 3 | * international/characters.el: Fix sorting. | 7 | * international/characters.el: Fix sorting. |
diff --git a/lisp/startup.el b/lisp/startup.el index 37e4f550dcd..2f72e804892 100644 --- a/lisp/startup.el +++ b/lisp/startup.el | |||
| @@ -2341,6 +2341,7 @@ A fancy display is used on graphic displays, normal otherwise." | |||
| 2341 | (if (or inhibit-startup-screen | 2341 | (if (or inhibit-startup-screen |
| 2342 | initial-buffer-choice | 2342 | initial-buffer-choice |
| 2343 | noninteractive | 2343 | noninteractive |
| 2344 | (daemonp) | ||
| 2344 | inhibit-x-resources) | 2345 | inhibit-x-resources) |
| 2345 | 2346 | ||
| 2346 | ;; Not displaying a startup screen. If 3 or more files | 2347 | ;; Not displaying a startup screen. If 3 or more files |
| @@ -2383,9 +2384,7 @@ A fancy display is used on graphic displays, normal otherwise." | |||
| 2383 | ;; (with-no-warnings | 2384 | ;; (with-no-warnings |
| 2384 | ;; (setq menubar-bindings-done t)) | 2385 | ;; (setq menubar-bindings-done t)) |
| 2385 | 2386 | ||
| 2386 | (if (> file-count 0) | 2387 | (display-startup-screen (> file-count 0))))) |
| 2387 | (display-startup-screen t) | ||
| 2388 | (display-startup-screen nil))))) | ||
| 2389 | 2388 | ||
| 2390 | (defun command-line-normalize-file-name (file) | 2389 | (defun command-line-normalize-file-name (file) |
| 2391 | "Collapse multiple slashes to one, to handle non-Emacs file names." | 2390 | "Collapse multiple slashes to one, to handle non-Emacs file names." |