~ubuntu-branches/ubuntu/lucid/dictionaries-common/lucid-201002122359

« back to all changes in this revision

Viewing changes to support/emacsen/debian-ispell.el

  • Committer: Bazaar Package Importer
  • Author(s): Colin Watson
  • Date: 2005-09-02 13:39:19 UTC
  • mfrom: (1.1.1 sarge)
  • Revision ID: james.westby@ubuntu.com-20050902133919-1yjcebqd0y0op3tz
Tags: 0.49.2ubuntu1
scripts/system/dc-debconf-select.pl: Drop default question priority to
medium so that the default wordlist question is not asked on initial
installation. (This is a temporary workaround, and leaves a dangling
symlink in /usr/share/dict/words.)

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
;;File: debian-ispell.el
2
2
;;; -----------------------------------------------------------------------
3
 
;;;     $Id: debian-ispell.el,v 1.13 2004/12/22 12:48:07 agmartin Exp $ 
 
3
;;;     $Id: debian-ispell.el,v 1.14 2005/03/04 12:24:31 agmartin Exp $ 
4
4
;;; -----------------------------------------------------------------------
5
5
;;Description: Emacsen support for Debian package dictionaries-common
6
6
;;Authors: Rafael Laboissi�re <rafael@debian.org>
26
26
Do not change this variable directly.  Use the
27
27
`debian-ispell-add-dictionary-entry' function instead.")
28
28
 
 
29
(defvar debian-valid-dictionary-list nil
 
30
  "A list that will contain the list of emacsen names provided by
 
31
registered ispell or aspell dicts"
 
32
  )
 
33
 
29
34
(defun debian-ispell-add-dictionary-entry (entry &optional name)
30
35
  "Adds an ENTRY to the ispell-dictionary-alist variable. See the 
31
36
documentation of the variable ispell-dictionary-alist for the format 
32
37
of ENTRY."
33
38
  (set-variable 'debian-ispell-dictionary-alist
34
 
                (append (list entry) debian-ispell-dictionary-alist)))
 
39
                (append (list entry) debian-ispell-dictionary-alist))
 
40
  (set-variable 'debian-valid-dictionary-list
 
41
                (add-to-list 'debian-valid-dictionary-list (car entry)))
 
42
  )
35
43
 
36
44
;;; -----------------------------------------------------------------------
37
45
;;;  Guess default ispell dictionary under emacs and make ispell.el use it
61
69
Do not change this variable directly. It is autogenerated 
62
70
from data supplied by aspell dictionaries maintainers")
63
71
 
64
 
;; Load the file containing the aspell equivalences for 
65
 
;; debian-aspell-dictionary guess
66
 
 
67
 
(if (file-exists-p "/var/cache/dictionaries-common/emacsen-aspell-equivs.el")
68
 
    (load "/var/cache/dictionaries-common/emacsen-aspell-equivs.el"))
69
 
 
70
72
;;; ---------------
71
73
 
72
74
(defun get-debian-aspell-default ()