# | Line 30 | Line 30 | sub new { | |
---|---|---|
30 | $self={}; | |
31 | bless $self, $class; | |
32 | # -- default settings | |
33 | < | $self->{cachedir}="~/.SCRAM/globalcache"; |
33 | > | $self->{cachedir}=$ENV{HOME}."/.SCRAM/globalcache"; |
34 | $self->{scramprojectsdbdir}=$ENV{SCRAM_LOOKUPDB}; | |
35 | return $self; | |
36 | } |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |