mirror of
https://github.com/panda3d/panda3d.git
synced 2025-09-29 08:15:18 -04:00
for mv, checking out directories is a soft error
This commit is contained in:
parent
a667bcc97b
commit
45db8e3d8d
@ -403,13 +403,9 @@ sub CTCcaseMv {
|
|||||||
local( $parent2 ) = join( "/", @alist ) ;
|
local( $parent2 ) = join( "/", @alist ) ;
|
||||||
&CTUDebug( "parent directory of '" . $elem2 . "' is '" . $parent2 .
|
&CTUDebug( "parent directory of '" . $elem2 . "' is '" . $parent2 .
|
||||||
"'\n" ) ;
|
"'\n" ) ;
|
||||||
$ret = system( "cleartool co -nc $parent\n" ) ;
|
system( "cleartool co -nc $parent\n" ) ;
|
||||||
if ( $ret == 0 ) {
|
system( "cleartool co -nc $parent2\n" ) ;
|
||||||
$ret = system( "cleartool co -nc $parent2\n" ) ;
|
$ret = &CTURetCode( system( "cleartool mv $elem $elem2\n" )) ;
|
||||||
$ret = &CTURetCode( system( "cleartool mv $elem $elem2\n" )) ;
|
|
||||||
} else {
|
|
||||||
$ret = 0 ;
|
|
||||||
}
|
|
||||||
&CTUDebug( "out of CTCcaseMv\n" ) ;
|
&CTUDebug( "out of CTCcaseMv\n" ) ;
|
||||||
$ret ;
|
$ret ;
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user