From 897eee81de8b3f6adf0165f50e95600a7b89c20c Mon Sep 17 00:00:00 2001 From: Simeon Simeonov Date: Wed, 4 Feb 2015 21:41:42 +0100 Subject: Standalone lisp and snippet repo --- .emacs.d/mysnippets/text-mode/python-mode/defm | 33 -------------------------- 1 file changed, 33 deletions(-) delete mode 100644 .emacs.d/mysnippets/text-mode/python-mode/defm (limited to '.emacs.d/mysnippets/text-mode/python-mode/defm') diff --git a/.emacs.d/mysnippets/text-mode/python-mode/defm b/.emacs.d/mysnippets/text-mode/python-mode/defm deleted file mode 100644 index dc25827..0000000 --- a/.emacs.d/mysnippets/text-mode/python-mode/defm +++ /dev/null @@ -1,33 +0,0 @@ -# -*- coding: utf-8 -*- -# name: defm -# contributor: Yasser Gonz¨¢lez Fern¨¢ndez -# -- -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.3