diff options
author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2016-11-23 15:45:10 +0100 |
---|---|---|
committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2016-11-23 15:45:10 +0100 |
commit | 676f07f9788261997ae024febcfe63baea68effe (patch) | |
tree | 7689d89d53649fb65f1330d8b8d1aa933e7e66e4 /helm-bookmark.el | |
parent | b4e46911dab20a03f63d3f7f345c80efaa39f990 (diff) |
Use addressbook-buffer-name.
* helm-bookmark.el (helm-bookmark-addressbook-class): Do it.
Diffstat (limited to 'helm-bookmark.el')
-rw-r--r-- | helm-bookmark.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/helm-bookmark.el b/helm-bookmark.el index 031f01a7..b43d24e9 100644 --- a/helm-bookmark.el +++ b/helm-bookmark.el @@ -545,14 +545,14 @@ than `w3m-browse-url' use it." (lambda (candidate) (let ((bmk (helm-bookmark-get-bookmark-from-name candidate))) - (if (and (get-buffer-window "*addressbook*" 'visible) - (string= bmk (with-current-buffer "*addressbook*" + (if (and (get-buffer-window addressbook-buffer-name 'visible) + (string= bmk (with-current-buffer addressbook-buffer-name (save-excursion (search-forward "^Name: " nil t) (car (addressbook-get-contact-data)))))) - (kill-buffer "*addressbook*") - (when (buffer-live-p (get-buffer "*addressbook*")) - (kill-buffer "*addressbook*")) + (kill-buffer addressbook-buffer-name) + (when (buffer-live-p (get-buffer addressbook-buffer-name)) + (kill-buffer addressbook-buffer-name)) (bookmark--jump-via bmk 'switch-to-buffer))))) (persistent-help :initform "Show contact - Prefix with C-u to append") (mode-line :initform (list "Contact(s)" helm-mode-line-string)) |