;; Hachette.el --- Lookup a word on the Hachette's online french dictionary. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Emacs Lisp Archive Entry ;; Filename: hachette.el ;; Author: Jean-Philippe Theberge (jphil@emacslisp.org) ;; Version: 1.5 ;; Created: 24/02/2000 - update: 01/08/2000 ;; Keywords: Dictionaire, Hachette, French dictionary ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Copyright (c) 1998 - 1999 Free Software Foundation, Inc. ;; ;; This file is not part of GNU Emacs. :-( ;; ;; GNU Emacs is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation; either version 2, or (at your option) ;; any later version. ;; ;; GNU Emacs is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;; GNU General Public License for more details. ;; ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; see the file COPYING. If not, write to the ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, ;; Boston, MA 02111-1307, USA. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; Commentary: ;; ;; Initialy based on dict-web.el by Eric Marsden ;; ;; The definition come from the online dictionary at ;; http://www.francophonie.hachette-livre.fr ;; and is copyrighted by them. ;; ;; Version History ;; 1.0 Initial implementation ;; 1.1 Cleanup and commented for gnu.emacs.source posting ;; 1.2 Removed dependencies on w3 ;; 1.3 Some bad codes reworked ;; 1.4 Some debuging. Change in hachette-fetch-word-at-point ;; ;; TO DO ;; ;; - make it (optionaly) asynchronous so users with slow connection can ;; continue working while the definition is being fetched. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ;; To use: ;; ;; M-x hachette ;; Prompt for a word (suggesting word at point) ;; ;; M-x hachette-fetch-wotrd-at-point ;; Lookup word at point without prompting. ;; If hachette-use-language-guessing is t and ;; the buffer seem to be in english, ;; using dict-web is proposed.