       (error "No input file specified."))
     (if my/remote-host-list
         (progn
-          (setq file (ido-read-file-name "Output file:"))
+          (setq file (read-file-name "Output file:"))
           (if file
               (save-sexp-save-setq file 'my/remote-host-list)
             (error "No output file specified.")))

(defun parse-homiak-mremotes ()
  "Parse mremote configuration for xr remote hosts from David Homiak."
  (interactive)
  (let ((file (ido-read-file-name "XML File: " nil nil t))
        root)
    (if file
        (progn

;; -*- Mode: Emacs-Lisp -*-
;; parse-remote-hosts-xml.el --- parse a homiak mremote file
;; Copyright (C) 2015, 2016  Dan Harms (dan.harms)
;; Author: Dan Harms <dan.harms@xrtrading.com>
;; Created: Friday, August  7, 2015
;; Version: 1.0
;; Modified Time-stamp: <2016-03-24 11:10:00 dan.harms>
;; Modified by: Dan Harms
;; Keywords: homiak tramp remote hosts

