projects
/
app-edwardng.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
3da0c45
)
Use File::Share(Dir) for templates
author
Marius Gavrilescu
<marius@ieval.ro>
Tue, 8 Jul 2014 06:39:16 +0000
(09:39 +0300)
committer
Marius Gavrilescu
<marius@ieval.ro>
Tue, 8 Jul 2014 06:40:17 +0000
(09:40 +0300)
17 files changed:
MANIFEST
patch
|
blob
|
blame
|
history
Makefile.PL
patch
|
blob
|
blame
|
history
lib/App/EdwardNG.pm
patch
|
blob
|
blame
|
history
share/tmpl/en/encrypt
[new file with mode: 0644]
patch
|
blob
share/tmpl/en/encrypt_error
[new file with mode: 0644]
patch
|
blob
share/tmpl/en/error
[new file with mode: 0644]
patch
|
blob
share/tmpl/en/plain
[new file with mode: 0644]
patch
|
blob
share/tmpl/en/sign
[new file with mode: 0644]
patch
|
blob
share/tmpl/en/sign_error
[new file with mode: 0644]
patch
|
blob
share/tmpl/en/signencrypt
[new file with mode: 0644]
patch
|
blob
tmpl/en/encrypt
[deleted file]
patch
|
blob
|
blame
|
history
tmpl/en/encrypt_error
[deleted file]
patch
|
blob
|
blame
|
history
tmpl/en/error
[deleted file]
patch
|
blob
|
blame
|
history
tmpl/en/plain
[deleted file]
patch
|
blob
|
blame
|
history
tmpl/en/sign
[deleted file]
patch
|
blob
|
blame
|
history
tmpl/en/sign_error
[deleted file]
patch
|
blob
|
blame
|
history
tmpl/en/signencrypt
[deleted file]
patch
|
blob
|
blame
|
history
diff --git
a/MANIFEST
b/MANIFEST
index a001eb1aa1d8b26769d8d6b77cd1b18b1e8343f1..79df2cd63edee102698c598c001f8482dfb0b499 100644
(file)
--- a/
MANIFEST
+++ b/
MANIFEST
@@
-14,10
+14,10
@@
t/data/mime-signed-encrypted
t/keydir/pubring.gpg
t/keydir/secring.gpg
t/keydir/trustdb.gpg
t/keydir/pubring.gpg
t/keydir/secring.gpg
t/keydir/trustdb.gpg
-tmpl/en/encrypt
-tmpl/en/encrypt_error
-tmpl/en/error
-tmpl/en/plain
-tmpl/en/sign
-tmpl/en/sign_error
-tmpl/en/signencrypt
+
share/
tmpl/en/encrypt
+
share/
tmpl/en/encrypt_error
+
share/
tmpl/en/error
+
share/
tmpl/en/plain
+
share/
tmpl/en/sign
+
share/
tmpl/en/sign_error
+
share/
tmpl/en/signencrypt
diff --git
a/Makefile.PL
b/Makefile.PL
index 99e91db34db0f1312fee945db8753ebefaa89ddc..8b028b9a42564b25b05b6094df3c690b8be0deb4 100644
(file)
--- a/
Makefile.PL
+++ b/
Makefile.PL
@@
-1,5
+1,8
@@
use 5.014000;
use ExtUtils::MakeMaker;
use 5.014000;
use ExtUtils::MakeMaker;
+use File::ShareDir::Install;
+
+install_share 'share';
WriteMakefile(
NAME => 'App::EdwardNG',
WriteMakefile(
NAME => 'App::EdwardNG',
@@
-11,6
+14,7
@@
WriteMakefile(
SIGN => 1,
PREREQ_PM => {
qw/Email::Sender::Simple 0
SIGN => 1,
PREREQ_PM => {
qw/Email::Sender::Simple 0
+ File::Share 0
File::Slurp 0
Getopt::Long 0
MIME::Entity 5.419
File::Slurp 0
Getopt::Long 0
MIME::Entity 5.419
@@
-18,7
+22,11
@@
WriteMakefile(
Mail::GnuPG 0
PerlX::Maybe 0
Template 0
Mail::GnuPG 0
PerlX::Maybe 0
Template 0
- Try::Tiny 0/
+ Try::Tiny 0/,
+ },
+ BUILD_REQUIRES => {
+ qw/ExtUtils::MakeMaker 0
+ File::ShareDir::Install 0/,
},
META_MERGE => {
dynamic_config => 0,
},
META_MERGE => {
dynamic_config => 0,
@@
-27,3
+35,6
@@
WriteMakefile(
}
}
);
}
}
);
+
+package MY;
+use File::ShareDir::Install qw/postamble/;
diff --git
a/lib/App/EdwardNG.pm
b/lib/App/EdwardNG.pm
index a9cac089365c515bf4f89e67d2b7a7c3d17b1d8d..4da1968ce2ab082321fc2ea5b334252f2ee6767e 100644
(file)
--- a/
lib/App/EdwardNG.pm
+++ b/
lib/App/EdwardNG.pm
@@
-8,6
+8,7
@@
our $VERSION = '0.001';
our @EXPORT = qw/process_message/;
use Email::Sender::Simple qw/sendmail/;
our @EXPORT = qw/process_message/;
use Email::Sender::Simple qw/sendmail/;
+use File::Share qw/dist_file/;
use File::Slurp qw/read_file/;
use File::Spec::Functions qw/rel2abs/;
use Getopt::Long;
use File::Slurp qw/read_file/;
use File::Spec::Functions qw/rel2abs/;
use Getopt::Long;
@@
-117,7
+118,7
@@
sub run {
$params{plaintext} = first_part $params{decrypted} if $params{decrypted};
$params{plaintext} = first_part $params{decrypted} if $params{decrypted};
- my $tt = Template->new(INCLUDE_PATH => rel2abs $tmpl_path, 'tmpl');
+ my $tt = Template->new(INCLUDE_PATH => rel2abs $tmpl_path,
dist_file 'App-EdwardNG',
'tmpl');
my $data;
$tt->process($tmpl, \%params, \$data);
my $email = MIME::Entity->build(
my $data;
$tt->process($tmpl, \%params, \$data);
my $email = MIME::Entity->build(
diff --git a/share/tmpl/en/encrypt
b/share/tmpl/en/encrypt
new file mode 100644
(file)
index 0000000..
28891f0
--- /dev/null
+++ b/
share/tmpl/en/encrypt
@@ -0,0
+1,7
@@
+Message decrypted successfully.
+
+You said:
+[% plaintext %]
+
+GnuPG said:
+[% message %]
\ No newline at end of file
diff --git a/share/tmpl/en/encrypt_error
b/share/tmpl/en/encrypt_error
new file mode 100644
(file)
index 0000000..
842f06f
--- /dev/null
+++ b/
share/tmpl/en/encrypt_error
@@ -0,0
+1
@@
+Could not decrypt message: [% message %]
\ No newline at end of file
diff --git a/share/tmpl/en/error
b/share/tmpl/en/error
new file mode 100644
(file)
index 0000000..
8acf24f
--- /dev/null
+++ b/
share/tmpl/en/error
@@ -0,0
+1
@@
+Error while processing message: [% message %]
\ No newline at end of file
diff --git a/share/tmpl/en/plain
b/share/tmpl/en/plain
new file mode 100644
(file)
index 0000000..
4ca17e3
--- /dev/null
+++ b/
share/tmpl/en/plain
@@ -0,0
+1
@@
+This message is neither signed nor encrypted.
\ No newline at end of file
diff --git a/share/tmpl/en/sign
b/share/tmpl/en/sign
new file mode 100644
(file)
index 0000000..
b111854
--- /dev/null
+++ b/
share/tmpl/en/sign
@@ -0,0
+1,4
@@
+This message is correctly signed with key [% keyid %] from [% email %].
+
+GnuPG said:
+[% message %]
\ No newline at end of file
diff --git a/share/tmpl/en/sign_error
b/share/tmpl/en/sign_error
new file mode 100644
(file)
index 0000000..
f35899d
--- /dev/null
+++ b/
share/tmpl/en/sign_error
@@ -0,0
+1
@@
+Could not verify message signature: [% message %]
\ No newline at end of file
diff --git a/share/tmpl/en/signencrypt
b/share/tmpl/en/signencrypt
new file mode 100644
(file)
index 0000000..
9fee0c2
--- /dev/null
+++ b/
share/tmpl/en/signencrypt
@@ -0,0
+1,7
@@
+Message encrypted and signed with key [% keyid %] from [% email %].
+
+You said;
+[% plaintext %]
+
+GnuPG said:
+[% message %]
\ No newline at end of file
diff --git
a/tmpl/en/encrypt
b/tmpl/en/encrypt
deleted file mode 100644
(file)
index
28891f0
..0000000
--- a/
tmpl/en/encrypt
+++ /dev/null
@@
-1,7
+0,0 @@
-Message decrypted successfully.
-
-You said:
-[% plaintext %]
-
-GnuPG said:
-[% message %]
\ No newline at end of file
diff --git
a/tmpl/en/encrypt_error
b/tmpl/en/encrypt_error
deleted file mode 100644
(file)
index
842f06f
..0000000
--- a/
tmpl/en/encrypt_error
+++ /dev/null
@@
-1
+0,0 @@
-Could not decrypt message: [% message %]
\ No newline at end of file
diff --git
a/tmpl/en/error
b/tmpl/en/error
deleted file mode 100644
(file)
index
8acf24f
..0000000
--- a/
tmpl/en/error
+++ /dev/null
@@
-1
+0,0 @@
-Error while processing message: [% message %]
\ No newline at end of file
diff --git
a/tmpl/en/plain
b/tmpl/en/plain
deleted file mode 100644
(file)
index
4ca17e3
..0000000
--- a/
tmpl/en/plain
+++ /dev/null
@@
-1
+0,0 @@
-This message is neither signed nor encrypted.
\ No newline at end of file
diff --git
a/tmpl/en/sign
b/tmpl/en/sign
deleted file mode 100644
(file)
index
b111854
..0000000
--- a/
tmpl/en/sign
+++ /dev/null
@@
-1,4
+0,0 @@
-This message is correctly signed with key [% keyid %] from [% email %].
-
-GnuPG said:
-[% message %]
\ No newline at end of file
diff --git
a/tmpl/en/sign_error
b/tmpl/en/sign_error
deleted file mode 100644
(file)
index
f35899d
..0000000
--- a/
tmpl/en/sign_error
+++ /dev/null
@@
-1
+0,0 @@
-Could not verify message signature: [% message %]
\ No newline at end of file
diff --git
a/tmpl/en/signencrypt
b/tmpl/en/signencrypt
deleted file mode 100644
(file)
index
9fee0c2
..0000000
--- a/
tmpl/en/signencrypt
+++ /dev/null
@@
-1,7
+0,0 @@
-Message encrypted and signed with key [% keyid %] from [% email %].
-
-You said;
-[% plaintext %]
-
-GnuPG said:
-[% message %]
\ No newline at end of file
This page took
0.021409 seconds
and
4
git commands to generate.