refactor: added pragmas to deleteGameCommand procedure

FossilOrigin-Name: 36d70d78c19c1ac0a07a0ff728eef73fcdc84638e8e3d7c6beeadd827d968acd
thindil · Jan 5, 2024 · 8801b95 · 8801b95
1 parent 7717ea1
commit 8801b95
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/nim/src/ui/mainmenucommands.nim b/nim/src/ui/mainmenucommands.nim
@@ -159,7 +159,7 @@ proc showHallOfFameCommand(clientData: cint; interp: PInterp; argc: cint;
   return tclOk
 
 proc deleteGameCommand(clientData: cint; interp: PInterp; argc: cint;
-    argv: openArray[cstring]): TclResults =
+    argv: openArray[cstring]): TclResults {.sideEffect, raises: [], tags: [].} =
   tclSetVar(varName = "deletesave", newValue = $argv[1])
   showQuestion(question = "Are you sure you want delete this savegame?",
       res = "deletesave", inGame = false)