moved argument expected_modes into options; improved mode check to only check mode of the named predicate
;;; Options for Proof General
;; Examples for sensible settings:
;(custom-set-variables '(isar-eta-contract nil))
;(custom-set-faces
; '(proof-locked-face
; ((((type x) (class color) (background light)) (:background "lightsteelblue2")))))