guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

06/07: etc: indent-code.el: Match not only ‘(define-public’.


From: guix-commits
Subject: 06/07: etc: indent-code.el: Match not only ‘(define-public’.
Date: Tue, 18 Aug 2020 18:01:51 -0400 (EDT)

nckx pushed a commit to branch master
in repository guix.

commit 275e66b8b47a6e085a6f359b69af424bc9f6b13d
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Tue Aug 18 15:13:12 2020 +0200

    etc: indent-code.el: Match not only ‘(define-public’.
    
    * 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 255ffb1..84b15b3 100755
--- a/etc/indent-code.el
+++ b/etc/indent-code.el
@@ -4,6 +4,7 @@
 ;; Copyright © 2017 Alex Kost <alezost@gmail.com>
 ;; Copyright © 2017 Ludovic Courtès <ludo@gnu.org>
 ;; Copyright © 2020 Maxim Cournoyer <maxim.cournoyer@gmail.com>
+;; Copyright © 2020 Tobias Geerinckx-Rice <me@tobias.gr>
 
 ;; 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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]