diff options
| author | Ted Zlatanov | 2020-08-22 18:42:36 -0400 |
|---|---|---|
| committer | Ted Zlatanov | 2020-11-29 12:09:48 +0000 |
| commit | 8ef7978028c3edaf47fb40a84fee576c4355753f (patch) | |
| tree | dd8008011cc30fadaf0e0ae7fe669cac75cebff3 /test | |
| parent | 99643f8873e4181df7c1f61fa2bfb7d3b432b9db (diff) | |
| download | emacs-8ef7978028c3edaf47fb40a84fee576c4355753f.tar.gz emacs-8ef7978028c3edaf47fb40a84fee576c4355753f.zip | |
set saved-variable-comment from :custom
GitHub-reference: https://github.com/jwiegley/use-package/issues/861
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/use-package/use-package-tests.el | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/test/lisp/use-package/use-package-tests.el b/test/lisp/use-package/use-package-tests.el index 42bf07453b4..38c2025cac6 100644 --- a/test/lisp/use-package/use-package-tests.el +++ b/test/lisp/use-package/use-package-tests.el | |||
| @@ -1138,6 +1138,19 @@ | |||
| 1138 | (get 'foo 'custom-set) | 1138 | (get 'foo 'custom-set) |
| 1139 | (function set-default)) | 1139 | (function set-default)) |
| 1140 | 'foo bar) | 1140 | 'foo bar) |
| 1141 | (set 'foo 'saved-variable-comment "Customized with use-package foo") | ||
| 1142 | (require 'foo nil nil)))) | ||
| 1143 | |||
| 1144 | (ert-deftest use-package-test/:custom-with-comment1 () | ||
| 1145 | (match-expansion | ||
| 1146 | (use-package foo :custom (foo bar "commented")) | ||
| 1147 | `(progn | ||
| 1148 | (funcall | ||
| 1149 | (or | ||
| 1150 | (get 'foo 'custom-set) | ||
| 1151 | (function set-default)) | ||
| 1152 | 'foo bar) | ||
| 1153 | (set 'foo 'saved-variable-comment "commented") | ||
| 1141 | (require 'foo nil nil)))) | 1154 | (require 'foo nil nil)))) |
| 1142 | 1155 | ||
| 1143 | (ert-deftest use-package-test/:custom-face-1 () | 1156 | (ert-deftest use-package-test/:custom-face-1 () |