Mercurial > emacs
comparison lisp/progmodes/gdb-ui.el @ 103090:60e16972e785
(gdb-tooltip-print): Avoid "Non-X frame used"
error with gud-tooltip-mode in the Linux console.
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Tue, 28 Apr 2009 10:35:41 +0000 |
parents | cea08cb872e1 |
children |
comparison
equal
deleted
inserted
replaced
103089:40c914155732 | 103090:60e16972e785 |
---|---|
502 (if (search-forward "=" nil t) | 502 (if (search-forward "=" nil t) |
503 (concat expr (buffer-substring (- (point) 2) (point-max))) | 503 (concat expr (buffer-substring (- (point) 2) (point-max))) |
504 (buffer-string)))) | 504 (buffer-string)))) |
505 ;; remove newline for gud-tooltip-echo-area | 505 ;; remove newline for gud-tooltip-echo-area |
506 (substring string 0 (- (length string) 1)))) | 506 (substring string 0 (- (length string) 1)))) |
507 (or gud-tooltip-echo-area tooltip-use-echo-area))) | 507 (or gud-tooltip-echo-area tooltip-use-echo-area |
508 (not (display-graphic-p))))) | |
508 | 509 |
509 ;; If expr is a macro for a function don't print because of possible dangerous | 510 ;; If expr is a macro for a function don't print because of possible dangerous |
510 ;; side-effects. Also printing a function within a tooltip generates an | 511 ;; side-effects. Also printing a function within a tooltip generates an |
511 ;; unexpected starting annotation (phase error). | 512 ;; unexpected starting annotation (phase error). |
512 (defun gdb-tooltip-print-1 (expr) | 513 (defun gdb-tooltip-print-1 (expr) |