Help with 'isdirectory'

[ironmonkey69]

Hi all,

I have been having problems setting up an 'if' statement that is using a 'isdirectory' command. I pass a string into the if statement thru a command line argument. The backup file exists in the directory that it is looking in but the if statement keeps falling through. Here is a copy of the code that I am using:

proc test {args} {
for each new $args
if{[file isdirectory $args.original] == 1}
set dir "$args"
set dirOriginal "$args.original"
exec mv -f $dirOriginal $dir

 

[ironmonkey69]

This is what it actually looks like:

proc test {args} {
for each new $args
if{[file isdirectory $new.original] == 1}
set dir "$new"
set dirOriginal "$new.original"
exec mv -f $dirOriginal $dir

 

[feherke]

Hi

[ul]
[li]What is args ?[/li]
[li]The [tt]foreach[/tt] function's name should be written as one word[/li]
[/ul]

Feherke.

http://rootshell.be/~feherke/

 

[ironmonkey69]

args is the argument taken in from the command line

ex. source /data/new/new.tcl /home/new.new.current.txt

 

[feherke]

Hi

You mean this ?

Feherke.

http://rootshell.be/~feherke/

 

[ironmonkey69]

no, you can use almost any variable that you choose, it can have almost any name. Can I get some help with the 'isdirectory' statement within the 'if' statement?

 

[Bong]

ironmonkey,
file isdirectory $new.original returns a boolean so the whole ==1 thing is redundant and may be causing your problem. I tested a simple example with:
if [file isdirectory $new.original] {[red]do something[/red]} and it worked fine.

The {} suppresses substitution so that could be an issue.

_________________
Bob Rashkin