aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2014-02-28 14:19:06 +0100
committerJuanma Barranquero2014-02-28 14:19:06 +0100
commit43977c23bf60ac5e65f0a296bfa8e405d8a68572 (patch)
treeaf279255dab851a8b5c7aa7d904c3afe5847c95d
parent5c809195983367031c8c6a2eea0842c34f334b33 (diff)
downloademacs-43977c23bf60ac5e65f0a296bfa8e405d8a68572.tar.gz
emacs-43977c23bf60ac5e65f0a296bfa8e405d8a68572.zip
Fix docstring typos.
lisp/dframe.el (dframe-detach): lisp/find-dired.el (find-dired, find-name-dired): lisp/finder.el (finder-mode-map, finder-mode-syntax-table) (finder-headmark, finder-select, finder-mouse-select): Fix typos.
-rw-r--r--lisp/ChangeLog10
-rw-r--r--lisp/dframe.el2
-rw-r--r--lisp/find-dired.el4
-rw-r--r--lisp/finder.el10
4 files changed, 17 insertions, 9 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 68f7ebd6fb0..4f271733298 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,8 +1,16 @@
12014-02-28 Juanma Barranquero <lekktu@gmail.com>
2
3 * dframe.el (dframe-detach):
4 * find-dired.el (find-dired, find-name-dired):
5 * finder.el (finder-mode-map, finder-mode-syntax-table)
6 (finder-headmark, finder-select, finder-mouse-select):
7 Fix docstring typos.
8
12014-02-28 Martin Rudalics <rudalics@gmx.at> 92014-02-28 Martin Rudalics <rudalics@gmx.at>
2 10
3 Revert recent with-temp-buffer-window change (Bug#16816, Bug#16882). 11 Revert recent with-temp-buffer-window change (Bug#16816, Bug#16882).
4 * window.el (with-temp-buffer-window): Revert change from 12 * window.el (with-temp-buffer-window): Revert change from
5 2014-02-21. Suggested by Thierry Volpiatto 13 2014-02-21. Suggested by Thierry Volpiatto.
6 <thierry.volpiatto@gmail.com>. Fix doc-string based on a 14 <thierry.volpiatto@gmail.com>. Fix doc-string based on a
7 suggestion by Nicolas Richard <theonewiththeevillook@yahoo.fr>. 15 suggestion by Nicolas Richard <theonewiththeevillook@yahoo.fr>.
8 * help.el (with-help-window): Fix doc-string. 16 * help.el (with-help-window): Fix doc-string.
diff --git a/lisp/dframe.el b/lisp/dframe.el
index 0fc455cef68..872b922d783 100644
--- a/lisp/dframe.el
+++ b/lisp/dframe.el
@@ -530,7 +530,7 @@ LOCATION can be one of 'random, 'left-right, or 'top-bottom."
530 530
531(defun dframe-detach (frame-var cache-var buffer-var) 531(defun dframe-detach (frame-var cache-var buffer-var)
532 "Detach the frame in symbol FRAME-VAR. 532 "Detach the frame in symbol FRAME-VAR.
533CACHE-VAR and BUFFER-VAR are symbols as in `dframe-frame-mode'" 533CACHE-VAR and BUFFER-VAR are symbols as in `dframe-frame-mode'."
534 (with-current-buffer (symbol-value buffer-var) 534 (with-current-buffer (symbol-value buffer-var)
535 (rename-buffer (buffer-name) t) 535 (rename-buffer (buffer-name) t)
536 (let ((oldframe (symbol-value frame-var))) 536 (let ((oldframe (symbol-value frame-var)))
diff --git a/lisp/find-dired.el b/lisp/find-dired.el
index dd8087b1f34..6ddeab7be34 100644
--- a/lisp/find-dired.el
+++ b/lisp/find-dired.el
@@ -30,7 +30,7 @@
30(require 'dired) 30(require 'dired)
31 31
32(defgroup find-dired nil 32(defgroup find-dired nil
33 "Run a `find' command and dired the output." 33 "Run a `find' command and Dired the output."
34 :group 'dired 34 :group 'dired
35 :prefix "find-") 35 :prefix "find-")
36 36
@@ -234,7 +234,7 @@ use in place of \"-ls\" as the final argument."
234;;;###autoload 234;;;###autoload
235(defun find-name-dired (dir pattern) 235(defun find-name-dired (dir pattern)
236 "Search DIR recursively for files matching the globbing pattern PATTERN, 236 "Search DIR recursively for files matching the globbing pattern PATTERN,
237and run dired on those files. 237and run Dired on those files.
238PATTERN is a shell wildcard (not an Emacs regexp) and need not be quoted. 238PATTERN is a shell wildcard (not an Emacs regexp) and need not be quoted.
239The default command run (after changing into DIR) is 239The default command run (after changing into DIR) is
240 240
diff --git a/lisp/finder.el b/lisp/finder.el
index e5161818766..d060d69e427 100644
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -105,20 +105,20 @@ Each element has the form (KEYWORD . DESCRIPTION).")
105 '(menu-item "Select" finder-select 105 '(menu-item "Select" finder-select
106 :help "Select item on current line in a finder buffer")) 106 :help "Select item on current line in a finder buffer"))
107 map) 107 map)
108 "Keymap used in `finder-mode'.") 108 "Keymap used in Finder mode.")
109 109
110(defvar finder-mode-syntax-table 110(defvar finder-mode-syntax-table
111 (let ((st (make-syntax-table emacs-lisp-mode-syntax-table))) 111 (let ((st (make-syntax-table emacs-lisp-mode-syntax-table)))
112 (modify-syntax-entry ?\; ". " st) 112 (modify-syntax-entry ?\; ". " st)
113 st) 113 st)
114 "Syntax table used while in `finder-mode'.") 114 "Syntax table used while in Finder mode.")
115 115
116(defvar finder-font-lock-keywords 116(defvar finder-font-lock-keywords
117 '(("`\\([^'`]+\\)'" 1 font-lock-constant-face prepend)) 117 '(("`\\([^'`]+\\)'" 1 font-lock-constant-face prepend))
118 "Font-lock keywords for Finder mode.") 118 "Font-lock keywords for Finder mode.")
119 119
120(defvar finder-headmark nil 120(defvar finder-headmark nil
121 "Internal finder-mode variable, local in finder buffer.") 121 "Internal Finder mode variable, local in Finder buffer.")
122 122
123;;; Code for regenerating the keyword list. 123;;; Code for regenerating the keyword list.
124 124
@@ -384,7 +384,7 @@ FILE should be in a form suitable for passing to `locate-library'."
384 key))) 384 key)))
385 385
386(defun finder-select () 386(defun finder-select ()
387 "Select item on current line in a finder buffer." 387 "Select item on current line in a Finder buffer."
388 (interactive) 388 (interactive)
389 (let ((key (finder-current-item))) 389 (let ((key (finder-current-item)))
390 (if (string-match "\\.el$" key) 390 (if (string-match "\\.el$" key)
@@ -392,7 +392,7 @@ FILE should be in a form suitable for passing to `locate-library'."
392 (finder-list-matches key)))) 392 (finder-list-matches key))))
393 393
394(defun finder-mouse-select (event) 394(defun finder-mouse-select (event)
395 "Select item in a finder buffer with the mouse." 395 "Select item in a Finder buffer with the mouse."
396 (interactive "e") 396 (interactive "e")
397 (with-current-buffer (window-buffer (posn-window (event-start event))) 397 (with-current-buffer (window-buffer (posn-window (event-start event)))
398 (goto-char (posn-point (event-start event))) 398 (goto-char (posn-point (event-start event)))