                   remotehost-connect-hosts))
     (setq hosts (sort hosts (lambda (left right)
                               (string-lessp (car left) (car right)))))
+    (setq hosts (cl-remove-duplicates hosts :test (lambda (x y)
+                                                    (equal (car x)
+                                                           (car y)))))
     (ivy-read "Remote host: " hosts
               :history 'remotehost-connect-history
               :action (lambda (x)

(require 'tramp)
(require 'ivy)
(require 'read-file)

(defvar remotehost-connect-hosts '()
  "List of hosts to connect to.")

;;; remotehost-connect.el --- manages connections to remote hosts
;; Copyright (C) 2016-2019  Dan Harms (dharms)
;; Author: Dan Harms <danielrharms@gmail.com>
;; Created: Monday, April 18, 2016
;; Version: 1.0
;; Modified Time-stamp: <2019-06-05 08:46:31 dharms>
;; Modified by: Dan Harms
;; Keywords: remote hosts

