(defun my-indent-or-complete ()
  (interactive)
  (let ((pos (point)))
    (indent-command)
    (when (and (= pos (point))
	       (eq last-command 'my-indent-or-complete))
      (complete-command))))