X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=bin%2FBackupPC;h=c6fc7d2a37d88bd1850514e26041a1bd7ddebab7;hp=67a31d86a97be0e0cb7197f69c7f80ec1add5b48;hb=c615e1bfc6f2b0604a2658996f5dd6b6cfa9469c;hpb=1015740e2b58fc43d7cf49881f190a9612e73fff

diff --git a/bin/BackupPC b/bin/BackupPC
index 67a31d8..c6fc7d2 100755
--- a/bin/BackupPC
+++ b/bin/BackupPC
@@ -1,4 +1,4 @@
-#!/bin/perl
+#!/usr/bin/perl
 #============================================================= -*-perl-*-
 #
 # BackupPC: Main program for PC backups.
@@ -29,7 +29,7 @@
 #   Craig Barratt  <cbarratt@users.sourceforge.net>
 #
 # COPYRIGHT
-#   Copyright (C) 2001-2007  Craig Barratt
+#   Copyright (C) 2001-2009  Craig Barratt
 #
 #   This program is free software; you can redistribute it and/or modify
 #   it under the terms of the GNU General Public License as published by
@@ -47,7 +47,7 @@
 #
 #========================================================================
 #
-# Version 3.2.0beta0, released 17 Jan 2009.
+# Version 3.2.0, released 31 Jul 2010.
 #
 # See http://backuppc.sourceforge.net.
 #
@@ -1749,7 +1749,7 @@ sub QueueAllPCs
 {
     my $nSkip = 0;
 
-    foreach my $host ( sort(HostSortCompare keys(%$Hosts)) ) {
+    foreach my $host ( sort HostSortCompare keys(%$Hosts) ) {
         $nSkip++ if ( QueueOnePC($host, $host, 'BackupPC', 'bg', 'auto') == 2 );
     }
     foreach my $dhcp ( @{$Conf{DHCPAddressRanges}} ) {