diff options
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/progmodes/gud.el | 7 |
2 files changed, 7 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7677862f182..937069beaa7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2007-10-04 Micha,Ak(Bl Cadilhac <michael@cadilhac.name> | ||
| 2 | |||
| 3 | * progmodes/gud.el (gud-gud-gdb-command-name): Fix typo in docstring. | ||
| 4 | |||
| 1 | 2007-10-04 Nick Roberts <nickrob@snap.net.nz> | 5 | 2007-10-04 Nick Roberts <nickrob@snap.net.nz> |
| 2 | 6 | ||
| 3 | * progmodes/gud.el (gud-gud-gdb-command-name): New option. | 7 | * progmodes/gud.el (gud-gud-gdb-command-name): New option. |
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index 2d715b7a4e6..e5217b7162a 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el | |||
| @@ -239,7 +239,7 @@ Used to grey out relevant toolbar icons.") | |||
| 239 | ([menu-bar run] menu-item | 239 | ([menu-bar run] menu-item |
| 240 | ,(propertize "run" 'face 'font-lock-doc-face) gud-run | 240 | ,(propertize "run" 'face 'font-lock-doc-face) gud-run |
| 241 | :visible (memq gud-minor-mode '(gdbmi gdb dbx jdb))) | 241 | :visible (memq gud-minor-mode '(gdbmi gdb dbx jdb))) |
| 242 | ([menu-bar go] menu-item | 242 | ([menu-bar go] menu-item |
| 243 | ,(propertize " go " 'face 'font-lock-doc-face) gud-go | 243 | ,(propertize " go " 'face 'font-lock-doc-face) gud-go |
| 244 | :visible (and (not gud-running) | 244 | :visible (and (not gud-running) |
| 245 | (eq gud-minor-mode 'gdba))) | 245 | (eq gud-minor-mode 'gdba))) |
| @@ -591,8 +591,7 @@ required by the caller." | |||
| 591 | 591 | ||
| 592 | (defcustom gud-gud-gdb-command-name "gdb --fullname" | 592 | (defcustom gud-gud-gdb-command-name "gdb --fullname" |
| 593 | "Default command to run an executable under GDB in text command mode. | 593 | "Default command to run an executable under GDB in text command mode. |
| 594 | The option \"--fullname\" must be included in it's value." | 594 | The option \"--fullname\" must be included in this value." |
| 595 | |||
| 596 | :type 'string | 595 | :type 'string |
| 597 | :group 'gud) | 596 | :group 'gud) |
| 598 | 597 | ||
| @@ -3111,7 +3110,7 @@ class of the file (using s to separate nested class ids)." | |||
| 3111 | 'syntax-table (eval-when-compile | 3110 | 'syntax-table (eval-when-compile |
| 3112 | (string-to-syntax "> b"))) | 3111 | (string-to-syntax "> b"))) |
| 3113 | ;; Make sure that rehighlighting the previous line won't erase our | 3112 | ;; Make sure that rehighlighting the previous line won't erase our |
| 3114 | ;; syntax-table property. | 3113 | ;; syntax-table property. |
| 3115 | (put-text-property (1- (match-beginning 0)) (match-end 0) | 3114 | (put-text-property (1- (match-beginning 0)) (match-end 0) |
| 3116 | 'font-lock-multiline t) | 3115 | 'font-lock-multiline t) |
| 3117 | nil))))) | 3116 | nil))))) |