;; Use all available language specific snippets.
(lambda (x)
(and
- ;; The "Oriya" and "Odia" languages use some problematic
- ;; composition characters.
- (not (member (car x) '("Oriya" "Odia")))
+ ;; Some languages use problematic composition characters.
+ (not (member (car x) '("Oriya" "Odia" "Tifinagh")))
(stringp (setq x (eval (get-language-info (car x) 'sample-text) t)))
;; Filter out strings which use unencodable characters.
(not (and (or (tramp--test-gvfs-p) (tramp--test-smb-p))