projects
/
BackupPC.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
fab4f90
)
remove unused getHyperEstraier_url
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Fri, 7 Jan 2011 18:03:02 +0000
(18:03 +0000)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Fri, 7 Jan 2011 18:03:02 +0000
(18:03 +0000)
lib/BackupPC/SearchLib.pm
patch
|
blob
|
history
diff --git
a/lib/BackupPC/SearchLib.pm
b/lib/BackupPC/SearchLib.pm
index
7764b30
..
c19730f
100644
(file)
--- a/
lib/BackupPC/SearchLib.pm
+++ b/
lib/BackupPC/SearchLib.pm
@@
-10,6
+10,7
@@
use vars qw(%In $MyURL);
use Time::HiRes qw/time/;
use XML::Writer;
use IO::File;
use Time::HiRes qw/time/;
use XML::Writer;
use IO::File;
+use Search::Estraier 0.04;
my $on_page = 100;
my $pager_pages = 10;
my $on_page = 100;
my $pager_pages = 10;
@@
-263,18
+264,6
@@
sub getFiles($) {
return ($results, \@ret);
}
return ($results, \@ret);
}
-sub getHyperEstraier_url($) {
- my ($use_hest) = @_;
-
- return unless $use_hest;
-
- use Search::Estraier 0.04;
- die "direct access to Hyper Estraier datatase is no longer supported. Please use estmaster\n"
- unless ($use_hest =~ m#^http://#);
-
- return $use_hest;
-}
-
sub getFilesHyperEstraier($) {
my ($param) = @_;
sub getFilesHyperEstraier($) {
my ($param) = @_;