forked from Lainports/opnsense-ports
8cb1a96ede
Taken from: https://github.com/freebsd/freebsd-ports.git Commit id: 5070672073b68be364139bc6b3a89100bd17d331
20 lines
742 B
Perl
20 lines
742 B
Perl
--- webinject.pl.orig Wed Jan 4 19:10:30 2006
|
|
+++ webinject.pl Mon Sep 4 16:19:08 2006
|
|
@@ -1362,12 +1362,12 @@
|
|
#------------------------------------------------------------------
|
|
sub getdirname { #get the directory webinject engine is running from
|
|
|
|
- $dirname = $0;
|
|
- $dirname =~ s~(.*/).*~$1~; #for nix systems
|
|
- $dirname =~ s~(.*\\).*~$1~; #for windoz systems
|
|
- if ($dirname eq $0) {
|
|
+# $dirname = $0;
|
|
+# $dirname =~ s~(.*/).*~$1~; #for nix systems
|
|
+# $dirname =~ s~(.*\\).*~$1~; #for windoz systems
|
|
+# if ($dirname eq $0) {
|
|
$dirname = './';
|
|
- }
|
|
+# }
|
|
}
|
|
#------------------------------------------------------------------
|
|
sub getoptions { #command line options
|