bug#15751: 24.3.50; region-extract-function

[Katsumi Yamaoka]

The default function for it requires one argument, but
`copy-region-as-kill' calls it with no arg.

Debugger entered--Lisp error:\
 (wrong-number-of-arguments ((compilation-current-error 
compilation-context-lines t) (delete) (if (region-beginning) (progn (if (eq 
delete (quote delete-only)) (delete-region (region-beginning) (region-end)) 
(filter-buffer-substring (region-beginning) (region-end) delete))))) 0)
[...]
  copy-region-as-kill(148162 148210 1)
  kill-ring-save(148162 148210 1)
  call-interactively(kill-ring-save nil nil)
  command-execute(kill-ring-save)