[prev in list] [next in list] [prev in thread] [next in thread] 

List:       ipcop-svn
Subject:    [Ipcop-svn] SF.net SVN: ipcop:[6144] ipcop/trunk
From:       owes () users ! sourceforge ! net
Date:       2011-11-30 14:38:13
Message-ID: E1RVlIb-0003Y4-Tp () sfp-svn-3 ! v30 ! ch3 ! sourceforge ! com
[Download RAW message or body]

Revision: 6144
          http://ipcop.svn.sourceforge.net/ipcop/?rev=6144&view=rev
Author:   owes
Date:     2011-11-30 14:38:13 +0000 (Wed, 30 Nov 2011)
Log Message:
-----------
Add some scripting tricks to 'auto-select' appropriate radiobuttons.

Modified Paths:
--------------
    ipcop/trunk/html/cgi-bin/servicegrps.cgi
    ipcop/trunk/updates/2.0.3/ROOTFILES.i486-2.0.3

Modified: ipcop/trunk/html/cgi-bin/servicegrps.cgi
===================================================================
--- ipcop/trunk/html/cgi-bin/servicegrps.cgi	2011-11-30 12:52:19 UTC (rev 6143)
+++ ipcop/trunk/html/cgi-bin/servicegrps.cgi	2011-11-30 14:38:13 UTC (rev 6144)
@@ -297,7 +297,7 @@
 
 # DEBUG DEBUG
 #&Header::openbox('100%', 'left', 'DEBUG');
-#foreach $line (keys %cgiparams) {
+#foreach my $line (keys %cgiparams) {
 #   print "<class IP_NAME='base'>$line = $cgiparams{$line}<BR>";
 #}
 #print "$ENV{'QUERY_STRING'}\n";
@@ -350,7 +350,7 @@
         $Lang::tr{'service group name'}:
     </td>
     <td width='25%'>
-        <input type='text' name='GROUP_NEW' value='$cgiparams{'GROUP_NEW'}' \
size='20' maxlength='18' $disabledNameTxt /> +        <input type='text' \
name='GROUP_NEW' value='$cgiparams{'GROUP_NEW'}' size='20' maxlength='18' \
$disabledNameTxt  onkeyup='this.form.GROUP_TYP[0].checked=true'/>  $hiddenGroupName
     </td>
     <td width='25%'>&nbsp;</td>
@@ -366,7 +366,7 @@
         $Lang::tr{'service group name'}:
     </td>
     <td colspan='3'>
-        <select name='GROUP_EXISTING' $disabled>
+        <select name='GROUP_EXISTING' $disabled \
onclick='this.form.GROUP_TYP[1].checked=true'>  END
 
     foreach my $group (@existingGroups) {
@@ -403,7 +403,7 @@
         $Lang::tr{'default services'}:
     </td>
     <td colspan='3'>
-        <select name='SERVICE_NAME_DEFAULT' $disabled>
+        <select name='SERVICE_NAME_DEFAULT' $disabled  \
onclick='this.form.SERVICE_TYP[0].checked=true'>  END
 
 my %defaultServices = ();
@@ -441,7 +441,7 @@
         $Lang::tr{'custom services'}:
     </td>
     <td colspan='3'>
-        <select name='SERVICE_NAME_CUSTOM' $disabled>
+        <select name='SERVICE_NAME_CUSTOM' $disabled \
onclick='this.form.SERVICE_TYP[1].checked=true'>  END
     print "<option value='BLANK' selected='selected'>N/A</option>" if \
($#customServices < 0);  foreach my $service (@customServices) {

Modified: ipcop/trunk/updates/2.0.3/ROOTFILES.i486-2.0.3
===================================================================
--- ipcop/trunk/updates/2.0.3/ROOTFILES.i486-2.0.3	2011-11-30 12:52:19 UTC (rev 6143)
+++ ipcop/trunk/updates/2.0.3/ROOTFILES.i486-2.0.3	2011-11-30 14:38:13 UTC (rev 6144)
@@ -1,6 +1,7 @@
 ## please place IPCop files first, then packages sorted by alphabetical order
 /home/httpd/cgi-bin/fwrules.cgi
 /home/httpd/cgi-bin/openvpn.cgi
+/home/httpd/cgi-bin/servicegrps.cgi
 /home/httpd/cgi-bin/trafficadm.cgi
 /home/httpd/cgi-bin/urlfilter.cgi
 /home/httpd/vhost81/cgi-bin/redirect.cgi

This was sent by the SourceForge.net collaborative development platform, the world's \
largest Open Source development site.


------------------------------------------------------------------------------
All the data continuously generated in your IT infrastructure 
contains a definitive record of customers, application performance, 
security threats, fraudulent activity, and more. Splunk takes this 
data and makes sense of it. IT sense. And common sense.
http://p.sf.net/sfu/splunk-novd2d
_______________________________________________
Ipcop-svn mailing list
Ipcop-svn@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/ipcop-svn


[prev in list] [next in list] [prev in thread] [next in thread]