Commit ca97010c authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(ispell-internal-change-dictionary): Fix problem in recent changes, where

the ispell process was repeatedly killed & restarted.
parent a41118cc
2005-02-03 Stefan <monnier@iro.umontreal.ca>
2005-02-03 Stefan Monnier <monnier@iro.umontreal.ca>
* textmodes/ispell.el (ispell-internal-change-dictionary): Fix problem
in recent changes, where the ispell process was repeatedly
killed & restarted.
 
* international/mule-cmds.el (set-locale-environment): Set file-name
coding system to utf-8 on Darwin systems.
......
;;; ispell.el --- interface to International Ispell Versions 3.1 and 3.2
;; Copyright (C) 1994, 1995, 1997, 1998, 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
;; Copyright (C) 1994, 1995, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2005
;; Free Software Foundation, Inc.
;; Author: Ken Stevens <k.stevens@ieee.org>
;; Maintainer: Ken Stevens <k.stevens@ieee.org>
......@@ -2449,7 +2450,7 @@ With prefix argument, set the default dictionary."
"Update the dictionary actually used by Ispell.
This may kill the Ispell process; if so,
a new one will be started when needed."
(let ((dict (or ispell-local-dictionary ispell-dictionary "default")))
(let ((dict (or ispell-local-dictionary ispell-dictionary)))
(unless (equal ispell-current-dictionary dict)
(setq ispell-current-dictionary dict)
(ispell-kill-ispell t))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment