PR/49: giosh94mhz: stricter algol changes (only look at the first 1K)

diff --git a/magic/Magdir/algol68 b/magic/Magdir/algol68
index 68583dfaa3afd625eb1b43d22ac5621213af20f5..3675b840e3b699d1cca65ec6ce2cb0354b8c802d 100644 (file)
--- a/magic/Magdir/algol68
+++ b/magic/Magdir/algol68
@@ -1,17 +1,17 @@
 
 #------------------------------------------------------------------------------
-# $File: algol68,v 1.1 2016/08/02 16:53:28 christos Exp $
+# $File: algol68,v 1.3 2018/10/19 01:04:21 christos Exp $
 # algol68:  file(1) magic for Algol 68 source
 #
 0      search/8192     (input,                 Algol 68 source text
 !:mime text/x-Algol68
-0      regex           \^PROC                  Algol 68 source text
+0      regex/1024      \^PROC                  Algol 68 source text
 !:mime text/x-Algol68
-0      regex           MODE[\t\ ]              Algol 68 source text
+0      regex/1024      \bMODE[\t\ ]            Algol 68 source text
 !:mime text/x-Algol68
-0      regex           REF[\t\ ]               Algol 68 source text
+0      regex/1024      \bREF[\t\ ]             Algol 68 source text
 !:mime text/x-Algol68
-0      regex           FLEX[\t\ ]\*\\[         Algol 68 source text
+0      regex/1024      \bFLEX[\t\ ]\*\\[       Algol 68 source text
 !:mime text/x-Algol68
 #0     regex           [\t\ ]OD                Algol 68 source text
 #!:mime        text/x-Algol68