diff --git a/map.tin b/map.tin
index 143abb6..e2957c4 100644
--- a/map.tin
+++ b/map.tin
@@ -53,7 +53,7 @@
 #alias dirget #list dirs get 1 dir
 #alias dirpop {#list dirs size dirsize;#if {$dirsize == 0} {#nop} {#list dirs delete 1}}
 
-#alias dirmove {dirget;#if {"$dir" !== "0"} {dirpop;#map move $dir;showmap}}
+#alias dirmove {dirget;#if {"$dir" !== "0"} {dirpop;#if {"$dir" !== "l"} {#map move $dir;showmap}}}
 
 
 #alias exits #var exits %1
@@ -66,6 +66,7 @@
 #alias w {#send west;dirpush w}
 #alias u {#send up;dirpush u}
 #alias d {#send down;dirpush d}
+#alias l {#send look;dirpush l}
 
 #alias dirstack {#var dirs}
 #alias dirclear {#list dirs create}