X-Git-Url: https://jxself.org/git/?p=mudsync.git;a=blobdiff_plain;f=mudsync%2Fparser.scm;h=16a811b9903fcb605b7ec2bad3b4904ffb62574f;hp=bbbab135b131341a8bb72dd23d4fc517e5ec2178;hb=ec50931b9a575c226804c1dccadbf5ad3bc8306b;hpb=82ba6326f28edd948b5f73cbc74837754e52e0cb

diff --git a/mudsync/parser.scm b/mudsync/parser.scm
index bbbab13..16a811b 100644
--- a/mudsync/parser.scm
+++ b/mudsync/parser.scm
@@ -61,12 +61,12 @@
 
 ;; definite and indefinite, but not partitive articles
 (define article '(or "the" "a" "an"))
-(define preposition '(or "with" "in" "on" "out of" "at" "as" "to"
-                         "about"))
+(define preposition '(or "with" "in" "inside" "on" "out" "out of"
+                         "at" "as" "to" "about" "from"))
 
 (define indirect-irx
   (sre->irregex
-   `(: (? (: ,preposition (+ space)))  ; possibly a preposition (ignored)
+   `(: (? (: ,preposition (+ space)))  ; possibly a preposition
        (? (: ,article (+ space)))      ; possibly an article (ignored)
        (=> direct-obj (* any))      ; direct object (kept)
        (+ space)