Raymond Toy pushed to branch issue-327-fix-crlf-lf-eol at cmucl / cmucl
Commits:
-
0d968caf
by Raymond Toy at 2024-06-06T20:41:28-07:00
1 changed file:
Changes:
| ... | ... | @@ -311,7 +311,7 @@ |
| 311 | 311 | window, up one screenfull. If P is supplied then scroll that
|
| 312 | 312 | many lines."
|
| 313 | 313 | (if p
|
| 314 | - (scroll-window window (- p)) |
|
| 314 | + (scroll-window window (- p))
|
|
| 315 | 315 | (let ((height (- (window-height window)))
|
| 316 | 316 | (overlap (- (value scroll-overlap))))
|
| 317 | 317 | (scroll-window window (if (>= height overlap)
|