From 588b6031e152b031be1dee04c7b38938ea7eb706 Mon Sep 17 00:00:00 2001 From: JSDurand Date: Thu, 21 Jan 2021 23:52:21 +0800 Subject: Regular updates In the course of configuring Emacs there are numerous changes to make. This is one regular step. --- center-buffer.el | 13 +++++++++---- 1 file changed, 9 insertions(+), 4 deletions(-) (limited to 'center-buffer.el') diff --git a/center-buffer.el b/center-buffer.el index 69d4a90..42c38ef 100644 --- a/center-buffer.el +++ b/center-buffer.el @@ -12,6 +12,15 @@ (defvar center-buffer-width 80 "The width of the body.") +;;;###autoload +(defun center-buffer-toggle () + "Toggle the centering of the buffer." + (interactive) + (cond + ((car (window-margins (selected-window))) + (center-buffer-off)) + ((center-buffer-on)))) + ;;;###autoload (defun center-buffer-on () "Center the buffer." @@ -30,9 +39,5 @@ (interactive) (set-window-margins (selected-window) 0 0)) - - - - (provide 'center-bufrfer) ;;; center-bufrfer.el ends here. -- cgit v1.2.3-18-g5258