News as of <%now%>
<% theme^.utils.furtherReading() %> 000400000009000000020DF0000500000009000000020DF0000600000032000000010A210FFFF0A00000 70 0007000000190000000102018000080000009700000001 40,Geneva 40, 4030 10000900000015000000023D818B3D818B000A00000015000000026AF2226AF222000B00000005000000020000C00000011000000011D21620000F0000005200000000400 10 4,77A 4, 4,Eջ 4, 4, 4, 4,200130000007E00000000DA91F8CE1C1D1E1F7F1B0 44,- . . ' " FFFF0FFFF0FFFE000000060001001777AA P! ) \ FFFF000000060001001777AA000000000078000000001001710000001-7EFF6FBE180000048004806165200-144A45244A45206165222FFFF010345F000010000003A00000001048E40840616522248D038E00015861656000020000049400000000 48E, <%"<%item^.time%> <% if defined (itemmeta.permalink) { return ("" + permalinkimg + "") } else { return ("") } %> <% if defined (itemmeta.enclosure) { return ("" + mediaimg + "") } else { return ("") } %> <% if defined (itemmeta.comments) { return ("" + commentimg + "") } else { return ("") } %> <% if defined (itemmeta.checkmark) { return (checkmarkimg) } else { return ("") } %> <% if itemcheckbox.show { return("") } else { return ("") } %> <%""%><%item^.data.title%>
<% if defined(item^.data.description) && (item^.data.description != "") { return ("- " + theme^.utils.itemContent(item) + "
<%item^.time%> <% if defined (itemmeta.permalink) { return ("" + permalinkimg + "") } else { return ("") } %> <% if defined (itemmeta.enclosure) { return ("" + mediaimg + "") } else { return ("") } %> <% if defined (itemmeta.comments) { return ("" + commentimg + "") } else { return ("") } %> <% if defined (itemmeta.checkmark) { return (checkmarkimg) } else { return ("") } %> <% if itemcheckbox.show { return("") } else { return ("") } %> <%""%><%item^.data.title%>
<% if defined(item^.data.description) && (item^.data.description != "") { return ("- "+item^.data.description+"
<%""%><%globeimg%> <%feed.title%> <%""%><%xmlimg%>
-
<%feed.entries%>
0xDECAFBAD newsRiver: <%title%>
<%bodytext%> Wdatatabl G ]] created Sat, 11 Feb 2006 04:55:09 GMT Wdatatabl G created Fri, 20 Jan 2006 17:32:41 GMT Wdatatabl G aa created Sun, 22 Jan 2006 05:42:09 GMT Wdatatabl G FF created Sat, 11 Feb 2006 04:54:46 GMT Wdatatabl G created Fri, 20 Jan 2006 17:33:21 GMT Wdatatabl G created Fri, 20 Jan 2006 17:33:21 GMT Wdatatabl G created Fri, 20 Jan 2006 17:33:21 GMT Wdatatabl G MM created Sun, 22 Jan 2006 05:41:49 GMT Wdatatabl G GG created Sun, 22 Jan 2006 05:50:15 GMT Wdatatabl G created Fri, 20 Jan 2006 17:33:21 GMT Wdatatabl G ]] created Sun, 22 Jan 2006 05:42:05 GMT Wdatatabl G !! created Wed, 22 Feb 2006 16:18:43 GMT Wdatatabl G oo created Tue, 08 Nov 2005 16:59:27 GMT Wdatatabl G == created Sat, 21 Jan 2006 06:24:10 GMT Wdatatabl G =̿= created Sat, 21 Jan 2006 06:24:28 GMT Wdatatabl G =ȿ= created Sat, 21 Jan 2006 06:24:24 GMT B ^ ' 4 @ I U Znews newsEntry D newsEntry #1 newsFeed page ? VGeneva | 3RJ 2 Geneva H%LAND mac local // Grab page table and tool data pta = html.getpagetableaddress() adrdata = decafbadNewsRiverSuite.init() out = "" readingListUrl = "" on add(s) out = out + s + "\n" bundle // Process incoming web request parameters & arguments local (args) new (tabletype, @args) webserver.parseArgs (pta^.searchArgs, @args) if defined (args.readingListUrl) // Should filter on one reading list? readingListUrl = args.readingListUrl add("Further Reading
") add("- ")
for adrlist in @adrdata^.newsRiver.readingLists
local
opmlurl = nameof (adrlist^)
opmltitle = ""
storyCount = 0
storyCountLastUpdate = ""
if defined(adrlist^.title)
opmltitle = adrlist^.title
else
continue
if defined(adrlist^.storyCount)
storyCount = adrlist^.storyCount
if storyCount == 0
continue
if defined(adrlist^.storyCountLastUpdate)
storyCountLastUpdate = adrlist^.storyCountLastUpdate
add("
- ") if readingListUrl != opmlurl add(""+opmltitle+"") else add(opmltitle) add(" (" + storyCount + " stories last updated on "+ storyCountLastUpdate +")") add(" ") add("
News as of <%now%>
Further Reading
<%readingLists%> 000400000009000000020E50000500000009000000020E50000600000032000000010A210FFFF0A00000 70 0007000000190000000102018000080000009700000001 40,Geneva 40, 4030 10000900000015000000023CE2393CE239000A00000015000000026BC2226BC222000B00000005000000020000C0000001500000001116D3B605B0000F0000005200000000400 10 4,77A 4, 4,Eջ 4, 4, 4, 4,200130000007E00000000DA91F8CE1C1D1E1F7F1B0 44,- . . ' " FFFF0FFFF0FFFE000000060001001777AA P f FFFF000000060001001777AA000000000078000000001001710000001-7EFF6FBE180000048004806172200-131032231032206172222FFFF0103104000010000003A00000001049D40840617222249D038E0001656172600002000004A300000000 49D, <%"<%item^.time%> <% if defined (itemmeta.permalink) { return ("" + permalinkimg + "") } else { return ("") } %> <% if defined (itemmeta.enclosure) { return ("" + mediaimg + "") } else { return ("") } %> <% if defined (itemmeta.comments) { return ("" + commentimg + "") } else { return ("") } %> <% if defined (itemmeta.checkmark) { return (checkmarkimg) } else { return ("") } %> <% if itemcheckbox.show { return("") } else { return ("") } %> <%""%><%item^.data.title%>
<% if defined(item^.data.description) && (item^.data.description != "") { return ("- "+item^.data.description+"
<%globeimg%> <%""%><%feed.title%> <%xmlimg%>
-
<%feed.entries%>
0xDECAFBAD newsRiver: <%title%>
<%bodytext%> Wdatatabl G ]] created Sat, 11 Feb 2006 04:55:09 GMT Wdatatabl G created Fri, 20 Jan 2006 17:32:41 GMT Wdatatabl G aa created Sun, 22 Jan 2006 05:42:09 GMT Wdatatabl G FF created Sat, 11 Feb 2006 04:54:46 GMT Wdatatabl G created Fri, 20 Jan 2006 17:33:21 GMT Wdatatabl G created Fri, 20 Jan 2006 17:33:21 GMT Wdatatabl G created Fri, 20 Jan 2006 17:33:21 GMT Wdatatabl G MM created Sun, 22 Jan 2006 05:41:49 GMT Wdatatabl G GG created Sun, 22 Jan 2006 05:50:15 GMT Wdatatabl G created Fri, 20 Jan 2006 17:33:21 GMT Wdatatabl G ]] created Sun, 22 Jan 2006 05:42:05 GMT Wdatatabl G oo created Tue, 08 Nov 2005 16:59:27 GMT Wdatatabl G == created Sat, 21 Jan 2006 06:24:10 GMT Wdatatabl G =̿= created Sat, 21 Jan 2006 06:24:28 GMT Wdatatabl G =ȿ= created Sat, 21 Jan 2006 06:24:24 GMT 8 ^ + 4 @ EnewsBody /> newsEntry 4newsFeed >Zpage C B ?z( % 1 4 @ Jcss iDimg info :js . templates M R N $ 7 default ` G,play2 ` N8 R 8 2 & 1 = Denglish _prefs systemUrls ;themes N 5 Geneva qr '?LAND mac Gather all items by feed, rather than intertwingling &J Geneva > %: E LAND mac 0.216 New XML-RPC methods: decafbadNewsRiver.getItem Returns full story structure, not just a subset decafbadNewsRiver.getRecentItems Calls decafbadNewsRiver.getItem() for data decafbadNewsRiver.getRecentItemsForSub Calls decafbadNewsRiver.getItem() for data decafbadNewsRiver.getSubInfo Returns the full subscription structure, not just a subset decafbadNewsRiver.getSubs Calls decafbadNewsRiver.getSubInfo() for data 0.215 Added a check to ensure Aggregator API is enabled before using any AJAX-based features that use it 0.214 Added preferences to enable/disable some of the new AJAX-based features 0.213 Added initial support for deferred loading of news item text via aggregator API. 0.212 Tweaked JS to only display working disclosure triangles for items with expandable content. 0.211 Completely revamped theming system, now supports static / script per-theme assets and switching on a prefs value Added a prefs page stolen from newsRiver 0.210 Working out some wrinkles with Reading List counts 0.209 Added reading list story counting, along with display of count in Further Reading list. Reading lists with no stories are not displayed in the Further Reading list. Reading List story count update happens every minute, but I'm not attached to the idea. 0.208 Fixed a persistent bug in rendering templates by switching from { } macro chars to <% %> macro chars. 0.207 Poking around with making the news display faster, disabiling some bells and whistles for now. 0.206 Reading list title now in page title if filtering by reading list. Shoved item icons right over by the date display, rather than flush with end of title. Defensive driving: Skipping links to reading lists in news display footer where the title is undefined 0.205 If filtering, refrain from linking the current reading list at the bottom of the page. 0.204 Added a list of links to reading list filters at the bottom of the news page. 0.203 Now filtering news page for single reading list when a readingListUrl parameter supplied, with a reading list URL as the value. Moved news page display templates into a 'default' sub-branch, the idea being that multiple sub-branched could be created in order to facilitate theme switching. Fixed a bug with the nasty and insecure JS include to enable XML-RPC access from AJAX on the news page. 0.202 Fixed a few more bugs, but doesn't quite seem to be working in Safari. 0.201 Initial support for AJAX-to-XMLRPC interfacing with newsRiver's Aggregator API Make sure your Aggregator API is enabled in preferences Currently only delete is implemented for items. WARNING: Your username and password for the Aggregator API are passed to the browser in a JS include, in order to enable AJAX-to-XMLRPC. This is somewhat insecure, to say the least. (Suggestions welcome.) Imported MochiKit and vcXMLRPC JS libraries as binaries (Is there a way to get this thing to *not* mess with JS files and serve them up straight?) Various and sundry tweaks to the CSS and HTML Hmm, my updater thinks that 0.133 > 0.2. So, here's a bigger version number. 0.2 0.133 Moved update info from data into info section 0.13 Verifying that the updater works 0.12 Fixed a bug in the updater 0.11 This is a test of the updater 0.1 Trying out this updater thing 0.0 Just getting started Wdatatabl G %:&%:& created Sat, 25 Feb 2006 03:33:10 GMT Wdatatabl G %:)%:) created Sat, 25 Feb 2006 03:33:13 GMT Wdatatabl G %:9%:9 created Sat, 25 Feb 2006 03:33:29 GMT Wdatatabl G %:c%:c created Sat, 25 Feb 2006 03:34:11 GMT Wdatatabl G %:9%:9 created Sat, 25 Feb 2006 03:33:29 GMT Wdatatabl G %:u%:u created Sat, 25 Feb 2006 03:34:29 GMT Wdatatabl G %:9%:9 created Sat, 25 Feb 2006 03:33:29 GMT Wdatatabl G %:u%:u created Sat, 25 Feb 2006 03:34:29 GMT Wdatatabl G %:9%:9 created Sat, 25 Feb 2006 03:33:29 GMT Wdatatabl G %:%: created Sat, 25 Feb 2006 03:34:51 GMT Wdatatabl G %:9%:9 created Sat, 25 Feb 2006 03:33:29 GMT Wdatatabl G %:u%:u created Sat, 25 Feb 2006 03:34:29 GMT Wdatatabl G "+"+ created Thu, 23 Feb 2006 04:37:15 GMT Wdatatabl G "1"1 created Thu, 23 Feb 2006 04:37:21 GMT Wdatatabl G created Tue, 21 Feb 2006 05:06:21 GMT Wdatatabl G created Tue, 21 Feb 2006 05:06:25 GMT Wdatatabl G created Sat, 11 Feb 2006 07:27:00 GMT Wdatatabl G created Sat, 11 Feb 2006 07:27:05 GMT Wdatatabl G created Sat, 11 Feb 2006 07:12:56 GMT Wdatatabl G created Sat, 11 Feb 2006 07:13:00 GMT Wdatatabl G >> created Sat, 11 Feb 2006 05:11:42 GMT Wdatatabl G RR created Sat, 11 Feb 2006 05:12:02 GMT Wdatatabl G created Sat, 11 Feb 2006 06:46:43 GMT Wdatatabl G created Fri, 10 Feb 2006 15:17:42 GMT Wdatatabl G created Fri, 10 Feb 2006 15:17:47 GMT Wdatatabl G created Sun, 05 Feb 2006 06:01:44 GMT Wdatatabl G created Sun, 05 Feb 2006 06:01:49 GMT Wdatatabl G nn created Fri, 10 Feb 2006 03:12:24 GMT Wdatatabl G created Sun, 05 Feb 2006 05:57:15 GMT Wdatatabl G created Sun, 05 Feb 2006 05:57:18 GMT Wdatatabl G ߿ created Mon, 23 Jan 2006 20:12:31 GMT Wdatatabl G created Mon, 23 Jan 2006 20:12:36 GMT Wdatatabl G 2Z2Z created Mon, 23 Jan 2006 12:12:26 GMT Wdatatabl G 2`2` created Mon, 23 Jan 2006 12:12:32 GMT Wdatatabl G created Mon, 23 Jan 2006 20:09:01 GMT Wdatatabl G 11 created Mon, 23 Jan 2006 20:09:37 GMT Wdatatabl G φφ created Mon, 23 Jan 2006 05:10:46 GMT Wdatatabl G ϋϋ created Mon, 23 Jan 2006 05:10:51 GMT Wdatatabl G ÛÛ created Mon, 23 Jan 2006 04:19:55 GMT Wdatatabl G UU created Mon, 23 Jan 2006 04:18:45 GMT Wdatatabl G == created Sun, 22 Jan 2006 18:49:35 GMT Wdatatabl G == created Sun, 22 Jan 2006 18:49:41 GMT Wdatatabl G ?ȿ? created Sun, 22 Jan 2006 18:57:28 GMT Wdatatabl G tata created Sun, 22 Jan 2006 22:41:53 GMT Wdatatabl G ss created Sun, 22 Jan 2006 06:25:07 GMT Wdatatabl G {{ created Sun, 22 Jan 2006 06:25:15 GMT Wdatatabl G ؿ created Sun, 22 Jan 2006 06:09:44 GMT Wdatatabl G [[ created Sun, 22 Jan 2006 06:03:23 GMT Wdatatabl G )) created Sun, 22 Jan 2006 06:06:49 GMT Wdatatabl G created Sun, 22 Jan 2006 06:04:24 GMT Wdatatabl G created Sun, 22 Jan 2006 06:06:01 GMT Wdatatabl G || created Sun, 22 Jan 2006 06:08:12 GMT Wdatatabl G created Sun, 22 Jan 2006 06:02:24 GMT Wdatatabl G 55 created Sun, 22 Jan 2006 06:02:45 GMT Wdatatabl G created Sun, 22 Jan 2006 05:53:37 GMT Wdatatabl G created Sun, 22 Jan 2006 06:10:05 GMT Wdatatabl G created Sun, 22 Jan 2006 06:10:18 GMT Wdatatabl G created Sun, 22 Jan 2006 05:53:32 GMT Wdatatabl G created Sat, 21 Jan 2006 17:56:08 GMT Wdatatabl G created Sat, 21 Jan 2006 17:56:11 GMT Wdatatabl G ޕޕ created Sat, 21 Jan 2006 17:50:29 GMT Wdatatabl G ޙޙ created Sat, 21 Jan 2006 17:50:33 GMT Wdatatabl G created Sat, 21 Jan 2006 17:30:51 GMT Wdatatabl G created Sat, 21 Jan 2006 17:30:55 GMT Wdatatabl G تت created Sat, 21 Jan 2006 17:25:14 GMT Wdatatabl G خخ created Sat, 21 Jan 2006 17:25:18 GMT Wdatatabl G created Sat, 21 Jan 2006 17:05:29 GMT Wdatatabl G created Sat, 21 Jan 2006 17:05:32 GMT &J r . ſu ) releaseNotes ` PreleaseNotesUrl Rhttp://hosting.opml.org/decafbad/decafbadNewsRiver/decafbadNewsRiver-relnotes.opmlupdateDownloadUrl Qhttp://hosting.opml.org/decafbad/decafbadNewsRiver/decafbadNewsRiver-updates.fttb VGeneva p Jo r j %: " ; G n z %: author l.m.orchard authorEmail l.m.orchard@pobox.com description #A more outliney and AJAXy newsRiver homePageUrl >http://decafbad.com/blog/2006/01/21/a-bit-of-newsriver-hackeryname decafbadNewsRiver releaseDateTODO O updateInfo vversion 0.216 V Geneva '?LAND mac on any (pta) //boilerplate for your responder pta^.responseHeaders.["Content-Type"] = "text/html" pta^.code = 200 //everything was OK pta^.responseBody = "" //build response return (true) V 2 . any ` z6 2 . D L T condition 6(string.lower (path) beginsWith "/decafbadnewsriver/")enabledmethods { Verdana ȶ%9H & ,$LAND mac on getItem (itemId, username, password) xml.aggregator.securityForRpc (client, username, password) local (adrdata = xml.aggregator.init ()) local (adrstories = @adrdata^.stories) local (adritem = @adrstories^.[string.padWithZeros (itemId, 8)] ) if not defined (adritem^) scriptError ("Can't get the item because there is no item with an id of \"" + itemId + "\".") return (adritem^) Wdatatabl G %4j%4j created Sat, 25 Feb 2006 03:08:42 GMT Verdana n%4 " ?|`LAND mac on getRecentItems (numberOfItems, username, password) Changes 11/6/02; 1:42:04 PM by JES Created. Get the most recent stories as an array of structs. The structs match the struct returned by aggregator.getStory. xml.aggregator.securityForRpc (client, username, password) local (adrdata = xml.aggregator.init ()) local (adrstories = @adrdata^.stories) local (sizestories = sizeOf (adrstories^)) local (returnStruct); new (tableType, @returnStruct) local (i, ct = 0) for i = sizestories downto 1 ct++ local (adrstory = @adrstories^[i] ) local (itemId = nameOf (adrstory^)) returnStruct[itemId] = decafbadNewsRiverRpcHandlers.getItem (itemId, username, password) if ct == numberOfItems break return (returnStruct) bundle //testing local (t); new (tabletype, @t) t.client = "127.0.0.1" with user.radio.prefs.security scratchpad.items = callscript (@xml.aggregator.rpcHandlers.getRecentItems, {50, remoteUsername, remotePassword}, @t) / ' Verdana n%5 # 8XLAND mac on getRecentItemsForSub (url, numberOfItems, username, password) Changes 11/6/02; 1:42:04 PM by JES Created. Get the most recent items in a given subscription as an array of structs. The structs match the struct returned by aggregator.getItem. xml.aggregator.securityForRpc (client, username, password) local (adrdata = xml.aggregator.init ()) local (adrstories = @adrdata^.stories) local (sizestories = sizeOf (adrstories^)) local (returnStruct); new (tableType, @returnStruct) local (i, ct = 0) for i = sizestories downto 1 local (adritem = @adrstories^[i] ) if adritem^.url == url ct++ local (itemId = nameOf (adritem^)) returnStruct.[itemId] = decafbadNewsRiverRpcHandlers.getItem (itemId, username, password) if ct == numberOfItems break return (returnStruct) bundle //testing local (t); new (tabletype, @t) t.client = "127.0.0.1" with user.radio.prefs.security scratchpad.items = callscript (@xml.aggregator.rpcHandlers.getRecentItemsForSub, {"http://www.scripting.com/rss.xml", 10, remoteUsername, remotePassword}, @t) / Verdana %6 4 cYLAND mac on getSubInfo (url, username, password) Changes 11/3/02; 5:29:27 PM by JES Created. Return a struct of information about a subscribed RSS feed. The struct contains the following elements: title -- the title of the feed link -- the channel link, usually a link to the HTML version description -- the description of the feed url -- the XML-URL of the feed language -- the language code for the feed, or the empty string image -- a struct describing the image associated with the feed url -- the url of the image, or the empty string title -- the title of the image, or the empty string height -- the height of the image, or 0 width -- the width of the image, or 0 xml.aggregator.securityForRpc (client, username, password) local (adrdata = xml.aggregator.init ()) local (adrservices = @adrdata^.services) local (adrservice = @adrservices^.[url]) local (adrinfo = @adrservice^.compilation) return (adrservice^) Wdatatabl G %6%6 created Sat, 25 Feb 2006 03:17:59 GMT Q W Geneva [%6 # LAND mac on getSubs (username, password) Changes 1/11/06; 5:29:08 AM by DW Put the call to getSubInfo in a try, because it's possible one of the services is malformed. 11/6/02; 1:49:30 PM by JES Created. Return an array of structs for all the channels we're subscribed to. xml.aggregator.securityForRpc (client, username, password) local (adrdata = xml.aggregator.init ()) local (adrservices = @adrdata^.services) local (returnStruct); new (tableType, @returnStruct) local (adrservice) for adrservice in adrservices local (url = nameOf (adrservice^)) try returnStruct.[url] = decafbadNewsRiverRpcHandlers.getSubInfo (url, username, password) return (returnStruct) bundle //testing root.client = "127.0.0.1" scratchpad.subs = getSubs (aggregatorData.prefs.security.username, aggregatorData.prefs.security.password) delete (@root.client) Wdatatabl G H$H$ created Wed, 11 Jan 2006 13:29:08 GMT Wdatatabl G H%H% created Wed, 11 Jan 2006 13:29:09 GMT Wdatatabl G GG created Wed, 11 Jan 2006 13:28:27 GMT Wdatatabl G G^G^ created Wed, 11 Jan 2006 13:25:50 GMT Wdatatabl G G6G6 created Wed, 11 Jan 2006 13:25:10 GMT Wdatatabl G GG created Wed, 11 Jan 2006 13:27:26 GMT Q B %9# # / D P [ g ogetItem |xgetRecentItems getRecentItemsForSub getSubInfo getSubs , Geneva '?LAND mac This script runs every hour. n Geneva ^ 3 eLAND mac This script runs every minute. decafbadNewsRiverSuite.init() decafbadNewsRiverSuite.updateReadingListCounts() Wdatatabl G ii created Fri, 10 Feb 2006 02:50:17 GMT Wdatatabl G nn created Fri, 10 Feb 2006 03:12:56 GMT Geneva '?LAND mac This script runs every night. { w . " . 9 everyHour ` everyMinute ` - everyNight ` { n j . ' ,fileMenu ` radio ` :user ` f n H ( Geneva 0 ILAND mac on getCurrentTheme() local adrtooldata = @decafbadNewsRiverData adrprefs = decafbadNewsRiverSuite.getPrefs() curr_theme = adrprefs^.theme adrtheme = @adrtooldata^.themes.[curr_theme] return (adrtheme) bundle // testing local theme = getCurrentTheme() dialog.alert(theme^.info.name) Wdatatabl G SS created Sat, 11 Feb 2006 03:46:43 GMT Wdatatabl G ȩȩ created Sat, 11 Feb 2006 03:48:09 GMT Wdatatabl G created Sat, 11 Feb 2006 05:44:54 GMT Wdatatabl G ȥȥ created Sat, 11 Feb 2006 03:48:05 GMT Wdatatabl G II created Sat, 11 Feb 2006 03:46:33 GMT Wdatatabl G ȝȝ created Sat, 11 Feb 2006 03:47:57 GMT Wdatatabl G jj created Sat, 11 Feb 2006 03:47:06 GMT Wdatatabl G ss created Sat, 11 Feb 2006 03:47:15 GMT Wdatatabl G ȃȃ created Sat, 11 Feb 2006 03:47:31 GMT Wdatatabl G ȍȍ created Sat, 11 Feb 2006 03:47:41 GMT H T Geneva !j K erLAND mac on getPrefs() local adrdata = decafbadNewsRiverSuite.init() adrprefs = @adrdata^.decafbadNewsRiver bundle // Set up any necessary prefs defaults if not defined (adrprefs^.theme) adrprefs^.theme = "default" if not defined (adrprefs^.deferredItemContent) adrprefs^.deferredItemContent = true if not defined (adrprefs^.showDeleteButtons) adrprefs^.showDeleteButtons = true return (adrprefs) bundle // testing dialog.alert(getPrefs()) Wdatatabl G SS created Sat, 11 Feb 2006 03:46:43 GMT Wdatatabl G ȩȩ created Sat, 11 Feb 2006 03:48:09 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:31:03 GMT Wdatatabl G created Sat, 11 Feb 2006 05:40:28 GMT Wdatatabl G created Sat, 11 Feb 2006 05:36:33 GMT Wdatatabl G created Sat, 11 Feb 2006 05:40:04 GMT Wdatatabl G created Sat, 11 Feb 2006 05:40:48 GMT Wdatatabl G created Sat, 11 Feb 2006 05:40:04 GMT Wdatatabl G created Sat, 11 Feb 2006 05:40:48 GMT Wdatatabl G created Sat, 11 Feb 2006 05:40:04 GMT Wdatatabl G created Sat, 11 Feb 2006 05:40:48 GMT Wdatatabl G ȝȝ created Sat, 11 Feb 2006 03:47:57 GMT Wdatatabl G jj created Sat, 11 Feb 2006 03:47:06 GMT Wdatatabl G ȍȍ created Sat, 11 Feb 2006 03:47:41 GMT T Geneva !> l2LAND mac local adrdata = newsRiverSuite.init() if not defined (adrdata^.decafbadNewsRiver) new(tableType, @adrdata^.decafbadNewsRiver) bundle // Install a post-scan callback to update reading list counts if not defined (adrdata^.callbacks.postScan.updateReadingListCounts) adrdata^.callbacks.postScan.updateReadingListCounts = @decafbadNewsRiverSuite.updateReadingListCounts return (adrdata) Wdatatabl G hyhy created Fri, 10 Feb 2006 02:45:29 GMT Wdatatabl G created Sat, 11 Feb 2006 05:36:38 GMT Wdatatabl G ;; created Sat, 11 Feb 2006 05:37:15 GMT Wdatatabl G hh created Fri, 10 Feb 2006 02:47:21 GMT Wdatatabl G created Fri, 30 Dec 2005 03:52:32 GMT Wdatatabl G << created Fri, 30 Dec 2005 03:53:32 GMT Wdatatabl G created Sat, 21 Jan 2006 00:56:59 GMT Geneva `^ BLAND mac on listThemeDescriptions() names = {} adrtooldata = decafbadNewsRiverData for adr in @decafbadNewsRiverData.themes names[sizeOf(names)+1] = adr^.info.description return names bundle dialog.alert(listThemeDescriptions()) Wdatatabl G created Sat, 11 Feb 2006 05:59:56 GMT Wdatatabl G created Sat, 11 Feb 2006 06:00:11 GMT Wdatatabl G created Sat, 11 Feb 2006 05:59:58 GMT Wdatatabl G created Sat, 11 Feb 2006 06:00:43 GMT Wdatatabl G created Sat, 11 Feb 2006 06:01:46 GMT Wdatatabl G {{ created Sat, 11 Feb 2006 05:59:39 GMT Wdatatabl G }} created Sat, 11 Feb 2006 05:59:41 GMT Geneva ` +LAND mac on listThemeIDs() names = {} adrtooldata = decafbadNewsRiverData for adr in @decafbadNewsRiverData.themes names[sizeOf(names)+1] = nameOf(adr^) return names bundle dialog.alert(listThemeIDs()) Wdatatabl G created Sat, 11 Feb 2006 05:59:56 GMT Wdatatabl G created Sat, 11 Feb 2006 06:00:11 GMT Wdatatabl G created Sat, 11 Feb 2006 05:59:58 GMT Wdatatabl G created Sat, 11 Feb 2006 06:00:43 GMT Wdatatabl G created Sat, 11 Feb 2006 06:01:46 GMT Wdatatabl G {{ created Sat, 11 Feb 2006 05:59:39 GMT Wdatatabl G }} created Sat, 11 Feb 2006 05:59:41 GMT Geneva ` BLAND mac on listThemeNames() names = {} adrtooldata = decafbadNewsRiverData for adr in @decafbadNewsRiverData.themes names[sizeOf(names)+1] = adr^.info.name return names bundle dialog.alert(listThemeNames()) Wdatatabl G created Sat, 11 Feb 2006 05:59:56 GMT Wdatatabl G created Sat, 11 Feb 2006 06:00:11 GMT Wdatatabl G created Sat, 11 Feb 2006 05:59:58 GMT Wdatatabl G created Sat, 11 Feb 2006 06:00:43 GMT Wdatatabl G created Sat, 11 Feb 2006 06:01:46 GMT Wdatatabl G {{ created Sat, 11 Feb 2006 05:59:39 GMT Wdatatabl G }} created Sat, 11 Feb 2006 05:59:41 GMT 0 Geneva ؛g< ) _cLAND mac decafbadNewsRiverSuite.menuCommands.viewNews () 1 Geneva T ʿ '?LAND mac decafbadNewsRiverSuite.menuCommands.updateTool() , 7 Geneva 0 '?LAND mac DecafbadNewsRiver View News... - Get Latest Code... p Y[ Geneva ;? p 8 Geneva Vך $ 8# LAND mac if dialog.twoWay ("Check for updates to " + decafbadNewsRiverSuite.util.guestDatabaseName (this) + "?", "Update", "Cancel") decafbadNewsRiverSuite.updater.checkReleaseNotes () 8 ; Geneva ؛9=} LAND mac webbrowser.openurl (decafbadNewsRiverData.systemUrls.news) X T $ <ǿ updateTool ` viewNews ` . X ( Geneva iF '?LAND mac This script returns a string which appears in the Status Center on the Radio UserLand home page. return ("It's a river of news where the water is actually coffee") ( n 0 Geneva m LAND mac on checkReleaseNotes () Check for updates. Download the release notes first, then check its version, give the user a choice. Sat, Mar 2, 2002 at 5:11:46 AM by NJR Changes: local adrTool = table.getRootAddress (this) adrUpdater = parentOf (this^) gdbName = decafbadNewsRiverSuite.util.guestDatabaseName (this) XXX dependent on webdav toolName = Frontier.tools.cleanToolName (gdbName) adrUpdateTable = @temp.[toolName + "ToolUpdateTemp"] on toolTable (itemName) local (adrTable = @adrTool^.[toolName + itemName]) if defined (adrTable^) and sizeOf (adrTable^) > 0 return adrTable return nil new (tableType, adrUpdateTable) local adrButtonTable = @adrUpdateTable^.buttons adrRelNotes = @adrUpdateTable^.relnotes adrToolInfo = toolTable ("Info") adrUpdateInfo = @(toolTable ("Info"))^.updateInfo currentVersion = adrToolInfo^.version currentVersionPostText = " currently installed version" savedTarget = target.get () bundle fetch release notes op.xmlToOutline (adrUpdater^.getUrl (adrUpdateInfo^.releaseNotesUrl), adrRelNotes, flNewOutline: true) target.set (adrRelNotes) bundle check if we have the latest version already, if so display a message op.fullCollapse () op.firstSummit () testVersion = op.getLineText () if (currentVersion == testVersion) dialog.notify ("The currently installed version of " + gdbName + " (" + currentVersion + ") is already the latest version.") return if (date.versionLessThan (testVersion, currentVersion)) dialog.notify ("The currently installed version of " + gdbName + " (" + currentVersion + ") is newer than the downloadable version (" + testVersion + "). Cancelling update attempt.") return bundle annotate and collapse/expand release notes by version op.setLineText (testVersion + " most recent version: click Update Now to install") op.expand (infinity) loop testVersion = op.getLineText () if (currentVersion == testVersion) op.setLineText (testVersion + currentVersionPostText) break if (date.versionLessThan (testVersion, currentVersion)) op.insert (currentVersion + currentVersionPostText, up) break op.expand (infinity) if not op.go (down, 1) op.insert (currentVersion + currentVersionPostText, down) break bundle add buttons local (closer = "window.close (window.frontmost ())") adrUpdateTable^.update = adrUpdater^.update copy update script out of tool database new (tableType, adrButtonTable) script.newScriptObject (string (adrUpdateTable) + ".update (@" + adrTool + ")\r" + closer, @adrButtonTable^.["Update Now"]) script.newScriptObject (closer, @adrButtonTable^.Cancel) target.set (savedTarget) XXX interruption issues? edit (adrRelNotes, windowTitle: toolName + " Tool Release Notes", flReadOnly: true, adrButtonTable: adrButtonTable) checkReleaseNotes () testing s Z Geneva 9θd r ascr mac on createArchives (rootFile, zipName, zipFolder) -- rootFile and zipFolder must be aliases -- ZipIt must be configured for no MB (pending bug fix) local zipArchive, oldMB tell application "ZipIt" copy (make new document) to zipArchive add rootFile to zipArchive compress zipArchive name zipName in zipFolder quit end tell tell application "DropStuff" open rootFile quit end tell end createArchives s Geneva YY #v LAND mac on getUrl (url) local (urlList = string.urlSplit (url)) if (urlList [1] "http://") scriptError ("Only HTTP URLs are supported (" + url + " uses another protocol)") return tcp.httpClient (server: urlList[2], path: urlList [3], ctFollowRedirects: 5) _ Lucida Grande 5: :}LAND mac This script is designed for internal use only; don't blame me if it blows up. Sat, Mar 2, 2002 at 12:10:26 PM by NJR local version = decafbadNewsRiverInfo.version distFilenamePrefix = "decafbadNewsRivertool-" + version desktopPath = file.getSpecialFolderPath ("", "desktop folder", false) uploadPath = "Caffeina2:Users:deusx:OPML:www:decafbadNewsRiver:" uploadPath = desktopPath + "decafbadNewsRiver Tool " + version + " To Upload" + file.getPathChar () opmlPath = uploadPath + "decafbadNewsRiver-relnotes.opml" fttbPath = uploadPath + "decafbadNewsRiver-updates.fttb" rootPath = uploadPath + "decafbadNewsRiver.root" adrRelNotes = @decafbadNewsRiverInfo.updateInfo.releaseNotes bundle check release OK, set up upload folder target.set (adrRelNotes) op.firstSummit () if (version op.getLineText ()) scriptError ("Version in release notes does not match version in tool info.") if file.exists (uploadPath) if dialog.twoWay ("Delete " + uploadPath + "?", "Delete", "Cancel") file.deleteFolder (uploadPath) else return file.deleteFolder (uploadPath) file.newFolder (uploadPath) bundle release info, date file.writeTextFile (opmlPath, op.outlineToXml (adrRelNotes)) decafbadNewsRiverInfo.releaseDate = clock.now () bundle make upgrader export file Can't just do this: export.sendObject (table.getRootAddress (this), fttbPath) otherwise Frontier complains on import that a table can't have a window Also, can't use a local object, needs to be an odb-based object. local (adrData = @system.temp.decafbadNewsRiverUpgradeData) new (tableType, adrData) table.copyContents (table.getRootAddress (this), adrData) export.sendObject (adrData, fttbPath) target.set (this) fileMenu.saveCopy (rootPath) file.setVersion (rootPath, version) bundle // Zip up root decafbadNewsRiverSuite.updater.createArchives (alias (rootPath), distFilenamePrefix + ".zip", alias (uploadPath)) file.rename (uploadPath + "decafbadNewsRiver.root.sit", distFilenamePrefix + ".sit") file.delete (rootPath) Finder.open (alias (uploadPath)) Wdatatabl G {{ created Sat, 21 Jan 2006 17:15:55 GMT Geneva X߇ E gLAND mac on update (adrTool) A very lightweight updating mechanism. Because the tool root is expected to stay small, it downloads everything always (and base64 encoded at that). Sat, Mar 2, 2002 at 10:24:10 AM by NJR Changes: if (table.getRootAddress (this) == adrTool) scriptError ("Cant update a tool in place; script will cease execution once replaced. Copy this script somewhere else before running it.") local toolname = Frontier.tools.cleanToolName (decafbadNewsRiverSuite.util.guestDatabaseName (adrTool)) downloadUrl = adrTool^.[toolName + "Info"].updateInfo.updateDownloadUrl updateSource = decafbadNewsRiverSuite.updater.getUrl (downloadUrl) tempDest atts if not (fatPages.getPageAtts (@updateSource, @atts) and defined (atts.pageData)) scriptError ("Unable to update from <" + downloadUrl + ">: it does not contain an embedded object.") Like publishing, can't unpack directly into the gdb address otherwise the kernel starts reporting internal errors and/or crashing. Use an intermediate location (doesn't need to be in the odb in this direction). new (tableType, @tempDest) fatPages.unpackOdbObject (@atts, @tempDest, flRunnable: false, flEdit: false) table.copyContents (@tempDest, adrTool) local (x = string.parseAddress (adrTool), f = x [1]) Frontier.tools.install (f) dialog.notify ("The " + toolname + " tool has been updated to version " + adrTool^.[toolName + "Info"].version + ".") B - 9 @ L T ` gcheckReleaseNotes ` createArchives ` ʭgetUrl ` ,publish ` update ` ش VGeneva 2X [ Geneva WX * 2LAND mac on updateReadingListCounts() Changes: local adrdata = decafbadNewsRiverSuite.init() bundle // Clear out all reading lists story counts for adrlist in @adrdata^.newsRiver.readingLists if not(defined(adrlist^.title)) continue adrlist^.storyCount = 0 adrlist^.storyCountLastUpdate = "" bundle // Walk through all stories and update tallies for each reading list for adrstory in @adrdata^.stories local adrservice = @adrdata^.services.[adrstory^.url] if not defined(adrservice^) // Skip service-orphaned stories continue if not defined(adrservice^.readingList) // Skip stories not from reading lists continue for adrservicerl in @adrservice^.readingList try local rl_url = nameOf(adrservicerl^) adrlist = @adrdata^.newsRiver.readingLists.[rl_url] if adrstory^.time > adrlist^.storyCountLastUpdate adrlist^.storyCountLastUpdate = adrstory^.time adrlist^.storyCount = adrlist^.storyCount + 1 bundle // test code updateReadingListCounts() local adrdata = decafbadNewsRiverSuite.init() out = "" on add(s) out = out + s + "\n" bundle for adrlist in @adrdata^.newsRiver.readingLists if not(defined(adrlist^.title)) continue add("RL: " + adrlist^.title + " (" + adrlist^.storyCount + " / "+ adrlist^.storyCountLastUpdate +")") wp.newTextObject(out, @scratchpad.updatecounts) Wdatatabl G __ created Fri, 10 Feb 2006 02:08:36 GMT Wdatatabl G X X created Fri, 10 Feb 2006 01:35:44 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:31:03 GMT Wdatatabl G YY created Fri, 10 Feb 2006 01:43:03 GMT Wdatatabl G YY created Fri, 10 Feb 2006 01:43:39 GMT Wdatatabl G 0ÿ0 created Mon, 23 Jan 2006 12:05:39 GMT Wdatatabl G 0ҿ0 created Mon, 23 Jan 2006 12:05:54 GMT Wdatatabl G Z<Z< created Fri, 10 Feb 2006 01:44:44 GMT Wdatatabl G Z<Z< created Fri, 10 Feb 2006 01:44:44 GMT Wdatatabl G YY created Fri, 10 Feb 2006 01:43:39 GMT Wdatatabl G [[ created Fri, 10 Feb 2006 01:48:22 GMT Wdatatabl G ["[" created Fri, 10 Feb 2006 01:48:34 GMT Wdatatabl G [Q[Q created Fri, 10 Feb 2006 01:49:21 GMT Wdatatabl G \&\& created Fri, 10 Feb 2006 01:52:54 GMT Wdatatabl G \0\0 created Fri, 10 Feb 2006 01:53:04 GMT Wdatatabl G \\ created Fri, 10 Feb 2006 01:56:14 GMT Wdatatabl G \\ created Fri, 10 Feb 2006 01:56:26 GMT Wdatatabl G \\ created Fri, 10 Feb 2006 01:54:31 GMT Wdatatabl G created Fri, 10 Feb 2006 15:17:18 GMT Wdatatabl G ]C]C created Fri, 10 Feb 2006 01:57:39 GMT Wdatatabl G ]D]D created Fri, 10 Feb 2006 01:57:40 GMT Wdatatabl G ]] created Fri, 10 Feb 2006 01:59:17 GMT Wdatatabl G oo created Fri, 10 Feb 2006 03:16:35 GMT Wdatatabl G qPqP created Fri, 10 Feb 2006 03:23:12 GMT Wdatatabl G ]A]A created Fri, 10 Feb 2006 01:57:37 GMT Wdatatabl G X"X" created Fri, 10 Feb 2006 01:35:46 GMT Wdatatabl G X'X' created Fri, 10 Feb 2006 01:35:51 GMT Wdatatabl G X X created Fri, 10 Feb 2006 01:35:44 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:31:03 GMT Wdatatabl G XNXN created Fri, 10 Feb 2006 01:36:30 GMT Wdatatabl G YY created Fri, 10 Feb 2006 01:41:57 GMT Wdatatabl G YY created Fri, 10 Feb 2006 01:42:00 GMT Wdatatabl G YY created Fri, 10 Feb 2006 01:43:03 GMT Wdatatabl G YY created Fri, 10 Feb 2006 01:43:39 GMT Wdatatabl G 0ÿ0 created Mon, 23 Jan 2006 12:05:39 GMT Wdatatabl G 0ҿ0 created Mon, 23 Jan 2006 12:05:54 GMT Wdatatabl G ^|^| created Fri, 10 Feb 2006 02:02:52 GMT Wdatatabl G XTXT created Fri, 10 Feb 2006 01:36:36 GMT L T Geneva v:v}8 * a LAND mac on backupTable (adrTable, backupSuffix = "backup") Back up the table to another table with the specified suffix and the same parent table. Appends a number to the backup name if a backup already exists. local adrParent = parentOf (adrTable^) backupName = nameOf (adrTable^) + " " + backupSuffix adrBackup = @adrParent^.[backupName] if typeOf (adrTable^) != tableType scriptError ("Cant perform backupTable on a non-table.") if defined (adrBackup^) adrBackup = table.uniqueName (backupName + " ", adrParent) new (tableType, adrBackup) table.copyContents (adrTable, adrBackup) bundle testing backupTable (@scratchpad.blah) L ~ Geneva I")
pta^.title = "Channel: " + decodeEntities (adrservice^.compilation.channeltitle)
if defined (args.readingListUrl) // Should filter on one reading list?
flOneReadingList = true
readingListUrl = args.readingListUrl
adrReadingList = @adrdata^.newsRiver.readingLists[readingListUrl]
bundle // Set up for page output caching
if not defined (adrcache^) //make sure the cache table is defined
new (tabletype, adrcache)
if adrdata^.newsRiver.flCacheNewsItemsPage
local (cachename = defaultcachename)
if sizeof (xmlUrl) > 0
cachename = xmlUrl
adrincache = @adrcache^.[cachename]
bundle // Catch and process form POST action
if pta^.method == "POST"
local (args)
new (tabletype, @args)
webserver.parseArgs (pta^.requestBody, @args)
scratchpad.args = args; edit (@scratchpad.args)
if defined (args.formName)
if string.lower (args.formName) == "editstories"
delete (@args.formName)
if defined (args.unsubscribe)
local (args)
new (tabletype, @args)
args.xmlUrl = xmlUrl
if defined (adrdata^.services.[xmlUrl])
adrargs^.redirect = newsRiverData.systemUrls.unsub + "?" + webserver.encodeargs (@args)
return ("")
local
adrdefaultcache = @adrcache^.[defaultcachename]
for adrarg in @args
try
local (name = string.padwithzeros (number (nameof (adrarg^)), 8))
local (adrstory = @adrdata^.stories.[name])
if defined (adrstory^)
adrdata^.trash.[name] = adrstory^
delete (adrstory)
if adrdata^.newsRiver.flCacheNewsItemsPage
if defined (adrcache^)
if defined (adrincache^) //posting invalidates the cache
delete (adrincache)
if adrdefaultcache == adrincache //02/24/2001 JES: delete the cache for the service
if defined (adrstory^)
local (adrservicecache = @adrcache^.["xmlUrl=" + string.urlEncode (adrstory^.url)])
if defined (adrservicecache^)
delete (adrservicecache)
else //02/24/2001 JES: we're on the service page -- delete the default cache
if defined (adrdefaultcache^)
delete (adrdefaultcache)
decafbadNewsRiverSuite.updateReadingListCounts()
bundle // Set up page metadata
pta^.title = newsRiverSuite.getString ("aggregator.title")
if flOneReadingList // Tweak the page title if filtering on a reading list
if defined(adrReadingList^.title)
pta^.title = adrReadingList^.title
bundle // See if we can serve from the cache
if defined (adrcache^)
if defined (adrincache^)
return (adrincache^)
bundle // Message at the top of the page
if flOneService
local (t)
new (tabletype, @t)
t.channeltitle = decodeEntities (adrservice^.compilation.channeltitle)
addMsg (newsRiverSuite.getString ("aggregator.oneChannelMessage", @t))
pta^.title = t.channeltitle
else
local (t)
new (tabletype, @t)
t.subscriptionurl = newsRiverData.systemUrls.subscriptionList
addMsg (newsRiverSuite.getString ("aggregator.standardMessage", @t))
add (newsRiverSuite.getString ("aggregator.clickThePostButton"))
if adrdata^.newsRiver.flNewsPageDeleteCheckboxesDefault
addMsg (newsRiverSuite.getString ("aggregator.checkBoxesOnIntro"))
else
addMsg (newsRiverSuite.getString ("aggregator.checkBoxesOffIntro"))
if flOneService
addMsg (newsRiverSuite.getString ("aggregator.howToUnsubscribe"))
bundle // Set up deletion checkbox prefs for templates
new(tabletype, @pta^.itemcheckbox)
pta^.itemcheckbox.show = adrdata^.newsRiver.flItemCheckboxes
if adrdata^.newsRiver.flNewsPageDeleteCheckboxesDefault
pta^.itemcheckbox.checked = "checked=\"checked\""
else
pta^.itemcheckbox.checked = ""
local // Look up all the potential news items to be displayed
i = 0
adrtable = @adrdata^.stories
sizetable = sizeof (adrtable^)
bundle // Loop over the news items to build the page
local
flskip
for i = sizetable downto 1
bundle // Save the previous item, grab the next
adrprevitem = adritem
adritem = @adrdata^.stories [i]
bundle // Skip missing or empty stories
if not defined (adritem^.storyText) //skip this story -- this can happen if the scan is interrupted
continue
if (string.trimWhiteSpace (searchEngine.stripMarkup (adrItem^.storyText)) == "") and (not (string.lower (adrItem^.storyText) contains " ctStoriesToList
break
bundle // On feed transition between items, finalize the previous feed display chunk.
if adritem^.channeltitle != lastchanneltitle
if adrprevservice != nil
addFeed(adrprevservice)
adrprevservice = adrservice
lastchanneltitle = adritem^.channeltitle
bundle // Build some metadata flags for this item
new(tabletype, @pta^.itemmeta)
bundle // add info for the deletion checkbox
pta^.itemmeta.name = number(nameof(adritem^))
bundle //an item has a checkmark if it's been blogged
if defined (adritem^.adrBlogPost)
pta^.itemmeta.checkmark = true
bundle //if it has an enclosure add a media link
if defined (adritem^.enclosure)
if not defined (adritem^.enclosure.error)
local (url)
if defined (adritem^.enclosure.f)
url = html.getfileurl (adritem^.enclosure.f)
else
url = adritem^.enclosure.url
pta^.itemmeta.enclosure = url
bundle //if it has comments add a comment link
if defined (adritem^.comments)
pta^.itemmeta.comments = adritem^.comments
pta^.itemmeta.commentsonclick = "window.open (this.href, \'comments\', \'width=515, height=480, location=0, resizable=1, scrollbars=1, status=0, toolbar=0, directories=0\'); return(false);"
pta^.itemmeta.commentstooltip = newsRiverSuite.getString ("misc.clickToCommentOnThisPost")
bundle //if it has permalink add a permalink link
if defined (adritem^.permalink)
pta^.itemmeta.permalink = true
bundle // Finally, add this new item to the display buffer.
pta^.item = adritem
local (checkmark = "", enclosure = "", comments = "", permalink = "")
entriestext = entriestext + processTmpl("newsEntry")
bundle // Wrap up the final feed on the page, if there are buffered items still waiting.
if entriestext != ""
if defined(adrprevservice^)
addFeed(adrprevservice)
if ctstories == 0 // No stories available msg.
addMsg (newsRiverSuite.getString ("aggregator.noStories"))
bundle // Add the item delete button to the page, with an optional unsubscribe button
local (flDeleteButtonAdded = false)
if flOneService
if defined (adrservice^)
addButtons ("
") flDeleteButtonAdded = true if not flDeleteButtonAdded addButtons("") bundle // Finish building the page. pta^.now = clock.now() pta^.feeds = feedstext pta^.msgtext = msgtext pta^.buttons = buttonstext pta^.readingLists = rltext htmltext = htmltext + processTmpl("news") pta^.bodytext = htmltext htmltext = processTmpl("page") bundle // Cache the page output if adrdata^.newsRiver.flCacheNewsItemsPage adrincache^ = htmltext return (htmltext) bundle //test code html.setpagetableaddress (@scratchpad.newsparams) webbrowser.displaytext (viewNewsItems ()) webbrowser.bringtofront () Wdatatabl G wԿw created Sun, 16 Oct 2005 17:58:28 GMT Wdatatabl G ww created Sun, 16 Oct 2005 17:58:31 GMT Wdatatabl G ww created Sun, 16 Oct 2005 17:58:58 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:30:48 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:30:57 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:31:03 GMT Wdatatabl G << created Sun, 22 Jan 2006 18:44:27 GMT Wdatatabl G 9 9 created Sun, 22 Jan 2006 18:28:45 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:28:34 GMT Wdatatabl G 9 9 created Sun, 22 Jan 2006 18:29:02 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:28:58 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:28:36 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:28:38 GMT Wdatatabl G created Mon, 23 Jan 2006 03:51:16 GMT Wdatatabl G created Mon, 23 Jan 2006 03:51:12 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:28:52 GMT Wdatatabl G == created Sun, 22 Jan 2006 18:46:03 GMT Wdatatabl G <п< created Sun, 22 Jan 2006 18:44:48 GMT Wdatatabl G 99 created Sun, 22 Jan 2006 18:28:55 GMT Wdatatabl G <ȿ< created Sun, 22 Jan 2006 18:44:40 GMT Wdatatabl G 7;7; created Sun, 22 Jan 2006 18:20:59 GMT Wdatatabl G 7E7E created Sun, 22 Jan 2006 18:21:09 GMT Wdatatabl G == created Sun, 22 Jan 2006 18:45:53 GMT Wdatatabl G 7?7? created Sun, 22 Jan 2006 18:21:03 GMT Wdatatabl G 7H7H created Sun, 22 Jan 2006 18:21:12 GMT Wdatatabl G 11 created Mon, 23 Jan 2006 12:08:57 GMT Wdatatabl G <ÿ< created Sun, 22 Jan 2006 18:44:35 GMT Wdatatabl G 7K7K created Sun, 22 Jan 2006 18:21:15 GMT Wdatatabl G 9696 created Sun, 22 Jan 2006 18:29:26 GMT Wdatatabl G 9-9- created Sun, 22 Jan 2006 18:29:17 GMT Wdatatabl G 9292 created Sun, 22 Jan 2006 18:29:22 GMT Wdatatabl G :: created Sun, 22 Jan 2006 18:32:55 GMT Wdatatabl G ;9;9 created Sun, 22 Jan 2006 18:38:01 GMT Wdatatabl G "" created Sat, 21 Jan 2006 04:29:05 GMT Wdatatabl G ?? created Sun, 22 Jan 2006 18:56:34 GMT Wdatatabl G ʁʁ created Sat, 11 Feb 2006 03:56:01 GMT Wdatatabl G 9¿9 created Sun, 22 Jan 2006 18:31:46 GMT Wdatatabl G ;; created Sun, 22 Jan 2006 18:39:29 GMT Wdatatabl G :*:* created Sun, 22 Jan 2006 18:33:30 GMT Wdatatabl G (6(6 created Sat, 21 Jan 2006 04:52:22 GMT Wdatatabl G )?)? created Sat, 21 Jan 2006 04:56:47 GMT Wdatatabl G RR created Sat, 21 Jan 2006 03:31:46 GMT Wdatatabl G )N)N created Sat, 21 Jan 2006 04:57:02 GMT Wdatatabl G created Sat, 21 Jan 2006 01:55:09 GMT Wdatatabl G &n&n created Sat, 21 Jan 2006 04:44:46 GMT Wdatatabl G created Sat, 21 Jan 2006 02:03:24 GMT Wdatatabl G VV created Sat, 11 Feb 2006 06:37:26 GMT Wdatatabl G created Sat, 21 Jan 2006 02:03:47 GMT Wdatatabl G && created Sat, 21 Jan 2006 04:45:10 GMT Wdatatabl G created Sat, 21 Jan 2006 02:03:17 GMT Wdatatabl G ),), created Sat, 21 Jan 2006 04:56:28 GMT Wdatatabl G Ϳ created Sat, 21 Jan 2006 02:04:13 GMT Wdatatabl G տ created Sat, 21 Jan 2006 02:04:21 GMT Wdatatabl G created Sat, 21 Jan 2006 03:41:33 GMT Wdatatabl G created Mon, 23 Jan 2006 03:51:38 GMT Wdatatabl G created Mon, 23 Jan 2006 03:51:49 GMT Wdatatabl G ο created Sat, 21 Jan 2006 01:08:46 GMT Wdatatabl G ََ created Sat, 11 Feb 2006 05:00:14 GMT Wdatatabl G ٗٗ created Sat, 11 Feb 2006 05:00:23 GMT Wdatatabl G created Sat, 11 Feb 2006 04:36:06 GMT Wdatatabl G created Sat, 11 Feb 2006 04:40:08 GMT Wdatatabl G created Sat, 11 Feb 2006 04:40:11 GMT Wdatatabl G created Sat, 11 Feb 2006 04:36:51 GMT Wdatatabl G created Sat, 11 Feb 2006 04:36:55 GMT Wdatatabl G created Sat, 11 Feb 2006 06:31:18 GMT Wdatatabl G created Sat, 21 Jan 2006 01:09:11 GMT Wdatatabl G V V created Sun, 05 Feb 2006 05:37:42 GMT Wdatatabl G '' created Sat, 21 Jan 2006 04:51:11 GMT Wdatatabl G =,=, created Sun, 22 Jan 2006 18:46:20 GMT Wdatatabl G ;w;w created Sun, 22 Jan 2006 18:39:03 GMT Wdatatabl G xx created Mon, 17 Oct 2005 13:06:32 GMT Wdatatabl G xx created Mon, 17 Oct 2005 13:06:37 GMT Wdatatabl G zz created Tue, 18 Oct 2005 19:36:01 GMT Wdatatabl G 11 created Mon, 23 Jan 2006 12:09:27 GMT Wdatatabl G zz created Tue, 18 Oct 2005 18:35:54 GMT Wdatatabl G ~~ created Fri, 21 Oct 2005 18:25:32 GMT Wdatatabl G jIjI created Fri, 10 Feb 2006 02:53:13 GMT Wdatatabl G created Fri, 30 Dec 2005 22:03:37 GMT Wdatatabl G jj created Fri, 10 Feb 2006 02:54:14 GMT Wdatatabl G ¿ created Sat, 21 Jan 2006 03:20:50 GMT Wdatatabl G 1)1) created Mon, 23 Jan 2006 12:07:21 GMT Wdatatabl G 11 created Mon, 23 Jan 2006 12:10:29 GMT Wdatatabl G 11 created Mon, 23 Jan 2006 12:10:46 GMT Wdatatabl G uu created Tue, 08 Nov 2005 17:03:49 GMT Wdatatabl G 3p3p created Sat, 21 Jan 2006 05:40:16 GMT Wdatatabl G 0.0. created Sat, 21 Jan 2006 05:26:22 GMT Wdatatabl G 0U0U created Sat, 21 Jan 2006 05:27:01 GMT Wdatatabl G 3G3G created Sat, 21 Jan 2006 05:39:35 GMT Wdatatabl G 0}0} created Sat, 21 Jan 2006 05:27:41 GMT Wdatatabl G 3]3] created Sat, 21 Jan 2006 05:39:57 GMT Wdatatabl G 0}0} created Sat, 21 Jan 2006 05:27:41 GMT Wdatatabl G