Skip to content

Commit 8fd03ce

Browse files
committed
always update the padding on style-change notify
as it looks like we might not get that #false passed in if the style change isn't happening in a nested fashion
1 parent 8409105 commit 8fd03ce

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

gui-lib/framework/private/text-line-numbers.rkt

+2-2
Original file line numberDiff line numberDiff line change
@@ -67,8 +67,8 @@
6767
(send padding-dc set-font (get-style-font))
6868
(define-values (padding-left padding-top padding-right padding-bottom) (get-padding))
6969
(define new-padding (text-width padding-dc (number-space+1)))
70-
(set-padding new-padding 0 0 0)
7170
(unless (= padding-left new-padding)
71+
(set-padding new-padding 0 0 0)
7272
(invalidate-bitmap-cache))]
7373
[else
7474
(set-padding 0 0 0 0)]))
@@ -95,7 +95,7 @@
9595
(define notify-registered-in-list #f)
9696

9797
(define style-change-notify
98-
(lambda (style) (unless style (setup-padding))))
98+
(lambda (style) (setup-padding)))
9999

100100
(define/private (get-style)
101101
(let* ([style-list (editor:get-standard-style-list)]

0 commit comments

Comments
 (0)