From a1bccdbd33542ded4b72fa396201a9f6969c17e6 Mon Sep 17 00:00:00 2001 From: rcmerci Date: Thu, 12 Mar 2026 13:47:27 +0800 Subject: [PATCH] fix test --- src/main/logseq/cli/completion_generator.cljs | 11 ----------- .../logseq/cli/completion_generator_test.cljs | 16 +++++++--------- 2 files changed, 7 insertions(+), 20 deletions(-) diff --git a/src/main/logseq/cli/completion_generator.cljs b/src/main/logseq/cli/completion_generator.cljs index 8c43a04afb..038cb402b5 100644 --- a/src/main/logseq/cli/completion_generator.cljs +++ b/src/main/logseq/cli/completion_generator.cljs @@ -613,17 +613,6 @@ _logseq_compadd_lines() { nil))) -(defn- bash-prev-cases - "Generate all prev-word value completion cases from the table." - [table] - (let [all-specs (->> table (mapcat (fn [entry] (seq (:spec entry))))) - unique-specs (into {} all-specs) ;; last one wins for duplicates - tokens (spec->tokens unique-specs) - cases (->> tokens - (keep bash-prev-completion-case) - (string/join "\n\n"))] - cases)) - (defn- bash-subcommand-cases "Generate subcommand completion for each group." [table] diff --git a/src/test/logseq/cli/completion_generator_test.cljs b/src/test/logseq/cli/completion_generator_test.cljs index 54d3b756d4..5387b43daf 100644 --- a/src/test/logseq/cli/completion_generator_test.cljs +++ b/src/test/logseq/cli/completion_generator_test.cljs @@ -200,14 +200,14 @@ (is (string/includes? output "_logseq()"))) (testing "output ends with compdef _logseq logseq" (is (string/includes? output "compdef _logseq logseq"))) - (testing "boolean flags emit bare flag form" - (is (re-find #"--verbose\[" output))) + (testing "boolean flags emit alias grouping" + (is (string/includes? output "'{-v,--verbose}'["))) (testing "enum options emit value list form" - (is (re-find #"--output=.*\(human json edn\)" output))) + (is (string/includes? output "'{-o,--output}'=[Output format. Default: human]:value:(human json edn)'"))) (testing ":complete :graphs emits _logseq_graphs" - (is (re-find #"--graph=.*_logseq_graphs" output))) + (is (string/includes? output "'{-g,--graph}'=[Graph name]:value:_logseq_graphs'"))) (testing ":complete :file emits _files" - (is (re-find #"--config=.*_files'" output))) + (is (string/includes? output "'{-c,--config}'=[Path to cli.edn (default ~/logseq/cli.edn)]:file:_files'"))) (testing ":alias emits grouping" (is (re-find #"\(-h --help\)" output))))) @@ -218,10 +218,8 @@ (testing "--sort for list page offers correct values" (is (re-find #"--sort=.*\(title created-at updated-at\)" output))) (testing "--sort for list tag offers name title" - ;; The list tag function should contain (name title) - (let [tag-section (second (re-find #"_logseq_list_tag\(\).*?(?=\n_logseq)" output))] - ;; Just check globally that name title appears in sort context - (is (re-find #"\(name title\)" output)))))) + ;; Just check globally that name title appears in sort context + (is (re-find #"\(name title\)" output))))) (deftest test-zsh-all-commands-present (let [output (gen/generate-completions "zsh" full-table)]