[interchange-cvs] interchange - kwalsh modified
dist/src/mod_perl2/Interchange/Link.pm
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Sat Dec 9 15:46:16 EST 2006
User: kwalsh
Date: 2006-12-09 20:46:16 GMT
Modified: dist/src/mod_perl2/Interchange Link.pm
Log:
* Minor asthetics change: Lower-cased all of the HTML tags returned
as part of the module's internally-generated error message pages.
Revision Changes Path
1.11 +17 -17 interchange/dist/src/mod_perl2/Interchange/Link.pm
rev 1.11, prev_rev 1.10
Index: Link.pm
===================================================================
RCS file: /var/cvs/interchange/dist/src/mod_perl2/Interchange/Link.pm,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -r1.10 -r1.11
--- Link.pm 28 Jun 2006 14:39:41 -0000 1.10
+++ Link.pm 9 Dec 2006 20:46:16 -0000 1.11
@@ -2,7 +2,7 @@
# Interchange::Link -- mod_perl 1.99/2.0 module for linking to Interchange
#
-# $Id: Link.pm,v 1.10 2006/06/28 14:39:41 kwalsh Exp $
+# $Id: Link.pm,v 1.11 2006/12/09 20:46:16 kwalsh Exp $
#
# Copyright (C) 2002-2005 Interchange Development Group
# Copyright (C) 1996-2002 Red Hat, Inc.
@@ -48,7 +48,7 @@
=head1 VERSION
-$Revision: 1.10 $
+$Revision: 1.11 $
=head1 SYNOPSIS
@@ -425,13 +425,14 @@
$r->content_type ("text/html");
$r->print (<<EOF);
-<HTML><HEAD><TITLE>Interrupted</TITLE></HEAD>
-<BODY BGCOLOR="#FFFFFF">
-<H3>Someone pressed stop...</H3>
-<P>
+<html><head><title>Interrupted</title></head>
+<body bgcolor="#FFFFFF">
+<h3>Someone pressed stop...</h3>
+<p>
We have aborted this request because someone terminated it.
Please try again soon.
-</BODY></HTML>
+</p>
+</body></html>
EOF
}
@@ -445,21 +446,20 @@
$r->content_type ("text/html");
$r->print (<<EOF);
-<HTML><HEAD><TITLE>Interchange server not running</TITLE></HEAD>
-<BODY BGCOLOR="#FFFFFF">
-<H3>We're sorry, the Interchange server was not running...</H3>
-<P>
+<html><head><title>Interchange server not running</title></head>
+<body bgcolor="#FFFFFF">
+<h3>We're sorry, the Interchange server was not running...</h3>
+<p>
We are out of service or may be experiencing high system demand.
Please try again soon.
-
-<H3>This is it:</H3>
-<PRE>
+</p>
+<h3>This is it:</h3>
+<pre>
$arg
$env
$ent
-</PRE>
-
-</BODY></HTML>
+</pre>
+</body></html>
EOF
}
More information about the interchange-cvs
mailing list