Skip to content

Instantly share code, notes, and snippets.

@hyagni
Created February 26, 2011 14:06
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save hyagni/845223 to your computer and use it in GitHub Desktop.
Save hyagni/845223 to your computer and use it in GitHub Desktop.
view-mode にはいるときに skk をきり、でるときにもどします。
(defun view-mode-hook0 ()
(define-many-keys view-mode-map pager-keybind)
(hl-line-mode 1)
;; (column-highlight-mode 1)
;; is skk-mode loaded?
;; it is not be able to changed after startup.
(when (and (boundp 'skk-mode) skk-mode)
(skk-mode -1)
(setq skk-was-on t)))
(add-hook 'view-mode-hook 'view-mode-hook0)
(defadvice view-mode-disable (after disable-hl-line-mode activate)
(hl-line-mode -1)
;; (column-highlight-mode 0)
(when skk-was-on (skk-mode 1)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment