feat: fallback to embark in link-hint

seagle0128 · Jun 25, 2024 · 0cd71f5 · 0cd71f5
1 parent 1a264cb
commit 0cd71f5
Showing 1 changed file with 11 additions and 1 deletion.
diff --git a/lisp/init-edit.el b/lisp/init-edit.el
@@ -131,7 +131,17 @@
 (use-package link-hint
   :bind (("M-o" . link-hint-open-link)
          ("C-c l o" . link-hint-open-link)
-         ("C-c l c" . link-hint-copy-link)))
+         ("C-c l c" . link-hint-copy-link))
+  :init
+  (with-eval-after-load 'embark
+    (setq link-hint-action-fallback-commands
+          (list :open (lambda ()
+                        (condition-case _
+                            (progn
+                              (embark-dwim)
+                              t)
+                          (error
+                           nil)))))))
 
 ;; Jump to Chinese characters
 (use-package ace-pinyin