mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-14 09:39:42 +00:00
Code Issues Releases Activity

Fix Bug#31846. Do not merge with master

Browse Source 
* lisp/net/secrets.el (secrets-search-items)
(secrets-create-item): Fix format of :dict-entry values.  (Bug#31846)
This commit is contained in:
Michael Albinus 2018-06-16 16:05:07 +02:00
parent 63ba73a9f2
commit 4753d79331
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
lisp/net/secrets.el
View File

@ -612,9 +612,9 @@ The object labels of the found items are returned as list."
(error 'wrong-type-argument (cadr attributes)))
(setq props (append
props
(list :dict-entry
(substring (symbol-name (car attributes)) 1)
(cadr attributes)))
`((:dict-entry
,(substring (symbol-name (car attributes)) 1)
,(cadr attributes))))
attributes (cddr attributes)))
;; Search. The result is a list of object paths.
(setq result
@ -650,9 +650,9 @@ The object path of the created item is returned."
(error 'wrong-type-argument (cadr attributes)))
(setq props (append
props
(list :dict-entry
(substring (symbol-name (car attributes)) 1)
(cadr attributes)))
`((:dict-entry
,(substring (symbol-name (car attributes)) 1)
,(cadr attributes))))
attributes (cddr attributes)))
;; Create the item.
(setq result