167 |
(local-set-key [(control ?m)] 'eshell-test-goto-func) |
(local-set-key [(control ?m)] 'eshell-test-goto-func) |
168 |
(local-set-key [return] 'eshell-test-goto-func) |
(local-set-key [return] 'eshell-test-goto-func) |
169 |
|
|
170 |
(insert "Testing Eshell under " |
(insert "Testing Eshell under " (emacs-version)) |
|
(format "GNU Emacs %s (%s%s)" |
|
|
emacs-version |
|
|
system-configuration |
|
|
(cond ((featurep 'motif) ", Motif") |
|
|
((featurep 'x-toolkit) ", X toolkit") |
|
|
(t "")))) |
|
171 |
(switch-to-buffer test-buffer) |
(switch-to-buffer test-buffer) |
172 |
(delete-other-windows)) |
(delete-other-windows)) |
173 |
(eshell-for funcname (sort (all-completions "eshell-test--" |
(eshell-for funcname (sort (all-completions "eshell-test--" |