… | … | ||
---|---|---|---|
262 | package CFMail; | 262 | package CFMail; |
263 | 263 | ||
264 | use POSIX qw/strftime/; | 264 | use POSIX qw/strftime/; |
265 | use CFDB; | 265 | use CFDB; |
266 | 266 | ||
267 | my $MAILDB = CFDB->new (db_file => cf::localdir . "/crossfiremail"); | 267 | my $MAILDB = CFDB->new (db_file => "$LOCALDIR/crossfiremail"); |
268 | 268 | ||
269 | sub get_mail { | 269 | sub get_mail { |
270 | my ($toname) = @_; | 270 | my ($toname) = @_; |
271 | $MAILDB->get ($toname); | 271 | $MAILDB->get ($toname); |
272 | } | 272 | } |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |