Mercurial > hg > xemacs-beta
comparison lisp/eterm/tshell.el @ 104:cf808b4c4290 r20-1b4
Import from CVS: tag r20-1b4
| author | cvs |
|---|---|
| date | Mon, 13 Aug 2007 09:16:51 +0200 |
| parents | 131b0175ea99 |
| children |
comparison
equal
deleted
inserted
replaced
| 103:30eda07fe280 | 104:cf808b4c4290 |
|---|---|
| 256 (define-key tshell-mode-map "\C-c\C-f" 'tshell-forward-command) | 256 (define-key tshell-mode-map "\C-c\C-f" 'tshell-forward-command) |
| 257 (define-key tshell-mode-map "\C-c\C-b" 'tshell-backward-command) | 257 (define-key tshell-mode-map "\C-c\C-b" 'tshell-backward-command) |
| 258 (define-key tshell-mode-map "\t" 'term-dynamic-complete) | 258 (define-key tshell-mode-map "\t" 'term-dynamic-complete) |
| 259 (define-key tshell-mode-map "\M-?" | 259 (define-key tshell-mode-map "\M-?" |
| 260 'term-dynamic-list-filename-completions) | 260 'term-dynamic-list-filename-completions) |
| 261 (define-key-after (lookup-key tshell-mode-map [menu-bar completion]) | 261 ;;; XEmacs change [JTL]: We don't have define-key-after |
| 262 [complete-env-variable] '("Complete Env. Variable Name" . | 262 ;;; (and we don't need it ...) |
| 263 tshell-dynamic-complete-environment-variable) | 263 ;;; (define-key-after (lookup-key tshell-mode-map [menu-bar completion]) |
| 264 'complete-file) | 264 ;;; [complete-env-variable] '("Complete Env. Variable Name" . |
| 265 (define-key-after (lookup-key tshell-mode-map [menu-bar completion]) | 265 ;;; tshell-dynamic-complete-environment-variable) |
| 266 [expand-directory] '("Expand Directory Reference" . | 266 ;;; 'complete-file) |
| 267 tshell-replace-by-expanded-directory) | 267 ;;; (define-key-after (lookup-key tshell-mode-map [menu-bar completion]) |
| 268 'complete-expand))) | 268 ;;; [expand-directory] '("Expand Directory Reference" . |
| 269 ;;; tshell-replace-by-expanded-directory) | |
| 270 ;;; 'complete-expand) | |
| 271 )) | |
| 269 | 272 |
| 270 (defvar tshell-mode-hook '() | 273 (defvar tshell-mode-hook '() |
| 271 "*Hook for customising Tshell mode.") | 274 "*Hook for customising Tshell mode.") |
| 272 | 275 |
| 273 | 276 |