(if (and b e (< (point) e)) (setq rlt nil)))
(setq ad-return-value rlt)))
#+END_SRC
+
+*** Expand-region
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+ (use-package expand-region
+ :ensure t
+ :config
+ (global-set-key (kbd "C-=") 'er/expand-region))
+#+END_SRC
+
** Motion
*** Avy
#+BEGIN_SRC emacs-lisp :tangle yes :results silent
** TODO bookmark
** TODO Calendar
-** TODO advice info
+** advice info
#+BEGIN_SRC emacs-lisp :tangle yes :results silent
(defun sd/info-mode ()
(interactive)
(unless (> (length (window-list)) 1)
(split-window-right))
(other-window 1)
- (info)))
+ ;; (info)
+ ))
- (global-set-key (kbd "C-h i") 'sd/info-mode)
+ ;; (global-set-key (kbd "C-h i") 'sd/info-mode)
;; open Info buffer in other window instead of current window
- (defadvice Info (before my-info activate)
+ (defadvice info (before my-info (&optional file buf) activate)
(sd/info-mode))
(defadvice Info-exit (after my-info-exit activate)