emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/focus 0f2a9945e9 66/82: Fixed some flycheck warnings.


From: ELPA Syncer
Subject: [nongnu] elpa/focus 0f2a9945e9 66/82: Fixed some flycheck warnings.
Date: Tue, 6 Sep 2022 04:58:58 -0400 (EDT)

branch: elpa/focus
commit 0f2a9945e93bdfd581b5e646a33ccfb56ff65348
Author: jenchieh <jcs090218@gmail.com>
Commit: jenchieh <jcs090218@gmail.com>

    Fixed some flycheck warnings.
---
 focus.el | 17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

diff --git a/focus.el b/focus.el
index 030c1e1e55..268ff062ad 100644
--- a/focus.el
+++ b/focus.el
@@ -133,7 +133,7 @@ argument."
                    (make-list foregrounds foreground)))))
 
 (defun focus-move-focus ()
-  "Moves the focused section according to `focus-bounds'.
+  "Move the focused section according to `focus-bounds'.
 
 If `focus-mode' is enabled, this command fires after each
 command."
@@ -195,8 +195,7 @@ default is overwritten. This function simply helps set the
     (setq focus-current-thing (intern thing))))
 
 (defun focus-pin ()
-  "Pin the focused section to its current location or the region,
-if active."
+  "Pin the focused section to its current location or the region, if active."
   (interactive)
   (when (bound-and-true-p focus-mode)
     (when (region-active-p)
@@ -210,7 +209,7 @@ if active."
     (add-hook 'post-command-hook 'focus-move-focus nil t)))
 
 (defun focus-next-thing (&optional n)
-  "Moves the point to the middle of the Nth next thing."
+  "Move the point to the middle of the Nth next thing."
   (interactive "p")
   (let ((current-bounds (focus-bounds))
         (thing (focus-get-thing)))
@@ -220,7 +219,7 @@ if active."
     (focus-goto-thing (focus-bounds))))
 
 (defun focus-prev-thing (&optional n)
-  "Moves the point to the middle of the Nth previous thing."
+  "Move the point to the middle of the Nth previous thing."
   (interactive "p")
   (focus-next-thing (- n)))
 
@@ -250,8 +249,8 @@ This is added to the `pre-command-hook' when
 (defun focus-read-only-init ()
   "Run when `focus-read-only-mode' is activated.
 Enables `read-only-mode', hides the cursor and adds
-`focus-read-only-cursor-blink' to `pre-command-hook'. Also
-`focus-read-only-terminate' is added to the `kill-buffer-hook'."
+`focus-read-only-cursor-blink' to `pre-command-hook'.
+Also `focus-read-only-terminate' is added to the `kill-buffer-hook'."
   (read-only-mode 1)
   (setq cursor-type nil
         focus-buffer (current-buffer))
@@ -260,8 +259,8 @@ Enables `read-only-mode', hides the cursor and adds
 
 (defun focus-read-only-terminate ()
   "Run when `focus-read-only-mode' is deactivated.
-Disables `read-only-mode' and shows the cursor again. It cleans
-up the `focus-read-only-blink-timer' and hooks."
+Disables `read-only-mode' and shows the cursor again.
+It cleans up the `focus-read-only-blink-timer' and hooks."
   (read-only-mode -1)
   (setq cursor-type focus-cursor-type)
   (when focus-read-only-blink-timer



reply via email to

[Prev in Thread] Current Thread [Next in Thread]