[AUCTeX-devel] ragged2e.el, everysel.el

2012-12-25 Thread Mads Jensen 
Resubmission of ragged2e which adds some new commands as replacements
for LaTeX's \raggedright, \raggedleft etc. (they're not redefined, as
entirely new commands are provided).

ragged2e relies on everysel, and since there were only two commands in
the package, I'm also contributing a style file for it, as well. The
footmisc package appears only to be needed when the "footnotes" option
was used.
-- 
Med Venlig Hilsen / Kind Regards,
Mads Jensen
Rubinsteinsvej 31,st.th
DK-2450 Kbh. SV
Denmark
+45 6168 8518
My brain is my second favorite organ.
  -- Woody Allen
;;; ragged2e.el --- AUCTeX style for `ragged2e.sty'

;; Copyright (C) 2011 Free Software Foundation, Inc.

;; Author: Mads Jensen 
;; Created: 2011-04-16
;; 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 `ragged2e.sty'.

;;; Code:

(TeX-add-style-hook
 "ragged2e"
 (lambda ()
   (TeX-add-symbols
"CenteringLeftskip"
"RaggedLeftLeftskip"
"RaggedRightLeftskip"
"CenteringRightskip"
"RaggedLeftRightskip"
"RaggedRightRightskip"
"CenteringParfillskip"
"RaggedLeftParfillskip"
"RaggedRightParfillskip"
"CenteringParindent"
"RaggedLeftParindent"
"RaggedRightParindent"
"JustifyingParfillskip"
"JustifyingParindent"
"ttraggedright"
"Centering"
"justifying"
"RaggedRight"
"RaggedLeft")

   (LaTeX-add-environments 
"FlushLeft" "FlushRight" "Center" "justify")

   (TeX-run-style-hooks "footmisc" "everysel")))

(defvar LaTeX-ragged2e-package-options 
  '("originalcommands" "newcommands" "originalparameters" "document"
"newparameters" "footnotes" "raggedrightboxes")
  "Package options for the ragged2e package.")

;;; ragged2e.el ends here
;;; ragged2e.el --- AUCTeX style for `everysel.sty'

;; Copyright (C) 2012 Free Software Foundation, Inc.

;; Author: Mads Jensen 
;; Created: 2012-12-25
;; 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 `everysel.sty'.

;;; Code:

(TeX-add-style-hook
 "everysel"
 (lambda ()
   (TeX-add-symbols
;; adds a hook (the argument code) to be called after \\selectfont
'("EverySelectfont" 1)
;; adds a hook to be called after the next \\selectfont
'("AtNextSelectont" 1

(defvar LaTeX-ragged2e-package-options nil 
  "Package options for the everysel package.")

;;; everysel.el ends here


signature.asc
Description: OpenPGP digital signature
___
auctex-devel mailing list
auctex-devel@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-devel

[AUCTeX-devel] bigstrut.el

2012-12-25 Thread Mads Jensen 
The style-file is part of a bundle with multirow, which already has a
style file by yours truly. I didn't see any variable with the standard
delimiters, so bigdelim.el might be improved at some point.
-- 
Med Venlig Hilsen / Kind Regards,
Mads Jensen
Rubinsteinsvej 31,st.th
DK-2450 Kbh. SV
Denmark
+45 6168 8518
My brain is my second favorite organ.
  -- Woody Allen
;;; bigstrut.el --- AUCTeX style for `bigstrut.sty'

;; Copyright (C) 2012 Free Software Foundation, Inc.

;; Author: Mads Jensen 
;; Maintainer: auctex-devel@gnu.org
;; 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 `bigstrut.sty'.

;;; Code:

(TeX-add-style-hook
 "bigstrut"
 (lambda ()
   (TeX-add-symbols 
"bigstrutsetup"
'("bigstrut" [ TeX-arg-bigstrut ]

(defun TeX-arg-bigstrut (optional &optional prompt)
  "Prompt for the optional argument in \\bigstrut"
  (TeX-argument-insert 
   (completing-read (TeX-argument-prompt 
 optional "Strut to top (t) or bottom (b)" nil t)
 (mapcar 'list '("t" "b")) nil t) optional))

(defvar LaTeX-bigstrut-package-options nil
  "Package options for the bigstrut package.")

;;; bigstrut.el ends here
;;; bigdelim.el --- AUCTeX style for `bigdelim.sty'

;; Copyright (C) 2011 Free Software Foundation, Inc.

;; Author: Mads Jensen 
;; Maintainer: auctex-devel@gnu.org
;; Created: 2011-01-24
;; 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 `bigdelim.sty'.

;;; Code:

(TeX-add-style-hook
 "bigdelim"
 (lambda ()
   (TeX-add-symbols
'("ldelim" TeX-arg-bigdelim-brace "Number of rows for multirow" 
  "Width in multirow" [ "Text in multirow" ])
'("rdelim" TeX-arg-bigdelim-brace "Number of rows for multirow" 
  "Width in multirow" [ "Text in multirow" ]
   
(defun TeX-arg-bigdelim-brace (optional &optional prompt)
  "Prompt for a single brace, and do not insert the matching
  right parentheses."
  (let ((brace (read-from-minibuffer 
   (TeX-argument-prompt optional prompt "Brace") nil)))
(insert (format "%s" brace

(defvar LaTeX-bigdelim-package-options nil
  "Package options for the bigdelim package.")

;;; bigdelim.el ends here


signature.asc
Description: OpenPGP digital signature
___
auctex-devel mailing list
auctex-devel@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-devel

Re: [AUCTeX-devel] mathtools.el

2012-12-25 Thread Mads Jensen 
On 2012-12-25 19:53, Tassilo Horn wrote:
> you've forgotten to attach the file. ;-)

Oops. Here it is :-)

> Bye,
> Tassilo
-- 
Med Venlig Hilsen / Kind Regards,
Mads Jensen
Rubinsteinsvej 31,st.th
DK-2450 Kbh. SV
Denmark
+45 6168 8518
My brain is my second favorite organ.
  -- Woody Allen
;;; mathtools.el --- Style hook for the LaTeX package `mathtools'.

;;; tocloft.el --- AUCTeX style for `tocloft.sty'

;; Copyright (C) 2012 Free Software Foundation, Inc.

;; Author: Mads Jensen 
;; Created: 2011-02-13
;; 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 `mathtools.sty'

;;; Comments: 

;;; This package serves as a wrapper for amsmath, adding more features
;;; and fixing a few bugs in amsmath.  The mathstyle argument for many
;;; of the macros is discussed at
;;; 

;;; Code:

(defvar LaTeX-mathtools-key-val-options
  "Options for the \\mathtoolsset command"
  '(("showonlyrefs")
("mathic" ("true" "false"))
("showmanualtags" ("true" "false"))
("firstline-afterskip")
("lastline-preskip")
("multlined-pos" ("c" "b" "t"))
("multlined-width")
("centercolon" ("true" "false"))
("prescript-sub-format")
("prescript-sup-format")
("prescript-arg-format")))

(TeX-add-style-hook 
 "mathtools"
 (function 
  (lambda ()

;; mathtools requires amsmath, as some bugs in amsmath are fixed
(TeX-run-style-hooks "amsmath")

(LaTeX-add-environments 
 '("lgathered" LaTeX-amsmath-env-aligned)
 '("rgathered" LaTeX-amsmath-env-aligned)
 '("multlined" LaTeX-mathtools-env-multlined)
 '("matrix*" LaTeX-mathtools-env-matrix-starred)
 '("pmatrix*" LaTeX-mathtools-env-matrix-starred)
 '("bmatrix*" LaTeX-mathtools-env-matrix-starred)
 '("Bmatrix*" LaTeX-mathtools-env-matrix-starred)
 '("vmatrix*" LaTeX-mathtools-env-matrix-starred)
 '("Vmatrix*" LaTeX-mathtools-env-matrix-starred)
 '("spreadlines" LaTeX-mathtools-env-spreadlines)
 "dcases" "dcases*")

(TeX-add-symbols
 '("mathtoolsset" (TeX-arg-key-val LaTeX-mathtools-key-val))
 '("mathclap" 1)
 '("mathllap" ["Mathstyle"] t)
 '("mathrlap" ["Mathstyle"] t)
 '("mathclap" ["Mathstyle"] t)
 '("mathmakebox" [TeX-arg-size] [ TeX-arg-size ] 1)
 '("clap" 1)
 '("mathmbox" 1)
 '("cramped" 1)
 '("crampedllap" [ "Mathstye" ] t)
 '("crampedrlap" [ "Mathstyle" ] t)
 '("crampedclap" [ "Mathstyle" ] t)
 '("smashoperator" [ "Position (l, r or lr (default)" ] 2)
 ;; 3.1.4 Adjusting the limits of operators
 ;; explicit argument encapsulation does not seem to be required
 '("adjustlimits" 4)
 ;; 3.2 Controlling tags
 '("newtagform" "Name" ["Inner format"] "Left" "Right")
 '("renewtagform" "Name" ["Inner format"] "Left" "Right")
 '("usetagform" "Name")
 '("xleftrightarrow" ["Below"] "Above")
 '("xLeftarrow" ["Below"] "Above")
 '("xRightarrow" ["Below"] "Above")
 '("xLeftrightarrow" ["Below"] "Above")
 '("xhookleftarrow" ["Below"] "Above")
 '("xhookrightarrow" ["Below"] "Above")
 '("xmapsto" ["Below"] "Above")
 '("xrightharpoondown" ["Below"] "Above")
 '("xrightharpoonup" ["Below"] "Above")
 '("xleftharpoondown" ["Below"] "Above")
 '("xleftharpoonup" ["Below"] "Above")
 '("xrightleftharpoons" ["Below"] "Above")
 '("xleftrightharpoons" ["Below"] "Above")
 '("underbracket" [ "Rule thickness" ] [ "Bracket height" ] t)
 '("overbracket" [ "Rule thickness" ] [ "Bracket height" ] t)
 '("underbrace" 1)
 '("overbrace" 1)
 '("LaTeXunderbrace" 1)
 '("LaTeXoverbrace" 1)
 ;; 3.4.2
 '("shoveleft"  [ TeX-arg-size ] 1)
 '("shoveright" [ TeX-arg-size ] 1)
 ;; don't understand t, but intertext in amsmath.el uses it
 '("shortintertext" t)
 '("DeclarePairedDelimeter" TeX-arg-macro "Left delimeter" "Right delimeter")
 ;; 3.4.4
 '("MoveEqLeft" [ "Number" ])
 '("ArrowBetweenLines" [ TeX-arg-macro ] )
 '("ArrowBetweenLines*" [ TeX-arg-macro ] )
 ;; colon operators
 "vcentcolon" "ordinarycolon" "coloneqq" "Coloneqq"
 "coloneq" "Coloneq" "eqqcolon" "Eqqcolon" "eqcolon"
 "Eqcolon" "colonapprox" "Colonapprox" "colonsim" "Colonsim"

Re: [AUCTeX-devel] ulem.el

2012-12-25 Thread Tassilo Horn 
Mads Jensen  writes:

Hey Mads,

> Resubmission of ulem.el

Committed.  Thanks a lot!
Tassilo


___
auctex-devel mailing list
auctex-devel@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-devel

Re: [AUCTeX-devel] mathtools.el

2012-12-25 Thread Tassilo Horn 
Mads Jensen  writes:

Hey Mads,

> Resubmission of mathtools.el Again, I hope it will be added :-)

you've forgotten to attach the file. ;-)

Bye,
Tassilo

___
auctex-devel mailing list
auctex-devel@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-devel

[AUCTeX-diffs] Changes to style/ulem.el

2012-12-25 Thread Tassilo Horn 
CVSROOT:/sources/auctex
Module name:auctex
Changes by: Tassilo Horn  12/12/25 18:52:03

Index: style/ulem.el
===
RCS file: style/ulem.el
diff -N style/ulem.el
--- /dev/null   1 Jan 1970 00:00:00 -
+++ style/ulem.el   25 Dec 2012 18:52:03 -  1.1
@@ -0,0 +1,106 @@
+;;; ulem.el --- AUCTeX style for `ulem.sty'
+
+;; Copyright (C) 2012 Free Software Foundation, Inc.
+
+;; Author: Mads Jensen 
+;; 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 `ulem.sty'.
+
+;;; Code:
+
+(TeX-add-style-hook
+ "ulem"
+ (lambda ()
+   (TeX-add-symbols
+'("uline" 1)
+'("uuline" 1)
+'("uwave" 1)
+'("sout" 1)
+'("xout" 1)
+;; can be used with \renewcommand or \setlength
+"ULthickness"
+"ULdepth"
+;; custom commands can be defined with these commands; see the
+;; documentation for an example
+"ULon"
+"markoverwith"
+;; \useunder {underline_command}{font_declaration}{font_command}
+;; replaces occurences of font_declaration and font_command with the
+;; underline_command
+'("useunder" TeX-arg-ulem-useunder
+  TeX-arg-ulem-fontdecl TeX-arg-ulem-fontcmd))
+
+   ;; Fontification
+   (when (and (featurep 'font-latex)
+ (eq TeX-install-font-lock 'font-latex-setup))
+ ;; Tell font-lock about the update.
+ (font-latex-add-keywords '(("useunder" "{{{")) 'function)
+ (font-latex-add-keywords '(("uline" "{")
+   ("uwave" "{")
+   ("sout" "{")
+   ("xout" "{")) 'textual
+
+(defvar LaTeX-arg-fontdecl
+  '(mapcar (concat (lambda (str) (concat "\\" str)))
+  '("itshape" "bfseries" "scshape"
+"ttfamily" "upshape" "mdseries"
+"rmfamily" "sffamily" "slshape"))
+  "List of font declaration commands in LaTeX")
+
+(defvar LaTeX-arg-fontcmd
+  '(mapcar (concat (lambda (str) (concat "\\" str)))
+  '("textit" "textbf" "textsc"
+"texttt" "textup" "textmd"
+"textrm" "textsf" "textsl"))
+  "List of font commands in LaTeX")
+
+(defun TeX-arg-ulem-fontdecl (optional &optional prompt)
+  "Prompt for the font-declaration un \\useunder"
+  (TeX-argument-insert
+   (completing-read (TeX-argument-prompt
+optional prompt "Font declaration")
+   LaTeX-arg-fontdecl nil t) optional))
+
+(defun TeX-arg-ulem-fontcmd (optional &optional prompt)
+  "Prompt for the font-declaration un \\useunder"
+  (TeX-argument-insert
+   (completing-read (TeX-argument-prompt
+optional prompt "Font command")
+   LaTeX-arg-fontcmd nil t) optional))
+
+;; adapted from url.el:TeX-arg-urlstyle
+(defun TeX-arg-ulem-useunder (optional &optional prompt)
+  "Prompt for underline command used in \\useunder"
+  (TeX-argument-insert
+   (completing-read (TeX-argument-prompt optional prompt "Underline command")
+   (mapcar 'list
+   (mapcar (lambda (str) (concat "\\" str))
+   '("uline" "uuline"
+ "uwave" "sout" "xout")))
+   nil t) optional))
+
+(defvar LaTeX-ulem-package-options
+  '("UWforbf" "ULforem" "normalbf" "normalem")
+  "Package options for the ulem package.")
+
+;;; ulem.el ends here

___
auctex-diffs mailing list
auctex-di...@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-diffs

[AUCTeX-commit] auctex ChangeLog style/ulem.el

2012-12-25 Thread Tassilo Horn 
CVSROOT:/sources/auctex
Module name:auctex
Changes by: Tassilo Horn  12/12/25 18:52:03

Modified files:
.  : ChangeLog 
Added files:
style  : ulem.el 

Log message:
* style/ulem.el: New style by Mads Jensen .

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/auctex/ChangeLog?cvsroot=auctex&r1=5.1794&r2=5.1795
http://cvs.savannah.gnu.org/viewcvs/auctex/style/ulem.el?cvsroot=auctex&rev=1.1

___
auctex-commit mailing list
auctex-com...@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-commit

[AUCTeX-diffs] Changes to auctex/ChangeLog,v

2012-12-25 Thread Tassilo Horn 
CVSROOT:/sources/auctex
Module name:auctex
Changes by: Tassilo Horn  12/12/25 18:52:03

Index: ChangeLog
===
RCS file: /sources/auctex/auctex/ChangeLog,v
retrieving revision 5.1794
retrieving revision 5.1795
diff -u -b -r5.1794 -r5.1795
--- ChangeLog   25 Dec 2012 18:47:56 -  5.1794
+++ ChangeLog   25 Dec 2012 18:52:02 -  5.1795
@@ -1,3 +1,7 @@
+2012-12-25  Tassilo Horn  
+
+   * style/ulem.el: New style by Mads Jensen .
+
 2012-12-25  Ikumi Keita 
 
* latex.el (LaTeX-math-default): Added unicode character position

___
auctex-diffs mailing list
auctex-di...@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-diffs

Re: [AUCTeX-devel] latex.el patch

2012-12-25 Thread Tassilo Horn 
Ikumi Keita  writes:

>> I'm happy to, but could you please also provide a ChangeLog entry?
>
> Of course, thanks.  Could you use the following lines?

Sure, your changes are committed.

Thanks a lot,
Tassilo


___
auctex-devel mailing list
auctex-devel@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-devel

[AUCTeX-diffs] Changes to auctex/latex.el,v

2012-12-25 Thread Tassilo Horn 
CVSROOT:/sources/auctex
Module name:auctex
Changes by: Tassilo Horn  12/12/25 18:47:56

Index: latex.el
===
RCS file: /sources/auctex/auctex/latex.el,v
retrieving revision 5.474
retrieving revision 5.475
diff -u -b -r5.474 -r5.475
--- latex.el4 Dec 2012 08:01:33 -   5.474
+++ latex.el25 Dec 2012 18:47:56 -  5.475
@@ -3953,10 +3953,10 @@
 (nil "bigtriangledown" "Binary Op" 9661) ;; #X25BD
 (nil "triangleleft" "Binary Op" 9665) ;; #X25C1
 (nil "triangleright" "Binary Op" 9655) ;; #X25B7
-(nil "lhd" "Binary Op")
-(nil "rhd" "Binary Op")
-(nil "unlhd" "Binary Op")
-(nil "unrhd" "Binary Op")
+(nil "lhd" "Binary Op" 8882) ;; #X22B2
+(nil "rhd" "Binary Op" 8883) ;; #X22B3
+(nil "unlhd" "Binary Op" 8884) ;; #X22B4
+(nil "unrhd" "Binary Op" 8885) ;; #X22B5
 (nil "oplus" "Binary Op" 8853) ;; #X2295
 (nil "ominus" "Binary Op" 8854) ;; #X2296
 (nil "otimes" "Binary Op" 8855) ;; #X2297
@@ -4048,10 +4048,10 @@
 (?0 "emptyset" "Misc Symbol" 8709) ;; #X2205
 (?E "exists" "Misc Symbol" 8707) ;; #X2203
 (nil "surd" "Misc Symbol" 8730) ;; #X221A
-(nil "Box" "Misc Symbol")
+(nil "Box" "Misc Symbol" 9633) ;; #X25A1
 (nil "triangle" "Misc Symbol" 9651) ;; #X25B3
-(nil "Diamond" "Misc Symbol")
-(nil "imath" "Misc Symbol" 305) ;; #X0131
+(nil "Diamond" "Misc Symbol" 9671) ;; #X25C7
+(nil "imath" "Misc Symbol" 120484) ;; #X1D6A4
 (nil "jmath" "Misc Symbol" 120485) ;; #X1D6A5
 (nil "ell" "Misc Symbol" 8467) ;; #X2113
 (nil "neg" "Misc Symbol" 172) ;; #X00AC
@@ -4117,8 +4117,8 @@
 (?\C-^ "sup" "Log-like")
 (?\C-t "tan" "Log-like")
 (nil "tanh" "Log-like")
-(nil "{" "Delimiters")
-(nil "}" "Delimiters")
+(nil "{" "Delimiters" ?{)
+(nil "}" "Delimiters" ?})
 (nil "lfloor" "Delimiters" 8970) ;; #X230A
 (nil "rfloor" "Delimiters" 8971) ;; #X230B
 (nil "lceil" "Delimiters" 8968) ;; #X2308
@@ -4127,10 +4127,10 @@
 (?\) "rangle" "Delimiters" 10217) ;; #X27E9
 (nil "rmoustache" "Delimiters" 9137) ;; #X23B1
 (nil "lmoustache" "Delimiters" 9136) ;; #X23B0
-(nil "rgroup" "Delimiters")
-(nil "lgroup" "Delimiters")
+(nil "rgroup" "Delimiters" 9133) ;; #X23AD
+(nil "lgroup" "Delimiters" 9129) ;; #X23A9
 (nil "backslash" "Delimiters" 92) ;; #X005C
-(nil "|" "Delimiters")
+(nil "|" "Delimiters" 8214) ;; #X2016)
 (nil "arrowvert" "Delimiters")
 (nil "Arrowvert" "Delimiters")
 (nil "bracevert" "Delimiters")
@@ -4138,8 +4138,8 @@
 (nil "widehat" "Constructs" 770) ;; #X0302
 (nil "overleftarrow" "Constructs" 8406) ;; #X20D6
 (nil "overrightarrow" "Constructs")
-(nil "overline" "Constructs")
-(nil "underline" "Constructs")
+(nil "overline" "Constructs" 773) ;; #X0305
+(nil "underline" "Constructs" 818) ;; #X0332
 (nil "overbrace" "Constructs" 65079) ;; #XFE37
 (nil "underbrace" "Constructs" 65080) ;; #XFE38
 (nil "sqrt" "Constructs" 8730) ;; #X221A
@@ -4154,22 +4154,23 @@
 (nil "vec" "Accents" 8407) ;; #X20D7
 (nil "ddot" "Accents" 776) ;; #X0308
 (?~ "tilde" "Accents" 771) ;; #X0303
+(nil "mathring" "Accents" 778) ;; #X030A
 (nil "digamma" ("AMS" "Hebrew") 989) ;; #X03DD
 (nil "varkappa" ("AMS" "Hebrew") 1008) ;; #X03F0
 (nil "beth" ("AMS" "Hebrew") 8502) ;; #X2136
 (nil "daleth" ("AMS" "Hebrew") 8504) ;; #X2138
 (nil "gimel" ("AMS" "Hebrew") 8503) ;; #X2137
-("v G" "varGamma" ("AMS" "Greek Uppercase"))
-("v D" "varDelta" ("AMS" "Greek Uppercase"))
-("v J" "varTheta" ("AMS" "Greek Uppercase"))
-("v L" "varLambda" ("AMS" "Greek Uppercase"))
-("v X" "varXi" ("AMS" "Greek Uppercase"))
-("v P" "varPi" ("AMS" "Greek Uppercase"))
-("v S" "varSigma" ("AMS" "Greek Uppercase"))
-("v U" "varUpsilon" ("AMS" "Greek Uppercase"))
-("v F" "varPhi" ("AMS" "Greek Uppercase"))
-("v Y" "varPsi" ("AMS" "Greek Uppercase"))
-("v W" "varOmega" ("AMS" "Greek Uppercase"))
+("v G" "varGamma" ("AMS" "Greek Uppercase") 120548) ;; #X1D6E4
+("v D" "varDelta" ("AMS" "Greek Uppercase") 120549) ;; #X1D6E5
+("v J" "varTheta" ("AMS" "Greek Uppercase") 120553) ;; #X1D6E9
+("v L" "varLambda" ("AMS" "Greek Uppercase") 120556) ;; #X1D6EC
+("v X" "varXi" ("AMS" "Greek Uppercase") 120559) ;; #X1D6EF
+("v P" "varPi" ("AMS" "Greek Uppercase") 120561) ;; #X1D6F1
+("v S" "varSigma" ("AMS" "Greek Uppercase") 120564) ;; #X1D6F4
+("v U" "varUpsilon" ("AMS" "Greek Uppercase") 120566) ;; #X1D6F6
+("v F" "varPhi" ("AMS" "Greek Uppercase") 120567) ;; #X1D6F7
+("v Y" "varPsi" ("AMS" "Greek Uppercase") 120569) ;; #X1D6F9
+("v W" "varOmega" ("AMS" "Greek Uppercase") 120570) ;; #X1D6FA
 (nil "dashrightarrow" ("AMS" "Arrows"))
 (nil "dashleftarrow" ("AMS" "Arrows"))
 (nil "leftleftarrows" ("AMS" "Arrows") 8647) ;; #X21C7
@@ -4180,7 +

[AUCTeX-commit] auctex ChangeLog latex.el

2012-12-25 Thread Tassilo Horn 
CVSROOT:/sources/auctex
Module name:auctex
Changes by: Tassilo Horn  12/12/25 18:47:56

Modified files:
.  : ChangeLog latex.el 

Log message:
* latex.el (LaTeX-math-default): Added unicode character position
to some entries and "mathring" entry.
(LaTeX-common-initialization): Added support for accent macros
\hat, \dot etc and \textasteriskcentered.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/auctex/ChangeLog?cvsroot=auctex&r1=5.1793&r2=5.1794
http://cvs.savannah.gnu.org/viewcvs/auctex/latex.el?cvsroot=auctex&r1=5.474&r2=5.475

___
auctex-commit mailing list
auctex-com...@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-commit

[AUCTeX-diffs] Changes to auctex/ChangeLog,v

2012-12-25 Thread Tassilo Horn 
CVSROOT:/sources/auctex
Module name:auctex
Changes by: Tassilo Horn  12/12/25 18:47:56

Index: ChangeLog
===
RCS file: /sources/auctex/auctex/ChangeLog,v
retrieving revision 5.1793
retrieving revision 5.1794
diff -u -b -r5.1793 -r5.1794
--- ChangeLog   24 Dec 2012 08:58:09 -  5.1793
+++ ChangeLog   25 Dec 2012 18:47:56 -  5.1794
@@ -1,3 +1,10 @@
+2012-12-25  Ikumi Keita 
+
+   * latex.el (LaTeX-math-default): Added unicode character position
+   to some entries and "mathring" entry.
+   (LaTeX-common-initialization): Added support for accent macros
+   \hat, \dot etc and \textasteriskcentered.
+
 2012-12-24  Tassilo Horn  
 
* style/footmisc.el: New style by Mads Jensen .

___
auctex-diffs mailing list
auctex-di...@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-diffs

Re: [AUCTeX-devel] latex.el patch

2012-12-25 Thread Ikumi Keita 
Hi,

Tassilo Horn writes:

> I'm happy to, but could you please also provide a ChangeLog entry?

Of course, thanks.  Could you use the following lines?

2012-12-25  Ikumi Keita 

* latex.el (LaTeX-math-default): Added unicode character position
to some entries and "mathring" entry.
(LaTeX-common-initialization): Added support for accent macros
\hat, \dot etc and \textasteriskcentered.

Regards,
Ikumi Keita

___
auctex-devel mailing list
auctex-devel@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-devel

[AUCTeX-devel] mathtools.el

2012-12-25 Thread Mads Jensen 
Resubmission of mathtools.el Again, I hope it will be added :-)

I didn't really change the code compared to the first submission, but
some commentary and the copyright notice were added in the top.

If there are more elegant ways to code the function
LaTeX-mathtools-env-multlined please tell me.
-- 
Med Venlig Hilsen / Kind Regards,
Mads Jensen
Rubinsteinsvej 31,st.th
DK-2450 Kbh. SV
Denmark
+45 6168 8518
My brain is my second favorite organ.
  -- Woody Allen



signature.asc
Description: OpenPGP digital signature
___
auctex-devel mailing list
auctex-devel@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-devel

[AUCTeX-devel] ulem.el

2012-12-25 Thread Mads Jensen 
Resubmission of ulem.el

'("command" 0) was changed to "command" compared to the first submission.
-- 
Med Venlig Hilsen / Kind Regards,
Mads Jensen
Rubinsteinsvej 31,st.th
DK-2450 Kbh. SV
Denmark
+45 6168 8518
My brain is my second favorite organ.
  -- Woody Allen
;;; ulem.el --- AUCTeX style for `ulem.sty'

;; Copyright (C) 2012 Free Software Foundation, Inc.

;; Author: Mads Jensen 
;; 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 `ulem.sty'.

;;; Code:

(TeX-add-style-hook
 "ulem"
 (lambda ()
   (TeX-add-symbols 
'("uline" 1) 
'("uuline" 1)
'("uwave" 1)
'("sout" 1)
'("xout" 1)
;; can be used with \renewcommand or \setlength
"ULthickness"
"ULdepth"
;; custom commands can be defined with these commands; see the
;; documentation for an example
"ULon"
"markoverwith"
;; \useunder {underline_command}{font_declaration}{font_command}
;; replaces occurences of font_declaration and font_command with the
;; underline_command
'("useunder" TeX-arg-ulem-useunder 
  TeX-arg-ulem-fontdecl TeX-arg-ulem-fontcmd))

   ;; Fontification
   (when (and (featurep 'font-latex)
	  (eq TeX-install-font-lock 'font-latex-setup))
 ;; Tell font-lock about the update.
 (font-latex-add-keywords '(("useunder" "{{{")) 'function)
 (font-latex-add-keywords '(("uline" "{")
("uwave" "{")
("sout" "{")
("xout" "{")) 'textual

(defvar LaTeX-arg-fontdecl 
  '(mapcar (concat (lambda (str) (concat "\\" str)))
   '("itshape" "bfseries" "scshape" 
 "ttfamily" "upshape" "mdseries" 
 "rmfamily" "sffamily" "slshape"))
  "List of font declaration commands in LaTeX")

(defvar LaTeX-arg-fontcmd 
  '(mapcar (concat (lambda (str) (concat "\\" str)))
   '("textit" "textbf" "textsc" 
 "texttt" "textup" "textmd" 
 "textrm" "textsf" "textsl"))
  "List of font commands in LaTeX")

(defun TeX-arg-ulem-fontdecl (optional &optional prompt)
  "Prompt for the font-declaration un \\useunder"
  (TeX-argument-insert 
   (completing-read (TeX-argument-prompt 
 optional prompt "Font declaration")
LaTeX-arg-fontdecl nil t) optional))

(defun TeX-arg-ulem-fontcmd (optional &optional prompt)
  "Prompt for the font-declaration un \\useunder"
  (TeX-argument-insert 
   (completing-read (TeX-argument-prompt 
 optional prompt "Font command")
LaTeX-arg-fontcmd nil t) optional))

;; adapted from url.el:TeX-arg-urlstyle
(defun TeX-arg-ulem-useunder (optional &optional prompt)
  "Prompt for underline command used in \\useunder"
  (TeX-argument-insert
   (completing-read (TeX-argument-prompt optional prompt "Underline command")
		(mapcar 'list 
(mapcar (lambda (str) (concat "\\" str)) 
'("uline" "uuline" 
  "uwave" "sout" "xout")))
nil t) optional))

(defvar LaTeX-ulem-package-options 
  '("UWforbf" "ULforem" "normalbf" "normalem")
  "Package options for the ulem package.")

;;; ulem.el ends here


signature.asc
Description: OpenPGP digital signature
___
auctex-devel mailing list
auctex-devel@gnu.org
https://lists.gnu.org/mailman/listinfo/auctex-devel