diff options
| author | Artur Malabarba | 2014-12-22 10:36:30 -0200 |
|---|---|---|
| committer | Artur Malabarba | 2014-12-22 10:36:30 -0200 |
| commit | 251463c60bfb49920bdaba828e650806682ddd63 (patch) | |
| tree | d07d92a183f42543ea061ffbfa7c4acbccd554f7 /test | |
| parent | 6f3f6050607cf64cb5728af1ff871b8c5e994661 (diff) | |
| download | emacs-251463c60bfb49920bdaba828e650806682ddd63.tar.gz emacs-251463c60bfb49920bdaba828e650806682ddd63.zip | |
let-alist.el (let-alist): Use `make-symbol' instead of `gensym'.
Diffstat (limited to 'test')
| -rw-r--r-- | test/automated/let-alist.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/automated/let-alist.el b/test/automated/let-alist.el index 391ccb44a8d..c43e6a07ddc 100644 --- a/test/automated/let-alist.el +++ b/test/automated/let-alist.el | |||
| @@ -30,7 +30,7 @@ | |||
| 30 | (.test-two (cdr (assq 'test-two symbol)))) | 30 | (.test-two (cdr (assq 'test-two symbol)))) |
| 31 | (list .test-one .test-two | 31 | (list .test-one .test-two |
| 32 | .test-two .test-two))) | 32 | .test-two .test-two))) |
| 33 | (cl-letf (((symbol-function #'gensym) (lambda (x) 'symbol))) | 33 | (cl-letf (((symbol-function #'make-symbol) (lambda (x) 'symbol))) |
| 34 | (macroexpand | 34 | (macroexpand |
| 35 | '(let-alist data (list .test-one .test-two | 35 | '(let-alist data (list .test-one .test-two |
| 36 | .test-two .test-two)))))) | 36 | .test-two .test-two)))))) |