matt@oddjob.UUCP (Matt Crawford) (03/14/86)
I should have included the following. Sorry. From ~/.emacs: (cond ((string-match "^tvi950" (getenv "TERM")) (load "tvi950" nil t) (define-key global-map "\^^" 'universal-argument) ;HOME (setup-for-f-keys "6" ?a ?A) (bind-f-key 1 'apropos "apro") (bind-f-key 12 'goto-line "goto") (bind-f-key 2 'isearch-forward-regexp "REi-s") (bind-f-key 13 'query-replace-regexp "REq-r") (bind-f-key 3 'kill-rectangle "kRect") (bind-f-key 14 'yank-rectangle "yRect") (bind-f-key 11 'toggle-f-labels "toggl") (bind-f-key 22 'toggle-f-labels "toggl") (show-f-labels) ;; For mh-e (send-string-to-terminal "\e01S\e02s") ;SEND and shift-SEND (define-key global-map "\eS" 'mh-smail) ;SEND (define-key global-map "\es" 'mh-rmail) ;shift-SEND ) ;;etc, etc, etc ) _____________________________________________________ Matt University crawford@anl-mcs.arpa Crawford of Chicago ihnp4!oddjob!matt