--- toast	2003/10/26 21:43:17	1.231
+++ toast	2003/10/26 22:13:57	1.232
@@ -2866,11 +2866,13 @@
   @urls = pkgurls($name, $version) unless @urls;
   error unless @urls;
 
-  my(%linkmap);
-  my($verpat) = $version =~ /^\d/ ? '\d.*' : '.+';
+  # Look for new version numbers that start with a digit and that don't
+  # contain dashes (as in "zsh-4.0.6-doc.tar.gz"),
+  # unless the original version number lacked those properties.
+  my($verchar) = $version =~ /-/ ? '.' : '[^\-]';
+  my($verpat) = $version =~ /^\d/ ? "\\d$verchar*" : "$verchar+";
 
-  my(%candidates);
-  my(@newurls);
+  my(%linkmap, %candidates, @newurls);
   my($hasver) = false;
   for(@urls)
   {