(defun
    (normal-mode
	(setq right-margin 1000)
	(setq left-margin 1)
	(use-abbrev-table "normal-mode")
	(remove-all-local-bindings)
	(setq mode-string "Normal")
	(novalue)
    ))