Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re: PM Login Problems

by Zecho (Hermit)
on Oct 22, 2001 at 09:31 UTC ( [id://120436]=note: print w/replies, xml ) Need Help??


in reply to PM Login Problems

Here's a quick fix I worked up here on my machine
At the top of the code for the login page, I added:
if ($query->param('safe_mode') eq 'true') { $$VARS{nodelets_off} = 1; } else { $$VARS{nodelets_off} = 0; }
and I changed this:
$query->checkbox("expires", "", "+10y", "save me a permanent c +ookie, cowboy!"). $query->submit("submit", "submit")

to
$query->checkbox("expires", "", "+10y", "save me a permanent c +ookie, cowboy!")."<br>". $query->checkbox("safe_mode", "", "true" ,"Nodelets Of +f.")."<br>". $query->submit("submit", "submit")
This works like a charm, without any side effects (at least none that I've seen so far). It's just a suggestion but, knowing my experience-level, there may be security or other related issues that I'm not aware of.

Update if you want to see this in action, go here and just click it on and off, no need for a username etc. Once you click submit, it will adjust the nodelets accordingly.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://120436]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others surveying the Monastery: (3)
As of 2024-04-26 03:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found