# -*- mode: snippet -*-
# name: ADR - Architectural Decision Record
# key: ;adr
# --
* `(let ((max-id 0)) (save-excursion (goto-char (point-min)) (while (re-search-forward "^\\* ADR-\\([0-9]+\\)" nil t) (setq max-id (max max-id (string-to-number (match-string 1)))))) (format "ADR-%04d" (1+ max-id)))` - ${1:Subject}

| *ID*      | `(let ((max-id 0)) (save-excursion (goto-char (point-min)) (while (re-search-forward "^\\* 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:Subject}   |
| *Status*  | ${2:Proposed}  |
| *Date*    | `(format-time-string "%Y-%m-%d")` |

*** Problem statement

*** Decision

*** Alternatives

*** Justification

*** Implications

*** Derived requirements
$0