larstvei/Focus
1
0
Fork 0
mirror of https://github.com/larstvei/Focus.git synced 2025-11-04 02:00:11 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Fixed package lint warnings.

Browse Source
This commit is contained in:
jenchieh 2019-03-09 22:01:43 +08:00
parent f058bd163d
commit aa5ea31118
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
focus.el
View File

@ -6,7 +6,7 @@
;; URL: http://github.com/larstvei/Focus ;; URL: http://github.com/larstvei/Focus
;; Created: 11th May 2015 ;; Created: 11th May 2015
;; Version: 0.1.1 ;; Version: 0.1.1
;; Package-Requires: ((emacs "24") (cl-lib "0.5")) ;; Package-Requires: ((emacs "24.3") (cl-lib "0.5"))
;; This program is free software; you can redistribute it and/or modify ;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by ;; it under the terms of the GNU General Public License as published by
@ -270,7 +270,7 @@ up the `focus-read-only-blink-timer' and hooks."
(remove-hook 'pre-command-hook 'focus-read-only-cursor-blink t) (remove-hook 'pre-command-hook 'focus-read-only-cursor-blink t)
(remove-hook 'kill-buffer-hook 'focus-read-only-terminate t)) (remove-hook 'kill-buffer-hook 'focus-read-only-terminate t))
(defun turn-off-focus-read-only-mode () (defun focus-turn-off-focus-read-only-mode ()
"Turn off `focus-read-only-mode'." "Turn off `focus-read-only-mode'."
(interactive) (interactive)
(focus-read-only-mode -1)) (focus-read-only-mode -1))
@ -297,8 +297,8 @@ up the `focus-read-only-blink-timer' and hooks."
(define-key map (kbd "SPC") 'focus-next-thing) (define-key map (kbd "SPC") 'focus-next-thing)
(define-key map (kbd "p") 'focus-prev-thing) (define-key map (kbd "p") 'focus-prev-thing)
(define-key map (kbd "S-SPC") 'focus-prev-thing) (define-key map (kbd "S-SPC") 'focus-prev-thing)
(define-key map (kbd "i") 'turn-off-focus-read-only-mode) (define-key map (kbd "i") 'focus-turn-off-focus-read-only-mode)
(define-key map (kbd "q") 'turn-off-focus-read-only-mode) (define-key map (kbd "q") 'focus-turn-off-focus-read-only-mode)
map) map)
(when cursor-type (when cursor-type
(setq focus-cursor-type cursor-type)) (setq focus-cursor-type cursor-type))