瀏覽代碼

Do some term-mode tweaks

pull/15/head
10sr 7 年之前
父節點
當前提交
474483a56a
共有 1 個文件被更改,包括 13 次插入0 次删除
  1. +13
    -0
      emacs.el

+ 13
- 0
emacs.el 查看文件

@@ -1041,6 +1041,19 @@ found, otherwise returns nil."
(global-set-key "\M-r" 'view-mode)
;; (setq view-read-only t)

(with-eval-after-load 'term
(defvar term-raw-map (make-sparse-keymap))
(define-key term-raw-map (kbd "C-x")
(lookup-key (current-global-map)
(kbd "C-x"))))
(add-hook 'term-mode-hook
(lambda ()
;; Stop current line highlighting
(set (make-local-variable (defvar hl-line-range-function))
(lambda () '(0 . 0)))
(set (make-local-variable 'scroll-margin)
0)))

(add-hook 'Man-mode-hook
(lambda ()
(view-mode 1)


Loading…
取消
儲存