cvsuser 02/04/19 07:52:47
Modified: P5EEx/Blue/P5EEx/Blue/Context HTML.pm
Log:
changed $wc to $context
Revision Changes Path
1.8 +6 -6 p5ee/P5EEx/Blue/P5EEx/Blue/Context/HTML.pm
Index: HTML.pm
===================================================================
RCS file: /cvs/public/p5ee/P5EEx/Blue/P5EEx/Blue/Context/HTML.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -w -r1.7 -r1.8
--- HTML.pm 6 Mar 2002 23:03:24 -0000 1.7
+++ HTML.pm 19 Apr 2002 14:52:47 -0000 1.8
@@ -1,6 +1,6 @@
#############################################################################
-## $Id: HTML.pm,v 1.7 2002/03/06 23:03:24 spadkins Exp $
+## $Id: HTML.pm,v 1.8 2002/04/19 14:52:47 spadkins Exp $
#############################################################################
package P5EEx::Blue::Context::HTML;
@@ -147,7 +147,7 @@
my $html = $self->html(@_);
- my ($cgi, $title, $bodyoptions, $w, $var, $value, $wc_body, $wc_head);
+ my ($cgi, $title, $bodyoptions, $w, $var, $value, $context_body, $context_head);
$cgi = $self->{cgi};
@@ -169,8 +169,8 @@
}
}
- $wc_body = $self->body_html(\%main::conf);
- $wc_head = $self->head_html();
+ $context_body = $self->body_html(\%main::conf);
+ $context_head = $self->head_html();
my ($gzip, $accept_header, $header, $data);
@@ -179,10 +179,10 @@
<html>
<head>
<title>${title}</title>
-$wc_head</head>
+$context_head</head>
<body${bodyoptions}>
<form method="POST">
-$wc_body
+$context_body
$html</form>
</body>
</html>
