diff options
| author | Oleg Pykhalov <go.wigust@gmail.com> | 2018-10-20 16:35:33 +0300 |
|---|---|---|
| committer | Oleg Pykhalov <go.wigust@gmail.com> | 2018-10-20 16:35:33 +0300 |
| commit | 6d0501933b0faff53bcc431a0444675fc896a396 (patch) | |
| tree | 49a1003f16394154e5c52f2e9f22d2579ff75d66 | |
| parent | Initial commit. (diff) | |
| download | emacs-redshift-master.tar.gz | |
* redshift.el (redshift-set-temp): Remove current adjustment from
screen before setting them.
| -rw-r--r-- | redshift.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/redshift.el b/redshift.el index a9b2774..5a655c8 100644 --- a/redshift.el +++ b/redshift.el @@ -52,9 +52,12 @@ (defun redshift-set-temp (temp) "Set display color temperature of display to TEMP and return TEMP." (interactive "nColor temperature: ") - (and (start-process "redshift" nil redshift-program - "-O" (number-to-string temp)) - temp)) + (progn (start-process "redshift" nil redshift-program + "-x") + (sleep-for 0.5) + (start-process "redshift" nil redshift-program + "-O" (number-to-string temp)) + temp)) ;;;###autoload (defun redshift-increase-temp () |