[LON-CAPA-cvs] cvs: loncom /homework structuretags.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Tue, 28 Jun 2005 19:56:13 -0000
albertel Tue Jun 28 15:56:13 2005 EDT
Modified files:
/loncom/homework structuretags.pm
Log:
- BG#4178, all whitespace ids aren't really ids
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.295 loncom/homework/structuretags.pm:1.296
--- loncom/homework/structuretags.pm:1.295 Tue Jun 28 15:17:36 2005
+++ loncom/homework/structuretags.pm Tue Jun 28 15:56:10 2005
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: structuretags.pm,v 1.295 2005/06/28 19:17:36 albertel Exp $
+# $Id: structuretags.pm,v 1.296 2005/06/28 19:56:10 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1135,7 +1135,7 @@
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
my $result='';
my $id= &Apache::lonxml::get_param('id',$parstack,$safeeval);
- if ($id eq '') { $id = $Apache::lonxml::curdepth; }
+ if ($id =~ /^\s*$/) { $id = $Apache::lonxml::curdepth; }
$Apache::inputtags::part=$id;
push(@Apache::inputtags::partlist,$id);
@Apache::inputtags::response=();