line: do a full string match of $line instead of a regex match

This allows $line to contain '/' characters and is generally the safer
thing to do.

Patch from Francois Deppierraz <francois.deppierraz@camptocamp.com>

1 files changed, 1 insertions, 1 deletions

diff --git a/manifests/defines/line.pp b/manifests/defines/line.pp
index 2eb8f98..c055f5b 100644
--- a/manifests/defines/line.pp
+++ b/manifests/defines/line.pp
@@ -32,7 +32,7 @@ define line($file, $line, $ensure = 'present') {
 			}
 		}
 		absent: {
-			exec { "perl -ni -e 'print unless /^\\Q${line}\\E\$/' '${file}'":
+			exec { "perl -ni -e 'print if \$_ ne \"${line}\n\";' '${file}'":
 				onlyif => "grep -qFx '${line}' '${file}'"
 			}
 		}