From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Leo Newsgroups: gmane.emacs.devel Subject: Re: How to debug this problem? Date: Wed, 09 Sep 2009 19:54:47 +0100 Message-ID: References: <20a0c1020909041710j216381cbj313e4400ce02a940@mail.gmail.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: ger.gmane.org 1252522510 14651 80.91.229.12 (9 Sep 2009 18:55:10 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Wed, 9 Sep 2009 18:55:10 +0000 (UTC) Cc: emacs-devel@gnu.org To: Stefan Monnier Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Sep 09 20:55:02 2009 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1MlSJp-0003BD-MS for ged-emacs-devel@m.gmane.org; Wed, 09 Sep 2009 20:55:02 +0200 Original-Received: from localhost ([127.0.0.1]:50436 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MlSJp-0006A4-3s for ged-emacs-devel@m.gmane.org; Wed, 09 Sep 2009 14:55:01 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1MlSJj-00069s-3Q for emacs-devel@gnu.org; Wed, 09 Sep 2009 14:54:55 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1MlSJe-00068m-Hp for emacs-devel@gnu.org; Wed, 09 Sep 2009 14:54:54 -0400 Original-Received: from [199.232.76.173] (port=40935 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MlSJe-00068b-Ag for emacs-devel@gnu.org; Wed, 09 Sep 2009 14:54:50 -0400 Original-Received: from ppsw-6.csi.cam.ac.uk ([131.111.8.136]:41990) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1MlSJd-0007hY-FA for emacs-devel@gnu.org; Wed, 09 Sep 2009 14:54:49 -0400 X-Cam-AntiVirus: no malware found X-Cam-SpamDetails: not scanned X-Cam-ScannerInfo: http://www.cam.ac.uk/cs/email/scanner/ Original-Received: from smaug.linux.pwf.cam.ac.uk ([193.60.95.72]:36608) by ppsw-6.csi.cam.ac.uk (smtp.hermes.cam.ac.uk [131.111.8.156]:587) with esmtpsa (LOGIN:sl392) (TLSv1:DHE-RSA-AES128-SHA:128) id 1MlSJc-0000Lu-Kh (Exim 4.70) (return-path ); Wed, 09 Sep 2009 19:54:48 +0100 In-Reply-To: (Stefan Monnier's message of "Wed, 09 Sep 2009 10:26:56 -0400") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.0.60 (gnu/linux) X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6, seldom 2.4 (older, 4) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:115168 Archived-At: On 2009-09-09 15:26 +0100, Stefan Monnier wrote: >> A wild guess might be it is a bug in the ns port. > > Could be, but it seems rather unlikely. > >>> M-: (format-mode-line minor-mode-alist) RET >> With overwrite-mode enabled, that returns: >> " Paredit" in the scratch buffer. > > This code should be pretty much 100% platform independent. > So, please do M-x ielm > and then in this read-eval-print interactive loop, make sure > overwrite-mode is not nil, and then play around with > > (format-mode-line minor-mode-alist) > > e.g. start with > > (format-mode-line '((overwrite-mode overwrite-mode))) > > and if this one returns " Ovwrt" as it should, then add elements from > minor-mode-alist little by little (ideally, using a bisection-search, aka > binary-search) until you find what gets in the way. This is the smallest list I can reproduce the problem. If I delete any of them, it returns " Paredit Ovwrt". (format-mode-line '((org-cdlatex-mode " OCDL") (orgstruct-mode " OrgStruct") (vc-parent-buffer vc-parent-buffer-name) (dired-omit-mode (:eval (if (eq major-mode 'dired-mode) " Omit" ""))) (gnus-dired-mode "") (snippet-mode " Snip") (compilation-in-progress " Compiling") (w3m-form-input-textarea-mode " w3m form textarea") (w3m-bookmark-mode " bookmark") (w3m-minor-mode " w3m") (doc-view-minor-mode " DocView") (image-minor-mode (:eval (format " Image[%s]" image-type))) (reftex-mode " Ref") (outline-minor-mode " Outl") (TeX-interactive-mode "") (TeX-PDF-mode "") (slime-fuzzy-target-buffer-completions-mode " Fuzzy Target Buffer Completions") (slime-repl-read-mode "[read]") (slime-macroexpansion-minor-mode " Macroexpand") (slime-edit-value-mode " Edit-Value") (slime-popup-buffer-mode (" Slime-Tmp" slime-modeline-string)) (slime-mode (" Slime" slime-modeline-string)) (hs-minor-mode " hs") (global-whitespace-newline-mode " NL") (global-whitespace-mode " WS") (whitespace-newline-mode " nl") (whitespace-mode " ws") (diff-minor-mode " Diff") (gnus-topic-mode " Topic") (gnus-undo-mode "") (paredit-mode " Paredit") (scratch-pad-mode " draft") (type-break-mode-line-message-mode ("" type-break-mode-line-break-message type-break-mode-line-warning)) (savehist-mode "") (server-buffer-clients " Server") (global-auto-revert-mode global-auto-revert-mode-text) (auto-revert-tail-mode auto-revert-tail-mode-text) (auto-revert-mode auto-revert-mode-text) (view-mode #(" View" 0 5 (help-echo "mouse-3: minor mode menu" local-map (keymap (header-line keymap (down-mouse-3 keymap (reftex-mode menu-item "RefTeX Mode" reftex-mode :button (:toggle . reftex-mode)) (abbrev-mode menu-item "Abbrev (Abbrev)" abbrev-mode :help "Automatically expand abbreviations" :button (:toggle . abbrev-mode)) (auto-fill-mode menu-item "Auto fill (Fill)" auto-fill-mode :help "Automatically insert new lines" :button (:toggle . auto-fill-function)) (auto-revert-mode menu-item "Auto revert (ARev)" auto-revert-mode :help "Revert the buffer when the file on disk changes" :button (:toggle bound-and-true-p auto-revert-mode)) (auto-revert-tail-mode menu-item "Auto revert tail (Tail)" auto-revert-tail-mode :help "Revert the tail of the buffer when buffer grows" :enable (buffer-file-name) :button (:toggle bound-and-true-p auto-revert-tail-mode)) (flyspell-mode menu-item "Flyspell (Fly)" flyspell-mode :help "Spell checking on the fly" :button (:toggle bound-and-true-p flyspell-mode)) (font-lock-mode menu-item "Font Lock" font-lock-mode :help "Syntax coloring" :button (:toggle . font-lock-mode)) (glasses-mode menu-item "Glasses (o^o)" glasses-mode :help "Insert virtual separators to make long identifiers easy to read" :button (:toggle bound-and-true-p glasses-mode)) (hide-ifdef-mode menu-item "Hide ifdef (Ifdef)" hide-ifdef-mode :help "Show/Hide code within #ifdef constructs" :button (:toggle bound-and-true-p hide-ifdef-mode)) (highlight-changes-mode menu-item "Highlight changes (Chg)" highlight-changes-mode :help "Show changes in the buffer in a distinctive color" :button (:toggle bound-and-true-p highlight-changes-mode)) (outline-minor-mode menu-item "Outline (Outl)" outline-minor-mode :help "" :button (:toggle bound-and-true-p outline-minor-mode)) (overwrite-mode menu-item "Overwrite (Ovwrt)" overwrite-mode :help "Overwrite mode: typed characters replace existing text" :button (:toggle . overwrite-mode)) "Minor Modes")) (mode-line keymap (down-mouse-3 keymap (reftex-mode menu-item "RefTeX Mode" reftex-mode :button (:toggle . reftex-mode)) (abbrev-mode menu-item "Abbrev (Abbrev)" abbrev-mode :help "Automatically expand abbreviations" :button (:toggle . abbrev-mode)) (auto-fill-mode menu-item "Auto fill (Fill)" auto-fill-mode :help "Automatically insert new lines" :button (:toggle . auto-fill-function)) (auto-revert-mode menu-item "Auto revert (ARev)" auto-revert-mode :help "Revert the buffer when the file on disk changes" :button (:toggle bound-and-true-p auto-revert-mode)) (auto-revert-tail-mode menu-item "Auto revert tail (Tail)" auto-revert-tail-mode :help "Revert the tail of the buffer when buffer grows" :enable (buffer-file-name) :button (:toggle bound-and-true-p auto-revert-tail-mode)) (flyspell-mode menu-item "Flyspell (Fly)" flyspell-mode :help "Spell checking on the fly" :button (:toggle bound-and-true-p flyspell-mode)) (font-lock-mode menu-item "Font Lock" font-lock-mode :help "Syntax coloring" :button (:toggle . font-lock-mode)) (glasses-mode menu-item "Glasses (o^o)" glasses-mode :help "Insert virtual separators to make long identifiers easy to read" :button (:toggle bound-and-true-p glasses-mode)) (hide-ifdef-mode menu-item "Hide ifdef (Ifdef)" hide-ifdef-mode :help "Show/Hide code within #ifdef constructs" :button (:toggle bound-and-true-p hide-ifdef-mode)) (highlight-changes-mode menu-item "Highlight changes (Chg)" highlight-changes-mode :help "Show changes in the buffer in a distinctive color" :button (:toggle bound-and-true-p highlight-changes-mode)) (outline-minor-mode menu-item "Outline (Outl)" outline-minor-mode :help "" :button (:toggle bound-and-true-p outline-minor-mode)) (overwrite-mode menu-item "Overwrite (Ovwrt)" overwrite-mode :help "Overwrite mode: typed characters replace existing text" :button (:toggle . overwrite-mode)) "Minor Modes") (mouse-2 . mode-line-minor-mode-help) (down-mouse-1 . mouse-minor-mode-menu)))))) (rcirc-omit-mode " Omit") (rcirc-low-priority-flag " LowPri") (rcirc-ignore-buffer-activity-flag " Ignore") (rcirc-track-minor-mode "") (rcirc-multiline-minor-mode " rcirc-mline") (visible-mode " Vis") (global-visual-line-mode " vl") (visual-line-mode " wrap") (next-error-follow-minor-mode " Fol") (abbrev-mode " Abbrev") (overwrite-mode overwrite-mode))) > Stefan -- Leo's Emacs uptime: 32 minutes, 17 seconds