ui/popup: conform function to naming conventions

This commit is contained in:
Henrik Lissner 2019-09-10 15:01:00 -04:00
parent 6f6e30c428
commit d866ee3738
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -109,7 +109,7 @@ the command buffer."
;;;###package help-mode ;;;###package help-mode
(after! help-mode (after! help-mode
(defun doom--switch-from-popup (location) (defun +popup--switch-from-popup (location)
(let (origin enable-local-variables) (let (origin enable-local-variables)
(save-popups! (save-popups!
(switch-to-buffer (car location) nil t) (switch-to-buffer (car location) nil t)
@ -131,7 +131,7 @@ the command buffer."
(require 'find-func) (require 'find-func)
(when (eq file 'C-source) (when (eq file 'C-source)
(setq file (help-C-file-name (indirect-function fun) 'fun))) (setq file (help-C-file-name (indirect-function fun) 'fun)))
(doom--switch-from-popup (find-function-search-for-symbol fun nil file)))) (+popup--switch-from-popup (find-function-search-for-symbol fun nil file))))
(define-button-type 'help-variable-def (define-button-type 'help-variable-def
:supertype 'help-xref :supertype 'help-xref
@ -139,14 +139,14 @@ the command buffer."
(lambda (var &optional file) (lambda (var &optional file)
(when (eq file 'C-source) (when (eq file 'C-source)
(setq file (help-C-file-name var 'var))) (setq file (help-C-file-name var 'var)))
(doom--switch-from-popup (find-variable-noselect var file)))) (+popup--switch-from-popup (find-variable-noselect var file))))
(define-button-type 'help-face-def (define-button-type 'help-face-def
:supertype 'help-xref :supertype 'help-xref
'help-function 'help-function
(lambda (fun file) (lambda (fun file)
(require 'find-func) (require 'find-func)
(doom--switch-from-popup (find-function-search-for-symbol fun 'defface file))))) (+popup--switch-from-popup (find-function-search-for-symbol fun 'defface file)))))
;;;###package helpful ;;;###package helpful