marrub
/
scripts
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

emacs: add C-c t for ranger-mode

master
an 2020-01-22 02:49:05 -05:00
parent 7c980c44a8
commit 188299ab74
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
emacs/auto/-macro.el
View File

@ -1,3 +1,7 @@
(defun agw-touch (fname)
(interactive "FFile to touch: ")
(start-process "agw-touch" nil "touch" (expand-file-name fname)))
(defun agw-lisp-mode ()
(setq-local indent-tabs-mode nil)
(setq-local standard-indent 2)
@ -9,6 +13,9 @@
(flyspell-mode)
(setq-local indent-tabs-mode nil))
(defun agw-ranger-mode ()
(local-set-key (kbd "C-c t") #'agw-touch))
(add-hook 'org-mode-hook #'agw-org-mode)
(add-hook 'emacs-lisp-mode-hook #'agw-lisp-mode)
@ -16,5 +23,6 @@
(add-hook 'reb-lisp-mode-hook #'agw-lisp-mode)
(add-hook 'scheme-mode-hook #'agw-lisp-mode)
(add-hook 'ranger-mode-hook #'agw-ranger-mode)
;; EOF