Mercurial > emacs
comparison lisp/progmodes/gud.el @ 66094:8d47733bcd93
* toolbar/gud-break.*: Moved to etc/images/gud/break.*.
* toolbar/gud-cont.*: Moved to etc/images/gud/cont.*.
* toolbar/gud-down.*: Moved to etc/images/gud/down.*.
* toolbar/gud-finish.*: Moved to etc/images/gud/finish.*.
* toolbar/gud-ni.*: Moved to etc/images/gud/ni.*.
* toolbar/gud-n.*: Moved to etc/images/gud/n.*.
* toolbar/gud-print.*: Moved to etc/images/gud/print.*.
* toolbar/gud-pstar.*: Moved to etc/images/gud/pstar.*.
* toolbar/gud-remove.*: Moved to etc/images/gud/remove.*.
* toolbar/gud-run.*: Moved to etc/images/gud/run.*.
* toolbar/gud-si.*: Moved to etc/images/gud/si.*.
* toolbar/gud-s.*: Moved to etc/images/gud/s.*.
* toolbar/gud-until.*: Moved to etc/images/gud/until.*.
* toolbar/gud-up.*: Moved to etc/images/gud/up.*.
* toolbar/gud-watch.*: Moved to etc/images/gud/watch.*.
* progmodes/gud.el (gud-tool-bar-map): Renamed the images
appropriately (for example, gud-break to gud/break).
author | Bill Wohler <wohler@newt.com> |
---|---|
date | Sat, 15 Oct 2005 05:41:11 +0000 |
parents | 8bd4c2112a50 |
children | 59812faf9041 |
comparison
equal
deleted
inserted
replaced
66093:579cd0b50a4b | 66094:8d47733bcd93 |
---|---|
3 ;; Author: Eric S. Raymond <esr@snark.thyrsus.com> | 3 ;; Author: Eric S. Raymond <esr@snark.thyrsus.com> |
4 ;; Maintainer: FSF | 4 ;; Maintainer: FSF |
5 ;; Keywords: unix, tools | 5 ;; Keywords: unix, tools |
6 | 6 |
7 ;; Copyright (C) 1992, 1993, 1994, 1995, 1996, 1998, 2000, 2001, 2002, 2003, | 7 ;; Copyright (C) 1992, 1993, 1994, 1995, 1996, 1998, 2000, 2001, 2002, 2003, |
8 ;; 2004, 2005 Free Software Foundation, Inc. | 8 ;; 2004, 2005 Free Software Foundation, Inc. |
9 | 9 |
10 ;; This file is part of GNU Emacs. | 10 ;; This file is part of GNU Emacs. |
11 | 11 |
12 ;; GNU Emacs is free software; you can redistribute it and/or modify | 12 ;; GNU Emacs is free software; you can redistribute it and/or modify |
13 ;; it under the terms of the GNU General Public License as published by | 13 ;; it under the terms of the GNU General Public License as published by |
195 "`gud-mode' keymap.") | 195 "`gud-mode' keymap.") |
196 | 196 |
197 (defvar gud-tool-bar-map | 197 (defvar gud-tool-bar-map |
198 (if (display-graphic-p) | 198 (if (display-graphic-p) |
199 (let ((map (make-sparse-keymap))) | 199 (let ((map (make-sparse-keymap))) |
200 (dolist (x '((gud-break . "gud-break") | 200 (dolist (x '((gud-break . "gud/break") |
201 (gud-remove . "gud-remove") | 201 (gud-remove . "gud/remove") |
202 (gud-print . "gud-print") | 202 (gud-print . "gud/print") |
203 (gud-pstar . "gud-pstar") | 203 (gud-pstar . "gud/pstar") |
204 (gud-watch . "gud-watch") | 204 (gud-watch . "gud/watch") |
205 (gud-cont . "gud-cont") | 205 (gud-cont . "gud/cont") |
206 (gud-until . "gud-until") | 206 (gud-until . "gud/until") |
207 (gud-finish . "gud-finish") | 207 (gud-finish . "gud/finish") |
208 (gud-run . "gud-run") | 208 (gud-run . "gud/run") |
209 ;; gud-s, gud-si etc. instead of gud-step, | 209 ;; gud-s, gud-si etc. instead of gud-step, |
210 ;; gud-stepi, to avoid file-name clashes on DOS | 210 ;; gud-stepi, to avoid file-name clashes on DOS |
211 ;; 8+3 filesystems. | 211 ;; 8+3 filesystems. |
212 (gud-next . "gud-n") | 212 (gud-next . "gud/n") |
213 (gud-step . "gud-s") | 213 (gud-step . "gud/s") |
214 (gud-nexti . "gud-ni") | 214 (gud-nexti . "gud/ni") |
215 (gud-stepi . "gud-si") | 215 (gud-stepi . "gud/si") |
216 (gud-up . "gud-up") | 216 (gud-up . "gud/up") |
217 (gud-down . "gud-down") | 217 (gud-down . "gud/down") |
218 (gud-goto-info . "info")) | 218 (gud-goto-info . "info")) |
219 map) | 219 map) |
220 (tool-bar-local-item-from-menu | 220 (tool-bar-local-item-from-menu |
221 (car x) (cdr x) map gud-minor-mode-map))))) | 221 (car x) (cdr x) map gud-minor-mode-map))))) |
222 | 222 |