Org-mode version 6.32b; shift-tab configured wrong in xemacs

Org-mode version 6.32b; shift-tab configured wrong in xemacs

[Kevin Haddock]

Please take note:

I think this patch will fix the problem:

*** org.el	Thu Nov 26 18:08:57 2009
--- org.el.orig	Thu Nov 26 18:08:23 2009
***************
*** 14416,14423 ****
  (org-defkey org-mode-map "\M-\t" 'org-complete)
  (org-defkey org-mode-map "\M-\C-i"      'org-complete)
  ;; The following line is necessary under Suse GNU/Linux
! (if (featurep 'xemacs)
!   (org-defkey org-mode-map [iso-left-tab]  'org-shifttab))
  (org-defkey org-mode-map [(shift tab)]    'org-shifttab)
  (define-key org-mode-map [backtab] 'org-shifttab)
  
--- 14416,14423 ----
  (org-defkey org-mode-map "\M-\t" 'org-complete)
  (org-defkey org-mode-map "\M-\C-i"      'org-complete)
  ;; The following line is necessary under Suse GNU/Linux
! (unless (featurep 'xemacs)
!   (org-defkey org-mode-map [S-iso-lefttab]  'org-shifttab))
  (org-defkey org-mode-map [(shift tab)]    'org-shifttab)
  (define-key org-mode-map [backtab] 'org-shifttab)


-----end patch----

Emacs  : XEmacs 21.5  (beta29) "garbanzo" [Lucid] (i686-pc-linux, Mule) of Wed Nov 11 2009 on beta
Package: Org-mode version 6.32b



current state:
==============
(setq
 org-src-mode-hook '(org-src-mode-configure-edit-buffer)
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-lines
		  org-optimize-window-after-visibility-change)
 org-mode-hook '((lambda nil
		  (org-add-hook (quote change-major-mode-hook) (quote org-show-block-all) (quote append)
		   (quote local))
		  )
		 #<compiled-function nil "...(7)"
		 [org-add-hook change-major-mode-hook org-show-block-all append local] 5>)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-confirm-shell-link-function 'yes-or-no-p
 org-agenda-files '("~/.00-org/mgmt.org" "~/.00-org/ent.org" "~/.00-org/prod.org")
 org-tab-first-hook '(org-hide-block-toggle-maybe)
 org-export-preprocess-hook '(org-export-blocks-preprocess)
 org-occur-hook '(org-first-headline-recenter)
 )



-Kevin

-----

People originally thought the eternal question was:

      "Why am I here?"

But now we know the question is actually:

      "Why is THAT THERE?"

-Me


      

Re: Org-mode version 6.32b; shift-tab configured wrong in xemacs

[Carsten Dominik]

Hi Kevin,

this is already corrected in the current version.

- Carsten

On Nov 27, 2009, at 3:12 AM, Kevin Haddock wrote:

> Please take note:
>
> I think this patch will fix the problem:
>
> *** org.el	Thu Nov 26 18:08:57 2009
> --- org.el.orig	Thu Nov 26 18:08:23 2009
> ***************
> *** 14416,14423 ****
>  (org-defkey org-mode-map "\M-\t" 'org-complete)
>  (org-defkey org-mode-map "\M-\C-i"      'org-complete)
>  ;; The following line is necessary under Suse GNU/Linux
> ! (if (featurep 'xemacs)
> !   (org-defkey org-mode-map [iso-left-tab]  'org-shifttab))
>  (org-defkey org-mode-map [(shift tab)]    'org-shifttab)
>  (define-key org-mode-map [backtab] 'org-shifttab)
>
> --- 14416,14423 ----
>  (org-defkey org-mode-map "\M-\t" 'org-complete)
>  (org-defkey org-mode-map "\M-\C-i"      'org-complete)
>  ;; The following line is necessary under Suse GNU/Linux
> ! (unless (featurep 'xemacs)
> !   (org-defkey org-mode-map [S-iso-lefttab]  'org-shifttab))
>  (org-defkey org-mode-map [(shift tab)]    'org-shifttab)
>  (define-key org-mode-map [backtab] 'org-shifttab)
>
>
> -----end patch----
>
> Emacs  : XEmacs 21.5  (beta29) "garbanzo" [Lucid] (i686-pc-linux,  
> Mule) of Wed Nov 11 2009 on beta
> Package: Org-mode version 6.32b
>
>
>
> current state:
> ==============
> (setq
> org-src-mode-hook '(org-src-mode-configure-edit-buffer)
> org-after-todo-state-change-hook '(org-clock-out-if-current)
> org-agenda-before-write-hook '(org-agenda-add-entry-text)
> org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide- 
> drawers org-cycle-show-empty-lines
> 		  org-optimize-window-after-visibility-change)
> org-mode-hook '((lambda nil
> 		  (org-add-hook (quote change-major-mode-hook) (quote org-show- 
> block-all) (quote append)
> 		   (quote local))
> 		  )
> 		 #<compiled-function nil "...(7)"
> 		 [org-add-hook change-major-mode-hook org-show-block-all append  
> local] 5>)
> org-confirm-elisp-link-function 'yes-or-no-p
> org-confirm-shell-link-function 'yes-or-no-p
> org-agenda-files '("~/.00-org/mgmt.org" "~/.00-org/ent.org" "~/.00- 
> org/prod.org")
> org-tab-first-hook '(org-hide-block-toggle-maybe)
> org-export-preprocess-hook '(org-export-blocks-preprocess)
> org-occur-hook '(org-first-headline-recenter)
> )
>
>
>
> -Kevin
>
> -----
>
> People originally thought the eternal question was:
>
>      "Why am I here?"
>
> But now we know the question is actually:
>
>      "Why is THAT THERE?"
>
> -Me
>
>
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode

- Carsten