* toolbar/tool-bar.el (tool-bar-setup): Tool bar item dired uses

  icon diropen.  New tool bar item find-file-existing uses icon open.
* diropen.pbm diropen.xpm: New files.

3 files changed, 217 insertions, 1 deletions

diff --git a/lisp/toolbar/diropen.pbm b/lisp/toolbar/diropen.pbm
new file mode 100644
index 0000000000..0f1996db78
--- /dev/null
+++ b/lisp/toolbar/diropen.pbm
diff --git a/lisp/toolbar/diropen.xpm b/lisp/toolbar/diropen.xpm
new file mode 100644
index 0000000000..bdc0b19d7d
--- /dev/null
+++ b/lisp/toolbar/diropen.xpm
@@ -0,0 +1,215 @@
+/* XPM */
+static char * diropen_xpm[] = {
+"24 24 188 2",
+"  	c None",
+". 	c #000000",
+"+ 	c #010100",
+"@ 	c #B5B8A5",
+"# 	c #E4E7D2",
+"$ 	c #878A76",
+"% 	c #33342B",
+"& 	c #0B0B0B",
+"* 	c #E2E5CF",
+"= 	c #CFD4AF",
+"- 	c #CED3AE",
+"; 	c #B2B696",
+"> 	c #2D2D25",
+", 	c #23241D",
+"' 	c #9D9F90",
+") 	c #C6CAA6",
+"! 	c #C4C9A5",
+"~ 	c #C6CBA7",
+"{ 	c #C7CCA8",
+"] 	c #C9CEA9",
+"^ 	c #555847",
+"/ 	c #1A1B15",
+"( 	c #20201A",
+"_ 	c #D4D6C2",
+": 	c #BEC2A0",
+"< 	c #B3B896",
+"[ 	c #B0B595",
+"} 	c #B3B797",
+"| 	c #B6BB99",
+"1 	c #BBC09E",
+"2 	c #BCC19F",
+"3 	c #81856C",
+"4 	c #3E3F32",
+"5 	c #010101",
+"6 	c #DADDC8",
+"7 	c #AFB494",
+"8 	c #AAAF8F",
+"9 	c #A3A789",
+"0 	c #A6AA8B",
+"a 	c #A9AD8E",
+"b 	c #A7AB8D",
+"c 	c #A4A88A",
+"d 	c #A1A588",
+"e 	c #AAAD96",
+"f 	c #B3B5A5",
+"g 	c #B8BBAA",
+"h 	c #BABCAB",
+"i 	c #40413B",
+"j 	c #CACDBB",
+"k 	c #BABDA8",
+"l 	c #0C0C09",
+"m 	c #DDDFCB",
+"n 	c #969B7E",
+"o 	c #9DA286",
+"p 	c #95987C",
+"q 	c #96997E",
+"r 	c #9A9D81",
+"s 	c #999D80",
+"t 	c #9DA184",
+"u 	c #A5AA8B",
+"v 	c #A4A98A",
+"w 	c #A3A889",
+"x 	c #A2A588",
+"y 	c #33352B",
+"z 	c #9B9E83",
+"A 	c #898D74",
+"B 	c #D8DBC9",
+"C 	c #84866E",
+"D 	c #7D8169",
+"E 	c #151612",
+"F 	c #D7DAC9",
+"G 	c #797D67",
+"H 	c #3D3F34",
+"I 	c #E0E0D9",
+"J 	c #EBEDDD",
+"K 	c #E8EBD9",
+"L 	c #D8DBCA",
+"M 	c #1A1A18",
+"N 	c #0A0A09",
+"O 	c #6E7067",
+"P 	c #8D8F84",
+"Q 	c #4A4B45",
+"R 	c #2C2D29",
+"S 	c #4B4C46",
+"T 	c #E7EAD8",
+"U 	c #E3E6D4",
+"V 	c #DEE1D0",
+"W 	c #DADCCC",
+"X 	c #DADCD1",
+"Y 	c #2B2C28",
+"Z 	c #D7DAC6",
+"` 	c #6F735E",
+" .	c #0D0D0D",
+"..	c #F4F4EC",
+"+.	c #606251",
+"@.	c #92957B",
+"#.	c #4A4C3E",
+"$.	c #434438",
+"%.	c #CACFAB",
+"&.	c #C6CBA8",
+"*.	c #C2C6A4",
+"=.	c #ABB091",
+"-.	c #23251E",
+";.	c #494B3D",
+">.	c #DCDCD4",
+",.	c #EAECDD",
+"'.	c #CDD2AD",
+").	c #20201B",
+"!.	c #1C1C17",
+"~.	c #A4A88B",
+"{.	c #414337",
+"].	c #BABF9D",
+"^.	c #B5B999",
+"/.	c #81836C",
+"(.	c #070806",
+"_.	c #D5D8C4",
+":.	c #161616",
+"<.	c #F2F2EA",
+"[.	c #CACFAA",
+"}.	c #050504",
+"|.	c #3C3D32",
+"1.	c #C9CEAA",
+"2.	c #C8CDA9",
+"3.	c #BFC4A2",
+"4.	c #3E4035",
+"5.	c #BCC09F",
+"6.	c #B6BB9A",
+"7.	c #B0B494",
+"8.	c #9DA185",
+"9.	c #535445",
+"0.	c #B6B8A7",
+"a.	c #747470",
+"b.	c #ECECE2",
+"c.	c #C3C8A5",
+"d.	c #C2C7A4",
+"e.	c #393B30",
+"f.	c #BFC4A1",
+"g.	c #BDC2A0",
+"h.	c #C0C5A2",
+"i.	c #3A3B31",
+"j.	c #A9AD8F",
+"k.	c #A3A78A",
+"l.	c #80836D",
+"m.	c #020201",
+"n.	c #A6A998",
+"o.	c #B8BC9B",
+"p.	c #1B1C17",
+"q.	c #181814",
+"r.	c #AFB394",
+"s.	c #ACB091",
+"t.	c #878A72",
+"u.	c #9B9F83",
+"v.	c #9A9D82",
+"w.	c #8A8D75",
+"x.	c #4F5243",
+"y.	c #070705",
+"z.	c #9E9F91",
+"A.	c #E5E6DA",
+"B.	c #ADB192",
+"C.	c #A6AA8C",
+"D.	c #A5A98C",
+"E.	c #4B4D3F",
+"F.	c #70735F",
+"G.	c #9FA286",
+"H.	c #999D81",
+"I.	c #35362D",
+"J.	c #2D2E26",
+"K.	c #8A8D74",
+"L.	c #71735F",
+"M.	c #080908",
+"N.	c #E3E5D9",
+"O.	c #C0C3AF",
+"P.	c #94987C",
+"Q.	c #8F9379",
+"R.	c #8B8F75",
+"S.	c #8A8E74",
+"T.	c #888C73",
+"U.	c #7D816A",
+"V.	c #0E0F0C",
+"W.	c #3E4034",
+"X.	c #4E5042",
+"Y.	c #282922",
+"Z.	c #121310",
+"`.	c #24251F",
+" +	c #71745F",
+".+	c #6A6D59",
+"++	c #434538",
+"@+	c #080907",
+"                                                ",
+"                                                ",
+"                                                ",
+"    . . . . . . .                               ",
+"  + @ # # # # # $ %                             ",
+"  & * = = = - - ; >                             ",
+", ' * ) ! ~ { ] ] ^ /         . .               ",
+"( _ : < [ } | 1 2 3 4 5 . . . . . . .           ",
+", 6 7 8 9 0 8 a b c d e f g h . i j k .         ",
+"l m n o p q r s q t u v w x 9 . y z A .         ",
+". B C D E . . . . . . . . . . . . . . . 5 5     ",
+". F G H I J K K L M N O P Q R . S T U V W X Y   ",
+". Z `  ...= = = +.. @.= = = #.. $.%.&.*.1 =.-.  ",
+". Z ;.>.,.'.- - ).!.'.'.'.'.~.. {.&.*.].^./.(.  ",
+". _.:.<.%.[.%.[.}.|.1.{ 2.2.3.. 4.5.6.7.8.9.l   ",
+". 0.a.b.c.d.d.*.}.e.f.g.h.g.} . i.[ j.k.l.m.    ",
+". n.>.o.o.^.} } p.q.r.r.r.s.t.. % u.v.w.x.y.    ",
+". z.A.B.j.C.D.k.E.. F.G.u.H.I.. J.K.K.L.M.      ",
+". N.O.P.Q.R.S.T.U.V.}.W.X.Y.Z.. `. +.+++@+      ",
+"  . . . . . . . . . . . . . . . . . . }.        ",
+"                                                ",
+"                                                ",
+"                                                ",
+"                                                "};
diff --git a/lisp/toolbar/tool-bar.el b/lisp/toolbar/tool-bar.el
index bf1c229ccb..f22d84cafa 100644
--- a/lisp/toolbar/tool-bar.el
+++ b/lisp/toolbar/tool-bar.el
@@ -223,7 +223,8 @@ MAP must contain appropriate binding for `[menu-bar]' which holds a keymap."
   ;; might inadvertently click that button.
   ;;(tool-bar-add-item-from-menu 'save-buffers-kill-emacs "exit")
   (tool-bar-add-item-from-menu 'find-file "new")
-  (tool-bar-add-item-from-menu 'dired "open")
+  (tool-bar-add-item-from-menu 'find-file-existing "open")
+  (tool-bar-add-item-from-menu 'dired "diropen")
   (tool-bar-add-item-from-menu 'kill-this-buffer "close")
   (tool-bar-add-item-from-menu 'save-buffer "save" nil
 			       :visible '(or buffer-file-name