fixed typos in the Link() commands.

git-svn-id: svn://10.0.0.236/trunk@110476 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
kestes%walrus.com 2001-12-14 20:17:34 +00:00
parent 4aed191404
commit a2a4580409

View File

@ -78,7 +78,7 @@ use Utils;
use HTMLPopUp;
use TinderDB::BasicTxtDB;
$VERSION = ( qw $Revision: 1.11 $ )[1];
$VERSION = ( qw $Revision: 1.12 $ )[1];
@ISA = qw(TinderDB::BasicTxtDB);
@ -258,8 +258,8 @@ sub render_notice {
"\t\t\t[<b>".
HTMLPopUp::Link(
"linktxt"=>$mailaddr,
"href"=>"mailto:$mailaddr",
"name"=>"$time/$mailaddr",
"href"=>"mailto:$mailaddr?subject=\"Tinderbox Notice\"",
"name"=>"$time\.$mailaddr",
).
" - ".
HTMLPopUp::Link(
@ -351,7 +351,7 @@ sub status_table_row {
# menus can view the notice.
my $href = (FileStructure::get_filename($tree, 'tree_URL').
"/all_notices.html#$first_notice_time");
"/all_notices.html\#$first_notice_time");
if ($rendered_notice) {