summaryrefslogtreecommitdiff
path: root/lisp/speedbar.el
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2011-11-17 01:09:20 -0800
committerPaul Eggert <eggert@cs.ucla.edu>2011-11-17 01:09:20 -0800
commit4c36be58ca2b4777a5e7bf0d3e692cfd9fa1aea3 (patch)
tree04a24b4e53c431ec3deb9281a0454ede7ace7337 /lisp/speedbar.el
parentb6e63cbebdac53be5ba3ce9261d7edc8dfda8bf5 (diff)
downloademacs-4c36be58ca2b4777a5e7bf0d3e692cfd9fa1aea3.tar.gz
Spelling fixes.
Diffstat (limited to 'lisp/speedbar.el')
-rw-r--r--lisp/speedbar.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/speedbar.el b/lisp/speedbar.el
index 00f68a0b45f..23a91888c1b 100644
--- a/lisp/speedbar.el
+++ b/lisp/speedbar.el
@@ -631,7 +631,7 @@ with `.' followed by extensions, followed by full-filenames."
(substring (car extlist) 1)))
(setq regex2 (concat regex2 (if regex2 "\\|" "") (car extlist))))
(setq extlist (cdr extlist)))
- ;; concat all the sub-exressions together, making sure all types
+ ;; Concatenate all the subexpressions together, making sure all types
;; of parts exist during concatenation.
(concat "\\("
(if regex1 (concat "\\(\\.\\(" regex1 "\\)\\)") "")
@@ -2105,7 +2105,7 @@ cell of the form ( 'DIRLIST . 'FILELIST )."
(let ((sf (cdr (reverse speedbar-shown-directories))))
(setq speedbar-shown-directories
(list (expand-file-name default-directory)))
- ;; exand them all as we find them
+ ;; Expand them all as we find them.
(while sf
(if (speedbar-goto-this-file (car sf))
(progn
@@ -3292,7 +3292,7 @@ With universal argument ARG, flush cached data."
Optional argument ARG indicates that any cache should be flushed."
(interactive "P")
(speedbar-expand-line arg)
- ;; Now, inside the area expaded here, expand all subnodes of
+ ;; Now, inside the area expanded here, expand all subnodes of
;; the same descendant type.
(save-excursion
(speedbar-next 1) ;; Move into the list.