diff options
| author | Philipp Stephani | 2016-10-01 20:13:53 +0200 |
|---|---|---|
| committer | Philipp Stephani | 2016-10-01 20:13:53 +0200 |
| commit | 08b386db1f4212ce90f726442fcf356885fb31ae (patch) | |
| tree | 5c9ed8a6566f72232d8263fad4fb9ddad76fbb40 | |
| parent | b661efd90d9bd57430761b0e87fcc8723ec24814 (diff) | |
| download | emacs-08b386db1f4212ce90f726442fcf356885fb31ae.tar.gz emacs-08b386db1f4212ce90f726442fcf356885fb31ae.zip | |
Use a simple keyword for a non-nil argument
The second argument of `run-with-idle-timer' is Boolean, i.e. only nil
and non-nil values are distinguished. Passing a number here is
confusing. Pass a descriptive symbol instead.
* lisp/frame.el (blink-cursor-mode, blink-cursor-check): Use
:repeat symbol instead of number for second argument of
`run-with-idle-timer'
| -rw-r--r-- | lisp/frame.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index b13621a5c50..d3b6353d2a2 100644 --- a/lisp/frame.el +++ b/lisp/frame.el | |||
| @@ -2119,8 +2119,7 @@ This is done when a frame gets focus. Blink timers may be stopped by | |||
| 2119 | ;; during command execution) if they set blink-cursor-delay | 2119 | ;; during command execution) if they set blink-cursor-delay |
| 2120 | ;; to a very small or even zero value. | 2120 | ;; to a very small or even zero value. |
| 2121 | (run-with-idle-timer (max 0.2 blink-cursor-delay) | 2121 | (run-with-idle-timer (max 0.2 blink-cursor-delay) |
| 2122 | blink-cursor-delay | 2122 | :repeat #'blink-cursor-start)))) |
| 2123 | 'blink-cursor-start)))) | ||
| 2124 | 2123 | ||
| 2125 | (define-obsolete-variable-alias 'blink-cursor 'blink-cursor-mode "22.1") | 2124 | (define-obsolete-variable-alias 'blink-cursor 'blink-cursor-mode "22.1") |
| 2126 | 2125 | ||
| @@ -2157,8 +2156,7 @@ terminals, cursor blinking is controlled by the terminal." | |||
| 2157 | ;; during command execution) if they set blink-cursor-delay | 2156 | ;; during command execution) if they set blink-cursor-delay |
| 2158 | ;; to a very small or even zero value. | 2157 | ;; to a very small or even zero value. |
| 2159 | (run-with-idle-timer (max 0.2 blink-cursor-delay) | 2158 | (run-with-idle-timer (max 0.2 blink-cursor-delay) |
| 2160 | blink-cursor-delay | 2159 | :repeat #'blink-cursor-start)))) |
| 2161 | #'blink-cursor-start)))) | ||
| 2162 | 2160 | ||
| 2163 | 2161 | ||
| 2164 | ;; Frame maximization/fullscreen | 2162 | ;; Frame maximization/fullscreen |