[PATCH] Column view support for xemacs

[PATCH] Column view support for xemacs

[Greg Chernov]

[-- Attachment #1: Type: text/plain, Size: 156 bytes --]


Attached patches make column view feature work (mostly) for xemacs.
Patches are for 5.23a version (org-mode development speed a bit high
for me :))

Greg


[-- Attachment #2: org.el.patch.gz --]
[-- Type: application/x-gzip, Size: 7349 bytes --]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #3: noutline.el.patch --]
[-- Type: text/x-patch, Size: 427 bytes --]

--- xemacs/noutline_orig.el	2008-04-17 10:32:41.000000000 +0300
+++ xemacs/noutline.el	2008-04-17 10:34:15.000000000 +0300
@@ -416,7 +416,7 @@
 
 (defsubst outline-invisible-p (&optional pos)
   "Non-nil if the character after point is invisible."
-  (get-char-property (or pos (point)) 'invisible))
+  (eq 'outline (get-char-property (or pos (point)) 'invisible)))
 
 (defun outline-visible ()
   (not (outline-invisible-p)))

[-- Attachment #4: Type: text/plain, Size: 204 bytes --]

_______________________________________________
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

Re: [PATCH] Column view support for xemacs

[Carsten Dominik]

Hi Greg,

email to your yahoo account bounces for me - could you please contact  
me with a working address?

Thanks.

- Carsten

On Apr 17, 2008, at 3:22 PM, Greg Chernov wrote:

>
> Attached patches make column view feature work (mostly) for xemacs.
> Patches are for 5.23a version (org-mode development speed a bit high
> for me :))
>
> Greg
>
> <org.el.patch.gz>--- xemacs/noutline_orig.el	2008-04-17  
> 10:32:41.000000000 +0300
> +++ xemacs/noutline.el	2008-04-17 10:34:15.000000000 +0300
> @@ -416,7 +416,7 @@
>
> (defsubst outline-invisible-p (&optional pos)
>   "Non-nil if the character after point is invisible."
> -  (get-char-property (or pos (point)) 'invisible))
> +  (eq 'outline (get-char-property (or pos (point)) 'invisible)))
>
> (defun outline-visible ()
>   (not (outline-invisible-p)))
> _______________________________________________
> 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