Make top-of-window-mtype left-sticky, to track newlines at top of window properly.
This commit is contained in:
parent
fb463959cb
commit
1cf71a4a4c
|
@ -9,7 +9,7 @@
|
|||
(require "display.rkt")
|
||||
(require "rope.rkt")
|
||||
|
||||
(define top-of-window-mtype (mark-type "top-of-window" 'right))
|
||||
(define top-of-window-mtype (mark-type "top-of-window" 'left))
|
||||
|
||||
(define (newline? c) (equal? c #\newline))
|
||||
(define (not-newline? c) (not (newline? c)))
|
||||
|
|
Loading…
Reference in New Issue