🚀 go-pugleaf

After running the code

    (let ((original-fortran-mode (symbol-function 'fortran-mode)))
      (fset 'fortran-mode
	    (list 'lambda '()
		  (quote (interactive))
		  (list 'funcall (list 'quote original-fortran-mode))
		  '(abbrev-mode 1))))

which sets the function cell of 'fortran-mode to look like

    (lambda ()
       (funcall <old definition of fortran-mode>)
       (abbrev-mode 1))

saying M-x fortran-mode crashes emacs with a segmentation
fault.  The problem is that the old definition of fortran-mode
is an autoload expression, and emacs doesn't like
   (funcall '(autoload ....))
The fix is to make the autoload function put something into
the function cell of the autoloaded symbol that can actually
be funcalled (a special kind of lambda expression, I guess).

The goal of the above example was to make the fortran-mode
command turn on abbrev mode automatically.  It's not possible
to do this in the obvious way using fortran-mode-hook, because
the fortran-mode command actually
  1) runs the hook, setting abbrev-mode
  2) changes the buffer's major mode, clearing abbrev-mode.
Some general improvement to make this kind of thing possible
would be nice, but I'm not sure quite what to suggest.