 (defn- parse-multi [action-context actions arguments]
   (let [action-keys (action-keys action-context)
         action-key (keyword (first arguments))
-        action (get actions action-key)]
-    (parse-single action-context actions action action-key (rest arguments) false)))
+        action (get actions action-key)
+        {:keys [no-action-fn]} action-context]
+    (if (and (nil? action) no-action-fn)
+      (binding [*parse-context* {:action-context action-context
+                                 :actions actions
+                                 :argument arguments
+                                 :single-action-mode? false}]
+        (no-action-fn))
+      (parse-single action-context actions action action-key (rest arguments) false))))
 
 (defn- parse-global [action-context actions arguments]
   (let [{:keys [global-actions]} action-context]

        description
        (if-not (empty? options) \newline)
        (:summary (cli/parse-opts nil options)))))

(defn- action-keys [action-context]
  (or (:action-print-order action-context)
      (map first (:action-definitions action-context))))

(defn help-message
  "Generate the help message text and return it.

                         (s/join "|")
                         (format " <%s>"))))))))

(defn- action-keys [action-context]
  (or (:action-print-order action-context)
      (map first (:action-definitions action-context))))

(defn- action-help
  ([{:keys [name] :as action} skip-action-name?]
