diff options
| -rw-r--r-- | lisp/textmodes/table.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/textmodes/table.el b/lisp/textmodes/table.el index 2b3c2565ee9..db5b9a7c35d 100644 --- a/lisp/textmodes/table.el +++ b/lisp/textmodes/table.el | |||
| @@ -5,7 +5,7 @@ | |||
| 5 | ;; Keywords: wp, convenience | 5 | ;; Keywords: wp, convenience |
| 6 | ;; Author: Takaaki Ota <Takaaki.Ota@am.sony.com> | 6 | ;; Author: Takaaki Ota <Takaaki.Ota@am.sony.com> |
| 7 | ;; Created: Sat Jul 08 2000 13:28:45 (PST) | 7 | ;; Created: Sat Jul 08 2000 13:28:45 (PST) |
| 8 | ;; Revised: Thu Aug 15 2002 14:02:14 (PDT) | 8 | ;; Revised: mar feb 18 2003 10:03:18 (Romance Standard Time) |
| 9 | 9 | ||
| 10 | ;; This file is part of GNU Emacs. | 10 | ;; This file is part of GNU Emacs. |
| 11 | 11 | ||
| @@ -3039,7 +3039,7 @@ CALS (DocBook DTD): | |||
| 3039 | (setq col-list (cons (car (table--get-coordinate (car starting-cell))) nil)) | 3039 | (setq col-list (cons (car (table--get-coordinate (car starting-cell))) nil)) |
| 3040 | (setq row-list (cons (cdr (table--get-coordinate (car starting-cell))) nil)) | 3040 | (setq row-list (cons (cdr (table--get-coordinate (car starting-cell))) nil)) |
| 3041 | (setq i 0) | 3041 | (setq i 0) |
| 3042 | (let ((wheel [?- ?\ ?| ?/])) | 3042 | (let ((wheel [?- ?\\ ?| ?/])) |
| 3043 | (while | 3043 | (while |
| 3044 | (progn | 3044 | (progn |
| 3045 | (if (interactive-p) | 3045 | (if (interactive-p) |