X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=lookup-dict.el;h=134a4954eeb1dbcd619e3f44b96e9738a8d3bc10;hb=45e3d9786a0cbc8561fbaf6245b35d801c66e40f;hp=e89c23733bb4ec5ced238770b5f7541c78e543fd;hpb=c828c0dd2ab8098b8a95ccb1c767e652e99ceca7;p=elisp.git

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 "*")))