projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
fa1d722
)
add mojo->master backward compatibility
author
Dirk Koopman
<djk@tobit.co.uk>
Tue, 21 Feb 2017 16:14:46 +0000
(16:14 +0000)
committer
Dirk Koopman
<djk@tobit.co.uk>
Tue, 21 Feb 2017 16:14:46 +0000
(16:14 +0000)
perl/grepdbg
patch
|
blob
|
history
perl/watchdbg
patch
|
blob
|
history
diff --git
a/perl/grepdbg
b/perl/grepdbg
index 3d1526f8d70b93446548ee9257ce7b0c87349484..1282d71fb680861baa7d306bb21c9d7a9161d976 100755
(executable)
--- a/
perl/grepdbg
+++ b/
perl/grepdbg
@@
-18,6
+18,9
@@
#
require 5.004;
+package main;
+
+use vars qw($data);
# search local then perl directories
BEGIN {
@@
-29,6
+32,8
@@
BEGIN {
unshift @INC, "$root/local";
}
+$data = "$root/data";
+
use DXVars;
use DXUtil;
use DXLog;
diff --git
a/perl/watchdbg
b/perl/watchdbg
index 348ac8fe7bbbe5ab49101d635c429b9a66113ed3..84a74c8fd399a0d6644658605d6e735b79968bf4 100755
(executable)
--- a/
perl/watchdbg
+++ b/
perl/watchdbg
@@
-11,6
+11,7
@@
#
require 5.004;
+package main;
# search local then perl directories
BEGIN {
@@
-22,6
+23,8
@@
BEGIN {
unshift @INC, "$root/local";
}
+$data = "$root/data";
+
use IO::File;
use DXVars;
use DXUtil;