Version 2 of with-path

Updated 2015-03-11 13:10:26 by dbohdan

dbohdan 2015-03-11: with-path is to cd what withOpenFile is to open.

proc with-path {path code} {
    set prevPath [pwd]
    cd $path
    uplevel 1 $code
    cd $prevPath
}