From 275e66b8b47a6e085a6f359b69af424bc9f6b13d Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Tue, 18 Aug 2020 15:13:12 +0200 Subject: etc: indent-code.el: Match not only ‘(define-public’. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * etc/indent-code.el (main): Also match ‘(define’, as intended. --- etc/indent-code.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/etc/indent-code.el b/etc/indent-code.el index 255ffb126b..84b15b356f 100755 --- a/etc/indent-code.el +++ b/etc/indent-code.el @@ -4,6 +4,7 @@ ;; Copyright © 2017 Alex Kost ;; Copyright © 2017 Ludovic Courtès ;; Copyright © 2020 Maxim Cournoyer +;; Copyright © 2020 Tobias Geerinckx-Rice ;; This file is part of GNU Guix. @@ -93,7 +94,7 @@ ;; Indent the definition of PACKAGE-NAME in FILE-NAME. (find-file file-name) (goto-char (point-min)) - (if (re-search-forward (concat "^(define\\(-public\\) +" + (if (re-search-forward (concat "^(define\\(\\|-public\\) +" package-name) nil t) (let ((indent-tabs-mode nil)) -- cgit v1.2.3