(load nmode)
(faslin "ps:<kendzierski.psl>output-stream-aux.b")
(faslin "ps:<kendzierski.psl>file-support-aux.b")
(faslin "ps:<kendzierski.psl>util.b")
(faslin "ps:<kendzierski.psl>date.b")
% Subsystems: load last! (This is a subsystem of NMODE)
(faslin "ss:<nmail>mail-base.b")
(faslin "ss:<nmail>mail-file.b")
(faslin "ss:<nmail>mail-message.b")
(faslin "ss:<nmail>mail-support.b")
(faslin "ss:<nmail>mail-filter.b")
(faslin "ss:<nmail>mail-filter-base.b")
(prog ()
(add-to-command-list 'Basic-Command-List
(x-chars (control X) M) 'mail-command)
(add-to-command-list 'Basic-Command-List
(x-chars (control X) S) 'mail-set-up-send-buffer)
(nmode-establish-current-mode)
(return "Mail subsystem defined"))