Browse Source

Fix nyan-mode set length

master
10sr 4 years ago
parent
commit
88d8ae93d3
Signed by: 10sr GPG Key ID: C384BB17CBB19347
1 changed files with 9 additions and 4 deletions
  1. +9
    -4
      emacs.el

+ 9
- 4
emacs.el View File

@@ -800,11 +800,16 @@ THEM are function and its args."
;; (when f ;; (when f
;; (abbreviate-file-name f)))) ;; (abbreviate-file-name f))))
)) ))
(defun my-nyan-set-length (&rest _)
"Set `nyan-mode' length to window width."
(set-variable 'nyan-bar-length
(- (window-size nil t) 4)
t))
(add-hook 'window-configuration-change-hook (add-hook 'window-configuration-change-hook
(lambda ()
(set-variable 'nyan-bar-length
(- (window-size nil t) 4)
t))))
'my-nyan-set-length)
(add-hook 'switch-buffer-functions
'my-nyan-set-length)
)


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; letters, font-lock mode and fonts ;; letters, font-lock mode and fonts


Loading…
Cancel
Save