 
 (defun ac-fsharp-clear-errors ()
   (interactive)
-  (remove-overlays nil nil 'face 'fsharp-error-face)
-  (remove-text-properties (point-min) (point-max)
-                          '(mouse-face nil help-echo nil font-lock-face nil)))
+  (remove-overlays nil nil 'face 'fsharp-error-face))
 
 (defun ac-fsharp-stash-partial (str)
   (setq ac-fsharp-partial-data (concat ac-fsharp-partial-data str)))

             (buffer-substring-no-properties (point-min) (point-max))))))

(defun ac-fsharp-parse-file (file)
  (view-file file)
  (ac-fsharp-parse-current-buffer)
  (View-quit))

;;;###autoload
(defun ac-fsharp-load-project (file)

        (progn
          (set-process-filter ac-fsharp-completion-process 'ac-fsharp-filter-output)
          (set-process-query-on-exit-flag ac-fsharp-completion-process nil)
          (setq ac-fsharp-status 'idle)
          (setq ac-fsharp-partial-data "")
          (setq ac-fsharp-project-files))
      (setq ac-fsharp-completion-process nil))

    (setq ac-fsharp-idle-timer
