/ 
App-SeismicUnixGui-0.87.2
River stage zero No dependents
/ App::SeismicUnixGui::misc::gui_history

DOCUMENTATION

SYNOPSIS

PERL PROGRAM NAME: gui_history 
AUTHOR: 	Juan Lorenzo
DATE: 		September 1 2019


DESCRIPTION 
  Global inventory of user interactions with the gui.

BASED ON:

USE

NOTES

Examples

CHANGES and their DATES 9-1-19 0.0.1 dabbling with refs 9-12-19 0.0.2 7.20.21 initialize some hashes

Notes from bash

Import modules potentially, all packages contain L_SU_global_constants

Instantiation

Declare Special Variables

Declare attributes

private anonymous hashes containing sequential history

private anonymous hashes containing history

sub _find_button match a clicked button name to a hash key of the same/equivalent name

print("gui_history,_find_button, search:$search \n"); print("gui_history,_find_button, temp_key:**$temp_key** \n");

sub _get_flow_listbox_color_w

sub _get_most_recent_color_selected_gui

Assume the last color is the color of the flow selected

sub _increment_count

increment the counter
counter records the click number sequence for 
all use selections 
Two counters exist: an attribute: _count
and a hash (value stored)key=_count) in attribute defaults

sub _initialize Default Tk settings Locally scoped hash 46 off

Overlap with Default L_SU settings{ 133 off

sub _reset

private reset of "condition" variables
do not reset incoming widgets

sub _set_click_sequence

For general case, new count will not be sequential with previous index value in the same $property_href Count changes whenever the user clicks on any tool

indices for property_href should increase only if the most_recent is different to the prior. i.e., only if there is a real change indices only change if there is a real change

sub _set_flow_listbox_color_w

sub _update_FileDialog_type Assign new FileDialog_type to private key: _FileDialog_type Can be 'Data' or 'Delete' or ' '

$gui_history = current package

sub _update_button Assign new button to private key: _XXX_button

print("gui_history, _update_button, ans= $ans\n"); print("gui_history, _update_button, button= $button\n");

sub _update_add2flow_color

Assign new color to private key: _flow_color

In this sub, flow color can be grey,pink,green or blue but not 'neutral' or 'nada' or 'no_color'

$gui_history = current package

When there is a color change

sub _update_flow_select_color Assign new color to private key: _flow_color

flow color can be grey,pink,green or blue but not neutral or 'nada' or 'no_color'

$gui_history = current package

When there is a color change

sub _update_flow_listbox_color_w '

$gui_history = current package

sub _update_flow_type Assign new flow_type to private key: _flow_type Can be 'pre_built_superflow 'or 'user_built'

$gui_history = current package

sub _update_help_menubutton_type Assign new help_menubutton_type to private key: _help_menubutton_type Can be 'Install' or ' ' or ' '

$gui_history = current package

sub _update_parameter_color_on_entry

$gui_history = current package

sub _update_parameter_color_on_exit

$gui_history = current package

sub _update_parameter_index_on_entry

$gui_history = current package

sub _update_parameter_index_on_exit

$gui_history = current package

sub _update_sunix_prog_group

$gui_history = current package

sub _update_sunix_prog_group_color

$gui_history = current package

color is always the same (= neutral)

sub _update_superflow_tool Assign new name to private key: superflow_tool

BUILDARGS Initialize contents before instantiation. In superclass, helps avoid hash or hashref syntax

BUILD Initial checking after instantiation

foreach my $key ( sort keys %$gui_history ) { print (" gui_history, BUILD key is $key, value is $gui_history->{$key}\n"); }

sub get_internal

sub get_file_status

sub set_internally

sub set_file_status

sub clear

restore defaults to gui history items

sub _subtract

restore defaults to gui history items

sub view

Writes out internals to a file