[Emacs-diffs] /srv/bzr/emacs/emacs-23 r99766: * emacs-lisp/lisp.el (lisp-completion-at-point): Give it a doc string.

[Glenn Morris]

------------------------------------------------------------
revno: 99766
committer: Glenn Morris <address@hidden>
branch nick: emacs-23
timestamp: Tue 2010-04-20 00:54:28 -0700
message:
  * emacs-lisp/lisp.el (lisp-completion-at-point): Give it a doc string.
modified:
  lisp/ChangeLog
  lisp/emacs-lisp/lisp.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-04-20 07:37:20 +0000
+++ b/lisp/ChangeLog    2010-04-20 07:54:28 +0000
@@ -1,5 +1,7 @@
 2010-04-20  Glenn Morris  <address@hidden>
 
+       * 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  <address@hidden>

=== modified file 'lisp/emacs-lisp/lisp.el'
--- a/lisp/emacs-lisp/lisp.el   2010-01-13 08:35:10 +0000
+++ b/lisp/emacs-lisp/lisp.el   2010-04-20 07:54:28 +0000
@@ -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