===================================================================
RCS file: /cvs/wpscripts/ztransfer/send.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- wpscripts/ztransfer/send.pm	2011/06/03 09:28:47	1.1
+++ wpscripts/ztransfer/send.pm	2011/06/03 11:03:41	1.2
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: send.pm,v 1.1 2011/06/03 09:28:47 yason Exp $
+# $Id: send.pm,v 1.2 2011/06/03 11:03:41 yason Exp $
 package send;
 use fetch;
 use db;
@@ -8,9 +8,9 @@
 use warnings;
 
 # spool path constants (without leading slash)
-our $SPOOL_ZAYAVKI        = "/usr/backup/wp/zayavki";
-our $SPOOL_PROBAS         = "/usr/backup/wp/proba";
-our $SPOOL_TMPDIR         = "/usr/backup/temp";
+our $SPOOL_ZAYAVKI        = "/mnt/archive/archive/wp/zayavki";
+our $SPOOL_PROBAS         = "/mnt/archive/archive/wp/proba";
+our $SPOOL_TMPDIR         = "/mnt/archive/archive/temp";
 
 # temp variables for map table lookup
 our $ret;
@@ -85,6 +85,7 @@
 	else
 	{	
 	    # hardcoded
+	# how maket/rmt_maket could be used there?
 	    $remotepaths[$i] =~ s/V(1)/zV7/;
 	    $remotepaths[$i] =~ s/V(2)/zV8/;
 	    $remotepaths[$i] =~ s/V(3)/zV6/;