--- loncom/interface/loncommon.pm 2004/07/26 21:57:27 1.203
+++ loncom/interface/loncommon.pm 2004/09/24 22:08:02 1.205.2.2
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.203 2004/07/26 21:57:27 albertel Exp $
+# $Id: loncommon.pm,v 1.205.2.2 2004/09/24 22:08:02 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -688,7 +688,7 @@ function helpMenu(caller) {
}
}
-
+
ENDTEMPLATE
if ($component_help) {
if (!$text) {
@@ -1817,7 +1817,7 @@ sub noteswrapper {
sub aboutmewrapper {
my ($link,$username,$domain,$target)=@_;
- return ''.$link.'';
}
@@ -3651,6 +3651,13 @@ sub icon {
return $iconname;
}
+sub connection_aborted {
+ my ($r)=@_;
+ $r->print(" ");$r->rflush();
+ my $c = $r->connection;
+ return $c->aborted();
+}
+
=pod
=back