diff options
| author | Karl Heuer | 1999-06-04 18:39:01 +0000 |
|---|---|---|
| committer | Karl Heuer | 1999-06-04 18:39:01 +0000 |
| commit | 1fc4747e4ee6594bfd5ac6bdede9036c4a72ac10 (patch) | |
| tree | 651cac16964f89ffeeef483d6ec0849a6e641277 | |
| parent | e011fd6b5c1f758557ea5f7e531a35c3fb941295 (diff) | |
| download | emacs-1fc4747e4ee6594bfd5ac6bdede9036c4a72ac10.tar.gz emacs-1fc4747e4ee6594bfd5ac6bdede9036c4a72ac10.zip | |
Don't print any messages or display
a buffer when loading the library.
(r2b-help): Doc fix.
(r2b-help-message): Update the documentation.
(r2b-load-quietly): Variable deleted.
(r2b-convert-buffer): Doc fix.
| -rw-r--r-- | lisp/textmodes/refbib.el | 22 |
1 files changed, 4 insertions, 18 deletions
diff --git a/lisp/textmodes/refbib.el b/lisp/textmodes/refbib.el index a2a820002c1..a57f6c25859 100644 --- a/lisp/textmodes/refbib.el +++ b/lisp/textmodes/refbib.el | |||
| @@ -670,8 +670,8 @@ do \"M-x r2b-help\" for more info." | |||
| 670 | 670 | ||
| 671 | 671 | ||
| 672 | (defun r2b-convert-buffer (output-name) | 672 | (defun r2b-convert-buffer (output-name) |
| 673 | "Transform current buffer and append to buffer OUTPUT; | 673 | "Transform current buffer and append to buffer OUTPUT. |
| 674 | do \"M-x r2b-help\" for more info." | 674 | Do `M-x r2b-help' for more info." |
| 675 | (interactive | 675 | (interactive |
| 676 | (list (read-string "Output to buffer: " r2b-out-buf-name))) | 676 | (list (read-string "Output to buffer: " r2b-out-buf-name))) |
| 677 | (save-excursion | 677 | (save-excursion |
| @@ -687,11 +687,6 @@ do \"M-x r2b-help\" for more info." | |||
| 687 | r2b-out-buf-name r2b-log-name) | 687 | r2b-out-buf-name r2b-log-name) |
| 688 | ) | 688 | ) |
| 689 | 689 | ||
| 690 | (defcustom r2b-load-quietly nil | ||
| 691 | "*Non-nil means don't print help message when loaded." | ||
| 692 | :type 'boolean | ||
| 693 | :group 'refbib) | ||
| 694 | |||
| 695 | (defvar r2b-help-message | 690 | (defvar r2b-help-message |
| 696 | " Refer to Bibtex Bibliography Conversion | 691 | " Refer to Bibtex Bibliography Conversion |
| 697 | 692 | ||
| @@ -727,11 +722,6 @@ to text, or substituting bibtex macros. Do M-x describe-variable on | |||
| 727 | r2b-proceedings-list | 722 | r2b-proceedings-list |
| 728 | for information on these features. | 723 | for information on these features. |
| 729 | 724 | ||
| 730 | If you don't want to see this help message when you load this utility, | ||
| 731 | then include the following line in your .emacs file: | ||
| 732 | (setq r2b-load-quietly t) | ||
| 733 | To see this message again, perform | ||
| 734 | M-x r2b-help | ||
| 735 | Please send bug reports and suggestions to | 725 | Please send bug reports and suggestions to |
| 736 | Henry Kautz | 726 | Henry Kautz |
| 737 | kautz@research.att.com | 727 | kautz@research.att.com |
| @@ -739,7 +729,7 @@ Please send bug reports and suggestions to | |||
| 739 | 729 | ||
| 740 | 730 | ||
| 741 | (defun r2b-help () | 731 | (defun r2b-help () |
| 742 | "Print help message." | 732 | "Print help describing the `refbib' package." |
| 743 | (interactive) | 733 | (interactive) |
| 744 | (with-output-to-temp-buffer "*Help*" | 734 | (with-output-to-temp-buffer "*Help*" |
| 745 | (princ r2b-help-message) | 735 | (princ r2b-help-message) |
| @@ -747,11 +737,7 @@ Please send bug reports and suggestions to | |||
| 747 | (set-buffer standard-output) | 737 | (set-buffer standard-output) |
| 748 | (help-mode)))) | 738 | (help-mode)))) |
| 749 | 739 | ||
| 750 | (if (not r2b-load-quietly) | 740 | (provide 'refbib) |
| 751 | (r2b-help)) | ||
| 752 | |||
| 753 | (message "r2b loaded") | ||
| 754 | |||
| 755 | (provide 'refer-to-bibtex) | 741 | (provide 'refer-to-bibtex) |
| 756 | 742 | ||
| 757 | ;;; refbib.el ends here | 743 | ;;; refbib.el ends here |