[LON-CAPA-cvs] cvs: loncom /html/res/adm/pages/annotator admannotations.pm
raeburn
raeburn@source.lon-capa.org
Thu, 11 Dec 2008 13:33:48 -0000
raeburn Thu Dec 11 13:33:48 2008 EDT
Modified files:
/loncom/html/res/adm/pages/annotator admannotations.pm
Log:
- Probably what was intended in rev 1.28.
Index: loncom/html/res/adm/pages/annotator/admannotations.pm
diff -u loncom/html/res/adm/pages/annotator/admannotations.pm:1.30 loncom/html/res/adm/pages/annotator/admannotations.pm:1.31
--- loncom/html/res/adm/pages/annotator/admannotations.pm:1.30 Thu Nov 20 14:37:45 2008
+++ loncom/html/res/adm/pages/annotator/admannotations.pm Thu Dec 11 13:33:48 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# This will take annotations and then plug them into a page.
#
-# $Id: admannotations.pm,v 1.30 2008/11/20 14:37:45 jms Exp $
+# $Id: admannotations.pm,v 1.31 2008/12/11 13:33:48 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -41,8 +41,7 @@
sub write_annotation {
my ($symb, $enc, $annotation) = @_;
-
- $annotation=~s/$^\s*$//;
+ $annotation=~s/^\s*$//;
my $key = $symb;
if (!$enc) {
$key =