13d12
< use CGI::Cookie;
74c73
< 		finalize("Please input password.", $t, $l, $d, "");
---
> 		finalize("Please input password.", $t, $l, $d);
100c99
< 				finalize("RSS was updated successfully.", "", "", "", $p);
---
> 				finalize("RSS was updated successfully.", "", "", "");
106c105
< 			finalize("The password you typed is incorrect.", $t, $l, $d, "");
---
> 			finalize("The password you typed is incorrect.", $t, $l, $d);
231d229
<     my $p = shift;
235,239d232
<     if (!defined($p)) {
<         my %cookies = fetch CGI::Cookie;
<         $p = $cookies{'passwd'}->value if %cookies;
<     }
< 
307c300
< <input type="password" size="24" value="$p" name="p" id="p"><br>
---
> <input type="password" size="24" value="" name="p" id="p"><br>
340,344c333
< 	print $cgi->header(-type => 'text/html',
<                        -charset => 'UTF-8',
<                        -cookie => new CGI::Cookie(-name => 'passwd',
<                                                   -value => $p,
<                                                   -expires => '+1M'));
---
> 	print $cgi->header('text/html; charset=UTF-8');