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

Diff of /emacs/lisp/array.el

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

revision 1.20 by pj, Sun Jan 13 09:02:35 2002 UTC revision 1.20.4.1 by miles, Fri Apr 4 06:20:00 2003 UTC
# Line 58  Line 58 
58    (defvar array-respect-tabs))    (defvar array-respect-tabs))
59    
60  ;;; Internal information functions.  ;;; Internal information functions.
61      
62  (defun array-cursor-in-array-range ()  (defun array-cursor-in-array-range ()
63    "Return t if the cursor is in a valid array cell.    "Return t if the cursor is in a valid array cell.
64  Its ok to be on a row number line."  Its ok to be on a row number line."
# Line 385  Leave point at the beginning of the fiel Line 385  Leave point at the beginning of the fiel
385          (insert array-copy-string))          (insert array-copy-string))
386        (move-to-column array-buffer-column)        (move-to-column array-buffer-column)
387        (setq count (1- count)))))        (setq count (1- count)))))
388            
389  (defun array-copy-to-column (a-column)  (defun array-copy-to-column (a-column)
390    "Copy current field horizontally into every cell up to and including A-COLUMN.    "Copy current field horizontally into every cell up to and including A-COLUMN.
391  Leave point at the beginning of the field."  Leave point at the beginning of the field."

Legend:
Removed from v.1.20  
changed lines
  Added in v.1.20.4.1

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