From: minima <minima>
Date: Fri, 8 Nov 2002 16:46:12 +0000 (+0000)
Subject: fix possible dos in dx command
X-Git-Tag: PRE-1-52~107
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=773d6294a511631a12a8ececb73023aa01443925;p=spider.git

fix possible dos in dx command
---

diff --git a/Changes b/Changes
index 48118ace..570c0207 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,6 @@
 08Nov02=======================================================================
 1. made some small mods to grepdbg and spot2csv.pl
+2. fix a possible DOS in dx command
 07Nov02=======================================================================
 1. allow three digit longitudes
 2. make a small change to see if messages now stay in place.
diff --git a/cmd/dx.pl b/cmd/dx.pl
index eefbb860..20046781 100644
--- a/cmd/dx.pl
+++ b/cmd/dx.pl
@@ -35,7 +35,7 @@ return (1, $self->msg('dx2')) unless @f >= 2;
 
 if ($f[0] =~ /^by$/i) {
     $spotter = uc $f[1];
-    $line =~ s/^\s*$f[0]\s+$f[1]\s+//;
+    $line =~ s/^\s*\Q$f[0]\s+\Q$f[1]\s+//;
 	$line = $f[2];
 	@f = split /\s+/, $line;
 	return (1, $self->msg('dx2')) unless @f >= 2;