bindings/perl: Use OPING_VERSION to enable the work-around for 0.3.5.
authorFlorian Forster <octo@leeloo.lan.home.verplant.org>
Tue, 17 Feb 2009 08:30:54 +0000 (09:30 +0100)
committerFlorian Forster <octo@leeloo.lan.home.verplant.org>
Tue, 17 Feb 2009 08:30:54 +0000 (09:30 +0100)
bindings/perl/Oping.xs

index 6376775..6fbf49c 100644 (file)
@@ -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)