(x-create-frame-with-faces): Don't look for geometry

resource if name is nil.

diff --git a/lisp/faces.el b/lisp/faces.el
index aa14e62b72cdf6576cea4c238739875094d132d7..686df68b5e5737a1d8aca6e5d118616dc4e90f39 100644 (file)
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -944,7 +944,7 @@ selected frame."
                   (cdr (assq 'name default-frame-alist))
                   (cdr (assq 'name initial-frame-alist))))
         (x-resource-name name)
-        (res-geometry (x-get-resource "geometry" "Geometry"))
+        (res-geometry (if name (x-get-resource "geometry" "Geometry")))
         parsed)
     (if res-geometry
        (progn