Print Parameter Reference: Part of the Modular DocBook Stylesheet distribution
Prev |  | Next

# $admon-graphic$

## Name

$admon-graphic$ -- Admonition graphic file

## Synopsis

    ($admon-graphic$ #!optional (nd (current-node)))

## Description

Given an admonition node, returns the name of the graphic that should be used for that admonition.

## Source Code

    (define ($admon-graphic$ #!optional (nd (current-node)))
      ;; Admonition graphic file
      (cond ((equal? (gi nd) (normalize "tip"))
     (string-append %admon-graphics-path% "tip.gif"))
    ((equal? (gi nd) (normalize "note"))
     (string-append %admon-graphics-path% "note.gif"))
    ((equal? (gi nd) (normalize "important"))
     (string-append %admon-graphics-path% "important.gif"))
    ((equal? (gi nd) (normalize "caution"))
     (string-append %admon-graphics-path% "caution.gif"))
    ((equal? (gi nd) (normalize "warning"))
     (string-append %admon-graphics-path% "warning.gif"))
    (else (error (string-append (gi nd) " is not an admonition.")))))

Prev | Home | Next
%admon-graphics-path% | Up | $admon-graphic-width$