From 94e9da6f6c654f45bc7efb7a4e6591c64f0553c5 Mon Sep 17 00:00:00 2001
From: yorhel <yorhel@1fe2e327-d9db-4752-bcf7-ef0cb4a1748b>
Date: Sun, 13 Jul 2008 12:45:54 +0000
Subject: Zero-padded VNDBIDs shouldn't match

git-svn-id: svn://vndb.org/vndb@68 1fe2e327-d9db-4752-bcf7-ef0cb4a1748b
---
 data/tpl/defs.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'data')

diff --git a/data/tpl/defs.pl b/data/tpl/defs.pl
index 47364193..039c6507 100644
--- a/data/tpl/defs.pl
+++ b/data/tpl/defs.pl
@@ -168,8 +168,8 @@ sub summary { # cmd, len, def
       if(!$as && s/(http|https):\/\/(.+[0-9a-zA-Z=\/])/<a href="$1:\/\/$2" rel="nofollow">link<\/a>/) {
         $l = 4;
       } elsif(!$as) {
-        s/^(.*[^\w]|)([tdvpr][0-9]+)\.([0-9]+)([^\w].*|)$/$1<a href="\/$2.$3">$2.$3<\/a>$4/ ||
-        s/^(.*[^\w]|)([tduvpr][0-9]+)([^\w].*|)$/$1<a href="\/$2">$2<\/a>$3/;
+        s/^(.*[^\w]|)([tdvpr][1-9][0-9]*)\.([1-9][0-9]*)([^\w].*|)$/$1<a href="\/$2.$3">$2.$3<\/a>$4/ ||
+        s/^(.*[^\w]|)([tduvpr][1-9][0-9]*)([^\w].*|)$/$1<a href="\/$2">$2<\/a>$3/;
       }
       while(s/\[\/url\]/<\/a>/i) {
         $l -= 6;
-- 
cgit v1.2.3