Testing validity of a word

Testing validity of a word

[uzibalqa]

I want to test whether a word is valid. Is there a package in Emacs for dictionary word lookup ?

Have constructed something like this, but of course the function lookup-word does not exist.

(defun is-valid-word (word)
  "Check if the WORD is valid using the Emacs dictionary."
  (let ((dict-info (lookup-word word)))
    (if (plist-get dict-info :found)
        t ; The word is valid.
      nil))) ; The word is not valid.

Is there a package in Emacs for dictionary word lookup ?

RE: [External] : Testing validity of a word

[Drew Adams]

> Is there a package in Emacs for dictionary word lookup ?
 
Maybe have a look at the links here, under "Dictionaries".  There seem to be a dozen or so.

https://www.emacswiki.org/emacs/CategoryInterface

RE: [External] : Testing validity of a word

[uzibalqa]

------- Original Message -------
On Wednesday, July 26th, 2023 at 1:33 PM, Drew Adams <drew.adams@oracle.com> wrote:


> > Is there a package in Emacs for dictionary word lookup ?
> 
> 
> Maybe have a look at the links here, under "Dictionaries". There seem to be a dozen or so.
> 
> https://www.emacswiki.org/emacs/CategoryInterface

Any recommendations ?

RE: [External] : Testing validity of a word

[uzibalqa]

------- Original Message -------
On Wednesday, July 26th, 2023 at 1:40 PM, uzibalqa <uzibalqa@proton.me> wrote:


> ------- Original Message -------
> On Wednesday, July 26th, 2023 at 1:33 PM, Drew Adams drew.adams@oracle.com wrote:
> 
> 
> 
> > > Is there a package in Emacs for dictionary word lookup ?
> > 
> > Maybe have a look at the links here, under "Dictionaries". There seem to be a dozen or so.
> > 
> > https://www.emacswiki.org/emacs/CategoryInterface
> 
> 
> Any recommendations ?

Have been looking at using ispell.  Would that be a good strategy ?

RE: [External] : Testing validity of a word

[uzibalqa]

Sent with Proton Mail secure email.

------- Original Message -------
On Wednesday, July 26th, 2023 at 1:33 PM, Drew Adams <drew.adams@oracle.com> wrote:


> > Is there a package in Emacs for dictionary word lookup ?
> 
> 
> Maybe have a look at the links here, under "Dictionaries". There seem to be a dozen or so.
> 
> https://www.emacswiki.org/emacs/CategoryInterface

Have taken the ispell route.  But I got into the difficulty of 

(error "Marker points into wrong buffer" #<marker at 1 in  *temp*>)

Furthermore I am not sure whether the method is efficient.

(defun is-valid-word (word)
  "Check if the WORD is valid using `ispell`."
  (let ((original-buffer (current-buffer)))
    (with-temp-buffer
      (insert word)
      (ispell-word)
      (not (eq (current-buffer) original-buffer)))))

RE: [External] : Testing validity of a word

[Drew Adams]

> > Maybe have a look at the links here, under "Dictionaries". There seem to
> be a dozen or so.
> >
> >
> https://www.emacswiki.org/emacs/CategoryInterface
> 
> Any recommendations ?

Not from me.  I don't use any of them.

Re: Testing validity of a word

[Emanuel Berg]

uzibalqa wrote:

> I want to test whether a word is valid. Is there a package
> in Emacs for dictionary word lookup ?

(defun spell-word (word)
  (with-temp-buffer
    (save-excursion
      (insert word) )
    (condition-case nil
        (not (ispell-word))
      (error nil) )))
      
;; (spell-word "length") ; t
;; (spell-word "lenght") ; nil

-- 
underground experts united
https://dataswamp.org/~incal

Re: Testing validity of a word

[uzibalqa]

------- Original Message -------
On Thursday, July 27th, 2023 at 12:06 AM, Emanuel Berg <incal@dataswamp.org> wrote:


> uzibalqa wrote:
> 
> > I want to test whether a word is valid. Is there a package
> > in Emacs for dictionary word lookup ?
> 
> 
> (defun spell-word (word)
> (with-temp-buffer
> (save-excursion
> (insert word) )
> (condition-case nil
> (not (ispell-word))
> (error nil) )))
> 
> ;; (spell-word "length") ; t
> ;; (spell-word "lenght") ; nil
> 
> --
> underground experts united
> https://dataswamp.org/~incal

The following could be less intensive

(defun is-valid-word (word)
  "Check if the WORD is valid using `ispell`."
  (ispell-lookup-words word))

Re: Testing validity of a word

[Emanuel Berg]

uzibalqa wrote:

> The following could be less intensive
>
> (defun is-valid-word (word)
>   "Check if the WORD is valid using `ispell`."
>   (ispell-lookup-words word))

You are right, maybe `ispell-lookup-words' didn't exist when
I wrote that ... should replace that, thanks.

-- 
underground experts united
https://dataswamp.org/~incal

Re: Testing validity of a word

[Emanuel Berg]

uzibalqa wrote:

> The following could be less intensive
>
> (defun is-valid-word (word)
>   "Check if the WORD is valid using `ispell`."
>   (ispell-lookup-words word))

Okay, so I tried with these

(defun spell-word-2 (word)
  (and (ispell-lookup-words word) t) )
;; (spell-word-2 "length") ; t
;; (spell-word-2 "lenght") ; nil

(defun spell-word (word)
  (with-temp-buffer
    (save-excursion
      (insert word) )
    (condition-case nil
        (not (ispell-word))
      (error nil) )))
;; (spell-word "length") ; t
;; (spell-word "lenght") ; nil

Maybe spell-word-2, using `ispell-lookup-words', is faster as
you say, but something is different because with the
permutation use case and code previously discussed [1] this

  (string-perms-filter "pigelsen")

only returns "sleeping". With my old spell-word both are
returned, i.e. ("peelings" "sleeping") - no idea why actually,
I'll leave it to my subconscious to figure out God willing ...

[1] https://dataswamp.org/~incal/emacs-init/perm.el

-- 
underground experts united
https://dataswamp.org/~incal