[LON-CAPA-cvs] cvs: loncom(version_1_1_X) /interface lonnavmaps.pm

[albertel]

albertel		Thu May  6 11:04:00 2004 EDT

  Modified files:              (Branch: version_1_1_X)
    /loncom/interface	lonnavmaps.pm 
  Log:
  - backport is_problem fix
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.242 loncom/interface/lonnavmaps.pm:1.242.2.1
--- loncom/interface/lonnavmaps.pm:1.242	Mon Dec  1 09:38:25 2003
+++ loncom/interface/lonnavmaps.pm	Thu May  6 11:04:00 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.242 2003/12/01 14:38:25 matthew Exp $
+# $Id: lonnavmaps.pm,v 1.242.2.1 2004/05/06 15:04:00 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3167,7 +3167,7 @@
 sub is_problem {
     my $self=shift;
     my $src = $self->src();
-    return ($src =~ /problem$/);
+    return ($src =~ /\.(problem|exam|quiz|assess|survey|form|library)$/);
 }
 sub is_sequence {
     my $self=shift;