Update of /cvsroot/netpass/NetPass/www/htdocs/Admin
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16411/www/htdocs/Admin
Modified Files:
autohandler
Log Message:
Index: autohandler
===================================================================
RCS file: /cvsroot/netpass/NetPass/www/htdocs/Admin/autohandler,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -d -r1.20 -r1.21
--- autohandler 18 Jan 2006 19:21:37 -0000 1.20
+++ autohandler 18 Jan 2006 19:26:33 -0000 1.21
@@ -20,7 +20,6 @@
my $lt = shift;
my $url = shift;
my $SID = $m->session->{_session_id};
-#print STDERR "url $url\n";
return $lt.$url.'"' if $url =~ m{^\w+://}; # Don't alter external URLs
return $lt.$url.'"' if $url =~ m{javascript:ldap_popup}; # Don't alter external URLs
if ( $url !~ /npsess=/ ) {
@@ -38,6 +37,7 @@
sub add_session_id2 {
my $url = shift;
return $url if $url =~ m{^\w+://}; # Don't alter external URLs
+ return $url.'"' if $url =~ m{javascript:ldap_popup}; # Don't alter external URLs
if ($url =~ /\?/) {
$url =~ s/\?/?npsess=$m->session->{_session_id}&/;
} else {
|