This commit was manufactured by cvs2svn to create tag 'TORRUS_1_0_9'.TORRUS_1_0_9

1 files changed, 0 insertions, 90 deletions

diff --git a/httemplate/elements/checkboxes-table-name.html b/httemplate/elements/checkboxes-table-name.html
deleted file mode 100644
index 31652f330..000000000
--- a/httemplate/elements/checkboxes-table-name.html
+++ /dev/null
@@ -1,90 +0,0 @@
-<%doc>
-
-Example:
-
-  include( '/elements/checkboxes-table-name.html',
-
-    ###
-    # required
-    ###
-    'link_table'      => 'table_name',
-   
-    'name_col' => 'name_column',
-    #or
-    'name_callback' => sub { },
-   
-    'names_list' => [ 'value',
-                      'other value',
-                      [ 'complex value' => { 'desc' => "Add'l description",
-                                             'note' => '&nbsp;*',
-                                           }
-                      ],
-                    ],
-   
-    ###
-    # recommended (required?)
-    ###
-    'source_obj'   => $obj,
-    #or?
-    #'source_table' => 'table_name',
-    #'sourcenum'    => '4', #current value of primary key in source_table
-    #                       # (none is okay, just pass it if you have it)
-
-    ###
-    # optional
-    ###
-    'num_col' => 'col_name' #if column name is different in link_table than
-                            #source_table
-    'link_static' => { 'column' => 'value' },
-
-  )
-
-</%doc>
-
-<% include('checkboxes.html',
-             'names_list'             => $opt{'names_list'},
-             'checked_callback'       => $checked_callback,
-             'element_name_prefix'    => $opt{'link_table'}. '.',
-          )
-%>
-
-<%init>
-
-my( %opt ) = @_;
-
-my @pset = ( 'a'..'z', 'A'..'Z', '0'..'9' );
-
-my $prefix = $opt{prefix}
-             || join('', map $pset[ int(rand $#pset) ], (0..20) );
-
-my( $source_pkey, $sourcenum, $source_obj );
-if ( $opt{'source_obj'} ) {
-
-  $source_obj = $opt{'source_obj'};
-  #$source_table = $source_obj->dbdef_table->table;
-  $source_pkey = $source_obj->dbdef_table->primary_key;
-  $sourcenum = $source_obj->$source_pkey();
-
-} else {
-
-  #$source_obj?
-  $source_pkey = $opt{'source_table'}
-                   ? dbdef->table($opt{'source_table'})->primary_key
-                   : '';
-  $sourcenum = $opt{'sourcenum'};
-}
-
-$source_pkey = $opt{'num_col'} || $source_pkey;
-
-my $link_static = $opt{'link_static'} || {};
-
-my $checked_callback = sub {
-  my( $cgi, $name ) = @_;
-  qsearchs( $opt{'link_table'}, {
-    $source_pkey     => $sourcenum,
-    $opt{'name_col'} => $name,
-    %$link_static,
-  });
-};
-
-</%init>