# -*- mode: snippet -*-
# name: ADR - Architectural Decision Record
# key: ;adr
# --
| *ID*                   | `(let ((max-id 0)) (save-excursion (goto-char (point-min)) (while (re-search-forward "| \\*ID\\*\\s-+|\\s-+ADR-\\([0-9]+\\)" nil t) (setq max-id (max max-id (string-to-number (match-string 1)))))) (format "ADR-%04d" (1+ max-id)))` |
| *Subject*              | ${1:Title}                |
|------------------------+---------------------------|
| *Problem statement*    |                           |
| *Decision*             |                           |
| *Alternatives*         |                           |
| *Justification*        |                           |
| *Implications*         |                           |
| *Derived requirements* |                           |
| *Status*               | ${2:Proposed}             |
$0