diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-01-14 17:37:57 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-01-14 17:37:57 -0500 |
| commit | 65d22bf188438c6e16bd42056256f3d7e06c2e95 (patch) | |
| tree | f567a09fb6bff08907a79bbe7aaa2602b415b846 | |
| parent | 9422ff45654e07371d17d804131fafbf697b6e1e (diff) | |
| download | emacs-65d22bf188438c6e16bd42056256f3d7e06c2e95.tar.gz | |
* lisp/startup.el (command-line): Remove redundant set of no-blinking-cursor
This is redundant because this was set based on "X" resources under
(memq window-system '(x w32 ns)) but the exact same resources and
values are tested in `x-apply-session-resources` which is also used for
those 3 window systems.
| -rw-r--r-- | lisp/startup.el | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 932b3ffcd42..552802a38d7 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -1297,15 +1297,6 @@ please check its value") (unless noninteractive (tool-bar-setup))) - ;; Turn off blinking cursor if so specified in X resources. This is here - ;; only because all other settings of no-blinking-cursor are here. - (unless (or noninteractive - emacs-basic-display - (and (memq window-system '(x w32 ns)) - (not (member (x-get-resource "cursorBlink" "CursorBlink") - '("no" "off" "false" "0"))))) - (setq no-blinking-cursor t)) - (unless noninteractive (startup--setup-quote-display) (setq internal--text-quoting-flag t)) |