emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] externals/auctex 75bea89b03 09/76: Simplify implementation of sty


From: Tassilo Horn
Subject: [elpa] externals/auctex 75bea89b03 09/76: Simplify implementation of style/booktabs.el
Date: Fri, 13 Jan 2023 14:30:44 -0500 (EST)

branch: externals/auctex
commit 75bea89b0304cd560ef83910f3899520f1e85c15
Author: Arash Esbati <arash@gnu.org>
Commit: Arash Esbati <arash@gnu.org>

    Simplify implementation of style/booktabs.el
    
    * style/booktabs.el ("booktabs"): Delete the function
    `LaTeX-booktabs-arg-paren' and use `TeX-arg-string' instead.
---
 style/booktabs.el | 13 +++----------
 1 file changed, 3 insertions(+), 10 deletions(-)

diff --git a/style/booktabs.el b/style/booktabs.el
index 79571ea3c5..bf3c0f532e 100644
--- a/style/booktabs.el
+++ b/style/booktabs.el
@@ -1,6 +1,6 @@
 ;;; booktabs.el -- AUCTeX style for booktabs.sty  -*- lexical-binding: t; -*-
 
-;; Copyright (C) 2003, 2004, 2013, 2018, 2020 Free Software Foundation, Inc.
+;; Copyright (C) 2003--2022 Free Software Foundation, Inc.
 
 ;; Author:   Ralf Angeli <angeli@iwi.uni-sb.de>
 ;; Maintainer: auctex-devel@gnu.org
@@ -37,14 +37,6 @@
                   "font-latex"
                   (keywords class))
 
-(defun LaTeX-booktabs-arg-paren (optional prompt)
-  "Prompt for a value and use parentheses when it is inserted.
-If OPTIONAL is non-nil the parameter is labeled as optional.
-PROMPT is the value of the prompt to be shown."
-  (let ((TeX-arg-opening-brace "(")
-        (TeX-arg-closing-brace ")"))
-    (TeX-parse-argument optional prompt)))
-
 (TeX-add-style-hook
  "booktabs"
  (lambda ()
@@ -61,7 +53,8 @@ PROMPT is the value of the prompt to be shown."
     '("bottomrule" [ "Thickness" ])
     ;; The `ignore' resets `TeX-last-optional-rejected' to nil so that the trim
     ;; argument is prompted also when the thickness is skipped.
-    '("cmidrule" [ "Thickness" ] (ignore) [ LaTeX-booktabs-arg-paren "Trim" ]
+    '("cmidrule" [ "Thickness" ] (ignore)
+      [TeX-arg-string "Trim" nil nil nil "(" ")"]
       "Column(s)")
     '("addlinespace" [ "Height" ])
     '("morecmidrules")



reply via email to

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