bike/dswim
1
0
Fork 0
mirror of https://github.com/fspc/dswim.git synced 2025-02-22 08:33:24 -05:00
Code Issues Projects Releases Wiki Activity

Puts history files in the $main::home directory.

Browse Source
This commit is contained in:
freesource 2001-10-12 23:15:55 +00:00
parent 171f5643e5
commit 7f3c8841e3
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
SWIM/Library.pm
View File

@ -65,11 +65,11 @@ sub finddb {
if (($commands->{"dbpath"} && $commands->{"root"}) || if (($commands->{"dbpath"} && $commands->{"root"}) ||
($commands->{"dbpath"} && !$commands->{"root"}) || ($commands->{"dbpath"} && !$commands->{"root"}) ||
(!$commands->{"dbpath"} && !$commands->{"root"})) { (!$commands->{"dbpath"} && !$commands->{"root"})) {
$fileplace = "$parent$library"; $fileplace = "$main::home$parent$library";
return $fileplace; return $fileplace;
} }
elsif (!$commands->{"dbpath"} && $commands->{"root"}) { elsif (!$commands->{"dbpath"} && $commands->{"root"}) {
$fileplace = "$parent$base"; $fileplace = "$main::home$parent$base";
return $fileplace; return $fileplace;
} }