From c13334d651b13d8b047cb3dc35ad3e1ef239013f Mon Sep 17 00:00:00 2001
From: Alexander Sulfrian <alexander@sulfrian.net>
Date: Thu, 22 Oct 2009 05:30:58 +0200
Subject: added snippets for loading with module from dotfiles

---
 emacs.d/snippets/text-mode/python-mode/defm | 33 +++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 emacs.d/snippets/text-mode/python-mode/defm

(limited to 'emacs.d/snippets/text-mode/python-mode/defm')

diff --git a/emacs.d/snippets/text-mode/python-mode/defm b/emacs.d/snippets/text-mode/python-mode/defm
new file mode 100644
index 0000000..dc25827
--- /dev/null
+++ b/emacs.d/snippets/text-mode/python-mode/defm
@@ -0,0 +1,33 @@
+# -*- coding: utf-8 -*-
+# name: defm
+# contributor: Yasser Gonz¨¢lez Fern¨¢ndez <yglez@uh.cu>
+# --
+def ${1:name}(self, $2):
+    """$3
+    ${2:$
+    (let* ((indent
+            (concat "\n" (make-string (current-column) 32)))
+           (args
+            (mapconcat
+             '(lambda (x)
+                (if (not (string= (nth 0 x) ""))
+                    (concat "- " (char-to-string 96) (nth 0 x)
+                            (char-to-string 96) ":")))
+             (mapcar
+              '(lambda (x)
+                 (mapcar
+                  '(lambda (x)
+                     (replace-regexp-in-string "[[:blank:]]*$" ""
+                      (replace-regexp-in-string "^[[:blank:]]*" "" x)))
+                  x))
+              (mapcar '(lambda (x) (split-string x "="))
+                      (split-string text ",")))
+             indent)))
+      (if (string= args "")
+          (make-string 3 34)
+        (mapconcat
+         'identity
+         (list "" "Arguments:" args (make-string 3 34))
+         indent)))
+    }
+    $0
-- 
cgit v1.2.3