fix build with perl 5.18

PR: 193064
svn path=/head/; revision=368625
2024-12-26 05:02:18 +00:00 · 2014-09-20 06:44:20 +00:00 · 2014-09-20 06:44:20 +00:00 · 58dbd8e8d1 · 2021-03-31 03:12:20 +00:00
commit 58dbd8e8d1
parent 4e004e20c9
1 changed files with 18 additions and 0 deletions
--- a/sysutils/symon/files/patch-client__SymuxClient.pm
+++ b/sysutils/symon/files/patch-client__SymuxClient.pm
@ -0,0 +1,18 @@
+--- ./client/SymuxClient.pm.orig	2014-09-20 01:14:36.791963224 +0400
+++ ./client/SymuxClient.pm	2014-09-20 01:14:52.651148220 +0400
+@@ -267,6 +267,8 @@
+ 
+ =head2 METHODS
+ 
+=over 4
+
+ =item getitem (host, stream, item)
+ 
+ Refresh the measured data and get an item from a stream for a particular
+@@ -304,4 +306,6 @@
+     # which hosts packets_out was that?
+     print $sc->getsource();
+ 
+=back
+
+ =cut