# -*- coding: utf-8 -*- # name: def # contributor: Orestis Markou # contributor: Yasser González Fernández # key: def # -- def ${1:name}($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