Message ID | 1480679740-32372-1-git-send-email-ian.jackson@eu.citrix.com (mailing list archive) |
---|---|
State | New, archived |
Headers | show |
diff --git a/cs-adjust-flight b/cs-adjust-flight index 04f5a7e..02fd2cf 100755 --- a/cs-adjust-flight +++ b/cs-adjust-flight @@ -84,9 +84,9 @@ our $dstflight; sub spec_re ($) { my ($spec) = @_; - if ($spec eq '.') { return '(?:)'; } - if ($spec =~ m/^\^/) { return $spec; } - if ($spec =~ m/^\//) { return $'; } #';} + if ($spec eq '.') { return qr{(?:)}; } + if ($spec =~ m/^\^/) { return qr{$spec}; } + if ($spec =~ m/^\//) { return qr{$'}; } #';} return undef; }
This is more regular and potentially more efficient, but has no functional change. Signed-off-by: Ian Jackson <Ian.Jackson@eu.citrix.com> --- cs-adjust-flight | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-)