Skip Menu | will be shut down on March 1st, 2021.

This queue is for tickets about the AnyData CPAN distribution.

Report information
The Basics
Id: 6248
Status: resolved
Priority: 0/
Queue: AnyData

Owner: Nobody in particular
Requestors: perlbug [...]

Bug Information
Severity: Unimportant
Broken in: 0.08
Fixed in: (no value)


Subject: adColumn $distinct_flag not handled (patch supplied)
Download (untitled) / with headers
text/plain 583b
Dist: AnyData-0.10, obtained from Perl: v5.8.2 OS: MacOS X 3.3, GNU/Linux 2.4.20 Patch: Supplied AnyData::adColumn() is documented to take a third parameter to eliminate duplicated from the returned array of values. However, the parameter is not handled in The patch just passes the parameter to the underlying '$obj->adColumn' call which handles the third arg fully. Additionally, I added a semicolons to the final sub statement for both adRows() and adColumn(), though they weren't actually causing any trouble that I'm aware of. Cheers, John D. Lima
Download AnyData-0.10.patch
text/x-diff 524b
--- Thu May 6 14:07:17 2004 +++ Thu May 6 14:06:37 2004 @@ -498,13 +498,13 @@ my $thash = shift; my %keys = @_; my $obj = tied(%$thash); - return $obj->adRows(\%keys) + return $obj->adRows(\%keys); } sub adColumn { my $thash = shift; - my $column = shift; + my($column,$flags) = @_; my $obj = tied(%$thash); - return $obj->adColumn($column) + return $obj->adColumn($column,$flags); } sub adArray { my($format,$data)=@_;
I've applied the patch and it should be resolved in 0.11 Cheers Sven

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to