From 04c7f49a732380a2b9f72b1b937171b341c24323 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 9 Apr 2022 03:03:46 -0400
Subject: Better names for testing macros (plus better indentation).

---
 lux-mode/lux-mode.el | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

(limited to 'lux-mode')

diff --git a/lux-mode/lux-mode.el b/lux-mode/lux-mode.el
index f1ddc794a..10d4a89d2 100644
--- a/lux-mode/lux-mode.el
+++ b/lux-mode/lux-mode.el
@@ -570,7 +570,9 @@ This function also returns nil meaning don't specify the indentation."
 
 (defun put-lux-indent (sym indent)
   "Instruct `lux-indent-function' to indent the body of SYM by INDENT."
-  (put sym 'lux-indent-function indent))
+  (if (symbolp sym)
+	  (put sym 'lux-indent-function indent)
+	(put (intern sym) 'lux-indent-function indent)))
 
 (defmacro define-lux-indent (&rest kvs)
   "Call `put-lux-indent' on a series, KVS."
@@ -582,7 +584,6 @@ This function also returns nil meaning don't specify the indentation."
 (define-lux-indent
   (function 'defun)
   (let 'defun)
-  (:let 'defun)
   (case 'defun)
   (do 'defun)
   (exec 'defun)
@@ -601,6 +602,11 @@ This function also returns nil meaning don't specify the indentation."
   (remember 'defun)
   (to_do 'defun)
   (fix_me 'defun)
+
+  (property 'defun)
+  ("property'" 'defun)
+  (coverage 'defun)
+  ("coverage'" 'defun)
   )
 
 ;;;###autoload
-- 
cgit v1.2.3