瀏覽代碼

Add cl-assert

master
10sr 4 年之前
父節點
當前提交
8d01c5b061
簽署人: 10sr GPG 金鑰 ID: 7BEC428194130EB2
共有 1 個檔案被更改,包括 2 行新增2 行删除
  1. +2
    -2
      emacs.el

+ 2
- 2
emacs.el 查看文件

@@ -2514,8 +2514,8 @@ Any output will be written to current buffer."
(defun my-counsel-describe-symbol ()
"Forwaord to `describe-symbol'."
(interactive)
(eval-and-compile (require 'help-mode nil t)) ;; describe-symbol-backends
(eval-and-compile (require 'counsel nil t))
(cl-assert (eval-and-compile (require 'help-mode nil t))) ;; describe-symbol-backends
(cl-assert (eval-and-compile (require 'counsel nil t)))
(ivy-read "Describe symbol: " obarray
;; From describe-symbol definition
:predicate (lambda (vv)


Loading…
取消
儲存