From 83c610ca0f6663dd0658bb953bc41df625cac809 Mon Sep 17 00:00:00 2001
From: Michiel Borkent <michielborkent@gmail.com>
Date: Thu, 24 Feb 2022 12:28:11 +0100
Subject: [PATCH] fix #1180: limit bb tasks output to first line of docstring

---
 CHANGELOG.md                  | 1 +
 src/babashka/impl/tasks.clj   | 5 +++--
 test/babashka/bb_edn_test.clj | 4 +++-
 3 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 55c78b2e..9649b78a 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -7,6 +7,7 @@ For a list of breaking changes, check [here](#breaking-changes).
 ### Fixes
 
 - [#1181](https://github.com/babashka/babashka/issues/1181): clojure.test report does not respect *test-out* correctly
+- [#1180](https://github.com/babashka/babashka/issues/1180): limit bb tasks output to first line of docstring
 
 ## 0.7.5 (2022-02-16)
 
diff --git a/src/babashka/impl/tasks.clj b/src/babashka/impl/tasks.clj
index 7cdef088..0c3cd06b 100644
--- a/src/babashka/impl/tasks.clj
+++ b/src/babashka/impl/tasks.clj
@@ -1,6 +1,5 @@
 (ns babashka.impl.tasks
   (:require [babashka.deps :as deps]
-            [babashka.impl.classpath :as cp]
             [babashka.impl.common :refer [ctx bb-edn debug]]
             [babashka.process :as p]
             [clojure.core.async :refer [<!!]]
@@ -421,7 +420,9 @@
                 :let [task (get tasks (symbol k))]]
           (println (str (format fmt k)
                         (when-let [d (doc-from-task sci-ctx tasks task)]
-                          (str " " d))))))
+                          (let [first-line (-> (str/split-lines d)
+                                               first)]
+                            (str " " first-line)))))))
       (println "No tasks found."))))
 
 (defn run
diff --git a/test/babashka/bb_edn_test.clj b/test/babashka/bb_edn_test.clj
index 05942116..b32ec186 100644
--- a/test/babashka/bb_edn_test.clj
+++ b/test/babashka/bb_edn_test.clj
@@ -304,7 +304,9 @@
   (test-utils/with-config "{:paths [\"test-resources/task_scripts\"]
                             :tasks {:requires ([tasks :as t])
                                     task1
-                                    {:doc \"task1 doc\"
+                                    {:doc \"task1 doc
+more stuff here
+even more stuff here\"
                                      :task (+ 1 2 3)}
                                     task2
                                     {:doc \"task2 doc\"