- added form to ensure asdf has been loaded when compiling the package.

Makefile.am

@@ -96,6 +96,7 @@ dist_man1_MANS       = doc/tinmop.man
 
 $(PACKAGE): $(CONF_PATH_FILE) *.asd src/*
 	$(LISP_COMPILER) \
+		--eval "(require 'asdf)" \
 		--eval "(push \"$$(pwd)/\" asdf:*central-registry*)" \
 		--eval "(asdf:make '$(PACKAGE) :build-pathname \"../$(PACKAGE)\")" \
 		--eval "(uiop:quit)"

Makefile.in

@@ -1118,6 +1118,7 @@ uninstall-man: uninstall-man1
 
 $(PACKAGE): $(CONF_PATH_FILE) *.asd src/*
 	$(LISP_COMPILER) \
+		--eval "(require 'asdf)" \
 		--eval "(push \"$$(pwd)/\" asdf:*central-registry*)" \
 		--eval "(asdf:make '$(PACKAGE) :build-pathname \"../$(PACKAGE)\")" \
 		--eval "(uiop:quit)"

src/api-client.lisp

@@ -287,35 +287,35 @@ Returns nil if the user did not provided a server in the configuration file"
   announcements)
 
 (defun-api-call favourite-status (status-id)
-    "Favourite a status identified by `status-id'"
+  "Favourite a status identified by `status-id'"
   (tooter:favourite *client*
                     status-id))
 
 (defun-api-call unfavourite-status (status-id)
-    "Unfavourite a status identified by `status-id'"
+  "Unfavourite a status identified by `status-id'"
   (tooter:unfavourite *client*
                       status-id))
 
 (defun-api-call reblog-status (status-id)
-    "Reblog a status identified by `status-id'"
+  "Reblog a status identified by `status-id'"
   (tooter:reblog *client*
                  status-id))
 
 (defun-api-call unreblog-status (status-id)
-    "Reblog a status identified by `status-id'"
+  "Reblog a status identified by `status-id'"
   (tooter:unreblog *client*
                    status-id))
 
 (defun-api-call follow-tag (tag-name)
-    "Follow a tag"
+  "Follow a tag"
   (tooter:follow-tag *client* tag-name))
 
 (defun-api-call unfollow-tag (tag-name)
-    "Unfollow a tag"
+  "Unfollow a tag"
   (tooter:unfollow-tag *client* tag-name))
 
 (defun-api-call get-followed-tags (&key max-id since-id min-id (limit 20))
-  "Unfollow a tag"
+  "get a list of tags object that the user follows"
   (tooter:collect-all-pages *client*
                             (tooter:followed-tags *client*
                                                   :max-id max-id