[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master fc174eb: ; Fix typos
From: |
Juri Linkov |
Subject: |
master fc174eb: ; Fix typos |
Date: |
Wed, 11 Aug 2021 03:10:37 -0400 (EDT) |
branch: master
commit fc174eb20b633708da778ac6cb4bdc3e29415ef6
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>
; Fix typos
---
lisp/files.el | 6 +++++-
lisp/help-mode.el | 2 +-
2 files changed, 6 insertions(+), 2 deletions(-)
diff --git a/lisp/files.el b/lisp/files.el
index dffce2b..6a6d540 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -6562,7 +6562,7 @@ details on the arguments, see `revert-buffer'."
(fmakunbound 'revert-buffer-with-fine-grain-success-p)))))
(defcustom revert-buffer-quick-short-answers nil
- "How much confirmation to be done by the `revert-buffer-quit' command.
+ "How much confirmation to be done by the `revert-buffer-quick' command.
If non-nil, use `y-or-n-p' instead of `yes-or-no-p'."
:version "28.1"
:type 'boolean)
@@ -6592,6 +6592,7 @@ auto-save file, if that is more recent than the visited
file."
(t
(revert-buffer (not auto-save)))))
+
(defun recover-this-file ()
"Recover the visited file--get contents from its last auto-save file."
(interactive)
@@ -6767,6 +6768,7 @@ This command is used in the special Dired buffer created
by
(message "No files can be recovered from this session now")))
(kill-buffer buffer))))
+
(defun kill-buffer-ask (buffer)
"Kill BUFFER if confirmed."
(when (yes-or-no-p (format "Buffer %s %s. Kill? "
@@ -8036,6 +8038,7 @@ based on existing mode bits, as in \"og+rX-w\"."
(define-obsolete-variable-alias 'cache-long-line-scans
'cache-long-scans "24.4")
+
;; Trashcan handling.
(defcustom trash-directory nil
"Directory for `move-file-to-trash' to move files and directories to.
@@ -8186,6 +8189,7 @@ Otherwise, trash FILENAME using the freedesktop.org
conventions,
(new-fn (file-name-concat trash-files-dir files-base)))
(rename-file fn new-fn overwrite)))))))))
+
(defsubst file-attribute-type (attributes)
"The type field in ATTRIBUTES returned by `file-attributes'.
The value is either t for directory, string (name linked to) for
diff --git a/lisp/help-mode.el b/lisp/help-mode.el
index 8206115..2f82d83 100644
--- a/lisp/help-mode.el
+++ b/lisp/help-mode.el
@@ -99,7 +99,7 @@ To use the element, do (apply FUNCTION ARGS) then goto the
point.")
(put 'help-xref-forward-stack 'permanent-local t)
(defvar-local help-xref-stack-item nil
- "An item for `help-follow-symbok' to push onto `help-xref-stack'.
+ "An item for `help-follow-symbol' to push onto `help-xref-stack'.
The format is (FUNCTION ARGS...).")
(put 'help-xref-stack-item 'permanent-local t)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master fc174eb: ; Fix typos,
Juri Linkov <=