steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ui.tools.browser: don't scroll up when reloading page

db4
Slava Pestov 2009-09-08 16:23:12 -05:00
parent c52ffebffe
commit 9159ce74ab
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/ui/tools/browser/browser.factor
View File

@ -83,8 +83,8 @@ M: browser-gadget handle-gesture
} 2|| ; } 2|| ;
M: browser-gadget definitions-changed ( assoc browser -- ) M: browser-gadget definitions-changed ( assoc browser -- )
model>> [ value>> swap showing-definition? ] keep [ model>> value>> swap showing-definition? ] keep
'[ _ notify-connections ] when ; '[ _ [ history-value ] keep set-history-value ] when ;
M: browser-gadget focusable-child* search-field>> ; M: browser-gadget focusable-child* search-field>> ;