--- loncom/interface/lonmeta.pm 2003/10/24 14:58:36 1.39
+++ loncom/interface/lonmeta.pm 2003/12/26 16:27:20 1.42
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Metadata display handler
#
-# $Id: lonmeta.pm,v 1.39 2003/10/24 14:58:36 albertel Exp $
+# $Id: lonmeta.pm,v 1.42 2003/12/26 16:27:20 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -55,7 +55,7 @@ sub dynamicmeta {
my %sum=();
my %cnt=();
my %concat=();
- my %listitems=('count' => 'add',
+ my %listitems=(
'course' => 'add',
'goto' => 'add',
'comefrom' => 'add',
@@ -104,9 +104,24 @@ sub dynamicmeta {
$returnhash{$_.'_list'}=$concat{$_};
### Apache->request->print("\n
".$_.': '.$returnhash{$_}.'
'.$returnhash{$_.'_list'});
}
+ #
+ # Deal with 'count' seperately
+ $returnhash{'count'} = &access_count($url,$aauthor,$adomain);
+
return %returnhash;
}
+sub access_count {
+ my ($src,$author,$adomain) = @_;
+ my %countdata=&Apache::lonnet::dump('nohist_accesscount',$adomain,
+ $author,$src);
+ if (! exists($countdata{$src})) {
+ return 'Not Available';
+ } else {
+ return $countdata{$src};
+ }
+}
+
# ------------------------------------- Try to make an alt tag if there is none
sub alttag {
@@ -258,6 +273,9 @@ my %lt=&Apache::lonlocal::texthash(
'kw' => 'Keyword(s)',
'no' => 'Notes',
'ab' => 'Abstract',
+ 'lg' => 'Lowest Grade Level',
+ 'hg' => 'Highest Grade Level',
+ 'st' => 'Standards',
'mi' => 'MIME Type',
'la' => 'Language',
'cd' => 'Creation Date',
@@ -287,6 +305,12 @@ $versiondisplay
$content{'notes'} |
$lt{'ab'} |
$content{'abstract'} |
+$lt{'lg'} |
+$content{'lowestgradelevel'} |
+$lt{'hg'} |
+$content{'highestgradelevel'} |
+$lt{'st'} |
+$content{'standards'} |
$lt{'mi'} |
$mime ($content{'mime'}) |
$lt{'la'} |
@@ -475,7 +499,8 @@ ENDEDIT
}
if (m/copyright/) {
$r->print(&Apache::lonpublisher::selectbox($_,'new_'.$_,
- $Apache::lonpublisher::metadatafields{$_},
+ ($Apache::lonpublisher::metadatafields{$_}?
+ $Apache::lonpublisher::metadatafields{$_}:'default'),
\&Apache::loncommon::copyrightdescription,
(&Apache::loncommon::copyrightids)));
} elsif (m/language/) {