From a4040a33ba3f58250ca0129c1b430a875375d4ff Mon Sep 17 00:00:00 2001
From: Christos Zoulas <christos@zoulas.com>
Date: Fri, 19 Oct 2018 01:04:21 +0000
Subject: [PATCH] PR/49: giosh94mhz: stricter algol changes (only look at the
 first 1K)

---
 magic/Magdir/algol68 | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/magic/Magdir/algol68 b/magic/Magdir/algol68
index 68583dfa..3675b840 100644
--- 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
-- 
2.40.0