emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Orgmode] git and possibly 6.30 xemacs bug


From: Carsten Dominik
Subject: Re: [Orgmode] git and possibly 6.30 xemacs bug
Date: Wed, 2 Sep 2009 11:33:50 +0200

Hi Wes,

I have included this fix into Org as well, thanks.

- Carsten

On Sep 1, 2009, at 4:30 PM, Wes Hardaker wrote:


The select-frame-set-input-focus function doesn't exist in xemacs, which
was recently added in org-eval-in-calendar.  This seems to be a common
problem as gnus defines this to get around it:

(defun gnus-select-frame-set-input-focus (frame)
 "Select FRAME, raise it, and set input focus, if possible."
 (cond ((featurep 'xemacs)
         (if (fboundp 'select-frame-set-input-focus)
             (select-frame-set-input-focus frame)
           (raise-frame frame)
           (select-frame frame)
           (focus-frame frame)))
        ;; `select-frame-set-input-focus' defined in Emacs 21 will not
        ;; set the input focus.
        ((>= emacs-major-version 22)
         (select-frame-set-input-focus frame))
        (t
         (raise-frame frame)
         (select-frame frame)
         (cond ((memq window-system '(x ns mac))
                (x-focus-frame frame))
               ((eq window-system 'w32)
                (w32-focus-frame frame)))
         (when focus-follows-mouse
           (set-mouse-position frame (1- (frame-width frame)) 0)))))

--
\ Wes Hardaker http://pontifications.hardakers.net / \_____ "In the bathtub of history the truth is harder to hold than ________/
      \_______ the soap, and much more difficult to find." _______/
              \_________ -- Terry Pratchett ______________/
                        \__________________/


_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-orgmode





reply via email to

[Prev in Thread] Current Thread [Next in Thread]