X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=verbs.lisp;h=74979be0a564674a7003f12697854f29cab2bcaf;hb=9356b489df2d529f843e4143e8b9528b4d64e186;hp=406e6e622cd97a8f54944323745ea3541fa5ff42;hpb=4b3d4fbf3031334896e98a3da1dbc8820abb0c17;p=lifp.git diff --git a/verbs.lisp b/verbs.lisp index 406e6e6..74979be 100644 --- a/verbs.lisp +++ b/verbs.lisp @@ -45,7 +45,7 @@ (const-fun const-loc (c) *location*) -(verb "look" +(verb "look" "l" `(-> look const-loc) '("at" :seen -> examine))