rwdgutenberg 0.03

data/extras/zip/ziprequire.rb

@@ -0,0 +1,61 @@
+require 'zip/zip'
+
+class ZipList
+  def initialize(zipFileList)
+      @zipFileList = zipFileList
+  end
+
+  def get_input_stream(entry, &aProc)
+    @zipFileList.each {
+      |zfName|
+      Zip::ZipFile.open(zfName) {
+	|zf|
+	begin
+	  return zf.get_input_stream(entry, &aProc) 
+	rescue Errno::ENOENT
+	end
+      }
+    }
+    raise Errno::ENOENT,
+      "No matching entry found in zip files '#{@zipFileList.join(', ')}' "+
+      " for '#{entry}'"
+  end
+end
+
+
+module Kernel
+  alias :oldRequire :require
+
+  def require(moduleName)
+    zip_require(moduleName) || oldRequire(moduleName)
+  end
+
+  def zip_require(moduleName)
+    return false if already_loaded?(moduleName)
+    get_resource(ensure_rb_extension(moduleName)) { 
+      |zis| 
+      eval(zis.read); $" << moduleName 
+    }
+    return true
+  rescue Errno::ENOENT => ex
+    return false
+  end
+
+  def get_resource(resourceName, &aProc)
+    zl = ZipList.new($:.grep(/\.zip$/))
+    zl.get_input_stream(resourceName, &aProc)
+  end
+
+  def already_loaded?(moduleName)
+    moduleRE = Regexp.new("^"+moduleName+"(\.rb|\.so|\.dll|\.o)?$")
+    $".detect { |e| e =~ moduleRE } != nil
+  end
+
+  def ensure_rb_extension(aString)
+    aString.sub(/(\.rb)?$/i, ".rb")
+  end
+end
+
+# Copyright (C) 2002 Thomas Sondergaard
+# rubyzip is free software; you can redistribute it and/or
+# modify it under the terms of the ruby license.

data/gui/00coreguibegin/applicationguitop.rwd

@@ -0,0 +1,4 @@
+$rwdguivar=
+"<application>
+  <window name=\"main\" title=\"RwdGutenberg - Tinker & RubyWebDialogs\">
+<tabs>"

data/gui/frontwindow0/superant.com.gutenberg/10viewnote.rwd

@@ -0,0 +1,32 @@
+$rwdguivar=  
+	"
+		<tab name=\"superantcomgutenbergfile\" caption=\"View/Edit Booklist\">
+
+    <table>
+    <row>View your book list and detail on this Tab</row>
+     <row> <p> </row> 
+      <row> <p align=\"right\">Book Record:</p>  <text size=70 name=\"a_viewgutenberg\"/> </row>
+
+    </table>
+      <horizontal>
+      <button caption=\"Open Detail\" action=\"rwdgutenloadbookrecord\"/>
+    
+    <button caption=\"Create book Note\" action=\"rwdgutenbergcreatebookrecord\"/>
+       <button caption=\"Save Changes\" action=\"savegutenbergrecord\"/>
+    
+      
+       <button caption=\"Clear\" action=\"clearbookscreendisplay\"/>
+     <button caption=\"Help\" action=\"runhelpwindowrwdgutenberg\"/>
+      
+    </horizontal>
+<textarea  name=\"a_gutenbergdata\"/> 
+    
+      <horizontal>
+      <button caption=\"List Booklists\" action=\"listgutrecordfiles\"/>
+        
+      
+           
+    </horizontal>
+    <p>%%noterecordsresult%%</p>
+     <p>%%gutenbergrecordsresult%%</p>
+	</tab>"

data/gui/frontwindow0/superant.com.gutenberg/20listfiles.rwd

@@ -0,0 +1,35 @@
+$rwdguivar=  
+	"
+	
+	<tab name=\"rwdgutenberglistfiles\" caption=\"List Files\">
+
+    <table>
+    <row>List text files</row>
+     <row> <p> </row>     
+     <row> <p align=\"right\">Directory to search:</p>
+     <text size=70 name=\"a_searchdirectorygutenberg\"/> </row>
+<row> <p> </row>      
+     <row> <p align=\"right\">New File:</p> 
+     <text size=70 name=\"a_newfilegutenberg\"/> </row>
+<row> <p align=\"right\">Name of File to Create:</p> 
+     <text size=70 name=\"a_newgutenbergdata\"/> </row>
+    </table>
+      <horizontal>
+    
+       <button caption=\"Create New File\" action=\"gutenbergcreatefile\"/>
+           
+      
+           <button caption=\"Help\" action=\"runhelpwindowrwdgutenberg\"/>
+      
+    </horizontal>
+
+    
+      <horizontal>
+      <button caption=\"List Text Files\" action=\"rwdgutenbergfiles\"/>
+      
+           
+    </horizontal>
+
+   
+    <p>%%textsfilesrecordsresult%%</p>
+	</tab>"

data/gui/frontwindow0/superant.com.gutenberg/30booklistutilities.rwd

@@ -0,0 +1,28 @@
+$rwdguivar=
+"  
+ <tab name=\"utilitiesrwdgutenberg\" caption=\"Booklist Utilities\">
+
+    <table>
+      <row> <p align=\"right\">Booklist Title:</p>  <text size=70 name=\"a_viewgutenberg\"/> </row>
+      <row> <p align=\"right\">New Name:</p>  <text size=70 name=\"a_changegutenbergdata\"/> </row>
+
+    </table>
+   
+      <horizontal>
+      <button caption=\"Rename Book\" action=\"changegutenbergdata\"/>
+           <button caption=\"Copy Filename into New Booklist\" action=\"copygutenbergfilename\"/>
+      <button caption=\"Delete Booklist\" action=\"deletegutenbergrecord\"/>
+      <button caption=\"Help\" action=\"runhelpwindowrwdgutenberg\"/>
+          </horizontal>
+
+ <p>%%hypernotefilechangeresult%%</p>
+          <horizontal>
+  
+
+      <button caption=\"List Booklists\" action=\"listgutrecordfiles\"/>
+      
+           
+    </horizontal>
+    <p>%%gutenbergrecordsresult%%</p>
+    <p>%%gutenbergfilechangeresult%%</p>
+	</tab>"

data/gui/frontwindow0/superant.com.gutenberg/35displaytab.rwd

@@ -0,0 +1,10 @@
+$rwdguivar=
+"
+  <tab name=\"gutendisplaytab\" caption=\"Book Display\" >
+
+    <p>%gutendisplayvariable%</p>
+  
+
+   <button caption=\'read forward\' action=\'rwdgutenbergwindowtwo\'/>
+  </tab>"
+

data/gui/frontwindow0/superant.com.gutenberg/40rwdgutenberg.rwd

@@ -0,0 +1,16 @@
+$rwdguivar=
+"
+  <tab name=\"rwdgutenberg\" caption=\"Gutenberg Display\">
+<table>
+<horizontal>
+ Open a replacement window for
+ Book Record:  <text size=30 name=\"a_viewgutenberg\"/>
+</horizontal>
+<row><p> You should see that new window refresh every 15 seconds with </row>
+<row><p> You can return to this screen by clicking on back arrows or the cancel button</row>
+
+
+</table>
+    <button caption=\'Start Book\' action=\'rungutenbergwindow\'/>
+  </tab>"
+

data/gui/frontwindow0/superant.com.gutenberg/67viewconfiguration.rwd

@@ -0,0 +1,40 @@
+$rwdguivar=
+"
+ <tab name=\"viewrwdgutenbergconfiguration\" caption=\"RwdGutenberg Configuration\">
+
+
+	
+ <table>
+ <row> <p> </row>
+ <row> <p align=\"right\">You can view or edit the  configuration file here</row>
+ <row> <p> </row>
+ <horizontal>
+      <button caption=\"Fill Record\" action=\"loadrwdgutenbergconfiguration\"/>
+      <button caption=\"Save Changes\" action=\"saverwdgutenbergconfiguration\"/>
+     <button caption=\"Reload Variables\" action=\"loadrwdgutebergconfigurationvariables\"/>
+       <button caption=\"Help\" action=\"runhelpwindowrwdgutenberg\"/>
+    </horizontal>
+   <table>
+
+      <row> <p align=\"right\">FileName:</p>  <text name=\"a_gutenconfigurationfilename\"/> </row>
+      <row> <p align=\"right\">1:</p>  <text size=70 name=\"a_gutenconfigline1\"/> </row>
+      <row> <p align=\"right\">2:</p>  <text size=70 name=\"a_gutenconfigline2\"/> </row>
+      <row> <p align=\"right\">3:</p>  <text size=70 name=\"a_gutenconfigline3\"/> </row>
+      <row> <p align=\"right\">4:</p>  <text size=70 name=\"a_gutenconfigline4\"/> </row>
+      <row> <p align=\"right\">5:</p>  <text size=70 name=\"a_gutenconfigline5\"/> </row>
+      <row> <p align=\"right\">6:</p>  <text size=70 name=\"a_gutenconfigline6\"/> </row>
+      <row> <p align=\"right\">7:</p>  <text size=70 name=\"a_gutenconfigline7\"/> </row>
+      <row> <p align=\"right\">8:</p>  <text size=70 name=\"a_gutenconfigline8\"/> </row>
+      <row> <p align=\"right\">9:</p>  <text size=70 name=\"a_gutenconfigline9\"/> </row>
+      <row> <p align=\"right\">10:</p>  <text size=70 name=\"a_gutenconfigline10\"/> </row>
+      <row> <p align=\"right\">11:</p>  <text size=70 name=\"a_gutenconfigline11\"/> </row>
+     
+    </table>
+    <p>%extragutenconfigdatadisplay%</p>
+    <p>
+    <p>%newgutenconfigurationresult%</p>
+     
+      
+
+	</tab>"
+

data/gui/frontwindowselectionbegin/selectiontabbegin/selectiontabbegin.rwd

@@ -0,0 +1,16 @@
+$rwdguivar=
+"	
+      <tab name=\"selectiontab\" caption=#{Message[:selection_panel]}>
+
+      <table>
+      <row> <p align=\"right\">Open a new window with callable applets you have loaded</row>
+
+     </table>
+      <horizontal>
+      
+      <button caption=#{Message[:rwdtinker_help_window]} action=\"runhelpwindow\"/>
+      
+      
+     </horizontal>"
+
+

data/gui/frontwindowselections/superant.com.rwdtinkerwin2selectiontab/rwdwin2selectiontab.rwd

@@ -0,0 +1,12 @@
+$rwdguivar=
+"	
+     <row> <p></row>
+
+      <horizontal>
+      
+      <button caption=#{Message[:rwdtinker_back_window]} action=\"runrwdtinkerbackwindow\"/>
+      
+      
+    </horizontal>"
+
+

data/gui/frontwindowselectionzend/viewselectionzend/viewselectionend.rwd

@@ -0,0 +1,3 @@
+$rwdguivar=
+"
+	</tab>"

data/gui/frontwindowtdocumentbegin/superant.com.documentsbegin/tt0documentbegin.rwd

@@ -0,0 +1,6 @@
+$rwdguivar=
+"
+  <tab name=\"documentsrwdtinkerone\" caption=#{Message[:documents]}>
+    <horizontal>
+    <table>"
+	

data/gui/frontwindowtdocuments/superant.com,rwdgutenbergdocument/rwdgutenbergdocument.rwd

@@ -0,0 +1,5 @@
+$rwdguivar=
+"      
+      <row> <p align=\"left\"> 
+         <a href=HowTo_Gutenberg.txt>HowTo_Gutenberg.txt</a></p></row>"
+      

data/gui/frontwindowtdocuments/superant.com.documents/uu5documents.rwd

@@ -0,0 +1,15 @@
+$rwdguivar=
+"
+      <row> <p align=\"left\"> 
+      <a href=HowTo_Tinker.txt>Howto_Tinker.txt</a></p></row>
+      <row> <p align=\"left\"> 
+      <a href=Readme.txt>Readme.txt</a></p></row>
+      <row> <p align=\"left\"> 
+      <a href=COPYING>GPL License </a></p></row>
+      <row> <p align=\"left\"> 
+      <a href=rwdapplications.html>more information about rwdapplications </a></p></row>
+      <row> <p align=\"left\"> 
+      <a href=rwdindex.html>Link to online information about RubyWebdialogs </a></p></row>"
+      
+     
+	

data/gui/frontwindowtdocuments/superant.com.tinkerwin2documents/uu5documents.rwd

@@ -0,0 +1,6 @@
+$rwdguivar=
+"
+      <row> <p align=\"left\"> 
+      <a href=HowTo_TinkerWin2.txt>Howto_TinkerWin2.txt</a></p></row>"
+     
+	

data/gui/frontwindowtdocumentzend/superant.com.documentsend/ww0documentend.rwd

@@ -0,0 +1,12 @@
+$rwdguivar=
+"     
+ <row> <p align=\"left\"><a href=.>Spawn a clone Dialog window</a></p></row>
+    </table>
+        </horizontal>
+         <horizontal>
+       
+      <button caption=\"Help\" action=\"runhelpwindow\"/>
+      
+    </horizontal>
+	</tab>"
+	

data/gui/frontwindowz1end/frontwindowend/xx0rwdfirsttab.rwd

@@ -0,0 +1,6 @@
+$rwdguivar=
+"
+</tabs>
+</window>"
+
+

data/gui/helpaboutbegin/superant.com.helpaboutbegin/ya0helpscreenstart.rwd

@@ -0,0 +1,3 @@
+$rwdguivar=
+"
+<helpwindow name=\"main\" title=\"Help About\">"

data/gui/helpaboutinstalled/superant.com.rwdgutenberghelpabout/1versionname.rwd

@@ -0,0 +1,6 @@
+$rwdguivar=
+"
+<panel>
+ <row> <p align=\"center\">rwdgutenberg</p></row>
+ 
+ <row> <p align=\"center\">copyright s. gibson 2005</p></row>"

data/gui/helpaboutinstalled/superant.com.rwdgutenberghelpabout/5version.rwd

@@ -0,0 +1,9 @@
+$rwdguivar=
+"
+      <horizontal>
+       <button caption=\"Click for Version\" action=\"runrwdgutenbergversion\"/>
+    </horizontal>
+          
+</panel>"
+
+

data/gui/helpaboutinstalled/superant.com.rwdwin2helpabout/1appname.rwd

@@ -0,0 +1,4 @@
+$rwdguivar=
+"
+<panel>
+ <row> <p align=\"center\">#{Message[:rwdtinker_window_2]}</p></row>"

data/gui/helpaboutinstalled/superant.com.rwdwin2helpabout/3copyright.rwd

@@ -0,0 +1,3 @@
+$rwdguivar=
+"
+ <row> <p align=\"center\">copyright s. gibson 2004</p></row>"

data/gui/helpaboutinstalled/superant.com.rwdwin2helpabout/5version.rwd

@@ -0,0 +1,10 @@
+$rwdguivar=
+"
+      <horizontal>
+       <button caption=#{Message[:clickfor_version]} action=\"runrwdtinkerwin2version\"/>
+    </horizontal>
+          <p>%rwdtinkerwin2versiondisplay%</p>
+
+</panel>"
+
+

data/gui/helpaboutinstalled/superant.com.tinkerhelpabout/1appname.rwd

@@ -0,0 +1,4 @@
+$rwdguivar=
+"
+<panel>
+ <row> <p align=\"center\">#{Message[:rwdtinker]}</p></row>"

data/gui/helpaboutinstalled/superant.com.tinkerhelpabout/3copyright.rwd

@@ -0,0 +1,3 @@
+$rwdguivar=
+"
+ <row> <p align=\"center\">copyright s. gibson 2004</p></row>"

data/gui/helpaboutinstalled/superant.com.tinkerhelpabout/5version.rwd

@@ -0,0 +1,10 @@
+$rwdguivar=
+"
+      <horizontal>
+       <button caption=#{Message[:clickfor_version]} action=\"runrwdtinkerversion\"/>
+    </horizontal>
+</panel>"
+
+
+
+

data/gui/helpaboutzend/superant.com.helpaboutend/helpscreenend.rwd

@@ -0,0 +1,3 @@
+$rwdguivar=
+"
+</helpwindow>"

data/gui/tinkerbackwindows/superant.com.gutendisplay/gutendisplaywindow.rwd

@@ -0,0 +1,9 @@
+$rwdguivar=
+"
+  <window name=\"gutendisplaywindowtwo\" title=\"Book Display\" refresh=#{BookViewDisplay}>
+    <small>
+    <p>%gutendisplayvariable%</p>
+    </small>   
+   <cancel/>
+  </window>"
+

data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/1appname.rwd

@@ -0,0 +1,5 @@
+$rwdguivar=
+"
+<window name = \"tinkerbackwindow\" title=\"Tinker Back Window\">
+
+<tabs>"

data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/40rwdlistzips.rwd

@@ -0,0 +1,42 @@
+$rwdguivar=
+"
+	<tab name=\"rwdzipslister\" caption=\"List Zips\">
+
+    <table>
+      <row> <p align=\"right\">File Name:</p>  <text size=70 name=\"a_installapplet\"/> </row>
+
+    </table>
+     
+
+      <horizontal>
+
+
+<button caption=\"install (rwdtinker) applet\" action=\"installgemapplet\"/>
+      <button caption=\"Help\" action=\"runhelpwindowtinkerwin2\"/>
+      
+    </horizontal>
+    <p>%installapplettext%</p>
+
+ <horizontal>
+      
+       <button caption=\"view (rwdtinker) applet contents\" action=\"viewgemappletcontents\"/>
+    </horizontal>
+    <p>%appletcontentstext%</p>
+    <table>
+      <row> <p align=\"right\">Click below to view the list of zip files </row>
+      
+    </table>
+
+    <horizontal>
+       <button caption=\"List (zip directory) applets available for installing\" action=\"listzipfilestoinstall\"/>
+      
+     <button caption=\"List applets (in the GEM Directory) available for installing\" action=\"listgemzips\"/>
+      
+    </horizontal>
+
+    <p>%%zipslistresult%%</p>
+
+	</tab>"
+
+
+