Finish up acdw/pkg

1 files changed, 4 insertions, 4 deletions

@@ -118,7 +118,7 @@ more fine-grained control, just use `add-hook'."
 automatically.
 
 If KEY is a vector, it's passed directly to `define-key',
-otherwise it's wrapped in `read-kbd-macro'.
+otherwise it's wrapped in `kbd'.
 
 The following keywords are recognized:
 
@@ -134,9 +134,9 @@ The following keywords are recognized:
         (keymap (or (plist-get args :map) acdw/bind-default-map))
         (keycode (if (vectorp key) key (kbd key)))
         (command-list))
-    (push `(define-key ,keymap ,keycode ,command) command-list)
+    (push `(define-key ,keymap ,keycode #',command) command-list)
     (when after
-      (push `(autoload ,command ,@after) command-list))
+      (push `(autoload #',command ,@after) command-list))
     `(progn
        ,@command-list)))
 
@@ -178,7 +178,7 @@ ARGS can include the following keywords:
     (when then-forms
       (push `(with-eval-after-load ',requirement ,@then-forms) final-form))
     (when hooks
-      (push `(acdw/hooks-after ,(symbol-name requirement) ,hooks) final-form))
+      (push `(acdw/hooks-after ,(symbol-name requirement) ,@hooks) final-form))
     (when binds
       (push `(acdw/bind-after-map ,(symbol-name requirement) nil ,binds)
             final-form))