Changeset 4210 for trunk/lisp/textmodes/flyspell.el

Timestamp:

06/02/07 09:29:41 (1 year ago)

Author:

miyoshi

Message:

Sync up with Emacs_22_BASE.

Files:

• trunk/lisp/textmodes/flyspell.el (modified) (2 diffs)

trunk/lisp/textmodes/flyspell.el

@@ -2026 +2026 @@
-  ;; use the correct dictionary
-  (flyspell-accept-buffer-local-defs)
+  (or opoint (setq opoint (point-marker)))
-  (let ((cursor-location (point))
-        (word (flyspell-get-word nil)))
@@ -2134 +2135 @@
-(defun flyspell-emacs-popup (event poss word)
-  "The Emacs popup menu."
+  (unless window-system
+    (error "This command requires pop-up dialogs"))
-  (if (not event)
-      (let* ((mouse-pos  (mouse-position))