head	1.2;
access;
symbols
	pkgsrc-2013Q2:1.2.0.36
	pkgsrc-2013Q2-base:1.2
	pkgsrc-2012Q4:1.2.0.34
	pkgsrc-2012Q4-base:1.2
	pkgsrc-2011Q4:1.2.0.32
	pkgsrc-2011Q4-base:1.2
	pkgsrc-2011Q2:1.2.0.30
	pkgsrc-2011Q2-base:1.2
	pkgsrc-2009Q4:1.2.0.28
	pkgsrc-2009Q4-base:1.2
	pkgsrc-2008Q4:1.2.0.26
	pkgsrc-2008Q4-base:1.2
	pkgsrc-2008Q3:1.2.0.24
	pkgsrc-2008Q3-base:1.2
	cube-native-xorg:1.2.0.22
	cube-native-xorg-base:1.2
	pkgsrc-2008Q2:1.2.0.20
	pkgsrc-2008Q2-base:1.2
	pkgsrc-2008Q1:1.2.0.18
	pkgsrc-2008Q1-base:1.2
	pkgsrc-2007Q4:1.2.0.16
	pkgsrc-2007Q4-base:1.2
	pkgsrc-2007Q3:1.2.0.14
	pkgsrc-2007Q3-base:1.2
	pkgsrc-2007Q2:1.2.0.12
	pkgsrc-2007Q2-base:1.2
	pkgsrc-2007Q1:1.2.0.10
	pkgsrc-2007Q1-base:1.2
	pkgsrc-2006Q4:1.2.0.8
	pkgsrc-2006Q4-base:1.2
	pkgsrc-2006Q3:1.2.0.6
	pkgsrc-2006Q3-base:1.2
	pkgsrc-2006Q2:1.2.0.4
	pkgsrc-2006Q2-base:1.2
	pkgsrc-2006Q1:1.2.0.2
	pkgsrc-2006Q1-base:1.2
	pkgsrc-2005Q4:1.1.0.20
	pkgsrc-2005Q4-base:1.1
	pkgsrc-2005Q3:1.1.0.18
	pkgsrc-2005Q3-base:1.1
	pkgsrc-2005Q2:1.1.0.16
	pkgsrc-2005Q2-base:1.1
	pkgsrc-2005Q1:1.1.0.14
	pkgsrc-2005Q1-base:1.1
	pkgsrc-2004Q4:1.1.0.12
	pkgsrc-2004Q4-base:1.1
	pkgsrc-2004Q3:1.1.0.10
	pkgsrc-2004Q3-base:1.1
	pkgsrc-2004Q2:1.1.0.8
	pkgsrc-2004Q2-base:1.1
	pkgsrc-2004Q1:1.1.0.6
	pkgsrc-2004Q1-base:1.1
	pkgsrc-2003Q4:1.1.0.4
	pkgsrc-2003Q4-base:1.1
	netbsd-1-6-1:1.1.0.2
	netbsd-1-6-1-base:1.1;
locks; strict;
comment	@# @;


1.2
date	2006.02.13.15.16.35;	author taca;	state dead;
branches;
next	1.1;

1.1
date	2002.10.06.15.25.23;	author taca;	state Exp;
branches;
next	;


desc
@@


1.2
log
@Update to devel/ruby-rd-modeto 0.6.18.

- A few Changes from 0.6.14; one of them are already included in
  the previous package.
- Stop using textproc/ruby-rdtool/rdversion.mk to determine version.
@
text
@$NetBSD: patch-aa,v 1.1 2002/10/06 15:25:23 taca Exp $

--- rd-mode.el.orig	Sat Feb  2 02:58:16 2002
+++ rd-mode.el
@@@@ -321,7 +321,7 @@@@
   ""
   (save-excursion
     (beginning-of-line)
-    (looking-at "--- +\\| *\\(\\* +\\)?")
+    (looking-at "--- +\\| *\\(\\* +\\|([0-9]+) +\\)?")
     (length (buffer-substring (match-beginning 0)(match-end 0)))))
   
 (defun rd-cite-region (beg end)
@@@@ -379,15 +379,32 @@@@
       (rd-insert-reftourl url)
     (rd-insert-ref (concat label "|URL:" url))))
 
+(defun rd-search-last-listitem ()
+  (beginning-of-line)
+  (if (looking-at "[ \t]*\\(\\*\\|([0-9])\\|:\\|---\\)[ \t]*")
+      (match-string 0)
+    (and (and (eq
+               (rd-current-indentation)
+               (progn (forward-line -1) (rd-current-indentation))
+               )
+              (not (eq (point) (point-min)) )
+              )
+         (rd-search-last-listitem)
+         )
+    )
+  )
+
 (defun rd-intelligent-newline ()
   (interactive)
-  (beginning-of-line)
-  (let ((item
-	 (and (looking-at "[ \t]*\\(\\*\\|([0-9])\\|:\\|---\\)[ \t]*")
-	      (match-string 0))))
+  (let (item)
+    (setq item
+	  (save-excursion (rd-search-last-listitem) )
+	  )
     (end-of-line)
     (newline)
-    (if item (insert-string item))))
+    (if item (insert-string item) )
+    )
+  )
 
 (provide 'rd-mode)
 ;;; rd-mode.el ends here
@


1.1
log
@Some improvement to ruby-rd-mode:

- Support indentation support for EnumList.
- Make rd-intelligent-newline work if previous line isn't ItemList and
  MethodList.

Bump to ruby-rd-mode-0.6.11nb1.
@
text
@d1 1
a1 1
$NetBSD$
@

