/[freeride]/freeride/plugins/rubyide_tools_fox_file_browser/file_browser.rb
ViewVC logotype

Diff of /freeride/plugins/rubyide_tools_fox_file_browser/file_browser.rb

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by richkilmer, Sat Dec 21 04:25:41 2002 UTC revision 1.3 by ljulliar, Thu May 1 12:34:39 2003 UTC
# Line 31  module FreeRIDE Line 31  module FreeRIDE
31          plugin['/system/ui/icons/FileBrowser'].subscribe do |event, slot|          plugin['/system/ui/icons/FileBrowser'].subscribe do |event, slot|
32            if event == :notify_slot_add            if event == :notify_slot_add
33              app = plugin['/system/ui/fox/FXApp'].data              app = plugin['/system/ui/fox/FXApp'].data
34              path = "#{plugin.plugin_configuration.base_path}/icons/#{slot.name}.png"              path = "#{plugin.plugin_configuration.full_base_path}/icons/#{slot.name}.png"
35              if FileTest.exist?(path)              if FileTest.exist?(path)
36                slot.data = FXPNGIcon.new(app, File.open(path, "rb").read)                slot.data = FXPNGIcon.new(app, File.open(path, "rb").read)
37                slot.data.create                slot.data.create
# Line 83  module FreeRIDE Line 83  module FreeRIDE
83          dirlist.connect(SEL_DOUBLECLICKED) { |sender, sel, item|          dirlist.connect(SEL_DOUBLECLICKED) { |sender, sel, item|
84            if dirlist.isItemFile(item)            if dirlist.isItemFile(item)
85              pathname = dirlist.getItemPathname(item)              pathname = dirlist.getItemPathname(item)
86                puts pathname
87              plugin.properties["LastFile"] = pathname #dirlist.directory              plugin.properties["LastFile"] = pathname #dirlist.directory
88              @cmd_mgr.command("App/File/Load").invoke(pathname)              @cmd_mgr.command("App/File/Load").invoke(pathname)
89            else            else

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26