Removed unnecessary slash at the end of path returned by method CurrentDirectory...

diff --git a/src/OSD/OSD_Process.cxx b/src/OSD/OSD_Process.cxx
index 17ed7074c732804318f84165d47f509dc4ed68ac..8c7693315995d08cf4d80d3602af2fd7a9c76873 100644 (file)
--- a/src/OSD/OSD_Process.cxx
+++ b/src/OSD/OSD_Process.cxx
@@ -133,7 +133,6 @@ TCollection_AsciiString Name;
      result.SetValues("","","",Disk,Directory,"","");
    }
 #else
-   Name += TCollection_AsciiString("/");
    result = OSD_Path(Name);
    //      result.SetValues("","","","",Name,"","");
 #endif

diff --git a/tests/bugs/fclasses/bug309 b/tests/bugs/fclasses/bug309
index 24c7a65ddf7191dde9bb1e9414bf034842dbf62f..455c620617bfcd38c764e6f6fa09d63c14412daa 100644 (file)
--- a/tests/bugs/fclasses/bug309
+++ b/tests/bugs/fclasses/bug309
@@ -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"