docstring added to ability macro

lib/extensions/development/init.el

@@ -18,13 +18,16 @@
   (message "Initializing 'development' extension.")
 
   (ability code-completion ()
+           "Use company mode to provides a complete auto completion framwork."
            (global-company-mode t)
            (define-key company-active-map "\t" 'company-yasnippet-or-completion))
 
   (ability yas ()
+           "Snippet configuration."
            (yas-global-mode 1))
 
   (ability project-management ()
+           "Ability to manage projects and project navigation."
            (projectile-global-mode)
            (setq projectile-enable-caching t))
 

lib/fg42/extension.el

@@ -31,11 +31,10 @@
 to them.
 
 *body* is a block of code which will run as the ability initializer code."
-  `(progn
-     (message "00000 %s" (active-ability? (intern ,(symbol-name name))))
-     (if (active-ability? (intern ,(symbol-name name)))
+  (declare (doc-string 2) (indent 1))
+  `(if (active-ability? (intern ,(symbol-name name)))
        (if (null (delq t (mapcar 'active-ability? ,deps)))
-           ,@body))))
+           ,@body)))
 
 (defmacro extension (name &rest args)
   "A simple DSL to define new fg42 extension."