1 |
;; Support for Harvard Citation style package for AUC-TeX |
;;; harvard.el --- Support for Harvard Citation style package for AUCTeX. |
2 |
;; Harvard citation style is from Peter Williams |
|
3 |
;; available on the CTAN servers |
;; Harvard citation style is from Peter Williams |
4 |
|
;; available on the CTAN servers |
5 |
|
|
6 |
;; Version: $Id$ |
;; Version: $Id$ |
7 |
|
|
8 |
;; Copyright (C) 1994 Berwin Turlach <berwin@core.ucl.ac.be> |
;; Copyright (C) 1994 Berwin Turlach <berwin@core.ucl.ac.be> |
9 |
;; Copyright (C) 1997 Berwin Turlach <berwin.turlach@anu.edu.au> |
;; Copyright (C) 1997 Berwin Turlach <berwin.turlach@anu.edu.au> |
10 |
|
;; Copyright (C) 2005 Free Software Foundation, Inc. |
11 |
|
|
12 |
;; This program is free software; you can redistribute it and/or modify |
;; This program is free software; you can redistribute it and/or modify |
13 |
;; it under the terms of the GNU General Public License as published by |
;; it under the terms of the GNU General Public License as published by |
100 |
|
|
101 |
(setq LaTeX-item-list |
(setq LaTeX-item-list |
102 |
(cons '("thebibliography" . LaTeX-item-harvardbib) |
(cons '("thebibliography" . LaTeX-item-harvardbib) |
103 |
LaTeX-item-list))))) |
LaTeX-item-list)) |
104 |
|
|
105 |
|
;; Tell RefTeX |
106 |
|
(when (fboundp 'reftex-set-cite-format) |
107 |
|
(reftex-set-cite-format 'harvard))))) |
108 |
|
|
109 |
(defun LaTeX-env-harvardbib (environment &optional ignore) |
(defun LaTeX-env-harvardbib (environment &optional ignore) |
110 |
"Insert ENVIRONMENT with label for harvarditem." |
"Insert ENVIRONMENT with label for harvarditem." |