From 592e16d76d6600b391a929699c78651ea2fd682f Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Thu, 24 May 2018 16:40:37 +0200 Subject: [PATCH] Conform debug commands to naming convention --- core/autoload/debug.el | 14 +++++++------- modules/config/default/+bindings.el | 8 ++++---- 2 files changed, 11 insertions(+), 11 deletions(-) diff --git a/core/autoload/debug.el b/core/autoload/debug.el index 03c944765..586c0dc20 100644 --- a/core/autoload/debug.el +++ b/core/autoload/debug.el @@ -93,7 +93,7 @@ ready to be pasted in a bug report on github." ;; ;;;###autoload -(defun doom//info () +(defun doom/info () "Collects some debug information about your Emacs session, formats it into markdown and copies it to your clipboard, ready to be pasted into bug reports!" (declare (interactive-only t)) @@ -105,7 +105,7 @@ markdown and copies it to your clipboard, ready to be pasted into bug reports!" (message "Done! Copied to clipboard."))) ;;;###autoload -(defun doom//am-i-secure () +(defun doom/am-i-secure () "Test to see if your root certificates are securely configured in emacs." (declare (interactive-only t)) (interactive) @@ -129,7 +129,7 @@ markdown and copies it to your clipboard, ready to be pasted into bug reports!" t))))) ;;;###autoload -(defun doom//version () +(defun doom/version () "Display the current version of Doom & Emacs, including the current Doom branch and commit." (interactive) @@ -169,7 +169,7 @@ branch and commit." "--eval" (prin1-to-string `(delete-file ,file))))))) ;;;###autoload -(defun doom//open-vanilla-sandbox () +(defun doom/open-vanilla-sandbox () "Open an Emacs Lisp buffer destinated to run in a blank Emacs session. This vanilla sandbox is started with emacs -Q, and provides a testbed for @@ -221,7 +221,7 @@ access to the installed packages." (error (signal (car e) (car e))))))) ;;;###autoload -(defun doom//open-bug-report () +(defun doom/open-bug-report () "Open a markdown buffer destinated to populate the New Issue page on Doom Emacs' issue tracker. @@ -266,7 +266,7 @@ will be automatically appended to the result." (defvar doom--profiler nil) ;;;###autoload -(defun doom//toggle-profiler () +(defun doom/toggle-profiler () "Toggle the Emacs profiler. Run it again to see the profiling report." (interactive) (if (not doom--profiler) @@ -276,7 +276,7 @@ will be automatically appended to the result." (setq doom--profiler (not doom--profiler))) ;;;###autoload -(defun doom//profile-emacs () +(defun doom/profile-emacs () "Profile the startup time of Emacs in the background with ESUP. If INIT-FILE is non-nil, profile that instead of USER-INIT-FILE." (interactive) diff --git a/modules/config/default/+bindings.el b/modules/config/default/+bindings.el index 01b3bf7cc..2d4f221a3 100644 --- a/modules/config/default/+bindings.el +++ b/modules/config/default/+bindings.el @@ -215,11 +215,11 @@ (:desc "help" :prefix "h" :n "h" help-map :desc "Apropos" :n "a" #'apropos - :desc "Open Bug Report" :n "b" #'doom//open-bug-report + :desc "Open Bug Report" :n "b" #'doom/open-bug-report :desc "Describe char" :n "c" #'describe-char :desc "Describe DOOM module" :n "d" #'doom/describe-module :desc "Open Doom manual" :n "D" #'doom//open-manual - :desc "Open vanilla sandbox" :n "E" #'doom//open-vanilla-sandbox + :desc "Open vanilla sandbox" :n "E" #'doom/open-vanilla-sandbox :desc "Describe function" :n "f" #'describe-function :desc "Describe face" :n "F" #'describe-face :desc "Info" :n "i" #'info-lookup-symbol @@ -229,7 +229,7 @@ :desc "Command log" :n "L" #'global-command-log-mode :desc "Toggle Emacs log" :n "m" #'view-echo-area-messages :desc "Describe mode" :n "M" #'describe-mode - :desc "Toggle profiler" :n "p" #'doom//toggle-profiler + :desc "Toggle profiler" :n "p" #'doom/toggle-profiler :desc "Reload theme" :n "r" #'doom//reload-theme :desc "Reload private config" :n "R" #'doom//reload :desc "Describe DOOM setting" :n "s" #'doom/describe-setting @@ -255,7 +255,7 @@ :desc "REPL" :n "r" #'+eval/open-repl :v "r" #'+eval:repl :desc "Neotree" :n "n" #'+neotree/open - :desc "Neotree: on this file" :n "N" #'+neotree/find-this-file + :desc "Neotree: find file" :n "N" #'+neotree/find-this-file :desc "Imenu sidebar" :nv "i" #'imenu-list-smart-toggle :desc "Terminal" :n "t" #'+term/open-popup-in-project