;;; Acknowledgements
;; The rectangle handling and display code borrows from the standard
-;; GNU emacs rect.el package and the the rect-mark.el package by Rick
+;; GNU emacs rect.el package and the rect-mark.el package by Rick
;; Sladkey <jrs@world.std.com>.
;;; Commentary:
;;; which keeps the size of the virtual active list the same as
;;; the sum of the component active lists.
;;; To achieve fair mixing of the groups, the last article in
-;;; each of N component groups will be in the the last N articles
+;;; each of N component groups will be in the last N articles
;;; in the virtual group.
;;; If you have 3 components A, B and C, with articles 1-8, 1-5, and 6-7
;; Author: Chris Chase <chase@att.com>
;; Maintainer: John-David Smith <jdsmith@astro.cornell.edu>
;; Version: 4.7
-;; Date: $Date: 2001/12/01 12:54:29 $
+;; Date: $Date: 2002/02/16 12:50:25 $
;; Keywords: processes
;; This file is part of GNU Emacs.
;;
;; I don't plan on implementing directory tracking by watching the IDL
;; commands entered at the prompt, since too often an IDL procedure
-;; will change the current directory. If you want the the idl process
+;; will change the current directory. If you want the idl process
;; buffer to match the IDL current working just execute `M-x
;; idlwave-shell-resync-dirs' (bound to "\C-c\C-d\C-w" by default.)
;;
;; Author: Chris Chase <chase@att.com>
;; Maintainer: John-David Smith <jdsmith@astro.cornell.edu>
;; Version: 4.7
-;; Date: $Date: 2001/12/31 20:42:10 $
+;; Date: $Date: 2002/02/16 12:53:42 $
;; Keywords: languages
;; This file is part of GNU Emacs.
(defconst idlwave-statement-match
(list
- ;; "endif else" is the the only possible "end" that can be
+ ;; "endif else" is the only possible "end" that can be
;; followed by a statement on the same line.
'(endelse . ("end\\(\\|if\\)\\s +else" "end\\(\\|if\\)\\s +else"))
;; all other "end"s can not be followed by a statement.
;; No hang. Instead find minimum indentation of paragraph
;; after first line.
;; For the following while statement, since START is at the
- ;; beginning of line and END is at the the end of line
+ ;; beginning of line and END is at the end of line
;; point is greater than START at least once (which would
;; be the case for a single line paragraph).
(while (> (point) start)
;; string act as an
;; escape for the delimiter in the string.
;; Two consecutive delimiters alone (i.e., not after the
- ;; start of a string) is the the null string.
+ ;; start of a string) is the null string.
(progn
;; Move to position after quote
(goto-char (1+ (match-beginning 0)))
;;; current selection against it, and avoid passing back our own text
;;; from x-cut-buffer-or-selection-value. We track all three
;;; seperately in case another X application only sets one of them
-;;; (say the the cut buffer) we aren't fooled by the PRIMARY or
+;;; (say the cut buffer) we aren't fooled by the PRIMARY or
;;; CLIPBOARD selection staying the same.
(defvar x-last-selected-text-clipboard nil
"The value of the CLIPBOARD X selection last time we selected or
(reftex-parse-bibtex-entry nil start (point)))
nil)))))
-;; Parse the thebibliography environment
+;; Parse the bibliography environment
(defun reftex-extract-bib-entries-from-thebibliography (files)
;; Extract bib-entries from the \begin{thebibliography} environment.
;; Parsing is not as good as for the BibTeX database stuff.
#ifdef MAC_OSX
/* On Mac OS X, the SELECT system call always says input is
present (for reading) at stdin, even when none is. This
- causes the the call to SELECT below to return 1 and
+ causes the call to SELECT below to return 1 and
status_notify not to be called. As a result output of
subprocesses are incorrectly discarded. */
FD_CLR (0, &Atemp);