Changeset 1019 for trunk/plugins/en/output_VAR.tcl
- Timestamp:
- 08/23/09 19:22:05 (3 years ago)
- File:
-
- 1 edited
-
trunk/plugins/en/output_VAR.tcl (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/plugins/en/output_VAR.tcl
r1016 r1019 1 #2 #3 1 # vim: fdm=indent fdn=1 4 2 # … … 6 4 ############################################################################### 7 5 # This is a bMotion plugin 8 # Copyright (C) James Michael Seward 2000-200 86 # Copyright (C) James Michael Seward 2000-2009 9 7 # 10 8 # This program is covered by the GPL, please refer the to LICENCE file in the … … 32 30 regsub {%VAR\{([^\}]+)\}\{strip\}} $line "%VAR{\\1:strip}" line 33 31 34 set lastloop "" 35 36 while {[regexp -nocase {(%VAR\{([^\}:]+)(:[^\}]+)?\}(\{strip\})?)} $line matches whole_thing abstract options clean]} { 32 if {[regexp -nocase {(%VAR\{([^\}:]+)(:[^\}]+)?\}(\{strip\})?)} $line matches whole_thing abstract options clean]} { 37 33 global $abstract 38 34 #see if we have a new-style abstract available … … 126 122 set line [bMotionInsertString $line "%noun" "%VAR{sillyThings}"] 127 123 } 128 129 if {$lastloop == $line} {130 putlog "bMotion: ALERT! looping too much in %VAR code with $line (no change since last parse)"131 set line "/has a tremendous error while trying to sort something out :("132 break133 }134 set lastloop $line135 124 } 136 125
Note: See TracChangeset
for help on using the changeset viewer.
