From bc46cf7d14a39c2df529aebdc89bfd5c287b4ca8 Mon Sep 17 00:00:00 2001
From: charlie <xyhp915@qq.com>
Date: Tue, 26 Aug 2025 13:38:59 +0800
Subject: [PATCH] enhance(api): improve append_block_in_page to handle current
 page context

---
 .../test/logseq/e2e/plugins_basic_test.clj    |  2 ++
 src/main/logseq/api.cljs                      | 24 ++++++++++++-------
 2 files changed, 17 insertions(+), 9 deletions(-)

diff --git a/clj-e2e/test/logseq/e2e/plugins_basic_test.clj b/clj-e2e/test/logseq/e2e/plugins_basic_test.clj
index 3b1fac5fa2..7de59315f4 100644
--- a/clj-e2e/test/logseq/e2e/plugins_basic_test.clj
+++ b/clj-e2e/test/logseq/e2e/plugins_basic_test.clj
@@ -61,6 +61,8 @@
     (page/new-page "test-block-apis")
     (ls-api-call! :ui.showMsg "hello world" "info")
     (let [ret (ls-api-call! :editor.appendBlockInPage "test-block-apis" "append-block-in-page-0")
+          ret1 (ls-api-call! :editor.appendBlockInPage "append-block-in-current-page-0")
+          _ (assert-api-ls-block! ret1)
           uuid' (assert-api-ls-block! ret)]
       (-> (ls-api-call! :editor.insertBlock uuid' "insert-0")
           (assert-api-ls-block!))
diff --git a/src/main/logseq/api.cljs b/src/main/logseq/api.cljs
index 6137273444..f7734e7a65 100644
--- a/src/main/logseq/api.cljs
+++ b/src/main/logseq/api.cljs
@@ -1078,15 +1078,21 @@
 
 (defn ^:export append_block_in_page
   [uuid-or-page-name content ^js opts]
-  (p/let [_               (<ensure-page-loaded uuid-or-page-name)
-          page?           (not (util/uuid-string? uuid-or-page-name))
-          page-not-exist? (and page? (nil? (db-model/get-page uuid-or-page-name)))
-          _               (and page-not-exist? (page-handler/<create! uuid-or-page-name
-                                                                      {:redirect?           false
-                                                                       :format              (state/get-preferred-format)}))]
-    (when-let [block (db-model/get-page uuid-or-page-name)]
-      (let [target   (str (:block/uuid block))]
-        (insert_block target content opts)))))
+  (let [current-page? (or (and (nil? content) (nil? opts))
+                        (and (nil? opts) (some->> content (instance? js/Object))))
+        opts (if current-page? content opts)
+        content (if current-page? uuid-or-page-name content)
+        uuid-or-page-name (if current-page? (state/get-current-page)
+                            uuid-or-page-name)]
+    (p/let [_ (<ensure-page-loaded uuid-or-page-name)
+            page? (not (util/uuid-string? uuid-or-page-name))
+            page-not-exist? (and page? (nil? (db-model/get-page uuid-or-page-name)))
+            _ (and page-not-exist? (page-handler/<create! uuid-or-page-name
+                                     {:redirect? false
+                                      :format (state/get-preferred-format)}))]
+      (when-let [block (db-model/get-page uuid-or-page-name)]
+        (let [target (str (:block/uuid block))]
+          (insert_block target content opts))))))
 
 ;; plugins
 (defn ^:export validate_external_plugins [urls]