Re: [O] face-at-point

2013-06-15 Thread Michael Sperber

Uwe Brauer o...@mat.ucm.es writes:

 The issue is that org-7 shipped its own outline version for org mode
 called noutline, I don't know why it disappear, so I simply copied
 noutline into the org-8 directory added a 
 (require 'noutline)
 to org.el 

That's because XEmacs's outline.el is now what used to be noutline.el.
(It has been for about 3 years.)  So you can just require outline.el.

-- 
Regards,
Mike




Re: [O] XEmacs and ert

2012-09-01 Thread Michael Sperber

Achim Gratz strom...@nexgo.de writes:

 Michael Sperber writes:
 I've attached a patch (1 out of 3) that's minimally needed to make
 the current org-mode work on XEmacs.

 While we have you here… Do you know of a version of ert that is
 compatible with XEmacs?  The roadblock I've run into is that ert uses
 button and XEmacs doesn't seem to have it.  It wouldn't really be
 needed for batch mode testing I think, but I haven't found out how to
 work around it.

I don't.  But that question is better asked on xemacs-beta.  If there's
interest, maybe someone will pick it up.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla



[O] PATCH[1/3]: Activate `org-self-insert-cluster-for-undo' in XEmacs

2012-08-30 Thread Michael Sperber

I've attached a patch (1 out of 3) that's minimally needed to make
the current org-mode work on XEmacs.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
From c3496d038b46d0fb633753fa67b8f2f7e326999e Mon Sep 17 00:00:00 2001
From: Mike Sperber sper...@deinprogramm.de
Date: Sat, 25 Aug 2012 17:35:35 +0200
Subject: [PATCH 1/3] XEmacs: Default `org-self-insert-cluster-for-undo' also on XEmacs.

2012-08-25  Michael Sperber  m...@xemacs.org

	* org.el (org-self-insert-cluster-for-undo): Default
	`org-self-insert-cluster-for-undo' also on XEmacs.
---
 lisp/org.el |3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index 96b5584..98bebba 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -1281,7 +1281,8 @@ See also the variable `org-table-auto-blank-field'.
 	  (const :tag on t)
 	  (const :tag on, optimized optimized)))
 
-(defcustom org-self-insert-cluster-for-undo (version= emacs-version 24.1)
+(defcustom org-self-insert-cluster-for-undo (or (featurep 'xemacs)
+		(version= emacs-version 24.1))
   Non-nil means cluster self-insert commands for undo when possible.
 If this is set, then, like in the Emacs command loop, 20 consecutive
 characters will be undone together.
-- 
1.7.0.5



[O] PATCH[2/3]: Make call to `fill-paragraph' work on XEmacs.

2012-08-30 Thread Michael Sperber

Attached is patch #2 needed to make the current org-mode work on XEmacs.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
From c3496d038b46d0fb633753fa67b8f2f7e326999e Mon Sep 17 00:00:00 2001
From: Mike Sperber sper...@deinprogramm.de
Date: Sat, 25 Aug 2012 17:35:35 +0200
Subject: [PATCH 1/3] XEmacs: Default `org-self-insert-cluster-for-undo' also on XEmacs.

2012-08-25  Michael Sperber  m...@xemacs.org

	* org.el (org-self-insert-cluster-for-undo): Default
	`org-self-insert-cluster-for-undo' also on XEmacs.
---
 lisp/org.el |3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index 96b5584..98bebba 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -1281,7 +1281,8 @@ See also the variable `org-table-auto-blank-field'.
 	  (const :tag on t)
 	  (const :tag on, optimized optimized)))
 
-(defcustom org-self-insert-cluster-for-undo (version= emacs-version 24.1)
+(defcustom org-self-insert-cluster-for-undo (or (featurep 'xemacs)
+		(version= emacs-version 24.1))
   Non-nil means cluster self-insert commands for undo when possible.
 If this is set, then, like in the Emacs command loop, 20 consecutive
 characters will be undone together.
-- 
1.7.0.5



[O] PATCH[3/3]: org-element.el: Remove illegal t clause in case

2012-08-30 Thread Michael Sperber

This patch (written by Mats Lidell) fixes an error we saw on XEmacs, but
we think it's a bug on GNU Emacs, too.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
From 516456845f93d2ef7f05c6f7789f8ff4e368f6f6 Mon Sep 17 00:00:00 2001
From: Mats Lidell ma...@xemacs.org
Date: Sun, 26 Aug 2012 22:24:15 +0200
Subject: [PATCH 3/3] org-element.el: Remove illegal t clause in case

* lisp/org-element.el (org-element-paragraph-separate): Remove illegal
  t clause in case.
---
 lisp/org-element.el |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/lisp/org-element.el b/lisp/org-element.el
index 3bf217d..4aeb74c 100644
--- a/lisp/org-element.el
+++ b/lisp/org-element.el
@@ -149,7 +149,7 @@
   \\|
   ;; Lists.
   (let ((term (case org-plain-list-ordered-item-terminator
-(t [.)]) (?\) )) (?. \\.) (otherwise [.)])))
+(?\) )) (?. \\.) (otherwise [.)])))
 (alpha (and org-alphabetical-lists \\|[A-Za-z])))
 (concat \\(?:[-+*]\\|\\(?:[0-9]+ alpha \\) term \\)
 \\(?:[ \t]\\|$\\)))
-- 
1.7.0.5



[O] PATCH[2/3]: Make call to `fill-paragraph' work on XEmacs. [THIS IS THE PATCH]

2012-08-30 Thread Michael Sperber

Sorry, I included the wrong patch.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
From 0c684c748c7548f5b70cc6231ef68818d15df49d Mon Sep 17 00:00:00 2001
From: Mike Sperber sper...@deinprogramm.de
Date: Sat, 25 Aug 2012 17:36:18 +0200
Subject: [PATCH 2/3] XEmacs: Make call to `fill-paragraph' work on XEmacs.

2012-08-25  Michael Sperber  m...@xemacs.org
	(org-fill-paragraph): Pass optional argument to
	`fill-paragraph', which is mandatory for XEmacs.
---
 lisp/org.el |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index 98bebba..4d6acd8 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -21057,7 +21057,7 @@ a footnote definition, try to fill the first paragraph within.
 	(paragraph-start (cadadr (assoc 'paragraph-start org-fb-vars)))
 	(paragraph-separate
 	 (cadadr (assoc 'paragraph-separate org-fb-vars
-	(fill-paragraph))
+	(fill-paragraph nil))
 (save-excursion
   ;; Move to end of line in order to get the first paragraph within
   ;; a plain list or a footnote definition.
-- 
1.7.0.5



Re: [O] PATCH[3/3]: org-element.el: Remove illegal t clause in case

2012-08-30 Thread Michael Sperber

Bastien b...@altern.org writes:

 Hi Michael and Mats,

 Michael Sperber sper...@deinprogramm.de writes:

 This patch (written by Mats Lidell) fixes an error we saw on XEmacs, but
 we think it's a bug on GNU Emacs, too.

 Thank you both for the patch!  I just applied it.

 I changed the commit log.  At least in GNU Emacs, t is allowed, 
 but only as the last clause.

 See the docstring of `case':

[...]
A KEYLIST of t or `otherwise' is
allowed only in the final clause, and matches if no other keys match.
Key values are compared by `eql'.

 I guess this is the same for XEmacs, would be strange otherwise.

Yup, you're right.

Thanks for applying the patches.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla



Re: [O] missing autoloads / (void-variable org-version)

2012-04-29 Thread Michael Sperber

Bastien b...@gnu.org writes:

 Achim Gratz strom...@nexgo.de writes:

 Bastien writes:
 There is a fix that makes the new Makefile compatible with everyone's
 configuration *without* requiring to add the version number directly in
 the org.el file.  I'm discussing it with Achim and will commit it as
 soon as possible.

 Towards that end, I can test Emacs23 and Emacs24 on Linux.  Anyone still
 using XEmacs and willing to check that everything keeps working there?

 Michael Sperber is our XEmacs fairy around, hopefully he we be able to 
 test the patch.

Yes.  I've also had to apply a few fixes to make the current XEmacs
work.  I intend to send a new batch of patches in two weeks or so, once
everything has settled down on my end.  (Until then, I'm quite swamped.
If I don't answer e-mail in that timeframe, please don't assume I'm not
interested.)

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla



[O] Only use `visual-line-mode if it's bound`[WAS: Current patches for XEmacs]

2012-04-07 Thread Michael Sperber

Bastien b...@gnu.org writes:

 Can you send each patch in a separate email using 
 `git format-patch'?

Attached.  The second one will follow shortly.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
From 18a83ce61fb420e85987e77f8506c01023a22c16 Mon Sep 17 00:00:00 2001
From: Mike Sperber sper...@deinprogramm.de
Date: Wed, 4 Apr 2012 09:48:05 +0200
Subject: [PATCH] Only use `visual-line-mode' if it's bound.

* org.el (org-kill-line): Access `visual-line-mode' only if it's
bound.
---
 lisp/org.el |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index b83700f..8d9d793 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -20793,7 +20793,7 @@ depending on context.
(not (y-or-n-p Kill hidden subtree along with headline? )))
(error C-k aborted - would kill hidden subtree)))
 (call-interactively
- (if visual-line-mode 'kill-visual-line 'kill-line)))
+ (if (and (boundp 'visual-line-mode) visual-line-mode) 'kill-visual-line 
'kill-line)))
((looking-at (org-re .*?\\S-\\([ \t]+\\(:[[:alnum:]_@#%:]+:\\)\\)[ \t]*$))
 (kill-region (point) (match-beginning 1))
 (org-set-tags nil t))
-- 
1.7.0.5



[O] Fix bug in `org-footnote-normalize' [WAS: Current patches for XEmacs]

2012-04-07 Thread Michael Sperber

Bastien b...@gnu.org writes:

 Can you send each patch in a separate email using 
 `git format-patch'?

Here's the second one.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
From b088bfff32d024ec67fcf8ee0812244128198d93 Mon Sep 17 00:00:00 2001
From: Mike Sperber sper...@deinprogramm.de
Date: Wed, 4 Apr 2012 09:21:44 +0200
Subject: [PATCH 1/2] Fix bug ion `org-footnote-normalize'.

* org-footnote.el (org-footnote-normalize): Correctly pass keyword
arguments to `org-export-preprocess-string'.
---
 lisp/org-footnote.el |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/lisp/org-footnote.el b/lisp/org-footnote.el
index 03b95d0..1987779 100644
--- a/lisp/org-footnote.el
+++ b/lisp/org-footnote.el
@@ -705,7 +705,7 @@ Additional note on 
`org-footnote-insert-pos-for-preprocessor':
 (org-combine-plists
  export-props
  '(:todo-keywords t :tags t :priority t
-   (org-export-preprocess-string def parameters))
+   (apply #'org-export-preprocess-string def 
parameters))
def)
  ;; Reference beginning position is a marker
  ;; to preserve it during further buffer
-- 
1.7.0.5



[O] Current patches for XEmacs

2012-04-05 Thread Michael Sperber

https://github.com/mikesperber/org-mode

has two patches for org-mode that are needed to get org-mode
superficially working on XEmacs:

https://github.com/mikesperber/org-mode/commit/18a83ce61fb420e85987e77f8506c01023a22c16

* org.el (org-kill-line): Access `visual-line-mode' only if it's
bound.

https://github.com/mikesperber/org-mode/commit/b088bfff32d024ec67fcf8ee0812244128198d93

* org-footnote.el (org-footnote-normalize): Correctly pass keyword
arguments to `org-export-preprocess-string'.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla




Re: [O] org-capture and XEmacs, indenting too far

2011-10-23 Thread Michael Sperber

Michael Sperber sper...@deinprogramm.de writes:

 Robert Pluim rpl...@gmail.com writes:

 Hi, I'm using XEmacs 21.5  (beta29) garbanzo d27c1ee1943b+ [Lucid]
 (i686-pc-cygwin, Mule) of Mon Oct 18 2010 on RPluim, with the following
 org-capture-templates

 ((t Todo entry (file+headline ~/org/notes.org Tasks) * TODO %?))

 The problem is that for some reason the resulting TODO heading is has 2
 extra spaces, and is placed at too deep a level, giving:

 * Tasks
 ***   TODO a task

 I've tested this on a fairly recent emacs24 build, and everything works
 fine there, so this is probably something XEmacs specific.  Can anyone
 suggest any way to track this down (I'd bisect, but I've yet to find a
 'good' version)?

 I finally got around to looking into this: The reason is that, in
 org-capture mode, `outline-level' is bound to outline.el's function,

Looking at this again, my analysis was stupid: The problem is that the
indirect buffer used for capture is not in org-mode at all, and that is
indeed an XEmacs-specific problem, as `make-indirect-buffer' does not
accept the 'clone argument on XEmacs.  I therefore retract the rubbish I
sent earlier and suggest this one instead:

diff --git a/lisp/ob-calc.el b/lisp/ob-calc.el
index 14d7d5d..44ed82b 100644
--- a/lisp/ob-calc.el
+++ b/lisp/ob-calc.el
@@ -28,7 +28,6 @@
 ;;; Code:
 (require 'ob)
 (require 'calc)
-(require 'calc-store)
 (unless (featurep 'xemacs)
   (require 'calc-trail)
   (require 'calc-store))
diff --git a/lisp/org-capture.el b/lisp/org-capture.el
index e1b8a4f..fa9895f 100644
--- a/lisp/org-capture.el
+++ b/lisp/org-capture.el
@@ -848,6 +848,7 @@ it.  When it is a variable, retrieve the value.  Return 
whatever we get.
   (goto-char (org-capture-get :pos))
   (org-set-local 'org-capture-target-marker
 (move-marker (make-marker) (point)))
+  (org-set-local 'outline-level 'org-outline-level)
   (let* ((template (org-capture-get :template))
 (type (org-capture-get :type)))
 (case type
@@ -1213,7 +1214,10 @@ Use PREFIX as a prefix for the name of the indirect 
buffer.
   (setq bname (concat prefix - (number-to-string (incf n)) - base)))
 (condition-case nil
 (make-indirect-buffer buffer bname 'clone)
-  (error (make-indirect-buffer buffer bname)
+  (error 
+   (let ((buf (make-indirect-buffer buffer bname)))
+(with-current-buffer buf (org-mode))
+buf)
 
 
 (defun org-capture-verify-tree (tree)

Sorry about the snafu.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla



Re: [O] Current patches to make org-mode run on XEmacs

2011-10-22 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 Hi Michael,

 I have checked these in, with the following exceptions:

Thanks.  One bit slipped through:

diff --git a/lisp/ob-calc.el b/lisp/ob-calc.el
index 14d7d5d..44ed82b 100644
--- a/lisp/ob-calc.el
+++ b/lisp/ob-calc.el
@@ -28,7 +28,6 @@
 ;;; Code:
 (require 'ob)
 (require 'calc)
-(require 'calc-store)
 (unless (featurep 'xemacs)
   (require 'calc-trail)
   (require 'calc-store))

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla



Re: [O] org-capture and XEmacs, indenting too far

2011-10-22 Thread Michael Sperber

Robert Pluim rpl...@gmail.com writes:

 Hi, I'm using XEmacs 21.5  (beta29) garbanzo d27c1ee1943b+ [Lucid]
 (i686-pc-cygwin, Mule) of Mon Oct 18 2010 on RPluim, with the following
 org-capture-templates

 ((t Todo entry (file+headline ~/org/notes.org Tasks) * TODO %?))

 The problem is that for some reason the resulting TODO heading is has 2
 extra spaces, and is placed at too deep a level, giving:

 * Tasks
 ***   TODO a task

 I've tested this on a fairly recent emacs24 build, and everything works
 fine there, so this is probably something XEmacs specific.  Can anyone
 suggest any way to track this down (I'd bisect, but I've yet to find a
 'good' version)?

I finally got around to looking into this: The reason is that, in
org-capture mode, `outline-level' is bound to outline.el's function,
which is off by one compared to org-mode's.  I used this patch to fix
it:

diff --git a/lisp/org-capture.el b/lisp/org-capture.el
index e1b8a4f..cfa35d5 100644
--- a/lisp/org-capture.el
+++ b/lisp/org-capture.el
@@ -848,6 +848,7 @@ it.  When it is a variable, retrieve the value.  Return 
whatever we get.
   (goto-char (org-capture-get :pos))
   (org-set-local 'org-capture-target-marker
 (move-marker (make-marker) (point)))
+  (org-set-local 'outline-level 'org-outline-level)
   (let* ((template (org-capture-get :template))
 (type (org-capture-get :type)))
 (case type

Could somebody review and maybe apply this?

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla



[O] Current patches to make org-mode run on XEmacs

2011-08-31 Thread Michael Sperber

... are attached.  I've run with this for a few weeks now, and what I
use mostly works.  So I would appreciate if these could go into the git
repo.

Let me draw your attention to this hunk:

--- a/lisp/org.el
+++ b/lisp/org.el
@@ -7360,7 +7360,7 @@ would end up with no indentation after the change, 
nothing at all is done.
   col)
   (while (re-search-forward
  (concat \\( (regexp-opt org-all-time-keywords)
- \\| ^[ \t]* org-tsr-regexp-both *$
+ \\| ^[ \t]* org-tsr-regexp-both $
  \\| ^[ \t]*:[a-zA-Z][a-zA-Z0-9_]*:.*$
  \\)) (or drawer-end end) t)
(beginning-of-line)

While I needed this to make the code run on XEmacs, it really looks like
a bug fix to me: The * that I deleted makes that part of the
disjunction match the empty string, and that makes
`org-fixup-indentation' loop infinitely.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
diff --git a/lisp/ob-calc.el b/lisp/ob-calc.el
index 45d9441..b246636 100644
--- a/lisp/ob-calc.el
+++ b/lisp/ob-calc.el
@@ -28,8 +28,9 @@
 ;;; Code:
 (require 'ob)
 (require 'calc)
-(require 'calc-store)
-(unless (featurep 'xemacs) (require 'calc-trail))
+(unless (featurep 'xemacs) 
+  (require 'calc-trail)
+  (require 'calc-store))
 (eval-when-compile (require 'ob-comint))
 
 (defvar org-babel-default-header-args:calc nil
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index b1fa5f5..7e4da31 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -4306,8 +4306,8 @@ of what a project is and how to check if it stuck, 
customize the variable
  \\)\\))
 (tags (nth 2 org-stuck-projects))
 (tags-re (if (member * tags)
- (org-re (concat org-outline-regexp-bol
- .*:[[:alnum:]_@#%]+:[ \t]*$))
+ (concat org-outline-regexp-bol
+ (org-ref .*:[[:alnum:]_@#%]+:[ \t]*$))
(if tags
(concat org-outline-regexp-bol
.*:\\(
diff --git a/lisp/org-compat.el b/lisp/org-compat.el
index 3e9c202..d093700 100644
--- a/lisp/org-compat.el
+++ b/lisp/org-compat.el
@@ -251,8 +251,11 @@ Works on both Emacs and XEmacs.
   (defun org-activate-mark ()
 (when (mark t)
   (setq mark-active t)
-  (unless transient-mark-mode
-   (setq transient-mark-mode 'lambda)
+  (when (and (boundp 'transient-mark-mode)
+(not transient-mark-mode))
+   (setq transient-mark-mode 'lambda))
+  (when (boundp 'zmacs-regions)
+   (setq zmacs-regions t)
 
 ;; Invisibility compatibility
 
diff --git a/lisp/org-exp.el b/lisp/org-exp.el
index f795fbd..43752ca 100644
--- a/lisp/org-exp.el
+++ b/lisp/org-exp.el
@@ -1028,7 +1028,8 @@ Pressing `1' will switch between these two options.
  (setq r1 (read-char-exclusive)))
  (error No enclosing node with LaTeX_CLASS or EXPORT_TITLE or 
EXPORT_FILE_NAME)
  )
-(redisplay)
+(if (fboundp 'redisplay)
+   (redisplay))
 (and bpos (goto-char bpos))
 (setq r2 (if ( r1 27) (+ r1 96) r1))
 (unless (setq ass (assq r2 cmds))
diff --git a/lisp/org-footnote.el b/lisp/org-footnote.el
index 04389ef..a3bd9bf 100644
--- a/lisp/org-footnote.el
+++ b/lisp/org-footnote.el
@@ -70,13 +70,13 @@
   ;; their definition.
   ;;
   ;; `org-re' is used for regexp compatibility with XEmacs.
-  (org-re (concat \\[\\(?:
- ;; Match inline footnotes.
- fn:\\([-_[:word:]]+\\)?:\\|
- ;; Match other footnotes.
- \\(?:\\([0-9]+\\)\\]\\)\\|
- \\(fn:[-_[:word:]]+\\)
- \\)))
+  (concat (org-re \\[\\(?:)
+ ;; Match inline footnotes.
+ (org-re fn:\\([-_[:word:]]+\\)?:\\|)
+ ;; Match other footnotes.
+ (org-re \\(?:\\([0-9]+\\)\\]\\)\\|)
+ (org-re \\(fn:[-_[:word:]]+\\))
+ (org-re \\)))
   Regular expression for matching footnotes.)
 
 (defconst org-footnote-definition-re
@@ -265,10 +265,9 @@ label, start, end and definition of the footnote 
otherwise.
  (re-search-backward
   message-signature-separator nil t)
(or (and (re-search-forward
- (org-re
-  (concat org-outline-regexp-bol \\|
-  org-footnote-definition-re \\|
-  ^[ \t]*$))
+ (concat org-outline-regexp-bol \\|
+ org-footnote-definition-re \\|
+ ^[ \t]*$)
  bound 'move)
 (progn (skip-chars-forward  \t\n) 
(point-at-bol)))
(point
diff --git a/lisp/org.el 

Re: [O] xemacs error when calling org-install

2011-08-14 Thread Michael Sperber




Sebastien Vauban
wxhgmqzgwmuf-genee64ty+gs+fvcfc7...@public.gmane.org writes:

 Hi Volker and David,

 David Maus wrote:
 At Wed, 08 Dec 2010 10:06:19 +0100, Dr. Volker Zell wrote:
 Under xemacs when calling the following from org-mode-7.3 I get:

 (require 'org-install)  - Wrong number of arguments: custom-autoload, 3

 This is because xemacs defines custom-autoload only with two arguments:

 `custom-autoload' is a compiled Lisp function
   -- loaded from 
 /misc/src/release/xemacs-21.5.28-3/src/xemacs-21.5.28/lisp/custom.elc
 (custom-autoload SYMBOL LOAD)

 Documentation:
 Mark SYMBOL as autoloaded custom variable and add dependency LOAD.

 This is a problem, indeed: The autoloads in org-install.el are
 generated by the Makefile (i.e. make org-install.el).  The stable
 version of Org mode ships with a pre-generated org-install.el and
 without recreating this file with Xemacs it won't run.

 The =custom-autoload= is created only once for ob-tangle.el:

 I've tried to run my .emacs against XEmacs, and ran into the same problem.

 1. Is nobody using XEmacs with Org-mode or
 2. am I missing something big?

I'm definitely using XEmacs with org-mode, but I usually lag behind a
little bit.  The problem you're citing seems to be gone, but there are
still a number of nits XEmacs runs into when trying to run the current
org-mode.  I'm testing my current set of patches, which I'll submit as
soon as things work satisfactorily.  Let me know if you want them in
advance.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla





[O] Can I put | in a table cell?

2011-04-17 Thread Michael Sperber

SSIA.  I'm sure this is answered in an obvious place, but I couldn't
find it.  Quoting so I'd get correct export rendering would be
sufficient.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla




[O] Re: [Orgmode] [PATCH] org-agenda: rewrite mode-line

2011-03-05 Thread Michael Sperber

Bastien b...@altern.org writes:

 Hi,

 Carsten Dominik carsten.domi...@gmail.com writes:

 I like the patch, but since it is not critical it remains
 on ice until :eval is supported by XEmacs.

 Michael, it would be nice if you could put :eval into
 XEmacs so that we can use this improved code for the
 mode line.  Please make sure to let us know when this is done.

 Michael, did you had time to progress on this?  

Not yet.  But it is on my list.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla



[O] Re: xemacs21: void-variable macro-declaration-function

2011-02-28 Thread Michael Sperber

Andreas Goesele goes...@hfph.mwn.de writes:

 I had a working org-mode version 6.33trans with XEmacs 21.4.22 and
 wanted to move to a newer version. I installed org-mode 7.01g-1 0 coming
 with debian squeeze.

 But now org-mode doesn't work any more. When I open any org-mode file I
 get:

 File mode specification error: (void-variable macro-declaration-function)

`macro-declaration-function' is in XEmacs 21.5 - you should really use
that, as I'm not actively doing 21.4 support in org-mode.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla

___
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


[Orgmode] [PATCH] Fix minor glitches on XEmacs

2010-12-22 Thread Michael Sperber

I had to apply this patch to make things work on XEmacs.

First hunk: `calc-trail' does not appear to be used in `ob-calc'

Second hunk: This seems to be a genuine bug (I don't see a '+' syntax
class on GNU Emacs, either), and this is just my guess as to the fix.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
diff --git a/lisp/ob-calc.el b/lisp/ob-calc.el
index 287bad3..5263c83 100644
--- a/lisp/ob-calc.el
+++ b/lisp/ob-calc.el
@@ -29,7 +29,6 @@
 ;;; Code:
 (require 'ob)
 (require 'calc)
-(require 'calc-trail)
 (eval-when-compile (require 'ob-comint))
 
 (defvar org-babel-default-header-args:calc nil
diff --git a/lisp/org-exp.el b/lisp/org-exp.el
index 9dca4f5..6b92a7a 100644
--- a/lisp/org-exp.el
+++ b/lisp/org-exp.el
@@ -1860,7 +1860,7 @@ Also, store forcedalignment information found in such 
lines.
 (goto-char (point-min))
 (while (re-search-forward re-plain-link nil t)
   (unless (org-string-match-p
-  \\[\\[\\S+:\\S-*?\\
+  \\[\\[\\Sw+:\\S-*?\\
   (buffer-substring (point-at-bol) (match-beginning 0)))
(goto-char (1- (match-end 0)))
(org-if-unprotected-at (1+ (match-beginning 0))
___
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


Re: [Orgmode] [PATCH] org-agenda: rewrite mode-line

2010-12-21 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 Hi XEmacs users

 I am about to apply this patch, but I am still wondering
 if :eval in the mode line is working on XEmacs?

Sorry, missed that one: XEmacs does not currently have :eval.  This
might be a good reason to add it to XEmacs, but it would probably take
me a few weeks - I'm totally swamped right now.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla

___
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


Re: [Orgmode] Re: 7.01 Xemacs 21.4.22: decompose-region is not known

2010-10-25 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 On Oct 24, 2010, at 7:28 PM, Uwe Brauer wrote:

 Regarding Re: [Orgmode] Re: 7.01  Xemacs 21.4.22: decompose-
 region is not known; Carsten Dominik carsten.domi...@gmail.com
 adds:

 Hi Uwe,

 Does the latest Org-mode git version work for you now?

 For xemacs  21.4.X? No but the reason is simple the recent
 version of org does not ship the noutline file, so no
 wounder that I obtain an error message of the sort

 While compiling toplevel forms in file /home/oub/ALLES/xemacs/site-
 lisp/packages/org-mode-web/lisp/org.el:
  !! File error ((Cannot open load file noutline))
 Error occurred processing lisp/org.el: Cannot open load file:
 noutline

 You mentioned that noutline will not be shipped any more,
 but then I don't understand that error message.

 I think noutline is now in XEmacs, in some package - but I do not know
 which versions of XEmacs will/can load this package.  It should be in
 a file outline.el and provide both outline and noutline.

The new outline.el (i.e. the one that ships with the current xemacs-base
package) also works with 21.4.  But it is called outline.el, not
noutline.el.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla

___
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


Re: [Orgmode] Re: 7.01 Xemacs 21.4.22: decompose-region is not known

2010-10-25 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 But I believe you told me that this outline.el has provide statements
 for both outline and noutline, right?

Yes.  But if it's not loaded yet, you need to call it by outline.
(I.e. it's in file outline.el, not noutline.el.)

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla

___
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


[Orgmode] Re: org-freemind.el and rx

2010-10-14 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 Hi Lennart,

 I am trying to keep org-mode also workable with XEmacs.  One problem
 here is that XEmacs does not have rx.  Would you object if I replace
 the rx macro calls with the string representations of the regular
 expressions in org-freemind.el?

 Michael, an alternative would be to get rx ported to and included into
 XEmacs.  Is anything like this in the works, or would you like to look
 into this?

I think the solution is to do rx (I sure hate textual regexps) - which
is on my list, but will likely be a while.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla

___
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


Re: [Orgmode] org-babel and Xemacs incompatibilities

2010-06-07 Thread Michael Sperber

Eric Schulte schulte.e...@gmail.com writes:

 I've replaced the calls to `line-number-at-pos' with a single call to
 `count-lines'.  Is count lines (also part of simple.el) also missing
 from xemacs? 

No, `count-lines' should work.  Thanks for the other changes!

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla

___
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


Re: [Orgmode] org-babel and Xemacs incompatibilities

2010-06-07 Thread Michael Sperber

Eric Schulte schulte.e...@gmail.com writes:

 And two more

  o Symbol's function definition is void: assoc-default when trying to 
 display an image
 [...]
  o Symbol's function definition is void: make-temp-file when using 
 org-babel-dot
 [...]

Both of these are in XEmacs 21.5, but not 21.4.  As 21.4 is almost not
moving anymore, it may not be worth the effort to add them to 21.4.
(Volker would have to wait quite a while to get a 21.4 that works with
this.)  My suggestion is to leave org-mode and XEmacs 21.4 as is, and
for Volker to copy the definitions from 21.5 to his init.el.
(Attached.)  Is this acceptable?

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
(defun assoc-default (key alist optional test default)
  Find object KEY in a pseudo-alist ALIST.
ALIST is a list of conses or objects.  Each element (or the element's car,
if it is a cons) is compared with KEY by evaluating (TEST (car elt) KEY).
If that is non-nil, the element matches;
then `assoc-default' returns the element's cdr, if it is a cons,
or DEFAULT if the element is not a cons.

If no element matches, the value is nil.
If TEST is omitted or nil, `equal' is used.
  (let (found (tail alist) value)
(while (and tail (not found))
  (let ((elt (car tail)))
(when (funcall (or test 'equal) (if (consp elt) (car elt) elt) key)
  (setq found t value (if (consp elt) (cdr elt) default
  (setq tail (cdr tail)))
value))


(defun make-temp-file (prefix optional dir-flag suffix)
  Create a temporary file.
The returned file name (created by appending some random characters at the
end of PREFIX, and expanding against the return value of `temp-directory' if
necessary), is guaranteed to point to a newly created empty file.  You can
then use `write-region' to write new data into the file.

If DIR-FLAG is non-nil, create a new empty directory instead of a file.

If SUFFIX is non-nil, add that at the end of the file name.

This function is analagous to mkstemp(3) under POSIX, avoiding the race
condition between testing for the existence of the generated filename (under
POSIX with mktemp(3), under Emacs Lisp with `make-temp-name') and creating
it.
  (let ((umask (default-file-modes))
(temporary-file-directory (temp-directory))
file)
(unwind-protect
(progn
  ;; Create temp files with strict access rights.  It's easy to
  ;; loosen them later, whereas it's impossible to close the
  ;; time-window of loose permissions otherwise.
  (set-default-file-modes #o700)
  (while (condition-case ()
 (progn
   (setq file
 (make-temp-name
  (expand-file-name prefix
temporary-file-directory)))
   (if suffix
   (setq file (concat file suffix)))
   (if dir-flag
   (make-directory file)
 (write-region  nil file nil 'silent nil 'excl))
   nil)
   (file-already-exists t))
;; the file was somehow created by someone else between
;; `make-temp-name' and `write-region', let's try again.
nil)
  file)
  ;; Reset the umask.
  (set-default-file-modes umask
___
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


[Orgmode] PATCH: Xemacs incompatibilities

2010-05-24 Thread Michael Sperber

Dr. Volker Zell dr.volker.z...@oracle.com writes:

  o XEmacs 21.4 (patch 22) Instant Classic [Lucid] (i686-pc-cygwin, Mule) of 
 Sat Jan 31 2009 on vzell-de

Ah ... OK, this is a 21.4 issue.  The attached patch fixes it.

`write-contents-hooks' is not buffer-local by default in 21.4, which is
why the the hook for exiting the org-src mode gets run when anything
saved, and that checks for the mode.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
diff --git a/lisp/org-src.el b/lisp/org-src.el
index 0ac8e6c..63c749c 100644
--- a/lisp/org-src.el
+++ b/lisp/org-src.el
@@ -644,8 +644,11 @@ the language, a switch telling if the content should be in 
a single line.
  (setq buffer-file-name
(concat (buffer-file-name (marker-buffer 
org-edit-src-beg-marker))
[ (buffer-name) ]))
- (set (if (featurep 'xemacs) 'write-contents-hooks 
'write-contents-functions)
-  '(org-edit-src-save)))
+ (if (featurep 'xemacs)
+ (progn
+   (make-variable-buffer-local 'write-contents-hooks) ; needed 
only for 21.4
+   (setq write-contents-hooks '(org-edit-src-save)))
+   (setq write-contents-functions '(org-edit-src-save
   (setq buffer-read-only t
 
 (org-add-hook 'org-src-mode-hook 'org-src-mode-configure-edit-buffer)
___
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


[Orgmode] PATCH: Fix minor XEmacs compatibility issue

2010-05-24 Thread Michael Sperber

I'd appreciate if this one could be applied.  I'll fix XEmacs to accept
#Bbinary in the future, but I'd appreciate this one anyway.  Doesn't
really add complexity ...

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
diff --git a/lisp/org-id.el b/lisp/org-id.el
index 66b1790..cf61f8a 100644
--- a/lisp/org-id.el
+++ b/lisp/org-id.el
@@ -330,9 +330,9 @@ So a typical ID could look like \Org:4nd91V40HI\.
(substring rnd 13 16)
(format %x
(logior
-#B1000
+#b1000
 (logand
- #B1011
+ #b1011
  (string-to-number
   (substring rnd 16 18) 16
(substring rnd 18 20)
___
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


Re: [Orgmode] Xemacs incompatibilities

2010-05-24 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 On May 17, 2010, at 4:39 PM, Michael Sperber wrote:

 In particular, fixing the require won't be enough: org-babel-python.el
 uses `run-python' and interacts with the inferior Python, whereas
 python-mode.el defines `py-shell'.

 Should I try to abstract over the differences?

 Yes, this would be much appreciated. (I think, Eric or Dan?)

OK, I've attached a patch that makes `org-babel-python' work on XEmacs.
Most of the issues are pure XEmacs issues.  Notes:

- XEmacs doesn't have [[:digit:]] - I hope to rectify this in the
  future, but it seems there's no downside in this particular case to
  replacing by [0-9].
- XEmacs doesn't have `move-end-of-line', but does have `end-of-line'.
  I don't understand the intent of having both of these, but the code
  seems fine with `end-of-line'.
- It seems there are way too few `require's throughout org-babel.  I
  don't know if it's OK to add the ones I needed.
- `org-babel-python-evaluate' looked broken as-is: It doesn't use the
  `body' argument properly, the result is (I think) processed in the
  wrong order and not properly split into lines.  I've fixed all these,
  but a review is probably in order.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
diff --git a/contrib/babel/lisp/langs/org-babel-R.el 
b/contrib/babel/lisp/langs/org-babel-R.el
index 289c73d..c1dd67a 100644
--- a/contrib/babel/lisp/langs/org-babel-R.el
+++ b/contrib/babel/lisp/langs/org-babel-R.el
@@ -89,7 +89,7 @@ called by `org-babel-execute-src-block'.
   vars)))
 (org-babel-comint-in-buffer session
   (mapc (lambda (var)
-  (move-end-of-line 1) (insert var) (comint-send-input nil t)
+  (end-of-line 1) (insert var) (comint-send-input nil t)
   (org-babel-comint-wait-for-output session)) var-lines))
 session))
 
diff --git a/contrib/babel/lisp/langs/org-babel-octave.el 
b/contrib/babel/lisp/langs/org-babel-octave.el
index 41a5be6..6cb244f 100644
--- a/contrib/babel/lisp/langs/org-babel-octave.el
+++ b/contrib/babel/lisp/langs/org-babel-octave.el
@@ -92,7 +92,7 @@ specifying a variable of the same value.
  vars)))
 (org-babel-comint-in-buffer session
   (mapc (lambda (var)
-  (move-end-of-line 1) (insert var) (comint-send-input nil t)
+  (end-of-line 1) (insert var) (comint-send-input nil t)
   (org-babel-comint-wait-for-output session)) var-lines))
 session))
 
diff --git a/contrib/babel/lisp/langs/org-babel-python.el 
b/contrib/babel/lisp/langs/org-babel-python.el
index ea2a217..6c8e5de 100644
--- a/contrib/babel/lisp/langs/org-babel-python.el
+++ b/contrib/babel/lisp/langs/org-babel-python.el
@@ -30,6 +30,8 @@
 
 ;;; Code:
 (require 'org-babel)
+(require 'org-babel-tangle)
+(require 'org-babel-comint)
 (require (if (featurep 'xemacs) 'python-mode 'python))
 
 (org-babel-add-interpreter python)
@@ -75,7 +77,7 @@ called by `org-babel-execute-src-block'.
  vars)))
 (org-babel-comint-in-buffer session
   (mapc (lambda (var)
-  (move-end-of-line 1) (insert var) (comint-send-input nil t)
+  (end-of-line 1) (insert var) (comint-send-input)
   (org-babel-comint-wait-for-output session)) var-lines))
 session))
 
@@ -123,7 +125,21 @@ then create.  Return the initialized session.
   (save-window-excursion
 (let* ((session (if session (intern session) :default))
(python-buffer (org-babel-python-session-buffer session)))
-  (run-python)
+  (cond
+   ((fboundp 'run-python) ; python.el
+   (run-python))
+   ((fboundp 'py-shell) ; python-mode.el
+   ;; `py-shell' creates a buffer whose name is the value of
+   ;; `py-which-bufname' with '*'s at the beginning and end
+   (let* ((bufname (if python-buffer
+   (replace-regexp-in-string ^\\*\\([^*]+\\)\\*$ 
\\1 python-buffer) ; zap surrounding *
+ (concat Python- (symbol-name session
+  (py-which-bufname bufname)) ; avoid making a mess with 
buffer-local
+ (py-shell)
+ (setq python-buffer (concat * bufname *
+   (t
+   (error No function available for running an inferior python.)))
+   
   (setq org-babel-python-buffers (cons (cons session python-buffer)
   (assq-delete-all session 
org-babel-python-buffers)))
   session)))
@@ -200,19 +216,24 @@ last statement in BODY, as elisp.
 (org-babel-comint-in-buffer buffer
   (let* ((raw (org-babel-comint-with-output buffer 
org-babel-python-eoe-indicator t
 ;; for some reason python is fussy, and likes enters after 
every input
-(mapc (lambda (statement) (insert statement) 
(comint-send-input nil t))
-  (split-string (org-babel-trim full-body) [\r\n]+))
-(comint-send-input nil t

Re: [Orgmode] Xemacs incompatibilities

2010-05-17 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 This is a really non-standard way for a mode definition which I guess
 should be fixed in XEmacs.  I have made that change anyway.  Eric or
 Dan, please note this change I made in the Babel sources.

As someone else pointed out, python-mode.el is something different from
python.el:

https://launchpad.net/python-mode

In particular, fixing the require won't be enough: org-babel-python.el
uses `run-python' and interacts with the inferior Python, whereas
python-mode.el defines `py-shell'.

Should I try to abstract over the differences?

 3.)

 When editing a src block with C-c ' in a temporary buffer in it's
 native mode and then switching back with C-c ' to the original org
 file, whenever I try to save a file with C-x C-s (not only the org
 file) I'll get the message

   This is not a sub-editing buffer, something is wrong...

Could you provide a little bit more context on what you did?  I'm not
very familiar with org-src (which I assume this is about), so a
step-by-step recipe would help me greatly.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla

___
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


Re: [Orgmode] Re: Support (or not) for Emacs 21, and XEmacs

2010-05-07 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 any progress with integrating noutline.el into XEmacs?

Yes: I've tweaked it (and its dependents) appropriately, committed it to
the packages repository, and it's now in pre-release.  My intention was
to e-mail you as soon as there was an official release of the relevant
packages.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla


___
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


Re: [Orgmode] Re: Support (or not) for Emacs 21, and XEmacs

2010-04-23 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 4. Can you make XEmacs understand mouse-3 instead of button3 ?  Or
maybe it does understand these by now?

It actually does this now.  I've attached a patch that eliminates the
relevant featurep conditionals.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 93ef921..886dacf 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -1663,9 +1663,9 @@ The following commands are available:
 (org-defkey org-agenda-mode-map \C-c\C-x\C-mp'org-mobile-push)
 
 (org-defkey org-agenda-mode-map
-  (if (featurep 'xemacs) [(button2)] [(mouse-2)]) 'org-agenda-goto-mouse)
+  [(mouse-2)] 'org-agenda-goto-mouse)
 (org-defkey org-agenda-mode-map
-  (if (featurep 'xemacs) [(button3)] [(mouse-3)]) 'org-agenda-show-mouse)
+  [(mouse-3)] 'org-agenda-show-mouse)
 (when org-agenda-mouse-1-follows-link
   (org-defkey org-agenda-mode-map [follow-link] 'mouse-face))
 (easy-menu-define org-agenda-menu org-agenda-mode-map Agenda menu
diff --git a/lisp/org-mouse.el b/lisp/org-mouse.el
index 2d68b1a..22624d3 100644
--- a/lisp/org-mouse.el
+++ b/lisp/org-mouse.el
@@ -1132,7 +1132,7 @@ SCHEDULED: or DEADLINE: or ANYTHINGLIKETHIS:
'(lambda ()
  (setq org-mouse-context-menu-function 'org-mouse-agenda-context-menu)
  (define-key org-agenda-mode-map
-   (if (featurep 'xemacs) [button3] [mouse-3])
+   [mouse-3]
'org-mouse-show-context-menu)
  (define-key org-agenda-mode-map [down-mouse-3] 'org-mouse-move-tree-start)
  (define-key org-agenda-mode-map (if (featurep 'xemacs) [(control 
mouse-4)] [C-mouse-4]) 'org-agenda-earlier)
diff --git a/lisp/org.el b/lisp/org.el
index 7cad962..ebc55fd 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -4481,9 +4481,9 @@ The following commands are available:
 
 (defvar org-mouse-map (make-sparse-keymap))
 (org-defkey org-mouse-map
-  (if (featurep 'xemacs) [button2] [mouse-2]) 'org-open-at-mouse)
+  [mouse-2] 'org-open-at-mouse)
 (org-defkey org-mouse-map
-  (if (featurep 'xemacs) [button3] [mouse-3]) 'org-find-file-at-mouse)
+  [mouse-3] 'org-find-file-at-mouse)
 (when org-mouse-1-follows-link
   (org-defkey org-mouse-map [follow-link] 'mouse-face))
 (when org-tab-follows-link
@@ -13590,9 +13590,9 @@ user.
 (map (copy-keymap calendar-mode-map))
 (minibuffer-local-map (copy-keymap minibuffer-local-map)))
(org-defkey map (kbd RET) 'org-calendar-select)
-   (org-defkey map (if (featurep 'xemacs) [button1] [mouse-1])
+   (org-defkey map [mouse-1]
'org-calendar-select-mouse)
-   (org-defkey map (if (featurep 'xemacs) [button2] [mouse-2])
+   (org-defkey map [mouse-2]
'org-calendar-select-mouse)
(org-defkey minibuffer-local-map [(meta shift left)]
(lambda () (interactive)
@@ -17743,7 +17743,7 @@ the functionality can be provided as a fall-back.)
   (org-set-local 'fill-paragraph-function 'org-fill-paragraph)
   ;; Adaptive filling: To get full control, first make sure that
   ;; `adaptive-fill-regexp' never matches.  Then install our own matcher.
-  (unless (local-variable-p 'adaptive-fill-regexp)
+  (unless (local-variable-p 'adaptive-fill-regexp (current-buffer))
 (org-set-local 'org-adaptive-fill-regexp-backup
adaptive-fill-regexp))
   (org-set-local 'adaptive-fill-regexp \000)
___
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


Re: [Orgmode] Re: Support (or not) for Emacs 21, and XEmacs

2010-04-19 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 The compromise for me would be this:

 - You fix the things above.
 - I leave the rest of the necessary compatibility code in
 - I program any new features with whatever is available
   in Emacs 22/23 and rely on you to make it XEmacs compatible.

That would be wonderful.  I'll see that the issues are addressed:

 1. posix character classes in regular expressions, thinks like [:alpha:]
These are nice because they work well with arbitrary languages.
Does XEmacs suppor these now?

No, but I'll see to it that they are.

 2. The overlay API - I think XEmacs actually has a compatibility lib
for these, is that correct?

Correct.

One of the things you could do it to figure out if I can also switch
to the API calls overlays-in and overlays-at in that library.

You should, anyway: I'll take care of any problems.  I take it something
about these didn't work for you in the past: If that is so, a sentence
or two on what those problems were would be much appreciated.

 3. outline.el.  Last time  looked, XEmacs still had the horrible old
outline.el which is pretty much impossible to program.
I do have a port, xemacs/noutline.el in the Org distribution - if you
could get that into XEmacs, that would get rid of a major annoyance,
including complicated installation instructions.

I'm working on this right now - should be no big problem.  A few minor
incompatibilities with our current outline.el need to be addressed, but
I'm working on them.

 4. Can you make XEmacs understand mouse-3 instead of button3 ?  Or
maybe it does understand these by now?

No; I'll try to get this in.

Won't all happen overnight, but I'm getting to work on it.  I very much
appreciate your willingness to help!

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla


___
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


Re: [Orgmode] Re: Support (or not) for Emacs 21, and XEmacs

2010-04-19 Thread Michael Sperber

One more thing: Are patches like this one acceptable? (Needed to make
yesterday's checkout work on XEmacs)

diff --git a/lisp/org.el b/lisp/org.el
index 7cad962..5cca11e 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -17743,7 +17743,7 @@ the functionality can be provided as a fall-back.)
   (org-set-local 'fill-paragraph-function 'org-fill-paragraph)
   ;; Adaptive filling: To get full control, first make sure that
   ;; `adaptive-fill-regexp' never matches.  Then install our own matcher.
-  (unless (local-variable-p 'adaptive-fill-regexp)
+  (unless (local-variable-p 'adaptive-fill-regexp (current-buffer))
 (org-set-local 'org-adaptive-fill-regexp-backup
adaptive-fill-regexp))
   (org-set-local 'adaptive-fill-regexp \000)

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla


___
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


Re: [Orgmode] Re: Support (or not) for Emacs 21, and XEmacs

2010-04-19 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 That is acceptable - but I think that making BUFFER default to
 (current-buffer) does make a lot of sense - which is why making that
 argument optional in XEmacs is a good idea anyway.

It would - but the problem is that in XEmacs, an omitted BUFFER argument
means something different from (current-buffer):

`local-variable-p' is a built-in function
  -- loaded from 
/afs/informatik.uni-tuebingen.de/home/sperber/build/xemacs/src/symbols.c
(local-variable-p SYMBOL BUFFER optional AFTER-SET)

Documentation:
Return t if SYMBOL's value is local to BUFFER.
If optional third arg AFTER-SET is non-nil, return t if SYMBOL would be
buffer-local after it is set, regardless of whether it is so presently.
A nil value for BUFFER is *not* the same as (current-buffer), but means
no buffer.  Specifically:

-- If BUFFER is nil and AFTER-SET is nil, a return value of t indicates that
   the variable is one of the special built-in variables that is always
   buffer-local. (This includes `buffer-file-name', `buffer-read-only',
   `buffer-undo-list', and others.)

-- If BUFFER is nil and AFTER-SET is t, a return value of t indicates that
   the variable has had `make-variable-buffer-local' applied to it.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla


___
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


Re: [Orgmode] Re: Support (or not) for Emacs 21, and XEmacs

2010-04-18 Thread Michael Sperber

Hi Carsten,

many thanks for your e-mail!  (And many thanks for your work on
org-mode, which is the best piece of software I've started using for a
few years.)

Carsten Dominik carsten.domi...@gmail.com writes:

 However, I have recently more and more the feeling how having to
 cater for several Emacs versions is a drag.

I understand and would feel the same in your situation.  So I was
wondering if I could make it easy enough for you so org-mode could keep
the XEmacs code in.

 My feeling was also that the interest in the XEmacs side for
 Org-mode is low.  To my knowledge there is no Org-mode package for
 XEmacs, and the number of user on the mailing list seems to be very
 limited.

Right.  However, the reason why this is so is trivial: org-mode is
GPLv3, and thus can't be a package for XEmacs, which is currently still
GPLv2.  (There has been a long and tedious discussion of this over in
XEmacs land which I'd like to spare you from.)  However, we've pretty
much resolved the GPLv3 issues over the past few months, and I hope that
we'll have a GPLv3 XEmacs very soon.  At which point I'll personally
make an XEmacs package.

 So let me start with a question:  Is XEmacs still alive, innovative?
 There has been no major release (it seems to me) for a very long time.
 It was my feeling that the XEmacs project is on its way to a slow death.
 I may be wrong about this.

Development, which was slow for a long time, has recently picked up
significantly.  Releases are a problem, I admit: The developers
essentially all use the development branch, which is by now vastly
different from the 21.4 release.  (Also, the GPLv3 issue has kept us
from being able to merge Emacs code for a long time.)  But we'll do a
release at some point.

 You propose to help.  One way to go would be to continue a branch
 based on Org-mode 6.35, and to merge any new stuff into that branch.

That's definitely a possibility.

 So a dedicated XEmacs-related person could keep such an XEmacs.
 In my test branch where I remove compatibility code (not only
 XEmacs, but also Emacs 21, and I'd love to ditch support for
 Emacs 22 - even though I cannot do that just yet), quite some code
 has changed, and I am not sure how easy it would be to keep
 a compatibility branch up to date.

Is there any way to leave the compatibility code in place and not worry
about it, so long as it does not interfere with your work on the current
Emacs?  (I don't know how big that interference is, I must admit.)  I
could then try to fix it up as development goes along.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla


___
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


[Orgmode] Re: Support (or not) for Emacs 21, and XEmacs

2010-04-17 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 If you object to such a development, please step into this
 discussion.

I do - I'm an avoid org-mode user, an XEmacs maintainer.  and I'd be
happy to help support XEmacs, if that would help change your mind.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla



___
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


[Orgmode] Re: Do we still have XEmacs users?

2009-10-10 Thread Michael Sperber

Carsten Dominik carsten.domi...@gmail.com writes:

 Do we still have XEmacs users around here?

Yes.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla



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