* lisp/emacs-lisp/helpers.el (string-join): New function.
This commit is contained in:
parent
e4091d8586
commit
4301875e6e
3 changed files with 8 additions and 1 deletions
|
@ -37,6 +37,10 @@
|
|||
(maphash (lambda (_k v) (push v values)) hash-table)
|
||||
values))
|
||||
|
||||
(defsubst string-join (strings &optional separator)
|
||||
"Join all STRINGS using SEPARATOR."
|
||||
(mapconcat 'identity strings separator))
|
||||
|
||||
(defsubst string-trim-left (string)
|
||||
"Remove leading whitespace from STRING."
|
||||
(if (string-match "\\`[ \t\n\r]+" string)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue