Fix pushing

diff --git a/firewall/open-ports.pl b/firewall/open-ports.pl
old mode 100644 (file)
new mode 100755 (executable)
index 8b33948..045d196
--- a/firewall/open-ports.pl
+++ b/firewall/open-ports.pl
@@ -102,7 +102,7 @@ PORT: foreach $p (@ARGV) {
        else {
                $r->{'dport'} = [ "", $p ];
                }
-       splice(@{$filter->{'files'}}, $r);
+       unshift(@{$filter->{'files'}}, $r);
        push(@added, $p);
        }
 
@@ -135,4 +135,3 @@ else {
        print STDERR "Add ports are already open\n";
        exit(0);
        }
-