diff options
| author | Richard M. Stallman | 1992-10-23 08:54:08 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1992-10-23 08:54:08 +0000 |
| commit | 912c672856da0a90312da4bbb500bf3c6758a166 (patch) | |
| tree | 920f45e7a7da18a2ea64841c76cc46069318f1ac | |
| parent | 194ff7c129d43be79d64fb9d280a923588374230 (diff) | |
| download | emacs-912c672856da0a90312da4bbb500bf3c6758a166.tar.gz emacs-912c672856da0a90312da4bbb500bf3c6758a166.zip | |
(goal-column): Don't put the defvar inside the make-variable-buffer-local.
| -rw-r--r-- | lisp/simple.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 3048c5139c4..54871b3736c 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -1252,9 +1252,9 @@ to use and more reliable (no dependence on goal column, etc.)." | |||
| 1252 | This means moving to the end of each line moved onto. | 1252 | This means moving to the end of each line moved onto. |
| 1253 | The beginning of a blank line does not count as the end of a line.") | 1253 | The beginning of a blank line does not count as the end of a line.") |
| 1254 | 1254 | ||
| 1255 | (make-variable-buffer-local | 1255 | (defvar goal-column nil |
| 1256 | (defvar goal-column nil | 1256 | "*Semipermanent goal column for vertical motion, as set by \\[set-goal-column], or nil.") |
| 1257 | "*Semipermanent goal column for vertical motion, as set by \\[set-goal-column], or nil.")) | 1257 | (make-variable-buffer-local 'goal-column) |
| 1258 | 1258 | ||
| 1259 | (defvar temporary-goal-column 0 | 1259 | (defvar temporary-goal-column 0 |
| 1260 | "Current goal column for vertical motion. | 1260 | "Current goal column for vertical motion. |
| @@ -1293,7 +1293,8 @@ When the `track-eol' feature is doing its job, the value is 9999.") | |||
| 1293 | Those commands will move to this position in the line moved to | 1293 | Those commands will move to this position in the line moved to |
| 1294 | rather than trying to keep the same horizontal position. | 1294 | rather than trying to keep the same horizontal position. |
| 1295 | With a non-nil argument, clears out the goal column | 1295 | With a non-nil argument, clears out the goal column |
| 1296 | so that \\[next-line] and \\[previous-line] resume vertical motion." | 1296 | so that \\[next-line] and \\[previous-line] resume vertical motion. |
| 1297 | The goal column is stored in the variable `goal-column'." | ||
| 1297 | (interactive "P") | 1298 | (interactive "P") |
| 1298 | (if arg | 1299 | (if arg |
| 1299 | (progn | 1300 | (progn |