From b0b7484e114b3e69d04ee0686e755d012ba7178e Mon Sep 17 00:00:00 2001 From: Florian Forster Date: Tue, 17 Feb 2009 09:30:54 +0100 Subject: [PATCH] bindings/perl: Use OPING_VERSION to enable the work-around for 0.3.5. --- bindings/perl/Oping.xs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/bindings/perl/Oping.xs b/bindings/perl/Oping.xs index 6376775..6fbf49c 100644 --- a/bindings/perl/Oping.xs +++ b/bindings/perl/Oping.xs @@ -120,9 +120,10 @@ _ping_iterator_get_hostname (iter) (void *) buffer, &buffer_size); if (status != ENOMEM) break; - - /* FIXME: This is a workaround for a bug in 0.3.5. */ +#if !defined(OPING_VERSION) || (OPING_VERSION <= 3005) + /* This is a workaround for a bug in 0.3.5. */ buffer_size++; +#endif buffer = (char *) malloc (buffer_size); if (buffer == NULL) -- 2.11.0