Search
j0ke.net Open Build Service
>
Projects
>
server:monitoring
>
rancid-stable
> rancid-3.2.p3
Sign Up
|
Log In
Username
Password
Cancel
Overview
Repositories
Revisions
Requests
Users
Advanced
Attributes
Meta
File rancid-3.2.p3 of Package rancid-stable (Revision 25)
Currently displaying revision
25
,
show latest
Index: configure.ac =================================================================== --- configure.ac (revision 3070) +++ configure.ac (working copy) @@ -275,7 +275,7 @@ else $PERLV_PATH -e 'require 5;' if test $? -ne 0 ; then - AC_MSG_ERROR([can't locate a suitable perl5.]) + AC_MSG_ERROR([can't locate a suitable perl5.]) exit 1 fi fi @@ -284,6 +284,14 @@ PERLV=`basename $PERLV_PATH` AC_SUBST(PERLV) +# check Socket.pm version +AC_MSG_CHECKING([Socket.pm version]) +$PERLV_PATH -e 'use 2.006 Socket qw(inet_pton);' 2>&1 >/dev/null +if test $? -ne 0 ; then + AC_MSG_ERROR([Socket.pm is older than 2.006; upgrade from http://metacpan.org/pod/Socket]) + exit 1 +fi + AC_PATH_PROG(EXPECT_PATH,expect,no) if test $EXPECT_PATH = no; then AC_MSG_ERROR([can't locate expect.]) Index: lib/rancid.pm.in =================================================================== --- lib/rancid.pm.in (revision 3070) +++ lib/rancid.pm.in (working copy) @@ -48,7 +48,7 @@ use 5.010; use strict 'vars'; use warnings; -use Socket qw(AF_INET AF_INET6 inet_pton); +use 2.006 Socket qw(AF_INET AF_INET6 inet_pton); require(Exporter); our @ISA = qw(Exporter); Index: configure =================================================================== --- configure (revision 3070) +++ configure (working copy) @@ -5307,7 +5307,7 @@ else $PERLV_PATH -e 'require 5;' if test $? -ne 0 ; then - as_fn_error $? "can't locate a suitable perl5." "$LINENO" 5 + as_fn_error $? "can't locate a suitable perl5." "$LINENO" 5 exit 1 fi fi @@ -5316,6 +5316,15 @@ PERLV=`basename $PERLV_PATH` +# check Socket.pm version +{ $as_echo "$as_me:${as_lineno-$LINENO}: checking Socket.pm version" >&5 +$as_echo_n "checking Socket.pm version... " >&6; } +$PERLV_PATH -e 'use 2.006 Socket qw(inet_pton);' 2>&1 >/dev/null +if test $? -ne 0 ; then + as_fn_error $? "Socket.pm is older than 2.006; upgrade from http://metacpan.org/pod/Socket" "$LINENO" 5 + exit 1 +fi + # Extract the first word of "expect", so it can be a program name with args. set dummy expect; ac_word=$2 { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 Index: CHANGES =================================================================== --- CHANGES (revision 3071) +++ CHANGES (working copy) @@ -1,4 +1,6 @@ 3.2 + configure, rancid.pm: check minimum revision of Socket.pm + junos.pm: fix showsystemlicense for errant licenses w/ 0 available rancid.pm: check result from inet_pton()
