Commit e6b4e5ff authored by Glenn Morris's avatar Glenn Morris
Browse files

Fix some doc typos

* lisp/calendar/todo-mode.el (todo-next-item)
(todo-previous-item, todo-toggle-item-header):
* lisp/window.el (move-to-window-group-line):
* src/editfns.c (Fformat):
* test/lisp/calendar/todo-mode-tests.el (todo-test-move-item05):
Fix doc typos.

; And in some comments.
parent e8636ac8
...@@ -956,7 +956,7 @@ called with a prefix argument only moves point to a lower item, ...@@ -956,7 +956,7 @@ called with a prefix argument only moves point to a lower item,
e.g., with point on the last todo item and called with prefix 1, e.g., with point on the last todo item and called with prefix 1,
it moves point to the first done item; but if called with point it moves point to the first done item; but if called with point
on the last todo item without a prefix argument, it moves point on the last todo item without a prefix argument, it moves point
the the empty line above the done items separator." to the empty line above the done items separator."
(interactive "p") (interactive "p")
;; It's not worth the trouble to allow prefix arg value < 1, since ;; It's not worth the trouble to allow prefix arg value < 1, since
;; we have the corresponding command. ;; we have the corresponding command.
...@@ -976,7 +976,7 @@ If the category's done items are visible, this command called ...@@ -976,7 +976,7 @@ If the category's done items are visible, this command called
with a prefix argument only moves point to a higher item, e.g., with a prefix argument only moves point to a higher item, e.g.,
with point on the first done item and called with prefix 1, it with point on the first done item and called with prefix 1, it
moves to the last todo item; but if called with point on the moves to the last todo item; but if called with point on the
first done item without a prefix argument, it moves point the the first done item without a prefix argument, it moves point to the
empty line above the done items separator." empty line above the done items separator."
(interactive "p") (interactive "p")
;; Avoid moving to bob if on the first item but not at bob. ;; Avoid moving to bob if on the first item but not at bob.
...@@ -1052,7 +1052,7 @@ empty line above the done items separator." ...@@ -1052,7 +1052,7 @@ empty line above the done items separator."
(defun todo-toggle-item-header () (defun todo-toggle-item-header ()
"Hide or show item date-time headers in the current file. "Hide or show item date-time headers in the current file.
With done items, this hides only the done date-time string, not With done items, this hides only the done date-time string, not
the the original date-time string." the original date-time string."
(interactive) (interactive)
(unless (catch 'nonempty (unless (catch 'nonempty
(dolist (type '(todo done)) (dolist (type '(todo done))
......
...@@ -59,7 +59,7 @@ ...@@ -59,7 +59,7 @@
;; and then M-: (macroexpand-all '(my-test1 y)) RET) ;; and then M-: (macroexpand-all '(my-test1 y)) RET)
;; There is still one downside shared with the defmacro and cl-defsubst ;; There is still one downside shared with the defmacro and cl-defsubst
;; approach: when the function is inlined, the scoping rules (dynamic or ;; approach: when the function is inlined, the scoping rules (dynamic or
;; lexical) will be inherited from the the call site. ;; lexical) will be inherited from the call site.
;; Of course, since define-inline defines a compiler macro, you can also do ;; Of course, since define-inline defines a compiler macro, you can also do
;; call-site optimizations, just like you can with `defmacro', but not with ;; call-site optimizations, just like you can with `defmacro', but not with
......
...@@ -154,7 +154,7 @@ This is typically a function to add in ...@@ -154,7 +154,7 @@ This is typically a function to add in
(dolist (entry gnus-newsrc-alist) (dolist (entry gnus-newsrc-alist)
(let ((group (car entry))) (let ((group (car entry)))
;; Check that the group level is less than ;; Check that the group level is less than
;; `gnus-notifications-minimum-level' and the the group has unread ;; `gnus-notifications-minimum-level' and the group has unread
;; messages. ;; messages.
(when (and (<= (gnus-group-level group) gnus-notifications-minimum-level) (when (and (<= (gnus-group-level group) gnus-notifications-minimum-level)
(let ((unread (gnus-group-unread group))) (let ((unread (gnus-group-unread group)))
......
...@@ -2445,7 +2445,7 @@ floating point support." ...@@ -2445,7 +2445,7 @@ floating point support."
nil) nil)
((or (<= seconds 0) ((or (<= seconds 0)
;; We are going to call read-event below, which will record ;; We are going to call read-event below, which will record
;; the the next key as part of the macro, even if that key ;; the next key as part of the macro, even if that key
;; invokes kmacro-end-macro, so if we are recording a macro, ;; invokes kmacro-end-macro, so if we are recording a macro,
;; the macro will recursively call itself. In addition, when ;; the macro will recursively call itself. In addition, when
;; that key is removed from unread-command-events, it will be ;; that key is removed from unread-command-events, it will be
......
...@@ -8678,7 +8678,7 @@ result is a list containing only the selected window." ...@@ -8678,7 +8678,7 @@ result is a list containing only the selected window."
(make-variable-buffer-local 'move-to-window-group-line-function) (make-variable-buffer-local 'move-to-window-group-line-function)
(put 'move-to-window-group-line-function 'permanent-local t) (put 'move-to-window-group-line-function 'permanent-local t)
(defun move-to-window-group-line (arg) (defun move-to-window-group-line (arg)
"Position point relative to the the current group of windows. "Position point relative to the current group of windows.
When a grouping mode (such as Follow Mode) is not active, this When a grouping mode (such as Follow Mode) is not active, this
function is identical to `move-to-window-line'. function is identical to `move-to-window-line'.
......
...@@ -4119,7 +4119,7 @@ The # flag means to use an alternate display form for %o, %x, %X, %e, ...@@ -4119,7 +4119,7 @@ The # flag means to use an alternate display form for %o, %x, %X, %e,
\"0\"; for %x and %X, it prefixes the result with \"0x\" or \"0X\"; \"0\"; for %x and %X, it prefixes the result with \"0x\" or \"0X\";
for %e and %f, it causes a decimal point to be included even if the for %e and %f, it causes a decimal point to be included even if the
the precision is zero; for %g, it causes a decimal point to be the precision is zero; for %g, it causes a decimal point to be
included even if the the precision is zero, and also forces trailing included even if the precision is zero, and also forces trailing
zeros after the decimal point to be left in place. zeros after the decimal point to be left in place.
The width specifier supplies a lower limit for the length of the The width specifier supplies a lower limit for the length of the
......
...@@ -384,7 +384,7 @@ priority and the done item should be the first done item." ...@@ -384,7 +384,7 @@ priority and the done item should be the first done item."
(ert-deftest todo-test-move-item05 () ; bug#27609 (ert-deftest todo-test-move-item05 () ; bug#27609
"Test moving multiple todo and done items to another category. "Test moving multiple todo and done items to another category.
Both types of item should be moved en bloc to the new category, Both types of item should be moved en bloc to the new category,
and the the top todo item should have the provided priority and and the top todo item should have the provided priority and
the top done item should be the first done item." the top done item should be the first done item."
(with-todo-test (with-todo-test
(todo-test--show 1) (todo-test--show 1)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment