set-face-font and custom-set-font, DejaVu, fonts for hebrew

[Uwe Brauer]

Hello

I am using Kubuntu 10.04 and GNU emacs 24.4
I am still used to the (old-fashion) setting of font, I find via
xfontsel, for example

  (set-face-font 'default "-*-courier-bold-r-*-*-20-180-*-*-*-*-*-*")

Now I also have tried out via the menu
Options-->Set Default Font

and I liked especially

Deja Vu Sans Mono, but only for Hebrew, for European language I prefer
courier bold, which I set as above via set-face-font

When I set the Deja Vu font via Options-->Save Options
the following is written into my custom file:

(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(default ((t (:family "DejaVu Sans Mono" :foundry "unknown" :slant
 normal :weight normal :height 143 :width normal)))))

Now I want to modify a function, I use to turning on Hebrew writing
which also switches the font.

For example I have

(defun my-turn-bidi-paragraph-direction-on () 
  "Just start with  to R2L `bidi-paragraph-direction' set
  and turn the hebrew (qwerty) keyboard on"
   (interactive)
  (setq  bidi-paragraph-direction 'right-to-left)
  (set-face-font 'default "-etl-*-*-*-*-*-*-240-*-*-*-*-ISO8859-8")
  (setq org-mime-bidi-support t)
  (set-input-method "hebrew-phonetic-qwerty" t)
  (message "R2L on and the hebrew qwerty keyboard!"))

However  I want now to replace the «etl» font by the nicer Deja Vu font, but
how? I cannot find the DejaVu font via xfontsel. 
I could of course use the
(custom-set-faces 
 '(default ((t (:family "DejaVu Sans Mono" :foundry "unknown" :slant
 normal :weight normal :height 143 :width normal)))))

But this seems to me a abuse of custom-set-faces?


Thanks

Uwe Brauer