Re: doc-view and mailcap

[Reiner Steib]

On Thu, Oct 18 2007, Reiner Steib wrote:

> On Thu, Oct 18 2007, Juri Linkov wrote:
[...]
>>> (defun doc-view-mode-p ()
>>>   (and (display-graphic-p)
>
> Maybe an additional test like "(executable-find
> doc-view-ghostscript-program)" would be useful here.
>
>>>        (image-type-available-p 'png)))
>>>
>>> Shouldn't it?
>>
>> I think the second variant is better.  Since this is a matter of doc-view
>> to decide if it can support displaying, it should have such a function
>> (autoloaded).
>
> I agree.  

Committed:

(defun doc-view-mode-p (type)
  "Return non-nil if image type TYPE is available for `doc-view'.
Image types are symbols like `dvi', `postscript' or `pdf'."
  (and (display-graphic-p)
       (image-type-available-p 'png)
       (cond
        ((eq type 'dvi)
         (and (doc-view-mode-p 'pdf)
              doc-view-dvipdfm-program
              (executable-find doc-view-dvipdfm-program)))
        ((or (eq type 'postscript) (eq type 'ps)
             (eq type 'pdf))
         (and doc-view-ghostscript-program
              (executable-find doc-view-ghostscript-program)))
        (t ;; unknown image type
         nil))))

Bye, Reiner.
-- 
       ,,,
      (o o)
---ooO-(_)-Ooo---  |  PGP key available  |  http://rsteib.home.pages.de/