From: Francois Fleuret <francois@fleuret.org>
Date: Thu, 27 May 2010 17:02:25 +0000 (+0200)
Subject: Now allows words with period in them ("e.g.").
X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?a=commitdiff_plain;h=45e3d9786a0cbc8561fbaf6245b35d801c66e40f;p=elisp.git

Now allows words with period in them ("e.g.").
---

diff --git a/lookup-dict.el b/lookup-dict.el
index e89c237..134a495 100644
--- a/lookup-dict.el
+++ b/lookup-dict.el
@@ -58,7 +58,7 @@ argument \\[universal-argument] forces the third."
 
     (when (string= word "") (setq word (read-input "Word: ")))
 
-    (setq word (replace-regexp-in-string "[^a-zA-Z\- ]" "" (or word "")))
+    (setq word (replace-regexp-in-string "[^a-zA-Z\- \.]" "" (or word "")))
 
     (let ((name (concat "*definition " word "*")))