// (let* ((dot buffer-file-name) (eps (replace-regexp-in-string "dot$" "eps" dot)) (svg (replace-regexp-in-string "dot$" "svg" dot))) (shell-command (concat "dot "dot" -T ps > "eps"; gv "eps))) digraph structure { mindist=1 "pbuilder create"->"pbuilder update" "pbuilder update"->"pbuilder update" "pbuilder update"->"pbuilder build" "pbuilder update"->"pbuilder build" "pbuilder update"->"pbuilder build" }