(defun indent-buffer ()
  (interactive)
  "indent correct buffer by GNU indent!"
  (save-buffer (current-buffer))
  (call-process "indent " nil nil nil (buffer-name (current-buffer)))
  (revert-buffer t t))
(global-set-key (kbd"C-c C-'") 'indent-buffer)