;;;
;;; AUC-TeX style hook for rcs style option
;;;
;;; (history at end)
(TeX-add-style-hook "rcs"
(function
(lambda ()
(LaTeX-add-environments "rcslog")
(TeX-add-symbols
;; public interface
"RCS" ; define \RCS... tag
"RCSTime" ; holds time of Date field
"RCSdate" ; typeset date
"RCSID" ; put RCS field in footline
"RCSdef" ; like \RCS, & output on console
"settime" ; local in env rcslog: set rev time
"rcsAuthor" ; maps uid to full name
"rcsLogIntro" ; intro text to rev log
;; protected interface
"RcsEmptyValue" ; used as value for unexpanded fields
"RcsHandleDate" ; handler for Date field
"RcsLogStyle" ; define style of RCS log
"RcsLogListStyle" ; define style of log list
"RcsLogHeading" ; heading of RCS log
"RcsLogDate" ; how the date is typeset
"RcsLogTime" ; how the time is typeset
;; internationalization
"RcsLogHeadingName" ; text in heading of RCS log
"RcsUnknownFile" ; used if Log value is empty
"RcsEmptyLog" ; used as empty Log text
"RcsLogRevision" ; `real name' of \Revision
;; protected observers -- must not be redefined
"RCS_keyword" ; keyword of last parsed field
"RCS_value" ; value of last parsed field
"RCS_get_author" ; get the full name of an author
)
)))
;;;======================================================================
;;
;; $Log: rcs.el,v $
;; Revision 1.6 1995/08/02 10:59:53 schrod
;; \RcsLoadHook & \RcsLoaded don't exist any more.
;;
;; Revision 1.5 1993/11/08 20:17:18 schrod
;; New tag in protected interface: \RcsLogListStyle
;;
;; Revision 1.4 1993/11/02 21:10:22 schrod
;; New tag in public interface: \RCSdef
;;
;; Revision 1.3 1993/11/02 18:45:43 schrod
;; New tag in public interface: \RCSID
;;
;; Revision 1.2 1993/11/02 16:15:08 schrod
;; Adapted to interface of StyleRevision 2.3.
;;
;; Revision 1.1 1993/10/29 18:14:47 schrod
;; Preliminary version, doesn't care about macro args.
;;