 
 (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)))


(defun line-column-to-pos (line col)
  (save-excursion
    (goto-line line)
    (forward-char col)
    (point)))


    nil))

(defun ac-fsharp-can-make-request ()
  (and ac-fsharp-completion-process
       (member (expand-file-name (buffer-file-name)) ac-fsharp-project-files)))

