[Add :float {:left/:right} to markdown {image} extension
clinton@unknownlamer.org**20081218184321] hunk ./src/bee-page.lisp 16
-
-(defextension (image :arguments ((name :required) alt float)
+(defextension (image :arguments ((name :required)
+				 alt
+				 (float :keyword))
hunk ./src/bee-page.lisp 26
-		      :style (if (eq float :float) "float: right;" ""))))))
+		      :style (case float
+			       ((:left) "float: left;")
+			       ((:right) "float: right")))))))