smeserver-htbwshaper/contribs7/smeserver-htbwshaper-1.0-chop.patch

diff -up smeserver-htbwshaper-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/htbwshaper.pm.chop smeserver-htbwshaper-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/htbwshaper.pm
--- smeserver-htbwshaper-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/htbwshaper.pm.chop    2009-03-02 07:23:20.000000000 -0500
+++ smeserver-htbwshaper-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/htbwshaper.pm 2012-09-12 23:09:13.000000000 -0400
@@ -73,11 +73,11 @@ sub get_active_interface
                chop($cur_iface);
                if($cur_iface eq $def_iface)
                {
-                       $list .= "<OPTION VALUE=\"$_\" SELECTED>$_";
+                       $list .= "<OPTION VALUE=\"$cur_iface\" SELECTED>$cur_iface";
                }
                else
                {
-                       $list .= "<OPTION VALUE=\"$_\">$_";
+                       $list .= "<OPTION VALUE=\"$cur_iface\">$cur_iface";
                }
        }
 
1	diff -up smeserver-htbwshaper-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/htbwshaper.pm.chop smeserver-htbwshaper-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/htbwshaper.pm
2	--- smeserver-htbwshaper-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/htbwshaper.pm.chop 2009-03-02 07:23:20.000000000 -0500
3	+++ smeserver-htbwshaper-1.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/htbwshaper.pm 2012-09-12 23:09:13.000000000 -0400
4	@@ -73,11 +73,11 @@ sub get_active_interface
5	chop($cur_iface);
6	if($cur_iface eq $def_iface)
7	{
8	- $list .= "<OPTION VALUE=\"$_\" SELECTED>$_";
9	+ $list .= "<OPTION VALUE=\"$cur_iface\" SELECTED>$cur_iface";
10	}
11	else
12	{
13	- $list .= "<OPTION VALUE=\"$_\">$_";
14	+ $list .= "<OPTION VALUE=\"$cur_iface\">$cur_iface";
15	}
16	}
17