$NetBSD: patch-aa,v 1.1 2010/05/14 12:12:22 fhajny Exp $

Fix options parsing problem on Perl 5.10.

--- mytop.orig	2007-02-17 04:57:46.000000000 +0000
+++ mytop
@@ -153,7 +153,7 @@ GetOptions(
     "idle|i"              => \$config{idle},
     "resolve|r"           => \$config{resolve},
     "prompt!"             => \$config{prompt},
-    "long|!"              => \$config{long_nums},
+    "long!"               => \$config{long_nums},
     "mode|m=s"            => \$config{mode},
     "sort=s"              => \$config{sort},
 );
