]> git.donarmstrong.com Git - lib.git/commitdiff
add more snippet rules
authorDon Armstrong <don@donarmstrong.com>
Tue, 6 Feb 2018 18:43:29 +0000 (10:43 -0800)
committerDon Armstrong <don@donarmstrong.com>
Tue, 6 Feb 2018 18:43:29 +0000 (10:43 -0800)
emacs_el/snippets/latex-mode/frame [new file with mode: 0644]
emacs_el/snippets/message-mode/unsub [new file with mode: 0644]
emacs_el/snippets/perl-mode/perlmodule [new file with mode: 0644]
emacs_el/snippets/spamassassin-mode/header [new file with mode: 0644]

diff --git a/emacs_el/snippets/latex-mode/frame b/emacs_el/snippets/latex-mode/frame
new file mode 100644 (file)
index 0000000..fe452bf
--- /dev/null
@@ -0,0 +1,7 @@
+# -*- mode: snippet -*-
+# name: frame
+# key: frame
+# --
+\begin{frame}
+$0
+\end{frame}
\ No newline at end of file
diff --git a/emacs_el/snippets/message-mode/unsub b/emacs_el/snippets/message-mode/unsub
new file mode 100644 (file)
index 0000000..7dd0c1c
--- /dev/null
@@ -0,0 +1,20 @@
+# -*- mode: snippet -*-
+# name: unsub
+# key: unsub
+# --
+I have caused an unsubscription cookie to be sent to your address.
+Please follow the instructions in it to complete the unsubscription
+process.
+
+In the future, if you want to unsubscribe and have forgotten the
+address you subscribed from, the recipient-address is coded into the
+Return-Path.
+
+Example: 
+
+Return-Path: <bounce-debian-devel=don=debian.org@lists.debian.org>
+                                  ^^^^^^^^^^^^^^
+
+Even if you are unable to send mail using that address, if you receive
+at that address, you can still unsubscribe using the web form;
+https://www.debian.org/MailingLists/unsubscribe
diff --git a/emacs_el/snippets/perl-mode/perlmodule b/emacs_el/snippets/perl-mode/perlmodule
new file mode 100644 (file)
index 0000000..230eeab
--- /dev/null
@@ -0,0 +1,55 @@
+# -*- mode: snippet -*-
+# name: perlmodule
+# key: perlmodule
+# expand-env: ((yas-indent-line -1))
+# --
+# This module is part of ${1:the_project}, and
+# is released under the terms of the GPL version 3, or any later
+# version (at your option). See the file README and COPYING for more
+# information.
+# Copyright `(format-time-string "%Y")` by Don Armstrong <don@donarmstrong.com>.
+
+package ${2:THEPACKAGE};
+
+=head1 NAME
+
+$2 -- $3
+
+=head1 SYNOPSIS
+
+C<use $2;>
+
+=head1 DESCRIPTION
+
+$4
+
+=cut
+
+use warnings;
+use strict;
+use vars qw($VERSION $DEBUG %EXPORT_TAGS @EXPORT_OK @EXPORT);
+use base qw(Exporter);
+
+BEGIN{
+     $VERSION = '0.1';
+     $DEBUG = 0 unless defined $DEBUG;
+
+     @EXPORT = ();
+     %EXPORT_TAGS = (#a    => [qw()],
+                   );
+     @EXPORT_OK = ();
+     Exporter::export_ok_tags(keys %EXPORT_TAGS);
+     $EXPORT_TAGS{all} = [@EXPORT_OK];
+
+}
+
+$0
+
+1;
+
+
+__END__
+# Local Variables:
+# indent-tabs-mode: nil
+# cperl-indent-level: 4
+# End:
diff --git a/emacs_el/snippets/spamassassin-mode/header b/emacs_el/snippets/spamassassin-mode/header
new file mode 100644 (file)
index 0000000..768263d
--- /dev/null
@@ -0,0 +1,7 @@
+# -*- mode: snippet -*-
+# name: header ... ...
+# key: header
+# --
+header ${1:RULE_NAME} ${2:Subject} =~ /$3/i
+describe $1 ${4}
+score $1 ${5:1.0}
\ No newline at end of file