File tree 3 files changed +4
-5
lines changed
3 files changed +4
-5
lines changed Original file line number Diff line number Diff line change @@ -3,6 +3,7 @@ Revision history for Perl module CPAN::Mini::Webserver:
3
3
0.44
4
4
- autogenerate the CSS and Images template files
5
5
- use Text::Unidecode so that searching for Leon Brocard works
6
+ - fix bug to do with "buffy -test" not showing modules
6
7
7
8
0.43 Thu Sep 18 17:14:50 BST 2008
8
9
- add an abstract to the Makefile.PL
Original file line number Diff line number Diff line change @@ -7,8 +7,6 @@ Reload indexes if the indexes have updated
7
7
8
8
Maybe use LWP::Online and gravatar?
9
9
10
- buffy -test should show modules too
11
-
12
10
Ideas from Max Maischein:
13
11
14
12
- (general)
Original file line number Diff line number Diff line change @@ -285,16 +285,16 @@ sub _do_search {
285
285
my $au_type = $self -> author_type;
286
286
my ( @authors , @distributions , @packages );
287
287
288
- if ( $q !~ / (?:::|-)/ ) {
288
+ if ( $q !~ / \w (?:::|-)\w / ) {
289
289
@authors = uniq grep { ref ($_ ) eq " Parse::CPAN::${au_type} ::Author" }
290
290
@results ;
291
291
}
292
- if ( $q !~ / :: / ) {
292
+ if ( $q !~ / \w :: \w / ) {
293
293
@distributions
294
294
= uniq grep { ref ($_ ) eq ' Parse::CPAN::Packages::Distribution' }
295
295
@results ;
296
296
}
297
- if ( $q !~ / - / ) {
297
+ if ( $q !~ / \w - \w / ) {
298
298
@packages = uniq grep { ref ($_ ) eq ' Parse::CPAN::Packages::Package' }
299
299
@results ;
300
300
}
You can’t perform that action at this time.
0 commit comments