Changeset 1016 for trunk/plugins/en/output_VAR.tcl

Timestamp:

08/10/09 19:22:13 (3 years ago)

Author:

james

Message:

COMMITTING ALL ANIMES

File:

• trunk/plugins/en/output_VAR.tcl (modified) (2 diffs)

trunk/plugins/en/output_VAR.tcl

@@ -99 +99 @@
                 }
 
+                if {[lsearch $options_list "presentpart"] > -1} {
+                        set replacement [bMotion_make_present_participle $replacement]
+                }
+
                 if {[lsearch $options_list "plural"] > -1} {
                         set replacement [bMotionMakePlural $replacement]
@@ -109 +113 @@
                 if {[lsearch $options_list "underscore"] > -1} {
                         set replacement [string map { " " "_" } $replacement]
+                }
+
+                if {[lsearch $options_list "caps"] > -1} {
+                        set replacement [string toupper $replacement]
                 }