diff options
| author | Richard M. Stallman | 1999-02-09 00:38:12 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1999-02-09 00:38:12 +0000 |
| commit | 7ecedca68ddef682aeee2104ba4cb8faf021a26a (patch) | |
| tree | cef11a7da84911e3a41701f743040cf05139c4f9 | |
| parent | e2918bbf0fb56d6e9846eec19eb855d582ecbd8c (diff) | |
| download | emacs-7ecedca68ddef682aeee2104ba4cb8faf021a26a.tar.gz emacs-7ecedca68ddef682aeee2104ba4cb8faf021a26a.zip | |
(texinfo-all-menus-update, texinfo-master-menu): Remove calls to sleep-for.
| -rw-r--r-- | lisp/textmodes/texnfo-upd.el | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/lisp/textmodes/texnfo-upd.el b/lisp/textmodes/texnfo-upd.el index 8dba3fe1173..3ebf3fea4f7 100644 --- a/lisp/textmodes/texnfo-upd.el +++ b/lisp/textmodes/texnfo-upd.el | |||
| @@ -268,17 +268,14 @@ nodes in the buffer before updating the menus." | |||
| 268 | (if update-all-nodes-p | 268 | (if update-all-nodes-p |
| 269 | (progn | 269 | (progn |
| 270 | (message "Updating all nodes in %s ... " (buffer-name)) | 270 | (message "Updating all nodes in %s ... " (buffer-name)) |
| 271 | (sleep-for 2) | ||
| 272 | (texinfo-update-node (point-min) (point-max)))) | 271 | (texinfo-update-node (point-min) (point-max)))) |
| 273 | 272 | ||
| 274 | (message "Updating all menus in %s ... " (buffer-name)) | 273 | (message "Updating all menus in %s ... " (buffer-name)) |
| 275 | (sleep-for 2) | ||
| 276 | (texinfo-make-menu (point-max) (point-min)) | 274 | (texinfo-make-menu (point-max) (point-min)) |
| 277 | 275 | ||
| 278 | (if master-menu-p | 276 | (if master-menu-p |
| 279 | (progn | 277 | (progn |
| 280 | (message "Updating the master menu in %s... " (buffer-name)) | 278 | (message "Updating the master menu in %s... " (buffer-name)) |
| 281 | (sleep-for 2) | ||
| 282 | (texinfo-master-menu nil)))) | 279 | (texinfo-master-menu nil)))) |
| 283 | 280 | ||
| 284 | (message "Done...updated all the menus. You may save the buffer."))) | 281 | (message "Done...updated all the menus. You may save the buffer."))) |
| @@ -819,15 +816,12 @@ title of the section containing the menu." | |||
| 819 | (progn | 816 | (progn |
| 820 | (message "Making a master menu in %s ...first updating all nodes... " | 817 | (message "Making a master menu in %s ...first updating all nodes... " |
| 821 | (buffer-name)) | 818 | (buffer-name)) |
| 822 | (sleep-for 2) | ||
| 823 | (texinfo-update-node (point-min) (point-max)) | 819 | (texinfo-update-node (point-min) (point-max)) |
| 824 | 820 | ||
| 825 | (message "Updating all menus in %s ... " (buffer-name)) | 821 | (message "Updating all menus in %s ... " (buffer-name)) |
| 826 | (sleep-for 2) | ||
| 827 | (texinfo-make-menu (point-min) (point-max)))) | 822 | (texinfo-make-menu (point-min) (point-max)))) |
| 828 | 823 | ||
| 829 | (message "Now making the master menu in %s... " (buffer-name)) | 824 | (message "Now making the master menu in %s... " (buffer-name)) |
| 830 | (sleep-for 2) | ||
| 831 | (goto-char (point-min)) | 825 | (goto-char (point-min)) |
| 832 | (texinfo-insert-master-menu-list | 826 | (texinfo-insert-master-menu-list |
| 833 | (texinfo-master-menu-list)) | 827 | (texinfo-master-menu-list)) |