diff options
| author | Richard M. Stallman | 1996-10-08 21:35:03 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-10-08 21:35:03 +0000 |
| commit | 0565d3079ac6c86a0680d533f4dbe70df86d5597 (patch) | |
| tree | 4f0fc85922c11685cd405d117a5805b40b23854e | |
| parent | 91c6fd0ccf4b9459fac09ef274c9c31124076ec5 (diff) | |
| download | emacs-0565d3079ac6c86a0680d533f4dbe70df86d5597.tar.gz emacs-0565d3079ac6c86a0680d533f4dbe70df86d5597.zip | |
(line-move): Ignore invisibility in `move-to-column'.
(universal-argument): Doc fix.
| -rw-r--r-- | lisp/simple.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index fe5c4cd3218..5f45ded7224 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -980,7 +980,9 @@ Digits or minus sign following \\[universal-argument] make up the numeric argume | |||
| 980 | \\[universal-argument] following the digits or minus sign ends the argument. | 980 | \\[universal-argument] following the digits or minus sign ends the argument. |
| 981 | \\[universal-argument] without digits or minus sign provides 4 as argument. | 981 | \\[universal-argument] without digits or minus sign provides 4 as argument. |
| 982 | Repeating \\[universal-argument] without digits or minus sign | 982 | Repeating \\[universal-argument] without digits or minus sign |
| 983 | multiplies the argument by 4 each time." | 983 | multiplies the argument by 4 each time. |
| 984 | For some commands, just \\[universal-argument] by itself serves as a flag | ||
| 985 | which is different in effect from any particular numeric argument." | ||
| 984 | (interactive) | 986 | (interactive) |
| 985 | (setq prefix-arg (list 4)) | 987 | (setq prefix-arg (list 4)) |
| 986 | (setq universal-argument-num-events (length (this-command-keys))) | 988 | (setq universal-argument-num-events (length (this-command-keys))) |
| @@ -1789,7 +1791,8 @@ Outline mode sets this.") | |||
| 1789 | (goto-char (previous-single-property-change (point) 'invisible)) | 1791 | (goto-char (previous-single-property-change (point) 'invisible)) |
| 1790 | (goto-char (previous-overlay-change (point))))) | 1792 | (goto-char (previous-overlay-change (point))))) |
| 1791 | (setq arg (1+ arg)))) | 1793 | (setq arg (1+ arg)))) |
| 1792 | (move-to-column (or goal-column temporary-goal-column))) | 1794 | (let ((buffer-invisibility-spec nil)) |
| 1795 | (move-to-column (or goal-column temporary-goal-column)))) | ||
| 1793 | ;; Remember where we moved to, go back home, | 1796 | ;; Remember where we moved to, go back home, |
| 1794 | ;; then do the motion over again | 1797 | ;; then do the motion over again |
| 1795 | ;; in just one step, with intangibility and point-motion hooks | 1798 | ;; in just one step, with intangibility and point-motion hooks |