Commit 211b44e3 authored by Per Cederqvist's avatar Per Cederqvist

(copy_aux): New function. Use built-in TCL support instead of system

	"cp ..." to copy files.  Remove the target file before copying
	a file to it, to avoid permission problems.  Use copy_aux
	everywhere that aux-items-18.conf was created.
parent 031643ab
......@@ -26,7 +26,15 @@
read_versions
set myaux "lyskomd.0/aux-items-18.conf"
system "cp $srcdir/lyskomd.0/aux-items.conf $myaux"
proc copy_aux {file} {
global myaux
file delete $myaux
file copy $file $myaux
}
copy_aux $srcdir/lyskomd.0/aux-items.conf
lyskomd_start "$myaux"
client_start 0
......@@ -39,7 +47,7 @@ simple_expect "=1000"
send "1001 96\n"
simple_expect "=1001 39 { 10003 10002 10001 10000 4000 3002 3001 3000 2007 2006 2005 2004 2003 2002 2001 2000 1022 1021 1020 1019 1018 1017 1016 1015 1014 1013 1012 1011 1010 1009 1008 1007 1006 1005 1004 1003 1002 1001 1000 }"
system "cp $aux_item_default_conf_file $myaux"
copy_aux $aux_item_default_conf_file
send "1002 96\n"
simple_expect "=1002 39 { 10003 10002 10001 10000 4000 3002 3001 3000 2007 2006 2005 2004 2003 2002 2001 2000 1022 1021 1020 1019 1018 1017 1016 1015 1014 1013 1012 1011 1010 1009 1008 1007 1006 1005 1004 1003 1002 1001 1000 }"
......@@ -52,7 +60,7 @@ simple_expect "=1003 37 { 10104 10103 10102 10101 10100 32 31 30 29 28 27 26 25
send "1004 96\n"
simple_expect "=1004 37 { 10104 10103 10102 10101 10100 32 31 30 29 28 27 26 25 24 23 22 21 20 19 18 17 16 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 }"
system "cp $srcdir/lyskomd.0/aux-items.conf $myaux"
copy_aux $srcdir/lyskomd.0/aux-items.conf
system "kill -WINCH $lyskomd_pid"
......@@ -74,7 +82,7 @@ system "kill -WINCH $lyskomd_pid"
send "1008 96\n"
simple_expect "=1008 39 { 10003 10002 10001 10000 4000 3002 3001 3000 2007 2006 2005 2004 2003 2002 2001 2000 1022 1021 1020 1019 1018 1017 1016 1015 1014 1013 1012 1011 1010 1009 1008 1007 1006 1005 1004 1003 1002 1001 1000 }"
system "cp $aux_item_default_conf_file $myaux"
copy_aux $aux_item_default_conf_file
system "kill -WINCH $lyskomd_pid"
send "1009 96\n"
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment