Mercurial > hg > octave-lyh
diff liboctave/file-ops.cc @ 3074:42975c59d2a0
[project @ 1997-07-24 19:33:35 by jwe]
author | jwe |
---|---|
date | Thu, 24 Jul 1997 19:35:44 +0000 |
parents | 443851377f3f |
children | d14c483b3c12 |
line wrap: on
line diff
--- a/liboctave/file-ops.cc +++ b/liboctave/file-ops.cc @@ -348,10 +348,7 @@ = file_ops::tilde_expansion_preexpansion_hook (username); if (! expansion.empty ()) - { - dirname = expansion + filename.substr (user_len); - return dirname; - } + return expansion + filename.substr (user_len+1); } // No preexpansion hook, or the preexpansion hook failed. Look in the @@ -370,7 +367,7 @@ = file_ops::tilde_expansion_failure_hook (username); if (! expansion.empty ()) - dirname = expansion + filename.substr (user_len); + dirname = expansion + filename.substr (user_len+1); } // If we don't have a failure hook, or if the failure hook did not @@ -380,7 +377,7 @@ dirname = filename; } else - dirname = pw.dir () + filename.substr (user_len); + dirname = pw.dir () + filename.substr (user_len+1); return dirname; }