           (intero-blocking-call
            'backend
            (format ":info %s" thing)))))
-    (if (string-match "^<interactive>" optimistic-result)
+    (if (string-match-p "^<interactive>" optimistic-result)
         ;; Load the module Interpreted so that we get information,
         ;; then restore bytecode.
         (progn (intero-async-call

                            "\\("
                            (mapconcat
                             (lambda (ident)
                               (if (string-match "^[_a-zA-Z]" ident)
                                   (concat "\\<" (regexp-quote ident) "\\> ?" "\\("(regexp-quote "(..)") "\\)?")
                                 (concat "(" (regexp-quote ident) ")")))
                             (plist-get suggestion :idents)

                          (forward-char 1)
                          (looking-back "$(" 1))
                        (+ 2 (current-column))
                      (if (looking-at-p "$(")
                          (+ 3 (current-column))
                        (1+ (current-column)))))
            (expansion-msg
