Mercurial > emacs
comparison lisp/textmodes/reftex-toc.el @ 87170:e50a2e215441
* erc-stamp.el (erc-echo-timestamp):
* erc-lang.el (language):
* erc-backend.el (erc-server-connect): Fix buggy call to `message'.
* gnus-sum.el (gnus-summary-simplify-subject-query):
* ecomplete.el (ecomplete-display-matches): Fix buggy call to
`message'.
* textmodes/reftex.el (reftex-select-with-char):
* textmodes/reftex-toc.el (reftex-toc-do-promote)
(reftex-toc-visit-location, reftex-toc-find-section):
* textmodes/reftex-index.el (reftex-index-show-entry):
* textmodes/org.el (org-cycle-hide-archived-subtrees)
(org-table-rotate-recalc-marks, org-mark-ring-push)
(org-follow-info-link, org-mhe-get-message-folder-from-index)
(org-auto-repeat-maybe, org-store-log-note, org-delete-property)
(org-evaluate-time-range, org-edit-agenda-file-list):
* textmodes/artist.el (artist-select-next-op-in-list)
(artist-select-prev-op-in-list):
* term/mac-win.el (mac-service-insert-text):
* startup.el (fancy-about-screen):
* progmodes/vhdl-mode.el (vhdl-decision-query):
* progmodes/idlwave.el (idlwave-template)
(idlwave-scroll-completions, idlwave-display-completion-list):
* progmodes/ebrowse.el (ebrowse-show-progress):
* progmodes/cperl-mode.el (cperl-find-pods-heres):
* progmodes/antlr-mode.el (antlr-insert-option-do):
* play/mpuz.el (mpuz-close-game):
* net/rcirc.el (rcirc-next-active-buffer):
* mail/reporter.el (reporter-update-status):
* kmacro.el (kmacro-display):
* international/ja-dic-cnv.el (skkdic-set-okuri-nasi):
* emulation/viper-util.el (viper-save-setting):
* emacs-lisp/lisp-mnt.el (lm-verify):
* emacs-lisp/edebug.el (edebug-set-mode):
* emacs-lisp/checkdoc.el (checkdoc-rogue-spaces, checkdoc-defun):
* calendar/calendar.el (calendar-print-day-of-year):
* calc/calcalg3.el (calc-curve-fit):
* calc/calcalg2.el (math-integral):
* calc/calc.el (calc-read-key-sequence, calc-version):
* calc/calc-mode.el (calc-set-simplify-mode):
* calc/calc-ext.el (calc-fancy-prefix): Fix buggy call to
`message'.
author | David Kastrup <dak@gnu.org> |
---|---|
date | Sat, 08 Dec 2007 01:02:29 +0000 |
parents | d38cf2bfafa5 |
children | 2b38ed4ed1bb 2fcaae6177a5 |
comparison
equal
deleted
inserted
replaced
87169:ac7eee19fc7e | 87170:e50a2e215441 |
---|---|
624 (reftex-toc-Rescan)) | 624 (reftex-toc-Rescan)) |
625 (reftex-toc-restore-region start-line mark-line) | 625 (reftex-toc-restore-region start-line mark-line) |
626 (message "%d section%s %smoted" | 626 (message "%d section%s %smoted" |
627 nsec (if (= 1 nsec) "" "s") pro-or-de) | 627 nsec (if (= 1 nsec) "" "s") pro-or-de) |
628 nil)) | 628 nil)) |
629 (if msg (progn (ding) (message msg))))) | 629 (if msg (progn (ding) (message "%s" msg))))) |
630 | 630 |
631 | 631 |
632 (defun reftex-toc-restore-region (point-line &optional mark-line) | 632 (defun reftex-toc-restore-region (point-line &optional mark-line) |
633 (if mark-line | 633 (if mark-line |
634 (progn (goto-line mark-line) | 634 (progn (goto-line mark-line) |
831 (if (or (not no-revisit) (reftex-get-buffer-visiting file)) | 831 (if (or (not no-revisit) (reftex-get-buffer-visiting file)) |
832 (progn | 832 (progn |
833 (switch-to-buffer-other-window | 833 (switch-to-buffer-other-window |
834 (reftex-get-file-buffer-force file nil)) | 834 (reftex-get-file-buffer-force file nil)) |
835 (goto-char (if (eq where 'bof) (point-min) (point-max)))) | 835 (goto-char (if (eq where 'bof) (point-min) (point-max)))) |
836 (message reftex-no-follow-message) nil)))) | 836 (message "%s" reftex-no-follow-message) nil)))) |
837 | 837 |
838 ((stringp (car toc)) | 838 ((stringp (car toc)) |
839 ;; a label | 839 ;; a label |
840 (setq match (reftex-show-label-location toc reftex-callback-fwd | 840 (setq match (reftex-show-label-location toc reftex-callback-fwd |
841 no-revisit t)))) | 841 no-revisit t)))) |
898 (or (reftex-nearest-match (regexp-quote literal) len) | 898 (or (reftex-nearest-match (regexp-quote literal) len) |
899 (reftex-nearest-match | 899 (reftex-nearest-match |
900 (reftex-make-regexp-allow-for-ctrl-m literal) len) | 900 (reftex-make-regexp-allow-for-ctrl-m literal) len) |
901 (reftex-nearest-match | 901 (reftex-nearest-match |
902 (reftex-make-desperate-section-regexp literal) len))))) | 902 (reftex-make-desperate-section-regexp literal) len))))) |
903 (t (message reftex-no-follow-message) nil)))) | 903 (t (message "%s" reftex-no-follow-message) nil)))) |
904 (when match | 904 (when match |
905 (goto-char (match-beginning 0)) | 905 (goto-char (match-beginning 0)) |
906 (if (not (= (point) (point-max))) (recenter 1)) | 906 (if (not (= (point) (point-max))) (recenter 1)) |
907 (reftex-highlight 0 (match-beginning 0) (match-end 0) (current-buffer))) | 907 (reftex-highlight 0 (match-beginning 0) (match-end 0) (current-buffer))) |
908 match)) | 908 match)) |