editor slider patch for Rebol/View
[1/1] from: antonr::iinet::net::au at: 9-Sep-2003 16:02
If no-one has already done it, here is how
to patch the built-in editor slider bar
so that it shows the correct size on first view.
either block? ctx-edit [
append select ctx-edit [refresh: does] [show s1]
][
; assumes ctx-edit has already been converted
; to a context (see source of 'editor)
append second get in ctx-edit 'refresh bind [show s1]
first third second get in ctx-edit 'refresh
]
The above patch will be available here:
site: select load-thru http://www.reboltech.com/index.r [folder "Anton"]
clear find site %index.r
do site/patch/editor-slider-patch.r
Sorry if someone else has already done this.
See also the original viewtop source / vt-editor.r / refresh function.
Anton.