summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/bytecomp.el4
-rw-r--r--lisp/emacs-lisp/cl-indent.el2
-rw-r--r--lisp/emacs-lisp/cl-specs.el6
-rw-r--r--lisp/emacs-lisp/copyright.el2
-rw-r--r--lisp/emacs-lisp/eval-reg.el4
5 files changed, 9 insertions, 9 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 20d54630dad..4efe6cd8f90 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -938,7 +938,7 @@ otherwise pop it")
(defun byte-compile-arglist-signatures-congruent-p (old new)
(not (or
(> (car new) (car old)) ; requires more args now
- (and (null (cdr old)) ; tooks rest-args, doesn't any more
+ (and (null (cdr old)) ; took rest-args, doesn't any more
(cdr new))
(and (cdr new) (cdr old) ; can't take as many args now
(< (cdr new) (cdr old)))
@@ -1381,7 +1381,7 @@ With argument, insert value in current buffer after the form."
;; Compile pending forms at end of file.
(byte-compile-flush-pending)
(byte-compile-warn-about-unresolved-functions)
- ;; SHould we always do this? When calling multiple files, it
+ ;; Should we always do this? When calling multiple files, it
;; would be useful to delay this warning until all have
;; been compiled.
(setq byte-compile-unresolved-functions nil))))
diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el
index f6ad1854012..bef95f322b6 100644
--- a/lisp/emacs-lisp/cl-indent.el
+++ b/lisp/emacs-lisp/cl-indent.el
@@ -2,7 +2,7 @@
;; Copyright (C) 1987 Free Software Foundation, Inc.
-;; Author: Richard Mlynark <mly@eddie.mit.edu>
+;; Author: Richard Mlynarik <mly@eddie.mit.edu>
;; Created: July 1987
;; Maintainer: FSF
;; Keywords: lisp, tools
diff --git a/lisp/emacs-lisp/cl-specs.el b/lisp/emacs-lisp/cl-specs.el
index 9bb79ea79a3..06c29a97ece 100644
--- a/lisp/emacs-lisp/cl-specs.el
+++ b/lisp/emacs-lisp/cl-specs.el
@@ -7,7 +7,7 @@
;; LCD Archive Entry:
;; cl-specs.el|Daniel LaLiberte|liberte@cs.uiuc.edu
;; |Edebug specs for cl.el
-;; |$Date: 1995/04/19 00:47:42 $|1.1|
+;; |$Date: 1995/10/30 16:51:55 $|1.1|
;; This file is part of GNU Emacs.
@@ -30,7 +30,7 @@
;; These specs are to be used with edebug.el version 3.3 or later and
;; cl.el version 2.03 or later, by Dave Gillespie <daveg@synaptics.com>.
-;; This file need not be byte-compiled, but it shouldnt hurt.
+;; This file need not be byte-compiled, but it shouldn't hurt.
(provide 'cl-specs)
;; Do the above provide before the following require.
@@ -412,7 +412,7 @@
(def-edebug-spec loop-initial-final
(&or ["initially"
- ;; [&optional &or "do" "doing"] ;; CLtL2 doesnt allow this.
+ ;; [&optional &or "do" "doing"] ;; CLtL2 doesn't allow this.
&rest loop-non-atomic-expr]
["finally" &or
[[&optional &or "do" "doing"] &rest loop-non-atomic-expr]
diff --git a/lisp/emacs-lisp/copyright.el b/lisp/emacs-lisp/copyright.el
index e6f5ba34f74..c41fdd59ba9 100644
--- a/lisp/emacs-lisp/copyright.el
+++ b/lisp/emacs-lisp/copyright.el
@@ -48,7 +48,7 @@ When this is `function', only ask when called non-interactively.")
"String representing the current year.")
-;; when modifiying this, also modify the comment generated by autoinsert.el
+;; when modifying this, also modify the comment generated by autoinsert.el
(defconst copyright-current-gpl-version "2"
"String representing the current version of the GPL or `nil'.")
diff --git a/lisp/emacs-lisp/eval-reg.el b/lisp/emacs-lisp/eval-reg.el
index f4e32ded320..a956aa4a267 100644
--- a/lisp/emacs-lisp/eval-reg.el
+++ b/lisp/emacs-lisp/eval-reg.el
@@ -130,7 +130,7 @@ nil means discard it; anything else is stream for print.
This version, from `eval-reg.el', allows Lisp customization of read,
eval, and the printer."
- ;; Because this doesnt narrow to the region, one other difference
+ ;; Because this doesn't narrow to the region, one other difference
;; concerns inserting whitespace after the expression being evaluated.
(interactive "r")
@@ -138,7 +138,7 @@ eval, and the printer."
(original-eval-region elisp-start elisp-end elisp-output)
(let ((elisp-pnt (point))
(elisp-buf (current-buffer));; Outside buffer
- (elisp-inside-buf (current-buffer));; Buffer current while evaling
+ (elisp-inside-buf (current-buffer));; Buffer current while evalling
;; Mark the end because it may move.
(elisp-end-marker (set-marker (make-marker) elisp-end))
elisp-form