[LON-CAPA-cvs] cvs: loncom /debugging_tools db_copy.pl

[albertel]

albertel		Thu Jan 25 13:05:41 2007 EDT

  Modified files:              
    /loncom/debugging_tools	db_copy.pl 
  Log:
  - make it do the correct location by default
  
  
Index: loncom/debugging_tools/db_copy.pl
diff -u loncom/debugging_tools/db_copy.pl:1.5 loncom/debugging_tools/db_copy.pl:1.6
--- loncom/debugging_tools/db_copy.pl:1.5	Fri Oct 13 17:00:06 2006
+++ loncom/debugging_tools/db_copy.pl	Thu Jan 25 13:05:40 2007
@@ -79,7 +79,7 @@
 }
 
 sub main {
-    my $dir = $perlvar{'lonUsersDir'}.'/temp/y/';
+    my $dir = $perlvar{'lonUsersDir'};
     print("Doing $dir\n");
     &find({ no_chdir   => 1,
             wanted     => \&count_db, },