Преглед изворни кода

add eshell-mode keybind and func eshell/v

pull/1/head
10sr пре 14 година
родитељ
комит
b94881c63a
1 измењених фајлова са 5 додато и 0 уклоњено
  1. +5
    -0
      .emacs

+ 5
- 0
.emacs Прегледај датотеку

@@ -1291,6 +1291,9 @@ Optional prefix ARG says how many lines to unflag; default is one line."
"if first arg is omitted open current directory." "if first arg is omitted open current directory."
(dired (or dirname ".") switches)) (dired (or dirname ".") switches))


(defun eshell/v ()
(view-mode 1))

(defalias 'eshell/type 'eshell/which) (defalias 'eshell/type 'eshell/which)
(defalias 'eshell/vim 'eshell/vi) (defalias 'eshell/vim 'eshell/vi)
(defalias 'eshell/ff 'find-file) (defalias 'eshell/ff 'find-file)
@@ -1373,6 +1376,8 @@ if arg given, use that eshell buffer, otherwise make new eshell buffer."
(eshell-goto-prompt) (eshell-goto-prompt)
(my-keyboard-quit))) (my-keyboard-quit)))
(define-key eshell-mode-map (kbd "DEL") 'my-eshell-backward-delete-char) (define-key eshell-mode-map (kbd "DEL") 'my-eshell-backward-delete-char)
(define-key eshell-mode-map (kbd "C-p") 'eshell-previous-matching-input-from-input)
(define-key eshell-mode-map (kbd "C-n") 'eshell-next-matching-input-from-input)
(mapcar (lambda (alias) (mapcar (lambda (alias)
(add-to-list 'eshell-command-aliases-list (add-to-list 'eshell-command-aliases-list
alias)) alias))


Loading…
Откажи
Сачувај