ANK@CUNYVMS1.BITNET.UUCP (03/06/87)
Define your MAIL$EDIT as having another editor $ DEFINE MAIL$EDIT 'DISK:[DIR]IMAGE.COM' And when you do mail/edit you could evoke the editor. You could however invoke it as default by setting your symbol in LOGIN.COM $ mail :== mail/edit=(send,extract,forward) You can cut the following com file and insert it anywhere you please it is a distribution from GNU Emacs __________________________CUT-HERE______________________________________ $ !*** Copyright (C) 1986 Mukesh Prasad $ !*** $ !*** This file is part of GNU Emacs. $ !*** $ !*** GNU Emacs is distributed in the hope that it will be useful, $ !*** but WITHOUT ANY WARRANTY. No author or distributor $ !*** accepts responsibility to anyone for the consequences of using it $ !*** or for whether it serves any particular purpose or works at all, $ !*** unless he says so in writing. Refer to the GNU Emacs General Public $ !*** License for full details. $ !*** $ !*** Everyone is granted permission to copy, modify and redistribute $ !*** GNU Emacs, but only under the conditions described in the $ !*** GNU Emacs General Public License. A copy of this license is $ !*** supposed to have been given to you along with GNU Emacs so you $ !*** can know your rights and responsibilities. It should be in a $ !*** file named COPYING. Among other things, the copyright notice $ !*** and this notice must be preserved on all copies. $ !*** $ $ !*** Command procedure to invoke emacs for MAIL. $ !*** $ !*** Arguments: $ !*** $ !*** p1 = Input file name. $ !*** p2 = Output file name. $ !*** $ $ ON CONTROL_Y THEN EXIT $ emacs = "$emacs_exedir:emacs.exe" $ if p1 .nes. "" then emacs 'p2' -i 'p1' $ if p1 .eqs. "" then emacs 'p2'