git.shiar.nl
/
perl
/
plp
/
.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fixed all tie-stuff by reverting a change
[perl/plp/.git]
/
PLP.pm
diff --git
a/PLP.pm
b/PLP.pm
index 12abc1f9b7a4619229e6cac4a9be759db27ee514..2df9c3bbc4da114c290ca5357b8f46df3da2bf54 100644
(file)
--- a/
PLP.pm
+++ b/
PLP.pm
@@
-8,7
+8,6
@@
use PLP::Tie::Headers;
use PLP::Tie::Delay;
use PLP::Tie::Print;
use PLP::Tie::Delay;
use PLP::Tie::Print;
-use Symbol ();
#use strict;
our $VERSION = '3.10';
#use strict;
our $VERSION = '3.10';
@@
-231,8
+230,9
@@
sub start {
}
PLP::sendheaders() unless $PLP::sentheaders;
select STDOUT;
}
PLP::sendheaders() unless $PLP::sentheaders;
select STDOUT;
- # undef *{"PLP::Script::$_"} for keys %PLP::Script::;
- Symbol::delete_package('PLP::Script');
+ undef *{"PLP::Script::$_"} for keys %PLP::Script::;
+# Symbol::delete_package('PLP::Script');
+# The above does not work. TODO - find out why not.
}
# This is run by the CGI script.
}
# This is run by the CGI script.