+++ /dev/null
-(require 'xquery-mode)
-
-(add-to-list 'auto-mode-alist '("\\.[Xx][Qq][Uu][Ee][Rr][Yy]\\'" . xquery-mode))
-
-(defvar dbxml-shell-filename "dbxml")
-
-(defun dbxml ()
- (interactive)
- (pop-to-buffer (make-comint "DB-Xml" dbxml-shell-filename))
- (set-buffer-process-coding-system "utf-8" "utf-8"))