[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master c64c8a26: Add support for wasysym package
From: |
Arash Esbati |
Subject: |
master c64c8a26: Add support for wasysym package |
Date: |
Thu, 4 May 2023 14:45:13 -0400 (EDT) |
branch: master
commit c64c8a26eb45414f2774d8c3b63bd320564c75a0
Author: Arash Esbati <arash@gnu.org>
Commit: Arash Esbati <arash@gnu.org>
Add support for wasysym package
* latex.el (LaTeX-math-menu): Add "Wasysym" to the list.
(LaTeX-math-default): Support math symbols provided by the wasysym
package.
* Makefile.in (STYLESRC): Add new style.
* style/wasysym.el: New file containing only text symbols.
---
Makefile.in | 1 +
latex.el | 23 ++++++-
style/wasysym.el | 184 +++++++++++++++++++++++++++++++++++++++++++++++++++++++
3 files changed, 206 insertions(+), 2 deletions(-)
diff --git a/Makefile.in b/Makefile.in
index 0ffc9dc8..ef64fff5 100644
--- a/Makefile.in
+++ b/Makefile.in
@@ -197,6 +197,7 @@ STYLESRC = style/prosper.el \
style/proc.el style/microtype.el style/tcolorboxlib-theorems.el
\
style/amsaddr.el style/parskip.el style/catchfilebetweentags.el \
style/physics.el style/soul.el style/algpseudocodex.el
+ style/wasysym.el
STYLEELC = $(STYLESRC:.el=.elc)
diff --git a/latex.el b/latex.el
index 8d95440a..cf2518b2 100644
--- a/latex.el
+++ b/latex.el
@@ -5696,7 +5696,7 @@ use \\[customize]."
'("Math"
("Greek Uppercase") ("Greek Lowercase") ("Binary Op") ("Relational")
("Arrows") ("Punctuation") ("Misc Symbol") ("Var Symbol") ("Log-like")
- ("Delimiters") ("Constructs") ("Accents") ("AMS"))
+ ("Delimiters") ("Constructs") ("Accents") ("AMS") ("Wasysym"))
"Menu containing LaTeX math commands.
The menu entries will be generated dynamically, but you can specify
the sequence by initializing this variable.")
@@ -6223,7 +6223,26 @@ the sequence by initializing this variable.")
(nil "intertext" ("AMS" "Special"))
(nil "substack" ("AMS" "Special"))
(nil "subarray" ("AMS" "Special"))
- (nil "sideset" ("AMS" "Special")))
+ (nil "sideset" ("AMS" "Special"))
+ ;; Wasysym symbols:
+ (nil "lhd" ("Wasysym" "Binary Op") 9665) ;; #X22C1
+ (nil "LHD" ("Wasysym" "Binary Op") 9664) ;; #X25C0
+ (nil "ocircle" ("Wasysym" "Binary Op") 9675) ;; #X25CB
+ (nil "rhd" ("Wasysym" "Binary Op") 9655) ;; #X25B7
+ (nil "RHD" ("Wasysym" "Binary Op") 9654) ;; #X25B6
+ (nil "unlhd" ("Wasysym" "Binary Op") 8884) ;; #X22B4
+ (nil "unrhd" ("Wasysym" "Binary Op") 8885) ;; #X22B5
+ (nil "apprle" ("Wasysym" "Relational") 8818) ;; #X2272
+ (nil "apprge" ("Wasysym" "Relational") 8819) ;; #X2273
+ (nil "invneg" ("Wasysym" "Relational") 8976) ;; #X2310
+ (nil "Join" ("Wasysym" "Relational") 10781) ;; #X2A1D
+ (nil "leadsto" ("Wasysym" "Relational") 10547) ;; #X2933
+ (nil "sqsubset" ("Wasysym" "Relational") 8847) ;; #X228f
+ (nil "sqsupset" ("Wasysym" "Relational") 8848) ;; #X2290
+ (nil "wasypropto" ("Wasysym" "Relational") 8733) ;; #X221D
+ (nil "Box" ("Wasysym" "Misc Symbol") 9633) ;; #X25A1
+ (nil "Diamond" ("Wasysym" "Misc Symbol") 9671) ;; #X25C7
+ (nil "logof" ("Wasysym" "Misc Symbol")))
"Alist of LaTeX math symbols.
Each entry should be a list with upto four elements, KEY, VALUE,
diff --git a/style/wasysym.el b/style/wasysym.el
new file mode 100644
index 00000000..8ac47d9d
--- /dev/null
+++ b/style/wasysym.el
@@ -0,0 +1,184 @@
+;;; wasysym.el --- AUCTeX style for `wasysym.sty' (v2.4) -*- lexical-binding:
t; -*-
+
+;; Copyright (C) 2023 Free Software Foundation, Inc.
+
+;; Author: Arash Esbati <arash@gnu.org>
+;; Maintainer: auctex-devel@gnu.org
+;; Created: 2023-05-02
+;; Keywords: tex
+
+;; This file is part of AUCTeX.
+
+;; AUCTeX is free software; you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; AUCTeX is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+;; General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with AUCTeX; see the file COPYING. If not, write to the Free
+;; Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Commentary:
+
+;; This file adds support for `wasysym.sty' (v2.4) from 2020/01/19.
+
+;;; Code:
+
+(TeX-add-style-hook
+ "wasysym"
+ (lambda ()
+ (TeX-add-symbols
+ ;; General symbols
+ "male"
+ "female"
+ "cent"
+ "wasyeuro"
+ "currency"
+ "phone"
+ "recorder"
+ "clock"
+ "lightning"
+ "diameter"
+ "invdiameter"
+ "varangle"
+ "wasylozenge"
+ "kreuz"
+ "smiley"
+ "frownie"
+ "blacksmiley"
+ "sun"
+ "checked"
+ "bell"
+ "ataribox"
+ "permil"
+ "brokenvert"
+ "wasytherefore"
+ "Bowtie"
+ "agemO"
+ "wasyparagraph"
+ "Paragraph"
+ "wasycmd"
+ "applecmd"
+
+ ;; Electrical and physical symbols
+ "AC"
+ "HF"
+ "VHF"
+ "photon"
+ "gluon"
+
+ ;; Polygons and stars
+ "Square"
+ "XBox"
+ "CheckedBox"
+ "hexagon"
+ "varhexagon"
+ "pentagon"
+ "octagon"
+ "hexstar"
+ "varhexstar"
+ "davidsstar"
+
+ ;; Music notes
+ "eighthnote"
+ "quarternote"
+ "halfnote"
+ "fullnote"
+ "twonotes"
+
+ ;; Various circles
+ "Circle"
+ "CIRCLE"
+ "Leftcircle"
+ "LEFTCIRCLE"
+ "Rightcircle"
+ "RIGHTCIRCLE"
+ "LEFTcircle"
+ "RIGHTcircle"
+ "leftturn"
+ "rightturn"
+
+ ;; Arrows
+ "pointer"
+ "RIGHTarrow"
+ "LEFTarrow"
+ "UParrow"
+ "DOWNarrow"
+
+ ;; Phonetic symbols
+ "thorn"
+ "Thorn"
+ "openo"
+ "inve"
+
+ ;; Astronomical symbols
+ "vernal"
+ "ascnode"
+ "descnode"
+ "fullmoon"
+ "newmoon"
+ "leftmoon"
+ "rightmoon"
+ "astrosun"
+ "mercury"
+ "venus"
+ "earth"
+ "mars"
+ "jupiter"
+ "saturn"
+ "uranus"
+ "neptune"
+ "pluto"
+
+ ;; Astrological symbols and the zodiacal symbols
+ "aries"
+ "taurus"
+ "gemini"
+ "cancer"
+ "leo"
+ "virgo"
+ "libra"
+ "scorpio"
+ "sagittarius"
+ "capricornus"
+ "aquarius"
+ "pisces"
+ "conjunction"
+ "opposition"
+
+ ;; APL symbols
+ "APLstar"
+ "APLlog"
+ "APLbox"
+ "APLup"
+ "APLdown"
+ "APLinput"
+ "APLcomment"
+ "APLinv"
+ "APLuparrowbox"
+ "APLdownarrowbox"
+ "APLleftarrowbox"
+ "APLrightarrowbox"
+ "notbackslash"
+ "notslash"
+ "APLnot"
+ "APLvert"
+ "APLcirc"
+ "APLminus")
+
+ ;; \euro is available unless `noeuro' option is specified:
+ (unless (LaTeX-provided-package-options-member "wasysym" "noeuro")
+ (TeX-add-symbols "euro")))
+ TeX-dialect)
+
+(defvar LaTeX-wasysym-package-options
+ '("integrals" "nointegrals" "compat1" "noeuro")
+ "Package options for the wasysym package.")
+
+;;; wasysym.el ends here
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master c64c8a26: Add support for wasysym package,
Arash Esbati <=