From 1bae28e66cf4f57f359798c8e0e252cb7d7e60c9 Mon Sep 17 00:00:00 2001
From: jluehrs2 <jluehrs2@uiuc.edu>
Date: Thu, 22 May 2008 00:19:31 -0500
Subject: catch : and @ command modifiers, this might need to be made more
 precise later on

---
 lib/Language/TECO.pm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/lib/Language/TECO.pm b/lib/Language/TECO.pm
index 04b0ccf..587d641 100644
--- a/lib/Language/TECO.pm
+++ b/lib/Language/TECO.pm
@@ -116,6 +116,12 @@ sub execute {
         elsif (/,/) {
             $self->{current_num} = 'n2';
         }
+        elsif (/:/) {
+            $self->{colon} = 1;
+        }
+        elsif (/@/) {
+            $self->{at} = 1;
+        }
         elsif (/i/i) {
             if (defined $self->num) {
                 $self->cmd(sub {
-- 
cgit v1.2.3-54-g00ecf