X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Fmerge-referrals;h=e39f053e817596eeb62530bb6208b27f22817251;hp=ba07a81c64b00caa28082380ce6a1e7edbe6b40b;hb=75e11f1d1a5ced24496b5732e290f7762403feb8;hpb=a8e4b1744a6bbd2e1509b58e73b1d52751563880

diff --git a/bin/merge-referrals b/bin/merge-referrals
index ba07a81c6..e39f053e8 100644
--- a/bin/merge-referrals
+++ b/bin/merge-referrals
@@ -2,7 +2,7 @@
 
 use strict;
 use FS::UID qw(adminsuidsetup);
-use FS::Record qw(qsearchs);
+use FS::Record qw(qsearch);
 use FS::cust_main;
 
 my $user = shift or die "usage: merge-customers username custnum\n";