From 8777062b7864a352cffe0a352724c8ff83fa791d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hinrik=20=C3=96rn=20Sigur=C3=B0sson?= <hinrik.sig@gmail.com>
Date: Fri, 3 Jul 2009 10:35:27 +0000
Subject: [PATCH 1/2] Make use of Module::Install::AuthorRequires

---
 MANIFEST    | 1 +
 Makefile.PL | 4 ++++
 2 files changed, 5 insertions(+)

diff --git a/MANIFEST b/MANIFEST
index 0cee0b1..37733e5 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -63,6 +63,7 @@ share/Spec/S32-setting-library/Rules.pod
 share/Spec/S32-setting-library/Str.pod
 share/Spec/S32-setting-library/Temporal.pod
 inc/Module/Install.pm
+inc/Module/Install/AuthorRequires.pm
 inc/Module/Install/AuthorTests.pm
 inc/Module/Install/Base.pm
 inc/Module/Install/Can.pm
diff --git a/Makefile.PL b/Makefile.PL
index 09bee81..fa5916a 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -25,6 +25,10 @@ requires       ('Pod::Xhtml'               => '0');
 requires       ('Win32::Console::ANSI'     => '0') if $^O eq 'MSWin32';
 test_requires  ('Test::More'               => '0');
 test_requires  ('Test::Script'             => '0');
+author_requires('Perl::Critic'             => '1.098');
+author_requires('Test::Perl::Critic'       => '0');
+author_requires('Test::Pod'                => '0');
+author_requires('Test::Pod::Coverage'      => '0');
 tests_recursive();
 recursive_author_tests('xt');
 WriteAll();

From 471efbf0ec83a1981dbc7f06ac5d1f7663208b74 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hinrik=20=C3=96rn=20Sigur=C3=B0sson?= <hinrik.sig@gmail.com>
Date: Fri, 3 Jul 2009 12:39:52 +0000
Subject: [PATCH 2/2] Use PAGER environment variable if set

---
 Changes         | 3 +++
 lib/App/Grok.pm | 2 +-
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/Changes b/Changes
index c9dfd94..84c7e18 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,6 @@
+0.11
+    - Use PAGER environment variable if set
+
 0.10 Thu Jul  2 16:49:16 GMT 2009
     - Add 'pod' output format for Pod 5, and u-/--unformatted
     - Rename -f/--format to -o/--output like perldoc(1)
diff --git a/lib/App/Grok.pm b/lib/App/Grok.pm
index 30ba4ec..196c679 100644
--- a/lib/App/Grok.pm
+++ b/lib/App/Grok.pm
@@ -255,7 +255,7 @@ sub _print {
         print $output;
     }
     else {
-        my $pager = $Config{pager};
+        my $pager = defined $ENV{PAGER} ? $ENV{PAGER} : $Config{pager};
         my ($temp_fh, $temp) = tempfile(UNLINK => 1);
         print $temp_fh $output;
         close $temp_fh;