summaryrefslogtreecommitdiff
path: root/!NetSurf
diff options
context:
space:
mode:
Diffstat (limited to '!NetSurf')
-rw-r--r--!NetSurf/!Run,feb7
1 files changed, 6 insertions, 1 deletions
diff --git a/!NetSurf/!Run,feb b/!NetSurf/!Run,feb
index fc7cd77c3..fbced345d 100644
--- a/!NetSurf/!Run,feb
+++ b/!NetSurf/!Run,feb
@@ -1,5 +1,8 @@
<Obey$Dir>.!Boot
+| Can't run more than one copy of NetSurf at once.
+If "<NetSurf$Running>" = "yes" Then Error NetSurf is already running
+
| We need RISC OS 3
RMEnsure UtilityModule 3.00 Error NetSurf needs RISC OS 3 or later
@@ -42,4 +45,6 @@ RMEnsure Tinct 0.03 RMLoad <NetSurf$Dir>.Resources.Tinct
RMEnsure Tinct 0.02 Error NetSurf requires Tinct 0.02 or later
Wimpslot -min 2100k -max 2100k
-Run <NetSurf$Dir>.!RunImage 2><NetSurf$Dir>.stderr \ No newline at end of file
+Set NetSurf$Running yes
+Run <NetSurf$Dir>.!RunImage 2><NetSurf$Dir>.stderr
+UnSet NetSurf$Running \ No newline at end of file