communigate (phase 2): rules: start of adding conditions and actions to rule edit...

diff --git a/httemplate/elements/select-cgp_rule_action.html b/httemplate/elements/select-cgp_rule_action.html
index b53a96e..24301b5 100644 (file)
--- a/httemplate/elements/select-cgp_rule_action.html
+++ b/httemplate/elements/select-cgp_rule_action.html
@@ -17,7 +17,6 @@
 <%init>
 
 my %opt = @_;
-warn "SELECT-CGP_RULE-ACTION.HTML: ". join ' / ', %opt;
 
 my @actions = (
   '',

diff --git a/httemplate/elements/select.html b/httemplate/elements/select.html
index 7aa4180..268e0d2 100644 (file)
--- a/httemplate/elements/select.html
+++ b/httemplate/elements/select.html
@@ -42,7 +42,6 @@
 <%init>
 
 my %opt = @_;
-warn "SELECT.HTML: ". join ' / ', %opt;
 
 my $onchange = $opt{'onchange'}
                  ? 'onChange="'. $opt{'onchange'}. '(this)"'

diff --git a/httemplate/elements/tr-select.html b/httemplate/elements/tr-select.html
index f9c768c..cf1b3cc 100644 (file)
--- a/httemplate/elements/tr-select.html
+++ b/httemplate/elements/tr-select.html
@@ -14,7 +14,7 @@
 <%init>
 
 my %opt = @_;
-warn join ' / ', %opt;
+
 my $style = $opt{'cell_style'} ? 'STYLE="'. $opt{'cell_style'}. '"' : '';
 
 my $colspan = $opt{'colspan'} ? 'COLSPAN="'.$opt{'colspan'}.'"' : '';