rearrange again to get the pragma right

Fri, 09 Mar 2018 23:47:31 -0500

author
Meredith Howard <mhoward@roomag.org>
date
Fri, 09 Mar 2018 23:47:31 -0500
changeset 701
437293466a17
parent 700
a325161d7ffb
child 702
f817544836c7

rearrange again to get the pragma right

.replyrc file | annotate | diff | comparison | revisions
.replyrc.pl file | annotate | diff | comparison | revisions
--- a/.replyrc
+++ b/.replyrc
@@ -1,4 +1,7 @@
-script_line1 = require glob('~/.replyrc.pl'); ()
+script_line1 = use warnings; use strict; ()
+script_line2 = use feature ':all'; use experimentals; ()
+script_line3 = require glob('~/.replyrc.pl'); ()
+script_line4 = -e $_ && require($_) for glob('~/.replyrc.local.pl'); ()
 
 [Colors]
 [DataPrinter]
--- a/.replyrc.pl
+++ b/.replyrc.pl
@@ -1,8 +1,3 @@
-use warnings;
-use strict;
-use feature ':all';
-use experimentals;
-
 use lib glob('~/.lib/perl5');
 
 use Data::Printer {
@@ -12,6 +7,4 @@ use Data::Printer {
 
 use Path::Tiny;
 
--e $_ && require($_) for glob('~/.replyrc.local.pl');
-
 1;

mercurial