fix
This commit is contained in:
4
rbw.el
4
rbw.el
@@ -1,5 +1,3 @@
|
|||||||
(setq debug-on-error t)
|
|
||||||
|
|
||||||
(defun rbw-get-password ()
|
(defun rbw-get-password ()
|
||||||
(interactive)
|
(interactive)
|
||||||
(if (rbw/unlocked) (kill-new (rbw/list-all 'rbw/get-pass)) (message "locked vault")))
|
(if (rbw/unlocked) (kill-new (rbw/list-all 'rbw/get-pass)) (message "locked vault")))
|
||||||
@@ -13,7 +11,7 @@
|
|||||||
(let* ((name (read-string "password name: "))
|
(let* ((name (read-string "password name: "))
|
||||||
(username (read-string "username: "))
|
(username (read-string "username: "))
|
||||||
(entry (concat name " " username))
|
(entry (concat name " " username))
|
||||||
(exists? (car (rbw/gets-pass entry))))
|
(exists? (car (rbw/get-pass entry))))
|
||||||
(message exists?)
|
(message exists?)
|
||||||
(if exists? (message "entry already exists")
|
(if exists? (message "entry already exists")
|
||||||
(let* ((length (read-number "length: ")))
|
(let* ((length (read-number "length: ")))
|
||||||
|
|||||||
Reference in New Issue
Block a user