 
 (add-hook 'nxml-mode-hook 'set-nxml-schemas)
 
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;  dita
+(add-to-list 'auto-mode-alist '("\\.ditamap$" . nxml-mode))
+(add-to-list 'auto-mode-alist '("\\.dita$" . nxml-mode))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;   netrexx

(load "mykeys")

;; (load-file "dir/generic/proof-site.el")
(require 'proof-site)

(setenv "ATSHOME" "/usr/local/lib/ats2-postiats-0.1.2")
(setenv "PATSHOME" "/usr/local/lib/ats2-postiats-0.1.2")

(require 'ats2-flymake)


(set-face-attribute 'default nil :foundry "apple" :family "Source Code Pro")

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;   nxml schemata

(add-to-list 'auto-mode-alist '("\\.html$" . nxml-mode))

(defun set-nxml-schemas ()
  (setq rng-schema-locating-files-default
	(cons
