Mercurial > hg > xemacs-beta

comparison lisp/prim/simple.el @ 32:e04119814345 r19-15b99

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b99
author cvs
date Mon, 13 Aug 2007 08:52:56 +0200
parents ec9a17fef872
children 56c54cf7c5b6
comparison
equal deleted inserted replaced
31:b9328a10c56c 32:e04119814345
2398 (defun turn-on-auto-fill () 2398 (defun turn-on-auto-fill ()
2399 "Unconditionally turn on Auto Fill mode." 2399 "Unconditionally turn on Auto Fill mode."
2400 (auto-fill-mode 1)) 2400 (auto-fill-mode 1))
2401 2401
2402 (defun set-fill-column (arg) 2402 (defun set-fill-column (arg)
2403 "Set `fill-column' to current column, or to argument if given. 2403 "Set `fill-column' to specified argument.
2404 Just \\[universal-argument] as argument means to use the current column
2404 The variable `fill-column' has a separate value for each buffer." 2405 The variable `fill-column' has a separate value for each buffer."
2405 (interactive "_P") ; XEmacs 2406 (interactive "_P") ; XEmacs
2406 (cond ((integerp arg) 2407 (cond ((integerp arg)
2407 (setq fill-column arg)) 2408 (setq fill-column arg))
2408 ((consp arg) 2409 ((consp arg)