/[emacs]/emacs/lisp/align.el
ViewVC logotype

Diff of /emacs/lisp/align.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.10.2.2 by miles, Tue Oct 14 23:50:47 2003 UTC revision 1.10.2.3 by miles, Fri Nov 12 04:21:13 2004 UTC
# Line 1212  have been aligned.  No changes will be m Line 1212  have been aligned.  No changes will be m
1212                (cond ((< gocol 0) t)     ; don't do anything                (cond ((< gocol 0) t)     ; don't do anything
1213                      ((= cur gocol) t)   ; don't need to                      ((= cur gocol) t)   ; don't need to
1214                      ((< cur gocol)      ; just add space                      ((< cur gocol)      ; just add space
1215                         ;; FIXME: It is stated above that "...the
1216                         ;;        whitespace to be modified was already
1217                         ;;        deleted by `align-region', all we have
1218                         ;;        to do here is indent."  However, this
1219                         ;;        doesn't seem to be true, so we first
1220                         ;;        delete the whitespace to avoid tabs
1221                         ;;        after spaces.
1222                         (delete-horizontal-space t)
1223                       (indent-to gocol))                       (indent-to gocol))
1224                      (t                      (t
1225                       ;; This code works around an oddity in the                       ;; This code works around an oddity in the

Legend:
Removed from v.1.10.2.2  
changed lines
  Added in v.1.10.2.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26