- Timestamp:
- 09/10/14 17:20:41 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/DNSDB.pm
r657 r658 4131 4131 $location = '' if !$location; 4132 4132 4133 my $expires = shift ;4133 my $expires = shift || ''; 4134 4134 $expires = 1 if $expires eq 'until'; # Turn some special values into the appropriate booleans. 4135 4135 $expires = 0 if $expires eq 'after'; … … 4277 4277 $location = '' if !$location; 4278 4278 4279 my $expires = shift ;4279 my $expires = shift || ''; 4280 4280 $expires = 1 if $expires eq 'until'; # Turn some special values into the appropriate booleans. 4281 4281 $expires = 0 if $expires eq 'after';
Note:
See TracChangeset
for help on using the changeset viewer.