Function: forge-create-mark

forge-create-mark is an interactive and natively compiled function defined in forge-commands.el.

Signature

(forge-create-mark NAME FACE DESCRIPTION)

Documentation

Define a new mark that topics can be marked with.

Key Bindings

This command is not in any keymaps.

Source Code

;; Defined in /nix/store/923zwib42c4qw6x4xps0cv1wi8qcd6lp-emacs-packages-deps/share/emacs/site-lisp/elpa/forge-20261005.753/forge-commands.el
;;; Marks

(defun forge-create-mark (name face description)
  "Define a new mark that topics can be marked with."
  (interactive
    (list (read-string "Name: ")
          (magit-read-char-case "Set appearance using " nil
            (?n "a face [n]ame"
                (read-face-name "Face name: "))
            (?s "face [s]exp"
                (read-from-minibuffer
                 "Face sexp: "
                 "(:background \"\" :foreground \"\" :box t)"
                 read-expression-map t)))
          (let ((str (read-string "Description: ")))
            (and (not (equal str "")) str))))
  (forge-sql [:insert-into mark :values $v1]
             (vector nil (forge--uuid) name face description)))