diff options
| author | Richard M. Stallman | 1994-09-24 04:09:46 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-09-24 04:09:46 +0000 |
| commit | dd69dcbc6f823022b43ce6425156db98ad7286d8 (patch) | |
| tree | 8fce298fa3b535a7d034cefe21aa561a25168daa | |
| parent | 585672c2b518b404ecff6d8fa206838b948a686b (diff) | |
| download | emacs-dd69dcbc6f823022b43ce6425156db98ad7286d8.tar.gz emacs-dd69dcbc6f823022b43ce6425156db98ad7286d8.zip | |
Comment changes.
| -rw-r--r-- | lisp/cmuscheme.el | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/lisp/cmuscheme.el b/lisp/cmuscheme.el index 885a7a72ea0..cc09c81b23b 100644 --- a/lisp/cmuscheme.el +++ b/lisp/cmuscheme.el | |||
| @@ -68,21 +68,11 @@ | |||
| 68 | ;;============================================================================= | 68 | ;;============================================================================= |
| 69 | ;; Some suggestions for your .emacs file. | 69 | ;; Some suggestions for your .emacs file. |
| 70 | ;; | 70 | ;; |
| 71 | ;; ; If cmuscheme lives in some non-standard directory, you must tell emacs | ||
| 72 | ;; ; where to get it. This may or may not be necessary. | ||
| 73 | ;; (setq load-path (cons (expand-file-name "~jones/lib/emacs") load-path)) | ||
| 74 | ;; | ||
| 75 | ;; ; Autoload run-scheme from file cmuscheme.el | 71 | ;; ; Autoload run-scheme from file cmuscheme.el |
| 76 | ;; (autoload 'run-scheme "cmuscheme" | 72 | ;; (autoload 'run-scheme "cmuscheme" |
| 77 | ;; "Run an inferior Scheme process." | 73 | ;; "Run an inferior Scheme process." |
| 78 | ;; t) | 74 | ;; t) |
| 79 | ;; | 75 | ;; |
| 80 | ;; ; Files ending in ".scm" are Scheme source, | ||
| 81 | ;; ; so put their buffers in scheme-mode. | ||
| 82 | ;; (setq auto-mode-alist | ||
| 83 | ;; (cons '("\\.scm$" . scheme-mode) | ||
| 84 | ;; auto-mode-alist)) | ||
| 85 | ;; | ||
| 86 | ;; ; Define C-c t to run my favorite command in inferior scheme mode: | 76 | ;; ; Define C-c t to run my favorite command in inferior scheme mode: |
| 87 | ;; (setq cmuscheme-load-hook | 77 | ;; (setq cmuscheme-load-hook |
| 88 | ;; '((lambda () (define-key inferior-scheme-mode-map "\C-ct" | 78 | ;; '((lambda () (define-key inferior-scheme-mode-map "\C-ct" |