 
   Examples: (glob \"*.{jpg,gif}\") (glob \".*\") (glob \"/usr/*/se*\")"
   [pattern]
-  (satta-glob/glob pattern))
+  (let [pattern (resolve-tilde-path pattern)]
+    (satta-glob/glob pattern)))

  [parts]
  (apply str (interpose (file-separator) parts)))

(defn resolve-abs-path
  [path]
  (cond
   (= "~" path)

  "Given a path to a directory, returns a seq of java.io.File objects
  representing the directory contents"
  [path]
  (let [path (resolve-tilde-path path)
        f    (file path)]
    (if (.isDirectory f)
      (seq (.listFiles f))
