zap .n.m suffix, just keep .0.0 as a special case for now.

This commit is contained in:
espie 2006-09-18 11:27:47 +00:00
parent aa373a92bf
commit 03409d0fb5

View File

@ -1,5 +1,5 @@
#! /usr/bin/perl
# $OpenBSD: resolve-lib,v 1.13 2006/08/01 10:00:55 espie Exp $
# $OpenBSD: resolve-lib,v 1.14 2006/09/18 11:27:47 espie Exp $
#
# Copyright (c) 2001, 2005 Marc Espie <espie@openbsd.org>
#
@ -60,9 +60,9 @@ sub parse_spec_versions
$spec = $`;
$req->{noshared} = 1;
} else {
if ($spec =~ m/\.(\d+)\.(\d+)$/) {
$req->{major} = $1;
$req->{minor} = $2;
if ($spec =~ m/\.0\.0$/) {
$req->{major} = 0;
$req->{minor} = 0;
$spec = $`;
} elsif ($spec =~ m/\.(\>?)\=(\d+)\.(\d+)$/) {
$req->{major} = $2;