fix set destination

daelsepara · daelsepara · commit 2bde5d16399c · 2020-08-24T20:36:21.000+08:00
diff --git a/src/gamebook.zil b/src/gamebook.zil
@@ -353,7 +353,7 @@
     <RETURN !\x>>
 
 <ROUTINE SET-DESTINATION (STORY DESTINATION NEW)
-	<PUT <GETP .STORY ,P?DESTINATIONS> 1 .NEW>>
+	<PUT <GETP .STORY ,P?DESTINATIONS> .DESTINATION .NEW>>
 
 ; "Story - Choice Requirements Validations"
 ; ---------------------------------------------------------------------------------------------
