瀏覽代碼

Fix nyan-mode config

master
10sr 4 年之前
父節點
當前提交
e147085703
共有 1 個檔案被更改,包括 6 行新增4 行删除
  1. +6
    -4
      emacs.el

+ 6
- 4
emacs.el 查看文件

@@ -793,16 +793,18 @@ THEM are function and its args."
;; default-directory))))
;; "["
(:eval (progn
(set-variable 'nyan-bar-length
(- (window-size nil t) 4)
t)
(list (nyan-create))))
;; "]"
;; (:eval (let ((f (or (buffer-file-name)
;; default-directory)))
;; (when f
;; (abbreviate-file-name f))))
)))
))
(add-hook 'window-configuration-change-hook
(lambda ()
(set-variable 'nyan-bar-length
(- (window-size nil t) 4)
t))))

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


Loading…
取消
儲存