--- loncom/interface/londocs.pm 2007/12/01 01:59:55 1.300
+++ loncom/interface/londocs.pm 2008/03/17 14:13:27 1.305
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.300 2007/12/01 01:59:55 albertel Exp $
+# $Id: londocs.pm,v 1.305 2008/03/17 14:13:27 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1205,8 +1205,8 @@ sub update_paste_buffer {
}
$url=~s{http(:|:)//https(:|:)//}{https$2//};
- &Apache::lonnet::appenv('docs.markedcopy_title' => $title,
- 'docs.markedcopy_url' => $url);
+ &Apache::lonnet::appenv({'docs.markedcopy_title' => $title,
+ 'docs.markedcopy_url' => $url});
delete($env{'form.markcopy'});
}
@@ -1233,7 +1233,7 @@ ENDPASTE
$icon = &Apache::loncommon::lonhttpdurl($r->dir_config('lonIconsURL'));
$icon .= '/folder_closed.gif';
}
- my $icon = '';
+ $icon = '
';
$r->print($icon.$type.': '. &parse_supplemental_title(&LONCAPA::map::qtescape($env{'docs.markedcopy_title'})));
}
if ($container eq 'page') {
@@ -2891,7 +2891,7 @@ value="$lt{'newp'}" />$help{'Adding_Page