[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [PATCH] left-fringe for speedbar
From: |
Kim F. Storm |
Subject: |
Re: [PATCH] left-fringe for speedbar |
Date: |
Tue, 15 Nov 2005 00:08:35 +0100 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) |
Nick Roberts <address@hidden> writes:
> So, I would still like to put the left fringe back. No-one complained about
> it being there for the last four years and it makes things more consistent.
> However, these issues become larger than they really should. I think it as an
> insignificant change to the general user.
If this problem is primarily observed with speedbar, the following patch
seems to give good results without enabling left fringe in speedbar frame:
*** gud.el 13 Nov 2005 21:04:40 +0100 1.69
--- gud.el 15 Nov 2005 00:07:12 +0100
***************
*** 122,127 ****
--- 122,132 ----
(info "(emacs)GDB Graphical Interface")
(info "(emacs)Debuggers"))))
+ (defun gud-tool-bar-item-visible-no-fringe ()
+ (not (or (eq (buffer-local-value 'major-mode (window-buffer))
'speedbar-mode)
+ (and (memq gud-minor-mode '(gdbmi gdba))
+ (> (car (window-fringes)) 0)))))
+
(easy-mmode-defmap gud-menu-map
'(([help] "Info" . gud-goto-info)
([tooltips] menu-item "Toggle GUD tooltips" gud-tooltip-mode
***************
*** 136,154 ****
([until] menu-item "Continue to selection" gud-until
:enable (and (not gud-running)
(memq gud-minor-mode '(gdbmi gdba gdb perldb)))
! :visible (not (and (memq gud-minor-mode '(gdbmi gdba))
! (> (car (window-fringes)) 0))))
([remove] menu-item "Remove Breakpoint" gud-remove
:enable (not gud-running)
! :visible (not (and (memq gud-minor-mode '(gdbmi gdba))
! (> (car (window-fringes)) 0))))
([tbreak] menu-item "Temporary Breakpoint" gud-tbreak
:enable (memq gud-minor-mode
'(gdbmi gdba gdb sdb xdb bashdb)))
([break] menu-item "Set Breakpoint" gud-break
:enable (not gud-running)
! :visible (not (and (memq gud-minor-mode '(gdbmi gdba))
! (> (car (window-fringes)) 0))))
([up] menu-item "Up Stack" gud-up
:enable (and (not gud-running)
(memq gud-minor-mode
--- 141,156 ----
([until] menu-item "Continue to selection" gud-until
:enable (and (not gud-running)
(memq gud-minor-mode '(gdbmi gdba gdb perldb)))
! :visible (gud-tool-bar-item-visible-no-fringe))
([remove] menu-item "Remove Breakpoint" gud-remove
:enable (not gud-running)
! :visible (gud-tool-bar-item-visible-no-fringe))
([tbreak] menu-item "Temporary Breakpoint" gud-tbreak
:enable (memq gud-minor-mode
'(gdbmi gdba gdb sdb xdb bashdb)))
([break] menu-item "Set Breakpoint" gud-break
:enable (not gud-running)
! :visible (gud-tool-bar-item-visible-no-fringe))
([up] menu-item "Up Stack" gud-up
:enable (and (not gud-running)
(memq gud-minor-mode
--
Kim F. Storm <address@hidden> http://www.cua.dk
- [PATCH] left-fringe for speedbar, Nick Roberts, 2005/11/12
- RE: [PATCH] left-fringe for speedbar, Drew Adams, 2005/11/12
- RE: [PATCH] left-fringe for speedbar, Nick Roberts, 2005/11/12
- Re: [PATCH] left-fringe for speedbar, Miles Bader, 2005/11/12
- Re: [PATCH] left-fringe for speedbar, Nick Roberts, 2005/11/12
- Re: [PATCH] left-fringe for speedbar, Miles Bader, 2005/11/12
- Re: [PATCH] left-fringe for speedbar, Nick Roberts, 2005/11/12
- Re: [PATCH] left-fringe for speedbar, Miles Bader, 2005/11/13
- Re: [PATCH] left-fringe for speedbar, Richard M. Stallman, 2005/11/13
- Re: [PATCH] left-fringe for speedbar, Nick Roberts, 2005/11/14
- Re: [PATCH] left-fringe for speedbar,
Kim F. Storm <=
- Re: [PATCH] left-fringe for speedbar, Nick Roberts, 2005/11/14
- Re: [PATCH] left-fringe for speedbar, Kim F. Storm, 2005/11/15
- GUD icons [was: Re: [PATCH] left-fringe for speedbar], Nick Roberts, 2005/11/15
- Re: GUD icons [was: Re: [PATCH] left-fringe for speedbar], Kim F. Storm, 2005/11/15
- Re: GUD icons, Nick Roberts, 2005/11/15
- Re: GUD icons, Kim F. Storm, 2005/11/15
- Re: GUD icons, Nick Roberts, 2005/11/15
- Re: GUD icons, Andreas Schwab, 2005/11/15
- Re: [PATCH] left-fringe for speedbar, Richard M. Stallman, 2005/11/15
- Re: [PATCH] left-fringe for speedbar, Nick Roberts, 2005/11/15