www/proprietary/workshop item-create

[Therese Godefroy]

CVSROOT:        /webcvs/www
Module name:    www
Changes by:     Therese Godefroy <th_g> 19/03/06 04:04:48

Modified files:
        proprietary/workshop: item-create 

Log message:
        Reformat ol lists as well as ul.

CVSWeb URLs:
http://web.cvs.savannah.gnu.org/viewcvs/www/proprietary/workshop/item-create?cvsroot=www&r1=1.8&r2=1.9

Patches:
Index: item-create
===================================================================
RCS file: /webcvs/www/www/proprietary/workshop/item-create,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -b -r1.8 -r1.9
--- item-create 4 Feb 2019 07:12:22 -0000       1.8
+++ item-create 6 Mar 2019 09:04:41 -0000       1.9
@@ -103,27 +103,27 @@
 sed 's,Blurb:[ \t]*,Blurb:\n,' > $temp1
 
 # Reformat.
-for tag in p dl dt dd ul li blockquote; do
+for tag in p dl dt dd ul ol li blockquote; do
   sed -i "s,[ \t]*\(<$tag[^>]*>\)[ \t]*\(.\),\1\2,g" $temp1
   sed -i "s,[ \t]*</$tag>[ \t]*,</$tag>,g" $temp1
 done
 
 sed -i -e 's,</p>\(<[^/]\),</p>\n\n\1,g' \
        -e 's,</blockquote><,</blockquote>\n\n<,g' \
-       -e 's,</ul><,\n</ul>\n\n<,g' \
-       -e 's,</li></ul>,</li>\n</ul>,g' \
-       -e 's,<ul><li>,<ul>\n<li>,g' \
+       -e 's,\(</[ou]l>\)<,\n\1\n\n<,g' \
+       -e 's,</li>\(</[ou]l>\),</li>\n\1,g' \
+       -e 's,\(<[ou]l>\)<li>,\1\n<li>,g' \
        -e 's,</li><li>,</li>\n\n<li>,g' \
        -e 's,</dl><,\n</dl>\n\n<,g' \
        -e 's,</dt><dd>,</dt>\n<dd>,g' \
        -e 's,</dd><dt>,</dd>\n\n<dt>,g' \
        -e 's,<dl><dt>,<dl>\n<dt>,g' $temp1
 
-for tag in p dl /dl ul /ul li blockquote; do
+for tag in p dl /dl ul /ul ol /ol blockquote; do
   sed -i "s,^<$tag,    <$tag," $temp1
 done
 
-for tag in dd dt; do
+for tag in dd dt li; do
   sed -i "s,^<$tag,      <$tag," $temp1
 done