From eb061f5119325e666f0dff40d4089e5c1df58e17 Mon Sep 17 00:00:00 2001
From: cvs2git <cvs2git>
Date: Sun, 16 Mar 2008 19:58:34 +0000
Subject: This commit was manufactured by cvs2svn to create tag 'TRIXBOX_2_6'.

---
 httemplate/elements/selectlayers.html | 201 ----------------------------------
 1 file changed, 201 deletions(-)
 delete mode 100644 httemplate/elements/selectlayers.html

(limited to 'httemplate/elements/selectlayers.html')

diff --git a/httemplate/elements/selectlayers.html b/httemplate/elements/selectlayers.html
deleted file mode 100644
index 4496892ff..000000000
--- a/httemplate/elements/selectlayers.html
+++ /dev/null
@@ -1,201 +0,0 @@
-<%doc>
-
-Example:
-
-  include( '/elements/selectlayers.html',
-    'field'        => $key, # SELECT element NAME (passed as form field)
-                            # also used as ID and a unique key for layers and
-                            # functions
-    'curr_value'   => $selected_layer,
-    'options'      => [ 'option1', 'option2' ],
-    'labels'       => { 'option1' => 'Option 1 Label',
-                        'option2' => 'Option 2 Label',
-                      },
-
-    #XXX put this handling it its own selectlayers-fields.html element?
-    'layer_prefix' => 'prefix_', #optional prefix for fieldnames
-    'layer_fields' => [ 'layer'  => [ 'fieldname',
-                                      { label => 'fieldname2',
-                                        type  => 'text', #implemented:
-                                                         # text, money, fixed,
-                                                         # hidden, checkbox,
-                                                         # checkbox-multiple,
-                                                         # select, select-agent,
-                                                         # select-pkg_class,
-                                                         # select-part_referral,
-                                                         # select-table,
-                                                         #XXX tbd:
-                                                         # more?
-                                      },
-                                      ...
-                                    ],
-                        'layer2' => [ 'l2fieldname',
-                                      ...
-                                    ],
-
-    #current values for layer fields above
-    'layer_values' => { 'layer'  => { 'fieldname'  => 'current_value',
-                                      'fieldname2' => 'field2value',
-                                      ...
-                                    },
-                        'layer2' => { 'l2fieldname' => 'l2value',
-                                      ...
-                                    },
-                        ...
-                      },
-
-    'html_between  => '', #optional HTML displayed between the SELECT and the
-                          #layers, scalar or coderef ('field' passed as a param)
-    'onchange'     => '', #javascript code run when the SELECT changes
-                          # ("what" is the element)
-    'js_only'      => 0, #set true to return only the JS portions
-    'html_only'    => 0, #set true to return only the HTML portions
-  )
-
-</%doc>
-% unless ( $opt{html_only} || $opt{js_only} ) {
-    <SCRIPT TYPE="text/javascript">
-% }
-% unless ( $opt{html_only} ) {
-      //alert('start function define');
-      function <% $key %>changed(what) {
-
-        <% $opt{'onchange'} %>
-
-        var <% $key %>layer = what.options[what.selectedIndex].value;
-
-%       foreach my $layer ( keys %$options ) {
-
-          if (<% $key %>layer == "<% $layer %>" ) {
-
-%           foreach my $not ( grep { $_ ne $layer } keys %$options ) {
-%             my $element = "document.getElementById('${key}d$not').style";
-              <% $element %>.display = "none";
-              <% $element %>.zIndex = 0;
-%           }
-
-%           my $element = "document.getElementById('${key}d$layer').style";
-            <% $element %>.display = "";
-            <% $element %>.zIndex = 1;
-
-          }
-%       }
-
-        //<% $opt{'onchange'} %>
-
-      }
-      //alert('end function define');
-% }
-% unless ( $opt{html_only} || $opt{js_only} ) {
-    </SCRIPT>
-% }
-%
-% unless ( $opt{js_only} ) {
-
-    <SELECT NAME          = "<% $key %>"
-            ID            = "<% $key %>"
-            previousValue = "<% $selected %>"
-            previousText  = "<% $options{$selected} %>"
-            onChange="<% $key %>changed(this);"
-    >
-
-%     foreach my $option ( keys %$options ) {
-
-        <OPTION VALUE="<% $option %>"
-                <% $option eq $selected ? ' SELECTED' : '' %>
-        ><% $options->{$option} %></OPTION>
-
-%     }
-
-    </SELECT>
-
-<% ref($between) ? &{$between}($key) : $between %>
-
-%   foreach my $layer ( keys %$options ) {
-
-      <DIV ID="<% $key %>d<% $layer %>"
-           STYLE="<% $layer eq $selected
-                       ? 'display: ""  ; z-index: 1'
-                       : 'display: none; z-index: 0'
-                  %>"
-      >
-
-        <% layer_callback($layer, $layer_fields, $layer_values, $layer_prefix) %>
-
-      </DIV>
-
-%   }
-
-% }
-<%once>
-
-my $conf = new FS::Conf;
-my $money_char = $conf->config('money_char') || '$';
-
-</%once>
-<%init>
-
-my %opt = @_;
-
-#use Data::Dumper;
-#warn Dumper(%opt);
-
-my $key = $opt{field}; # || 'generate_one' #?
-
-tie my %options, 'Tie::IxHash',
-   map { $_ => $opt{'labels'}->{$_} }
-       @{ $opt{'options'} }; #just arrayref for now
-
-my $between = exists($opt{html_between}) ? $opt{html_between} : '';
-my $options = \%options;
-
-my $selected = exists($opt{curr_value}) ? $opt{curr_value} : '';
-
-#XXX eek.  also eek $layer_fields in the layer_callback() call...
-my $layer_fields = $opt{layer_fields};
-my $layer_values = $opt{layer_values};
-my $layer_prefix = $opt{layer_prefix};
-
-sub layer_callback {
-  my( $layer, $layer_fields, $layer_values, $layer_prefix ) = @_;
-
-  return  '' unless $layer && exists $layer_fields->{$layer};
-  tie my %fields, 'Tie::IxHash', @{ $layer_fields->{$layer} };
-
-  #XXX this should become an element itself... (false laziness w/edit.html)
-  # but at least all the elements inside are the shared mason elements now
-
-  return '' unless keys %fields;
-  my $html = "<TABLE>";
-
-  foreach my $field ( keys %fields ) {
-
-    my $lf = ref($fields{$field})
-               ? $fields{$field}
-               : { 'label'=>$fields{$field} };
-
-    my $value = $layer_values->{$layer}{$field};
-
-    my $type = $lf->{type} || 'text';
-
-    my $include = $type;
-    $include = "input-$include" if $include =~ /^(text|money)$/;
-    $include = "tr-$include" unless $include eq 'hidden';
-
-    $html .= include( "/elements/$include.html",
-                        %$lf,
-                        'field'      => "$layer_prefix$field",
-                        'id'         => "$layer_prefix$field", #separate?
-                        #don't want field0_label0...?
-                        'label_id'   => $layer_prefix.$field."_label",
-
-                        'value'      => ( $lf->{'value'} || $value ), #hmm.
-                        'curr_value' => $value,
-                    );
-
-  }
-  $html .= '</TABLE>';
-  return $html;
-}
-
-</%init>
-- 
cgit v1.2.1