From 275e66b8b47a6e085a6f359b69af424bc9f6b13d Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Tue, 18 Aug 2020 15:13:12 +0200 Subject: [PATCH] =?UTF-8?q?etc:=20indent-code.el:=20Match=20not=20only=20?= =?UTF-8?q?=E2=80=98(define-public=E2=80=99.?= 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))