X-Git-Url: https://ruderich.org/simon/gitweb/?a=blobdiff_plain;ds=sidebyside;f=vim%2Fftplugin%2Fperl%2Fperl.xpt.vim;h=9c734bed3af759954ab99db5be32d1359b50f21c;hb=0e88dff40a8e3b25ab16f3b0effb294feb7a1024;hp=d2ec9fb571aeebe2681cc2765c866da594e0ccd3;hpb=6aa5d280eb14164d0d87feaa108614dded1961fa;p=config%2Fdotfiles.git

diff --git a/vim/ftplugin/perl/perl.xpt.vim b/vim/ftplugin/perl/perl.xpt.vim
index d2ec9fb..9c734be 100644
--- a/vim/ftplugin/perl/perl.xpt.vim
+++ b/vim/ftplugin/perl/perl.xpt.vim
@@ -6,7 +6,7 @@
 " Maintainer:   Simon Ruderich <simon@ruderich.org>
 " License:      GPL v3+
 
-" Copyright (C) 2012  Simon Ruderich
+" Copyright (C) 2012-2014  Simon Ruderich
 "
 " This file is free software: you can redistribute it and/or modify
 " it under the terms of the GNU General Public License as published by
@@ -21,15 +21,22 @@
 " You should have received a copy of the GNU General Public License
 " along with this file.  If not, see <http://www.gnu.org/licenses/>.
 
+
+" Prevent errors if XPTemplate is not installed.
+if !exists('g:XPT#ver')
+    finish
+endif
+
 XPTemplate priority=personal
 
 
 XPT perl
+XSET description|post=S(V(), '^description$', 'XXX')
 #!/usr/bin/perl
 
 # `description^
 
-# Copyright (C) `year^  Simon Ruderich
+# Copyright (C) `strftime("%Y")^  Simon Ruderich
 #
 # This program is free software: you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -50,3 +57,22 @@ use warnings;
 
 
 `cursor^
+
+
+XPT p
+print `value^;
+
+XPT pe
+print STDERR `value^;
+
+XPT pd
+print Dumper(`value^);
+
+
+XPT u
+use `package^;
+`cursor^
+
+XPT udd
+use Data::Dumper;
+`cursor^