From 49fce0b1c320b3c1ce7907f298eb54eab2aded5b Mon Sep 17 00:00:00 2001 From: Max Nickel Date: Sun, 27 Oct 2019 17:47:20 -0400 Subject: [PATCH] [dired] follow function naming conventions --- modules/emacs/dired/autoload.el | 6 +++--- modules/emacs/dired/config.el | 4 ++-- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/modules/emacs/dired/autoload.el b/modules/emacs/dired/autoload.el index ca49283ac..a59bccbb3 100644 --- a/modules/emacs/dired/autoload.el +++ b/modules/emacs/dired/autoload.el @@ -9,12 +9,12 @@ ;;;###autoload -(defun +dired/enable-git-info-h () +(defun +dired-enable-git-info-h () (if (locate-dominating-file "." ".git") (dired-git-info-mode 1))) ;;;###autoload -(defun +dired/dotfiles-hide () +(defun +dired-dotfiles-hide () (set (make-local-variable '+dired-dotfiles-show-p) nil) (dired-mark-files-regexp "^\\\.") (dired-do-kill-lines)) @@ -24,6 +24,6 @@ (interactive) (when (equal major-mode 'dired-mode) (if (or (not (boundp '+dired-dotfiles-show-p)) +dired-dotfiles-show-p) ; if currently showing - (+dired/dotfiles-hide) + (+dired-dotfiles-hide) (progn (revert-buffer) ; otherwise just revert to re-show (set (make-local-variable '+dired-dotfiles-show-p) t))))) diff --git a/modules/emacs/dired/config.el b/modules/emacs/dired/config.el index 64fdcc631..fe430dd72 100755 --- a/modules/emacs/dired/config.el +++ b/modules/emacs/dired/config.el @@ -48,7 +48,7 @@ only variant that supports --group-directories-first." ;; hide details by default (add-hook 'dired-mode-hook 'dired-hide-details-mode) ;; hide dotfiles by default - (add-hook 'dired-after-readin-hook '+dired/dotfiles-hide) + (add-hook 'dired-after-readin-hook '+dired-dotfiles-hide) ;; Don't complain about this command being disabled when we use it (put 'dired-find-alternate-file 'disabled nil) @@ -180,4 +180,4 @@ we have to clean it up ourselves." :after dired :init (progn - (add-hook 'dired-after-readin-hook '+dired/enable-git-info-h))) + (add-hook 'dired-after-readin-hook '+dired-enable-git-info-h)))