(read-regexp): Add second arg `default'. Doc fix. (occur-read-primary-args): Use `(car regexp-history)' as the second arg of `read-regexp'.