# this code is to list the file data
 def listgutrecordfiles
  if File.exist?($rwdgutenberg_directory)
   fileList      = Dir.new($rwdgutenberg_directory).entries.sort.delete_if { |x| ! (x =~ /gut$/) }
   
   @gutenbergrecordsresult  = fileList.rwd_method("fillgutenbergrecordname")
  end
 end
 
 # this method is to help fill in list of names
 def fillgutenbergrecordname(inffile)
  applet                = inffile.gsub(/\.gut$/, "")
  @a_viewgutenberg       = applet
 end