From 6ef3aacf36118d30ee726bcb6ac7ae337403b017 Mon Sep 17 00:00:00 2001 From: rocky Date: Tue, 8 Dec 2009 05:45:19 -0500 Subject: [PATCH] Small changes. --- fringe.el | 12 +++++++++--- python/pydbgr.el | 3 ++- ruby/rbdbgr.el | 3 ++- 3 files changed, 13 insertions(+), 5 deletions(-) diff --git a/fringe.el b/fringe.el index b110668a..05197b09 100644 --- a/fringe.el +++ b/fringe.el @@ -1,6 +1,12 @@ ;; Bitmap for breakpoint in fringe -;; (define-fringe-bitmap 'breakpoint -;; "\x3c\x7e\xff\xff\xff\xff\x7e\x3c") + +(and (display-images-p) + ;; Bitmap for breakpoint in fringe + (define-fringe-bitmap 'breakpoint + "\x3c\x7e\xff\xff\xff\xff\x7e\x3c") + ;; Bitmap for gud-overlay-arrow in fringe + (define-fringe-bitmap 'hollow-right-triangle + "\xe0\x90\x88\x84\x84\x88\x90\xe0")) ;; Bitmap for hollow overlay-arrow in fringe ;; (define-fringe-bitmap 'hollow-right-triangle @@ -67,7 +73,7 @@ position.") (arrow-face (intern (concat "dbgr-overlay-arrow" (car pair))))) (make-local-variable arrow-symbol) (put arrow-symbol 'overlay-arrow-string (cdr pair)) - (if (window-system) + (if (display-images-p) (progn (define-fringe-bitmap arrow-bitmap "\xc0\xf0\xf8\xfc\xfc\xf8\xf0\xc0") (put arrow-symbol 'overlay-arrow-bitmap arrow-bitmap) diff --git a/python/pydbgr.el b/python/pydbgr.el index 553371be..4c236690 100644 --- a/python/pydbgr.el +++ b/python/pydbgr.el @@ -8,7 +8,8 @@ (defgroup pydbgr nil "The Python pydbgr debugger" :group 'processes - :group 'tools) + :group 'tools + :version "23.1") ;; ------------------------------------------------------------------- ;; User definable variables diff --git a/ruby/rbdbgr.el b/ruby/rbdbgr.el index 3a84d518..834fbb62 100644 --- a/ruby/rbdbgr.el +++ b/ruby/rbdbgr.el @@ -8,7 +8,8 @@ (defgroup rbdbgr nil "The Ruby 1.9 debugger" :group 'processes - :group 'tools) + :group 'tools + :version "23.1") ;; ------------------------------------------------------------------- ;; User definable variables