--- loncom/lonnet/perl/lonrep.pm 2001/11/29 18:55:24 1.6 +++ loncom/lonnet/perl/lonrep.pm 2005/03/02 22:26:36 1.7 @@ -1,7 +1,7 @@ # The LearningOnline Network # Replication Manager # -# $Id: lonrep.pm,v 1.6 2001/11/29 18:55:24 www Exp $ +# $Id: lonrep.pm,v 1.7 2005/03/02 22:26:36 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -60,7 +60,7 @@ sub handler { } } else { my $response=Apache::lonnet::repcopy($filename); - if ($response==OK) { + if ($response eq 'OK') { $r->filename($filename); return OK; }