[LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm

[www]

www		Wed Dec 11 15:07:34 2002 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  Hopefully fixes the second part of Bug#948
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.95 loncom/interface/lonprintout.pm:1.96
--- loncom/interface/lonprintout.pm:1.95	Mon Dec  9 12:46:46 2002
+++ loncom/interface/lonprintout.pm	Wed Dec 11 15:07:34 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.95 2002/12/09 17:46:46 www Exp $
+# $Id: lonprintout.pm,v 1.96 2002/12/11 20:07:34 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -465,8 +465,8 @@
         if ($ENV{'form.url'}=~m/\.page\s*$/) {
 	  ($result,$number_of_columns) = &page_cleanup($result);
         }
-      } else{
-        $result='\documentclass[letterpaper]{article}\usepackage{calc}\begin{document}You are trying to print either a sequence or something similar. Currently this option is not supported. Sorry for the inconvenience. Bye. Your current URL is '.$ENV{'form.url'}.' \end{document}'
+      } elsif ($ENV{'form.url'}!~/\/(aboutme|syllabus|bulletinboard|smppg)$/) {
+        $result='\documentclass[letterpaper]{article}\usepackage{calc}\begin{document}Printout of this type of document is currently not supported: '.$ENV{'form.url'}.' \end{document}'
       }
     } elsif ($choice eq 'Standard LaTeX output for the primary sequence' or 
              $choice eq 'Standard LaTeX output for whole primary sequence') {