Mercurial > hg > xemacs-beta

comparison lisp/simple.el @ 422:95016f13131a r21-2-19

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-19
author cvs
date Mon, 13 Aug 2007 11:25:01 +0200
parents 41dbb7a9d5f2
children 11054d720c21
comparison
equal deleted inserted replaced
421:fff06e11db74 422:95016f13131a
2590 (fill-point 2590 (fill-point
2591 (let ((opoint (point)) 2591 (let ((opoint (point))
2592 bounce 2592 bounce
2593 ;; 97/3/14 jhod: Kinsoku 2593 ;; 97/3/14 jhod: Kinsoku
2594 (re-break-point (if (featurep 'mule) 2594 (re-break-point (if (featurep 'mule)
2595 (concat "[ \t\n]\\|" word-across-newline) 2595 (concat "[ \t\n]\\|" word-across-newline
2596 ".\\|." word-across-newline)
2596 "[ \t\n]")) 2597 "[ \t\n]"))
2597 ;; end patch 2598 ;; end patch
2598 (first t)) 2599 (first t))
2599 (save-excursion 2600 (save-excursion
2600 (move-to-column (1+ fill-column)) 2601 (move-to-column (1+ fill-column))