From e942236a7af8d921ad49b58237286214bfd23fe9 Mon Sep 17 00:00:00 2001
From: Christopher Allan Webber <cwebber@dustycloud.org>
Date: Sun, 29 Jan 2017 17:10:04 -0600
Subject: [PATCH] Add l as alias for look

---
 mudsync/room.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mudsync/room.scm b/mudsync/room.scm
index 5c76977..0379d3d 100644
--- a/mudsync/room.scm
+++ b/mudsync/room.scm
@@ -71,7 +71,7 @@
    #:allocation #:each-subclass
    #:init-thunk
    (build-commands
-    ("look" ((loose-direct-command cmd-look-at)
+    (("l" "look") ((loose-direct-command cmd-look-at)
              (empty-command cmd-look-room)))
     ("go" ((empty-command cmd-go-where)
            (loose-direct-command cmd-go)))
-- 
2.31.1