--- loncom/interface/loncommon.pm	2006/09/12 19:03:15	1.452
+++ loncom/interface/loncommon.pm	2006/09/21 21:23:15	1.458
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.452 2006/09/12 19:03:15 albertel Exp $
+# $Id: loncommon.pm,v 1.458 2006/09/21 21:23:15 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -257,7 +257,7 @@ of the element the selection from the se
 sub browser_and_searcher_javascript {
     my ($mode)=@_;
     if (!defined($mode)) { $mode='edit'; }
-    my $resurl=&lastresurl();
+    my $resurl=&escape_single(&lastresurl());
     return <<END;
 // <!-- BEGIN LON-CAPA Internal
     var editbrowser = null;
@@ -2111,7 +2111,7 @@ sub aboutmewrapper {
         return;
     }
     return '<a href="/adm/'.$domain.'/'.$username.'/aboutme"'.
-	($target?' target="$target"':'').' title="'.&mt('View this users personal page').'">'.$link.'</a>';
+	($target?' target="$target"':'').' title="'.&mt("View this user's personal page").'">'.$link.'</a>';
 }
 
 # ------------------------------------------------------------ Syllabus Wrapper
@@ -3199,16 +3199,23 @@ form, .inline { display: inline; }
   color: red;
   font-size: larger;
 }
-.LC_warning {
+.LC_warning,
+.LC_diff_removed {
   color: red;
 }
-.LC_success {
+.LC_success,
+.LC_diff_added {
   color: green;
 }
 .LC_icon {
   border: 0px;
 }
 
+table.LC_pastsubmission {
+  border: 1px solid black;
+  margin: 2px;
+}
+
 table#LC_top_nav, table#LC_menubuttons {
   width: 100%;
   background: $pgbg;
@@ -3499,7 +3506,8 @@ table#LC_browser tr.LC_browser_file_unpu
 table#LC_browser tr.LC_browser_file_obsolete {
   background: #AAAAAA;
 }
-table#LC_browser tr.LC_browser_file_modified {
+table#LC_browser tr.LC_browser_file_modified,
+table#LC_browser tr.LC_browser_file_metamodified {
   background: #FFFF77;
 }
 table#LC_browser tr.LC_browser_folder {
@@ -3726,8 +3734,8 @@ sub headtag {
     my $domain   = $args->{'domain'}   || &determinedomain();
     my $bgcolor  = $args->{'bgcolor'}  || &designparm($function.'.pgbg',$domain);
     my $url = join(':',$env{'user.name'},$env{'user.domain'},
-		   #time(),
 		   $Apache::lonnet::perlvar{'lonVersion'},
+		   #time(),
 		   $env{'environment.color.timestamp'},
 		   $function,$domain,$bgcolor);
 
@@ -5950,15 +5958,6 @@ sub lonhttpdurl {
     return 'http://'.$ENV{'SERVER_NAME'}.':'.$lonhttpd_port.$url;
 }
 
-sub absolute_url {
-    my ($host_name) = @_;
-    my $protocol = ($ENV{'SERVER_PORT'} == 443?'https://':'http://');
-    if ($host_name eq '') {
-	$host_name = $ENV{'SERVER_NAME'};
-    }
-    return $protocol.$host_name;
-}
-
 sub connection_aborted {
     my ($r)=@_;
     $r->print(" ");$r->rflush();