Monday, November 08, 2010 at 12:03 AM.
system.verbs.builtins.html.utilities.prefsReportBuild
on visit (adrtable) {
local (i);
for i = 1 to sizeOf (adrtable^) {
local (adrcell = @adrtable^ [i], s);
if (adrcell == adrlist) or (adrcell == @html.utilities.prefsReportBuild) {
continue};
if typeOf (adrcell^) == tableType {
visit (adrcell)}
else {
try {
s = string (adrcell^);
if string.lower (s) contains string.lower (pattern) {
op.insert (adrcell, down);
local (dir = right);
loop {
ix = string.patternMatch (string.lower (pattern), string.lower (s));
if ix == 0 {
break};
s = string.delete (s, 1, ix - 1);
ix = string.patternMatch ("\r", s);
linestring = string.mid (s, 1, ix);
linestring = linestring - "html.getPref (\"";
linestring = string.nthField (linestring, "\"", 1);
op.insert (linestring, dir); dir = down;
s = string.delete (s, 1, ix)};
if dir == down {
op.go (left, 1)}}}
else {
msg (tryError)};
msg (adrcell)}}};
local (pattern = "html.getPref");
local (adrlist = @websites.dw.crossPlatformWork.stories.htmlPrefsList);
new (outlinetype, adrlist);
target.set (adrlist);
edit (adrlist);
visit (@html);
op.firstSummit ();
op.setLineText ("#title \"HTML Routines & The Prefs They Use\"");
op.insert ("#renderOutlineWith \"cadillac\"", down);
window.zoom (adrlist)
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.