17 Jan
2009
17 Jan
'09
10:01
Bonjour,
Je cherche une solution simple pour la correction orthographique des .po.
J'ai testé:
- 'pospell' - qui ne gère apparemment pas les accents
- gettext-lint / POFileSpell - qui fonctionne mais le contexte est trop court
- une version mise à jour de http://lists.debian.org/debian-l10n-french/2000/04/msg00058.html (qui date de 2000 quand même - voir en fin de message) - pas mal, mais pas moyen de sauvegarder ni même de s'arrêter avant la fin du .po
Des alternatives? :)
--
Sylvain
(La version mise à jour:)
(defun po-ispell-next ()
"Search the next entry to check"
(po-find-span-of-entry)
(let ((here (point)))
(goto-char po-end-of-entry)
(if (re-search-forward po-any-msgstr-block-regexp nil t)
(progn
(goto-char (match-beginning 0))
(po-current-entry)
t)
nil)))
(defun po-ispell ()
"Check the spelling of the po file"
(interactive)
(save-excursion
(save-restriction
(let ((buffer-read-only po-read-only))
(po-first-entry)
(while (po-ispell-next)
(po-find-span-of-entry)
(ispell-region (+ po-start-of-msgstr-block 6) po-end-of-entry))))))