[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100399: * lisp/simple.el (do-auto
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100399: * lisp/simple.el (do-auto-fill): Give it a doc string. |
Date: |
Sat, 22 Jan 2011 13:02:49 -0800 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 100399
committer: Glenn Morris <address@hidden>
branch nick: emacs-23
timestamp: Sat 2011-01-22 13:02:49 -0800
message:
* lisp/simple.el (do-auto-fill): Give it a doc string.
modified:
lisp/ChangeLog
lisp/simple.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2011-01-22 20:54:27 +0000
+++ b/lisp/ChangeLog 2011-01-22 21:02:49 +0000
@@ -5,6 +5,8 @@
2011-01-22 Glenn Morris <address@hidden>
+ * simple.el (do-auto-fill): Give it a doc string.
+
* button.el (make-text-button): Doc fix. (See bug#7881)
2011-01-22 Chong Yidong <address@hidden>
=== modified file 'lisp/simple.el'
--- a/lisp/simple.el 2011-01-22 19:29:10 +0000
+++ b/lisp/simple.el 2011-01-22 21:02:49 +0000
@@ -1,8 +1,8 @@
;;; simple.el --- basic editing commands for Emacs
-;; Copyright (C) 1985, 1986, 1987, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
-;; 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
-;; Free Software Foundation, Inc.
+;; Copyright (C) 1985, 1986, 1987, 1993, 1994, 1995, 1996, 1997, 1998,
+;; 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009,
+;; 2010, 2011 Free Software Foundation, Inc.
;; Maintainer: FSF
;; Keywords: internal
@@ -5007,12 +5007,10 @@
regexp)
:group 'fill)
-;; This function is used as the auto-fill-function of a buffer
-;; when Auto-Fill mode is enabled.
-;; It returns t if it really did any work.
-;; (Actually some major modes use a different auto-fill function,
-;; but this one is the default one.)
(defun do-auto-fill ()
+ "The default value for `normal-auto-fill-function'.
+This is the default auto-fill function, some major modes use a different one.
+Returns t if it really did any work."
(let (fc justify give-up
(fill-prefix fill-prefix))
(if (or (not (setq justify (current-justification)))
@@ -6666,5 +6664,4 @@
(provide 'simple)
-;; arch-tag: 24af67c0-2a49-44f6-b3b1-312d8b570dfd
;;; simple.el ends here
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/emacs-23 r100399: * lisp/simple.el (do-auto-fill): Give it a doc string.,
Glenn Morris <=