X-Git-Url: https://git.korewanetadesu.com/?p=pelican-mode.git;a=blobdiff_plain;f=pelican-mode.el;h=dce4bb8ddfe0f06e7a559d73581fddf22f77b011;hp=fe4eea0bed0220713c94a9b7d1a04d6698f158bc;hb=f292b498bf735f01375e68add5539e3bf3cd729d;hpb=5bfb2e94894e03be62dd16fd80c5d0d0babc1fca diff --git a/pelican-mode.el b/pelican-mode.el index fe4eea0..dce4bb8 100644 --- a/pelican-mode.el +++ b/pelican-mode.el @@ -176,11 +176,6 @@ "Check if this buffer is under a Pelican site." (not (null (pelican-find-root)))) -(defun pelican-enable-if-site () - "Enable `pelican-mode' if this buffer is under a Pelican site." - (when (pelican-is-in-site) - (pelican-mode 1))) - (defun pelican-make (target) "Execute TARGET in a Makefile at the root of the site." (interactive "sMake Pelican target: ") @@ -221,12 +216,18 @@ "Toggle Pelican mode. Interactively with no argument, this command toggles the mode. -to show buffer size and position in mode-line." +for editing Pelican site files." :init-value nil :lighter " Pelican" :keymap pelican-keymap :group 'pelican) +;;;###autoload +(defun pelican-enable-if-site () + "Enable `pelican-mode' if this buffer is under a Pelican site." + (when (pelican-is-in-site) + (pelican-mode 1))) + ;;;###autoload (add-hook 'markdown-mode-hook 'pelican-enable-if-site)