[Emacs-diffs] trunk r116424: * lisp/finder.el (finder-known-keywords, finder-mode-map): Doc fixes.

[Glenn Morris]

------------------------------------------------------------
revno: 116424
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Wed 2014-02-12 21:31:48 -0500
message:
  * lisp/finder.el (finder-known-keywords, finder-mode-map): Doc fixes.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/finder.el                 finder.el-20091113204419-o5vbwnq5f7feedwu-499

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2014-02-13 02:19:48 +0000
+++ b/lisp/ChangeLog    2014-02-13 02:31:48 +0000
@@ -1,3 +1,7 @@
+2014-02-13  Glenn Morris  <address@hidden>
+
+       * finder.el (finder-known-keywords, finder-mode-map): Doc fixes.
+
 2014-02-12  Stefan Monnier  <address@hidden>
 
        * emulation/cua-base.el (cua-scroll-up, cua-scroll-down): Mark them as

=== modified file 'lisp/finder.el'
--- a/lisp/finder.el    2014-01-01 07:43:34 +0000
+++ b/lisp/finder.el    2014-02-13 02:31:48 +0000
@@ -1,7 +1,6 @@
 ;;; finder.el --- topic & keyword-based code finder
 
-;; Copyright (C) 1992, 1997-1999, 2001-2014 Free Software Foundation,
-;; Inc.
+;; Copyright (C) 1992, 1997-1999, 2001-2014 Free Software Foundation, Inc.
 
 ;; Author: Eric S. Raymond <address@hidden>
 ;; Created: 16 Jun 1992
@@ -73,7 +72,9 @@
     (tools     . "programming tools")
     (unix      . "UNIX feature interfaces and emulators")
     (vc                . "version control")
-    (wp                . "word processing")))
+    (wp                . "word processing"))
+  "Association list of the standard \"Keywords:\" headers.
+Each element has the form (KEYWORD . DESCRIPTION).")
 
 (defvar finder-mode-map
   (let ((map (make-sparse-keymap))
@@ -103,7 +104,8 @@
     (define-key menu-map [finder-select]
       '(menu-item "Select" finder-select
                  :help "Select item on current line in a finder buffer"))
-    map))
+    map)
+  "Keymap used in `finder-mode'.")
 
 (defvar finder-mode-syntax-table
   (let ((st (make-syntax-table emacs-lisp-mode-syntax-table)))