# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1271750068 25200
# Node ID 497767b878dcf5da2e161ec9e03afc7c74a872a5
# Parent  a7c97cc14b522e14f9121ebbfcc1302b563f592e
* emacs-lisp/lisp.el (lisp-completion-at-point): Give it a doc string.

diff -r a7c97cc14b52 -r 497767b878dc lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Apr 20 00:37:20 2010 -0700
+++ b/lisp/ChangeLog	Tue Apr 20 00:54:28 2010 -0700
@@ -1,5 +1,7 @@
 2010-04-20  Glenn Morris  <rgm@gnu.org>
 
+	* emacs-lisp/lisp.el (lisp-completion-at-point): Give it a doc string.
+
 	* minibuffer.el (completion-at-point): Doc fix.
 
 2010-04-18  Chong Yidong  <cyd@stupidchicken.com>
diff -r a7c97cc14b52 -r 497767b878dc lisp/emacs-lisp/lisp.el
--- a/lisp/emacs-lisp/lisp.el	Tue Apr 20 00:37:20 2010 -0700
+++ b/lisp/emacs-lisp/lisp.el	Tue Apr 20 00:54:28 2010 -0700
@@ -627,9 +627,10 @@
     (let ((completion-annotate-function (plist-get plist :annotate-function)))
       (completion-in-region (nth 0 data) (nth 1 data) (nth 2 data)
                             (plist-get plist :predicate)))))
-    
+
 
 (defun lisp-completion-at-point (&optional predicate)
+  "Function used for `completion-at-point-functions' in `emacs-lisp-mode'."
   ;; FIXME: the `end' could be after point?
   (let* ((end (point))
          (beg (with-syntax-table emacs-lisp-mode-syntax-table