rwdaddresses 1.04 → 1.05

data/code/superant.com.rwdtinkerbackwindow/installgemapplet.rb

@@ -1,7 +1,7 @@
 # install rwdtinker applet from a long directory location 
 def installgemapplet
 	require 'fileutils'
-	require 'extras/zip/zip'
+	require 'lib/zip/zip'
 	nametext = "%s" % [@a_installapplet]
 
 	begin # exception trapped block
@@ -12,10 +12,23 @@ def installgemapplet
 			|entry|
 			zf.extract(entry.to_s, entry.to_s)
 		}
-		@installapplettext = Message[:applet_installed]  
-
-	rescue
-		@installapplettext = "unzip error - applet may not be installed correctly"
+		
+		rescue
+		
+	if $DEBUG
+	$stderr.puts "unzip error - applet may not be installed correctly"
+       end
+        @installapplettext = " .. "
+	
 	end # exception rescue
+	
+		@nametextbase = File.basename(nametext)
+		@returninitateresults = initiateapplet(@nametextbase)
+		@installapplettext = Message[:applet_installed] + " " +   @returninitateresults 
+
+				
+       RWDWindow.new($rwd_gui_tinker, @rwd_window).render("DEFAULT")
+
+	
 end
 

data/code/superant.com.rwdtinkerbackwindow/listgemzips.rb

@@ -13,7 +13,7 @@ def findzipfiles(d)
 		if(!test(?d,x))
 			# only zip files
 			if x =~ /\.zip/
-				puts "#{x}"        #opens the file thats in fileName as read only
+				    #opens the file thats in fileName as read only
 				$zipsarray =  $zipsarray | ["#{x}"] 
 			end
 		end

data/code/superant.com.rwdtinkerbackwindow/listzips.rb

@@ -16,7 +16,7 @@ def  listzipfilestoinstall
 	a.each do |x|
 		# only zip files
 		if x =~ /\.zip/
-			#  puts "#{x}"        #adds the file to the array to display on the screen
+			        #adds the file to the array to display on the screen
 			$zipsarraylocal =  $zipsarraylocal | ["#{x}"] 
 		end
 

data/code/superant.com.rwdtinkerbackwindow/loadconfigurationrecord.rb

@@ -12,18 +12,7 @@ def loadconfigurationrecord
 		fileName = File.join(ConfigurationDir, TinkerWin2ConfigurationFileName)
 
 		fd = File.open(fileName,"r")
-		@a_configline1=        fd.readline.chomp
-		@a_configline2 =  fd.readline.chomp
-		@a_configline3 = fd.readline.chomp
-		@a_configline4 = fd.readline.chomp
-		@a_configline5 = fd.readline.chomp
-		@a_configline6 = fd.readline.chomp 
-		@a_configline7 =fd.readline.chomp
-		@a_configline8 = fd.readline.chomp
-
-		while ! fd.eof?
-			@extraconfigdatadisplay = fd.readline
-		end
+		@a_configurationfile =        fd.read
 		fd.close
 	rescue SystemCallError, StandardError
 		$stderr.print "system call error: " + $!

data/code/superant.com.rwdtinkerbackwindow/openhelpwindowtinkerwin2.rb

@@ -18,11 +18,7 @@ def runhelpwindowtinkerwin2
 	end
 	if @rwd_tab == "editconfigurationfile"
 		$help_topic = "applet_tinkerbackeditconfiguration"
-
-	end
-	if @rwd_tab == "rwdremotecontrol"
-		$help_topic = "remote_control"
-
+	
 	end
 	if @rwd_tab == "superantcomremotezipsinstall"
 		$help_topic = "remotegemapplet_install"

data/code/superant.com.rwdtinkerbackwindow/removeapplet.rb

@@ -3,8 +3,17 @@ def removeapplet
 	require 'fileutils'
 	nametext = "%s" % [@a_removeapplet]
 
+       fileName = "installed/" + nametext + ".inf"
+       @appletremoveresult = removeappletvariables(nametext)
+       
+       setuphelpaboutoptions # update the help about list
+       setuptinkerdocuments # update the document pull down list
+       runhelpwindow   # update the help menu
+        showjumplinkoptions # update the application link menu
+	runrwdtinkerbackwindow # back to applet window
+
 	begin # exception trapped block
-		fileName = "installed/" + nametext + ".inf"
+		
 		count =  0
 		fd = File.open(fileName,"r") 
 
@@ -19,14 +28,18 @@ def removeapplet
 			count = 1
 		}
 		fd.close
+ 
+           
 
 		FileUtils.rm_rf( fileName)
-
-
-		@removeapplettext = "applet files removed! - restart rwd to finish uninstalling"    
-
+		
+		  
+		@removeapplettext = "applet files removed!" + " " + @appletremoveresult
+             
+             runbackwindowappletremove
+             
 	rescue
-		@removeapplettext = "\n" + "error"
+		@removeapplettext = " removeapplet" + "  .."
 
 	end # exception rescue
 

data/code/superant.com.rwdtinkerbackwindow/removeappletvariables.rb

@@ -0,0 +1,52 @@
+
+#***********************************************************************
+#* Rwd/Tinker -- A Ruby program for the RudyWebDialog.
+#* Copyright (c) 2004 - 2005 by Steven Gibson. All Rights Reserved.
+#*
+#* This library is free software; you can redistribute it and/or
+#* modify it under the terms of the GNU General Public
+#* License as published by the Free Software Foundation; either
+#* .
+#*
+#* These files are distributed in the hope that they will be useful,
+#* but WITHOUT ANY WARRANTY; without even the implied warranty of
+#* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+#* General Public License for more details.
+#*
+#* You should have received a copy of the GNU General Public
+#* License along with these files; if not, write to the Free Software
+#* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#*
+#* For further information please contact the author by e-mail
+#* at "steven@superant.com".
+#***********************************************************************/
+
+def removeappletvariables(tempremovename)
+	
+ 	 begin # exception trapped block
+	 if $DEBUG
+	$stderr.puts "in removeappletvariables"
+	end
+	 # removefileinf = File.open(tempremove){|f| f.read}
+	 
+        temp = tempremovename.gsub("-","_")
+        removemethod =  temp.gsub(".","_")
+       
+          
+        send "#{removemethod}"
+	
+	tmpremoveapplet = " successfull applet variable removal "
+	
+ 	 rescue
+ 	
+		tmpremoveapplet =  " removeappletvariables .."
+
+	 end # exception rescue
+  
+      return  tmpremoveapplet
+      
+    end
+
+
+  
+  

data/code/superant.com.rwdtinkerbackwindow/runrwdtinkerbackwindow.rb

@@ -9,3 +9,7 @@ def runrwdtinkerbackwindow
 	@rwd_tab = "rwdzipslister"
 end   
 
+def runbackwindowappletremove
+	@rwd_window = "tinkerbackwindow"
+	@rwd_tab = "filelister"
+end   

data/code/superant.com.rwdtinkerbackwindow/saveconfigurationrecord.rb

@@ -3,9 +3,9 @@ def saveconfigurationrecord
 	require 'fileutils'
 	if @a_configurationfilename
 		newname = "%s" %   [@a_configurationfilename] # grab the filename to create
-		newdata =@a_configline1.to_s + "\n" + @a_configline2.to_s + "\n" + @a_configline3.to_s + "\n" + @a_configline4.to_s + "\n" + @a_configline5.to_s + "\n" + @a_configline6.to_s + "\n" + @a_configline7.to_s + "\n" + @a_configline8.to_s + "\n"
+		newdata =@a_configurationfile
 
-		begin # exception trapped block
+          begin # exception trapped block
 			fileName = File.join( ConfigurationDir, newname )
 			fd = File.open(fileName,"w")
 			fd.print(newdata) # save the record info to the file

data/code/superant.com.rwdtinkerbackwindow/viewappletcontents.rb

@@ -1,7 +1,7 @@
 #view contents of a tinker applet
 def viewappletcontents
 	require 'fileutils'
-	require 'extras/zip/zip'
+	require 'lib/zip/zip'
 	nametext = "%s" % [@a_installapplet]
 
 	begin # exception trapped block

data/code/superant.com.rwdtinkerbackwindow/viewgemappletcontents.rb

@@ -1,7 +1,7 @@
 #view gem info
 def viewgemappletcontents
 	require 'fileutils'
-	require 'extras/zip/zip'
+	require 'lib/zip/zip'
 	nametext = "%s" % [@a_installapplet]
 
 	begin # exception trapped block

data/configuration/language.dist

@@ -1,7 +1,8 @@
-##VERSION:1.62
+##VERSION:1.69
 #language selection file
 ##NAME:$lang:0
 #$lang = "jp"
 $lang= "en"
 #$lang= "nl"
 #$lang= "es"
+#$lang= "fr"

data/configuration/rwdapplicationidentity.dist

@@ -1,3 +1,3 @@
-##VERSION:1.63
-$rwdapplicationidentity = "rwdaddresses - Contact Book"
+##VERSION:1.69
+$rwdapplicationidentity = "rwdtinker main application"
 

data/configuration/rwdtinker.dist

@@ -1,4 +1,4 @@
-##VERSION:1.68
+##VERSION:1.76
 ConfigurationDir = "configuration" # for use in program - init.rb has this value without using this constant
 CodeName = "rwdtinker"
 CodeNameFile = CodeName + ".rb"
@@ -9,7 +9,10 @@ LangDir = "lang"
   $help_topic = "general_help"
    $helptopicsarray = [ "general_help","network_help"]
   $prevouswindow ="main" 
-   $rwdcontrolports =["13713","13714","13715","13716","13717","13718"]
+   $rwdcontrolports =["13713","13714","13715","13716","13717","13718"]   # remote control code not actived 2007
  $port = 7705
 $rwdjumplink = ["helpscreen","tinkerbackwindow","returntomain","opendocuments","editconfiguration"]
-RwdTinkerVersion = "1.68"
+Browser_Exe = 'mozilla '
+$tinkerdocumentsarray +=["HowTo_Tinker.txt","rwdapplications.html","RubyWebDialogs.html"]
+RwdTinkerVersion = "1.76"
+

data/configuration/{rwdaddresses.dist → rwdwaddresses-1.05.dist}

@@ -1,4 +1,4 @@
-##VERSION:1.04
+##VERSION:1.05
 #rwdaddresses contact book
 $photodelay = 1
 ##NAME:$addressfiles_directory:0
@@ -15,5 +15,9 @@ $rwdaddresses_ftppassword = "mypassword"
 $rwdaddresses_ftpdirectory = "/incoming/rwdnames/"
 ##NAME:$rwdaddresses_updatedirectory:0
 $rwdaddresses_updatedirectory = "updates"
+$tinkerdocumentsarray += ["HowTo_Addresses.txt"]
+$tinkerhelpaboutarray += ["RwdAddresses"]
 $testharnessarray += ["rwdaddresses_all_tests"]
-RwdAddressesVersion = "1.04"
+JumpLink.update(:RwdAddressesBackWindow=>"runrwdaddressesbackwindow",  :ContactUtilitiesTab=>"runrwdaddressesmenu3", :AddressesTab=>"runrwdaddresseswindow")
+$rwdjumplink +=["RwdAddressesBackWindow","ContactUtilitiesTab","AddressesTab"]
+RwdAddressesVersion = "1.05"

data/configuration/tinkerwin2variables.dist

@@ -1,4 +1,4 @@
-##VERSION:1.63
+##VERSION:1.69
 TinkerWin2ConfigurationFileName = "tinkerwin2variables.cnf" # this file name - do not change
 ##NAME:$zipslocation:0
 $zipslocation = "zips" # location of applets to add

data/gui/00coreguibegin/applicationguitop.rwd

@@ -1,4 +1,4 @@
 $rwdguivar=
 "<application>
-  <window name=\"main\" title=\"RwdAddresses - RubyWebDialogs\">
+  <window name=\"main\" title=\"RwdAddresses - Webdialogs for Ruby\">
 <tabs>"

data/gui/frontwindow0/cc0openphoto.rwd

@@ -0,0 +1,22 @@
+$rwdguivar=  
+	
+"	
+	<tab name=\"viewtinkerlogo\" caption=\"Tinker\">
+
+    <table>
+      <row> <p align=\"right\">#{Message[:tinker_logo]}</row>
+
+    </table>
+    <image src=\"tinker.png\"> </image>
+    <table>
+      <row> <p></row>
+
+    </table>
+      <horizontal>
+      
+      <button caption=#{Message[:help]} action=\"runhelpwindow\"/>
+      
+      
+     </horizontal>
+
+	</tab>"

data/gui/{frontwindowselectionbegin/selectiontabbegin/selectiontabbegin.rwd → frontwindowselections/00selectiontabbegin.rwd}

@@ -1,6 +1,6 @@
 $rwdguivar=
 "	
-      <tab name=\"selectiontab\" caption=#{Message[:selection_panel]}>
+      <tab name=\"selectiontab\" caption=#{Message[:menu_panel]}>
 
       <table>
       <row> <p align=\"right\">Open a new location </row>

data/gui/frontwindowselections/jumplinkcommands.rwd

@@ -0,0 +1,15 @@
+$rwdguivar=
+"
+<horizontal>
+<button caption=#{Message[:showjump_links]} action=\"showjumplinkoptions\"/>
+<button caption=#{Message[:help]} action=\"runhelpwindowtinkerwin2\"/>
+</horizontal>
+ <table>
+      <select name=\"a_jumplinkinput\">  %%jumplinkoptions%% </select>
+
+   </table>
+
+      <horizontal>
+      <button caption=#{Message[:jumptoapplication_location]} action=\"runjumplinkcommand\"/>
+    </horizontal>
+"

data/gui/frontwindowtdocuments/tinkerdocuments.rwd

@@ -0,0 +1,14 @@
+$rwdguivar=
+"
+<horizontal>
+<button caption=#{Message[:showdocument_list]} action=\"setuptinkerdocuments\"/>
+
+</horizontal>
+ <table>
+      <select name=\"a_tinkerdocumentinput\">  %%tinkerdocumentsarray%% </select>
+
+   </table>
+<horizontal>
+      <button caption=#{Message[:open_document]} action=\"runopentinkerdocument\"/>
+  </horizontal>
+"

data/gui/frontwindowtdocuments/zzdocumentend.rwd

@@ -0,0 +1,8 @@
+$rwdguivar=
+"     
+<horizontal>       
+      <button caption=#{Message[:help]} action=\"runhelpwindow\"/>
+      
+    </horizontal>
+	</tab>"
+	

data/gui/helpaboutbegin/zzzzhelpscreenstart.rwd

@@ -0,0 +1,3 @@
+$rwdguivar=
+"
+<helpwindow name=\"main\" title=#{Message[:help_about]}>"

data/gui/helpaboutbegin/zzzzzzhelpabouttab.rwd

@@ -0,0 +1,15 @@
+$rwdguivar=
+"
+<horizontal>
+<button caption=#{Message[:showhelpabout_links]} action=\"setuphelpaboutoptions\"/>
+
+</horizontal>
+ <table>
+      <select name=\"a_helpaboutinput\">  %%helpaboutoptions%% </select>
+
+   </table>
+
+      <horizontal>
+      <button caption=#{Message[:openselectedhelp_about]} action=\"runrwdtinkerversion\"/>
+    </horizontal>
+"

data/gui/helpaboutzend/zhelpscreenstart2.rwd

@@ -0,0 +1,3 @@
+$rwdguivar=
+"
+<helpwindow name=\"tinkerbackwindow\" title=#{Message[:help_about]}>"

data/gui/helpaboutzend/zzzzhelpabout2.rwd

@@ -0,0 +1,15 @@
+$rwdguivar=
+"
+<horizontal>
+<button caption=#{Message[:showhelpabout_links]} action=\"setuphelpaboutoptions\"/>
+
+</horizontal>
+ <table>
+      <select name=\"a_helpaboutinput\">  %%helpaboutoptions%% </select>
+
+   </table>
+
+      <horizontal>
+      <button caption=#{Message[:openselectedhelp_about]} action=\"runrwdtinkerversion\"/>
+    </horizontal>
+"

data/gui/helpaboutzend/zzzzhelpscreen2end.rwd

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