      (define-key flyspell-mouse-map [down-mouse-3] #'flyspell-correct-word)
      (define-key flyspell-mouse-map [mouse-3] #'undefined)
      (define-key flyspell-mouse-map [down-mouse-2] nil)
-     (define-key flyspell-mouse-map [mouse-2] nil)))
+     (define-key flyspell-mouse-map [mouse-2] nil)
+     ))
 
   ;;
   ;; xml mode

 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 )

  (when (memq window-system '(x))
    (set-fontset-font
     t 'symbol
     (font-spec :family "Symbola") nil 'prepend)
    )
  
  ;;
