Monday, November 08, 2010 at 12:03 AM.
system.verbs.builtins.Frontier.tools.windowTypes.callWindowType
on callWindowType (scriptname, adrparams=nil, adrwindow=nil) {
if adrwindow == nil {
adrwindow = window.frontmost ()};
local (windowType);
if window.attributes.getOne ("type", @windowType, adrwindow) {
local (adrWindowType);
if Frontier.tools.windowTypes.findWindowType (windowType, @adrWindowType, adrwindow) {
adrscript = @adrWindowType^.[scriptname];
if defined (adrscript^) {
if adrparams != nil {
return (callScript (adrscript, adrparams^))}
else { //call with no params
reutrn (adrscript^ ())}}}};
return (false)} //default behavior
This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.