3434 evil-surround
3535 evil-terminal-cursor-changer
3636 evil-visualstar
37- evil-nerd-commenter
3837 exec-path-from-shell
3938 expand-region
4039 fill-column-indicator
5150 ghc
5251 golden-ratio
5352 google-translate
53+ guide-key-tip
5454 haskell-mode
5555 helm
5656 helm-css-scss
@@ -363,20 +363,6 @@ DELETE-FUNC when calling CALLBACK.
363363 ; ; load surround
364364 (use-package evil-surround
365365 :init (global-evil-surround-mode 1 ))
366- ; ; load nerd-commenter
367- (if (version< emacs-version " 24.4" )
368- (use-package evil-nerd-commenter
369- :init
370- (progn
371- (evil-leader/set-key
372- " ncl" 'evilnc-comment-or-uncomment-lines
373- " nct" 'evilnc-quick-comment-or-uncomment-to-the-line
374- " ncy" 'evilnc-copy-and-comment-lines
375- " ncp" 'evilnc-comment-or-uncomment-paragraphs
376- " ncr" 'comment-or-uncomment-region
377- " nci" 'evilnc-toggle-invert-comment-line-by-line
378- " ncc" 'evilnc-comment-operator
379- ))))
380366 ; ; load evil-exchange
381367 (use-package evil-exchange
382368 :init (evil-exchange-install))
@@ -700,7 +686,7 @@ DELETE-FUNC when calling CALLBACK.
700686 " sn" (lambda () (interactive ) (eval '(progn (ahs-highlight-now) (ahs-forward)) nil ))
701687 " sN" (lambda () (interactive ) (eval '(progn (ahs-highlight-now) (ahs-backward)) nil ))
702688 " ts" 'auto-highlight-symbol-mode ))
703- (spacemacs//diminish auto-highlight-symbol-mode " Ⓗ " )
689+ (spacemacs//hide-lighter auto-highlight-symbol-mode)
704690 ; ; micro-state to easily jump from a highlighted symbol to the others
705691 (dolist (sym '(ahs-forward
706692 ahs-forward-definition
@@ -1136,11 +1122,14 @@ DELETE-FUNC when calling CALLBACK.
11361122 (use-package golden-ratio
11371123 :defer t
11381124 :init
1139- (evil-leader/set-key " tg"
1140- '(lambda () (interactive )
1141- (if (symbol-value golden-ratio-mode)
1142- (progn (golden-ratio-mode -1 )(balance-windows ))
1143- (golden-ratio-mode))))
1125+ (progn
1126+ (defun spacemacs/toggle-golden-ratio ()
1127+ " Toggle golden-ratio mode on and off."
1128+ (interactive )
1129+ (if (symbol-value golden-ratio-mode)
1130+ (progn (golden-ratio-mode -1 )(balance-windows ))
1131+ (golden-ratio-mode)))
1132+ (evil-leader/set-key " tg" 'spacemacs/toggle-golden-ratio ))
11441133 :config
11451134 (progn
11461135 (setq golden-ratio-extra-commands
@@ -1167,6 +1156,18 @@ DELETE-FUNC when calling CALLBACK.
11671156 ess-eval-buffer-and-go
11681157 ess-eval-function-and-go
11691158 ess-eval-line-and-go)))
1159+
1160+ ; ; Disable auto-resizing for some buffers
1161+ (defun spacemacs/no-golden-ratio-for-buffers (bufname )
1162+ " Disable golden-ratio if BUFNAME is the name of a visible buffer."
1163+ (and (get-buffer bufname) (get-buffer-window bufname 'visible )))
1164+ (defun spacemacs/no-golden-ratio-guide-key ()
1165+ " Disable golden-ratio for guide-key popwin buffer."
1166+ (or (spacemacs/no-golden-ratio-for-buffers " *guide-key*" )
1167+ (spacemacs/no-golden-ratio-for-buffers " *popwin-dummy*" )))
1168+ (add-to-list 'golden-ratio-inhibit-functions
1169+ 'spacemacs/no-golden-ratio-guide-key )
1170+
11701171 (spacemacs//diminish golden-ratio-mode " ⊞" ))))
11711172
11721173(defun spacemacs/init-google-translate ()
@@ -1189,6 +1190,26 @@ DELETE-FUNC when calling CALLBACK.
11891190 (setq google-translate-default-source-language " En" )
11901191 (setq google-translate-default-target-language " Fr" ))))
11911192
1193+ (defun spacemacs/init-guide-key-tip ()
1194+ (use-package guide-key-tip
1195+ :init
1196+ (progn
1197+ (defun spacemacs/toggle-guide-key ()
1198+ " Toggle golden-ratio mode on and off."
1199+ (interactive )
1200+ (if (symbol-value guide-key-mode)
1201+ (guide-key-mode -1 )
1202+ (guide-key-mode)))
1203+ (evil-leader/set-key " tG" 'spacemacs/toggle-guide-key )
1204+ (setq guide-key/guide-key-sequence '(" C-x" " C-c" " SPC" " g" " z" " C-h" )
1205+ guide-key/recursive-key-sequence-flag t
1206+ guide-key/popup-window-position 'right
1207+ guide-key/idle-delay 1
1208+ guide-key/text-scale-amount 0
1209+ guide-key-tip/enabled (if window-system t ))
1210+ (guide-key-mode 1 )
1211+ (spacemacs//diminish guide-key-mode " Ⓖ" ))))
1212+
11921213(defun spacemacs/init-haskell-mode ()
11931214 (require 'haskell-yas )
11941215 (use-package haskell-mode
@@ -1575,12 +1596,9 @@ DELETE-FUNC when calling CALLBACK.
15751596 :config
15761597 (progn
15771598 (projectile-global-mode)
1578- (def-projectile-commander-method ?F
1599+ (def-projectile-commander-method ?h
15791600 " Find file in project using helm."
15801601 (helm-projectile))
1581- (def-projectile-commander-method ?r
1582- " Replace a string in the project."
1583- (projectile-replace))
15841602 (spacemacs//hide-lighter projectile-mode))))
15851603
15861604(defun spacemacs/init-python ()
0 commit comments