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.

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 @@
+2014-02-28  Juanma Barranquero  <lekktu@gmail.com>
+
+	* 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  <rudalics@gmx.at>
 
 	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.
 	<thierry.volpiatto@gmail.com>.  Fix doc-string based on a
 	suggestion by Nicolas Richard <theonewiththeevillook@yahoo.fr>.
 	* 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."
 
 (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)))
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 @@
 (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."
 ;;;###autoload
 (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
 
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).")
       '(menu-item "Select" finder-select
 		  :help "Select item on current line in a finder buffer"))
     map)
-  "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)
     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'."
       key)))
 
 (defun finder-select ()
-  "Select item on current line in a finder buffer."
+  "Select item on current line in a Finder buffer."
   (interactive)
   (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)))