                                (split-string
                                 (shell-command-to-string command-string)
                                 "[\n\t\r ]+")))))
-      (ido-completing-read
+      (completing-read
        prompt-string
        (split-string
         (shell-command-to-string command-string)


    (if dir-isone
        (concat dir-string
                (ido-completing-read
                 prompt-string
                 (delq nil
                       (mapcar (lambda (str) (if (< dirname-length (length str))

  _r_: open recentf files
  _s_: open system configure files
  _w_: open workspace files
^
^
"
