A few fixups in ptyhon, plus mailstats panel json 1st pass

Templates/controller.pm.tem

@@ -42,11 +42,11 @@ use esmith::NetworksDB;
 use esmith::HostsDB;
 use esmith::DomainsDB;
 
-my $cdb 
-my $adb 
-my $ndb 
-my $hdb 
-my $ddb 
+my $cdb;
+my $adb;
+my $ndb; 
+my $hdb; 
+my $ddb; 
 
 require '/usr/share/smanager/lib/SrvMngr/Controller/${PackageName}-Custom.pm';  #The code that is to be added by the developer
 
@@ -133,7 +133,7 @@ sub do_update {
     my $params = $c->req->params->to_hash;
 
     # Get number of POST parameters
-    my $num_params = keys scaler %$params;
+    #my $num_params = keys scaler %$params;
     
     #Params are available in the hash "params" - copy to the prefix_data hash
     #while (my ($key, $value) = each %{$c->req->params->to_hash}) {

Templates/html_controls.html.ep.xml

@@ -25,7 +25,7 @@
 		<span class=label>
 			%=l('${prefix}_${Label}')
 		</span><span class=data>
-			%=date_field '${Name}' =>$$${Name}, pattern=>${regexp | .*}, title = 'Pattern regex mismatch'
+			%=date_field '${Name}' =>$$${Name}, pattern=>${regexp | .*}, title =>'Pattern regex mismatch'
 		</span><br>
 	]]></Date>
 
@@ -33,7 +33,7 @@
 		<span class=label>
 			%=l('${prefix}_${Label}')
 		</span><span class=data>
-			%=time_field '${Name}' =>$$${Name}, pattern=>${regexp | .*}, title = 'Pattern regex mismatch'
+			%=time_field '${Name}' =>$$${Name}, pattern=>${regexp | .*}, title =>'Pattern regex mismatch'
 		</span><br>
 	]]></Time>
 
@@ -43,7 +43,7 @@
 			%=l('${prefix}_${Label}')
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
-			%= text_field '${Name}', size => '${size | 50}', class => 'textinput ${Name}' , pattern=>'${regexp | ".*"}' , placeholder=>'${placeholder | Name}', title = 'Pattern regex mismatch'
+			%= text_field '${Name}', size => '${size | 50}', class => 'textinput ${Name}' , pattern=>'${regexp | ".*"}' , placeholder=>'${placeholder | Name}', title =>'Pattern regex mismatch'
 		<br></span></p>
 	]]></Text>
 
@@ -52,7 +52,7 @@
 			%=l('${prefix}_${Label}')
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
-			%= text_field '${Name}', size => '${size | 50}', class => 'textinput ${Name}' , pattern=>'${regexp | ".*"}' , placeholder=>'${placeholder | Name}', Readonly=>'true' , title = 'Pattern regex mismatch'
+			%= text_field '${Name}', size => '${size | 50}', class => 'textinput ${Name}' , pattern=>'${regexp | ".*"}' , placeholder=>'${placeholder | Name}', Readonly=>'true' , title =>'Pattern regex mismatch'
 		<br></span></p>
 	]]></ReadonlyText>
 
@@ -83,7 +83,7 @@
 		%=Search field
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=search_field '${Name}' , class => 'searc${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</Search>
 	
@@ -93,7 +93,7 @@
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=URL_field '${Name}' , class => 'url${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</Url>
 
@@ -103,7 +103,7 @@
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=tel_field '${Name}', class => 'tel${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</Tel>
 
@@ -133,7 +133,7 @@
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=timedate_field '${Name}', class => 'time${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</Timedate>
 
@@ -143,7 +143,7 @@
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=week_field '${Name}', class => 'week${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</Week>
 
@@ -153,7 +153,7 @@
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=month_field '${Name}', class => 'mont${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</Month>
 	
@@ -163,7 +163,7 @@
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=range_field '${Name}', class => 'rang${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</Range>
 
@@ -173,7 +173,7 @@
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=radio_field '${Name}', class => 'radi${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</Radio>
 
@@ -183,7 +183,7 @@
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=number_field '${Name}', class => 'numb${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</Number>
 
@@ -193,7 +193,7 @@
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=file_field '${Name}', class => 'file${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</File>
 	
@@ -203,7 +203,7 @@
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=color_field '${Name}', class => 'colo${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</Color>
 	
@@ -213,7 +213,7 @@
 		</span><span class=data>
 			% param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}';
 			%=checkbox_field '${Name}', class => 'chec${type_serial}'
-		</span>span></p>
+		</span></p>
 		]]>
 	</Checkbox>
 
@@ -275,8 +275,11 @@
 		</div>
 		]]>
 	</Endgroup>
-
-
+	
+	<object><![CDATA[
+		<object data="<%='${url}' %>" title="<%= $c->stash('title') %>"  type="text/html" ><%= $c->stash('title') %> not found</object>
+	]]>
+	</object>
 	
 	
 </root>

Templates/partial.html.ep.tem

@@ -7,7 +7,7 @@
 		SelectInput();
 	};
 	</script>
-	% if ($config->{debug} == 1) {
+	% if (config->{debug} == 1) {
 		<pre>
 			%= dumper $$${prefix}_data
 		</pre>