changeset 660 | 66ff3e731c60 |
parent 639 | 0e65f93be3cb |
child 663 | 8e27d440923e |
--- a/metatools/sysdeftools/rootsysdef.pl Mon Oct 18 10:23:52 2010 +0100 +++ b/metatools/sysdeftools/rootsysdef.pl Mon Oct 18 10:33:54 2010 +0100 @@ -252,6 +252,10 @@ my ($name,$path) = fileparse($_[0]); if($path eq '' && $name eq '') {return}; $path=~tr,\\,/,; + if ($path eq './') + { + return abs_path('.').$name; + } if( -e $path) { return abs_path($path)."/$name";