Common Lisp Programmatic Keyword

Question

Is there a function in Common Lisp that takes a string as an argument and returns a keyword?

Example: (keyword \"foo\") -> :foo

Answer 1

In case, you can change the string to start with colon sign :

use read-from-string directly.

Here is another version of make-keyword:

(defun make-keyword (name)
           (read-from-string (concatenate 'string ":" name)))