%%% -*-LaTeX-*-
%%% ====================================================================
%%%  @LaTeX-style-file{
%%%     author          = "Nelson H. F. Beebe",
%%%     version         = "1.01",
%%%     date            = "05 June 1999",
%%%     time            = "11:03:43 MDT",
%%%     filename        = "authidx-harvard.sty",
%%%     address         = "Center for Scientific Computing
%%%                        University of Utah
%%%                        Department of Mathematics, 322 INSCC
%%%                        155 S 1400 E RM 233
%%%                        Salt Lake City, UT 84112-0090
%%%                        USA",
%%%     telephone       = "+1 801 581 5254",
%%%     FAX             = "+1 801 585 1640, +1 801 581 4148",
%%%     URL             = "http://www.math.utah.edu/~beebe",
%%%     checksum        = "34022 51 235 2383",
%%%     email           = "beebe@math.utah.edu, beebe@acm.org,
%%%                        beebe@ieee.org (Internet)",
%%%     codetable       = "ISO/ASCII",
%%%     keywords        = "author/editor index, BibTeX, bibliography,
%%%                        Harvard citation style, LaTeX",
%%%     supported       = "yes",
%%%     docstring       = "This file contains a simple modification of
%%%                        the internals of the harvard.sty
%%%                        bibliography package to make it work with
%%%                        authidx. Load it AFTER harvard.sty, e.g.,
%%%                        in LaTeX-2e, use
%%%
%%%                          	\usepackage{harvard}
%%%                          	\usepackage{authidx}
%%%                          	\usepackage{authidx-harvard}
%%%
%%%                        The checksum field above contains a CRC-16
%%%                        checksum as the first value, followed by the
%%%                        equivalent of the standard UNIX wc (word
%%%                        count) utility output of lines, words, and
%%%                        characters.  This is produced by Robert
%%%                        Solovay's checksum utility.",
%%%  }
%%% ====================================================================
%%%
%%% Adapted from harvard.sty, lines 67..70, but reformatted for readability
\renewcommand{\HAR@citetoaux}[1]{%
  \if@filesw
    \immediate\write\@auxout{\string\citation{#1}}%
    % New line added here ===>:
    \authoreditorindex{#1}%
  \fi%
}