gtk_paradise 0.9.120 → 0.11.19

data/lib/gtk_paradise/toplevel_methods/csv.rb

@@ -1,102 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# require 'gtk_paradise/toplevel_methods/csv.rb'
-# =========================================================================== #
-module Gtk
-
-  require 'gtk_paradise/gtk_classes/tree_view.rb'
-
-  # ========================================================================= #
-  # === Gtk.read_in_from_this_csv_file
-  #
-  # This method will combine Gtk::ListStore.new and Gtk::TreeView.new().
-  #   
-  # The third argument can use symbols such as :strip_quotes.
-  # ========================================================================= #
-  def self.read_in_from_this_csv_file(
-      i                                   = :default,
-      use_this_token_for_the_split_action = :default,
-      extra_commands                      = nil
-    )
-    # ======================================================================= #
-    # === Handle Hash as input first
-    # ======================================================================= #
-    if i.is_a? Hash
-      # ===================================================================== #
-      # === :split_on
-      # ===================================================================== #
-      if i.has_key? :split_on
-        use_this_token_for_the_split_action = i[:split_on]
-      end
-    end
-    case use_this_token_for_the_split_action
-    when :default
-      use_this_token_for_the_split_action = ','
-    end
-
-    if i.is_a? Array
-      i = i.join(' ').strip
-    end
-    case i
-    # ======================================================================= #
-    # === :default
-    #
-    # Make use of a default file. This is catered to my own use case.
-    #
-    # Simply supply your own .csv file if you want to test this
-    # functionality.
-    # ======================================================================= #
-    when :default, nil, ''
-      i = '/home/x/programming/ruby/src/cyberweb/examples/csv/sample.csv' # A test-file on my home setup.
-    end
-    if File.exist? i
-      dataset = File.readlines(i)
-      if dataset.is_a? Array
-        dataset.map! {|string|
-          string.strip.split(use_this_token_for_the_split_action)
-        }
-      end
-      # ===================================================================== #
-      # The first row, which will be removed, can be used as the main
-      # header for our gtk-datastructure.
-      # ===================================================================== #
-      list_store = ::Gtk::ListStore.new(
-        *([String] * dataset.first.size)
-      )
-      tree_view = ::Gtk::TreeView.new(list_store)
-      use_these_headers = dataset.shift
-      if extra_commands == :strip_quotes
-        if use_these_headers.is_a? String
-          use_these_headers.delete!('"')
-        else
-          use_these_headers.map! {|entry| entry.delete('"') }
-        end
-      end
-      tree_view.use_these_headers = use_these_headers
-      dataset.each {|inner_array|
-        iter = list_store.append
-        inner_array.each_with_index {|inner_entry, index|
-          if extra_commands
-           case extra_commands
-           # ================================================================ #
-           # === :strip_quotes
-           # ================================================================ #
-           when :strip_quotes
-             inner_entry.delete!('"')
-           end
-          end
-          iter.set_value(index, inner_entry)
-        }
-      }
-      tree_view.headers_can_be_moved
-      return tree_view
-    end
-  end; self.instance_eval { alias csv read_in_from_this_csv_file } # === Gtk.csv
-
-end
-
-if __FILE__ == $PROGRAM_NAME
-  pp Gtk.read_in_from_this_csv_file(ARGV)
-end

data/lib/gtk_paradise/toplevel_methods/e.rb

@@ -1,18 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# require 'gtk_paradise/toplevel_methods/e.rb'
-# =========================================================================== #
-module Gtk
-
-  # ========================================================================= #
-  # === Gtk.e
-  #
-  # This method is simply a wrapper over puts.
-  # ========================================================================= #
-  def self.e(i = '')
-    puts i
-  end
-
-end

data/lib/gtk_paradise/toplevel_methods/enable_and_disable_warnings.rb

@@ -1,58 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# You can use code in this file to enable or disable warnings.
-#
-# Usage examples:
-#
-#   Gtk.enable_warnings
-#   Gtk.disable_warnings
-#
-# =========================================================================== #
-# require 'gtk_paradise/toplevel_methods/enable_and_disable_warnings.rb'
-# Gtk.enable_warnings
-# Gtk.disable_warnings
-# =========================================================================== #
-module Gtk
-
-  # ========================================================================= #
-  # === @old_verbose_value
-  # ========================================================================= #
-  @old_verbose_value = $VERBOSE # Keep a "reference" to the old value.
-
-  # ========================================================================= #
-  # === Gtk.old_verbose_value?
-  # ========================================================================= #
-  def self.old_verbose_value?
-    @old_verbose_value
-  end
-
-  # ========================================================================= #
-  # === Gtk.disable_warnings
-  # ========================================================================= #
-  def self.disable_warnings
-    @old_verbose_value = $VERBOSE # Must keep a reference.
-    $VERBOSE = nil # And now we silence it.
-  end
-
-  # ========================================================================= #
-  # === Gtk.revert_to_the_old_warnings
-  # ========================================================================= #
-  def self.revert_to_the_old_warnings
-    $VERBOSE = @old_verbose_value
-  end
-
-  # ========================================================================= #
-  # === Gtk.enable_warnings
-  #
-  # Note that the functionality in this method depends on
-  # @old_verbose_value really.
-  # ========================================================================= #
-  def self.enable_warnings(
-      i = @old_verbose_value
-    )
-    $VERBOSE = i
-  end; self.instance_eval { alias re_enable_warnings enable_warnings } # === Gtk.re_enable_warnings
-  
-end

data/lib/gtk_paradise/toplevel_methods/keyboard.rb

@@ -1,25 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# require 'gtk_paradise/toplevel_methods/keyboard.rb'
-# =========================================================================== #
-module Gtk
-
-  # ========================================================================= #
-  # === Gtk.do_grab_the_keyboard
-  # ========================================================================= #
-  def self.do_grab_the_keyboard(i)
-    ::Gdk.keyboard_grab(
-      i.window, true, Gdk::Event::CURRENT_TIME
-    )
-  end
-
-  # ========================================================================= #
-  # === Gtk.do_ungrab_the_keyboard
-  # ========================================================================= #
-  def self.do_ungrab_the_keyboard
-    ::Gdk.keyboard_ungrab(Gdk::Event::CURRENT_TIME)
-  end
-
-end

data/lib/gtk_paradise/toplevel_methods/main_file.rb

@@ -1,31 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# require 'gtk_paradise/toplevel_methods/main_file.rb'
-# =========================================================================== #
-module Gtk
-
-  # ========================================================================= #
-  # === @main_file
-  #
-  # This method can be used to keep track of any file that was selected
-  # via the gtk-file-picker widget.
-  # ========================================================================= #
-  @main_file = nil
-
-  # ========================================================================= #
-  # === Gtk.set_main_file
-  # ========================================================================= #
-  def self.set_main_file(i)
-    @main_file = i
-  end
-
-  # ========================================================================= #
-  # === Gtk.main_file?
-  # ========================================================================= #
-  def self.main_file?
-    @main_file
-  end
-
-end

data/lib/gtk_paradise/toplevel_methods/register_sigint.rb

@@ -1,17 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# require 'gtk_paradise/toplevel_methods/register_sigint.rb'
-# Gtk.register_sigint
-# =========================================================================== #
-module Gtk
-
-  # ========================================================================= #
-  # === Gtk.register_sigint
-  # ========================================================================= #
-  def self.register_sigint
-    Signal.trap('SIGINT') { exit }
-  end
-
-end

data/lib/gtk_paradise/toplevel_methods/roebe.rb

@@ -1,22 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# require 'gtk_paradise/toplevel_methods/roebe.rb'
-# Gtk.is_on_roebe?
-# =========================================================================== #
-module Gtk
-
-  # ========================================================================= #
-  # === Gtk.is_on_roebe?
-  # ========================================================================= #
-  def self.is_on_roebe?
-    ENV['IS_ROEBE'].to_s == '1'
-  end; self.instance_eval { alias on_roebe?        is_on_roebe? } # === Gtk.on_roebe?
-       self.instance_eval { alias are_we_on_roebe? is_on_roebe? } # === Gtk.are_we_on_roebe?
-
-end
-
-if __FILE__ == $PROGRAM_NAME
-  puts Gtk.is_on_roebe?
-end

data/lib/gtk_paradise/toplevel_methods/select_file.rb

@@ -1,168 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# require 'gtk_paradise/toplevel_methods/select_file.rb'
-# Gtk.select_file
-# =========================================================================== #
-module Gtk
-
-  require 'gtk_paradise/toplevel_methods/determine_which_gtk_version_is_in_use.rb'
-  require 'gtk_paradise/toplevel_methods/roebe.rb'
-
-  # ========================================================================= #
-  # === Gtk.do_select_file
-  #
-  # This method can be used to select a specific (local) file.
-  #
-  # The filename will be returned by this method, as a String.
-  #
-  # A complex usage example follows next:
-  #
-  #   filename = ::Gtk.select_file(parent_widget_here) {{
-  #     current_folder:             current_folder,
-  #     show_hidden:                true,
-  #     extra_widget:               @extra_button,
-  #     add_these_shortcut_folders: ARRAY_ADD_THESE_SHORTCUT_FOLDERS,
-  #     use_this_file_filter:       '.pdf'
-  #   }}
-  #
-  # ========================================================================= #
-  def self.do_select_file(
-      parent_widget,
-      use_this_file_filter = nil
-    )
-    yielded = nil
-    if block_given?
-      yielded = yield
-    end
-    action_option = :open
-    # ======================================================================= #
-    # Next, handle ruby-gtk2:
-    # ======================================================================= #
-    if use_gtk2?
-      action_option = Gtk::FileChooser::ACTION_OPEN
-      dialog = Gtk::FileChooserDialog.new(
-        'Open File',
-        parent_widget,
-        action_option,
-        nil,
-        [Gtk::Stock::CANCEL, Gtk::Dialog::RESPONSE_CANCEL],
-        [Gtk::Stock::OPEN,   Gtk::Dialog::RESPONSE_ACCEPT]
-      )
-    else # else handle ruby-gtk3.
-      dialog = Gtk::FileChooserDialog.new(
-        title: 'Open File',
-        action: action_option,
-        buttons: [[Gtk::Stock::CANCEL, :cancel],
-                  [Gtk::Stock::OPEN,   :accept]]
-      )
-    end
-    if yielded and yielded.is_a?(Hash)
-      # ===================================================================== #
-      # === :current_folder
-      #
-      # Usage example for this entry point:
-      #
-      #   ::Gtk.select_file {{ current_folder: '/home/' }}
-      #
-      # ===================================================================== #
-      if yielded.has_key? :current_folder
-        _ = yielded[:current_folder]
-        dialog.set_current_folder(_)
-      end
-      # ===================================================================== #
-      # === :show_hidden
-      # ===================================================================== #
-      if yielded.has_key? :show_hidden
-        dialog.show_hidden = yielded[:show_hidden]
-      end
-      # ===================================================================== #
-      # === :extra_widget
-      # ===================================================================== #
-      if yielded.has_key? :extra_widget
-        dialog.extra_widget = yielded[:extra_widget]
-      end
-      # ===================================================================== #
-      # === :add_these_shortcut_folders
-      # ===================================================================== #
-      if yielded.has_key? :add_these_shortcut_folders
-        _ = [yielded[:add_these_shortcut_folders]].flatten.compact
-        _.each {|this_directory|
-          dialog.add_shortcut_folder(this_directory)
-        }
-      # ===================================================================== #
-      # === :additional_directories
-      # ===================================================================== #
-      elsif yielded.has_key? :additional_directories
-        _ = [yielded[:additional_directories]].flatten.compact
-        _.each {|this_directory|
-          dialog.add_shortcut_folder(this_directory)
-        }
-      end
-      # ===================================================================== #
-      # === :use_this_file_filter
-      # ===================================================================== #
-      if yielded.has_key? :use_this_file_filter
-        use_this_file_filter = yielded[:use_this_file_filter]
-      # ===================================================================== #
-      # === :filter_for_these_file_types
-      # ===================================================================== #
-      elsif yielded.has_key? :filter_for_these_file_types
-        use_this_file_filter = yielded[:filter_for_these_file_types]
-      end
-    end
-    if use_this_file_filter
-       use_this_file_filter = use_this_file_filter.to_s.dup
-       if use_this_file_filter.is_a? String
-         filter = ::Gtk::FileFilter.new
-         filter.name = use_this_file_filter.to_s+' files'
-         unless use_this_file_filter.start_with? '.'
-           use_this_file_filter.prepend('.')
-         end
-         unless use_this_file_filter.start_with? '*'
-           use_this_file_filter.prepend('*')
-         end
-         use_this_file_filter = filter.add_pattern(use_this_file_filter)
-       end
-       dialog.add_filter(use_this_file_filter)
-    end
-    # ======================================================================= #
-    # === Add some default shortcut-folders on Roebe
-    # ======================================================================= #
-    if is_on_roebe?
-      begin
-        dialog.add_shortcut_folder ENV['MY_SONGS']
-      rescue Exception; end
-      begin
-        dialog.add_shortcut_folder ENV['MY_TEMP']
-      rescue Exception; end
-      begin
-        dialog.add_shortcut_folder ENV['MY_DATA']
-      rescue Exception; end
-      begin
-        dialog.add_shortcut_folder ENV['RUBY_SRC']
-      rescue Exception; end
-      # ===================================================================== #
-      # Add some more directories by default next:
-      # ===================================================================== #
-      dialog.add_shortcut_folder '/Depot/j/'    unless Dir.pwd.include?('/Depot/j')
-      dialog.add_shortcut_folder '/Depot/jj/'   unless Dir.pwd.include?('/Depot/jj')
-      dialog.add_shortcut_folder '/Depot/jjj/'  unless Dir.pwd.include?('/Depot/jjj')
-      dialog.add_shortcut_folder '/Depot/jjjj/' unless Dir.pwd.include?('/Depot/jjjj')
-      # dialog.add_shortcut_folder '/' # <- Can not use this variant.
-    end
-    accept = :accept
-    if use_gtk2?
-      accept = Gtk::Dialog::RESPONSE_ACCEPT
-    end
-    case dialog.run
-    when accept
-      puts "filename = #{dialog.filename}"
-    end
-    result = dialog.filename
-    dialog.destroy # Clean it up here.
-    return result
-  end; self.instance_eval { alias select_file do_select_file } # === Gtk.select_file
-
-end

data/lib/gtk_paradise/toplevel_methods/spacer.rb

@@ -1,55 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# require 'gtk_paradise/toplevel_methods/spacer.rb'
-# ::Gtk.spacer
-# =========================================================================== #
-module Gtk
-
-  require 'gtk_paradise/toplevel_methods/determine_which_gtk_version_is_in_use.rb'
-
-  # ========================================================================= #
-  # === Gtk.spacer
-  #
-  # This method will add a horizontal spacer.
-  #
-  # Note that the Gtk::Separator widget is an abstract class, used only 
-  # for deriving the subclasses Gtk::HSeparator and Gtk::VSeparator.
-  # ========================================================================= #
-  def self.spacer
-    # ::Gtk::Separator.new(:horizontal) # ^^^ see above for an explanation why this is commented out.
-    return Gtk.horizontal_spacer
-  end
-
-  # ========================================================================= #
-  # === Gtk.horizontal_spacer
-  #
-  # We have to check whether gtk2 or gtk3 is used. Depending on this
-  # we will return a "different" separator.
-  # ========================================================================= #
-  def self.horizontal_spacer
-    if is_gtk2_in_use?
-      ::Gtk::HSeparator.new
-    else # Assume gtk3 here.
-      ::Gtk::Separator.new(:horizontal)
-    end
-  end; self.instance_eval { alias hspacer horizontal_spacer } # === Gtk.hspacer
-
-  # ========================================================================= #
-  # === Gtk.vertical_spacer
-  # ========================================================================= #
-  def self.vertical_spacer
-    if is_gtk2_in_use?
-      ::Gtk::VSeparator.new
-    else # Assume gtk3 here.
-      ::Gtk::Separator.new(:vertical)
-    end
-  end; self.instance_eval { alias vspacer vertical_spacer } # === Gtk.vspacer
-
-end
-
-if __FILE__ == $PROGRAM_NAME
-  require 'gtk2'
-  pp Gtk.is_gtk2_in_use?
-end

data/lib/gtk_paradise/toplevel_methods/tooltips.rb

@@ -1,71 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# This file contains some code for gtk-tooltip related activities. It
-# should not require any other .rb file, in order to keep the logic
-# and the dependencies small and clean.
-#
-# The reason for this is that this file here may be required by other
-# files, such as gtk_classes/label.rb specifically, in order to add
-# more convenient tooltips to gtk-labels in general. So we want to
-# keep the dependency-chain minimal at all times.
-# =========================================================================== #
-# require 'gtk_paradise/toplevel_methods/tooltips.rb'
-# Gtk.set_tooltip
-# =========================================================================== #
-module Gtk
-
-  # ========================================================================= #
-  # === Gtk.set_tooltip
-  #
-  # The first argument to this method is the text that is to be displayed,
-  # as a String. For example, "Hello world!".
-  #
-  # The second argument shall be the widget that receives the tooltip.
-  # For example, a gtk-button as widget, or a gtk-label.
-  #
-  # Note that Gtk::Tooltips has been deprecated in ruby-gtk3, so this is
-  # only useful for ruby-gtk2. However had, even in ruby-gtk2 it is not
-  # recommended to use it, as there are other, simpler means to set
-  # a tooltip - namely via .tooltip_text=.
-  #
-  # Usage example:
-  #
-  #   Gtk.set_tooltip('Hello world!', widget)
-  #
-  # ========================================================================= #
-  def self.set_tooltip(
-      which_tip_to_use          = 'This is a popup.',
-      which_widget_to_use_it_on = nil
-    )
-    ::Gtk::Tooltips.new.set_tip(
-      which_widget_to_use_it_on,
-      which_tip_to_use,
-      nil
-    )
-  end; self.instance_eval { alias tooltip                     set_tooltip } # === Gtk.tooltip
-       self.instance_eval { alias tooltip_widget              set_tooltip } # === Gtk.tooltip_widget
-       self.instance_eval { alias set_tooltip_for_this_widget set_tooltip } # === Gtk.set_tooltip_for_this_widget
-
-  # ========================================================================= #
-  # === Gtk.tooltip_for
-  #
-  # This is like the above method (Gtk.set_tooltip), except that the 
-  # arguments are reversed.
-  #
-  # First comes the target-widget, then the specific message to display.
-  #
-  # Two aliass exist for this method, called Gtk.set_tooltip_for() and
-  # Gtk.fancy_tooltip=() respectively.
-  #
-  # The reason as to why this method was added was because I sometimes
-  # confused the order of arguments, so I found it simpler in these
-  # cases to use another API instead.
-  # ========================================================================= #
-  def self.tooltip_for(widget, text)
-    ::Gtk.set_tooltip(text, widget)
-  end; self.instance_eval { alias set_tooltip_for tooltip_for } # === Gtk.set_tooltip_for
-       self.instance_eval { alias fancy_tooltip=  tooltip_for } # === Gtk.fancy_tooltip=
-
-end

data/lib/gtk_paradise/toplevel_methods/we_use_this_gtk_version.rb

@@ -1,65 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# require 'gtk_paradise/toplevel_methods/we_use_this_gtk_version.rb'
-# Gtk.set_we_use_this_gtk_version
-# Gtk.we_use_this_gtk_version = :gtk2
-# Gtk.we_use_this_gtk_version = :gtk3
-# =========================================================================== #
-module Gtk
-
-  # ========================================================================= #
-  # === @we_use_this_gtk_version
-  #
-  # This must be initialized to nil, so that we allow the user to change
-  # this value lateron, as a distinguishing 'feature'.
-  # ========================================================================= #
-  @we_use_this_gtk_version = nil
-
-  # ========================================================================= #
-  # === Gtk.use_gtk3?
-  #
-  # Unfortunately MAJOR_VERSION does not exist for ruby-gtk3.
-  # ========================================================================= #
-  def self.use_gtk3?
-    @we_use_this_gtk_version == :gtk3
-  end; self.instance_eval { alias are_we_using_gtk3? use_gtk3? } # === Gtk.are_we_using_gtk3?
-       self.instance_eval { alias is_gtk3_in_use?    use_gtk3? } # === Gtk.is_gtk3_in_use?
-       self.instance_eval { alias is_gtk3?           use_gtk3? } # === Gtk.is_gtk3?
-       self.instance_eval { alias use_gtk3?          use_gtk3? } # === Gtk.use_gtk3?
-       self.instance_eval { alias do_we_use_gtk3?    use_gtk3? } # === Gtk.do_we_use_gtk3?
-
-  # ========================================================================= #
-  # === Gtk.we_use_this_gtk_version?
-  # ========================================================================= #
-  def self.we_use_this_gtk_version?
-    @we_use_this_gtk_version
-  end; self.instance_eval { alias we_use_which_gtk_version? we_use_this_gtk_version? } # === Gtk.we_use_which_gtk_version?
-
-  # ========================================================================= #
-  # === Gtk.we_use_this_gtk_version=
-  #
-  # The new default since as of April 2019 is to require gtk3.
-  #
-  # Usage examples:
-  #
-  #   Gtk.we_use_this_gtk_version = :gtk2
-  #   Gtk.we_use_this_gtk_version = :gtk3
-  #
-  # ========================================================================= #
-  def self.we_use_this_gtk_version=(
-      i = :default
-    )
-    case i
-    # ======================================================================= #
-    # === :default
-    # ======================================================================= #
-    when :default
-      i = DEFAULT_GTK_VERSION_TO_USE
-    end
-    # puts "Debug: We now set the gtk version to: #{i}" # Some debug-line.
-    @we_use_this_gtk_version = i
-  end; self.instance_eval { alias set_we_use_this_gtk_version we_use_this_gtk_version= } # === Gtk.set_we_use_this_gtk_version
-
-end

data/lib/gtk_paradise/widgets/gtk2/directory_content_widget/directory_content_widget.rb

@@ -1,30 +0,0 @@
-#!/usr/bin/ruby -w
-# Encoding: UTF-8
-# frozen_string_literal: true
-# =========================================================================== #
-# === Gtk::DirectoryContentWidget
-# =========================================================================== #
-# require 'gtk_paradise/widgets/gtk2/directory_content_widget/directory_content_widget.rb'
-# Gtk::DirectoryContentWidget.new
-# =========================================================================== #
-require 'gtk_paradise/require_gtk2'
-
-module Gtk
-
-class DirectoryContentWidget < ::Gtk::VBox
-
-  require 'gtk_paradise/widgets/shared_code/directory_content_widget/directory_content_widget_module.rb'
-  include ::Gtk::DirectoryContentWidgetModule
-
-  # ========================================================================= #
-  # === Gtk::DirectoryContentWidget.run
-  # ========================================================================= #
-  def self.run(i = ARGV)
-    ::Gtk::DirectoryContentWidgetModule.run(i)
-  end
-
-end; end
-
-if __FILE__ == $PROGRAM_NAME
-  Gtk::DirectoryContentWidget.run(ARGV)
-end

data/lib/gtk_paradise/widgets/gtk2/my_calendar/my_calendar.config

@@ -1,6 +0,0 @@
-width:                                       480
-height:                                      380
-padding:                                       4
-title:                              GTK Calendar
-favicon:                                 :tabble
-font_in_use:                             Sans 20