diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2019-12-10 20:04:36 -0800 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2019-12-10 20:05:49 -0800 |
commit | b0f20651e3cbb8a66f11ffae4c18634019c20cd4 (patch) | |
tree | 067bcb8fa529b4afee6d189f409faf16bd437810 /lisp | |
parent | 0940296ebe56ebdf9c32e94191d4f0b18006a910 (diff) | |
download | emacs-b0f20651e3cbb8a66f11ffae4c18634019c20cd4.tar.gz |
; Spelling fixes
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/ChangeLog.7 | 6 | ||||
-rw-r--r-- | lisp/auth-source-pass.el | 2 | ||||
-rw-r--r-- | lisp/button.el | 2 | ||||
-rw-r--r-- | lisp/cedet/ChangeLog.1 | 2 | ||||
-rw-r--r-- | lisp/gnus/gnus-cus.el | 2 | ||||
-rw-r--r-- | lisp/gnus/nnimap.el | 2 | ||||
-rw-r--r-- | lisp/icomplete.el | 2 | ||||
-rw-r--r-- | lisp/net/newst-backend.el | 2 | ||||
-rw-r--r-- | lisp/org/org-attach.el | 4 | ||||
-rw-r--r-- | lisp/org/org.el | 4 | ||||
-rw-r--r-- | lisp/progmodes/cc-langs.el | 2 | ||||
-rw-r--r-- | lisp/progmodes/flymake.el | 2 | ||||
-rw-r--r-- | lisp/progmodes/hideshow.el | 8 | ||||
-rw-r--r-- | lisp/progmodes/python.el | 4 | ||||
-rw-r--r-- | lisp/so-long.el | 24 | ||||
-rw-r--r-- | lisp/subr.el | 2 | ||||
-rw-r--r-- | lisp/thingatpt.el | 2 |
17 files changed, 36 insertions, 36 deletions
diff --git a/lisp/ChangeLog.7 b/lisp/ChangeLog.7 index 2fe98e8f00d..2c2aabd94b5 100644 --- a/lisp/ChangeLog.7 +++ b/lisp/ChangeLog.7 @@ -17104,8 +17104,8 @@ the rewrite of `hs-inside-comment-p'. (hs-inside-comment-p): Rewritten from scratch. Semantics changed when returning non-nil. We can be inside a comment, but that - comment might not be hidable (the car of the return value should - be non-nil to be hidable). + comment might not be hideable (the car of the return value should + be non-nil to be hideable). (hs-grok-mode-type): Rewrite to be more understandable. `hs-c-end-regexp' does not exist any more. Initialize `hs-c-start-regexp' from the alist if specified there. @@ -17117,7 +17117,7 @@ block, go to their end and look there for the overlays. (java-hs-adjust-block-beginning): New function. (hs-hide-all): Hide a comment block only if `hs-inside-comment-p' - says is hidable. + says is hideable. (hs-hide-block): Simplify. Handle properly the result of `hs-inside-comment-p'. (hs-show-block): Likewise. diff --git a/lisp/auth-source-pass.el b/lisp/auth-source-pass.el index 45d5a6ce81b..7201a2d1a2c 100644 --- a/lisp/auth-source-pass.el +++ b/lisp/auth-source-pass.el @@ -292,7 +292,7 @@ components, from longest to shortest." (defun auth-source-pass--name-port-user-suffixes (name user port) "Return a list of possible path suffixes for NAME, USER, & PORT. -The resulting list is ordered from most specifc to least +The resulting list is ordered from most specific to least specific, with paths matching all of NAME, USER, & PORT first, then NAME & USER, then NAME & PORT, then just NAME." (seq-mapcat diff --git a/lisp/button.el b/lisp/button.el index ac6af0be4f8..d5aaf1b42ee 100644 --- a/lisp/button.el +++ b/lisp/button.el @@ -243,7 +243,7 @@ overlay, a buffer position, or (for buttons in the mode-line or header-line) a string. If BUTTON has a `button-data' value, call the function with this -value instad of BUTTON. +value instead of BUTTON. This function only works when BUTTON is in the current buffer." (let ((action (or (and use-mouse-action (button-get button 'mouse-action)) diff --git a/lisp/cedet/ChangeLog.1 b/lisp/cedet/ChangeLog.1 index 1d34219daa0..cf8d6c4f6c6 100644 --- a/lisp/cedet/ChangeLog.1 +++ b/lisp/cedet/ChangeLog.1 @@ -453,7 +453,7 @@ * semantic/ctxt.el (semantic-get-local-variables-default): Also try to parse local variables for buffers which are currently - marked as unparseable. Otherwise, it is often impossible to + marked as unparsable. Otherwise, it is often impossible to complete local variables. * semantic/scope.el (semantic-analyze-scoped-types-default): If we diff --git a/lisp/gnus/gnus-cus.el b/lisp/gnus/gnus-cus.el index 5291d1d64d1..57e7f7c8c35 100644 --- a/lisp/gnus/gnus-cus.el +++ b/lisp/gnus/gnus-cus.el @@ -257,7 +257,7 @@ Server-assigned value attached to IMAP groups, used to maintain consistency.") (modseq (choice :tag "modseq" (const :tag "None" nil) (string :tag "Sequence number")) - "Modification seqence number") + "Modification sequence number") (active (cons :tag "active" (integer :tag "min") (integer :tag "max")) "active") (permanent-flags (repeat :tag "Permanent Flags" (symbol :tag "Flag")) diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index bbbca8f4193..f02c2e5c1f1 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el @@ -233,7 +233,7 @@ textual parts.") 'headers)) (defun nnimap-transform-headers () - "Transform server's FETCH response into parseable headers." + "Transform server's FETCH response into parsable headers." (goto-char (point-min)) (let (seen-articles article lines size string labels) (cl-block nil diff --git a/lisp/icomplete.el b/lisp/icomplete.el index 16167ea21e1..cd20064be02 100644 --- a/lisp/icomplete.el +++ b/lisp/icomplete.el @@ -69,7 +69,7 @@ When nil, show candidates in full." :version "24.4") (defvar icomplete-tidy-shadowed-file-names nil - "If non-nil, automatically delete superflous parts of file names. + "If non-nil, automatically delete superfluous parts of file names. For example, if the user types ~/ after a long path name, everything preceding the ~/ is discarded so the interactive selection process starts again from the user's $HOME.") diff --git a/lisp/net/newst-backend.el b/lisp/net/newst-backend.el index 9c24dec2a1e..792ddbbf0b7 100644 --- a/lisp/net/newst-backend.el +++ b/lisp/net/newst-backend.el @@ -1598,7 +1598,7 @@ This function calls `message' with arguments STRING and ARGS, if (defun newsticker--decode-iso8601-date (string) "Return ISO8601-STRING in format like `encode-time'. Converts from ISO-8601 to Emacs representation. If no time zone -is present, this fuction defaults to universal time." +is present, this function defaults to universal time." (if string (condition-case nil (encode-time (decoded-time-set-defaults (iso8601-parse string) 0)) diff --git a/lisp/org/org-attach.el b/lisp/org/org-attach.el index bc49be7fe74..d3e1c78b7da 100644 --- a/lisp/org/org-attach.el +++ b/lisp/org/org-attach.el @@ -187,7 +187,7 @@ attachment folders based on ID." "Hook that is invoked by `org-attach-open'. Created mostly to be compatible with org-attach-git after removing -git-funtionality from this file.") +git-functionality from this file.") (defcustom org-attach-commands '(((?a ?\C-a) org-attach-attach @@ -231,7 +231,7 @@ directory in dired and delete from there.\n") Each entry in this list is a list of three elements: - A list of keys (characters) to select the command (the fist character in the list is shown in the attachment dispatcher's - splash buffer and minubuffer prompt). + splash buffer and minibuffer prompt). - A command that is called interactively when one of these keys is pressed. - A docstring for this command in the attachment dispatcher's diff --git a/lisp/org/org.el b/lisp/org/org.el index 11bc3641022..c289d5425ec 100644 --- a/lisp/org/org.el +++ b/lisp/org/org.el @@ -9854,9 +9854,9 @@ Elements of length one have a tab appended. Elements of length two are kept as is. Longer elements are truncated to length two. If an element cannot be made unique, an error is raised." - (let ((orderd-keys (cl-sort (copy-sequence keys) #'< :key #'length)) + (let ((ordered-keys (cl-sort (copy-sequence keys) #'< :key #'length)) menu-keys) - (dolist (key orderd-keys) + (dolist (key ordered-keys) (let ((potential-key (cl-case (length key) (1 (concat key "\t")) diff --git a/lisp/progmodes/cc-langs.el b/lisp/progmodes/cc-langs.el index 44d0d49df5b..da3fc6b318e 100644 --- a/lisp/progmodes/cc-langs.el +++ b/lisp/progmodes/cc-langs.el @@ -1416,7 +1416,7 @@ template opener followed by the \"::\" operator - usually." (c-lang-const c-<-pseudo-digraph-cont-regexp)) (c-lang-defconst c-<-pseudo-digraph-cont-len - "The maximum length of the main bit of a `c-<pseudp-digraph-cont-regexp' match. + "The maximum length of the main bit of a `c-<-pseudo-digraph-cont-regexp' match. This doesn't count the merely contextual bits of the regexp match." t 0 c++ 2) diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el index f052e002df7..d980d675d4d 100644 --- a/lisp/progmodes/flymake.el +++ b/lisp/progmodes/flymake.el @@ -708,7 +708,7 @@ backend is operating normally.") "Tell if Flymake has running backends in this buffer." (flymake-running-backends)) -;; FIXME: clone of `isearch-intesects-p'! Make this an util. +;; FIXME: clone of `isearch-intersects-p'! Make this an util. (defun flymake--intersects-p (start0 end0 start1 end1) "Return t if regions START0..END0 and START1..END1 intersect." (or (and (>= start0 start1) (< start0 end1)) diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el index 53235ea573b..8f8b79af74b 100644 --- a/lisp/progmodes/hideshow.el +++ b/lisp/progmodes/hideshow.el @@ -610,7 +610,7 @@ as cdr." (forward-comment (- (buffer-size))) (skip-chars-forward " \t\n\f") (let ((p (point)) - (hidable t)) + (hideable t)) (beginning-of-line) (unless (looking-at (concat "[ \t]*" hs-c-start-regexp)) ;; we are in this situation: (example) @@ -636,13 +636,13 @@ as cdr." (when (or (not (looking-at hs-c-start-regexp)) (> (point) q)) ;; we cannot hide this comment block - (setq hidable nil))) + (setq hideable nil))) ;; goto the end of the comment (forward-comment (buffer-size)) (skip-chars-backward " \t\n\f") (end-of-line) (when (>= (point) q) - (list (and hidable p) (point)))))))) + (list (and hideable p) (point)))))))) (defun hs-grok-mode-type () "Set up hideshow variables for new buffers. @@ -741,7 +741,7 @@ and `case-fold-search' are both t." (save-excursion (let ((c-reg (hs-inside-comment-p))) (if (and c-reg (nth 0 c-reg)) - ;; point is inside a comment, and that comment is hidable + ;; point is inside a comment, and that comment is hideable (goto-char (nth 0 c-reg)) (end-of-line) (when (and (not c-reg) diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el index 0eed7acd0d7..b0d3174eabc 100644 --- a/lisp/progmodes/python.el +++ b/lisp/progmodes/python.el @@ -3856,8 +3856,8 @@ Returns the tracked buffer." (defun python-pdbtrack-comint-input-filter-function (input) "Finish tracking session depending on command in INPUT. -Commands that must finish tracking session is listed in -`python-pdbtrack-untracking-commands'." +Commands that must finish the tracking session are listed in +`python-pdbtrack-exit-command'." (when (and python-pdbtrack-tracked-buffer ;; Empty input is sent by C-d or `comint-send-eof' (or (string-empty-p input) diff --git a/lisp/so-long.el b/lisp/so-long.el index 3df2de97297..160a945f657 100644 --- a/lisp/so-long.el +++ b/lisp/so-long.el @@ -69,7 +69,7 @@ ;; the long lines. In such circumstances you may find that `longlines-mode' is ;; the most helpful facility. ;; -;; Note also that the mitigations are automatically triggered when visiting a +;; Note also that the mitigation is automatically triggered when visiting a ;; file. The library does not automatically detect if long lines are inserted ;; into an existing buffer (although the `so-long' command can be invoked ;; manually in such situations). @@ -386,7 +386,7 @@ ;; - Added sgml-mode and nxml-mode to `so-long-target-modes'. ;; 0.7.4 - Refactored the handling of `whitespace-mode'. ;; 0.7.3 - Added customize group `so-long' with user options. -;; - Added `so-long-original-values' to generalise the storage and +;; - Added `so-long-original-values' to generalize the storage and ;; restoration of values from the original mode upon `so-long-revert'. ;; - Added `so-long-revert-hook'. ;; 0.7.2 - Remember the original major mode even with M-x `so-long-mode'. @@ -421,7 +421,7 @@ Has no effect if `global-so-long-mode' is not enabled.") (defvar-local so-long--active nil ; internal use - "Non-nil when `so-long' mitigations are in effect.") + "Non-nil when `so-long' mitigation is in effect.") (defvar so-long--set-auto-mode nil ; internal use "Non-nil while `set-auto-mode' is executing.") @@ -740,7 +740,7 @@ was established." ) ;; It's not clear to me whether all of these would be problematic, but they ;; seemed like reasonable targets. Some are certainly excessive in smaller - ;; buffers of minified code, but we should be aiming to maximise performance + ;; buffers of minified code, but we should be aiming to maximize performance ;; by default, so that Emacs is as responsive as we can manage in even very ;; large buffers of minified code. "List of buffer-local minor modes to explicitly disable. @@ -781,7 +781,7 @@ If `so-long-revert' is subsequently invoked, then the variables are restored to their original states. The combination of `line-move-visual' (enabled) and `truncate-lines' (disabled) -is important for maximising responsiveness when moving vertically within an +is important for maximizing responsiveness when moving vertically within an extremely long line, as otherwise the full length of the line may need to be scanned to find the next position." :type '(alist :key-type (variable :tag "Variable") @@ -822,12 +822,12 @@ If nil, no mode line indicator will be displayed." (defface so-long-mode-line-active '((t :inherit mode-line-emphasis)) - "Face for `so-long-mode-line-info' when mitigations are active." + "Face for `so-long-mode-line-info' when mitigation is active." :package-version '(so-long . "1.0")) (defface so-long-mode-line-inactive '((t :inherit mode-line-inactive)) - "Face for `so-long-mode-line-info' when mitigations have been reverted." + "Face for `so-long-mode-line-info' when mitigation has been reverted." :package-version '(so-long . "1.0")) ;; Modes that go slowly and line lengths excessive @@ -983,7 +983,7 @@ Displayed as part of `mode-line-misc-info'. `so-long-mode-line-label' defines the text to be displayed (if any). -Face `so-long-mode-line-active' is used while mitigations are active, and +Face `so-long-mode-line-active' is used while mitigation is active, and `so-long-mode-line-inactive' is used if `so-long-revert' is called. Not displayed when `so-long-mode' is enabled, as the major mode construct @@ -1659,7 +1659,7 @@ Equivalent to calling (global-so-long-mode 0)" ;;;###autoload (define-minor-mode global-so-long-mode - "Toggle automated performance mitigations for files with long lines. + "Toggle automated performance mitigation for files with long lines. Many Emacs modes struggle with buffers which contain excessively long lines, and may consequently cause unacceptable performance issues. @@ -1861,11 +1861,11 @@ If it appears in `%s', you should remove it." ; LocalWords: initialized profiler boolean minified pre redisplay config keymap ; LocalWords: noerror selectable mapc sgml nxml hl flydiff defs arg Phil Sainty ; LocalWords: defadvice nadvice whitespace ie bos eos eobp origmode un Un setq -; LocalWords: docstring auf wiedersehen longlines alist autoload Refactored Inc -; LocalWords: MERCHANTABILITY RET REGEXP VAR ELPA WS mitigations EmacsWiki eval +; LocalWords: docstring auf Wiedersehen longlines alist autoload Refactored Inc +; LocalWords: MERCHANTABILITY RET REGEXP VAR ELPA WS EmacsWiki eval ; LocalWords: rx filename filenames -;; So long, farewell, auf wiedersehen, goodbye +;; So long, farewell, auf Wiedersehen, goodbye ;; You have to go, this code is minified ;; Goodbye! diff --git a/lisp/subr.el b/lisp/subr.el index ca5af0f0ab7..1b2a1d643fb 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -1572,7 +1572,7 @@ be a list of the form returned by `event-start' and `event-end'." ;; individual bytes at known offsets from the string beginning. ;; (make-obsolete 'string-to-unibyte "use `encode-coding-string'." "26.1") ;; string-to-multibyte is also sometimes useful (and there's no good -;; general replacement for it), so it's also been unobsoleted in Emacs 27.1. +;; general replacement for it), so it's also been revived in Emacs 27.1. ;; (make-obsolete 'string-to-multibyte "use `decode-coding-string'." "26.1") ;; bug#23850 (make-obsolete 'string-as-unibyte "use `encode-coding-string'." "26.1") diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el index 1ce4b98fd1b..c33fb174a58 100644 --- a/lisp/thingatpt.el +++ b/lisp/thingatpt.el @@ -634,7 +634,7 @@ Signal an error if the entire string was not used." (defun number-at-point () "Return the number at point, or nil if none is found. Decimal numbers like \"14\" or \"-14.5\", as well as hex numbers -like \"0xBEEF09\" or \"#xBEEF09\", are regognized." +like \"0xBEEF09\" or \"#xBEEF09\", are recognized." (when (thing-at-point-looking-at "\\(-?[0-9]+\\.?[0-9]*\\)\\|\\(0x\\|#x\\)\\([a-zA-Z0-9]+\\)" 500) (if (match-beginning 1) |