[sword-svn] r306 - trunk/modules/perlconverters

refdoc at crosswire.org refdoc at crosswire.org
Tue Sep 28 14:45:26 MST 2010


Author: refdoc
Date: 2010-09-28 14:45:26 -0700 (Tue, 28 Sep 2010)
New Revision: 306

Modified:
   trunk/modules/perlconverters/usfm2osis.pl
Log:
addition of \\dc


Modified: trunk/modules/perlconverters/usfm2osis.pl
===================================================================
--- trunk/modules/perlconverters/usfm2osis.pl	2010-09-24 01:18:39 UTC (rev 305)
+++ trunk/modules/perlconverters/usfm2osis.pl	2010-09-28 21:45:26 UTC (rev 306)
@@ -884,8 +884,11 @@
 	$line =~ s/<reference osisRef="([^\"\.]+)\.(\d+)"/<reference osisRef="$1\.1\.$2"/g; # Jude 1
 
 	### Special Text and Character Styles--Markers Supported: \it...\it*, \nd...\nd*, \pn...\pn*, \tl...\tl*, \qt...\qt*, \add...\add*, \pb, \bk...\bk*, \sc..\sc*
-	#### Markers Not Yet Supported: Special Text:  \dc...\dc*, \k...\k*, \lit, \ord...\ord*, \sig...\sig*, \sls...\sls*, \wj...\wj*; Character Styling: \em...\em*, \bd...\bd*, \bdit...\bdit*, \no...\no*; Spacing and Breaks: !$, //; Special Features: \fig...\fig*, \ndx...\ndx*, \pro...\pro*, \w...\w*, \wg...\wg*, \wh...\wh*
+	#### Markers Not Yet Supported: Special Text:  \k...\k*, \lit, \ord...\ord*, \sig...\sig*, \sls...\sls*, \wj...\wj*; Character Styling: \em...\em*, \bd...\bd*, \bdit...\bdit*, \no...\no*; Spacing and Breaks: !$, //; Special Features: \fig...\fig*, \ndx...\ndx*, \pro...\pro*, \w...\w*, \wg...\wg*, \wh...\wh*
 
+	# \dc...\dc*, italic text
+	$line =~ s/\\dc\b\s*(.*?)\\dc\*/<transChange type=\"added\" edition=\"dc\">$1<\/transChange>/g;
+
 	# \it...\it*, italic text
 	$line =~ s/\\it\b\s*(.*?)\\it\*/<hi type=\"italic\">$1<\/hi>/g;
 




More information about the sword-cvs mailing list