prog-mode: Add snippets for SPDX-* comments (#512)

Author: a2379

snippets/prog-mode/.yas-setup.el

@@ -29,6 +29,13 @@
   "This function returns `comment-start' trimmed by whitespaces."
   (yas-s-trim comment-start))
 
+(defun yas-trimmed-add-comment ()
+  "This function returns `comment-start' trimmed by whitespaces. It uses
+`comment-add' to determine how many comment symbols to insert."
+  (yas-s-trim (apply #'concat (mapcar (lambda (x)
+                                        comment-start)
+                                      (number-sequence 0 comment-add)))))
+
 (defun yas-trimmed-comment-end ()
   "This function returns `comment-end' trimmed by whitespaces if
 `comment-end' is not empty. Otherwise the reversed output of

snippets/prog-mode/spdxcopyright

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# contributor: Antero Mejr <[email protected]>
+# name: spdxcopyright
+# key: spc
+# --
+`(yas-trimmed-add-comment)` SPDX-FileCopyrightText: $0`comment-end`

snippets/prog-mode/spdxlicense

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# contributor: Antero Mejr <[email protected]>
+# name: spdxlicense
+# key: spl
+# --
+`(yas-trimmed-add-comment)` SPDX-License-Identifier: $0`comment-end`