Changeset 1107 for trunk

Timestamp:

01/15/11 13:33:13 (16 months ago)

Author:

james

Message:

add title and camel modifiers

File:

• trunk/plugins/en/output_VAR.tcl (modified) (1 diff)

trunk/plugins/en/output_VAR.tcl

@@ -148 +148 @@
                                         }
                                 }
+                                "title" {
+                                        set replacement [string totitle $replacement]
+                                }
+                                "camel" {
+                                        set newreplacement ""
+                                        foreach word $replacement {
+                                                set word [string totitle $word]
+                                                #TODO: generalise
+                                                if {[string range $word 0 3] == "%var"} {
+                                                        set word [string replace $word 0 3 "%VAR"]
+                                                }
+                                                append newreplacement "$word "
+                                        }
+                                        set replacement [string trim $newreplacement]
+                                }
                                 "owner" {
                                         set replacement [bMotionMakePossessive $replacement]