Commit 43977c23 authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

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.
parent 5c809195
2014-02-28 Juanma Barranquero <>
* dframe.el (dframe-detach):
* find-dired.el (find-dired, find-name-dired):
* finder.el (finder-mode-map, finder-mode-syntax-table)
(finder-headmark, finder-select, finder-mouse-select):
Fix docstring typos.
2014-02-28 Martin Rudalics <>
Revert recent with-temp-buffer-window change (Bug#16816, Bug#16882).
* window.el (with-temp-buffer-window): Revert change from
2014-02-21. Suggested by Thierry Volpiatto
2014-02-21. Suggested by Thierry Volpiatto.
<>. Fix doc-string based on a
suggestion by Nicolas Richard <>.
* help.el (with-help-window): Fix doc-string.
......@@ -530,7 +530,7 @@ LOCATION can be one of 'random, 'left-right, or 'top-bottom."
(defun dframe-detach (frame-var cache-var buffer-var)
"Detach the frame in symbol FRAME-VAR.
CACHE-VAR and BUFFER-VAR are symbols as in `dframe-frame-mode'"
CACHE-VAR and BUFFER-VAR are symbols as in `dframe-frame-mode'."
(with-current-buffer (symbol-value buffer-var)
(rename-buffer (buffer-name) t)
(let ((oldframe (symbol-value frame-var)))
......@@ -30,7 +30,7 @@
(require 'dired)
(defgroup find-dired nil
"Run a `find' command and dired the output."
"Run a `find' command and Dired the output."
:group 'dired
:prefix "find-")
......@@ -234,7 +234,7 @@ use in place of \"-ls\" as the final argument."
(defun find-name-dired (dir pattern)
"Search DIR recursively for files matching the globbing pattern PATTERN,
and run dired on those files.
and run Dired on those files.
PATTERN is a shell wildcard (not an Emacs regexp) and need not be quoted.
The default command run (after changing into DIR) is
......@@ -105,20 +105,20 @@ Each element has the form (KEYWORD . DESCRIPTION).")
'(menu-item "Select" finder-select
:help "Select item on current line in a finder buffer"))
"Keymap used in `finder-mode'.")
"Keymap used in Finder mode.")
(defvar finder-mode-syntax-table
(let ((st (make-syntax-table emacs-lisp-mode-syntax-table)))
(modify-syntax-entry ?\; ". " st)
"Syntax table used while in `finder-mode'.")
"Syntax table used while in Finder mode.")
(defvar finder-font-lock-keywords
'(("`\\([^'`]+\\)'" 1 font-lock-constant-face prepend))
"Font-lock keywords for Finder mode.")
(defvar finder-headmark nil
"Internal finder-mode variable, local in finder buffer.")
"Internal Finder mode variable, local in Finder buffer.")
;;; Code for regenerating the keyword list.
......@@ -384,7 +384,7 @@ FILE should be in a form suitable for passing to `locate-library'."
(defun finder-select ()
"Select item on current line in a finder buffer."
"Select item on current line in a Finder buffer."
(let ((key (finder-current-item)))
(if (string-match "\\.el$" key)
......@@ -392,7 +392,7 @@ FILE should be in a form suitable for passing to `locate-library'."
(finder-list-matches key))))
(defun finder-mouse-select (event)
"Select item in a finder buffer with the mouse."
"Select item in a Finder buffer with the mouse."
(interactive "e")
(with-current-buffer (window-buffer (posn-window (event-start event)))
(goto-char (posn-point (event-start event)))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment