remove bogus error (introduced to try out recent changes)
This commit is contained in:
parent
3a09814c64
commit
cf3c3a4a7f
|
@ -1202,7 +1202,6 @@ module browser threading seems wrong.
|
||||||
(string-constant change-to-horizontal-alignment))]
|
(string-constant change-to-horizontal-alignment))]
|
||||||
[callback
|
[callback
|
||||||
(λ (a b)
|
(λ (a b)
|
||||||
(car)
|
|
||||||
(preferences:set 'drracket:defs/ints-horizontal vertical?)
|
(preferences:set 'drracket:defs/ints-horizontal vertical?)
|
||||||
(set-orientation vertical?))])
|
(set-orientation vertical?))])
|
||||||
(popup-menu menu (send evt get-x) (send evt get-y)))
|
(popup-menu menu (send evt get-x) (send evt get-y)))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user