Mercurial > emacs
comparison lisp/textmodes/reftex-ref.el @ 46683:060f433ebf11
Updated to RefTeX 4.18
author | Carsten Dominik <dominik@science.uva.nl> |
---|---|
date | Thu, 25 Jul 2002 07:03:41 +0000 |
parents | 7522419c4db0 |
children | 904fd28be439 |
comparison
equal
deleted
inserted
replaced
46682:7a836df2d686 | 46683:060f433ebf11 |
---|---|
1 ;;; reftex-ref.el --- code to create labels and references with RefTeX | 1 ;;; reftex-ref.el --- code to create labels and references with RefTeX |
2 ;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. | 2 ;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. |
3 | 3 |
4 ;; Author: Carsten Dominik <dominik@science.uva.nl> | 4 ;; Author: Carsten Dominik <dominik@science.uva.nl> |
5 ;; Version: 4.17 | 5 ;; Version: 4.18 |
6 | 6 |
7 ;; This file is part of GNU Emacs. | 7 ;; This file is part of GNU Emacs. |
8 | 8 |
9 ;; GNU Emacs is free software; you can redistribute it and/or modify | 9 ;; GNU Emacs is free software; you can redistribute it and/or modify |
10 ;; it under the terms of the GNU General Public License as published by | 10 ;; it under the terms of the GNU General Public License as published by |
644 (cdr (pop reftex-buffers-with-changed-invisibility))))) | 644 (cdr (pop reftex-buffers-with-changed-invisibility))))) |
645 (mapcar (lambda (buf) (and (buffer-live-p buf) (bury-buffer buf))) | 645 (mapcar (lambda (buf) (and (buffer-live-p buf) (bury-buffer buf))) |
646 selection-buffers) | 646 selection-buffers) |
647 (reftex-kill-temporary-buffers)) | 647 (reftex-kill-temporary-buffers)) |
648 ;; Add the prefixes, put together the relevant information in the form | 648 ;; Add the prefixes, put together the relevant information in the form |
649 ;; (LABEL TYPEKEY SEPERATOR) and return a list of those. | 649 ;; (LABEL TYPEKEY SEPARATOR) and return a list of those. |
650 (mapcar (lambda (x) | 650 (mapcar (lambda (x) |
651 (if (listp x) | 651 (if (listp x) |
652 (list (concat prefix (car (car x))) | 652 (list (concat prefix (car (car x))) |
653 (nth 1 (car x)) | 653 (nth 1 (car x)) |
654 (nth 2 x)) | 654 (nth 2 x)) |