From mboxrd@z Thu Jan  1 00:00:00 1970
Received: from ux2.cso.uiuc.edu ([128.174.5.3]) by hawkwind.utcs.toronto.edu with SMTP id <2723>; Tue, 19 Jan 1993 07:44:23 -0500
Received: by ux2.cso.uiuc.edu id AA46496
  (5.67a/IDA-1.5 for sam-fans@hawkwind.utcs.toronto.edu); Tue, 19 Jan 1993 06:44:10 -0600
Date:	Tue, 19 Jan 1993 07:44:10 -0500
From:	Ed Kubaitis - CCSO <ejk@ux2.cso.uiuc.edu>
Message-Id: <199301191244.AA46496@ux2.cso.uiuc.edu>
To:	sam-fans@hawkwind.utcs.toronto.edu
Subject: Re: sam X11 extensions

Sites with a version of perl earlier than 4.035 will need the attached
patch (from Bob Gibson <rjg@sco.COM>)

Ed
-------------------------------------------------------------------------------
*** samkeys_parse-      Mon Jan 18 19:14:37 1993
--- samkeys_parse       Mon Jan 18 19:00:56 1993
***************
*** 74,80 ****
            warn "Multiple key symbols in $Source:\n$line\n";
            next SourceLine;
            }
!        else { $keyhex = $Key{$k} };
         }
        elsif ($m = $Mod{$k}) { $mod |= $m; }
        else {
--- 74,80 ----
            warn "Multiple key symbols in $Source:\n$line\n";
            next SourceLine;
            }
!        else { $keyhex = $Key{$k}; }
         }
        elsif ($m = $Mod{$k}) { $mod |= $m; }
        else {
-------------------------------------------------------------------------------