diff options
| author | Thomas White <taw@physics.org> | 2014-12-14 08:41:25 +0100 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2014-12-14 08:41:25 +0100 |
| commit | c5311b8e7a3f38c0fcaf16f25a38fa9339e5eee8 (patch) | |
| tree | 0082cfd502fba78c942f480c15d24ca42faf626e /scripts/check-near-bragg | |
| parent | 08dbb8989c5ae560684aba060e5dc8f9235580b6 (diff) | |
Fix chekc-near-bragg (again)
Diffstat (limited to 'scripts/check-near-bragg')
| -rwxr-xr-x | scripts/check-near-bragg | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/scripts/check-near-bragg b/scripts/check-near-bragg index 10a7549b..4077c6e2 100755 --- a/scripts/check-near-bragg +++ b/scripts/check-near-bragg @@ -39,6 +39,10 @@ while ( $line = <FH> ) { $handled = 1; } + if ( $line =~ /^Event:\ (.+)$/ ) { + $event = $1; + } + if ( $line =~ /^End\ of\ reflections$/ ) { close(TMP); |