Changeset 1019 for trunk/plugins/en/output_TIME.tcl
- Timestamp:
- 08/23/09 19:22:05 (3 years ago)
- File:
-
- 1 edited
-
trunk/plugins/en/output_TIME.tcl (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/plugins/en/output_TIME.tcl
r961 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 … … 19 17 bMotion_putloglev 4 * "bMotion_plugin_output_TIME $channel $line" 20 18 21 set lastline "" 22 23 while {[regexp "%TIME\{(\[a-zA-Z0-9 -\]+)\}" $line matches timeString]} { 19 if {[regexp "%TIME\{(\[a-zA-Z0-9 -\]+)\}" $line matches timeString]} { 24 20 bMotion_putloglev 2 * "found timestring $timeString" 25 21 set origtime $timeString … … 29 25 bMotion_putloglev 2 * "using time $var" 30 26 set line [bMotionInsertString $line "%TIME\\{$origtime\\}" $var] 31 32 if {$lastline == $line} {33 # nothing changed34 set line ""35 break36 }37 set lastline $line38 27 } 39 28
Note: See TracChangeset
for help on using the changeset viewer.
