mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-09 13:22:24 +03:00
Removed unnecessary slash at the end of path returned by method CurrentDirectory of OSD_Process class
This commit is contained in:
@@ -133,7 +133,6 @@ TCollection_AsciiString Name;
|
||||
result.SetValues("","","",Disk,Directory,"","");
|
||||
}
|
||||
#else
|
||||
Name += TCollection_AsciiString("/");
|
||||
result = OSD_Path(Name);
|
||||
// result.SetValues("","","","",Name,"","");
|
||||
#endif
|
||||
|
@@ -23,8 +23,8 @@ if { ${ll} != 2 } {
|
||||
set CurrentDirectory [ string range $CurrentDirectory 2 [expr [string length $CurrentDirectory] -1 ]]
|
||||
set UpTrek [ string range $UpTrek 2 [expr [string length $UpTrek] -1 ]]
|
||||
} else {
|
||||
set res1 [ string range $result1 1 [expr [string length $result1] -3 ] ]
|
||||
set res2 [ string range $result2 1 [expr [string length $result2] -3 ] ]
|
||||
set res1 [ string range $result1 1 [expr [string length $result1] -2 ] ]
|
||||
set res2 [ string range $result2 1 [expr [string length $result2] -2 ] ]
|
||||
}
|
||||
if {[string compare ${res1} "${CurrentDirectory}"] == 0} {
|
||||
puts "OCC309: OK 1"
|
||||
|
Reference in New Issue
Block a user