 (setq scroll-margin 5)
 (setq scroll-conservatively 10000)
 
-;; yascroll
-;; (global-yascroll-bar-mode 1)
-
-
 ;; optical stuff
 ;; Stop cursor blinking
 (blink-cursor-mode -1)


;; undo highlighting
;; highlight changes made by undo
(use-package volatile-highlights)
(volatile-highlights-mode t)


;; show keystrokes in progress
(setq echo-keystrokes 0.1)

  "Check time and change theme setting"
  (let*
      ((now (current-time))
       (today-times    (sunrise-sunset-times (today)))
       (tomorrow-times (sunrise-sunset-times (tomorrow)))
       (sunrise-today (first today-times))
       (sunset-today (second today-times))
       (sunrise-tomorrow (first tomorrow-times)))
    (if (daytime-p sunrise-today sunset-today)
        (progn
          (setq use-bright-theme t)
          (disable-theme dark-theme)
          (load-correct-theme)
          (run-at-time (+second sunset-today) nil
                       'load-theme-as-time))
      (setq use-bright-theme nil)
      (disable-theme bright-theme)
      (load-correct-theme)
      (if (time-less-p now sunrise-today)
          (run-at-time (+second sunrise-today) nil
                       'load-theme-as-time)
        (run-at-time (+second sunrise-tomorrow) nil
                     'load-theme-as-time)))))

(when (pretty-load?)
  (load-theme-as-time))
