Add into to predicates

diff --git a/mudsync/gameobj.scm b/mudsync/gameobj.scm
index 0ce19b6799bc2ecf2dbd168ad50507750072e177..ee788ea300433aeaf466f52361de63c149b14e61 100644 (file)
--- a/mudsync/gameobj.scm
+++ b/mudsync/gameobj.scm
@@ -92,7 +92,7 @@
                                    (prep-indir-command cmd-take-from
                                                        '("from" "out of"))))
                           ("put" ((prep-indir-command cmd-put-in
-                                                      '("in" "inside" "on"))))))
+                                                      '("in" "inside" "into" "on"))))))
 
   ;; Commands we can handle by being something's container
   ;;   dominant version (goes before everything)

diff --git a/mudsync/parser.scm b/mudsync/parser.scm
index 16a811b9903fcb605b7ec2bad3b4904ffb62574f..efda86e3b26c536bd5662355912dd2bd7101bf78 100644 (file)
--- a/mudsync/parser.scm
+++ b/mudsync/parser.scm
@@ -61,7 +61,7 @@
 
 ;; definite and indefinite, but not partitive articles
 (define article '(or "the" "a" "an"))
-(define preposition '(or "with" "in" "inside" "on" "out" "out of"
+(define preposition '(or "with" "in" "inside" "into" "on" "out" "out of"
                          "at" "as" "to" "about" "from"))
 
 (define indirect-irx