| author | Arash Esbati <arash@gnu.org> | 2026-05-08 21:29:27 +0200 |
|---|---|---|
| committer | Arash Esbati <arash@gnu.org> | 2026-05-08 21:29:27 +0200 |
| commit | ba3daad7892f2340227477d1f72ced2864f3cd3d (patch) | |
| tree | fb561c7231abd418dd0db081f67a0feda5352c86 | |
| parent | 4dc9c8cc1d3672479665923bd0ae807839d3a64c (diff) | |
* style/contract.el ("contract"): Fix usage of \refParN.
| -rw-r--r-- | style/contract.el | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/style/contract.el b/style/contract.el
index bb946cd571f..c8aa3a32ca3 100644
--- a/style/contract.el
+++ b/style/contract.el
@@ -1,6 +1,6 @@
;;; contract.el --- AUCTeX style for `contract.sty' (v0.91) -*- lexical-binding: t; -*-
-;; Copyright (C) 2024--2025 Free Software Foundation, Inc.
+;; Copyright (C) 2024--2026 Free Software Foundation, Inc.
;; Author: Arash Esbati <arash@gnu.org>
;; Maintainer: auctex-devel@gnu.org
@@ -32,9 +32,7 @@
(require 'latex)
;; Silence the compiler:
-(declare-function font-latex-add-keywords
- "font-latex"
- (keywords class))
+(declare-function font-latex-add-keywords "font-latex" (keywords class))
(defconst LaTeX-contract-clause-key-val
'(("dummy")
@@ -103,13 +101,17 @@
;; 5 Cross References
(let ((macs '("refL" "refS" "refN" "refClause" "refClauseN"
- "refPar" "refParL" "refParS" "refParN"
- "refSentence" "refSentenceL"" refSentenceS" "refSentenceN")))
+ "refPar" "refParL" "refParS"
+ "refSentence" "refSentenceL" "refSentenceS" "refSentenceN")))
(dolist (mac macs)
(TeX-add-symbols `(,mac TeX-arg-ref)))
+ (TeX-add-symbols
+ '("refParN" [TeX-arg-completing-read ("arabic" "roman")] TeX-arg-ref))
(when (and (featurep 'font-latex)
(eq TeX-install-font-lock 'font-latex-setup))
(font-latex-add-keywords (mapcar (lambda (x) (list x "{")) macs)
+ 'reference)
+ (font-latex-add-keywords '(("refParN" "[{"))
'reference)))
(LaTeX-paragraph-commands-add-locally '("Clause" "SubClause"))
此内容由惯性聚合(RSS阅读器)自动聚合整理，仅供阅读参考。 原文来自 — 版权归原作者所有。