From 29236ab4e4783d5e69ca0b2c1ea72bea1236a6eb Mon Sep 17 00:00:00 2001
From: Reimer Behrends <behrends@gmail.com>
Date: Tue, 21 Apr 2020 09:24:56 +0200
Subject: [PATCH] Make HELP_VIWER_INFO an atomic record in HPC-GAP.

This permits packages to add entries after initialization, while
still allowing access from multiple threads.
---
 lib/helpview.gd | 6 +++++-
 lib/helpview.gi | 4 ----
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/lib/helpview.gd b/lib/helpview.gd
index 47b32c01857..71f9af81b0d 100644
--- a/lib/helpview.gd
+++ b/lib/helpview.gd
@@ -34,7 +34,11 @@
 ##  </Description>
 ##  </ManSection>
 ##  <#/GAPDoc>
-BindGlobal("HELP_VIEWER_INFO", rec());
+if IsHPCGAP then
+    BindGlobal("HELP_VIEWER_INFO", AtomicRecord());
+else
+    BindGlobal("HELP_VIEWER_INFO", rec());
+fi;
 
 DeclareGlobalFunction("FindWindowId");
 DeclareGlobalFunction("SetHelpViewer");
diff --git a/lib/helpview.gi b/lib/helpview.gi
index 055a4f1717f..f16d8e7b481 100644
--- a/lib/helpview.gi
+++ b/lib/helpview.gi
@@ -432,10 +432,6 @@ show := function(file)
 end
 );
 
-if IsHPCGAP then
-    MakeReadOnlyObj(HELP_VIEWER_INFO);
-fi;
-
 #############################################################################
 ##
 #F  SetHelpViewer(<viewer>):  Set the viewer used for help