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

albertel lon-capa-cvs@mail.lon-capa.org
Tue, 26 Oct 2004 15:03:57 -0000


albertel		Tue Oct 26 11:03:57 2004 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  - doesn't need to tie the has, lonnavmaps takes care of it all
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.332 loncom/interface/lonprintout.pm:1.333
--- loncom/interface/lonprintout.pm:1.332	Wed Sep 29 02:06:34 2004
+++ loncom/interface/lonprintout.pm	Tue Oct 26 11:03:57 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.332 2004/09/29 06:06:34 albertel Exp $
+# $Id: lonprintout.pm,v 1.333 2004/10/26 15:03:57 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -41,10 +41,7 @@
 use Apache::lonratedt;
 use POSIX qw(strftime);
 use Apache::lonlocal;
-use GDBM_File;
 
-
-my %hash;
 my $LaTeXwidth = 0;
 
 
@@ -1474,11 +1471,6 @@
 sub printHelper {
     my $r = shift;
 
-    if ($ENV{'request.course.id'}) {
-	my $fn=$ENV{'request.course.fn'};
-	tie(%hash,'GDBM_File',"$fn.db",&GDBM_READER(),0640);
-    }
-
     if ($r->header_only) {
         if ($ENV{'browser.mathml'}) {
             &Apache::loncommon::content_type($r,'text/xml');
@@ -1963,9 +1955,7 @@
 
     $r->print($helper->display());
 
-    Apache::lonhelper::unregisterHelperTags();
-
-    untie %hash;
+    &Apache::lonhelper::unregisterHelperTags();
 
     return OK;
 }