rwdmovies 0.93 → 0.94

data/code/superant.com.rwdmovies/gl7clearscreendisplay.rb

@@ -1,15 +1,12 @@
-   # this method clears the on screen variables
-   def clearmoviescreendisplay
- 
-        @a_moviefilename = ""
-     @a_moviename =        ""
-	      @a_moviedirector =  ""
-        @a_movieactors = ""
-          @a_movieyear =  ""
-        @a_moviestudio = ""
-         @a_moviecomment1 = "" 
-          @a_moviecomment2 =""
-          @a_moviecomment3 = ""
-
-
-  end
+# this method clears the on screen variables
+def clearmoviescreendisplay
+	@a_moviefilename = ""
+	@a_moviename =        ""
+	@a_moviedirector =  ""
+	@a_movieactors = ""
+	@a_movieyear =  ""
+	@a_moviestudio = ""
+	@a_moviecomment1 = "" 
+	@a_moviecomment2 =""
+	@a_moviecomment3 = ""
+end

data/code/superant.com.rwdmovies/listmoviefiles.rb

@@ -1,19 +1,15 @@
 # this code is to list the movie names
 def listmovierecordfiles
- begin
-  fileList      = Dir.new($rwdmovies_directory).entries.sort.delete_if { |x| ! (x =~ /nam$/) }
-  @moviefilelistresult  = fileList.rwd_method("fillrwdmovierecordname")
-  rescue
-   @moviefilelistresult = "file error"
-   end
+	begin
+		fileList      = Dir.new($rwdmovies_directory).entries.sort.delete_if { |x| ! (x =~ /nam$/) }
+		@moviefilelistresult  = fileList.rwd_method("fillrwdmovierecordname")
+	rescue
+		@moviefilelistresult = "file error"
+	end
 end
- 
+
 def fillrwdmovierecordname(inffile)
-  applet                = inffile.gsub(/\.nam$/, "")
-  @a_moviefilename = applet
-  @a_moviedisplay       = applet
+	applet                = inffile.gsub(/\.nam$/, "")
+	@a_moviefilename = applet
+	@a_moviedisplay       = applet
 end
-
-
-
-

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

@@ -1,34 +1,29 @@
-   # this method puts the configuration record on the screen
-  def loadrwdmoviesconfiguration
- 
-         require 'fileutils'
-          
-               @a_movconfigurationfilename = "rwdmovies.cnf" 
-        
-	      
-        begin # exception trapped block
-       
-       Dir.chdir($progdir)
-	      fileName = File.join(ConfigurationDir, "rwdmovies.cnf")
-        
-        
-	      fd = File.open(fileName,"r")
-	      @a_movconfigline1=        fd.readline.chomp
-	      @a_movconfigline2 =  fd.readline.chomp
-        @a_movconfigline3 = fd.readline.chomp
-          @a_movconfigline4 = fd.readline.chomp
-        @a_movconfigline5 = fd.readline.chomp
-         @a_movconfigline6 = fd.readline.chomp 
-          @a_movconfigline7 =fd.readline.chomp
-          @a_movconfigline8 = fd.readline.chomp
-           @a_movconfigline9 = fd.readline.chomp
-	 
-	      while ! fd.eof?
-	        @extramovconfigdatadisplay = fd.readline
-	      end
-        fd.close
-        rescue SystemCallError, StandardError
-            $stderr.print "system call error: " + $!
-        end # exception rescue
+# this method puts the configuration record on the screen
+def loadrwdmoviesconfiguration
 
-  end
+	require 'fileutils'
+
+	@a_movconfigurationfilename = "rwdmovies.cnf" 
+
+	begin # exception trapped block
+		Dir.chdir($progdir)
+		fileName = File.join(ConfigurationDir, "rwdmovies.cnf")
+		fd = File.open(fileName,"r")
+		@a_movconfigline1=        fd.readline.chomp
+		@a_movconfigline2 =  fd.readline.chomp
+		@a_movconfigline3 = fd.readline.chomp
+		@a_movconfigline4 = fd.readline.chomp
+		@a_movconfigline5 = fd.readline.chomp
+		@a_movconfigline6 = fd.readline.chomp 
+		@a_movconfigline7 =fd.readline.chomp
+		@a_movconfigline8 = fd.readline.chomp
+		@a_movconfigline9 = fd.readline.chomp
+
+		while ! fd.eof?
+			@extramovconfigdatadisplay = fd.readline
+		end
+		fd.close
+	rescue SystemCallError, StandardError
+		$stderr.print "system call error: " + $!
+	end # exception rescue
+end

data/code/superant.com.rwdmovies/loadconfigurationvariables.rb

@@ -1,13 +1,13 @@
-   # this method loads the on screen variables into the running class
-   def loadrwdmoviesconfigurationvariables
-   
-   configfiletoload = File.join(ConfigurationDir,"rwdmovies.cnf")
-   begin
-    load configfiletoload
-    @extramovconfigdatadisplay = ""
-@newmovconfigurationresult = "Config Variables loaded"
-rescue
- @extramovconfigdatadisplay = ""
- @newmovconfigurationresult = "loading error"
- end
-  end
+# this method loads the on screen variables into the running class
+def loadrwdmoviesconfigurationvariables
+
+	configfiletoload = File.join(ConfigurationDir,"rwdmovies.cnf")
+	begin
+		load configfiletoload
+		@extramovconfigdatadisplay = ""
+		@newmovconfigurationresult = "Config Variables loaded"
+	rescue
+		@extramovconfigdatadisplay = ""
+		@newmovconfigurationresult = "loading error"
+	end
+end

data/code/superant.com.rwdmovies/openhelpwindowrwdmovies.rb

@@ -1,29 +1,24 @@
 # this code is to call the help window
 def runhelpwindowrwdmovies
-
-     $help_topic = "rwdmovies_generalhelp"
-   if @rwd_tab == "viewnamedata"
-     $help_topic = "rwdmovies_help"
-   end
-    if @rwd_tab == "viewrwdmoviesconfiguration"
-    $help_topic = "rwdmovies_configuration"
-    end
-    if @rwd_tab == "moviesearch"
-    $help_topic = "rwdmovies_amazonsearch"
-    end
-    if @rwd_tab == "movieutilitiesrwdmovies"
-    $help_topic = "rwdmovies_utilities"
-    end
-    
-   $helptopicsarray =  $helptopicsarray | ["rwdmovies_configuration","rwdmovies_generalhelp","rwdmovies_help","rwdmovies_utilities","rwdmovies_amazonsearch"]
-  
-   
-  
- if @rwd_window != "rwdtinkerhelpwindow"
-       $previouswindow = @rwd_window
-      $previoustab = @rwd_tab
-  end
-  runhelpwindow
+	
+	$help_topic = "rwdmovies_generalhelp"
+	if @rwd_tab == "viewnamedata"
+		$help_topic = "rwdmovies_help"
+	end
+	if @rwd_tab == "viewrwdmoviesconfiguration"
+		$help_topic = "rwdmovies_configuration"
+	end
+	if @rwd_tab == "moviesearch"
+		$help_topic = "rwdmovies_amazonsearch"
+	end
+	if @rwd_tab == "movieutilitiesrwdmovies"
+		$help_topic = "rwdmovies_utilities"
+	end
+	
+	$helptopicsarray =  $helptopicsarray | ["rwdmovies_configuration","rwdmovies_generalhelp","rwdmovies_help","rwdmovies_utilities","rwdmovies_amazonsearch"]
+	if @rwd_window != "rwdtinkerhelpwindow"
+		$previouswindow = @rwd_window
+		$previoustab = @rwd_tab
+	end
+	runhelpwindow
 end
-
-

data/code/superant.com.rwdmovies/openmoviedata.rb

@@ -1,28 +1,28 @@
 #open the record
-  def openmoviedata
-   require 'fileutils'
-   
-    $currentmovietext = "%s" % [@a_moviefilename]
-	 photoname = $currentmovietext + ".jpg"
-        begin # exception trapped block
-        path_to = File.join( "rwd_files", "moviestmp.jpg" )
-        path_from = File.join( $rwdmovies_directory, photoname )
-        if ! File.exist?(path_from)
-        path_from = File.join($rwdmovies_directory,"nophoto.jpg" )
-        end
-        if File.exist?(path_from)
-        FileUtils.cp(path_from, path_to)
-        end
-	 fileName = $rwdmovies_directory + "/" + $currentmovietext + ".nam"
-        
-	fd = File.open(fileName,"r")
-	 @moviedatadisplay = " "
-	while ! fd.eof?
-	 @moviedatadisplay = fd.read
-	 end
-	 fd.close
-        rescue SystemCallError, StandardError
-            $stderr.print "system call error: " + $!
-        end # exception rescue
-
-  end
+def openmoviedata
+	require 'fileutils'
+	
+	$currentmovietext = "%s" % [@a_moviefilename]
+	photoname = $currentmovietext + ".jpg"
+	begin # exception trapped block
+		path_to = File.join( "rwd_files", "moviestmp.jpg" )
+		path_from = File.join( $rwdmovies_directory, photoname )
+		if ! File.exist?(path_from)
+			path_from = File.join($rwdmovies_directory,"nophoto.jpg" )
+		end
+		if File.exist?(path_from)
+			FileUtils.cp(path_from, path_to)
+		end
+		fileName = $rwdmovies_directory + "/" + $currentmovietext + ".nam"
+		
+		fd = File.open(fileName,"r")
+		@moviedatadisplay = " "
+		while ! fd.eof?
+			@moviedatadisplay = fd.read
+		end
+		fd.close
+	rescue SystemCallError, StandardError
+		$stderr.print "system call error: " + $!
+	end # exception rescue
+	
+end

data/code/superant.com.rwdmovies/renamemovie.rb

@@ -1,13 +1,12 @@
- # this code is to change the record name
- def changemoviedata
-  oldName =  $rwdmovies_directory + "/" + @a_moviefilename +  ".nam"
-  newName =  $rwdmovies_directory + "/" + @a_changemoviedata + ".nam"
-   File.rename(oldName, newName)
-     oldphotoName =  $rwdmovies_directory + "/" + @a_moviefilename  + ".jpg"
-     newphotoName =  $rwdmovies_directory + "/" + @a_changemoviedata + ".jpg"
-     if  File.exist?(oldphotoName)
-      File.rename(oldphotoName, newphotoName)
-    end
-   end
-
+# this code is to change the record name
+def changemoviedata
+	oldName =  $rwdmovies_directory + "/" + @a_moviefilename +  ".nam"
+	newName =  $rwdmovies_directory + "/" + @a_changemoviedata + ".nam"
+	File.rename(oldName, newName)
+	oldphotoName =  $rwdmovies_directory + "/" + @a_moviefilename  + ".jpg"
+	newphotoName =  $rwdmovies_directory + "/" + @a_changemoviedata + ".jpg"
+	if  File.exist?(oldphotoName)
+		File.rename(oldphotoName, newphotoName)
+	end
+end
 

data/code/superant.com.rwdmovies/returntomain.rb

@@ -1,9 +1,9 @@
 # Application Rwdtinker orginally (c) 2004 Steven Gibson under GPL. 
-# For more information about  see http://www.rubyforge.net/projects/rwdapplications
-  
-  # return to main 
-  def returntomain
-   @rwd_window = "main"
+# For information  see http://www.rubyforge.net/projects/rwdapplications
+
+# return to main 
+def returntomain
+	@rwd_window = "main"
+
+end   
 
-   end   
-   

data/code/superant.com.rwdmovies/runrwdmoviesbackwindow.rb

@@ -1,9 +1,9 @@
 # Application Rwdtinker orginally (c) 2004 Steven Gibson under GPL. 
-# For more information about  see http://www.rubyforge.net/projects/rwdapplications
-  
-  # call the window  
-  def runrwdmoviesbackwindow
-   @rwd_window = "rwdmovieswindow"
-   @rwd_tab= "viewrwdmovielist"
-   end   
-   
+# For information  see http://www.rubyforge.net/projects/rwdapplications
+
+# call the window  
+def runrwdmoviesbackwindow
+	@rwd_window = "rwdmovieswindow"
+	@rwd_tab= "viewrwdmovielist"
+end   
+

data/code/superant.com.rwdmovies/rwdmovieshelpabout.rb

@@ -1,14 +1,12 @@
 # Application RwdTinker orginally (c) 2004 Steven Gibson under GPL. 
-# This application is a framework for writing programs from RubyWebDialogs
-# http://www.erikveen.dds.nl/rubywebdialogs/index.html 
-# For more information about RwdTinker see http://www.rubyforge.net/projects/rwdapplications
-  
-  # return the version constant defined in the config file
-  def runrwdmoviesversion
-  @rwd_window = "applicationversion"
-  @versionappnamedisplay = "RwdMovies"
-  @versioncopyrightdisplay = "(c) 2004 Steven Gibson "
-  @versionnumberdisplay =  "Version " + RwdMoviesVersion
+# For information  see http://www.rubyforge.net/projects/rwdapplications
+
+# return the version constant defined in the config file
+def runrwdmoviesversion
+	@rwd_window = "applicationversion"
+	@versionappnamedisplay = "RwdMovies"
+	@versioncopyrightdisplay = "(c) 2004 Steven Gibson "
+	@versionnumberdisplay =  "Version " + RwdMoviesVersion
+
+end
 
-   end
-  

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

@@ -1,18 +1,18 @@
-  # this method adds a new  record
-  def saverwdmoviesconfiguration
-   require 'fileutils'
-   
-   newname = "rwdmovies.cnf" # grab the filename to create
-   newdata =@a_movconfigline1.to_s + "\n" + @a_movconfigline2.to_s + "\n" + @a_movconfigline3.to_s + "\n" + @a_movconfigline4.to_s + "\n" + @a_movconfigline5.to_s + "\n" + @a_movconfigline6.to_s + "\n" + @a_movconfigline7.to_s + "\n" + @a_movconfigline8.to_s + "\n" + @a_movconfigline9.to_s + "\n"
-	 
-        begin # exception trapped block
-          fileName = File.join( ConfigurationDir, newname )
-        	fd = File.open(fileName,"w")
-	        fd.print(newdata) # save the record info to the file
-	        fd.close
-          @newmovconfigurationresult=newdata # show the record info in the browser
-        rescue SystemCallError, StandardError
-            $stderr.print "system call error: " + $!
-        end # exception rescue
-    
-  end
+# this method adds a new  record
+def saverwdmoviesconfiguration
+	require 'fileutils'
+
+	newname = "rwdmovies.cnf" # grab the filename to create
+	newdata =@a_movconfigline1.to_s + "\n" + @a_movconfigline2.to_s + "\n" + @a_movconfigline3.to_s + "\n" + @a_movconfigline4.to_s + "\n" + @a_movconfigline5.to_s + "\n" + @a_movconfigline6.to_s + "\n" + @a_movconfigline7.to_s + "\n" + @a_movconfigline8.to_s + "\n" + @a_movconfigline9.to_s + "\n"
+
+	begin # exception trapped block
+		fileName = File.join( ConfigurationDir, newname )
+		fd = File.open(fileName,"w")
+		fd.print(newdata) # save the record info to the file
+		fd.close
+		@newmovconfigurationresult=newdata # show the record info in the browser
+	rescue SystemCallError, StandardError
+		$stderr.print "system call error: " + $!
+	end # exception rescue
+
+end

data/code/superant.com.rwdmovies/savemoviechanges.rb

@@ -1,19 +1,19 @@
-  # this method adds a new  record
-  def savemovierecord 
-   require 'fileutils'
-   if @a_moviefilename
-   newname = "%s" %   [@a_moviefilename] # grab the new filename to create
-   newdata =@a_moviename.to_s + "\n" + @a_moviedirector.to_s + "\n" + @a_movieactors.to_s + "\n" + @a_movieyear.to_s + "\n" + @a_moviestudio.to_s + "\n" + @a_moviecomment1.to_s + "\n" + @a_moviecomment2.to_s + "\n" + @a_moviecomment3.to_s + "\n"
+# this method adds a new  record
+def savemovierecord 
+	require 'fileutils'
+	if @a_moviefilename
+		newname = "%s" %   [@a_moviefilename] # grab the new filename to create
+		newdata =@a_moviename.to_s + "\n" + @a_moviedirector.to_s + "\n" + @a_movieactors.to_s + "\n" + @a_movieyear.to_s + "\n" + @a_moviestudio.to_s + "\n" + @a_moviecomment1.to_s + "\n" + @a_moviecomment2.to_s + "\n" + @a_moviecomment3.to_s + "\n"
 
-  fullnewname = newname + ".nam"
-        begin # exception trapped block
-          fileName = File.join( $rwdmovies_directory, fullnewname )
-        	fd = File.open(fileName,"w")
-	        fd.print(newdata) # save the record info to the file
-	        fd.close
-          @changedmovieresult=newdata # show the record info in the browser
-        rescue SystemCallError, StandardError
-            $stderr.print "system call error: " + $!
-        end # exception rescue
-    end
-  end
+		fullnewname = newname + ".nam"
+		begin # exception trapped block
+			fileName = File.join( $rwdmovies_directory, fullnewname )
+			fd = File.open(fileName,"w")
+			fd.print(newdata) # save the record info to the file
+			fd.close
+			@changedmovieresult=newdata # show the record info in the browser
+		rescue SystemCallError, StandardError
+			$stderr.print "system call error: " + $!
+		end # exception rescue
+	end
+end

data/code/superant.com.rwdmovies/showamazonsettings.rb

@@ -1,5 +1,8 @@
 # show amazon settings
-  def showamazonsettings
- @amazonsettings = Amazon::USER_AGENT.to_s 
- 
-  end
+def showamazonsettings
+begin
+	@amazonsettings = Amazon::USER_AGENT.to_s 
+rescue Exception
+ $stderr.print "Amazon error"
+ end	
+end

data/code/superant.com.rwdmovies/viewrwdmoviesconfiguration.rb

@@ -1,22 +1,22 @@
 #view the configuration record
-  def viewrwdmoviesconfiguration 
-    require 'fileutils'
-    begin # exception trapped block
-    
-     Dir.chdir($progdir)
-     rwdmoviesconfigurationfile = File.join( "configuration", "rwdmovies.cnf" )
-     if  File.exist?(rwdmoviesconfigurationfile)
-       fd = File.open(rwdmoviesconfigurationfile,"r")
-       @rwdmoviesconfigurationtext = " "
-       while ! fd.eof?
-	        @rwdmoviesconfigurationtext = fd.read
-       end
-       fd.close
-     else
-	@rwdmoviesconfigurationtext  = "File error"
-     end
-    rescue SystemCallError, StandardError
-     $stderr.print "system call error: " + $!
-     @rwdmoviesconfigurationtext = "File error"
-    end # exception rescue
-  end
+def viewrwdmoviesconfiguration 
+	require 'fileutils'
+	begin # exception trapped block
+		
+		Dir.chdir($progdir)
+		rwdmoviesconfigurationfile = File.join( "configuration", "rwdmovies.cnf" )
+		if  File.exist?(rwdmoviesconfigurationfile)
+			fd = File.open(rwdmoviesconfigurationfile,"r")
+			@rwdmoviesconfigurationtext = " "
+			while ! fd.eof?
+				@rwdmoviesconfigurationtext = fd.read
+			end
+			fd.close
+		else
+			@rwdmoviesconfigurationtext  = "File error"
+		end
+	rescue SystemCallError, StandardError
+		$stderr.print "system call error: " + $!
+		@rwdmoviesconfigurationtext = "File error"
+	end # exception rescue
+end

data/code/superant.com.rwdmovies/viewtmppictures.rb

@@ -1,12 +1,12 @@
 # this code is to list the picture names
 def viewtmppicture
-  fileList      = Dir.new($tmpmoviepicture_directory).entries.sort.delete_if { |x| ! (x =~ /jpg$/) }
-  @moviefilelistresult = ""
-  @listpicturesfromtmp  = fileList.rwd_method("filltmpmoviespicture")
+	fileList      = Dir.new($tmpmoviepicture_directory).entries.sort.delete_if { |x| ! (x =~ /jpg$/) }
+	@moviefilelistresult = ""
+	@listpicturesfromtmp  = fileList.rwd_method("filltmpmoviespicture")
 end
 
 def filltmpmoviespicture(inffile)
-  applet                = inffile.gsub(/\.nam$/, "")
-  @a_tmppicturename       = applet
+	applet                = inffile.gsub(/\.nam$/, "")
+	@a_tmppicturename       = applet
 end