Re: Interactive specs

[Richard M. Stallman]

      (interactive (if current-prefix-arg
                       (list (mark) (point))
                     (list (point-min) (point-max))))

It could be improved as

      (interactive (list (if current-prefix-arg (region-beginning) (point-min))
                         (if current-prefix-arg (region-end) (point-max))))

or perhaps replace current-prefix-arg with testing transient-mark-mode.

That won't be recognized by the current definition of fix_command, or
even with my patch, but it would be recognized with my patch if we add
point-min and point-max to the list preserved_fns.