Minor fixes

chatikbot.asd

@@ -25,4 +25,5 @@
                (:file "tumblr")
                (:file "patmatch")
                (:file "eliza")
+	       (:file "foursquare")
                (:file "chatikbot")))

foursquare.lisp

@@ -40,7 +40,7 @@
   (when checkin
     (let ((user (aget "user" checkin))
           (venue (aget "venue" checkin)))
-      (format nil "📍 ~@[~A~]~@[ ~A~]~@[ в ~A~]~@[ (~A)~]~@[ 📢~A~]"
+      (format nil "📍 ~@[~A~]~@[ ~A~]~@[ в ~A~]~@[ (~A)~]~@[ 📢 ~A~]"
               (aget "firstName" user) (aget "lastName" user)
               (aget "name" venue) (first (aget "formattedAddress" (aget "location" venue)))
               (aget "shout" checkin)))))