X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FZeal%2FDocset.pm;h=bb7665fcb456600beef401d6cc3a71abae90f8ee;hb=b19d9e9c6cb9dd5d7677e5f0fc7a4a1a7b6db4de;hp=c3f2f36a3decf4f7bb6f0dd4deb5bb376d24eb62;hpb=164f653cb3a8ecfc674451034b4fd3fd10bfc6e0;p=zeal.git diff --git a/lib/Zeal/Docset.pm b/lib/Zeal/Docset.pm index c3f2f36..bb7665f 100644 --- a/lib/Zeal/Docset.pm +++ b/lib/Zeal/Docset.pm @@ -40,7 +40,11 @@ sub new { sub _blessdocs { my ($self, $docsref) = @_; - map { Zeal::Document->new(+{%$_, docset => $self}) } @$docsref; + map { + my %hash = (%$_, docset => $self); + ($hash{path}, $hash{anchor}) = split /#/s, $hash{path}; + Zeal::Document->new(\%hash); + } @$docsref; } sub fetch { @@ -173,7 +177,7 @@ Marius Gavrilescu, Emarius@ieval.roE =head1 COPYRIGHT AND LICENSE -Copyright (C) 2014 by Marius Gavrilescu +Copyright (C) 2014-2015 by Marius Gavrilescu This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.20.1 or,