summaryrefslogtreecommitdiff
path: root/.localrepo/forge-20250916.1119.tar
blob: de5301ff9dd48f408f8c28a66438cfcf35b9c72c (plain)
ofshex dumpascii
0000 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 00 00 00 00 00 00 00 00 00 00 00 00 forge-20250916.1119/............
0020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0060 00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000755.0000000.0000000.0000
0080 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 31 31 37 00 20 35 00 00 00 0000000.00000000000.012117..5...
00a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
00c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
00e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0100 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0120 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0200 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 2e 64 69 72 2d 6c 6f 63 61 6c 73 2e forge-20250916.1119/.dir-locals.
0220 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 el..............................
0240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0260 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
0280 30 30 30 30 34 36 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 35 31 00 20 30 00 00 00 0000461.00000000000.014551..0...
02a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
02c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
02e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0300 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0320 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0400 28 28 6e 69 6c 0a 20 20 28 69 6e 64 65 6e 74 2d 74 61 62 73 2d 6d 6f 64 65 20 2e 20 6e 69 6c 29 ((nil...(indent-tabs-mode...nil)
0420 29 0a 20 28 6d 61 6b 65 66 69 6c 65 2d 6d 6f 64 65 0a 20 20 28 69 6e 64 65 6e 74 2d 74 61 62 73 )..(makefile-mode...(indent-tabs
0440 2d 6d 6f 64 65 20 2e 20 74 29 29 0a 20 28 67 69 74 2d 63 6f 6d 6d 69 74 2d 6d 6f 64 65 0a 20 20 -mode...t))..(git-commit-mode...
0460 28 67 69 74 2d 63 6f 6d 6d 69 74 2d 6d 61 6a 6f 72 2d 6d 6f 64 65 20 2e 20 67 69 74 2d 63 6f 6d (git-commit-major-mode...git-com
0480 6d 69 74 2d 65 6c 69 73 70 2d 74 65 78 74 2d 6d 6f 64 65 29 29 0a 20 28 22 2e 67 69 74 68 75 62 mit-elisp-text-mode))..(".github
04a0 2f 50 55 4c 4c 5f 52 45 51 55 45 53 54 5f 54 45 4d 50 4c 41 54 45 22 0a 20 20 28 6e 69 6c 20 28 /PULL_REQUEST_TEMPLATE"...(nil.(
04c0 74 72 75 6e 63 61 74 65 2d 6c 69 6e 65 73 20 2e 20 6e 69 6c 29 29 29 0a 20 28 22 43 48 41 4e 47 truncate-lines...nil)))..("CHANG
04e0 45 4c 4f 47 22 0a 20 20 28 6e 69 6c 20 28 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 2e 20 37 30 29 0a ELOG"...(nil.(fill-column...70).
0500 20 20 20 20 20 20 20 28 6d 6f 64 65 20 2e 20 64 69 73 70 6c 61 79 2d 66 69 6c 6c 2d 63 6f 6c 75 .......(mode...display-fill-colu
0520 6d 6e 2d 69 6e 64 69 63 61 74 6f 72 29 29 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 mn-indicator))))................
0540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
05a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
05c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
05e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0600 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 64 69 72 00 00 00 00 00 00 00 00 00 forge-20250916.1119/dir.........
0620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0660 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
0680 30 30 30 31 31 34 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 36 31 36 00 20 30 00 00 00 0001142.00000000000.012616..0...
06a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
06c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
06e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0700 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0720 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0800 54 68 69 73 20 69 73 20 74 68 65 20 66 69 6c 65 20 2e 2e 2e 2f 69 6e 66 6f 2f 64 69 72 2c 20 77 This.is.the.file..../info/dir,.w
0820 68 69 63 68 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 0a 74 6f 70 6d 6f 73 74 20 6e 6f 64 65 20 6f hich.contains.the.topmost.node.o
0840 66 20 74 68 65 20 49 6e 66 6f 20 68 69 65 72 61 72 63 68 79 2c 20 63 61 6c 6c 65 64 20 28 64 69 f.the.Info.hierarchy,.called.(di
0860 72 29 54 6f 70 2e 0a 54 68 65 20 66 69 72 73 74 20 74 69 6d 65 20 79 6f 75 20 69 6e 76 6f 6b 65 r)Top..The.first.time.you.invoke
0880 20 49 6e 66 6f 20 79 6f 75 20 73 74 61 72 74 20 6f 66 66 20 6c 6f 6f 6b 69 6e 67 20 61 74 20 74 .Info.you.start.off.looking.at.t
08a0 68 69 73 20 6e 6f 64 65 2e 0a 1f 0a 46 69 6c 65 3a 20 64 69 72 2c 09 4e 6f 64 65 3a 20 54 6f 70 his.node....File:.dir,.Node:.Top
08c0 09 54 68 69 73 20 69 73 20 74 68 65 20 74 6f 70 20 6f 66 20 74 68 65 20 49 4e 46 4f 20 74 72 65 .This.is.the.top.of.the.INFO.tre
08e0 65 0a 0a 20 20 54 68 69 73 20 28 74 68 65 20 44 69 72 65 63 74 6f 72 79 20 6e 6f 64 65 29 20 67 e....This.(the.Directory.node).g
0900 69 76 65 73 20 61 20 6d 65 6e 75 20 6f 66 20 6d 61 6a 6f 72 20 74 6f 70 69 63 73 2e 0a 20 20 54 ives.a.menu.of.major.topics....T
0920 79 70 69 6e 67 20 22 71 22 20 65 78 69 74 73 2c 20 22 48 22 20 6c 69 73 74 73 20 61 6c 6c 20 49 yping."q".exits,."H".lists.all.I
0940 6e 66 6f 20 63 6f 6d 6d 61 6e 64 73 2c 20 22 64 22 20 72 65 74 75 72 6e 73 20 68 65 72 65 2c 0a nfo.commands,."d".returns.here,.
0960 20 20 22 68 22 20 67 69 76 65 73 20 61 20 70 72 69 6d 65 72 20 66 6f 72 20 66 69 72 73 74 2d 74 .."h".gives.a.primer.for.first-t
0980 69 6d 65 72 73 2c 0a 20 20 22 6d 45 6d 61 63 73 3c 52 65 74 75 72 6e 3e 22 20 76 69 73 69 74 73 imers,..."mEmacs<Return>".visits
09a0 20 74 68 65 20 45 6d 61 63 73 20 6d 61 6e 75 61 6c 2c 20 65 74 63 2e 0a 0a 20 20 49 6e 20 45 6d .the.Emacs.manual,.etc.....In.Em
09c0 61 63 73 2c 20 79 6f 75 20 63 61 6e 20 63 6c 69 63 6b 20 6d 6f 75 73 65 20 62 75 74 74 6f 6e 20 acs,.you.can.click.mouse.button.
09e0 32 20 6f 6e 20 61 20 6d 65 6e 75 20 69 74 65 6d 20 6f 72 20 63 72 6f 73 73 20 72 65 66 65 72 65 2.on.a.menu.item.or.cross.refere
0a00 6e 63 65 0a 20 20 74 6f 20 73 65 6c 65 63 74 20 69 74 2e 0a 0a 2a 20 4d 65 6e 75 3a 0a 0a 45 6d nce...to.select.it...*.Menu:..Em
0a20 61 63 73 0a 2a 20 46 6f 72 67 65 3a 20 28 66 6f 72 67 65 29 2e 20 20 20 20 20 20 20 20 20 20 20 acs.*.Forge:.(forge)............
0a40 20 20 20 20 41 63 63 65 73 73 20 47 69 74 20 46 6f 72 67 65 73 20 66 72 6f 6d 20 4d 61 67 69 74 ....Access.Git.Forges.from.Magit
0a60 2e 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0c00 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 62 69 74 62 75 63 forge-20250916.1119/forge-bitbuc
0c20 6b 65 74 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ket.el..........................
0c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0c60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
0c80 30 30 30 33 37 36 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 35 33 31 00 20 30 00 00 00 0003766.00000000000.015531..0...
0ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0d00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0d20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0e00 3b 3b 3b 20 66 6f 72 67 65 2d 62 69 74 62 75 63 6b 65 74 2e 65 6c 20 2d 2d 2d 20 42 69 74 62 75 ;;;.forge-bitbucket.el.---.Bitbu
0e20 63 6b 65 74 20 73 75 70 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e cket.support..-*-.lexical-bindin
0e40 67 3a 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 g:t.-*-..;;.Copyright.(C).2018-2
0e60 30 32 35 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 025.Jonas.Bernoulli..;;.Author:.
0e80 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e Jonas.Bernoulli.<emacs.forge@jon
0ea0 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a as.bernoulli.dev>.;;.Maintainer:
0ec0 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f .Jonas.Bernoulli.<emacs.forge@jo
0ee0 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 nas.bernoulli.dev>..;;.SPDX-Lice
0f00 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 nse-Identifier:.GPL-3.0-or-later
0f20 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a ..;;.This.file.is.free.software:
0f40 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 .you.can.redistribute.it.and/or.
0f60 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 modify.;;.it.under.the.terms.of.
0f80 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 the.GNU.General.Public.License.a
0fa0 73 20 70 75 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 s.published.;;.by.the.Free.Softw
0fc0 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 are.Foundation,.either.version.3
0fe0 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 .of.the.License,.;;.or.(at.your.
1000 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b option).any.later.version..;;.;;
1020 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 .This.file.is.distributed.in.the
1040 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b .hope.that.it.will.be.useful,.;;
1060 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f .but.WITHOUT.ANY.WARRANTY;.witho
1080 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a ut.even.the.implied.warranty.of.
10a0 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f ;;.MERCHANTABILITY.or.FITNESS.FO
10c0 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 R.A.PARTICULAR.PURPOSE...See.the
10e0 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 .;;.GNU.General.Public.License.f
1100 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c or.more.details..;;.;;.You.shoul
1120 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e d.have.received.a.copy.of.the.GN
1140 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e U.General.Public.License.;;.alon
1160 67 20 77 69 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c g.with.this.file...If.not,.see.<
1180 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a https://www.gnu.org/licenses/>..
11a0 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 0a 3b 3b .;;;.Code:..(require.'forge)..;;
11c0 3b 20 43 6c 61 73 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 62 69 74 62 75 63 6b ;.Class..(defclass.forge-bitbuck
11e0 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 6e 6f 61 70 69 2d 72 65 70 6f 73 et-repository.(forge-noapi-repos
1200 69 74 6f 72 79 29 0a 20 20 28 28 69 73 73 75 65 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 itory)...((issues-url-format....
1220 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e .....:initform."https://%h/%o/%n
1240 2f 69 73 73 75 65 73 22 29 0a 20 20 20 28 69 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 /issues")....(issue-url-format..
1260 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f ........:initform."https://%h/%o
1280 2f 25 6e 2f 69 73 73 75 65 73 2f 25 69 22 29 0a 20 20 20 3b 3b 20 54 68 65 20 61 6e 63 68 6f 72 /%n/issues/%i")....;;.The.anchor
12a0 20 66 6f 72 20 74 68 65 20 69 73 73 75 65 20 69 74 73 65 6c 66 20 69 73 20 2e 2e 2e 2f 25 69 23 .for.the.issue.itself.is..../%i#
12c0 69 73 73 75 65 2d 25 69 0a 20 20 20 28 69 73 73 75 65 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d issue-%i....(issue-post-url-form
12e0 61 74 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f at.....:initform."https://%h/%o/
1300 25 6e 2f 69 73 73 75 65 73 2f 25 69 23 63 6f 6d 6d 65 6e 74 2d 25 49 22 29 0a 20 20 20 28 70 75 %n/issues/%i#comment-%I")....(pu
1320 6c 6c 72 65 71 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 llreqs-url-format.......:initfor
1340 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 2d 72 65 71 75 65 73 74 m."https://%h/%o/%n/pull-request
1360 73 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 s")....(pullreq-url-format......
1380 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 ..:initform."https://%h/%o/%n/pu
13a0 6c 6c 2d 72 65 71 75 65 73 74 73 2f 25 69 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 70 6f 73 ll-requests/%i")....(pullreq-pos
13c0 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a t-url-format...:initform."https:
13e0 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2f 25 69 23 63 6f 6d 6d //%h/%o/%n/pull-requests/%i#comm
1400 65 6e 74 2d 25 49 22 29 0a 20 20 20 28 63 6f 6d 6d 69 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 ent-%I")....(commit-url-format..
1420 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f .......:initform."https://%h/%o/
1440 25 6e 2f 63 6f 6d 6d 69 74 73 2f 25 72 22 29 0a 20 20 20 28 62 72 61 6e 63 68 2d 75 72 6c 2d 66 %n/commits/%r")....(branch-url-f
1460 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f ormat.........:initform."https:/
1480 2f 25 68 2f 25 6f 2f 25 6e 2f 62 72 61 6e 63 68 2f 25 72 22 29 0a 20 20 20 28 72 65 6d 6f 74 65 /%h/%o/%n/branch/%r")....(remote
14a0 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 -url-format.........:initform."h
14c0 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 73 72 63 22 29 0a 20 20 20 28 62 6c 6f 62 2d 75 ttps://%h/%o/%n/src")....(blob-u
14e0 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 rl-format...........:initform."h
1500 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 73 72 63 2f 25 72 2f 25 66 22 29 0a 20 20 20 28 ttps://%h/%o/%n/src/%r/%f")....(
1520 63 72 65 61 74 65 2d 69 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 3a 69 6e 69 74 66 create-issue-url-format...:initf
1540 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 65 73 2f 6e 65 77 orm."https://%h/%o/%n/issues/new
1560 22 29 0a 20 20 20 28 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 ")....(create-pullreq-url-format
1580 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c .:initform."https://%h/%o/%n/pul
15a0 6c 2d 72 65 71 75 65 73 74 73 2f 6e 65 77 22 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 28 70 72 6f 76 69 l-requests/new")))..;;;._.(provi
15c0 64 65 20 27 66 6f 72 67 65 2d 62 69 74 62 75 63 6b 65 74 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 62 de.'forge-bitbucket).;;;.forge-b
15e0 69 74 62 75 63 6b 65 74 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 itbucket.el.ends.here...........
1600 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 63 6c 69 65 6e 74 forge-20250916.1119/forge-client
1620 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .el.............................
1640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1660 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
1680 30 30 31 34 32 37 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 33 30 00 20 30 00 00 00 0014275.00000000000.015030..0...
16a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1700 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
1720 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
1740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1800 3b 3b 3b 20 66 6f 72 67 65 2d 63 6c 69 65 6e 74 2e 65 6c 20 2d 2d 2d 20 47 72 61 70 68 51 4c 20 ;;;.forge-client.el.---.GraphQL.
1820 61 6e 64 20 52 45 53 54 20 73 75 70 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 and.REST.support..-*-.lexical-bi
1840 6e 64 69 6e 67 3a 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 nding:t.-*-..;;.Copyright.(C).20
1860 31 38 2d 32 30 32 35 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 18-2025.Jonas.Bernoulli..;;.Auth
1880 6f 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 or:.Jonas.Bernoulli.<emacs.forge
18a0 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 @jonas.bernoulli.dev>.;;.Maintai
18c0 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 ner:.Jonas.Bernoulli.<emacs.forg
18e0 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d e@jonas.bernoulli.dev>..;;.SPDX-
1900 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c License-Identifier:.GPL-3.0-or-l
1920 61 74 65 72 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 ater..;;.This.file.is.free.softw
1940 61 72 65 3a 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 are:.you.can.redistribute.it.and
1960 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 /or.modify.;;.it.under.the.terms
1980 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e .of.the.GNU.General.Public.Licen
19a0 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 se.as.published.;;.by.the.Free.S
19c0 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 oftware.Foundation,.either.versi
19e0 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 on.3.of.the.License,.;;.or.(at.y
1a00 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b our.option).any.later.version..;
1a20 3b 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e ;.;;.This.file.is.distributed.in
1a40 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c .the.hope.that.it.will.be.useful
1a60 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 ,.;;.but.WITHOUT.ANY.WARRANTY;.w
1a80 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 ithout.even.the.implied.warranty
1aa0 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 .of.;;.MERCHANTABILITY.or.FITNES
1ac0 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 S.FOR.A.PARTICULAR.PURPOSE...See
1ae0 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e .the.;;.GNU.General.Public.Licen
1b00 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 se.for.more.details..;;.;;.You.s
1b20 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 hould.have.received.a.copy.of.th
1b40 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 e.GNU.General.Public.License.;;.
1b60 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 along.with.this.file...If.not,.s
1b80 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 ee.<https://www.gnu.org/licenses
1ba0 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 />...;;;.Code:..(require.'forge)
1bc0 0a 0a 3b 3b 3b 20 47 72 61 70 68 51 4c 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d ..;;;.GraphQL..(cl-defun.forge--
1be0 71 75 65 72 79 20 28 20 6f 62 6a 2d 6f 72 2d 68 6f 73 74 20 71 75 65 72 79 20 76 61 72 69 61 62 query.(.obj-or-host.query.variab
1c00 6c 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6b 65 les..........................&ke
1c20 79 20 63 61 6c 6c 62 61 63 6b 20 65 72 72 6f 72 62 61 63 6b 20 6e 6f 65 72 72 6f 72 20 6e 61 72 y.callback.errorback.noerror.nar
1c40 72 6f 77 20 75 6e 74 69 6c 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 row.until)...(declare.(indent.de
1c60 66 75 6e 29 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 68 6f 73 74 20 2c 66 6f fun))...(pcase-let.((`(,host.,fo
1c80 72 67 65 29 20 28 66 6f 72 67 65 2d 2d 68 6f 73 74 2d 61 72 67 75 6d 65 6e 74 73 20 6f 62 6a 2d rge).(forge--host-arguments.obj-
1ca0 6f 72 2d 68 6f 73 74 29 29 29 0a 20 20 20 20 28 67 68 75 62 2d 71 75 65 72 79 20 71 75 65 72 79 or-host))).....(ghub-query.query
1cc0 20 76 61 72 69 61 62 6c 65 73 0a 20 20 20 20 20 20 3a 61 75 74 68 20 27 66 6f 72 67 65 20 3a 68 .variables.......:auth.'forge.:h
1ce0 6f 73 74 20 68 6f 73 74 20 3a 66 6f 72 67 65 20 66 6f 72 67 65 0a 20 20 20 20 20 20 3a 63 61 6c ost.host.:forge.forge.......:cal
1d00 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b 20 3a 65 72 72 6f 72 62 61 63 6b 20 65 72 72 6f 72 62 lback.callback.:errorback.errorb
1d20 61 63 6b 20 3a 6e 6f 65 72 72 6f 72 20 6e 6f 65 72 72 6f 72 0a 20 20 20 20 20 20 3a 6e 61 72 72 ack.:noerror.noerror.......:narr
1d40 6f 77 20 6e 61 72 72 6f 77 20 3a 75 6e 74 69 6c 20 75 6e 74 69 6c 29 29 29 0a 0a 28 63 6c 2d 64 ow.narrow.:until.until)))..(cl-d
1d60 65 66 6d 61 63 72 6f 20 66 6f 72 67 65 2d 71 75 65 72 79 20 28 20 6f 62 6a 2d 6f 72 2d 68 6f 73 efmacro.forge-query.(.obj-or-hos
1d80 74 20 71 75 65 72 79 20 76 61 72 69 61 62 6c 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.query.variables...............
1da0 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6b 65 79 20 63 61 6c 6c 62 61 63 6b 20 65 72 72 6f 72 .............&key.callback.error
1dc0 62 61 63 6b 20 6e 6f 65 72 72 6f 72 20 6e 61 72 72 6f 77 20 75 6e 74 69 6c 29 0a 20 20 28 64 65 back.noerror.narrow.until)...(de
1de0 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 60 28 66 6f 72 67 65 2d clare.(indent.defun))...`(forge-
1e00 2d 71 75 65 72 79 20 2c 6f 62 6a 2d 6f 72 2d 68 6f 73 74 0a 20 20 20 20 20 27 28 71 75 65 72 79 -query.,obj-or-host......'(query
1e20 20 2c 71 75 65 72 79 29 0a 20 20 20 20 20 2c 28 66 6f 72 67 65 2d 2d 70 72 65 70 61 72 65 2d 76 .,query)......,(forge--prepare-v
1e40 61 72 69 61 62 6c 65 73 20 76 61 72 69 61 62 6c 65 73 29 0a 20 20 20 20 20 3a 63 61 6c 6c 62 61 ariables.variables)......:callba
1e60 63 6b 20 2c 63 61 6c 6c 62 61 63 6b 20 3a 65 72 72 6f 72 62 61 63 6b 20 2c 65 72 72 6f 72 62 61 ck.,callback.:errorback.,errorba
1e80 63 6b 20 3a 6e 6f 65 72 72 6f 72 20 2c 6e 6f 65 72 72 6f 72 0a 20 20 20 20 20 3a 6e 61 72 72 6f ck.:noerror.,noerror......:narro
1ea0 77 20 2c 6e 61 72 72 6f 77 20 3a 75 6e 74 69 6c 20 2c 75 6e 74 69 6c 29 29 0a 0a 28 63 6c 2d 64 w.,narrow.:until.,until))..(cl-d
1ec0 65 66 6d 61 63 72 6f 20 66 6f 72 67 65 2d 6d 75 74 61 74 65 20 28 20 6f 62 6a 2d 6f 72 2d 68 6f efmacro.forge-mutate.(.obj-or-ho
1ee0 73 74 20 6d 75 74 61 74 69 6f 6e 20 76 61 72 69 61 62 6c 65 73 0a 20 20 20 20 20 20 20 20 20 20 st.mutation.variables...........
1f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6b 65 79 20 63 61 6c 6c 62 61 63 6b 20 ..................&key.callback.
1f20 65 72 72 6f 72 62 61 63 6b 20 6e 6f 65 72 72 6f 72 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 errorback.noerror)...(declare.(i
1f40 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 60 28 66 6f 72 67 65 2d 2d 71 75 65 72 79 20 2c ndent.defun))...`(forge--query.,
1f60 6f 62 6a 2d 6f 72 2d 68 6f 73 74 0a 20 20 20 20 20 27 2c 28 67 68 75 62 2d 2d 70 72 65 70 61 72 obj-or-host......',(ghub--prepar
1f80 65 2d 6d 75 74 61 74 69 6f 6e 20 6d 75 74 61 74 69 6f 6e 29 0a 20 20 20 20 20 28 6c 69 73 74 20 e-mutation.mutation)......(list.
1fa0 28 63 6f 6e 73 20 27 69 6e 70 75 74 20 2c 28 66 6f 72 67 65 2d 2d 70 72 65 70 61 72 65 2d 76 61 (cons.'input.,(forge--prepare-va
1fc0 72 69 61 62 6c 65 73 20 76 61 72 69 61 62 6c 65 73 29 29 29 0a 20 20 20 20 20 3a 63 61 6c 6c 62 riables.variables)))......:callb
1fe0 61 63 6b 20 2c 63 61 6c 6c 62 61 63 6b 20 3a 65 72 72 6f 72 62 61 63 6b 20 2c 65 72 72 6f 72 62 ack.,callback.:errorback.,errorb
2000 61 63 6b 20 3a 6e 6f 65 72 72 6f 72 20 2c 6e 6f 65 72 72 6f 72 29 29 0a 0a 28 63 6c 2d 64 65 66 ack.:noerror.,noerror))..(cl-def
2020 6d 61 63 72 6f 20 66 6f 72 67 65 2d 2d 6d 75 74 61 74 65 2d 66 69 65 6c 64 20 28 74 6f 70 69 63 macro.forge--mutate-field.(topic
2040 20 6d 75 74 61 74 69 6f 6e 20 76 61 72 69 61 62 6c 65 73 29 0a 20 20 28 64 65 63 6c 61 72 65 20 .mutation.variables)...(declare.
2060 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 60 28 6c 65 74 20 28 28 74 6f 70 69 63 20 (indent.defun))...`(let.((topic.
2080 2c 74 6f 70 69 63 29 29 0a 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 71 75 65 72 79 20 74 6f 70 69 ,topic))......(forge--query.topi
20a0 63 0a 20 20 20 20 20 20 20 27 2c 28 67 68 75 62 2d 2d 70 72 65 70 61 72 65 2d 6d 75 74 61 74 69 c........',(ghub--prepare-mutati
20c0 6f 6e 20 6d 75 74 61 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 on.mutation)........(list.(cons.
20e0 27 69 6e 70 75 74 20 2c 28 66 6f 72 67 65 2d 2d 70 72 65 70 61 72 65 2d 76 61 72 69 61 62 6c 65 'input.,(forge--prepare-variable
2100 73 20 76 61 72 69 61 62 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 s.variables)))........:callback.
2120 28 66 6f 72 67 65 2d 2d 73 65 74 2d 66 69 65 6c 64 2d 63 61 6c 6c 62 61 63 6b 20 74 6f 70 69 63 (forge--set-field-callback.topic
2140 29 29 29 29 0a 0a 3b 3b 3b 20 52 45 53 54 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d ))))..;;;.REST..(cl-defun.forge-
2160 2d 72 65 73 74 20 28 20 6f 62 6a 2d 6f 72 2d 68 6f 73 74 20 6d 65 74 68 6f 64 20 72 65 73 6f 75 -rest.(.obj-or-host.method.resou
2180 72 63 65 20 26 6f 70 74 69 6f 6e 61 6c 20 70 61 72 61 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 rce.&optional.params............
21a0 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6b 65 79 20 63 61 6c 6c 62 61 63 6b 20 65 72 72 6f 72 .............&key.callback.error
21c0 62 61 63 6b 20 6e 6f 65 72 72 6f 72 20 75 6e 70 61 67 69 6e 61 74 65 29 0a 20 20 28 64 65 63 6c back.noerror.unpaginate)...(decl
21e0 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 are.(indent.defun))...(pcase-let
2200 20 28 28 60 28 2c 68 6f 73 74 20 2c 66 6f 72 67 65 29 20 28 66 6f 72 67 65 2d 2d 68 6f 73 74 2d .((`(,host.,forge).(forge--host-
2220 61 72 67 75 6d 65 6e 74 73 20 6f 62 6a 2d 6f 72 2d 68 6f 73 74 29 29 29 0a 20 20 20 20 28 67 68 arguments.obj-or-host))).....(gh
2240 75 62 2d 72 65 71 75 65 73 74 20 6d 65 74 68 6f 64 0a 20 20 20 20 20 20 28 69 66 20 28 63 6c 2d ub-request.method.......(if.(cl-
2260 74 79 70 65 70 20 6f 62 6a 2d 6f 72 2d 68 6f 73 74 20 27 66 6f 72 67 65 2d 6f 62 6a 65 63 74 29 typep.obj-or-host.'forge-object)
2280 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 72 65 73 6f 75 72 ...........(forge--format-resour
22a0 63 65 20 6f 62 6a 2d 6f 72 2d 68 6f 73 74 20 72 65 73 6f 75 72 63 65 29 0a 20 20 20 20 20 20 20 ce.obj-or-host.resource)........
22c0 20 72 65 73 6f 75 72 63 65 29 0a 20 20 20 20 20 20 70 61 72 61 6d 73 0a 20 20 20 20 20 20 3a 61 .resource).......params.......:a
22e0 75 74 68 20 27 66 6f 72 67 65 20 3a 68 6f 73 74 20 68 6f 73 74 20 3a 66 6f 72 67 65 20 66 6f 72 uth.'forge.:host.host.:forge.for
2300 67 65 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b 20 3a 65 72 72 ge.......:callback.callback.:err
2320 6f 72 62 61 63 6b 20 65 72 72 6f 72 62 61 63 6b 20 3a 6e 6f 65 72 72 6f 72 20 6e 6f 65 72 72 6f orback.errorback.:noerror.noerro
2340 72 0a 20 20 20 20 20 20 3a 75 6e 70 61 67 69 6e 61 74 65 20 75 6e 70 61 67 69 6e 61 74 65 29 29 r.......:unpaginate.unpaginate))
2360 29 0a 0a 28 63 6c 2d 64 65 66 6d 61 63 72 6f 20 66 6f 72 67 65 2d 72 65 73 74 20 28 20 6f 62 6a )..(cl-defmacro.forge-rest.(.obj
2380 2d 6f 72 2d 68 6f 73 74 20 6d 65 74 68 6f 64 20 72 65 73 6f 75 72 63 65 20 26 6f 70 74 69 6f 6e -or-host.method.resource.&option
23a0 61 6c 20 70 61 72 61 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 al.params.......................
23c0 20 20 20 20 26 6b 65 79 20 63 61 6c 6c 62 61 63 6b 20 65 72 72 6f 72 62 61 63 6b 20 6e 6f 65 72 ....&key.callback.errorback.noer
23e0 72 6f 72 20 75 6e 70 61 67 69 6e 61 74 65 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 ror.unpaginate)...(declare.(inde
2400 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 60 28 66 6f 72 67 65 2d 2d 72 65 73 74 20 2c 6f 62 6a 2d nt.defun))...`(forge--rest.,obj-
2420 6f 72 2d 68 6f 73 74 20 2c 6d 65 74 68 6f 64 20 2c 72 65 73 6f 75 72 63 65 0a 20 20 20 20 20 2c or-host.,method.,resource......,
2440 28 66 6f 72 67 65 2d 2d 70 72 65 70 61 72 65 2d 76 61 72 69 61 62 6c 65 73 20 70 61 72 61 6d 73 (forge--prepare-variables.params
2460 29 0a 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 2c 63 61 6c 6c 62 61 63 6b 20 3a 65 72 72 6f )......:callback.,callback.:erro
2480 72 62 61 63 6b 20 2c 65 72 72 6f 72 62 61 63 6b 20 3a 6e 6f 65 72 72 6f 72 20 2c 6e 6f 65 72 72 rback.,errorback.:noerror.,noerr
24a0 6f 72 0a 20 20 20 20 20 3a 75 6e 70 61 67 69 6e 61 74 65 20 2c 75 6e 70 61 67 69 6e 61 74 65 29 or......:unpaginate.,unpaginate)
24c0 29 0a 0a 3b 3b 3b 20 49 6e 74 65 72 6e 61 6c 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 68 )..;;;.Internal..(defun.forge--h
24e0 6f 73 74 2d 61 72 67 75 6d 65 6e 74 73 20 28 6f 62 6a 2d 6f 72 2d 68 6f 73 74 29 0a 20 20 28 6c ost-arguments.(obj-or-host)...(l
2500 65 74 2a 20 28 28 72 65 70 6f 20 28 61 6e 64 20 28 63 6c 2d 74 79 70 65 70 20 6f 62 6a 2d 6f 72 et*.((repo.(and.(cl-typep.obj-or
2520 2d 68 6f 73 74 20 27 66 6f 72 67 65 2d 6f 62 6a 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 -host.'forge-object)............
2540 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 6f .........(forge-get-repository.o
2560 62 6a 2d 6f 72 2d 68 6f 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 68 6f 73 74 20 28 69 66 bj-or-host)))..........(host.(if
2580 20 28 73 74 72 69 6e 67 70 20 6f 62 6a 2d 6f 72 2d 68 6f 73 74 29 0a 20 20 20 20 20 20 20 20 20 .(stringp.obj-or-host)..........
25a0 20 20 20 20 20 20 20 20 20 20 6f 62 6a 2d 6f 72 2d 68 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 ..........obj-or-host...........
25c0 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 61 70 69 68 6f 73 74 29 29 29 29 0a 20 20 .......(oref.repo.apihost))))...
25e0 20 20 28 6c 69 73 74 20 68 6f 73 74 20 28 70 63 61 73 65 20 28 69 66 20 72 65 70 6f 0a 20 20 20 ..(list.host.(pcase.(if.repo....
2600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 69 65 69 6f 2d 6f 62 .......................(eieio-ob
2620 6a 65 63 74 2d 63 6c 61 73 73 2d 6e 61 6d 65 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 ject-class-name.repo)...........
2640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 33 20 28 63 6c 2d 66 69 6e 64 20 68 6f ..............(nth.3.(cl-find.ho
2660 73 74 20 66 6f 72 67 65 2d 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 st.forge-alist..................
2680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 65 79 20 23 27 63 61 .......................:key.#'ca
26a0 64 72 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 dr.:test.#'equal))).............
26c0 20 20 20 20 20 28 27 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 20 27 .....('forge-github-repository.'
26e0 67 69 74 68 75 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 66 6f 72 67 65 github)..................('forge
2700 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 20 27 67 69 74 6c 61 62 29 0a 20 20 20 20 -gitlab-repository.'gitlab).....
2720 20 20 20 20 20 20 20 20 20 20 20 20 20 28 5f 20 27 67 69 74 68 75 62 29 29 29 29 29 0a 0a 28 64 .............(_.'github)))))..(d
2740 65 66 75 6e 20 67 68 75 62 2d 2d 70 72 65 70 61 72 65 2d 6d 75 74 61 74 69 6f 6e 20 28 6d 75 74 efun.ghub--prepare-mutation.(mut
2760 61 74 69 6f 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 76 61 72 29 0a 20 20 60 28 6d 75 74 61 74 69 6f ation.&optional.var)...`(mutatio
2780 6e 0a 20 20 20 20 28 2c 6d 75 74 61 74 69 6f 6e 0a 20 20 20 20 20 5b 28 69 6e 70 75 74 20 2c 28 n.....(,mutation......[(input.,(
27a0 69 66 20 76 61 72 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 24 25 73 22 20 76 61 72 if.var.(intern.(format."$%s".var
27c0 29 29 20 27 24 69 6e 70 75 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 6c 65 74 20 28 )).'$input)..............,(let.(
27e0 28 6e 61 6d 65 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 6d 75 74 61 74 69 6f 6e 29 29 29 0a 20 (name.(symbol-name.mutation)))..
2800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 ...............(intern.(format."
2820 25 73 25 73 49 6e 70 75 74 21 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 %s%sInput!".....................
2840 20 20 20 20 20 20 20 20 20 20 20 20 28 75 70 63 61 73 65 20 28 73 75 62 73 74 72 69 6e 67 20 6e ............(upcase.(substring.n
2860 61 6d 65 20 30 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ame.0.1)).......................
2880 20 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 6e 61 6d 65 20 31 29 29 29 29 29 ..........(substring.name.1)))))
28a0 5d 0a 20 20 20 20 20 3b 3b 20 57 65 20 69 67 6e 6f 72 65 20 74 68 65 20 70 61 79 6c 6f 61 64 2c ]......;;.We.ignore.the.payload,
28c0 20 62 75 74 20 47 72 61 70 68 51 4c 20 72 65 71 75 69 72 65 73 20 74 68 61 74 20 61 74 20 6c 65 .but.GraphQL.requires.that.at.le
28e0 61 73 74 20 6f 6e 65 0a 20 20 20 20 20 3b 3b 20 66 69 65 6c 64 20 69 73 20 73 70 65 63 69 66 69 ast.one......;;.field.is.specifi
2900 65 64 2e 20 20 4f 6e 20 47 69 74 68 75 62 20 74 68 69 73 20 66 69 65 6c 64 20 69 73 20 61 76 61 ed...On.Github.this.field.is.ava
2920 69 6c 61 62 6c 65 20 66 6f 72 20 61 6c 6c 0a 20 20 20 20 20 3b 3b 20 6d 75 74 61 74 69 6f 6e 73 ilable.for.all......;;.mutations
2940 2e 20 20 4f 6e 20 47 69 74 6c 61 62 20 74 68 65 72 65 20 69 73 20 6e 6f 20 66 69 65 6c 64 20 74 ...On.Gitlab.there.is.no.field.t
2960 68 61 74 20 69 73 20 61 76 61 69 6c 61 62 6c 65 20 66 6f 72 0a 20 20 20 20 20 3b 3b 20 61 6c 6c hat.is.available.for......;;.all
2980 20 6d 75 74 61 74 69 6f 6e 73 2c 20 62 75 74 20 6c 75 63 6b 69 6c 79 20 75 73 69 6e 67 20 61 6e .mutations,.but.luckily.using.an
29a0 20 69 6e 76 61 6c 69 64 20 66 69 65 6c 64 73 20 64 6f 65 73 20 6e 6f 74 0a 20 20 20 20 20 3b 3b .invalid.fields.does.not......;;
29c0 20 72 65 73 75 6c 74 20 69 6e 20 61 6e 20 65 72 72 6f 72 2e 0a 20 20 20 20 20 63 6c 69 65 6e 74 .result.in.an.error.......client
29e0 4d 75 74 61 74 69 6f 6e 49 64 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 70 72 65 MutationId)))..(defun.forge--pre
2a00 70 61 72 65 2d 76 61 72 69 61 62 6c 65 73 20 28 76 61 72 69 61 62 6c 65 73 29 0a 20 20 60 28 64 pare-variables.(variables)...`(d
2a20 65 6c 71 20 6e 69 6c 20 28 6c 69 73 74 20 2c 40 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 elq.nil.(list.,@(mapcar.(lambda.
2a40 28 62 69 6e 64 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (binding).......................
2a60 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 65 78 68 61 75 73 74 69 76 65 20 62 69 6e 64 69 .........(pcase-exhaustive.bindi
2a80 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ng..............................
2aa0 20 20 20 20 28 60 28 2c 76 61 72 20 2c 76 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(`(,var.,val)...............
2ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 63 6f 6e 73 20 27 2c 76 61 72 ....................`(cons.',var
2ae0 20 2c 76 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .,val)).........................
2b00 20 20 20 20 20 20 20 20 20 28 60 28 61 6e 64 20 2c 63 6f 6e 64 20 28 2c 76 61 72 20 2c 76 61 6c .........(`(and.,cond.(,var.,val
2b20 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ))..............................
2b40 20 20 20 20 20 60 28 61 6e 64 20 2c 63 6f 6e 64 20 28 63 6f 6e 73 20 27 2c 76 61 72 20 2c 76 61 .....`(and.,cond.(cons.',var.,va
2b60 6c 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l)))))..........................
2b80 20 20 20 20 76 61 72 69 61 62 6c 65 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d ....variables))))..(defun.forge-
2ba0 2d 73 65 74 2d 66 69 65 6c 64 2d 63 61 6c 6c 62 61 63 6b 20 28 74 6f 70 69 63 29 0a 20 20 28 6c -set-field-callback.(topic)...(l
2bc0 65 74 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 et.((repo.(forge-get-repository.
2be0 74 6f 70 69 63 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 28 66 6f 72 67 65 2d topic))).....(cond......((forge-
2c00 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 2d 65 69 65 69 6f 2d 63 68 69 6c 64 70 20 gitlab-repository--eieio-childp.
2c20 72 65 70 6f 29 0a 20 20 20 20 20 20 3b 3b 20 54 4f 44 4f 20 46 65 74 63 68 20 73 69 6e 67 6c 65 repo).......;;.TODO.Fetch.single
2c40 20 74 6f 70 69 63 20 66 6f 72 20 47 69 74 6c 61 62 20 61 73 20 77 65 6c 6c 2e 0a 20 20 20 20 20 .topic.for.Gitlab.as.well.......
2c60 20 28 6c 61 6d 62 64 61 20 28 26 72 65 73 74 20 5f 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 .(lambda.(&rest._).........(forg
2c80 65 2d 2d 70 75 6c 6c 20 72 65 70 6f 20 23 27 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 e--pull.repo.#'forge-refresh-buf
2ca0 66 65 72 29 29 29 0a 20 20 20 20 20 28 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 2d fer)))......((forge-discussion--
2cc0 65 69 65 69 6f 2d 63 68 69 6c 64 70 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 3b 3b 20 53 65 65 eieio-childp.topic).......;;.See
2ce0 20 63 6f 6d 6d 65 6e 74 20 69 6e 20 60 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 73 74 61 74 75 .comment.in.`forge--update-statu
2d00 73 27 2e 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 74 61 74 75 73 20 28 6f 72 65 66 20 74 6f s'........(let.((status.(oref.to
2d20 70 69 63 20 73 74 61 74 75 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 26 pic.status))).........(lambda.(&
2d40 72 65 73 74 20 5f 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 71 75 65 72 79 20 rest._)...........(forge--query.
2d60 72 65 70 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 67 68 75 62 2d 2d 67 72 61 70 68 71 6c 2d repo.............(ghub--graphql-
2d80 70 72 65 70 61 72 65 2d 71 75 65 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 prepare-query..............forge
2da0 2d 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 71 75 65 72 79 0a 20 20 20 20 20 20 --github-repository-query.......
2dc0 20 20 20 20 20 20 20 60 28 72 65 70 6f 73 69 74 6f 72 79 20 64 69 73 63 75 73 73 69 6f 6e 73 20 .......`(repository.discussions.
2de0 28 64 69 73 63 75 73 73 69 6f 6e 20 2e 20 2c 28 6f 72 65 66 20 74 6f 70 69 63 20 6e 75 6d 62 65 (discussion...,(oref.topic.numbe
2e00 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 6f 77 6e 65 72 20 2e 20 2c 28 6f r)))).............`((owner...,(o
2e20 72 65 66 20 72 65 70 6f 20 6f 77 6e 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ref.repo.owner))...............(
2e40 6e 61 6d 65 20 20 2e 20 2c 28 6f 72 65 66 20 72 65 70 6f 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 name....,(oref.repo.name))).....
2e60 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 64 61 74 61 29 ........:callback.(lambda.(data)
2e80 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d .........................(forge-
2ea0 2d 75 70 64 61 74 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 72 65 70 6f 20 28 63 64 72 20 28 63 61 -update-discussion.repo.(cdr.(ca
2ec0 64 72 20 28 63 61 64 72 20 64 61 74 61 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 dr.(cadr.data))))...............
2ee0 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 63 20 73 74 61 74 75 73 20 73 74 61 ..........(oset.topic.status.sta
2f00 74 75 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f tus).........................(fo
2f20 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 29 29 29 0a 20 20 20 20 20 28 28 rge-refresh-buffer))))))......((
2f40 6c 61 6d 62 64 61 20 28 26 72 65 73 74 20 5f 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d lambda.(&rest._).........(forge-
2f60 2d 70 75 6c 6c 2d 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 -pull-topic.(forge-get-repositor
2f80 79 20 74 6f 70 69 63 29 20 74 6f 70 69 63 29 29 29 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c y.topic).topic))))))..;;;._.;;.L
2fa0 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 ocal.Variables:.;;.read-symbol-s
2fc0 68 6f 72 74 68 61 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 horthands:.(.;;...("and$".......
2fe0 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e ....."cond-let--and$").;;...("an
3000 64 2d 6c 65 74 22 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 d-let"........."cond-let--and-le
3020 74 22 29 0a 3b 3b 20 20 20 28 22 69 66 2d 6c 65 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e t").;;...("if-let".........."con
3040 64 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 d-let--if-let").;;...("when-let"
3060 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 29 0a 3b ........"cond-let--when-let")).;
3080 3b 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 63 6c 69 65 6e 74 29 0a 3b ;.End:.(provide.'forge-client).;
30a0 3b 3b 20 66 6f 72 67 65 2d 63 6c 69 65 6e 74 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 ;;.forge-client.el.ends.here....
30c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
30e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
31a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
31c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
31e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3200 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e forge-20250916.1119/forge-comman
3220 64 73 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ds.el...........................
3240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3260 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
3280 30 31 37 34 32 30 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 33 34 37 00 20 30 00 00 00 0174201.00000000000.015347..0...
32a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
32c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
32e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3300 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
3320 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
3340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3400 3b 3b 3b 20 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 2e 65 6c 20 2d 2d 2d 20 43 6f 6d 6d 61 6e ;;;.forge-commands.el.---.Comman
3420 64 73 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 2d 2a 2d 0a 0a 3b ds..-*-.lexical-binding:t.-*-..;
3440 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f 6e 61 73 20 ;.Copyright.(C).2018-2025.Jonas.
3460 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e Bernoulli..;;.Author:.Jonas.Bern
3480 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c oulli.<emacs.forge@jonas.bernoul
34a0 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 li.dev>.;;.Maintainer:.Jonas.Ber
34c0 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 noulli.<emacs.forge@jonas.bernou
34e0 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 lli.dev>..;;.SPDX-License-Identi
3500 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 68 69 73 20 fier:.GPL-3.0-or-later..;;.This.
3520 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61 6e 20 72 file.is.free.software:.you.can.r
3540 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 edistribute.it.and/or.modify.;;.
3560 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 it.under.the.terms.of.the.GNU.Ge
3580 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 neral.Public.License.as.publishe
35a0 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 d.;;.by.the.Free.Software.Founda
35c0 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 tion,.either.version.3.of.the.Li
35e0 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e cense,.;;.or.(at.your.option).an
3600 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 y.later.version..;;.;;.This.file
3620 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 .is.distributed.in.the.hope.that
3640 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f .it.will.be.useful,.;;.but.WITHO
3660 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 UT.ANY.WARRANTY;.without.even.th
3680 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e e.implied.warranty.of.;;.MERCHAN
36a0 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 TABILITY.or.FITNESS.FOR.A.PARTIC
36c0 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 ULAR.PURPOSE...See.the.;;.GNU.Ge
36e0 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 neral.Public.License.for.more.de
3700 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 tails..;;.;;.You.should.have.rec
3720 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 eived.a.copy.of.the.GNU.General.
3740 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 Public.License.;;.along.with.thi
3760 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 s.file...If.not,.see.<https://ww
3780 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a w.gnu.org/licenses/>...;;;.Code:
37a0 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 0a 3b 3b 3b 20 4f 70 74 69 6f 6e 73 0a ..(require.'forge)..;;;.Options.
37c0 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 61 64 64 2d 70 75 6c 6c 72 65 71 2d 72 65 .(defcustom.forge-add-pullreq-re
37e0 66 73 70 65 63 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 fspec.t..."Whether.the.pull-requ
3800 65 73 74 20 72 65 66 73 70 65 63 20 69 73 20 61 64 64 65 64 20 77 68 65 6e 20 73 65 74 74 69 6e est.refspec.is.added.when.settin
3820 67 20 75 70 20 61 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a 54 68 69 73 20 63 6f 6e 74 72 6f 6c g.up.a.repository...This.control
3840 73 20 77 68 65 74 68 65 72 20 72 75 6e 6e 69 6e 67 20 60 66 6f 72 67 65 2d 70 75 6c 6c 27 20 66 s.whether.running.`forge-pull'.f
3860 6f 72 20 74 68 65 20 66 69 72 73 74 20 74 69 6d 65 20 69 6e 0a 61 20 72 65 70 6f 73 69 74 6f 72 or.the.first.time.in.a.repositor
3880 79 20 61 6c 73 6f 20 61 64 64 73 20 61 20 72 65 66 73 70 65 63 20 74 68 61 74 20 66 65 74 63 68 y.also.adds.a.refspec.that.fetch
38a0 65 73 20 61 6c 6c 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e 0a 49 6e 20 72 65 70 6f 73 69 74 es.all.pull-requests..In.reposit
38c0 6f 72 69 65 73 20 77 69 74 68 20 68 75 67 65 20 6e 75 6d 62 65 72 73 20 6f 66 20 70 75 6c 6c 2d ories.with.huge.numbers.of.pull-
38e0 72 65 71 75 65 73 74 73 20 79 6f 75 20 6d 69 67 68 74 20 77 61 6e 74 0a 74 6f 20 6e 6f 74 20 64 requests.you.might.want.to.not.d
3900 6f 20 73 6f 2c 20 69 6e 20 77 68 69 63 68 20 63 61 73 65 20 79 6f 75 20 73 68 6f 75 6c 64 20 73 o.so,.in.which.case.you.should.s
3920 65 74 20 74 68 69 73 20 6f 70 74 69 6f 6e 20 74 6f 20 60 61 73 6b 27 2e 0a 0a 59 6f 75 20 63 61 et.this.option.to.`ask'...You.ca
3940 6e 20 61 6c 73 6f 20 73 65 74 20 74 68 69 73 20 74 6f 20 6e 69 6c 20 61 6e 64 20 6c 61 74 65 72 n.also.set.this.to.nil.and.later
3960 20 61 64 64 20 74 68 65 20 72 65 66 73 70 65 63 20 65 78 70 6c 69 63 69 74 6c 79 0a 66 6f 72 20 .add.the.refspec.explicitly.for.
3980 61 20 72 65 70 6f 73 69 74 6f 72 79 20 75 73 69 6e 67 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 60 a.repository.using.the.command.`
39a0 66 6f 72 67 65 2d 61 64 64 2d 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 27 2e 22 0a 20 20 3a forge-add-pullreq-refspec'."...:
39c0 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 32 2e 30 package-version.'(forge..."0.2.0
39e0 22 29 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f ")...:group.'forge...:type.'(cho
3a00 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 41 6c 77 61 79 73 20 61 64 64 20 72 65 66 73 ice.(const.:tag."Always.add.refs
3a20 70 65 63 22 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 pec".t)..................(const.
3a40 3a 74 61 67 20 22 41 73 6b 20 65 76 65 72 79 20 74 69 6d 65 22 20 61 73 6b 29 0a 20 20 20 20 20 :tag."Ask.every.time".ask)......
3a60 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4e 65 76 65 72 20 61 ............(const.:tag."Never.a
3a80 64 64 20 72 65 66 73 70 65 63 22 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 dd.refspec".nil)))..(defcustom.f
3aa0 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 77 6f 72 6b 74 72 65 65 2d 72 65 61 64 2d 64 69 72 65 orge-checkout-worktree-read-dire
3ac0 63 74 6f 72 79 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 27 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 ctory-function...'forge-checkout
3ae0 2d 77 6f 72 6b 74 72 65 65 2d 64 65 66 61 75 6c 74 2d 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 -worktree-default-read-directory
3b00 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 62 79 20 60 66 -function..."Function.used.by.`f
3b20 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 77 6f 72 6b 74 72 65 65 27 20 74 6f 20 72 65 61 64 20 orge-checkout-worktree'.to.read.
3b40 77 6f 72 6b 74 72 65 65 20 64 69 72 65 63 74 6f 72 79 2e 0a 54 61 6b 65 73 20 74 68 65 20 70 75 worktree.directory..Takes.the.pu
3b60 6c 6c 2d 72 65 71 75 65 73 74 20 61 73 20 6f 6e 6c 79 20 61 72 67 75 6d 65 6e 74 20 61 6e 64 20 ll-request.as.only.argument.and.
3b80 6d 75 73 74 20 72 65 74 75 72 6e 20 61 20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 3a 70 61 63 must.return.a.directory."...:pac
3ba0 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 34 2e 30 22 29 0a kage-version.'(forge..."0.4.0").
3bc0 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 66 75 6e 63 74 69 6f ..:group.'forge...:type.'functio
3be0 6e 29 0a 0a 3b 3b 3b 20 44 69 73 70 61 74 63 68 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 n)..;;;.Dispatch..;;;###autoload
3c00 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 20 22 66 6f 72 67 65 (autoload.'forge-dispatch."forge
3c20 2d 63 6f 6d 6d 61 6e 64 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 -commands".nil.t).(transient-def
3c40 69 6e 65 2d 70 72 65 66 69 78 20 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 20 28 29 0a 20 20 22 ine-prefix.forge-dispatch.()..."
3c60 44 69 73 70 61 74 63 68 20 61 20 66 6f 72 67 65 20 63 6f 6d 6d 61 6e 64 2e 22 0a 20 20 3a 74 72 Dispatch.a.forge.command."...:tr
3c80 61 6e 73 69 65 6e 74 2d 6e 6f 6e 2d 73 75 66 66 69 78 20 23 27 74 72 61 6e 73 69 65 6e 74 2d 2d ansient-non-suffix.#'transient--
3ca0 64 6f 2d 63 61 6c 6c 0a 20 20 3a 72 65 66 72 65 73 68 2d 73 75 66 66 69 78 65 73 20 74 0a 20 20 do-call...:refresh-suffixes.t...
3cc0 3a 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 23 27 66 6f 72 67 65 2d 2d 6d 65 6e 75 2d 65 6e 76 69 72 :environment.#'forge--menu-envir
3ce0 6f 6e 6d 65 6e 74 0a 20 20 3a 63 6f 6c 75 6d 6e 2d 77 69 64 74 68 73 20 66 6f 72 67 65 2d 2d 74 onment...:column-widths.forge--t
3d00 6f 70 69 63 2d 6d 65 6e 75 73 2d 63 6f 6c 75 6d 6e 2d 77 69 64 74 68 73 0a 20 20 5b 66 6f 72 67 opic-menus-column-widths...[forg
3d20 65 2d 2d 74 6f 70 69 63 2d 6d 65 6e 75 73 2d 67 72 6f 75 70 0a 20 20 20 5b 22 46 65 74 63 68 22 e--topic-menus-group....["Fetch"
3d40 0a 20 20 20 20 28 22 66 20 66 22 20 22 61 6c 6c 20 74 6f 70 69 63 73 22 20 20 20 20 20 66 6f 72 .....("f.f"."all.topics".....for
3d60 67 65 2d 70 75 6c 6c 29 0a 20 20 20 20 28 22 66 20 74 22 20 22 6f 6e 65 20 74 6f 70 69 63 22 20 ge-pull).....("f.t"."one.topic".
3d80 20 20 20 20 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 74 6f 70 69 63 29 0a 20 20 20 20 28 22 66 20 6e .....forge-pull-topic).....("f.n
3da0 22 20 22 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 20 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 6e 6f "."notifications"..forge-pull-no
3dc0 74 69 66 69 63 61 74 69 6f 6e 73 29 5d 0a 20 20 20 5b 22 43 72 65 61 74 65 22 0a 20 20 20 20 3a tifications)]....["Create".....:
3de0 69 66 20 28 23 23 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 if.(##forge-get-repository.:trac
3e00 6b 65 64 3f 29 0a 20 20 20 20 28 22 63 20 64 22 20 22 64 69 73 63 75 73 73 69 6f 6e 22 20 20 20 ked?).....("c.d"."discussion"...
3e20 20 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 28 ..forge-create-discussion).....(
3e40 22 63 20 69 22 20 22 69 73 73 75 65 22 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 63 72 65 "c.i"."issue"..........forge-cre
3e60 61 74 65 2d 69 73 73 75 65 29 0a 20 20 20 20 28 22 63 20 70 22 20 22 70 75 6c 6c 2d 72 65 71 75 ate-issue).....("c.p"."pull-requ
3e80 65 73 74 22 20 20 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 29 0a 20 20 20 est"...forge-create-pullreq)....
3ea0 20 28 22 63 20 75 22 20 22 70 72 20 66 72 6f 6d 20 69 73 73 75 65 22 20 20 66 6f 72 67 65 2d 63 .("c.u"."pr.from.issue"..forge-c
3ec0 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 66 72 6f 6d 2d 69 73 73 75 65 29 0a 20 20 20 20 28 22 reate-pullreq-from-issue).....("
3ee0 63 20 66 22 20 22 66 6f 72 6b 20 6f 72 20 72 65 6d 6f 74 65 22 20 66 6f 72 67 65 2d 66 6f 72 6b c.f"."fork.or.remote".forge-fork
3f00 29 5d 0a 20 20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 )]....[:description.(lambda.()..
3f20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 ..................(cond.........
3f40 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f ............((forge-get-reposito
3f60 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 20 22 41 63 74 69 6f 6e 73 22 29 0a 20 20 20 20 20 20 20 ry.:tracked?)."Actions")........
3f80 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6f 72 20 28 6d 61 67 69 74 2d 67 69 74 64 69 72 29 .............((or.(magit-gitdir)
3fa0 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 61 74 2d 70 6f 69 6e 74 29 29 0a 20 20 .(forge-repository-at-point))...
3fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 46 6f 72 67 65 20 64 6f 65 73 20 6e ..................."Forge.does.n
3fe0 6f 74 20 79 65 74 20 74 72 61 63 6b 20 74 68 69 73 20 72 65 70 6f 73 69 74 6f 72 79 22 29 0a 20 ot.yet.track.this.repository")..
4000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 4e 6f 74 20 69 6e 73 69 64 65 20 ...................("Not.inside.
4020 61 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 22 29 29 29 0a 20 20 20 20 28 22 2f 20 61 22 20 a.Git.repository"))).....("/.a".
4040 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 3a 64 65 73 63 72 forge-add-repository......:descr
4060 69 70 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 29 20 28 6c 65 74 20 28 28 72 65 70 6f 20 28 66 iption.(lambda.().(let.((repo.(f
4080 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 3f 29 29 29 0a 20 20 orge-get-repository.:stub?)))...
40a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6f 72 20 ........................(if.(or.
40c0 28 6e 6f 74 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (not.repo)......................
40e0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 28 6f 72 65 66 20 72 65 70 6f 20 63 6f 6e 64 .............(eq.(oref.repo.cond
4100 69 74 69 6f 6e 29 20 3a 74 72 61 63 6b 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ition).:tracked))...............
4120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 74 72 61 63 6b 20 73 6f 6d 65 20 72 65 70 6f 22 0a .............."track.some.repo".
4140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 74 72 61 63 6b .........................."track
4160 20 74 68 69 73 20 72 65 70 6f 73 69 74 6f 72 79 22 29 29 29 29 0a 20 20 20 20 28 22 63 20 66 22 .this.repository")))).....("c.f"
4180 20 22 66 6f 72 6b 20 74 68 69 73 20 72 65 70 6f 73 69 74 6f 72 79 22 20 66 6f 72 67 65 2d 66 6f ."fork.this.repository".forge-fo
41a0 72 6b 0a 20 20 20 20 20 3a 69 66 2d 6e 6f 74 20 28 23 23 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 rk......:if-not.(##forge-get-rep
41c0 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 29 0a 20 20 20 20 28 22 2f 20 4d 22 20 22 ository.:tracked?)).....("/.M"."
41e0 6d 65 72 67 65 20 77 69 74 68 20 61 70 69 22 20 66 6f 72 67 65 2d 6d 65 72 67 65 0a 20 20 20 20 merge.with.api".forge-merge.....
4200 20 3a 69 66 20 28 23 23 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 .:if.(##forge-get-repository.:tr
4220 61 63 6b 65 64 3f 29 0a 20 20 20 20 20 3a 6c 65 76 65 6c 20 37 29 5d 5d 0a 20 20 5b 66 6f 72 67 acked?)......:level.7)]]...[forg
4240 65 2d 2d 6c 69 73 74 73 2d 67 72 6f 75 70 0a 20 20 20 5b 22 56 69 73 69 74 22 0a 20 20 20 20 3a e--lists-group....["Visit".....:
4260 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 20 28 23 23 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 inapt-if-not.(##forge-get-reposi
4280 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 0a 20 20 20 20 28 22 76 20 74 22 20 22 74 6f 70 69 tory.:tracked?).....("v.t"."topi
42a0 63 22 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 6f 70 69 63 29 0a 20 c"..........forge-visit-topic)..
42c0 20 20 20 28 22 76 20 75 22 20 22 74 6f 70 69 63 20 66 72 6f 6d 20 75 72 6c 22 20 66 6f 72 67 65 ...("v.u"."topic.from.url".forge
42e0 2d 76 69 73 69 74 2d 74 6f 70 69 63 2d 66 72 6f 6d 2d 75 72 6c 20 3a 6c 65 76 65 6c 20 30 29 0a -visit-topic-from-url.:level.0).
4300 20 20 20 20 28 22 76 20 64 22 20 22 64 69 73 63 75 73 73 69 6f 6e 22 20 20 20 20 20 66 6f 72 67 ....("v.d"."discussion".....forg
4320 65 2d 76 69 73 69 74 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 28 22 76 20 69 22 20 22 e-visit-discussion).....("v.i"."
4340 69 73 73 75 65 22 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 69 73 73 75 issue"..........forge-visit-issu
4360 65 29 0a 20 20 20 20 28 22 76 20 70 22 20 22 70 75 6c 6c 2d 72 65 71 75 65 73 74 22 20 20 20 66 e).....("v.p"."pull-request"...f
4380 6f 72 67 65 2d 76 69 73 69 74 2d 70 75 6c 6c 72 65 71 29 5d 0a 20 20 20 5b 22 42 72 6f 77 73 65 orge-visit-pullreq)]....["Browse
43a0 22 0a 20 20 20 20 28 22 62 20 74 22 20 22 74 6f 70 69 63 22 20 20 20 20 20 20 20 20 20 20 66 6f ".....("b.t"."topic"..........fo
43c0 72 67 65 2d 62 72 6f 77 73 65 2d 74 6f 70 69 63 0a 20 20 20 20 20 3a 69 6e 61 70 74 2d 69 66 2d rge-browse-topic......:inapt-if-
43e0 6e 6f 74 20 28 23 23 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 not.(##forge-get-repository.:tra
4400 63 6b 65 64 3f 29 29 0a 20 20 20 20 28 22 62 20 69 22 20 22 69 73 73 75 65 22 20 20 20 20 20 20 cked?)).....("b.i"."issue"......
4420 20 20 20 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 73 75 65 0a 20 20 20 20 20 3a 69 6e 61 ....forge-browse-issue......:ina
4440 70 74 2d 69 66 2d 6e 6f 74 20 28 23 23 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 pt-if-not.(##forge-get-repositor
4460 79 20 3a 74 72 61 63 6b 65 64 3f 29 29 0a 20 20 20 20 28 22 62 20 70 22 20 22 70 75 6c 6c 2d 72 y.:tracked?)).....("b.p"."pull-r
4480 65 71 75 65 73 74 22 20 20 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 70 75 6c 6c 72 65 71 0a 20 equest"...forge-browse-pullreq..
44a0 20 20 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 20 28 23 23 66 6f 72 67 65 2d 67 65 74 2d 72 ....:inapt-if-not.(##forge-get-r
44c0 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 29 0a 20 20 20 20 28 22 62 20 72 22 epository.:tracked?)).....("b.r"
44e0 20 22 72 65 6d 6f 74 65 22 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 72 ."remote".........forge-browse-r
4500 65 6d 6f 74 65 29 0a 20 20 20 20 28 22 62 20 49 22 20 22 69 73 73 75 65 73 22 20 20 20 20 20 20 emote).....("b.I"."issues"......
4520 20 20 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 73 75 65 73 29 0a 20 20 20 20 28 22 62 20 ...forge-browse-issues).....("b.
4540 50 22 20 22 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 22 20 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 P"."pull-requests"..forge-browse
4560 2d 70 75 6c 6c 72 65 71 73 29 0a 20 20 20 20 22 22 5d 0a 20 20 20 5b 22 44 69 73 70 6c 61 79 22 -pullreqs).....""]....["Display"
4580 0a 20 20 20 20 28 22 2d 53 22 20 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 64 69 73 70 6c 61 79 2d .....("-S".forge-toggle-display-
45a0 69 6e 2d 73 74 61 74 75 73 2d 62 75 66 66 65 72 0a 20 20 20 20 20 3a 69 6e 61 70 74 2d 69 66 2d in-status-buffer......:inapt-if-
45c0 6e 6f 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 77 69 74 68 2d 74 6f 70 69 63 73 2d 73 65 not.forge--buffer-with-topics-se
45e0 63 74 69 6f 6e 73 2d 70 29 0a 20 20 20 20 28 22 2d 48 22 20 66 6f 72 67 65 2d 74 6f 67 67 6c 65 ctions-p).....("-H".forge-toggle
4600 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 29 5d 5d 0a 20 20 5b 66 6f 72 67 65 2d 2d 74 6f 70 69 63 -topic-legend)]]...[forge--topic
4620 2d 6c 65 67 65 6e 64 2d 67 72 6f 75 70 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 61 75 67 6d -legend-group])..(transient-augm
4640 65 6e 74 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 0a 20 20 3a 74 72 61 ent-suffix.forge-dispatch...:tra
4660 6e 73 69 65 6e 74 20 23 27 74 72 61 6e 73 69 65 6e 74 2d 2d 64 6f 2d 72 65 70 6c 61 63 65 0a 20 nsient.#'transient--do-replace..
4680 20 3a 69 6e 61 70 74 2d 69 66 20 28 23 23 65 71 20 28 6f 72 65 66 20 74 72 61 6e 73 69 65 6e 74 .:inapt-if.(##eq.(oref.transient
46a0 2d 2d 70 72 65 66 69 78 20 63 6f 6d 6d 61 6e 64 29 20 27 66 6f 72 67 65 2d 64 69 73 70 61 74 63 --prefix.command).'forge-dispatc
46c0 68 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 h)...:inapt-face.'forge-suffix-a
46e0 63 74 69 76 65 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 ctive)..;;;###autoload(autoload.
4700 27 66 6f 72 67 65 2d 63 6f 6e 66 69 67 75 72 65 20 22 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 'forge-configure."forge-commands
4720 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 ".nil.t).(transient-define-prefi
4740 78 20 66 6f 72 67 65 2d 63 6f 6e 66 69 67 75 72 65 20 28 29 0a 20 20 22 43 6f 6e 66 69 67 75 72 x.forge-configure.()..."Configur
4760 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 20 61 6e 64 20 67 6c 6f 62 61 6c 20 e.current.repository.and.global.
4780 73 65 74 74 69 6e 67 73 2e 22 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 2d 6e 6f 6e 2d 73 75 66 66 settings."...:transient-non-suff
47a0 69 78 20 23 27 74 72 61 6e 73 69 65 6e 74 2d 2d 64 6f 2d 63 61 6c 6c 0a 20 20 3a 72 65 66 72 65 ix.#'transient--do-call...:refre
47c0 73 68 2d 73 75 66 66 69 78 65 73 20 74 0a 20 20 3a 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 23 27 66 sh-suffixes.t...:environment.#'f
47e0 6f 72 67 65 2d 2d 6d 65 6e 75 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 0a 20 20 3a 63 6f 6c 75 6d 6e orge--menu-environment...:column
4800 2d 77 69 64 74 68 73 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6d 65 6e 75 73 2d 63 6f 6c 75 6d -widths.forge--topic-menus-colum
4820 6e 2d 77 69 64 74 68 73 0a 20 20 5b 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6d 65 6e 75 73 2d 67 n-widths...[forge--topic-menus-g
4840 72 6f 75 70 0a 20 20 20 5b 22 43 6f 6e 66 69 67 75 72 65 22 0a 20 20 20 20 28 22 52 20 20 22 20 roup....["Configure".....("R..".
4860 66 6f 72 67 65 2d 61 64 64 2d 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 29 0a 20 20 20 20 28 forge-add-pullreq-refspec).....(
4880 22 73 20 72 22 20 66 6f 72 67 65 2d 66 6f 72 67 65 2e 72 65 6d 6f 74 65 29 0a 20 20 20 20 28 22 "s.r".forge-forge.remote).....("
48a0 73 20 6c 22 20 66 6f 72 67 65 2d 66 6f 72 67 65 2e 67 72 61 70 68 71 6c 49 74 65 6d 4c 69 6d 69 s.l".forge-forge.graphqlItemLimi
48c0 74 29 5d 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 61 75 67 6d 65 6e 74 2d 73 75 66 66 69 78 t)]])..(transient-augment-suffix
48e0 20 66 6f 72 67 65 2d 63 6f 6e 66 69 67 75 72 65 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 20 23 27 .forge-configure...:transient.#'
4900 74 72 61 6e 73 69 65 6e 74 2d 2d 64 6f 2d 72 65 70 6c 61 63 65 0a 20 20 3a 69 6e 61 70 74 2d 69 transient--do-replace...:inapt-i
4920 66 20 28 23 23 65 71 20 28 6f 72 65 66 20 74 72 61 6e 73 69 65 6e 74 2d 2d 70 72 65 66 69 78 20 f.(##eq.(oref.transient--prefix.
4940 63 6f 6d 6d 61 6e 64 29 20 27 66 6f 72 67 65 2d 63 6f 6e 66 69 67 75 72 65 29 0a 20 20 3a 69 6e command).'forge-configure)...:in
4960 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 29 0a 0a apt-face.'forge-suffix-active)..
4980 3b 3b 3b 20 50 75 6c 6c 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 ;;;.Pull..;;;###autoload(autoloa
49a0 64 20 27 66 6f 72 67 65 2d 70 75 6c 6c 20 22 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 22 20 6e d.'forge-pull."forge-commands".n
49c0 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 il.t).(transient-define-suffix.f
49e0 6f 72 67 65 2d 70 75 6c 6c 20 28 29 0a 20 20 22 50 75 6c 6c 20 66 6f 72 67 65 20 74 6f 70 69 63 orge-pull.()..."Pull.forge.topic
4a00 73 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 20 69 66 20 s.for.the.current.repository.if.
4a20 69 74 20 69 73 20 61 6c 72 65 61 64 79 20 74 72 61 63 6b 65 64 2e 0a 49 66 20 74 68 65 20 63 75 it.is.already.tracked..If.the.cu
4a40 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 20 69 73 20 73 74 69 6c 6c 20 75 6e 74 72 61 63 rrent.repository.is.still.untrac
4a60 6b 65 64 20 6c 6f 63 61 6c 6c 79 2c 20 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 0a 72 65 70 6f ked.locally,.or.the.current.repo
4a80 73 69 74 6f 72 79 20 63 61 6e 6e 6f 74 20 62 65 20 64 65 74 65 72 6d 69 6e 65 64 2c 20 69 6e 73 sitory.cannot.be.determined,.ins
4aa0 74 65 61 64 20 69 6e 76 6f 6b 65 20 60 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 tead.invoke.`forge-add-repositor
4ac0 79 27 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 y'."...:description.(lambda.()..
4ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 ................(if.(forge-get-r
4b00 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 0a 20 20 20 20 20 20 20 20 20 20 20 epository.:tracked?)............
4b20 20 20 20 20 20 20 20 20 20 20 22 66 6f 72 67 65 20 74 6f 70 69 63 73 22 0a 20 20 20 20 20 20 20 .........."forge.topics"........
4b40 20 20 20 20 20 20 20 20 20 20 20 20 22 6e 65 77 20 66 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 ............"new.forge.repositor
4b60 79 22 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 66 2d 6c 65 74 20 28 y"))...(interactive)...(if-let.(
4b80 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 (repo.(forge-get-repository.:tra
4ba0 63 6b 65 64 3f 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 20 72 65 70 6f cked?))).......(forge--pull.repo
4bc0 29 0a 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 61 64 ).....(transient-setup.'forge-ad
4be0 64 2d 72 65 70 6f 73 69 74 6f 72 79 20 6e 69 6c 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 d-repository.nil.nil............
4c00 20 20 20 20 20 20 20 20 20 20 3a 73 63 6f 70 65 20 28 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f ..........:scope.(forge-add-repo
4c20 73 69 74 6f 72 79 2d 2d 73 63 6f 70 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d sitory--scope))))..(defun.forge-
4c40 72 65 61 64 2d 64 61 74 65 20 28 70 72 6f 6d 70 74 29 0a 20 20 28 72 65 71 75 69 72 65 20 28 71 read-date.(prompt)...(require.(q
4c60 75 6f 74 65 20 6f 72 67 29 20 6e 69 6c 29 0a 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6f uote.org).nil)...(if.(fboundp.'o
4c80 72 67 2d 72 65 61 64 2d 64 61 74 65 29 0a 20 20 20 20 20 20 28 6f 72 67 2d 72 65 61 64 2d 64 61 rg-read-date).......(org-read-da
4ca0 74 65 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 70 72 6f 6d 70 74 29 0a 20 20 20 20 28 63 6c 2d 62 te.nil.nil.nil.prompt).....(cl-b
4cc0 6c 6f 63 6b 20 6e 69 6c 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 74 0a 20 20 20 20 20 20 20 20 lock.nil.......(while.t.........
4ce0 28 6c 65 74 20 28 28 73 74 72 20 28 72 65 61 64 2d 66 72 6f 6d 2d 6d 69 6e 69 62 75 66 66 65 72 (let.((str.(read-from-minibuffer
4d00 20 70 72 6f 6d 70 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 73 74 72 .prompt)))...........(cond.((str
4d20 69 6e 67 2d 65 71 75 61 6c 20 73 74 72 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ing-equal.str."")...............
4d40 20 20 20 28 63 6c 2d 72 65 74 75 72 6e 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ...(cl-return.nil)).............
4d60 20 20 20 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 ....((string-match-p............
4d80 20 20 20 20 20 20 20 22 5c 5c 60 5b 30 2d 39 5d 5c 5c 7b 34 5c 5c 7d 5b 2d 2f 5d 5b 30 2d 39 5d ......."\\`[0-9]\\{4\\}[-/][0-9]
4da0 5c 5c 7b 32 5c 5c 7d 5b 2d 2f 5d 5b 30 2d 39 5d 5c 5c 7b 32 5c 5c 7d 5c 5c 27 22 20 73 74 72 29 \\{2\\}[-/][0-9]\\{2\\}\\'".str)
4dc0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 72 65 74 75 72 6e 20 73 74 72 ..................(cl-return.str
4de0 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 50 6c 65 61 73 65 20 65 6e )))).........(message."Please.en
4e00 74 65 72 20 61 20 64 61 74 65 20 69 6e 20 74 68 65 20 66 6f 72 6d 61 74 20 59 59 59 59 2d 4d 4d ter.a.date.in.the.format.YYYY-MM
4e20 2d 44 44 2e 22 29 0a 20 20 20 20 20 20 20 20 28 73 69 74 2d 66 6f 72 20 31 29 29 29 29 29 0a 0a -DD.").........(sit-for.1)))))..
4e40 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 70 75 6c 6c 20 28 28 72 65 70 6f (cl-defmethod.forge--pull.((repo
4e60 20 66 6f 72 67 65 2d 6e 6f 61 70 69 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 26 72 65 73 74 20 5f .forge-noapi-repository).&rest._
4e80 29 0a 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 74 20 74 20 22 50 75 6c 6c 69 6e )...(forge--msg.repo.t.t."Pullin
4ea0 67 20 66 72 6f 6d 20 52 45 50 4f 20 69 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 65 64 22 29 29 0a g.from.REPO.is.not.supported")).
4ec0 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 70 75 6c 6c 20 28 28 72 65 70 .(cl-defmethod.forge--pull.((rep
4ee0 6f 20 66 6f 72 67 65 2d 75 6e 75 73 65 64 61 70 69 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 26 72 o.forge-unusedapi-repository).&r
4f00 65 73 74 20 5f 29 0a 20 20 28 6d 61 67 69 74 2d 67 69 74 2d 66 65 74 63 68 20 28 6f 72 65 66 20 est._)...(magit-git-fetch.(oref.
4f20 72 65 70 6f 20 72 65 6d 6f 74 65 29 20 28 6d 61 67 69 74 2d 66 65 74 63 68 2d 61 72 67 75 6d 65 repo.remote).(magit-fetch-argume
4f40 6e 74 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6d 61 79 62 65 2d 67 69 74 2d nts)))..(defun.forge--maybe-git-
4f60 66 65 74 63 68 20 28 72 65 70 6f 20 26 6f 70 74 69 6f 6e 61 6c 20 62 75 66 66 65 72 29 0a 20 20 fetch.(repo.&optional.buffer)...
4f80 28 63 6f 6e 64 2d 6c 65 74 0a 20 20 20 20 28 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 (cond-let.....((buffer-live-p.bu
4fa0 66 66 65 72 29 0a 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 ffer)......(with-current-buffer.
4fc0 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 64 65 72 69 76 65 64 2d buffer........(if.(and.(derived-
4fe0 6d 6f 64 65 2d 70 20 27 6d 61 67 69 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 mode-p.'magit-mode).............
5000 20 20 20 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 65 71 75 61 6c 20 28 66 6f 72 ....(forge-repository-equal.(for
5020 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 3f 29 20 72 65 70 6f 29 0a ge-get-repository.:stub?).repo).
5040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 74 6f 70 6c 65 76 65 6c 29 ................(magit-toplevel)
5060 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 2d 66 65 74 63 68 20 28 6f )............(magit-git-fetch.(o
5080 72 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 20 28 6d 61 67 69 74 2d 66 65 74 63 68 2d 61 72 ref.repo.remote).(magit-fetch-ar
50a0 67 75 6d 65 6e 74 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 72 65 66 72 65 73 guments))..........(magit-refres
50c0 68 2d 62 75 66 66 65 72 29 29 29 29 0a 20 20 20 20 28 5b 77 6f 72 6b 74 72 65 65 20 28 66 6f 72 h-buffer)))).....([worktree.(for
50e0 67 65 2d 67 65 74 2d 77 6f 72 6b 74 72 65 65 20 72 65 70 6f 29 5d 0a 20 20 20 20 20 28 6c 65 74 ge-get-worktree.repo)]......(let
5100 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 77 6f 72 6b 74 72 65 65 29 0a 20 .((default-directory.worktree)..
5120 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 68 69 62 69 74 2d 72 65 66 72 65 73 68 ..........(magit-inhibit-refresh
5140 20 74 29 29 0a 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 2d 66 65 74 63 68 20 28 6f 72 .t))........(magit-git-fetch.(or
5160 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 20 28 6d 61 67 69 74 2d 66 65 74 63 68 2d 61 72 67 ef.repo.remote).(magit-fetch-arg
5180 75 6d 65 6e 74 73 29 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 uments))))))..;;;###autoload(aut
51a0 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 70 75 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 oload.'forge-pull-notifications.
51c0 22 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 "forge-commands".nil.t).(transie
51e0 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 6e 6f 74 69 nt-define-suffix.forge-pull-noti
5200 66 69 63 61 74 69 6f 6e 73 20 28 29 0a 20 20 22 46 65 74 63 68 20 6e 6f 74 69 66 69 63 61 74 69 fications.()..."Fetch.notificati
5220 6f 6e 73 20 66 6f 72 20 61 6c 6c 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 66 72 6f 6d 20 74 68 ons.for.all.repositories.from.th
5240 65 20 63 75 72 72 65 6e 74 20 66 6f 72 67 65 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e e.current.forge."...:description
5260 20 22 66 6f 72 67 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 0a 20 20 28 69 6e 74 65 72 61 ."forge.notifications"...(intera
5280 63 74 69 76 65 29 0a 20 20 28 69 66 2d 6c 65 74 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 ctive)...(if-let.((repo.(forge-g
52a0 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 3f 29 29 29 0a 20 20 20 20 20 20 28 6c et-repository.:stub?))).......(l
52c0 65 74 20 28 28 63 6c 61 73 73 20 28 65 69 65 69 6f 2d 6f 62 6a 65 63 74 2d 63 6c 61 73 73 20 72 et.((class.(eieio-object-class.r
52e0 65 70 6f 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 63 6c 61 73 73 20 27 66 6f epo))).........(if.(eq.class.'fo
5300 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 rge-github-repository)..........
5320 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 63 6c ...(forge--pull-notifications.cl
5340 61 73 73 20 28 6f 72 65 66 20 72 65 70 6f 20 67 69 74 68 6f 73 74 29 29 0a 20 20 20 20 20 20 20 ass.(oref.repo.githost))........
5360 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 46 65 74 63 68 69 6e 67 20 6e 6f 74 69 66 69 63 ...(user-error."Fetching.notific
5380 61 74 69 6f 6e 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 65 64 20 66 6f 72 20 66 6f 72 67 65 20 25 ations.not.supported.for.forge.%
53a0 53 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 S".......................(oref.r
53c0 65 70 6f 20 66 6f 72 67 65 29 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 6e epo.forge)))).....(forge--pull-n
53e0 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 27 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 otifications.'forge-github-repos
5400 69 74 6f 72 79 20 22 67 69 74 68 75 62 2e 63 6f 6d 22 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 itory."github.com")))..;;;###aut
5420 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 70 75 6c 6c 2d 74 6f 70 69 63 oload(autoload.'forge-pull-topic
5440 20 22 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 ."forge-commands".nil.t).(transi
5460 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 74 6f 70 ent-define-suffix.forge-pull-top
5480 69 63 20 28 6e 75 6d 62 65 72 29 0a 20 20 22 52 65 61 64 20 61 20 74 6f 70 69 63 20 54 59 50 45 ic.(number)..."Read.a.topic.TYPE
54a0 20 61 6e 64 20 4e 55 4d 42 45 52 20 70 75 6c 6c 20 64 61 74 61 20 61 62 6f 75 74 20 69 74 20 66 .and.NUMBER.pull.data.about.it.f
54c0 72 6f 6d 20 69 74 73 20 66 6f 72 67 65 2e 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 20 rom.its.forge."...:inapt-if-not.
54e0 28 6c 61 6d 62 64 61 20 28 29 20 28 61 6e 64 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 (lambda.().(and.(forge-get-repos
5500 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 itory.:tracked?)................
5520 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 65 74 2d 67 69 74 68 75 62 2d 72 ............(forge--get-github-r
5540 65 70 6f 73 69 74 6f 72 79 29 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 epository)))...(interactive....(
5560 6c 69 73 74 20 28 72 65 61 64 2d 6e 75 6d 62 65 72 20 22 50 75 6c 6c 20 74 6f 70 69 63 3a 20 22 list.(read-number."Pull.topic:."
5580 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 24 20 28 66 6f .......................(and$.(fo
55a0 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 29 20 28 6f 72 65 66 20 24 20 6e 75 6d 62 65 rge-current-topic).(oref.$.numbe
55c0 72 29 29 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 20 28 66 6f 72 r)))))...(forge--pull-topic.(for
55e0 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 29 20 6e 75 6d 62 ge-get-repository.:tracked).numb
5600 65 72 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 er))..;;;###autoload(autoload.'f
5620 6f 72 67 65 2d 70 75 6c 6c 2d 74 68 69 73 2d 74 6f 70 69 63 20 22 66 6f 72 67 65 2d 63 6f 6d 6d orge-pull-this-topic."forge-comm
5640 61 6e 64 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 ands".nil.t).(transient-define-s
5660 75 66 66 69 78 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 74 68 69 73 2d 74 6f 70 69 63 20 28 29 0a 20 uffix.forge-pull-this-topic.()..
5680 20 22 50 75 6c 6c 20 64 61 74 61 20 61 62 6f 75 74 20 74 68 65 20 74 6f 70 69 63 20 61 74 20 70 ."Pull.data.about.the.topic.at.p
56a0 6f 69 6e 74 20 66 72 6f 6d 20 69 74 73 20 66 6f 72 67 65 2e 22 0a 20 20 3a 69 6e 61 70 74 2d 69 oint.from.its.forge."...:inapt-i
56c0 66 2d 6e 6f 74 20 23 27 66 6f 72 67 65 2d 2d 67 65 74 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 f-not.#'forge--get-github-reposi
56e0 74 6f 72 79 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 66 65 74 63 68 22 0a 20 20 28 69 tory...:description."fetch"...(i
5700 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 nteractive)...(let.((topic.(forg
5720 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 20 74 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d e-current-topic.t))).....(forge-
5740 2d 70 75 6c 6c 2d 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 -pull-topic.(forge-get-repositor
5760 79 20 74 6f 70 69 63 29 20 74 6f 70 69 63 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 y.topic).topic)))..(cl-defmethod
5780 20 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d .forge--pull-topic.((repo.forge-
57a0 72 65 70 6f 73 69 74 6f 72 79 29 20 5f 74 6f 70 69 63 29 0a 20 20 28 65 72 72 6f 72 20 22 46 65 repository)._topic)...(error."Fe
57c0 74 63 68 69 6e 67 20 61 6e 20 69 6e 64 69 76 69 64 75 61 6c 20 74 6f 70 69 63 20 6e 6f 74 20 69 tching.an.individual.topic.not.i
57e0 6d 70 6c 65 6d 65 6e 74 65 64 20 66 6f 72 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 28 65 69 65 mplemented.for.%s"..........(eie
5800 69 6f 2d 6f 62 6a 65 63 74 2d 63 6c 61 73 73 20 72 65 70 6f 29 29 29 0a 0a 3b 3b 3b 20 42 72 6f io-object-class.repo)))..;;;.Bro
5820 77 73 65 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 wse..;;;###autoload.(defun.forge
5840 2d 62 72 6f 77 73 65 2d 64 69 73 63 75 73 73 69 6f 6e 73 20 28 29 0a 20 20 22 56 69 73 69 74 20 -browse-discussions.()..."Visit.
5860 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 27 73 20 64 69 73 63 75 73 73 the.current.repository's.discuss
5880 69 6f 6e 73 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 ions.using.a.browser."...(intera
58a0 63 74 69 76 65 29 0a 20 20 28 62 72 6f 77 73 65 2d 75 72 6c 20 28 66 6f 72 67 65 2d 2d 66 6f 72 ctive)...(browse-url.(forge--for
58c0 6d 61 74 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 29 mat.(forge-get-repository.:stub)
58e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 ..............................'d
5900 69 73 63 75 73 73 69 6f 6e 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 29 0a 0a 3b 3b 3b 23 23 23 iscussions-url-format)))..;;;###
5920 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 73 autoload.(defun.forge-browse-iss
5940 75 65 73 20 28 29 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f ues.()..."Visit.the.current.repo
5960 73 69 74 6f 72 79 27 73 20 69 73 73 75 65 73 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e sitory's.issues.using.a.browser.
5980 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 62 72 6f 77 73 65 2d 75 72 6c 20 "...(interactive)...(browse-url.
59a0 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 (forge--format.(forge-get-reposi
59c0 74 6f 72 79 20 3a 73 74 75 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tory.:stub).....................
59e0 20 20 20 20 20 20 20 20 20 27 69 73 73 75 65 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 29 0a 0a .........'issues-url-format)))..
5a00 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 72 6f 77 ;;;###autoload.(defun.forge-brow
5a20 73 65 2d 70 75 6c 6c 72 65 71 73 20 28 29 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 63 75 72 72 se-pullreqs.()..."Visit.the.curr
5a40 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 27 73 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 75 ent.repository's.pull-requests.u
5a60 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 sing.a.browser."...(interactive)
5a80 0a 20 20 28 62 72 6f 77 73 65 2d 75 72 6c 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 28 66 ...(browse-url.(forge--format.(f
5aa0 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 29 0a 20 20 20 20 20 orge-get-repository.:stub)......
5ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 70 75 6c 6c 72 65 71 ........................'pullreq
5ae0 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a s-url-format)))..;;;###autoload.
5b00 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 6f 70 69 63 20 28 74 6f 70 69 63 (defun.forge-browse-topic.(topic
5b20 29 0a 20 20 22 52 65 61 64 20 61 20 54 4f 50 49 43 20 61 6e 64 20 76 69 73 69 74 20 69 74 20 75 )..."Read.a.TOPIC.and.visit.it.u
5b40 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 0a 42 79 20 64 65 66 61 75 6c 74 20 6f 6e 6c 79 20 sing.a.browser..By.default.only.
5b60 6f 66 66 65 72 20 6f 70 65 6e 20 74 6f 70 69 63 73 20 62 75 74 20 77 69 74 68 20 61 20 70 72 65 offer.open.topics.but.with.a.pre
5b80 66 69 78 20 61 72 67 75 6d 65 6e 74 0a 61 6c 73 6f 20 6f 66 66 65 72 20 63 6c 6f 73 65 64 20 74 fix.argument.also.offer.closed.t
5ba0 6f 70 69 63 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 66 6f opics."...(interactive.(list.(fo
5bc0 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 20 22 42 72 6f 77 73 65 20 74 6f 70 69 63 22 29 29 29 rge-read-topic."Browse.topic")))
5be0 0a 20 20 28 66 6f 72 67 65 2d 2d 62 72 6f 77 73 65 2d 74 6f 70 69 63 20 74 6f 70 69 63 29 29 0a ...(forge--browse-topic.topic)).
5c00 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 72 6f .;;;###autoload.(defun.forge-bro
5c20 77 73 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 22 52 wse-discussion.(discussion)..."R
5c40 65 61 64 20 61 20 44 49 53 43 55 53 53 49 4f 4e 20 61 6e 64 20 76 69 73 69 74 20 69 74 20 75 73 ead.a.DISCUSSION.and.visit.it.us
5c60 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 0a 42 79 20 64 65 66 61 75 6c 74 20 6f 6e 6c 79 20 6f ing.a.browser..By.default.only.o
5c80 66 66 65 72 20 6f 70 65 6e 20 64 69 73 63 75 73 73 69 6f 6e 73 20 62 75 74 20 77 69 74 68 20 61 ffer.open.discussions.but.with.a
5ca0 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 0a 61 6c 73 6f 20 6f 66 66 65 72 20 63 6c 6f 73 .prefix.argument.also.offer.clos
5cc0 65 64 20 69 73 73 75 65 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 ed.issues."...(interactive.(list
5ce0 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 64 69 73 63 75 73 73 69 6f 6e 20 22 42 72 6f 77 73 65 20 .(forge-read-discussion."Browse.
5d00 64 69 73 63 75 73 73 69 6f 6e 22 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 62 72 6f 77 73 65 2d discussion")))...(forge--browse-
5d20 74 6f 70 69 63 20 64 69 73 63 75 73 73 69 6f 6e 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f topic.discussion))..;;;###autolo
5d40 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 73 75 65 20 28 69 73 ad.(defun.forge-browse-issue.(is
5d60 73 75 65 29 0a 20 20 22 52 65 61 64 20 61 6e 20 49 53 53 55 45 20 61 6e 64 20 76 69 73 69 74 20 sue)..."Read.an.ISSUE.and.visit.
5d80 69 74 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 0a 42 79 20 64 65 66 61 75 6c 74 20 6f it.using.a.browser..By.default.o
5da0 6e 6c 79 20 6f 66 66 65 72 20 6f 70 65 6e 20 69 73 73 75 65 73 20 62 75 74 20 77 69 74 68 20 61 nly.offer.open.issues.but.with.a
5dc0 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 0a 61 6c 73 6f 20 6f 66 66 65 72 20 63 6c 6f 73 .prefix.argument.also.offer.clos
5de0 65 64 20 69 73 73 75 65 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 ed.issues."...(interactive.(list
5e00 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 69 73 73 75 65 20 22 42 72 6f 77 73 65 20 69 73 73 75 65 .(forge-read-issue."Browse.issue
5e20 22 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 62 72 6f 77 73 65 2d 74 6f 70 69 63 20 69 73 73 75 ")))...(forge--browse-topic.issu
5e40 65 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 e))..;;;###autoload.(defun.forge
5e60 2d 62 72 6f 77 73 65 2d 70 75 6c 6c 72 65 71 20 28 70 75 6c 6c 2d 72 65 71 75 65 73 74 29 0a 20 -browse-pullreq.(pull-request)..
5e80 20 22 52 65 61 64 20 61 20 50 55 4c 4c 2d 52 45 51 55 45 53 54 20 61 6e 64 20 76 69 73 69 74 20 ."Read.a.PULL-REQUEST.and.visit.
5ea0 69 74 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 0a 42 79 20 64 65 66 61 75 6c 74 20 6f it.using.a.browser..By.default.o
5ec0 6e 6c 79 20 6f 66 66 65 72 20 6f 70 65 6e 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 62 75 74 nly.offer.open.pull-requests.but
5ee0 20 77 69 74 68 20 61 20 70 72 65 66 69 78 0a 61 72 67 75 6d 65 6e 74 20 61 6c 73 6f 20 6f 66 66 .with.a.prefix.argument.also.off
5f00 65 72 20 63 6c 6f 73 65 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e 22 0a 20 20 28 69 6e 74 er.closed.pull-requests."...(int
5f20 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 70 75 6c 6c 72 eractive.(list.(forge-read-pullr
5f40 65 71 20 22 42 72 6f 77 73 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 22 29 29 29 0a 20 20 28 66 eq."Browse.pull-request")))...(f
5f60 6f 72 67 65 2d 2d 62 72 6f 77 73 65 2d 74 6f 70 69 63 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 29 orge--browse-topic.pull-request)
5f80 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 62 72 6f 77 73 65 2d 74 6f 70 69 63 20 28 74 )..(defun.forge--browse-topic.(t
5fa0 6f 70 69 63 29 0a 20 20 28 6c 65 74 20 28 28 6f 62 6a 20 28 66 6f 72 67 65 2d 67 65 74 2d 74 6f opic)...(let.((obj.(forge-get-to
5fc0 70 69 63 20 74 6f 70 69 63 29 29 29 0a 20 20 20 20 28 62 72 6f 77 73 65 2d 75 72 6c 20 28 66 6f pic.topic))).....(browse-url.(fo
5fe0 72 67 65 2d 67 65 74 2d 75 72 6c 20 6f 62 6a 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 74 6f 70 rge-get-url.obj)).....(forge-top
6000 69 63 2d 6d 61 72 6b 2d 72 65 61 64 20 6f 62 6a 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c ic-mark-read.obj)))..;;;###autol
6020 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 63 6f 6d 6d 69 74 20 28 oad.(defun.forge-browse-commit.(
6040 63 6f 6d 6d 69 74 29 0a 20 20 22 52 65 61 64 20 61 20 43 4f 4d 4d 49 54 20 61 6e 64 20 76 69 73 commit)..."Read.a.COMMIT.and.vis
6060 69 74 20 69 74 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 22 0a 20 20 28 69 6e 74 65 72 it.it.using.a.browser."...(inter
6080 61 63 74 69 76 65 0a 20 20 20 28 6c 69 73 74 20 28 6f 72 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c active....(list.(or.(magit-compl
60a0 65 74 69 6e 67 2d 72 65 61 64 20 22 42 72 6f 77 73 65 20 63 6f 6d 6d 69 74 22 0a 20 20 20 20 20 eting-read."Browse.commit"......
60c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
60e0 6d 61 67 69 74 2d 6c 69 73 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 73 29 0a 20 20 20 20 20 20 20 magit-list-branch-names)........
6100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c .............................nil
6120 20 6e 69 6c 20 6e 69 6c 20 27 6d 61 67 69 74 2d 72 65 76 69 73 69 6f 6e 2d 68 69 73 74 6f 72 79 .nil.nil.'magit-revision-history
6140 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
6160 20 20 20 20 20 28 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 6f 72 2d 63 6f 6d 6d 69 74 2d 61 74 2d .....(magit-branch-or-commit-at-
6180 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 point))..............(user-error
61a0 20 22 4e 6f 74 68 69 6e 67 20 73 65 6c 65 63 74 65 64 22 29 29 29 29 0a 20 20 28 62 72 6f 77 73 ."Nothing.selected"))))...(brows
61c0 65 2d 75 72 6c 20 28 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 3a 63 6f 6d 6d 69 74 20 63 6f 6d e-url.(forge-get-url.:commit.com
61e0 6d 69 74 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f mit)))..;;;###autoload.(defun.fo
6200 72 67 65 2d 62 72 6f 77 73 65 2d 62 72 61 6e 63 68 20 28 62 72 61 6e 63 68 29 0a 20 20 22 52 65 rge-browse-branch.(branch)..."Re
6220 61 64 20 61 20 42 52 41 4e 43 48 20 61 6e 64 20 76 69 73 69 74 20 69 74 20 75 73 69 6e 67 20 61 ad.a.BRANCH.and.visit.it.using.a
6240 20 62 72 6f 77 73 65 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 .browser."...(interactive.(list.
6260 28 6d 61 67 69 74 2d 72 65 61 64 2d 62 72 61 6e 63 68 20 22 42 72 6f 77 73 65 20 62 72 61 6e 63 (magit-read-branch."Browse.branc
6280 68 22 29 29 29 0a 20 20 28 62 72 6f 77 73 65 2d 75 72 6c 20 28 66 6f 72 67 65 2d 67 65 74 2d 75 h")))...(browse-url.(forge-get-u
62a0 72 6c 20 3a 62 72 61 6e 63 68 20 62 72 61 6e 63 68 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f rl.:branch.branch)))..;;;###auto
62c0 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 72 65 6d 6f 74 65 20 load.(defun.forge-browse-remote.
62e0 28 72 65 6d 6f 74 65 29 0a 20 20 22 52 65 61 64 20 61 20 52 45 4d 4f 54 45 20 61 6e 64 20 76 69 (remote)..."Read.a.REMOTE.and.vi
6300 73 69 74 20 69 74 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 22 0a 20 20 28 69 6e 74 65 sit.it.using.a.browser."...(inte
6320 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 6d 61 67 69 74 2d 72 65 61 64 2d 72 65 6d 6f 74 65 ractive.(list.(magit-read-remote
6340 20 22 42 72 6f 77 73 65 20 72 65 6d 6f 74 65 22 20 6e 69 6c 20 74 29 29 29 0a 20 20 28 62 72 6f ."Browse.remote".nil.t)))...(bro
6360 77 73 65 2d 75 72 6c 20 28 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 3a 72 65 6d 6f 74 65 20 72 wse-url.(forge-get-url.:remote.r
6380 65 6d 6f 74 65 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 emote)))..;;;###autoload.(defun.
63a0 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 72 65 70 6f 73 69 74 forge-browse-repository.(reposit
63c0 6f 72 79 29 0a 20 20 22 52 65 61 64 20 61 20 52 45 50 4f 53 49 54 4f 52 59 20 61 6e 64 20 76 69 ory)..."Read.a.REPOSITORY.and.vi
63e0 73 69 74 20 69 74 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 22 0a 20 20 28 69 6e 74 65 sit.it.using.a.browser."...(inte
6400 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 72 65 70 6f 73 69 ractive.(list.(forge-read-reposi
6420 74 6f 72 79 20 22 42 72 6f 77 73 65 20 72 65 70 6f 73 69 74 6f 72 79 22 29 29 29 0a 20 20 28 62 tory."Browse.repository")))...(b
6440 72 6f 77 73 65 2d 75 72 6c 20 28 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 72 65 70 6f 73 69 74 rowse-url.(forge-get-url.reposit
6460 6f 72 79 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f ory)))..;;;###autoload.(defun.fo
6480 72 67 65 2d 62 72 6f 77 73 65 2d 62 6c 6f 62 20 28 63 6f 6d 6d 69 74 20 66 69 6c 65 20 26 6f 70 rge-browse-blob.(commit.file.&op
64a0 74 69 6f 6e 61 6c 20 6c 69 6e 65 20 65 6e 64 20 66 6f 72 63 65 2d 68 61 73 68 29 0a 20 20 22 56 tional.line.end.force-hash)..."V
64c0 69 73 69 74 20 61 20 62 6c 6f 62 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 0a 0a 57 68 isit.a.blob.using.a.browser...Wh
64e0 65 6e 20 69 6e 76 6f 6b 65 64 20 66 72 6f 6d 20 61 20 62 6c 6f 62 2d 20 6f 72 20 66 69 6c 65 2d en.invoked.from.a.blob-.or.file-
6500 76 69 73 69 74 69 6e 67 20 62 75 66 66 65 72 2c 20 76 69 73 69 74 20 74 68 61 74 20 62 6c 6f 62 visiting.buffer,.visit.that.blob
6520 0a 77 69 74 68 6f 75 74 20 70 72 6f 6d 70 74 69 6e 67 2e 20 20 49 66 20 74 68 65 20 72 65 67 69 .without.prompting...If.the.regi
6540 6f 6e 20 69 73 20 61 63 74 69 76 65 2c 20 74 72 79 20 74 6f 20 6a 75 6d 70 20 74 6f 20 74 68 65 on.is.active,.try.to.jump.to.the
6560 20 6d 61 72 6b 65 64 0a 6c 69 6e 65 20 6f 72 20 6c 69 6e 65 73 2c 20 61 6e 64 20 68 69 67 68 6c .marked.line.or.lines,.and.highl
6580 69 67 68 74 20 74 68 65 6d 20 69 6e 20 74 68 65 20 62 72 6f 77 73 65 72 2e 20 20 54 6f 20 77 68 ight.them.in.the.browser...To.wh
65a0 61 74 20 65 78 74 65 6e 64 20 74 68 61 74 0a 69 73 20 70 6f 73 73 69 62 6c 65 20 64 65 70 65 6e at.extend.that.is.possible.depen
65c0 64 73 20 6f 6e 20 74 68 65 20 66 6f 72 67 65 2e 20 20 57 68 65 6e 20 74 68 65 20 72 65 67 69 6f ds.on.the.forge...When.the.regio
65e0 6e 20 69 73 20 6e 6f 74 20 61 63 74 69 76 65 20 6a 75 73 74 0a 76 69 73 69 74 20 74 68 65 20 62 n.is.not.active.just.visit.the.b
6600 6c 6f 62 2c 20 77 69 74 68 6f 75 74 20 74 72 79 69 6e 67 20 74 6f 20 6a 75 6d 70 20 74 6f 20 74 lob,.without.trying.to.jump.to.t
6620 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 2e 20 20 57 68 65 6e 0a 6a 75 6d 70 69 6e 67 20 74 he.current.line...When.jumping.t
6640 6f 20 61 20 6c 69 6e 65 2c 20 61 6c 77 61 79 73 20 75 73 65 20 61 20 63 6f 6d 6d 69 74 20 68 61 o.a.line,.always.use.a.commit.ha
6660 73 68 20 61 73 20 70 61 72 74 20 6f 66 20 74 68 65 20 55 52 4c 2e 20 20 46 72 6f 6d 0a 61 20 66 sh.as.part.of.the.URL...From.a.f
6680 69 6c 65 20 69 6e 20 74 68 65 20 77 6f 72 6b 74 72 65 65 20 77 69 74 68 20 6e 6f 20 61 63 74 69 ile.in.the.worktree.with.no.acti
66a0 76 65 20 72 65 67 69 6f 6e 2c 20 69 6e 73 74 65 61 64 20 75 73 65 20 74 68 65 20 62 72 61 6e 63 ve.region,.instead.use.the.branc
66c0 68 0a 6e 61 6d 65 20 61 73 20 70 61 72 74 20 6f 66 20 74 68 65 20 55 52 4c 2c 20 75 6e 6c 65 73 h.name.as.part.of.the.URL,.unles
66e0 73 20 61 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 69 73 20 75 73 65 64 2e 0a 0a 57 68 s.a.prefix.argument.is.used...Wh
6700 65 6e 20 69 6e 76 6f 6b 65 64 20 66 72 6f 6d 20 61 6e 79 20 6f 74 68 65 72 20 62 75 66 66 65 72 en.invoked.from.any.other.buffer
6720 2c 20 70 72 6f 6d 70 74 20 74 68 65 20 75 73 65 72 20 66 6f 72 20 61 20 62 72 61 6e 63 68 20 6f ,.prompt.the.user.for.a.branch.o
6740 72 0a 63 6f 6d 6d 69 74 2c 20 61 6e 64 20 66 6f 72 20 61 20 66 69 6c 65 2e 22 0a 20 20 28 69 6e r.commit,.and.for.a.file."...(in
6760 74 65 72 61 63 74 69 76 65 20 28 66 6f 72 67 65 2d 2d 62 72 6f 77 73 65 2d 62 6c 6f 62 2d 61 72 teractive.(forge--browse-blob-ar
6780 67 73 29 29 0a 20 20 28 62 72 6f 77 73 65 2d 75 72 6c 20 28 66 6f 72 67 65 2d 67 65 74 2d 75 72 gs))...(browse-url.(forge-get-ur
67a0 6c 20 3a 62 6c 6f 62 20 63 6f 6d 6d 69 74 20 66 69 6c 65 20 6c 69 6e 65 20 65 6e 64 20 66 6f 72 l.:blob.commit.file.line.end.for
67c0 63 65 2d 68 61 73 68 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c ce-hash)))..;;;###autoload(autol
67e0 6f 61 64 20 27 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 68 69 73 2d 74 6f 70 69 63 20 22 66 6f oad.'forge-browse-this-topic."fo
6800 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d rge-commands".nil.t).(transient-
6820 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 68 69 73 2d define-suffix.forge-browse-this-
6840 74 6f 70 69 63 20 28 29 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 74 6f 70 69 63 20 61 74 20 70 topic.()..."Visit.the.topic.at.p
6860 6f 69 6e 74 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 22 0a 20 20 3a 64 65 73 63 72 69 oint.using.a.browser."...:descri
6880 70 74 69 6f 6e 20 22 62 72 6f 77 73 65 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 ption."browse"...(interactive)..
68a0 20 28 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 63 75 72 72 .(forge-browse-topic.(forge-curr
68c0 65 6e 74 2d 74 6f 70 69 63 20 74 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 ent-topic.t)))..;;;###autoload.(
68e0 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 68 69 73 2d 72 65 70 6f 73 69 74 6f defun.forge-browse-this-reposito
6900 72 79 20 28 29 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 61 74 ry.()..."Visit.the.repository.at
6920 20 70 6f 69 6e 74 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 22 0a 20 20 28 69 6e 74 65 .point.using.a.browser."...(inte
6940 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 72 65 70 6f 73 69 74 ractive)...(forge-browse-reposit
6960 6f 72 79 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 61 74 2d 70 6f 69 6e 74 20 74 ory.(forge-repository-at-point.t
6980 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 )))..;;;###autoload.(defun.forge
69a0 2d 63 6f 70 79 2d 75 72 6c 2d 61 74 2d 70 6f 69 6e 74 2d 61 73 2d 6b 69 6c 6c 20 28 29 0a 20 20 -copy-url-at-point-as-kill.()...
69c0 22 43 6f 70 79 20 74 68 65 20 75 72 6c 20 6f 66 20 74 68 69 6e 67 20 61 74 20 70 6f 69 6e 74 20 "Copy.the.url.of.thing.at.point.
69e0 6f 72 20 74 68 65 20 74 68 69 6e 67 20 76 69 73 69 74 65 64 20 69 6e 20 74 68 65 20 63 75 72 72 or.the.thing.visited.in.the.curr
6a00 65 6e 74 20 62 75 66 66 65 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 ent.buffer."...(interactive)...(
6a20 69 66 2d 6c 65 74 20 28 28 74 61 72 67 65 74 20 28 66 6f 72 67 65 2d 2d 62 72 6f 77 73 65 2d 74 if-let.((target.(forge--browse-t
6a40 61 72 67 65 74 29 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 75 72 6c 20 28 69 66 20 28 73 arget))).......(let.((url.(if.(s
6a60 74 72 69 6e 67 70 20 74 61 72 67 65 74 29 20 74 61 72 67 65 74 20 28 66 6f 72 67 65 2d 67 65 74 tringp.target).target.(forge-get
6a80 2d 75 72 6c 20 74 61 72 67 65 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 6e 65 -url.target)))).........(kill-ne
6aa0 77 20 75 72 6c 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 43 6f 70 69 65 64 20 w.url).........(message."Copied.
6ac0 5c 22 25 73 5c 22 22 20 75 72 6c 29 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e \"%s\"".url)).....(user-error."N
6ae0 6f 74 68 69 6e 67 20 61 74 20 70 6f 69 6e 74 20 77 69 74 68 20 61 20 55 52 4c 22 29 29 29 0a 0a othing.at.point.with.a.URL")))..
6b00 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 72 6f 77 ;;;###autoload.(defun.forge-brow
6b20 73 65 20 28 29 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 74 68 69 6e 67 20 61 74 20 70 6f 69 6e se.()..."Visit.the.thing.at.poin
6b40 74 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 t.using.a.browser."...(interacti
6b60 76 65 29 0a 20 20 28 69 66 2d 6c 65 74 20 28 28 74 61 72 67 65 74 20 28 66 6f 72 67 65 2d 2d 62 ve)...(if-let.((target.(forge--b
6b80 72 6f 77 73 65 2d 74 61 72 67 65 74 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e rowse-target))).......(if.(strin
6ba0 67 70 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 62 72 6f 77 73 65 2d 75 72 6c gp.target)...........(browse-url
6bc0 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 28 62 72 6f 77 73 65 2d 75 72 6c 20 28 66 6f .target).........(browse-url.(fo
6be0 72 67 65 2d 67 65 74 2d 75 72 6c 20 74 61 72 67 65 74 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 rge-get-url.target)).........(wh
6c00 65 6e 20 28 63 6c 2d 74 79 70 65 70 20 74 61 72 67 65 74 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 en.(cl-typep.target.'forge-topic
6c20 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 61 72 6b 2d 72 65 )...........(forge-topic-mark-re
6c40 61 64 20 74 61 72 67 65 74 29 29 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f ad.target))).....(user-error."No
6c60 74 68 69 6e 67 20 74 6f 20 62 72 6f 77 73 65 20 68 65 72 65 22 29 29 29 0a 0a 28 64 65 66 75 6e thing.to.browse.here")))..(defun
6c80 20 66 6f 72 67 65 2d 2d 62 72 6f 77 73 65 2d 74 61 72 67 65 74 20 28 29 0a 20 20 28 6f 72 20 28 .forge--browse-target.()...(or.(
6ca0 61 6e 64 24 20 28 6d 61 67 69 74 2d 2d 70 61 69 6e 74 65 64 2d 62 72 61 6e 63 68 2d 61 74 2d 70 and$.(magit--painted-branch-at-p
6cc0 6f 69 6e 74 29 20 28 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 3a 62 72 61 6e 63 68 20 24 29 29 oint).(forge-get-url.:branch.$))
6ce0 0a 20 20 20 20 20 20 28 61 6e 64 24 20 28 6d 61 67 69 74 2d 63 6f 6d 6d 69 74 2d 61 74 2d 70 6f .......(and$.(magit-commit-at-po
6d00 69 6e 74 29 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 3a 63 6f int)..........(forge-get-url.:co
6d20 6d 6d 69 74 20 24 29 29 0a 20 20 20 20 20 20 28 61 6e 64 24 20 28 6d 61 67 69 74 2d 62 72 61 6e mmit.$)).......(and$.(magit-bran
6d40 63 68 2d 61 74 2d 70 6f 69 6e 74 29 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 ch-at-point)..........(forge-get
6d60 2d 75 72 6c 20 3a 62 72 61 6e 63 68 20 24 29 29 0a 20 20 20 20 20 20 28 61 6e 64 24 20 28 6d 61 -url.:branch.$)).......(and$.(ma
6d80 67 69 74 2d 72 65 6d 6f 74 65 2d 61 74 2d 70 6f 69 6e 74 29 20 20 20 20 20 20 20 20 20 20 28 66 git-remote-at-point)..........(f
6da0 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 3a 72 65 6d 6f 74 65 20 24 29 29 0a 20 20 20 20 20 20 28 orge-get-url.:remote.$)).......(
6dc0 61 6e 64 24 20 28 6d 61 67 69 74 2d 66 69 6c 65 2d 61 74 2d 70 6f 69 6e 74 29 20 20 20 20 20 20 and$.(magit-file-at-point)......
6de0 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 3a 62 6c 6f 62 20 6e 69 6c 20 24 ......(forge-get-url.:blob.nil.$
6e00 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 6f 73 74 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 )).......(forge-post-at-point)..
6e20 20 20 20 20 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 .....(forge-current-topic)......
6e40 20 28 61 6e 64 20 28 6f 72 20 6d 61 67 69 74 2d 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 .(and.(or.magit-buffer-file-name
6e60 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 .buffer-file-name)............(a
6e80 70 70 6c 79 20 23 27 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 3a 62 6c 6f 62 20 28 66 6f 72 67 pply.#'forge-get-url.:blob.(forg
6ea0 65 2d 2d 62 72 6f 77 73 65 2d 62 6c 6f 62 2d 61 72 67 73 29 29 29 0a 20 20 20 20 20 20 28 61 6e e--browse-blob-args))).......(an
6ec0 64 20 6d 61 67 69 74 2d 62 75 66 66 65 72 2d 72 65 76 69 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 d.magit-buffer-revision.........
6ee0 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 3a 63 6f 6d 6d 69 74 20 6d 61 67 69 74 2d ...(forge-get-url.:commit.magit-
6f00 62 75 66 66 65 72 2d 72 65 76 69 73 69 6f 6e 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 buffer-revision)).......(forge-g
6f20 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 3f 29 29 29 0a 0a 28 64 65 66 75 6e 20 et-repository.:stub?)))..(defun.
6f40 66 6f 72 67 65 2d 2d 62 72 6f 77 73 65 2d 62 6c 6f 62 2d 61 72 67 73 20 28 29 0a 20 20 28 63 6f forge--browse-blob-args.()...(co
6f60 6e 64 0a 20 20 20 28 6d 61 67 69 74 2d 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 nd....(magit-buffer-file-name...
6f80 20 20 60 28 2c 28 6f 72 20 6d 61 67 69 74 2d 62 75 66 66 65 72 2d 72 65 66 6e 61 6d 65 20 6d 61 ..`(,(or.magit-buffer-refname.ma
6fa0 67 69 74 2d 62 75 66 66 65 72 2d 72 65 76 69 73 69 6f 6e 29 0a 20 20 20 20 20 20 2c 28 6d 61 67 git-buffer-revision).......,(mag
6fc0 69 74 2d 66 69 6c 65 2d 72 65 6c 61 74 69 76 65 2d 6e 61 6d 65 20 6d 61 67 69 74 2d 62 75 66 66 it-file-relative-name.magit-buff
6fe0 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 2c 40 28 6d 61 67 69 74 2d 66 69 6c er-file-name).......,@(magit-fil
7000 65 2d 72 65 67 69 6f 6e 2d 6c 69 6e 65 2d 6e 75 6d 62 65 72 73 29 0a 20 20 20 20 20 20 2c 63 75 e-region-line-numbers).......,cu
7020 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 29 29 0a 20 20 20 28 62 75 66 66 65 72 2d 66 69 rrent-prefix-arg))....(buffer-fi
7040 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 60 28 6e 69 6c 0a 20 20 20 20 20 20 2c 28 6d 61 67 69 74 2d le-name.....`(nil.......,(magit-
7060 66 69 6c 65 2d 72 65 6c 61 74 69 76 65 2d 6e 61 6d 65 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e file-relative-name.buffer-file-n
7080 61 6d 65 29 0a 20 20 20 20 20 20 2c 40 28 6d 61 67 69 74 2d 66 69 6c 65 2d 72 65 67 69 6f 6e 2d ame).......,@(magit-file-region-
70a0 6c 69 6e 65 2d 6e 75 6d 62 65 72 73 29 0a 20 20 20 20 20 20 2c 63 75 72 72 65 6e 74 2d 70 72 65 line-numbers).......,current-pre
70c0 66 69 78 2d 61 72 67 29 29 0a 20 20 20 28 28 6c 65 74 20 28 28 63 6f 6d 6d 69 74 20 28 6d 61 67 fix-arg))....((let.((commit.(mag
70e0 69 74 2d 72 65 61 64 2d 6c 6f 63 61 6c 2d 62 72 61 6e 63 68 2d 6f 72 2d 63 6f 6d 6d 69 74 0a 20 it-read-local-branch-or-commit..
7100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 42 72 6f 77 73 65 20 66 69 6c 65 20 66 .................."Browse.file.f
7120 72 6f 6d 20 63 6f 6d 6d 69 74 22 29 29 29 0a 20 20 20 20 20 20 28 6c 69 73 74 20 63 6f 6d 6d 69 rom.commit"))).......(list.commi
7140 74 20 28 6d 61 67 69 74 2d 72 65 61 64 2d 66 69 6c 65 2d 66 72 6f 6d 2d 72 65 76 20 63 6f 6d 6d t.(magit-read-file-from-rev.comm
7160 69 74 20 22 42 72 6f 77 73 65 20 66 69 6c 65 22 29 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 55 72 6c it."Browse.file"))))))..;;;;.Url
7180 73 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 72 69 63 20 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 s..(cl-defgeneric.forge-get-url.
71a0 28 6f 62 6a 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 55 52 4c 20 66 6f 72 20 61 20 66 6f (obj)..."Return.the.URL.for.a.fo
71c0 72 67 65 20 6f 62 6a 65 63 74 2e 22 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 rge.object.")..(cl-defmethod.for
71e0 67 65 2d 67 65 74 2d 75 72 6c 20 28 28 64 69 73 63 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 ge-get-url.((disc.forge-discussi
7200 6f 6e 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 64 69 73 63 20 27 64 69 73 63 on))...(forge--format.disc.'disc
7220 75 73 73 69 6f 6e 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 ussion-url-format))..(cl-defmeth
7240 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 28 28 69 73 73 75 65 20 66 6f 72 67 65 2d 69 od.forge-get-url.((issue.forge-i
7260 73 73 75 65 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 69 73 73 75 65 20 27 69 ssue))...(forge--format.issue.'i
7280 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 ssue-url-format))..(cl-defmethod
72a0 20 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 28 28 70 75 6c 6c 72 65 71 20 66 6f 72 67 65 2d 70 .forge-get-url.((pullreq.forge-p
72c0 75 6c 6c 72 65 71 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 70 75 6c 6c 72 65 ullreq))...(forge--format.pullre
72e0 71 20 27 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 0a 0a 28 63 6c 2d 64 65 66 q.'pullreq-url-format))..(cl-def
7300 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 28 28 72 65 70 6f 20 66 6f 72 67 method.forge-get-url.((repo.forg
7320 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 e-repository))...(forge--format.
7340 72 65 70 6f 20 27 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 0a 0a 28 63 6c 2d 64 repo.'remote-url-format))..(cl-d
7360 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 28 28 5f 28 65 71 6c 20 3a efmethod.forge-get-url.((_(eql.:
7380 63 6f 6d 6d 69 74 29 29 20 63 6f 6d 6d 69 74 29 0a 20 20 28 6c 65 74 20 28 28 72 65 70 6f 20 28 commit)).commit)...(let.((repo.(
73a0 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 29 29 29 0a 20 20 forge-get-repository.:stub)))...
73c0 20 20 28 63 6f 6e 64 2d 6c 65 74 2a 0a 20 20 20 20 20 20 28 28 6d 61 67 69 74 2d 6c 69 73 74 2d ..(cond-let*.......((magit-list-
73e0 63 6f 6e 74 61 69 6e 69 6e 67 2d 62 72 61 6e 63 68 65 73 0a 20 20 20 20 20 20 20 20 63 6f 6d 6d containing-branches.........comm
7400 69 74 20 22 2d 72 22 20 28 63 6f 6e 63 61 74 20 28 6f 72 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 it."-r".(concat.(oref.repo.remot
7420 65 29 20 22 2f 2a 22 29 29 29 0a 20 20 20 20 20 20 28 5b 62 72 61 6e 63 68 20 28 63 61 72 20 28 e)."/*"))).......([branch.(car.(
7440 6d 61 67 69 74 2d 6c 69 73 74 2d 63 6f 6e 74 61 69 6e 69 6e 67 2d 62 72 61 6e 63 68 65 73 20 63 magit-list-containing-branches.c
7460 6f 6d 6d 69 74 20 22 2d 72 22 29 29 5d 0a 20 20 20 20 20 20 20 5b 72 65 6d 6f 74 65 20 28 63 61 ommit."-r"))]........[remote.(ca
7480 72 20 28 6d 61 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 62 72 61 6e 63 r.(magit-split-branch-name.branc
74a0 68 29 29 5d 0a 20 20 20 20 20 20 20 28 73 65 74 71 20 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 h))]........(setq.repo.(forge-ge
74c0 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 20 72 65 6d 6f 74 65 29 29 29 0a 20 20 20 t-repository.:stub.remote)))....
74e0 20 20 20 28 28 6d 65 73 73 61 67 65 20 22 25 73 20 64 6f 65 73 20 6e 6f 74 20 61 70 70 65 61 72 ...((message."%s.does.not.appear
7500 20 74 6f 20 62 65 20 61 76 61 69 6c 61 62 6c 65 20 6f 6e 20 61 6e 79 20 72 65 6d 6f 74 65 2e 20 .to.be.available.on.any.remote..
7520 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6d 6d 69 74 20 22 59 6f 75 .%s".................commit."You
7540 20 6d 69 67 68 74 20 68 61 76 65 20 74 6f 20 70 75 73 68 20 69 74 20 66 69 72 73 74 2e 22 29 29 .might.have.to.push.it.first."))
7560 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 72 65 70 6f 20 27 63 6f 6d 6d 69 ).....(forge--format.repo.'commi
7580 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t-url-format....................
75a0 60 28 28 3f 72 20 2e 20 2c 28 6d 61 67 69 74 2d 63 6f 6d 6d 69 74 2d 70 20 63 6f 6d 6d 69 74 29 `((?r...,(magit-commit-p.commit)
75c0 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 75 )))))..(cl-defmethod.forge-get-u
75e0 72 6c 20 28 28 5f 28 65 71 6c 20 3a 62 6c 6f 62 29 29 20 63 6f 6d 6d 69 74 20 66 69 6c 65 0a 20 rl.((_(eql.:blob)).commit.file..
7600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 ............................&opt
7620 69 6f 6e 61 6c 20 6c 69 6e 65 20 65 6e 64 20 66 6f 72 63 65 2d 68 61 73 68 29 0a 20 20 28 6c 65 ional.line.end.force-hash)...(le
7640 74 2a 20 28 28 63 6f 6d 6d 69 74 20 28 6f 72 20 28 61 6e 64 20 28 6d 61 67 69 74 2d 62 72 61 6e t*.((commit.(or.(and.(magit-bran
7660 63 68 2d 70 20 63 6f 6d 6d 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ch-p.commit)....................
7680 20 20 20 20 20 20 20 28 63 64 72 20 28 6d 61 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d .......(cdr.(magit-split-branch-
76a0 6e 61 6d 65 20 63 6f 6d 6d 69 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 name.commit)))..................
76c0 20 20 20 20 28 61 6e 64 20 63 6f 6d 6d 69 74 20 28 6d 61 67 69 74 2d 63 6f 6d 6d 69 74 2d 70 20 ....(and.commit.(magit-commit-p.
76e0 63 6f 6d 6d 69 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 commit))......................(a
7700 6e 64 20 28 6e 6f 74 20 28 6f 72 20 6c 69 6e 65 20 66 6f 72 63 65 2d 68 61 73 68 29 29 0a 20 20 nd.(not.(or.line.force-hash))...
7720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 ........................(magit-g
7740 65 74 2d 63 75 72 72 65 6e 74 2d 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 et-current-branch)).............
7760 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 72 65 76 2d 70 61 72 73 65 20 22 48 45 41 44 22 .........(magit-rev-parse."HEAD"
7780 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d )))..........(repo...(forge-get-
77a0 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6f 72 repository.:stub))..........(for
77c0 6d 61 74 20 28 6f 72 65 66 20 72 65 70 6f 20 62 6c 6f 62 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 mat.(oref.repo.blob-url-format))
77e0 29 0a 20 20 20 20 28 77 68 65 6e 20 28 63 6c 2d 74 79 70 65 70 20 72 65 70 6f 20 27 66 6f 72 67 ).....(when.(cl-typep.repo.'forg
7800 65 2d 67 69 74 77 65 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 28 73 65 74 71 e-gitweb-repository).......(setq
7820 20 63 6f 6d 6d 69 74 20 28 63 6f 6e 63 61 74 20 28 69 66 20 28 6d 61 67 69 74 2d 62 72 61 6e 63 .commit.(concat.(if.(magit-branc
7840 68 2d 70 20 63 6f 6d 6d 69 74 29 20 22 68 62 3d 22 20 22 68 3d 22 29 20 63 6f 6d 6d 69 74 29 29 h-p.commit)."hb="."h=").commit))
7860 29 0a 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 ).....(concat......(forge--forma
7880 74 20 72 65 70 6f 20 66 6f 72 6d 61 74 20 60 28 28 3f 72 20 2e 20 2c 63 6f 6d 6d 69 74 29 20 28 t.repo.format.`((?r...,commit).(
78a0 3f 66 20 2e 20 2c 66 69 6c 65 29 29 29 0a 20 20 20 20 20 28 61 6e 64 20 6c 69 6e 65 20 28 66 6f ?f...,file)))......(and.line.(fo
78c0 72 67 65 2d 66 6f 72 6d 61 74 2d 62 6c 6f 62 2d 6c 69 6e 65 73 20 72 65 70 6f 20 6c 69 6e 65 0a rge-format-blob-lines.repo.line.
78e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7900 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 6c 69 6e 65 20 65 6e ........(and.(not.(equal.line.en
7920 64 29 29 20 65 6e 64 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 d)).end))))))..(cl-defmethod.for
7940 67 65 2d 67 65 74 2d 75 72 6c 20 28 28 5f 28 65 71 6c 20 3a 62 72 61 6e 63 68 29 29 20 62 72 61 ge-get-url.((_(eql.:branch)).bra
7960 6e 63 68 29 0a 20 20 28 6c 65 74 20 28 72 65 6d 6f 74 65 29 0a 20 20 20 20 28 69 66 20 28 6d 61 nch)...(let.(remote).....(if.(ma
7980 67 69 74 2d 72 65 6d 6f 74 65 2d 62 72 61 6e 63 68 2d 70 20 62 72 61 6e 63 68 29 0a 20 20 20 20 git-remote-branch-p.branch).....
79a0 20 20 20 20 28 70 63 61 73 65 2d 73 65 74 71 20 60 28 2c 72 65 6d 6f 74 65 20 2e 20 2c 62 72 61 ....(pcase-setq.`(,remote...,bra
79c0 6e 63 68 29 20 28 6d 61 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 62 72 nch).(magit-split-branch-name.br
79e0 61 6e 63 68 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 65 74 71 20 72 65 6d 6f 74 anch)).......(unless.(setq.remot
7a00 65 20 28 6f 72 20 28 6d 61 67 69 74 2d 67 65 74 2d 70 75 73 68 2d 72 65 6d 6f 74 65 20 62 72 61 e.(or.(magit-get-push-remote.bra
7a20 6e 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nch)............................
7a40 20 20 20 20 28 6d 61 67 69 74 2d 67 65 74 2d 75 70 73 74 72 65 61 6d 2d 72 65 6d 6f 74 65 20 62 ....(magit-get-upstream-remote.b
7a60 72 61 6e 63 68 29 29 29 0a 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 43 61 ranch))).........(user-error."Ca
7a80 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 72 65 6d 6f 74 65 20 66 6f 72 20 25 73 22 20 62 72 nnot.determine.remote.for.%s".br
7aa0 61 6e 63 68 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 28 66 6f 72 67 anch))).....(forge--format.(forg
7ac0 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 20 72 65 6d 6f 74 65 29 0a 20 e-get-repository.:stub.remote)..
7ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 62 72 61 6e 63 68 2d 75 72 6c 2d 66 6f ..................'branch-url-fo
7b00 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 3f 72 20 2e 20 rmat....................`((?r...
7b20 2c 62 72 61 6e 63 68 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 ,branch)))))..(cl-defmethod.forg
7b40 65 2d 67 65 74 2d 75 72 6c 20 28 28 5f 28 65 71 6c 20 3a 72 65 6d 6f 74 65 29 29 20 72 65 6d 6f e-get-url.((_(eql.:remote)).remo
7b60 74 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 28 66 6f 72 67 65 2d 67 65 74 2d te)...(forge--format.(forge-get-
7b80 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 20 72 65 6d 6f 74 65 29 20 27 72 65 6d 6f 74 65 repository.:stub.remote).'remote
7ba0 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 -url-format))..(cl-defmethod.for
7bc0 67 65 2d 67 65 74 2d 75 72 6c 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 70 6f 73 74 29 29 0a 20 ge-get-url.((post.forge-post))..
7be0 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 70 6f 73 74 20 28 6c 65 74 20 28 28 74 6f 70 69 .(forge--format.post.(let.((topi
7c00 63 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 61 72 65 6e 74 20 70 6f 73 74 29 29 29 0a 20 20 20 20 c.(forge-get-parent.post))).....
7c20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 66 6f 72 67 ....................(cond.((forg
7c40 65 2d 2d 63 68 69 6c 64 70 20 74 6f 70 69 63 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f e--childp.topic.'forge-discussio
7c60 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n)..............................
7c80 20 20 27 64 69 73 63 75 73 73 69 6f 6e 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 0a 20 ..'discussion-post-url-format)..
7ca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 .............................((f
7cc0 6f 72 67 65 2d 2d 63 68 69 6c 64 70 20 74 6f 70 69 63 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 orge--childp.topic.'forge-issue)
7ce0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7d00 27 69 73 73 75 65 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 0a 20 20 20 20 20 20 20 20 'issue-post-url-format).........
7d20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 2d 63 ......................((forge--c
7d40 68 69 6c 64 70 20 74 6f 70 69 63 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 hildp.topic.'forge-pullreq).....
7d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 70 75 6c 6c ...........................'pull
7d80 72 65 71 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 req-post-url-format)))))..(cl-de
7da0 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 28 28 6e 6f 74 69 66 79 20 66 fmethod.forge-get-url.((notify.f
7dc0 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 29 29 0a 20 20 28 6f 72 65 66 20 6e 6f 74 69 orge-notification))...(oref.noti
7de0 66 79 20 75 72 6c 29 29 0a 0a 20 3b 3b 20 54 72 61 6e 73 69 74 69 6f 6e 61 6c 20 6b 6c 75 64 67 fy.url))...;;.Transitional.kludg
7e00 65 20 66 6f 72 20 74 68 65 20 69 6e 66 61 6d 6f 75 73 20 70 61 63 6b 61 67 65 2e 65 6c 20 64 65 e.for.the.infamous.package.el.de
7e20 66 65 63 74 2e 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 66 6f 72 67 65 6a 6f 29 0a 0a fect..(require.'forge-forgejo)..
7e40 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 66 6f 72 6d 61 74 2d 62 6c 6f 62 2d (cl-defmethod.forge-format-blob-
7e60 6c 69 6e 65 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 6c lines.((repo.forge-repository).l
7e80 69 6e 65 20 65 6e 64 29 0a 20 20 28 63 6c 2d 65 74 79 70 65 63 61 73 65 20 72 65 70 6f 20 3b 54 ine.end)...(cl-etypecase.repo.;T
7ea0 68 69 72 64 2d 70 61 72 74 79 20 63 6c 61 73 73 65 73 20 72 65 71 75 69 72 65 20 73 65 70 61 72 hird-party.classes.require.separ
7ec0 61 74 65 20 6d 65 74 68 6f 64 73 2e 0a 20 20 20 20 28 28 6f 72 20 66 6f 72 67 65 2d 67 69 74 68 ate.methods......((or.forge-gith
7ee0 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 67 69 74 ub-repository..........forge-git
7f00 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 20 3b 41 6c 73 6f 20 73 75 70 70 6f 72 74 73 20 22 23 lab-repository.;Also.supports."#
7f20 4c 25 73 2d 25 73 22 2e 0a 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 66 6f 72 67 65 6a 6f 2d L%s-%s"...........forge-forgejo-
7f40 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 67 69 74 65 61 2d repository..........forge-gitea-
7f60 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 67 6f 67 73 2d 72 repository..........forge-gogs-r
7f80 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 28 66 6f 72 6d 61 74 20 28 69 66 20 65 6e 64 20 epository)......(format.(if.end.
7fa0 22 23 4c 25 73 2d 4c 25 73 22 20 22 23 4c 25 73 22 29 20 6c 69 6e 65 20 65 6e 64 29 29 0a 20 20 "#L%s-L%s"."#L%s").line.end))...
7fc0 20 20 28 66 6f 72 67 65 2d 62 69 74 62 75 63 6b 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 ..(forge-bitbucket-repository...
7fe0 20 20 20 28 66 6f 72 6d 61 74 20 28 69 66 20 65 6e 64 20 22 23 6c 69 6e 65 73 2d 25 73 3a 25 73 ...(format.(if.end."#lines-%s:%s
8000 22 20 22 23 6c 69 6e 65 73 2d 25 73 22 29 20 6c 69 6e 65 20 65 6e 64 29 29 0a 20 20 20 20 28 28 "."#lines-%s").line.end)).....((
8020 6f 72 20 66 6f 72 67 65 2d 63 67 69 74 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 or.forge-cgit-repository........
8040 20 20 66 6f 72 67 65 2d 63 67 69 74 2a 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 ..forge-cgit*-repository........
8060 20 20 66 6f 72 67 65 2d 63 67 69 74 2a 2a 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 ..forge-cgit**-repository)......
8080 28 66 6f 72 6d 61 74 20 22 23 6e 25 73 22 20 6c 69 6e 65 29 29 0a 20 20 20 20 28 28 6f 72 20 66 (format."#n%s".line)).....((or.f
80a0 6f 72 67 65 2d 67 69 74 77 65 62 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 orge-gitweb-repository..........
80c0 66 6f 72 67 65 2d 72 65 70 6f 6f 72 63 7a 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 forge-repoorcz-repository.......
80e0 20 20 20 66 6f 72 67 65 2d 73 74 61 67 69 74 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 ...forge-stagit-repository).....
8100 20 28 66 6f 72 6d 61 74 20 22 23 6c 25 73 22 20 6c 69 6e 65 29 29 0a 20 20 20 20 28 66 6f 72 67 .(format."#l%s".line)).....(forg
8120 65 2d 73 72 68 74 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 e-srht-repository......(format."
8140 23 4c 25 73 22 20 6c 69 6e 65 29 29 29 29 0a 0a 3b 3b 3b 20 56 69 73 69 74 0a 0a 3b 3b 3b 23 23 #L%s".line))))..;;;.Visit..;;;##
8160 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 6f 70 #autoload.(defun.forge-visit-top
8180 69 63 20 28 74 6f 70 69 63 29 0a 20 20 22 52 65 61 64 20 61 20 54 4f 50 49 43 20 61 6e 64 20 76 ic.(topic)..."Read.a.TOPIC.and.v
81a0 69 73 69 74 20 69 74 2e 0a 42 79 20 64 65 66 61 75 6c 74 20 6f 6e 6c 79 20 6f 66 66 65 72 20 61 isit.it..By.default.only.offer.a
81c0 63 74 69 76 65 20 74 6f 70 69 63 73 20 66 6f 72 20 63 6f 6d 70 6c 65 74 69 6f 6e 2e 20 20 57 69 ctive.topics.for.completion...Wi
81e0 74 68 20 61 20 70 72 65 66 69 78 0a 61 72 67 75 6d 65 6e 74 20 6f 66 66 65 72 20 61 6c 6c 20 74 th.a.prefix.argument.offer.all.t
8200 6f 70 69 63 73 2e 20 20 57 68 69 6c 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 69 73 20 69 6e 20 70 opics...While.completion.is.in.p
8220 72 6f 67 72 65 73 73 2c 20 5c 0a 5c 5c 3c 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d rogress,.\.\\<forge-read-topic-m
8240 69 6e 69 62 75 66 66 65 72 2d 6d 61 70 3e 5c 5c 5b 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 inibuffer-map>\\[forge-read-topi
8260 63 2d 6c 69 66 74 2d 6c 69 6d 69 74 5d 20 6c 69 66 74 73 0a 74 68 65 20 6c 69 6d 69 74 61 74 69 c-lift-limit].lifts.the.limitati
8280 6f 6e 20 74 6f 20 61 63 74 69 76 65 20 74 6f 70 69 63 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 on.to.active.topics."...(interac
82a0 74 69 76 65 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 20 22 56 69 tive.(list.(forge-read-topic."Vi
82c0 65 77 20 74 6f 70 69 63 22 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 75 ew.topic")))...(forge-topic-setu
82e0 70 2d 62 75 66 66 65 72 20 28 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 74 6f 70 69 63 29 p-buffer.(forge-get-topic.topic)
8300 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d ))..;;;###autoload.(defun.forge-
8320 76 69 73 69 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 visit-discussion.(discussion)...
8340 22 52 65 61 64 20 61 20 44 49 53 43 55 53 53 49 4f 4e 20 61 6e 64 20 76 69 73 69 74 20 69 74 2e "Read.a.DISCUSSION.and.visit.it.
8360 0a 42 79 20 64 65 66 61 75 6c 74 20 6f 6e 6c 79 20 6f 66 66 65 72 20 61 63 74 69 76 65 20 74 6f .By.default.only.offer.active.to
8380 70 69 63 73 20 66 6f 72 20 63 6f 6d 70 6c 65 74 69 6f 6e 2e 20 20 57 69 74 68 20 61 20 70 72 65 pics.for.completion...With.a.pre
83a0 66 69 78 0a 61 72 67 75 6d 65 6e 74 20 6f 66 66 65 72 20 61 6c 6c 20 74 6f 70 69 63 73 2e 20 20 fix.argument.offer.all.topics...
83c0 57 68 69 6c 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 69 73 20 69 6e 20 70 72 6f 67 72 65 73 73 2c While.completion.is.in.progress,
83e0 20 5c 0a 5c 5c 3c 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d 69 6e 69 62 75 66 66 65 .\.\\<forge-read-topic-minibuffe
8400 72 2d 6d 61 70 3e 5c 5c 5b 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6c 69 66 74 2d 6c r-map>\\[forge-read-topic-lift-l
8420 69 6d 69 74 5d 20 6c 69 66 74 73 0a 74 68 65 20 6c 69 6d 69 74 61 74 69 6f 6e 20 74 6f 20 61 63 imit].lifts.the.limitation.to.ac
8440 74 69 76 65 20 74 6f 70 69 63 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 tive.topics."...(interactive.(li
8460 73 74 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 64 69 73 63 75 73 73 69 6f 6e 20 22 56 69 65 77 20 st.(forge-read-discussion."View.
8480 64 69 73 63 75 73 73 69 6f 6e 22 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 discussion")))...(forge-topic-se
84a0 74 75 70 2d 62 75 66 66 65 72 20 28 66 6f 72 67 65 2d 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e tup-buffer.(forge-get-discussion
84c0 20 64 69 73 63 75 73 73 69 6f 6e 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 .discussion)))..;;;###autoload.(
84e0 64 65 66 75 6e 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 69 73 73 75 65 20 28 69 73 73 75 65 29 0a defun.forge-visit-issue.(issue).
8500 20 20 22 52 65 61 64 20 61 6e 20 49 53 53 55 45 20 61 6e 64 20 76 69 73 69 74 20 69 74 2e 0a 42 .."Read.an.ISSUE.and.visit.it..B
8520 79 20 64 65 66 61 75 6c 74 20 6f 6e 6c 79 20 6f 66 66 65 72 20 61 63 74 69 76 65 20 69 73 73 75 y.default.only.offer.active.issu
8540 65 73 20 66 6f 72 20 63 6f 6d 70 6c 65 74 69 6f 6e 2e 20 20 57 69 74 68 20 61 20 70 72 65 66 69 es.for.completion...With.a.prefi
8560 78 0a 61 72 67 75 6d 65 6e 74 20 6f 66 66 65 72 20 61 6c 6c 20 74 6f 70 69 63 73 2e 20 20 57 68 x.argument.offer.all.topics...Wh
8580 69 6c 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 69 73 20 69 6e 20 70 72 6f 67 72 65 73 73 2c 20 5c ile.completion.is.in.progress,.\
85a0 0a 5c 5c 3c 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d 69 6e 69 62 75 66 66 65 72 2d .\\<forge-read-topic-minibuffer-
85c0 6d 61 70 3e 5c 5c 5b 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6c 69 66 74 2d 6c 69 6d map>\\[forge-read-topic-lift-lim
85e0 69 74 5d 20 6c 69 66 74 73 0a 74 68 65 20 6c 69 6d 69 74 61 74 69 6f 6e 20 74 6f 20 61 63 74 69 it].lifts.the.limitation.to.acti
8600 76 65 20 69 73 73 75 65 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 ve.issues."...(interactive.(list
8620 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 69 73 73 75 65 20 22 56 69 65 77 20 69 73 73 75 65 22 29 .(forge-read-issue."View.issue")
8640 29 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 28 ))...(forge-topic-setup-buffer.(
8660 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 69 73 73 75 65 29 29 29 0a 0a 3b 3b 3b 23 23 23 forge-get-issue.issue)))..;;;###
8680 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 70 75 6c 6c autoload.(defun.forge-visit-pull
86a0 72 65 71 20 28 70 75 6c 6c 2d 72 65 71 75 65 73 74 29 0a 20 20 22 52 65 61 64 20 61 20 50 55 4c req.(pull-request)..."Read.a.PUL
86c0 4c 2d 52 45 51 55 45 53 54 20 61 6e 64 20 76 69 73 69 74 20 69 74 2e 0a 42 79 20 64 65 66 61 75 L-REQUEST.and.visit.it..By.defau
86e0 6c 74 20 6f 6e 6c 79 20 6f 66 66 65 72 20 61 63 74 69 76 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 lt.only.offer.active.pull-reques
8700 74 73 20 66 6f 72 20 63 6f 6d 70 6c 65 74 69 6f 6e 2e 20 20 57 69 74 68 20 61 0a 70 72 65 66 69 ts.for.completion...With.a.prefi
8720 78 20 61 72 67 75 6d 65 6e 74 20 6f 66 66 65 72 20 61 6c 6c 20 74 6f 70 69 63 73 2e 20 20 57 68 x.argument.offer.all.topics...Wh
8740 69 6c 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 69 73 20 69 6e 20 70 72 6f 67 72 65 73 73 2c 0a 5c ile.completion.is.in.progress,.\
8760 5c 3c 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d 69 6e 69 62 75 66 66 65 72 2d 6d 61 \<forge-read-topic-minibuffer-ma
8780 70 3e 5c 5c 5b 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6c 69 66 74 2d 6c 69 6d 69 74 p>\\[forge-read-topic-lift-limit
87a0 5d 20 5c 0a 6c 69 66 74 73 20 74 68 65 20 6c 69 6d 69 74 61 74 69 6f 6e 20 74 6f 20 61 63 74 69 ].\.lifts.the.limitation.to.acti
87c0 76 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 ve.pull-requests."...(interactiv
87e0 65 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 70 75 6c 6c 72 65 71 20 22 56 69 65 e.(list.(forge-read-pullreq."Vie
8800 77 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 22 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 w.pull-request")))...(forge-topi
8820 63 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 c-setup-buffer.(forge-get-pullre
8840 71 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 q.pull-request)))..;;;###autoloa
8860 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 6f 70 69 63 2d 66 72 6f 6d 2d d.(defun.forge-visit-topic-from-
8880 75 72 6c 20 28 75 72 6c 29 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 74 6f 70 69 63 20 73 70 65 url.(url)..."Visit.the.topic.spe
88a0 63 69 66 69 65 64 20 62 79 20 77 65 62 20 55 52 4c 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 cified.by.web.URL."...(interacti
88c0 76 65 20 28 6c 69 73 74 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 54 6f 70 69 63 20 55 52 4c ve.(list.(read-string."Topic.URL
88e0 3a 20 22 29 29 29 0a 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 0a 20 20 20 20 20 :.")))...(if.(string-match......
8900 20 20 22 2f 5c 5c 28 69 73 73 75 65 73 5c 5c 7c 70 75 6c 6c 5c 5c 7c 64 69 73 63 75 73 73 69 6f .."/\\(issues\\|pull\\|discussio
8920 6e 73 5c 5c 7c 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 5c 5c 29 2f 5c 5c 28 5b 30 2d 39 5d 2b ns\\|merge_requests\\)/\\([0-9]+
8940 5c 5c 29 5c 5c 27 22 0a 20 20 20 20 20 20 20 75 72 6c 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 \\)\\'"........url).......(forge
8960 2d 74 6f 70 69 63 2d 73 65 74 75 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 28 66 6f 72 67 -topic-setup-buffer........(forg
8980 65 2d 67 65 74 2d 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 e-get-topic.(forge-get-repositor
89a0 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 62 73 y..........................(subs
89c0 74 72 69 6e 67 20 75 72 6c 20 30 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 31 29 29 tring.url.0.(match-beginning.1))
89e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 3a 74 ..........................nil.:t
8a00 72 61 63 6b 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 racked).........................
8a20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 (string-to-number.(match-string.
8a40 32 20 75 72 6c 29 29 29 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 20 72 2.url)))).....(user-error."Not.r
8a60 65 63 6f 67 6e 69 7a 65 64 20 61 73 20 61 20 74 6f 70 69 63 20 55 52 4c 3a 20 25 73 22 20 75 72 ecognized.as.a.topic.URL:.%s".ur
8a80 6c 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 l)))..;;;###autoload.(defun.forg
8aa0 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 74 6f 70 69 63 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6d 65 e-visit-this-topic.(&optional.me
8ac0 6e 75 29 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 74 6f 70 69 63 20 61 74 20 70 6f 69 6e 74 2e nu)..."Visit.the.topic.at.point.
8ae0 0a 57 69 74 68 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 4d 45 4e 55 2c 20 61 6c 73 6f .With.prefix.argument.MENU,.also
8b00 20 73 68 6f 77 20 74 68 65 20 74 6f 70 69 63 20 6d 65 6e 75 2e 22 0a 20 20 28 69 6e 74 65 72 61 .show.the.topic.menu."...(intera
8b20 63 74 69 76 65 20 28 6c 69 73 74 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 29 29 ctive.(list.current-prefix-arg))
8b40 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 28 66 6f ...(forge-topic-setup-buffer.(fo
8b60 72 67 65 2d 74 6f 70 69 63 2d 61 74 2d 70 6f 69 6e 74 29 29 0a 20 20 28 63 6f 6e 64 0a 20 20 20 rge-topic-at-point))...(cond....
8b80 28 28 65 71 20 74 72 61 6e 73 69 65 6e 74 2d 63 75 72 72 65 6e 74 2d 63 6f 6d 6d 61 6e 64 20 27 ((eq.transient-current-command.'
8ba0 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 0a 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 forge-topic-menu).....(setq.forg
8bc0 65 2d 2d 71 75 69 74 2d 6b 65 65 70 2d 74 6f 70 69 63 2d 6d 65 6e 75 20 74 29 29 0a 20 20 20 28 e--quit-keep-topic-menu.t))....(
8be0 28 6f 72 20 6d 65 6e 75 0a 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 74 72 61 6e 73 69 65 6e 74 (or.menu.........(memq.transient
8c00 2d 63 75 72 72 65 6e 74 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 -current-command...............'
8c20 28 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 (forge-topics-menu.forge-notific
8c40 61 74 69 6f 6e 73 2d 6d 65 6e 75 29 29 29 0a 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 ations-menu))).....(transient-se
8c60 74 75 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 29 29 29 0a 0a 3b 3b 3b 23 23 tup.'forge-topic-menu))))..;;;##
8c80 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 #autoload.(defun.forge-visit-thi
8ca0 73 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 29 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 72 65 70 s-repository.()..."Visit.the.rep
8cc0 6f 73 69 74 6f 72 79 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 ository.at.point."...(interactiv
8ce0 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 e)...(let*.((repo.(forge-reposit
8d00 6f 72 79 2d 61 74 2d 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 77 6f 72 6b 74 72 65 ory-at-point))..........(worktre
8d20 65 20 28 66 6f 72 67 65 2d 67 65 74 2d 77 6f 72 6b 74 72 65 65 20 72 65 70 6f 29 29 29 0a 20 20 e.(forge-get-worktree.repo)))...
8d40 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 28 61 6e 64 20 28 65 71 20 74 72 61 6e 73 69 65 6e 74 ..(cond......((and.(eq.transient
8d60 2d 63 75 72 72 65 6e 74 2d 63 6f 6d 6d 61 6e 64 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f -current-command.'forge-reposito
8d80 72 69 65 73 2d 6d 65 6e 75 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 ries-menu)............(forge-get
8da0 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 6e 69 6c 20 3a 74 72 61 63 6b 65 64 3f 29 29 -repository.repo.nil.:tracked?))
8dc0 0a 20 20 20 20 20 20 28 63 6f 6e 64 2d 6c 65 74 0a 20 20 20 20 20 20 20 20 28 5b 62 75 66 66 65 .......(cond-let.........([buffe
8de0 72 20 28 67 65 74 2d 62 75 66 66 65 72 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 62 75 66 66 r.(get-buffer.(forge-topics-buff
8e00 65 72 2d 6e 61 6d 65 20 72 65 70 6f 29 29 5d 0a 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 er-name.repo))]..........(switch
8e20 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 28 74 72 61 -to-buffer.buffer)..........(tra
8e40 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 29 nsient-setup.'forge-topics-menu)
8e60 29 0a 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 6c 69 73 74 2d 74 6f 70 69 63 73 20 72 65 ).........((forge-list-topics.re
8e80 70 6f 29 29 29 29 0a 20 20 20 20 20 28 77 6f 72 6b 74 72 65 65 0a 20 20 20 20 20 20 28 6d 61 67 po))))......(worktree.......(mag
8ea0 69 74 2d 73 74 61 74 75 73 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 77 6f 72 6b 74 72 65 65 29 it-status-setup-buffer.worktree)
8ec0 29 0a 20 20 20 20 20 28 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 )......((forge-get-repository.re
8ee0 70 6f 20 6e 69 6c 20 3a 74 72 61 63 6b 65 64 3f 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 6c po.nil.:tracked?).......(forge-l
8f00 69 73 74 2d 74 6f 70 69 63 73 20 72 65 70 6f 29 29 0a 20 20 20 20 20 28 28 75 73 65 72 2d 65 72 ist-topics.repo))......((user-er
8f20 72 6f 72 20 22 4e 6f 74 20 74 72 61 63 6b 65 64 20 61 6e 64 20 6c 6f 63 61 74 69 6f 6e 20 6f 66 ror."Not.tracked.and.location.of
8f40 20 63 6c 6f 6e 65 20 69 73 20 75 6e 6b 6e 6f 77 6e 22 29 29 29 29 29 0a 0a 3b 3b 3b 20 43 72 65 .clone.is.unknown")))))..;;;.Cre
8f60 61 74 65 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 64 69 73 63 75 73 73 ate..(defun.forge-create-discuss
8f80 69 6f 6e 20 28 63 61 74 65 67 6f 72 79 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 6e 65 77 20 64 ion.(category)..."Create.a.new.d
8fa0 69 73 63 75 73 73 69 6f 6e 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 iscussion.for.the.current.reposi
8fc0 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c 69 73 74 20 28 tory."...(interactive....(list.(
8fe0 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 63 61 74 65 67 6f 72 79 20 6e 69 6c 20 22 43 forge-read-topic-category.nil."C
9000 61 74 65 67 6f 72 79 20 66 6f 72 20 6e 65 77 20 64 69 73 63 75 73 73 69 6f 6e 22 29 29 29 0a 20 ategory.for.new.discussion")))..
9020 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 70 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 27 6e 65 77 2d .(forge--setup-post-buffer.'new-
9040 64 69 73 63 75 73 73 69 6f 6e 20 23 27 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 63 72 65 61 74 discussion.#'forge--submit-creat
9060 65 2d 64 69 73 63 75 73 73 69 6f 6e 0a 20 20 20 20 22 6e 65 77 2d 64 69 73 63 75 73 73 69 6f 6e e-discussion....."new-discussion
9080 22 20 22 43 72 65 61 74 65 20 6e 65 77 20 64 69 73 63 75 73 73 69 6f 6e 20 6f 6e 20 25 70 22 0a "."Create.new.discussion.on.%p".
90a0 20 20 20 20 60 28 28 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 63 61 74 65 67 6f 72 79 20 2c 63 ....`((forge--buffer-category.,c
90c0 61 74 65 67 6f 72 79 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 72 65 61 74 65 ategory))))..(defun.forge-create
90e0 2d 69 73 73 75 65 20 28 74 65 6d 70 6c 61 74 65 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 6e 65 -issue.(template)..."Create.a.ne
9100 77 20 69 73 73 75 65 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f w.issue.for.the.current.reposito
9120 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 66 6f 72 67 65 ry."...(interactive.(list.(forge
9140 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 20 6e 69 6c 20 27 66 6f 72 67 65 2d 69 73 73 75 --topic-template.nil.'forge-issu
9160 65 29 29 29 0a 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 74 65 6d 70 6c 61 74 65 0a 20 20 20 20 28 e)))...(let-alist.template.....(
9180 70 63 61 73 65 2d 65 78 68 61 75 73 74 69 76 65 20 2e 74 79 70 65 0a 20 20 20 20 20 20 28 27 72 pcase-exhaustive..type.......('r
91a0 65 64 69 72 65 63 74 20 28 62 72 6f 77 73 65 2d 75 72 6c 20 2e 75 72 6c 29 29 0a 20 20 20 20 20 edirect.(browse-url..url))......
91c0 20 28 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 66 6f 72 67 65 2d 63 72 65 61 74 .('forge-discussion.(forge-creat
91e0 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 2e 63 61 74 65 67 6f 72 79 29 29 0a 20 20 20 20 20 20 28 e-discussion..category)).......(
9200 27 66 6f 72 67 65 2d 69 73 73 75 65 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 'forge-issue........(forge--setu
9220 70 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 27 6e 65 77 2d 69 73 73 75 65 20 23 27 66 6f 72 67 65 p-post-buffer.'new-issue.#'forge
9240 2d 2d 73 75 62 6d 69 74 2d 63 72 65 61 74 65 2d 69 73 73 75 65 0a 20 20 20 20 20 20 20 20 20 22 --submit-create-issue.........."
9260 6e 65 77 2d 69 73 73 75 65 22 20 22 43 72 65 61 74 65 20 6e 65 77 20 69 73 73 75 65 20 6f 6e 20 new-issue"."Create.new.issue.on.
9280 25 70 22 0a 20 20 20 20 20 20 20 20 20 60 28 28 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 65 %p"..........`((forge--buffer-te
92a0 6d 70 6c 61 74 65 20 2c 74 65 6d 70 6c 61 74 65 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 mplate.,template)))))))..(defun.
92c0 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 20 28 73 6f 75 72 63 65 20 74 61 72 forge-create-pullreq.(source.tar
92e0 67 65 74 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 6e 65 77 20 70 75 6c 6c 2d 72 65 71 75 65 73 get)..."Create.a.new.pull-reques
9300 74 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 t.for.the.current.repository."..
9320 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c .(interactive.(forge-create-pull
9340 72 65 71 2d 2d 72 65 61 64 2d 61 72 67 73 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 70 req--read-args))...(forge--setup
9360 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 27 6e 65 77 2d 70 75 6c 6c 72 65 71 20 23 27 66 6f 72 67 -post-buffer.'new-pullreq.#'forg
9380 65 2d 2d 73 75 62 6d 69 74 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 0a 20 20 20 20 22 6e 65 e--submit-create-pullreq....."ne
93a0 77 2d 70 75 6c 6c 72 65 71 22 20 22 43 72 65 61 74 65 20 6e 65 77 20 70 75 6c 6c 2d 72 65 71 75 w-pullreq"."Create.new.pull-requ
93c0 65 73 74 20 6f 6e 20 25 70 22 0a 20 20 20 20 60 28 28 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d est.on.%p".....`((forge--buffer-
93e0 62 61 73 65 2d 62 72 61 6e 63 68 20 2c 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 28 66 6f 72 67 base-branch.,target).......(forg
9400 65 2d 2d 62 75 66 66 65 72 2d 68 65 61 64 2d 62 72 61 6e 63 68 20 2c 73 6f 75 72 63 65 29 0a 20 e--buffer-head-branch.,source)..
9420 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 65 6d 70 6c 61 74 65 20 20 20 20 .....(forge--buffer-template....
9440 2c 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 20 6e 69 6c 20 27 66 6f 72 ,(forge--topic-template.nil.'for
9460 67 65 2d 70 75 6c 6c 72 65 71 29 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 ge-pullreq)))))..(transient-defi
9480 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 66 ne-suffix.forge-create-pullreq-f
94a0 72 6f 6d 2d 69 73 73 75 65 20 28 69 73 73 75 65 20 73 6f 75 72 63 65 20 74 61 72 67 65 74 29 0a rom-issue.(issue.source.target).
94c0 20 20 22 43 6f 6e 76 65 72 74 20 61 6e 20 65 78 69 73 74 69 6e 67 20 49 53 53 55 45 20 69 6e 74 .."Convert.an.existing.ISSUE.int
94e0 6f 20 61 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f o.a.pull-request."...:descriptio
9500 6e 20 22 63 6f 6e 76 65 72 74 20 74 6f 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 22 0a 20 20 3a 69 n."convert.to.pull-request"...:i
9520 66 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 66 6f 72 67 65 f.(lambda.().........(and.(forge
9540 2d 2d 67 65 74 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 --get-github-repository)........
9560 20 20 20 20 20 20 28 6c 65 74 20 28 28 69 73 73 75 65 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e ......(let.((issue.(forge-curren
9580 74 2d 69 73 73 75 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 69 t-issue)))................(and.i
95a0 73 73 75 65 20 28 65 71 20 28 6f 72 65 66 20 69 73 73 75 65 20 73 74 61 74 65 29 20 27 6f 70 65 ssue.(eq.(oref.issue.state).'ope
95c0 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 73 73 75 65 29 29 29 29 n).....................issue))))
95e0 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 63 6f 6e 73 20 28 66 6f 72 67 65 2d 72 65 61 ...(interactive.(cons.(forge-rea
9600 64 2d 6f 70 65 6e 2d 69 73 73 75 65 20 22 43 6f 6e 76 65 72 74 20 69 73 73 75 65 22 29 0a 20 20 d-open-issue."Convert.issue")...
9620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 63 72 65 61 74 65 ...................(forge-create
9640 2d 70 75 6c 6c 72 65 71 2d 2d 72 65 61 64 2d 61 72 67 73 29 29 29 0a 20 20 28 73 65 74 71 20 69 -pullreq--read-args)))...(setq.i
9660 73 73 75 65 20 28 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 69 73 73 75 65 29 29 0a 20 20 ssue.(forge-get-issue.issue))...
9680 28 66 6f 72 67 65 2d 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 66 72 6f 6d 2d 69 73 73 75 (forge--create-pullreq-from-issu
96a0 65 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 69 73 73 75 65 29 0a 20 e.(forge-get-repository.issue)..
96c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
96e0 20 20 20 69 73 73 75 65 20 73 6f 75 72 63 65 20 74 61 72 67 65 74 29 29 0a 0a 28 64 65 66 75 6e ...issue.source.target))..(defun
9700 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 2d 72 65 61 64 2d 61 72 67 73 .forge-create-pullreq--read-args
9720 20 28 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 .()...(let*.((repo.(forge-get-re
9740 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 28 5f 20 pository.:tracked))..........(_.
9760 28 75 6e 6c 65 73 73 20 28 6f 72 65 66 20 72 65 70 6f 20 77 6f 72 6b 74 72 65 65 29 0a 20 20 20 (unless.(oref.repo.worktree)....
9780 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 63 ...........(user-error."Cannot.c
97a0 72 65 61 74 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 77 69 74 68 6f 75 74 20 77 6f 72 6b 69 reate.pull-request.without.worki
97c0 6e 67 20 74 72 65 65 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 6f 75 72 63 65 20 20 28 6d ng.tree")))..........(source..(m
97e0 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 0a 20 20 20 20 20 20 20 20 20 20 20 agit-completing-read............
9800 20 20 20 20 20 20 20 20 22 53 6f 75 72 63 65 20 62 72 61 6e 63 68 22 0a 20 20 20 20 20 20 20 20 ........"Source.branch".........
9820 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 6c 69 73 74 2d 72 65 6d 6f 74 65 2d 62 72 ...........(magit-list-remote-br
9840 61 6e 63 68 2d 6e 61 6d 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e anch-names)....................n
9860 69 6c 20 74 20 6e 69 6c 20 27 6d 61 67 69 74 2d 72 65 76 69 73 69 6f 6e 2d 68 69 73 74 6f 72 79 il.t.nil.'magit-revision-history
9880 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 61 6e 64 2d 6c 65 74 ....................(or.(and-let
98a0 20 28 28 64 20 28 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 .((d.(magit-branch-at-point)))..
98c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6d 61 67 ........................(if.(mag
98e0 69 74 2d 72 65 6d 6f 74 65 2d 62 72 61 6e 63 68 2d 70 20 64 29 0a 20 20 20 20 20 20 20 20 20 20 it-remote-branch-p.d)...........
9900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 0a 20 20 20 20 20 20 20 20 20 20 20 ...................d............
9920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 65 74 2d 70 75 73 68 2d ................(magit-get-push-
9940 62 72 61 6e 63 68 20 64 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 branch.d.t)))...................
9960 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 64 20 28 6d 61 67 69 74 2d 67 65 74 2d 63 75 72 .....(and-let.((d.(magit-get-cur
9980 72 65 6e 74 2d 62 72 61 6e 63 68 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rent-branch)))..................
99a0 20 20 20 20 20 20 20 20 28 69 66 20 28 6d 61 67 69 74 2d 72 65 6d 6f 74 65 2d 62 72 61 6e 63 68 ........(if.(magit-remote-branch
99c0 2d 70 20 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -p.d)...........................
99e0 20 20 20 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...d............................
9a00 28 6d 61 67 69 74 2d 67 65 74 2d 70 75 73 68 2d 62 72 61 6e 63 68 20 64 20 74 29 29 29 29 29 29 (magit-get-push-branch.d.t))))))
9a20 0a 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 74 65 20 20 28 6f 72 65 66 20 72 65 70 6f 20 72 65 ..........(remote..(oref.repo.re
9a40 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 61 72 67 65 74 73 20 28 64 65 6c 65 74 65 mote))..........(targets.(delete
9a60 20 73 6f 75 72 63 65 20 28 6d 61 67 69 74 2d 6c 69 73 74 2d 72 65 6d 6f 74 65 2d 62 72 61 6e 63 .source.(magit-list-remote-branc
9a80 68 2d 6e 61 6d 65 73 20 72 65 6d 6f 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 61 72 67 h-names.remote)))..........(targ
9aa0 65 74 20 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 0a 20 20 20 20 20 et..(magit-completing-read......
9ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 54 61 72 67 65 74 20 62 72 61 6e 63 68 22 20 74 61 .............."Target.branch".ta
9ae0 72 67 65 74 73 20 6e 69 6c 20 74 20 6e 69 6c 20 27 6d 61 67 69 74 2d 72 65 76 69 73 69 6f 6e 2d rgets.nil.t.nil.'magit-revision-
9b00 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a history....................(let*
9b20 20 28 28 64 20 28 63 64 72 20 28 6d 61 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e 61 .((d.(cdr.(magit-split-branch-na
9b40 6d 65 20 73 6f 75 72 63 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 me.source)))....................
9b60 20 20 20 20 20 20 20 28 64 20 28 61 6e 64 20 28 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 70 20 64 .......(d.(and.(magit-branch-p.d
9b80 29 20 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ).d))...........................
9ba0 28 64 20 28 61 6e 64 20 64 20 28 6d 61 67 69 74 2d 67 65 74 2d 75 70 73 74 72 65 61 6d 2d 62 72 (d.(and.d.(magit-get-upstream-br
9bc0 61 6e 63 68 20 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 anch.d))).......................
9be0 20 20 20 20 28 64 20 28 61 6e 64 20 64 20 28 69 66 20 28 6d 61 67 69 74 2d 72 65 6d 6f 74 65 2d ....(d.(and.d.(if.(magit-remote-
9c00 62 72 61 6e 63 68 2d 70 20 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 branch-p.d).....................
9c20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 0a 20 20 20 20 20 20 20 20 20 20 ....................d...........
9c40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 ............................(mag
9c60 69 74 2d 67 65 74 2d 75 70 73 74 72 65 61 6d 2d 62 72 61 6e 63 68 20 64 29 29 29 29 0a 20 20 20 it-get-upstream-branch.d))))....
9c80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 20 28 6f 72 20 64 20 .......................(d.(or.d.
9ca0 28 63 6f 6e 63 61 74 20 72 65 6d 6f 74 65 20 22 2f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 (concat.remote."/"..............
9cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f ..............................(o
9ce0 72 20 28 6f 72 65 66 20 72 65 70 6f 20 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 29 0a 20 20 20 r.(oref.repo.default-branch)....
9d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
9d20 20 20 20 20 20 20 20 20 20 20 20 20 22 6d 61 73 74 65 72 22 29 29 29 29 29 0a 20 20 20 20 20 20 ............"master"))))).......
9d40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 72 20 28 6d 65 6d 62 65 72 20 64 20 74 61 ...............(car.(member.d.ta
9d60 72 67 65 74 73 29 29 29 29 29 29 0a 20 20 20 20 28 6c 69 73 74 20 73 6f 75 72 63 65 20 74 61 72 rgets)))))).....(list.source.tar
9d80 67 65 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 6f 73 74 get)))..(defun.forge-create-post
9da0 20 28 26 6f 70 74 69 6f 6e 61 6c 20 71 75 6f 74 65 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 6e .(&optional.quote)..."Create.a.n
9dc0 65 77 20 70 6f 73 74 20 6f 6e 20 61 6e 20 65 78 69 73 74 69 6e 67 20 74 6f 70 69 63 2e 0a 49 66 ew.post.on.an.existing.topic..If
9de0 20 74 68 65 20 72 65 67 69 6f 6e 20 69 73 20 61 63 74 69 76 65 2c 20 74 68 65 6e 20 71 75 6f 74 .the.region.is.active,.then.quot
9e00 65 20 74 68 61 74 20 70 61 72 74 20 6f 66 20 74 68 65 20 70 6f 73 74 2e 0a 4f 74 68 65 72 77 69 e.that.part.of.the.post..Otherwi
9e20 73 65 20 61 6e 64 20 77 69 74 68 20 61 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 71 75 se.and.with.a.prefix.argument.qu
9e40 6f 74 65 20 74 68 65 20 70 6f 73 74 20 74 68 61 74 0a 70 6f 69 6e 74 20 69 73 20 63 75 72 72 65 ote.the.post.that.point.is.curre
9e60 6e 74 6c 79 20 6f 6e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 63 ntly.on."...(interactive.(list.c
9e80 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 29 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 64 urrent-prefix-arg))...(unless.(d
9ea0 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 29 erived-mode-p.'forge-topic-mode)
9ec0 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 69 .....(user-error."This.command.i
9ee0 73 20 6f 6e 6c 79 20 61 76 61 69 6c 61 62 6c 65 20 66 72 6f 6d 20 74 6f 70 69 63 20 62 75 66 66 s.only.available.from.topic.buff
9f00 65 72 73 22 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 71 75 6f 74 65 20 28 63 6f 6e 64 0a 20 20 20 ers"))...(let*.((quote.(cond....
9f20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 6d 61 67 69 74 2d 73 65 63 74 69 ..............((not.(magit-secti
9f40 6f 6e 2d 6d 61 74 63 68 20 27 70 6f 73 74 29 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 on-match.'post)).nil)...........
9f60 20 20 20 20 20 20 20 28 28 75 73 65 2d 72 65 67 69 6f 6e 2d 70 29 0a 20 20 20 20 20 20 20 20 20 .......((use-region-p)..........
9f80 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 74 72 20 28 72 65 67 69 6f 6e 2d 62 65 67 .........(buffer-str.(region-beg
9fa0 69 6e 6e 69 6e 67 29 20 28 72 65 67 69 6f 6e 2d 65 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 inning).(region-end)))..........
9fc0 20 20 20 20 20 20 20 20 28 71 75 6f 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ........(quote..................
9fe0 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 63 6f 6e 74 65 6e 74 20 65 6e 64 29 20 28 6d 61 67 69 .(with-slots.(content.end).(magi
a000 74 2d 63 75 72 72 65 6e 74 2d 73 65 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 t-current-section)..............
a020 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 74 72 69 6d 20 28 62 75 66 66 65 72 2d 73 74 72 20 .......(string-trim.(buffer-str.
a040 63 6f 6e 74 65 6e 74 20 65 6e 64 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 71 75 6f 74 content.end))))))..........(quot
a060 65 20 28 61 6e 64 20 71 75 6f 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e.(and.quote....................
a080 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..(lambda.()....................
a0a0 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 ....(goto-char.(point-max)).....
a0c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 62 6f 62 70 ...................(unless.(bobp
a0e0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 )..........................(inse
a100 72 74 20 22 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rt."\n")).......................
a120 20 28 69 6e 73 65 72 74 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 .(insert.(replace-regexp-in-stri
a140 6e 67 20 22 5e 22 20 22 3e 20 22 20 71 75 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ng."^".">.".quote)).............
a160 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 5c 6e 22 29 29 29 29 0a 20 20 ...........(insert."\n\n"))))...
a180 20 20 20 20 20 20 20 28 6f 62 6a 20 28 69 66 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f .......(obj.(if.(forge-discussio
a1a0 6e 2d 70 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 n-p.forge-buffer-topic).........
a1c0 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 64 69 73 63 75 73 73 ..........(forge--select-discuss
a1e0 69 6f 6e 2d 72 65 70 6c 79 2d 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ion-reply-target)...............
a200 20 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 29 29 0a 20 20 20 20 28 63 6c 2d ..forge-buffer-topic))).....(cl-
a220 74 79 70 65 63 61 73 65 20 6f 62 6a 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 typecase.obj.......(forge-discus
a240 73 69 6f 6e 2d 70 6f 73 74 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 70 2d 70 sion-post........(forge--setup-p
a260 6f 73 74 2d 62 75 66 66 65 72 20 6f 62 6a 20 23 27 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 63 ost-buffer.obj.#'forge--submit-c
a280 72 65 61 74 65 2d 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 22 25 69 3b 25 49 3b 6e 65 77 2d 72 reate-post.........."%i;%I;new-r
a2a0 65 70 6c 79 22 20 22 4e 65 77 20 63 6f 6d 6d 65 6e 74 20 6f 6e 20 23 25 69 3b 25 49 20 6f 66 20 eply"."New.comment.on.#%i;%I.of.
a2c0 25 70 22 20 6e 69 6c 20 71 75 6f 74 65 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 %p".nil.quote)).......(forge-dis
a2e0 63 75 73 73 69 6f 6e 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 70 2d 70 6f 73 cussion........(forge--setup-pos
a300 74 2d 62 75 66 66 65 72 20 6f 62 6a 20 23 27 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 63 72 65 t-buffer.obj.#'forge--submit-cre
a320 61 74 65 2d 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 22 25 69 3b 6e 65 77 2d 61 6e 73 77 65 72 ate-post.........."%i;new-answer
a340 22 20 22 4e 65 77 20 63 6f 6d 6d 65 6e 74 20 6f 6e 20 23 25 69 20 6f 66 20 25 70 22 20 6e 69 6c "."New.comment.on.#%i.of.%p".nil
a360 20 71 75 6f 74 65 29 29 0a 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d .quote)).......(t........(forge-
a380 2d 73 65 74 75 70 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 6f 62 6a 20 23 27 66 6f 72 67 65 2d 2d -setup-post-buffer.obj.#'forge--
a3a0 73 75 62 6d 69 74 2d 63 72 65 61 74 65 2d 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 22 25 69 3b submit-create-post.........."%i;
a3c0 6e 65 77 2d 63 6f 6d 6d 65 6e 74 22 20 22 4e 65 77 20 63 6f 6d 6d 65 6e 74 20 6f 6e 20 23 25 69 new-comment"."New.comment.on.#%i
a3e0 20 6f 66 20 25 70 22 20 6e 69 6c 20 71 75 6f 74 65 29 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 .of.%p".nil.quote)))))..(transie
a400 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 61 70 70 72 6f 76 65 2d 70 nt-define-suffix.forge-approve-p
a420 75 6c 6c 72 65 71 20 28 29 0a 20 20 22 41 70 70 72 6f 76 65 20 74 68 65 20 63 75 72 72 65 6e 74 ullreq.()..."Approve.the.current
a440 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 .pull-request."...:description."
a460 61 70 70 72 6f 76 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 22 0a 20 20 3a 69 6e 61 70 74 2d 69 approve.pull-request"...:inapt-i
a480 66 2d 6e 6f 74 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 0a 20 20 f-not.#'forge-current-pullreq...
a4a0 3a 74 72 61 6e 73 69 65 6e 74 20 6e 69 6c 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 :transient.nil...(interactive)..
a4c0 20 28 6c 65 74 20 28 28 70 75 6c 6c 72 65 71 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 .(let.((pullreq.(forge-current-p
a4e0 75 6c 6c 72 65 71 20 74 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 66 6f 72 67 65 2d 67 ullreq.t))).....(unless.(forge-g
a500 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 70 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 ithub-repository-p.(forge-get-re
a520 70 6f 73 69 74 6f 72 79 20 70 75 6c 6c 72 65 71 29 29 0a 20 20 20 20 20 20 28 75 73 65 72 2d 65 pository.pullreq)).......(user-e
a540 72 72 6f 72 20 22 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 69 73 20 6f 6e 6c 79 20 61 76 61 69 6c rror."This.command.is.only.avail
a560 61 62 6c 65 20 66 6f 72 20 47 69 74 68 75 62 22 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 able.for.Github")).....(forge--s
a580 65 74 75 70 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 70 75 6c 6c 72 65 71 20 23 27 66 6f 72 67 65 etup-post-buffer.pullreq.#'forge
a5a0 2d 2d 73 75 62 6d 69 74 2d 61 70 70 72 6f 76 65 2d 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 20 22 --submit-approve-pullreq......."
a5c0 25 69 3b 6e 65 77 2d 61 70 70 72 6f 76 61 6c 22 20 22 41 70 70 72 6f 76 65 20 70 75 6c 6c 2d 72 %i;new-approval"."Approve.pull-r
a5e0 65 71 75 65 73 74 20 23 25 69 20 6f 66 20 25 70 22 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 equest.#%i.of.%p")))..(transient
a600 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 72 65 71 75 65 73 74 2d 63 68 61 -define-suffix.forge-request-cha
a620 6e 67 65 73 20 28 29 0a 20 20 22 52 65 71 75 65 73 74 20 63 68 61 6e 67 65 73 20 74 6f 20 74 68 nges.()..."Request.changes.to.th
a640 65 20 63 75 72 72 65 6e 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 22 0a 20 20 3a 64 65 73 63 e.current.pull-request."...:desc
a660 72 69 70 74 69 6f 6e 20 22 72 65 71 75 65 73 74 20 63 68 61 6e 67 65 73 22 0a 20 20 3a 69 6e 61 ription."request.changes"...:ina
a680 70 74 2d 69 66 2d 6e 6f 74 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 pt-if-not.#'forge-current-pullre
a6a0 71 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 20 6e 69 6c 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 q...:transient.nil...(interactiv
a6c0 65 29 0a 20 20 28 6c 65 74 20 28 28 70 75 6c 6c 72 65 71 20 28 66 6f 72 67 65 2d 63 75 72 72 65 e)...(let.((pullreq.(forge-curre
a6e0 6e 74 2d 70 75 6c 6c 72 65 71 20 74 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 66 6f 72 nt-pullreq.t))).....(unless.(for
a700 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 70 20 28 66 6f 72 67 65 2d 67 65 ge-github-repository-p.(forge-ge
a720 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 70 75 6c 6c 72 65 71 29 29 0a 20 20 20 20 20 20 28 75 73 t-repository.pullreq)).......(us
a740 65 72 2d 65 72 72 6f 72 20 22 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 69 73 20 6f 6e 6c 79 20 61 er-error."This.command.is.only.a
a760 76 61 69 6c 61 62 6c 65 20 66 6f 72 20 47 69 74 68 75 62 22 29 29 0a 20 20 20 20 28 66 6f 72 67 vailable.for.Github")).....(forg
a780 65 2d 2d 73 65 74 75 70 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 70 75 6c 6c 72 65 71 20 23 27 66 e--setup-post-buffer.pullreq.#'f
a7a0 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 72 65 71 75 65 73 74 2d 63 68 61 6e 67 65 73 0a 20 20 20 orge--submit-request-changes....
a7c0 20 20 20 22 25 69 3b 6e 65 77 2d 72 65 71 75 65 73 74 22 20 22 52 65 71 75 65 73 74 20 63 68 61 ..."%i;new-request"."Request.cha
a7e0 6e 67 65 73 20 66 6f 72 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 23 25 69 20 6f 66 20 25 70 22 nges.for.pull-request.#%i.of.%p"
a800 29 29 29 0a 0a 3b 3b 3b 20 45 64 69 74 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 65 64 69 74 )))..;;;.Edit..(defun.forge-edit
a820 2d 70 6f 73 74 20 28 29 0a 20 20 22 45 64 69 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 6f 73 -post.()..."Edit.the.current.pos
a840 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 70 6f 73 t."...(interactive)...(let.((pos
a860 74 20 28 66 6f 72 67 65 2d 70 6f 73 74 2d 61 74 2d 70 6f 69 6e 74 20 74 29 29 29 0a 20 20 20 20 t.(forge-post-at-point.t))).....
a880 28 63 6c 2d 74 79 70 65 63 61 73 65 20 70 6f 73 74 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 74 (cl-typecase.post.......(forge-t
a8a0 6f 70 69 63 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 70 2d 70 6f 73 74 2d 62 opic........(forge--setup-post-b
a8c0 75 66 66 65 72 20 70 6f 73 74 20 23 27 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 65 64 69 74 2d uffer.post.#'forge--submit-edit-
a8e0 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 22 25 69 22 20 22 45 64 69 74 20 23 25 69 20 6f 66 20 post.........."%i"."Edit.#%i.of.
a900 25 70 22 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 %p".nil..........(lambda.().....
a920 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 23 20 22 20 28 6f 72 65 66 20 70 6f 73 74 20 74 .......(insert."#.".(oref.post.t
a940 69 74 6c 65 29 20 22 5c 6e 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 itle)."\n\n")............(insert
a960 20 28 6f 72 65 66 20 70 6f 73 74 20 62 6f 64 79 29 29 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 .(oref.post.body))))).......(for
a980 67 65 2d 70 6f 73 74 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 70 2d 70 6f 73 ge-post........(forge--setup-pos
a9a0 74 2d 62 75 66 66 65 72 20 70 6f 73 74 20 23 27 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 65 64 t-buffer.post.#'forge--submit-ed
a9c0 69 74 2d 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 22 25 69 3b 25 49 22 20 22 45 64 69 74 20 63 it-post.........."%i;%I"."Edit.c
a9e0 6f 6d 6d 65 6e 74 20 6f 6e 20 23 25 69 20 6f 66 20 25 70 22 20 6e 69 6c 0a 20 20 20 20 20 20 20 omment.on.#%i.of.%p".nil........
aa00 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 ..(lambda.()............(insert.
aa20 28 6f 72 65 66 20 70 6f 73 74 20 62 6f 64 79 29 29 29 29 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 (oref.post.body))))))))..(transi
aa40 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 65 64 69 74 2d 74 6f 70 ent-define-suffix.forge-edit-top
aa60 69 63 2d 6e 6f 74 65 20 28 29 0a 20 20 22 45 64 69 74 20 79 6f 75 72 20 70 72 69 76 61 74 65 20 ic-note.()..."Edit.your.private.
aa80 6e 6f 74 65 20 61 62 6f 75 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 2e 22 0a 20 note.about.the.current.topic."..
aaa0 20 3a 74 72 61 6e 73 69 65 6e 74 20 23 27 74 72 61 6e 73 69 65 6e 74 2d 2d 64 6f 2d 71 75 69 74 .:transient.#'transient--do-quit
aac0 2d 61 6c 6c 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 20 23 27 66 6f 72 67 65 2d 63 75 72 -all...:inapt-if-not.#'forge-cur
aae0 72 65 6e 74 2d 74 6f 70 69 63 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 28 6c 61 6d rent-topic...:description...(lam
ab00 62 64 61 20 28 29 0a 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 bda.().....(if-let.((topic.(forg
ab20 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 63 e-current-topic))).........(conc
ab40 61 74 20 22 6e 6f 74 65 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 2d 6c at."note.".................(if-l
ab60 65 74 20 28 28 6e 6f 74 65 20 28 6f 72 65 66 20 74 6f 70 69 63 20 6e 6f 74 65 29 29 29 0a 20 20 et.((note.(oref.topic.note)))...
ab80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 73 ..................(propertize.(s
aba0 75 62 73 74 72 69 6e 67 20 6e 6f 74 65 20 30 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 ubstring.note.0.(string-match-p.
abc0 22 24 22 20 6e 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 "$".note))......................
abe0 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 74 72 69 ...........'face.'font-lock-stri
ac00 6e 67 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 ng-face)...................(prop
ac20 65 72 74 69 7a 65 20 22 6e 6f 6e 65 22 20 27 66 61 63 65 20 27 6d 61 67 69 74 2d 64 69 6d 6d 65 ertize."none".'face.'magit-dimme
ac40 64 29 29 29 0a 20 20 20 20 20 20 22 6e 6f 74 65 22 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 d)))......."note"))...(interacti
ac60 76 65 29 0a 20 20 28 69 66 2d 6c 65 74 2a 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 63 75 ve)...(if-let*.((topic.(forge-cu
ac80 72 72 65 6e 74 2d 74 6f 70 69 63 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 rrent-topic.t)).............(rep
aca0 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 70 69 63 29 29 0a o.(forge-get-repository.topic)).
acc0 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 ............(default-directory.(
ace0 66 6f 72 67 65 2d 67 65 74 2d 77 6f 72 6b 74 72 65 65 20 72 65 70 6f 29 29 29 0a 20 20 20 20 20 forge-get-worktree.repo)))......
ad00 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 70 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 74 6f 70 69 63 .(forge--setup-post-buffer.topic
ad20 20 23 27 66 6f 72 67 65 2d 2d 73 61 76 65 2d 6e 6f 74 65 0a 20 20 20 20 20 20 20 20 22 25 69 3b .#'forge--save-note........."%i;
ad40 6e 6f 74 65 22 20 22 4e 65 77 20 6e 6f 74 65 20 6f 6e 20 23 25 69 20 6f 66 20 25 70 22 20 6e 69 note"."New.note.on.#%i.of.%p".ni
ad60 6c 0a 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 28 l.........(lambda.()...........(
ad80 77 68 65 6e 2d 6c 65 74 20 28 28 6e 6f 74 65 20 28 6f 72 65 66 20 74 6f 70 69 63 20 6e 6f 74 65 when-let.((note.(oref.topic.note
ada0 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 ))).............(save-excursion.
adc0 28 69 6e 73 65 72 74 20 6e 6f 74 65 20 3f 5c 6e 29 29 29 29 29 0a 20 20 20 20 28 6d 65 73 73 61 (insert.note.?\n))))).....(messa
ade0 67 65 20 22 43 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 74 6f 70 69 63 20 6f 72 20 77 6f ge."Cannot.determine.topic.or.wo
ae00 72 6b 74 72 65 65 22 29 29 29 0a 0a 3b 3b 3b 20 44 65 6c 65 74 65 0a 0a 28 74 72 61 6e 73 69 65 rktree")))..;;;.Delete..(transie
ae20 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 64 65 6c 65 74 65 2d 63 6f nt-define-suffix.forge-delete-co
ae40 6d 6d 65 6e 74 20 28 29 0a 20 20 22 44 65 6c 65 74 65 20 74 68 65 20 63 6f 6d 6d 65 6e 74 20 61 mment.()..."Delete.the.comment.a
ae60 74 20 70 6f 69 6e 74 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 64 65 6c 65 74 65 t.point."...:description."delete
ae80 20 63 6f 6d 6d 65 6e 74 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 20 23 27 66 6f 72 67 .comment"...:inapt-if-not.#'forg
aea0 65 2d 63 6f 6d 6d 65 6e 74 2d 61 74 2d 70 6f 69 6e 74 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 e-comment-at-point...(interactiv
aec0 65 29 0a 20 20 28 6c 65 74 20 28 28 63 6f 6d 6d 65 6e 74 20 28 66 6f 72 67 65 2d 63 6f 6d 6d 65 e)...(let.((comment.(forge-comme
aee0 6e 74 2d 61 74 2d 70 6f 69 6e 74 20 74 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 79 65 73 2d nt-at-point.t))).....(when.(yes-
af00 6f 72 2d 6e 6f 2d 70 20 22 52 65 61 6c 6c 79 20 64 65 6c 65 74 65 20 74 68 65 20 63 75 72 72 65 or-no-p."Really.delete.the.curre
af20 6e 74 20 63 6f 6d 6d 65 6e 74 3f 20 22 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 64 65 6c nt.comment?.").......(forge--del
af40 65 74 65 2d 63 6f 6d 6d 65 6e 74 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 ete-comment.(forge-get-repositor
af60 79 20 3a 74 72 61 63 6b 65 64 29 20 63 6f 6d 6d 65 6e 74 29 29 29 29 0a 0a 3b 3b 3b 20 42 72 61 y.:tracked).comment))))..;;;.Bra
af80 6e 63 68 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 nch..;;;###autoload.(defun.forge
afa0 2d 62 72 61 6e 63 68 2d 70 75 6c 6c 72 65 71 20 28 70 75 6c 6c 72 65 71 29 0a 20 20 22 43 72 65 -branch-pullreq.(pullreq)..."Cre
afc0 61 74 65 20 61 6e 64 20 63 6f 6e 66 69 67 75 72 65 20 61 20 6e 65 77 20 62 72 61 6e 63 68 20 66 ate.and.configure.a.new.branch.f
afe0 72 6f 6d 20 61 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 0a 50 6c 65 61 73 65 20 73 65 65 20 74 rom.a.pull-request..Please.see.t
b000 68 65 20 6d 61 6e 75 61 6c 20 66 6f 72 20 6d 6f 72 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 22 he.manual.for.more.information."
b020 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 72 65 61 ...(interactive.(list.(forge-rea
b040 64 2d 70 75 6c 6c 72 65 71 20 22 42 72 61 6e 63 68 20 70 75 6c 6c 20 72 65 71 75 65 73 74 22 29 d-pullreq."Branch.pull.request")
b060 29 29 0a 20 20 28 6c 65 74 20 28 28 70 75 6c 6c 72 65 71 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 ))...(let.((pullreq.(forge-get-p
b080 75 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 29 29 29 0a 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 ullreq.pullreq))).....(if-let.((
b0a0 62 72 61 6e 63 68 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 62 72 61 6e 63 68 2d 61 63 branch.(forge--pullreq-branch-ac
b0c0 74 69 76 65 20 70 75 6c 6c 72 65 71 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 31 20 62 tive.pullreq))).........(prog1.b
b0e0 72 61 6e 63 68 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 42 72 61 6e 63 68 ranch...........(message."Branch
b100 20 25 53 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 20 61 6e 64 20 69 73 20 63 6f 6e 66 69 67 .%S.already.exists.and.is.config
b120 75 72 65 64 22 20 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 62 72 61 ured".branch)).......(forge--bra
b140 6e 63 68 2d 70 75 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 28 66 6f 72 67 nch-pullreq.pullreq).......(forg
b160 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 e-refresh-buffer))))..(cl-defmet
b180 68 6f 64 20 66 6f 72 67 65 2d 2d 62 72 61 6e 63 68 2d 70 75 6c 6c 72 65 71 20 28 28 70 75 6c 6c hod.forge--branch-pullreq.((pull
b1a0 72 65 71 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 62 72 req.forge-pullreq))...(forge--br
b1c0 61 6e 63 68 2d 70 75 6c 6c 72 65 71 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f anch-pullreq.(forge-get-reposito
b1e0 72 79 20 70 75 6c 6c 72 65 71 29 20 70 75 6c 6c 72 65 71 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 ry.pullreq).pullreq))..(cl-defme
b200 74 68 6f 64 20 66 6f 72 67 65 2d 2d 62 72 61 6e 63 68 2d 70 75 6c 6c 72 65 71 20 28 28 5f 72 65 thod.forge--branch-pullreq.((_re
b220 70 6f 20 66 6f 72 67 65 2d 75 6e 75 73 65 64 61 70 69 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 70 po.forge-unusedapi-repository).p
b240 75 6c 6c 72 65 71 29 0a 20 20 3b 3b 20 57 65 20 64 6f 6e 27 74 20 6b 6e 6f 77 20 65 6e 6f 75 67 ullreq)...;;.We.don't.know.enoug
b260 68 20 74 6f 20 64 6f 20 61 20 67 6f 6f 64 20 6a 6f 62 2e 0a 20 20 28 6c 65 74 2a 20 28 28 6e 75 h.to.do.a.good.job....(let*.((nu
b280 6d 62 65 72 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 mber.(oref.pullreq.number)).....
b2a0 20 20 20 20 20 28 62 72 61 6e 63 68 20 28 66 6f 72 6d 61 74 20 22 70 72 2d 25 73 22 20 6e 75 6d .....(branch.(format."pr-%s".num
b2c0 62 65 72 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 70 ber))).....(when.(magit-branch-p
b2e0 20 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 42 72 61 6e .branch).......(user-error."Bran
b300 63 68 20 60 25 73 27 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 22 20 62 72 61 6e 63 68 29 29 ch.`%s'.already.exists".branch))
b320 0a 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 20 .....(magit-git."branch".branch.
b340 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 72 65 66 20 70 75 6c 6c 72 65 71 29 29 0a 20 20 (forge--pullreq-ref.pullreq))...
b360 20 20 3b 3b 20 4d 6f 72 65 20 6f 66 74 65 6e 20 74 68 61 6e 20 6e 6f 74 20 74 68 69 73 20 69 73 ..;;.More.often.than.not.this.is
b380 20 74 68 65 20 63 6f 72 72 65 63 74 20 74 61 72 67 65 74 20 62 72 61 6e 63 68 2e 0a 20 20 20 20 .the.correct.target.branch......
b3a0 28 6d 61 67 69 74 2d 63 61 6c 6c 2d 67 69 74 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 20 (magit-call-git."branch".branch.
b3c0 22 2d 2d 73 65 74 2d 75 70 73 74 72 65 61 6d 2d 74 6f 3d 6d 61 73 74 65 72 22 29 0a 20 20 20 20 "--set-upstream-to=master").....
b3e0 28 6d 61 67 69 74 2d 73 65 74 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 6e 75 6d (magit-set.(number-to-string.num
b400 62 65 72 29 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 20 22 70 75 6c 6c 52 65 71 75 65 73 ber)."branch".branch."pullReques
b420 74 22 29 0a 20 20 20 20 62 72 61 6e 63 68 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 t").....branch))..(cl-defmethod.
b440 66 6f 72 67 65 2d 2d 62 72 61 6e 63 68 2d 70 75 6c 6c 72 65 71 20 28 28 72 65 70 6f 20 66 6f 72 forge--branch-pullreq.((repo.for
b460 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 70 75 6c 6c 72 65 71 29 0a 20 20 28 6c 65 74 2a 20 ge-repository).pullreq)...(let*.
b480 28 28 6e 75 6d 62 65 72 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 6e 75 6d 62 65 72 29 29 0a ((number.(oref.pullreq.number)).
b4a0 20 20 20 20 20 20 20 20 20 28 62 72 61 6e 63 68 2d 6e 20 28 66 6f 72 6d 61 74 20 22 70 72 2d 25 .........(branch-n.(format."pr-%
b4c0 73 22 20 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 72 61 6e 63 68 20 28 6f 72 s".number))..........(branch.(or
b4e0 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 62 72 61 6e 63 68 2d 69 6e 74 65 72 6e 61 6c .(forge--pullreq-branch-internal
b500 20 70 75 6c 6c 72 65 71 29 20 62 72 61 6e 63 68 2d 6e 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 .pullreq).branch-n))..........(p
b520 75 6c 6c 72 65 71 2d 72 65 66 20 28 66 6f 72 6d 61 74 20 22 72 65 66 73 2f 70 75 6c 6c 72 65 71 ullreq-ref.(format."refs/pullreq
b540 73 2f 25 73 22 20 6e 75 6d 62 65 72 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 61 6e 64 2d s/%s".number))).....(cond.((and-
b560 6c 65 74 20 28 28 70 72 2d 62 72 61 6e 63 68 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 68 65 let.((pr-branch.(oref.pullreq.he
b580 61 64 2d 72 65 66 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 73 ad-ref)))..............(string-s
b5a0 65 61 72 63 68 20 22 3a 22 20 70 72 2d 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 earch.":".pr-branch))...........
b5c0 20 3b 3b 20 53 75 63 68 20 61 20 62 72 61 6e 63 68 20 6e 61 6d 65 20 77 6f 75 6c 64 20 62 65 20 .;;.Such.a.branch.name.would.be.
b5e0 69 6e 76 61 6c 69 64 2e 20 20 49 66 20 77 65 20 65 6e 63 6f 75 6e 74 65 72 0a 20 20 20 20 20 20 invalid...If.we.encounter.......
b600 20 20 20 20 20 3b 3b 20 69 74 20 61 6e 79 77 61 79 2c 20 74 68 65 6e 20 74 68 61 74 20 6d 65 61 .....;;.it.anyway,.then.that.mea
b620 6e 73 20 74 68 61 74 20 74 68 65 20 73 6f 75 72 63 65 20 62 72 61 6e 63 68 20 61 6e 64 0a 20 20 ns.that.the.source.branch.and...
b640 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 65 20 6d 65 72 67 65 2d 72 65 71 75 65 73 74 20 72 65 .........;;.the.merge-request.re
b660 66 20 61 72 65 20 6d 69 73 73 69 6e 67 2e 20 20 4c 75 63 6b 69 6c 79 20 47 69 74 6c 61 62 20 6e f.are.missing...Luckily.Gitlab.n
b680 6f 0a 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6c 6f 6e 67 65 72 20 64 6f 65 73 20 74 68 69 73 o............;;.longer.does.this
b6a0 2c 20 62 75 74 20 77 65 20 6e 65 76 65 72 74 68 65 6c 65 73 73 20 68 61 76 65 20 74 6f 20 64 65 ,.but.we.nevertheless.have.to.de
b6c0 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 69 74 68 20 6d 65 72 67 65 2d 72 65 71 75 al............;;.with.merge-requ
b6e0 65 73 74 73 20 74 68 61 74 20 68 61 76 65 20 62 65 65 6e 20 6c 6f 73 74 20 69 6e 20 74 69 6d 65 ests.that.have.been.lost.in.time
b700 2e 0a 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 63 68 65 63 .............(error."Cannot.chec
b720 6b 20 6f 75 74 20 74 68 69 73 20 6d 65 72 67 65 2d 72 65 71 75 65 73 74 20 62 65 63 61 75 73 65 k.out.this.merge-request.because
b740 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 61 6e 20 6f 6c 64 20 47 .%s"..................."an.old.G
b760 69 74 6c 61 62 20 76 65 72 73 69 6f 6e 20 64 69 73 63 61 72 64 65 64 20 74 68 65 20 73 6f 75 72 itlab.version.discarded.the.sour
b780 63 65 20 62 72 61 6e 63 68 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 65 71 ce.branch"))...........((not.(eq
b7a0 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 73 74 61 74 65 29 20 27 6f 70 65 6e 29 29 0a 20 20 .(oref.pullreq.state).'open))...
b7c0 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 20 22 62 72 61 6e 63 68 22 20 22 2d 2d .........(magit-git."branch"."--
b7e0 66 6f 72 63 65 22 20 62 72 61 6e 63 68 20 70 75 6c 6c 72 65 71 2d 72 65 66 29 29 0a 20 20 20 20 force".branch.pullreq-ref)).....
b800 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 75 70 73 74 72 ......(t............(let.((upstr
b820 65 61 6d 20 20 28 6f 72 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 eam..(oref.repo.remote))........
b840 20 20 20 20 20 20 20 20 20 20 28 70 72 2d 72 65 6d 6f 74 65 20 28 6f 72 65 66 20 70 75 6c 6c 72 ..........(pr-remote.(oref.pullr
b860 65 71 20 68 65 61 64 2d 75 73 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eq.head-user))..................
b880 28 70 72 2d 62 72 61 6e 63 68 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 68 65 61 64 2d 72 65 (pr-branch.(oref.pullreq.head-re
b8a0 66 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 6e 6f 74 20 28 6f f)))..............(cond.((not.(o
b8c0 72 65 66 20 70 75 6c 6c 72 65 71 20 63 72 6f 73 73 2d 72 65 70 6f 2d 70 29 29 0a 20 20 20 20 20 ref.pullreq.cross-repo-p))......
b8e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 74 72 61 63 6b 69 6e 67 20 28 ...............(let.((tracking.(
b900 63 6f 6e 63 61 74 20 75 70 73 74 72 65 61 6d 20 22 2f 22 20 70 72 2d 62 72 61 6e 63 68 29 29 29 concat.upstream."/".pr-branch)))
b920 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 .......................(unless.(
b940 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 70 20 74 72 61 63 6b 69 6e 67 29 0a 20 20 20 20 20 20 20 magit-branch-p.tracking)........
b960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 63 61 6c 6c 2d 67 69 74 .................(magit-call-git
b980 20 22 66 65 74 63 68 22 20 75 70 73 74 72 65 61 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ."fetch".upstream)).............
b9a0 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 70 2d 70 75 6c 6c 72 65 71 2d ..........(forge--setup-pullreq-
b9c0 62 72 61 6e 63 68 20 62 72 61 6e 63 68 20 74 72 61 63 6b 69 6e 67 29 0a 20 20 20 20 20 20 20 20 branch.branch.tracking).........
b9e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 6d 61 79 62 ..............(magit-branch-mayb
ba00 65 2d 61 64 6a 75 73 74 2d 75 70 73 74 72 65 61 6d 20 62 72 61 6e 63 68 20 74 72 61 63 6b 69 6e e-adjust-upstream.branch.trackin
ba20 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d g).......................(magit-
ba40 73 65 74 20 75 70 73 74 72 65 61 6d 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 20 22 70 75 set.upstream."branch".branch."pu
ba60 73 68 52 65 6d 6f 74 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 shRemote")......................
ba80 20 28 6d 61 67 69 74 2d 73 65 74 20 75 70 73 74 72 65 61 6d 20 22 62 72 61 6e 63 68 22 20 62 72 .(magit-set.upstream."branch".br
baa0 61 6e 63 68 20 22 70 75 6c 6c 52 65 71 75 65 73 74 52 65 6d 6f 74 65 22 29 29 29 0a 20 20 20 20 anch."pullRequestRemote"))).....
bac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 70 72 2d 62 72 61 6e 63 68 29 0a ...............((not.pr-branch).
bae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 70 75 6c 6c 72 ....................;;.The.pullr
bb00 65 71 20 62 72 61 6e 63 68 20 28 6f 6e 20 47 69 74 68 75 62 29 20 68 61 73 20 62 65 65 6e 20 64 eq.branch.(on.Github).has.been.d
bb20 65 6c 65 74 65 64 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 eleted......................(set
bb40 71 20 70 72 2d 72 65 6d 6f 74 65 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 q.pr-remote.nil)................
bb60 20 20 20 20 20 28 73 65 74 71 20 62 72 61 6e 63 68 20 62 72 61 6e 63 68 2d 6e 29 0a 20 20 20 20 .....(setq.branch.branch-n).....
bb80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 70 2d 70 75 ................(forge--setup-pu
bba0 6c 6c 72 65 71 2d 62 72 61 6e 63 68 20 62 72 61 6e 63 68 20 70 75 6c 6c 72 65 71 2d 72 65 66 29 llreq-branch.branch.pullreq-ref)
bbc0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 65 74 20 .....................(magit-set.
bbe0 75 70 73 74 72 65 61 6d 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 20 22 70 75 73 68 52 65 upstream."branch".branch."pushRe
bc00 6d 6f 74 65 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 0a 20 20 mote"))....................(t...
bc20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 6f 72 20 70 72 73 20 77 69 74 ..................;;.For.prs.wit
bc40 68 69 6e 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 77 65 20 61 72 65 20 6d 6f 72 65 20 70 65 72 hin.the.upstream.we.are.more.per
bc60 6d 69 73 73 69 76 65 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 missive,.....................;;.
bc80 62 75 74 20 61 6e 79 20 72 65 71 75 65 73 74 20 74 6f 20 6d 65 72 67 65 20 61 20 62 72 61 6e 63 but.any.request.to.merge.a.branc
bca0 68 20 77 69 74 68 20 61 20 77 65 6c 6c 20 6b 6e 6f 77 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 h.with.a.well.known.............
bcc0 20 20 20 20 20 20 20 20 3b 3b 20 6e 61 6d 65 20 66 72 6f 6d 20 66 6f 72 6b 2c 20 69 73 20 68 69 ........;;.name.from.fork,.is.hi
bce0 67 68 6c 79 20 73 75 73 70 69 63 69 6f 75 73 20 61 6e 64 20 6c 69 6b 65 6c 79 20 74 68 65 0a 20 ghly.suspicious.and.likely.the..
bd00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 72 65 73 75 6c 74 20 6f 66 20 ...................;;.result.of.
bd20 61 20 63 6f 6e 74 72 69 62 75 74 6f 72 20 6e 6f 74 20 62 6f 74 68 65 72 69 6e 67 20 74 6f 20 6e a.contributor.not.bothering.to.n
bd40 61 6d 65 20 74 68 65 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b ame.their.....................;;
bd60 20 66 65 61 74 75 72 65 20 62 72 61 6e 63 68 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .feature.branch.................
bd80 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6d 65 6d 62 65 72 20 62 72 61 6e 63 68 20 6d .....(when.(and.(member.branch.m
bda0 61 67 69 74 2d 6d 61 69 6e 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 73 29 0a 20 20 20 20 20 20 20 20 agit-main-branch-names).........
bdc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 62 72 .......................(magit-br
bde0 61 6e 63 68 2d 70 20 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 anch-p.branch)).................
be00 20 20 20 20 20 20 28 73 65 74 71 20 62 72 61 6e 63 68 20 62 72 61 6e 63 68 2d 6e 29 29 0a 20 20 ......(setq.branch.branch-n))...
be20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 70 2d ..................(forge--setup-
be40 70 75 6c 6c 72 65 71 2d 72 65 6d 6f 74 65 20 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 20 20 pullreq-remote.pullreq).........
be60 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 75 70 2d 70 75 6c 6c 72 65 ............(forge--setup-pullre
be80 71 2d 62 72 61 6e 63 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 72 q-branch......................br
bea0 61 6e 63 68 20 28 63 6f 6e 63 61 74 20 70 72 2d 72 65 6d 6f 74 65 20 22 2f 22 20 70 72 2d 62 72 anch.(concat.pr-remote."/".pr-br
bec0 61 6e 63 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 anch)).....................(if.(
bee0 61 6e 64 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 65 64 69 74 61 62 6c 65 2d 70 29 0a 20 20 and.(oref.pullreq.editable-p)...
bf00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 75 61 ...........................(equa
bf20 6c 20 62 72 61 6e 63 68 20 70 72 2d 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 l.branch.pr-branch))............
bf40 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 65 74 20 70 72 2d 72 65 6d 6f 74 .............(magit-set.pr-remot
bf60 65 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 20 22 70 75 73 68 52 65 6d 6f 74 65 22 29 0a e."branch".branch."pushRemote").
bf80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 65 74 ......................(magit-set
bfa0 20 75 70 73 74 72 65 61 6d 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 20 22 70 75 73 68 52 .upstream."branch".branch."pushR
bfc0 65 6d 6f 74 65 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 70 72 emote"))))..............(when.pr
bfe0 2d 72 65 6d 6f 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 65 -remote................(magit-se
c000 74 20 70 72 2d 72 65 6d 6f 74 65 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 20 22 70 75 6c t.pr-remote."branch".branch."pul
c020 6c 52 65 71 75 65 73 74 52 65 6d 6f 74 65 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 lRequestRemote"))..............(
c040 6d 61 67 69 74 2d 73 65 74 20 22 74 72 75 65 22 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 magit-set."true"."branch".branch
c060 20 22 72 65 62 61 73 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 ."rebase")..............(magit-g
c080 69 74 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 it."branch".branch..............
c0a0 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 61 73 65 2d 72 65 66 20 28 6f 72 65 66 ...........(let.((base-ref.(oref
c0c0 20 70 75 6c 6c 72 65 71 20 62 61 73 65 2d 72 65 66 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 .pullreq.base-ref)))............
c0e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 2d 2d 73 65 74 2d 75 70 ...............(concat."--set-up
c100 73 74 72 65 61 6d 2d 74 6f 3d 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 stream-to=".....................
c120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6f 72 20 6d 61 67 69 74 2d 62 72 61 6e ..............(if.(or.magit-bran
c140 63 68 2d 70 72 65 66 65 72 2d 72 65 6d 6f 74 65 2d 75 70 73 74 72 65 61 6d 0a 20 20 20 20 20 20 ch-prefer-remote-upstream.......
c160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
c180 20 20 20 20 28 6e 6f 74 20 28 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 70 20 62 61 73 65 2d 72 65 ....(not.(magit-branch-p.base-re
c1a0 66 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 f)))............................
c1c0 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 75 70 73 74 72 65 61 6d 20 22 2f 22 20 ...........(concat.upstream."/".
c1e0 62 61 73 65 2d 72 65 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 base-ref).......................
c200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 61 73 65 2d 72 65 66 29 29 29 29 29 29 29 0a 20 20 ..............base-ref)))))))...
c220 20 20 28 6d 61 67 69 74 2d 73 65 74 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 6e ..(magit-set.(number-to-string.n
c240 75 6d 62 65 72 29 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 20 22 70 75 6c 6c 52 65 71 75 umber)."branch".branch."pullRequ
c260 65 73 74 22 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 73 65 74 20 28 6f 72 65 66 20 70 75 6c 6c 72 est").....(magit-set.(oref.pullr
c280 65 71 20 74 69 74 6c 65 29 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 20 22 64 65 73 63 72 eq.title)."branch".branch."descr
c2a0 69 70 74 69 6f 6e 22 29 0a 20 20 20 20 62 72 61 6e 63 68 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f iption").....branch))..(defun.fo
c2c0 72 67 65 2d 2d 73 65 74 75 70 2d 70 75 6c 6c 72 65 71 2d 62 72 61 6e 63 68 20 28 62 72 61 6e 63 rge--setup-pullreq-branch.(branc
c2e0 68 20 74 72 61 63 6b 69 6e 67 29 0a 20 20 28 69 66 20 28 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d h.tracking)...(if.(magit-branch-
c300 70 20 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6d 61 67 69 74 2d 72 p.branch).......(unless.(magit-r
c320 65 76 2d 65 71 75 61 6c 20 62 72 61 6e 63 68 20 74 72 61 63 6b 69 6e 67 29 0a 20 20 20 20 20 20 ev-equal.branch.tracking).......
c340 20 20 28 6d 65 73 73 61 67 65 20 22 45 78 69 73 74 69 6e 67 20 62 72 61 6e 63 68 20 25 73 20 64 ..(message."Existing.branch.%s.d
c360 69 76 65 72 67 65 64 20 66 72 6f 6d 20 25 73 22 20 62 72 61 6e 63 68 20 74 72 61 63 6b 69 6e 67 iverged.from.%s".branch.tracking
c380 29 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e 63 )).....(magit-git."branch".branc
c3a0 68 20 74 72 61 63 6b 69 6e 67 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 73 65 74 h.tracking)))..(defun.forge--set
c3c0 75 70 2d 70 75 6c 6c 72 65 71 2d 72 65 6d 6f 74 65 20 28 70 75 6c 6c 72 65 71 29 0a 20 20 28 6c up-pullreq-remote.(pullreq)...(l
c3e0 65 74 2a 20 28 28 70 72 2d 72 65 6d 6f 74 65 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 68 65 et*.((pr-remote.(oref.pullreq.he
c400 61 64 2d 75 73 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 2d 62 72 61 6e 63 68 20 28 6f ad-user))..........(pr-branch.(o
c420 72 65 66 20 70 75 6c 6c 72 65 71 20 68 65 61 64 2d 72 65 66 29 29 0a 20 20 20 20 20 20 20 20 20 ref.pullreq.head-ref))..........
c440 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 70 75 6c 6c (repo.(forge-get-repository.pull
c460 72 65 71 29 29 0a 20 20 20 20 20 20 20 20 20 28 68 6f 73 74 20 28 6f 72 65 66 20 72 65 70 6f 20 req))..........(host.(oref.repo.
c480 67 69 74 68 6f 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 75 73 65 72 20 28 6f 72 65 66 20 70 githost))..........(user.(oref.p
c4a0 75 6c 6c 72 65 71 20 68 65 61 64 2d 75 73 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6f 72 ullreq.head-user))..........(for
c4c0 6b 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 68 65 61 64 2d 72 65 70 6f 29 29 29 0a 20 20 20 k.(oref.pullreq.head-repo)))....
c4e0 20 28 69 66 20 28 6d 61 67 69 74 2d 72 65 6d 6f 74 65 2d 70 20 70 72 2d 72 65 6d 6f 74 65 29 0a .(if.(magit-remote-p.pr-remote).
c500 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 75 72 6c 20 28 6d 61 67 69 74 2d 67 69 74 2d 73 74 ........(let.((url.(magit-git-st
c520 72 69 6e 67 20 22 72 65 6d 6f 74 65 22 20 22 67 65 74 2d 75 72 6c 22 20 70 72 2d 72 65 6d 6f 74 ring."remote"."get-url".pr-remot
c540 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 65 74 63 68 20 28 6d 61 67 69 74 2d e))...............(fetch.(magit-
c560 67 65 74 2d 61 6c 6c 20 22 72 65 6d 6f 74 65 22 20 70 72 2d 72 65 6d 6f 74 65 20 22 66 65 74 63 get-all."remote".pr-remote."fetc
c580 68 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 75 61 6c 20 28 h")))...........(unless.(equal.(
c5a0 66 6f 72 67 65 2d 2d 73 70 6c 69 74 2d 66 6f 72 67 65 2d 75 72 6c 20 75 72 6c 29 0a 20 20 20 20 forge--split-forge-url.url).....
c5c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 68 6f 73 74 20 .....................(list.host.
c5e0 75 73 65 72 20 28 73 75 62 73 74 72 69 6e 67 20 66 6f 72 6b 20 28 31 2b 20 28 6c 65 6e 67 74 68 user.(substring.fork.(1+.(length
c600 20 75 73 65 72 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 .user))))).............(user-err
c620 6f 72 20 22 52 65 6d 6f 74 65 20 60 25 73 27 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 20 62 or."Remote.`%s'.already.exists.b
c640 75 74 20 64 6f 65 73 20 6e 6f 74 20 70 6f 69 6e 74 20 74 6f 20 25 73 22 0a 20 20 20 20 20 20 20 ut.does.not.point.to.%s"........
c660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 2d 72 65 6d 6f 74 65 20 75 72 6c 29 29 .................pr-remote.url))
c680 0a 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 28 6d 65 6d 62 65 72 20 28 ...........(unless.(or.(member.(
c6a0 66 6f 72 6d 61 74 20 22 2b 72 65 66 73 2f 68 65 61 64 73 2f 2a 3a 72 65 66 73 2f 72 65 6d 6f 74 format."+refs/heads/*:refs/remot
c6c0 65 73 2f 25 73 2f 2a 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 es/%s/*"........................
c6e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 2d 72 65 6d 6f 74 65 29 0a 20 20 20 20 20 20 ...............pr-remote).......
c700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 65 74 63 68 29 0a 20 ........................fetch)..
c720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 62 65 72 20 28 66 6f .....................(member.(fo
c740 72 6d 61 74 20 22 2b 72 65 66 73 2f 68 65 61 64 73 2f 25 73 3a 72 65 66 73 2f 72 65 6d 6f 74 65 rmat."+refs/heads/%s:refs/remote
c760 73 2f 25 73 2f 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s/%s/%s"........................
c780 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 2d 62 72 61 6e 63 68 20 70 72 2d 72 65 6d 6f ...............pr-branch.pr-remo
c7a0 74 65 20 70 72 2d 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 te.pr-branch)...................
c7c0 20 20 20 20 20 20 20 20 20 20 20 20 66 65 74 63 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ............fetch)).............
c7e0 28 6d 61 67 69 74 2d 67 69 74 20 22 72 65 6d 6f 74 65 22 20 22 73 65 74 2d 62 72 61 6e 63 68 65 (magit-git."remote"."set-branche
c800 73 22 20 22 2d 2d 61 64 64 22 20 70 72 2d 72 65 6d 6f 74 65 20 70 72 2d 62 72 61 6e 63 68 29 0a s"."--add".pr-remote.pr-branch).
c820 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 20 22 66 65 74 63 68 22 20 70 ............(magit-git."fetch".p
c840 72 2d 72 65 6d 6f 74 65 29 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 75 72 6c 20 28 6d 61 r-remote))).......(let.((url.(ma
c860 67 69 74 2d 67 69 74 2d 73 74 72 69 6e 67 20 22 72 65 6d 6f 74 65 22 20 22 67 65 74 2d 75 72 6c git-git-string."remote"."get-url
c880 22 20 28 6f 72 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 ".(oref.repo.remote)))).........
c8a0 28 6d 61 67 69 74 2d 67 69 74 0a 20 20 20 20 20 20 20 20 20 22 72 65 6d 6f 74 65 22 20 22 61 64 (magit-git.........."remote"."ad
c8c0 64 22 20 22 2d 66 22 20 22 2d 2d 6e 6f 2d 74 61 67 73 22 0a 20 20 20 20 20 20 20 20 20 22 2d 74 d"."-f"."--no-tags".........."-t
c8e0 22 20 70 72 2d 62 72 61 6e 63 68 20 70 72 2d 72 65 6d 6f 74 65 0a 20 20 20 20 20 20 20 20 20 28 ".pr-branch.pr-remote..........(
c900 63 6f 6e 64 20 28 28 6f 72 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 67 69 74 40 cond.((or.(string-prefix-p."git@
c920 22 20 75 72 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 ".url).....................(stri
c940 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 73 73 68 3a 2f 2f 67 69 74 40 22 20 75 72 6c 29 29 0a 20 ng-prefix-p."ssh://git@".url))..
c960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 67 69 74 40 25 73 3a 25 ...............(format."git@%s:%
c980 73 2e 67 69 74 22 20 68 6f 73 74 20 66 6f 72 6b 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 s.git".host.fork))..............
c9a0 20 20 28 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 68 74 74 70 73 3a 2f 2f 22 20 75 ..((string-prefix-p."https://".u
c9c0 72 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 68 74 74 rl).................(format."htt
c9e0 70 73 3a 2f 2f 25 73 2f 25 73 2e 67 69 74 22 20 68 6f 73 74 20 66 6f 72 6b 29 29 0a 20 20 20 20 ps://%s/%s.git".host.fork)).....
ca00 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 67 69 ...........((string-prefix-p."gi
ca20 74 3a 2f 2f 22 20 75 72 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d t://".url).................(form
ca40 61 74 20 22 67 69 74 3a 2f 2f 25 73 2f 25 73 2e 67 69 74 22 20 68 6f 73 74 20 66 6f 72 6b 29 29 at."git://%s/%s.git".host.fork))
ca60 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d ................((string-prefix-
ca80 70 20 22 68 74 74 70 3a 2f 2f 22 20 75 72 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 p."http://".url)................
caa0 20 28 66 6f 72 6d 61 74 20 22 68 74 74 70 3a 2f 2f 25 73 2f 25 73 2e 67 69 74 22 20 68 6f 73 74 .(format."http://%s/%s.git".host
cac0 20 66 6f 72 6b 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 72 72 6f 72 20 22 .fork))................((error."
cae0 25 73 20 68 61 73 20 61 6e 20 75 6e 65 78 70 65 63 74 65 64 20 66 6f 72 6d 61 74 22 20 75 72 6c %s.has.an.unexpected.format".url
cb00 29 29 29 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 ))))))))..;;;###autoload.(defun.
cb20 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 70 75 6c 6c 72 65 71 20 28 70 75 6c 6c 72 65 71 29 forge-checkout-pullreq.(pullreq)
cb40 0a 20 20 22 43 72 65 61 74 65 2c 20 63 6f 6e 66 69 67 75 72 65 20 61 6e 64 20 63 68 65 63 6b 6f ..."Create,.configure.and.checko
cb60 75 74 20 61 20 6e 65 77 20 62 72 61 6e 63 68 20 66 72 6f 6d 20 61 20 70 75 6c 6c 2d 72 65 71 75 ut.a.new.branch.from.a.pull-requ
cb80 65 73 74 2e 0a 50 6c 65 61 73 65 20 73 65 65 20 74 68 65 20 6d 61 6e 75 61 6c 20 66 6f 72 20 6d est..Please.see.the.manual.for.m
cba0 6f 72 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 ore.information."...(interactive
cbc0 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 70 75 6c 6c 72 65 71 20 22 43 68 65 63 .(list.(forge-read-pullreq."Chec
cbe0 6b 6f 75 74 20 70 75 6c 6c 20 72 65 71 75 65 73 74 22 29 29 29 0a 20 20 28 6d 61 67 69 74 2d 2d kout.pull.request")))...(magit--
cc00 63 68 65 63 6b 6f 75 74 20 28 66 6f 72 67 65 2d 2d 62 72 61 6e 63 68 2d 70 75 6c 6c 72 65 71 20 checkout.(forge--branch-pullreq.
cc20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 29 29 29 0a 20 20 (forge-get-pullreq.pullreq)))...
cc40 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a 0a 3b 3b 3b 23 23 23 61 (forge-refresh-buffer))..;;;###a
cc60 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 utoload(autoload.'forge-checkout
cc80 2d 74 68 69 73 2d 70 75 6c 6c 72 65 71 20 22 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 22 20 6e -this-pullreq."forge-commands".n
cca0 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 il.t).(transient-define-suffix.f
ccc0 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 74 68 69 73 2d 70 75 6c 6c 72 65 71 20 28 29 0a 20 20 orge-checkout-this-pullreq.()...
cce0 22 43 68 65 63 6b 6f 75 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 75 6c 6c 2d 72 65 71 75 65 "Checkout.the.current.pull-reque
cd00 73 74 2e 0a 49 66 20 74 68 65 20 62 72 61 6e 63 68 20 66 6f 72 20 74 68 61 74 20 70 75 6c 6c 2d st..If.the.branch.for.that.pull-
cd20 72 65 71 75 65 73 74 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 20 79 65 74 2c 20 74 68 65 6e request.does.not.exist.yet,.then
cd40 20 63 72 65 61 74 65 20 61 6e 64 0a 63 6f 6e 66 69 67 75 72 65 20 69 74 20 66 69 72 73 74 2e 22 .create.and.configure.it.first."
cd60 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 63 68 65 63 6b 6f 75 74 22 0a 20 20 3a 69 6e ...:description."checkout"...:in
cd80 61 70 74 2d 69 66 2d 6e 6f 74 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 apt-if-not.#'forge-current-pullr
cda0 65 71 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 63 68 65 63 eq...(interactive)...(forge-chec
cdc0 6b 6f 75 74 2d 70 75 6c 6c 72 65 71 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 kout-pullreq.(forge-current-topi
cde0 63 20 74 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f c.t)))..;;;###autoload.(defun.fo
ce00 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 77 6f 72 6b 74 72 65 65 20 28 70 61 74 68 20 70 75 6c 6c rge-checkout-worktree.(path.pull
ce20 72 65 71 29 0a 20 20 22 43 72 65 61 74 65 2c 20 63 6f 6e 66 69 67 75 72 65 20 61 6e 64 20 63 68 req)..."Create,.configure.and.ch
ce40 65 63 6b 6f 75 74 20 61 20 6e 65 77 20 77 6f 72 6b 74 72 65 65 20 66 72 6f 6d 20 61 20 70 75 6c eckout.a.new.worktree.from.a.pul
ce60 6c 2d 72 65 71 75 65 73 74 2e 0a 54 68 69 73 20 69 73 20 6c 69 6b 65 20 60 66 6f 72 67 65 2d 63 l-request..This.is.like.`forge-c
ce80 68 65 63 6b 6f 75 74 2d 70 75 6c 6c 72 65 71 27 2c 20 65 78 63 65 70 74 20 74 68 61 74 20 69 74 heckout-pullreq',.except.that.it
cea0 20 61 6c 73 6f 0a 63 72 65 61 74 65 73 20 61 20 6e 65 77 20 77 6f 72 6b 74 72 65 65 2e 20 20 50 .also.creates.a.new.worktree...P
cec0 6c 65 61 73 65 20 73 65 65 20 74 68 65 20 6d 61 6e 75 61 6c 20 66 6f 72 20 6d 6f 72 65 0a 69 6e lease.see.the.manual.for.more.in
cee0 66 6f 72 6d 61 74 69 6f 6e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c formation."...(interactive....(l
cf00 65 74 20 28 28 69 64 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 70 75 6c 6c 72 65 71 20 22 43 68 65 et.((id.(forge-read-pullreq."Che
cf20 63 6b 6f 75 74 20 70 75 6c 6c 20 72 65 71 75 65 73 74 22 29 29 29 0a 20 20 20 20 20 28 6c 69 73 ckout.pull.request")))......(lis
cf40 74 20 28 66 75 6e 63 61 6c 6c 20 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 77 6f 72 6b 74 72 t.(funcall.forge-checkout-worktr
cf60 65 65 2d 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 ee-read-directory-function......
cf80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 ...............(forge-get-pullre
cfa0 71 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 29 0a 20 20 28 77 68 65 6e 20 q.id))............id)))...(when.
cfc0 28 61 6e 64 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 70 61 74 68 29 0a 20 20 20 20 20 20 (and.(file-exists-p.path).......
cfe0 20 20 20 20 20 20 20 28 6e 6f 74 20 28 61 6e 64 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 .......(not.(and.(file-directory
d000 2d 70 20 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -p.path)........................
d020 28 6c 65 6e 67 74 68 3d 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 20 70 61 74 68 29 20 (length=.(directory-files.path).
d040 32 29 29 29 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 25 73 20 61 6c 72 65 61 64 2)))).....(user-error."%s.alread
d060 79 20 65 78 69 73 74 73 20 61 6e 64 20 69 73 6e 27 74 20 65 6d 70 74 79 22 20 70 61 74 68 29 29 y.exists.and.isn't.empty".path))
d080 0a 20 20 28 6d 61 67 69 74 2d 77 6f 72 6b 74 72 65 65 2d 63 68 65 63 6b 6f 75 74 20 70 61 74 68 ...(magit-worktree-checkout.path
d0a0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 ............................(for
d0c0 67 65 2d 2d 62 72 61 6e 63 68 2d 70 75 6c 6c 72 65 71 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 ge--branch-pullreq.(forge-get-pu
d0e0 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d llreq.pullreq))))..(defun.forge-
d100 63 68 65 63 6b 6f 75 74 2d 77 6f 72 6b 74 72 65 65 2d 64 65 66 61 75 6c 74 2d 72 65 61 64 2d 64 checkout-worktree-default-read-d
d120 69 72 65 63 74 6f 72 79 2d 66 75 6e 63 74 69 6f 6e 20 28 70 75 6c 6c 72 65 71 29 0a 20 20 28 70 irectory-function.(pullreq)...(p
d140 63 61 73 65 2d 6c 65 74 2a 20 28 28 28 65 69 65 69 6f 20 6e 75 6d 62 65 72 20 68 65 61 64 2d 72 case-let*.(((eieio.number.head-r
d160 65 66 29 20 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 74 ef).pullreq)................(pat
d180 68 20 28 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 h.(read-directory-name..........
d1a0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 43 68 65 63 6b 6f 75 74 20 23 .............(format."Checkout.#
d1c0 25 73 20 69 6e 20 6e 65 77 20 77 6f 72 6b 74 72 65 65 3a 20 22 20 6e 75 6d 62 65 72 29 0a 20 20 %s.in.new.worktree:.".number)...
d1e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 ....................(file-name-d
d200 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 irectory........................
d220 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 2d 6e 61 6d 65 20 64 65 66 61 75 6c 74 2d 64 69 72 (directory-file-name.default-dir
d240 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e ectory)).......................n
d260 69 6c 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 il.nil.......................(le
d280 74 20 28 28 62 72 61 6e 63 68 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 62 72 61 6e 63 t.((branch.(forge--pullreq-branc
d2a0 68 2d 69 6e 74 65 72 6e 61 6c 20 70 75 6c 6c 72 65 71 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 h-internal.pullreq)))...........
d2c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d ..............(if.(string-match-
d2e0 70 20 22 5c 5c 60 70 72 2d 5b 30 2d 39 5d 2b 5c 5c 27 22 20 62 72 61 6e 63 68 29 0a 20 20 20 20 p."\\`pr-[0-9]+\\'".branch).....
d300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 2d ........................(number-
d320 74 6f 2d 73 74 72 69 6e 67 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 to-string.number)...............
d340 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 2d 25 73 22 20 6e 75 6d 62 ............(format."%s-%s".numb
d360 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 er..............................
d380 20 20 20 20 20 28 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 20 22 2f 22 20 22 2d 22 20 68 65 61 .....(string-replace."/"."-".hea
d3a0 64 2d 72 65 66 29 29 29 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 65 71 75 61 6c 20 70 61 d-ref))))))).....(when.(equal.pa
d3c0 74 68 20 22 22 29 0a 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 54 68 65 20 65 6d th."").......(user-error."The.em
d3e0 70 74 79 20 73 74 72 69 6e 67 20 69 73 6e 27 74 20 61 20 76 61 6c 69 64 20 70 61 74 68 22 29 29 pty.string.isn't.a.valid.path"))
d400 0a 20 20 20 20 70 61 74 68 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 .....path))..;;;###autoload.(aut
d420 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 70 75 73 68 2d 74 6f 2d 75 6e 6e 61 6d 65 64 2d 70 75 6c oload.'forge-push-to-unnamed-pul
d440 6c 72 65 71 20 22 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 lreq."forge-commands".nil.t).(tr
d460 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 70 75 73 68 ansient-define-suffix.forge-push
d480 2d 74 6f 2d 75 6e 6e 61 6d 65 64 2d 70 75 6c 6c 72 65 71 20 28 61 72 67 73 29 0a 20 20 22 50 75 -to-unnamed-pullreq.(args)..."Pu
d4a0 73 68 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 72 61 6e 63 68 20 74 6f 20 74 68 65 20 62 72 61 sh.the.current.branch.to.the.bra
d4c0 6e 63 68 20 6f 6e 20 74 68 65 20 63 6f 6e 74 72 69 62 75 74 6f 72 27 73 20 66 6f 72 6b 2e 0a 0a nch.on.the.contributor's.fork...
d4e0 55 73 75 61 6c 6c 79 20 61 20 6d 61 69 6e 74 61 69 6e 65 72 20 77 6f 75 6c 64 20 75 73 65 20 60 Usually.a.maintainer.would.use.`
d500 6d 61 67 69 74 2d 70 75 73 68 2d 63 75 72 72 65 6e 74 2d 74 6f 2d 70 75 73 68 72 65 6d 6f 74 65 magit-push-current-to-pushremote
d520 27 20 74 6f 0a 70 75 73 68 20 74 6f 20 74 68 65 20 62 72 61 6e 63 68 2c 20 74 68 65 20 63 6f 6e '.to.push.to.the.branch,.the.con
d540 74 72 69 62 75 74 6f 72 20 61 73 6b 73 20 74 6f 20 62 65 20 6d 65 72 67 65 64 2e 20 20 54 68 61 tributor.asks.to.be.merged...Tha
d560 74 20 64 6f 65 73 20 6e 6f 74 0a 77 6f 72 6b 20 69 66 20 74 68 65 79 20 64 69 64 20 6e 6f 74 20 t.does.not.work.if.they.did.not.
d580 63 72 65 61 74 65 20 61 20 64 65 64 69 63 61 74 65 64 20 62 72 61 6e 63 68 20 61 6e 64 20 69 6e create.a.dedicated.branch.and.in
d5a0 73 74 65 61 64 20 63 6f 6d 6d 69 74 74 65 64 0a 64 69 72 65 63 74 6c 79 20 74 6f 20 5c 22 6d 61 stead.committed.directly.to.\"ma
d5c0 69 6e 5c 22 2c 20 6f 72 20 73 6f 6d 65 20 6f 74 68 65 72 20 62 72 61 6e 63 68 2c 20 74 68 61 74 in\",.or.some.other.branch,.that
d5e0 20 61 6c 73 6f 20 65 78 69 73 74 73 20 69 6e 20 74 68 65 0a 75 70 73 74 72 65 61 6d 20 72 65 70 .also.exists.in.the.upstream.rep
d600 6f 73 69 74 6f 72 79 2e 0a 0a 49 66 20 74 68 69 73 20 69 73 20 74 68 65 20 63 61 73 65 20 74 68 ository...If.this.is.the.case.th
d620 65 6e 20 74 68 65 20 62 72 61 6e 63 68 2c 20 77 68 69 63 68 20 69 73 20 75 73 65 64 20 74 6f 20 en.the.branch,.which.is.used.to.
d640 63 68 65 63 6b 20 6f 75 74 20 74 68 65 0a 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 6c 6f 63 61 6c check.out.the.pull-request.local
d660 6c 79 2c 20 69 73 20 6e 61 6d 65 64 20 5c 22 70 72 2d 4e 5c 22 20 28 77 68 65 72 65 20 4e 20 69 ly,.is.named.\"pr-N\".(where.N.i
d680 73 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 0a 6e 75 6d 62 65 72 29 20 61 6e 64 20 74 s.the.pull-request.number).and.t
d6a0 68 69 73 20 63 6f 6d 6d 61 6e 64 20 69 73 20 6d 61 64 65 20 61 76 61 69 6c 61 62 6c 65 20 61 73 his.command.is.made.available.as
d6c0 20 61 20 73 75 62 73 74 69 74 75 74 65 20 69 6e 20 74 68 65 0a 60 6d 61 67 69 74 2d 70 75 73 68 .a.substitute.in.the.`magit-push
d6e0 27 20 6d 65 6e 75 2e 22 0a 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 '.menu."...:if.(lambda.().......
d700 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 62 72 61 6e 63 68 20 28 6d 61 67 69 74 2d 67 65 74 2d 63 ..(and-let.((branch.(magit-get-c
d720 75 72 72 65 6e 74 2d 62 72 61 6e 63 68 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 urrent-branch)))...........(and.
d740 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 3a 62 72 61 6e 63 68 20 62 72 61 6e 63 (forge-get-pullreq.:branch.branc
d760 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d h)................(string-match-
d780 70 20 22 5c 5c 60 70 72 2d 5b 30 2d 39 5d 2b 5c 5c 27 22 20 62 72 61 6e 63 68 29 29 29 29 0a 20 p."\\`pr-[0-9]+\\'".branch))))..
d7a0 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 .:description.(lambda.()........
d7c0 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 62 72 61 6e 63 68 20 28 6d 61 ..........(and-let*.((branch.(ma
d7e0 67 69 74 2d 67 65 74 2d 63 75 72 72 65 6e 74 2d 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 20 git-get-current-branch))........
d800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 6c 6c 72 65 71 20 28 66 .....................(pullreq.(f
d820 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 3a 62 72 61 6e 63 68 20 62 72 61 6e 63 68 29 orge-get-pullreq.:branch.branch)
d840 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 63 ))....................(format."c
d860 6f 6e 74 72 69 62 75 74 6f 72 27 73 20 25 73 20 62 72 61 6e 63 68 22 0a 20 20 20 20 20 20 20 20 ontributor's.%s.branch".........
d880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 ...................(magit--prope
d8a0 72 74 69 7a 65 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rtize-face......................
d8c0 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 2f 25 73 22 0a 20 20 20 20 20 20 20 20 20 .......(format."%s/%s"..........
d8e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 ...........................(oref
d900 20 70 75 6c 6c 72 65 71 20 68 65 61 64 2d 75 73 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .pullreq.head-user).............
d920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 70 75 ........................(oref.pu
d940 6c 6c 72 65 71 20 68 65 61 64 2d 72 65 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 llreq.head-ref))................
d960 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 72 65 6d 6f 74 .............'magit-branch-remot
d980 65 29 29 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 6d 61 67 69 e))))...(interactive.(list.(magi
d9a0 74 2d 70 75 73 68 2d 61 72 67 75 6d 65 6e 74 73 29 29 29 0a 20 20 28 63 6f 6e 64 2d 6c 65 74 2a t-push-arguments)))...(cond-let*
d9c0 0a 20 20 20 20 28 5b 62 72 61 6e 63 68 20 28 6d 61 67 69 74 2d 67 65 74 2d 63 75 72 72 65 6e 74 .....([branch.(magit-get-current
d9e0 2d 62 72 61 6e 63 68 29 5d 0a 20 20 20 20 20 5b 70 75 6c 6c 72 65 71 20 28 66 6f 72 67 65 2d 67 -branch)]......[pullreq.(forge-g
da00 65 74 2d 70 75 6c 6c 72 65 71 20 3a 62 72 61 6e 63 68 20 62 72 61 6e 63 68 29 5d 0a 20 20 20 20 et-pullreq.:branch.branch)].....
da20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 27 6d 61 67 69 74 2d 63 72 65 64 65 6e 74 69 61 6c 2d 68 6f .(run-hooks.'magit-credential-ho
da40 6f 6b 29 0a 20 20 20 20 20 28 6d 61 67 69 74 2d 72 75 6e 2d 67 69 74 2d 61 73 79 6e 63 20 22 70 ok)......(magit-run-git-async."p
da60 75 73 68 22 20 22 2d 76 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ush"."-v".......................
da80 20 20 20 20 28 64 65 6c 65 74 65 20 22 2d 2d 74 61 67 73 22 20 28 64 65 6c 65 74 65 20 22 2d 2d ....(delete."--tags".(delete."--
daa0 66 6f 6c 6c 6f 77 2d 74 61 67 73 22 20 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 follow-tags".args)).............
dac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 68 65 61 64 ..............(oref.pullreq.head
dae0 2d 75 73 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -user)..........................
db00 20 28 66 6f 72 6d 61 74 20 22 25 73 3a 25 73 22 20 62 72 61 6e 63 68 20 28 6f 72 65 66 20 70 75 .(format."%s:%s".branch.(oref.pu
db20 6c 6c 72 65 71 20 68 65 61 64 2d 72 65 66 29 29 29 29 0a 20 20 20 20 28 28 65 72 72 6f 72 20 22 llreq.head-ref)))).....((error."
db40 43 68 65 63 6b 65 64 20 6f 75 74 20 62 72 61 6e 63 68 20 69 73 20 6e 6f 74 20 61 6e 20 75 6e 6e Checked.out.branch.is.not.an.unn
db60 61 6d 65 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 72 61 6e 63 68 22 29 29 29 29 0a 0a 3b amed.pull-request.branch"))))..;
db80 3b 3b 20 4d 61 72 6b 73 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 6d 61 ;;.Marks..(defun.forge-create-ma
dba0 72 6b 20 28 6e 61 6d 65 20 66 61 63 65 20 64 65 73 63 72 69 70 74 69 6f 6e 29 0a 20 20 22 44 65 rk.(name.face.description)..."De
dbc0 66 69 6e 65 20 61 20 6e 65 77 20 6d 61 72 6b 20 74 68 61 74 20 74 6f 70 69 63 73 20 63 61 6e 20 fine.a.new.mark.that.topics.can.
dbe0 62 65 20 6d 61 72 6b 65 64 20 77 69 74 68 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a be.marked.with."...(interactive.
dc00 20 20 20 28 6c 69 73 74 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 4e 61 6d 65 3a 20 22 29 0a ...(list.(read-string."Name:.").
dc20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 72 65 61 64 2d 63 68 61 72 2d 63 61 73 65 20 22 .........(magit-read-char-case."
dc40 53 65 74 20 61 70 70 65 61 72 61 6e 63 65 20 75 73 69 6e 67 20 22 20 6e 69 6c 0a 20 20 20 20 20 Set.appearance.using.".nil......
dc60 20 20 20 20 20 20 28 3f 6e 20 22 61 20 66 61 63 65 20 5b 6e 5d 61 6d 65 22 0a 20 20 20 20 20 20 ......(?n."a.face.[n]ame".......
dc80 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 66 61 63 65 2d 6e 61 6d 65 20 22 46 61 63 65 20 6e .........(read-face-name."Face.n
dca0 61 6d 65 3a 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 3f 73 20 22 66 61 63 65 20 5b 73 ame:."))............(?s."face.[s
dcc0 5d 65 78 70 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 66 72 6f 6d 2d ]exp"................(read-from-
dce0 6d 69 6e 69 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 46 61 63 65 minibuffer................."Face
dd00 20 73 65 78 70 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 28 3a 62 61 63 6b .sexp:."................."(:back
dd20 67 72 6f 75 6e 64 20 5c 22 5c 22 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 5c 22 5c 22 20 3a 62 6f ground.\"\".:foreground.\"\".:bo
dd40 78 20 74 29 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 61 64 2d 65 78 70 72 65 x.t)".................read-expre
dd60 73 73 69 6f 6e 2d 6d 61 70 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 ssion-map.t)))..........(let.((s
dd80 74 72 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 44 65 73 63 72 69 70 74 69 6f 6e 3a 20 22 29 tr.(read-string."Description:.")
dda0 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 73 ))............(and.(not.(equal.s
ddc0 74 72 20 22 22 29 29 20 73 74 72 29 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 69 tr."")).str))))...(forge-sql.[:i
dde0 6e 73 65 72 74 2d 69 6e 74 6f 20 6d 61 72 6b 20 3a 76 61 6c 75 65 73 20 24 76 31 5d 0a 20 20 20 nsert-into.mark.:values.$v1]....
de00 20 20 20 20 20 20 20 20 20 20 28 76 65 63 74 6f 72 20 6e 69 6c 20 28 66 6f 72 67 65 2d 2d 75 75 ..........(vector.nil.(forge--uu
de20 69 64 29 20 6e 61 6d 65 20 66 61 63 65 20 64 65 73 63 72 69 70 74 69 6f 6e 29 29 29 0a 0a 28 64 id).name.face.description)))..(d
de40 65 66 75 6e 20 66 6f 72 67 65 2d 65 64 69 74 2d 6d 61 72 6b 20 28 69 64 20 6e 61 6d 65 20 66 61 efun.forge-edit-mark.(id.name.fa
de60 63 65 20 64 65 73 63 72 69 70 74 69 6f 6e 29 0a 20 20 22 44 65 66 69 6e 65 20 61 20 6e 65 77 20 ce.description)..."Define.a.new.
de80 6d 61 72 6b 20 74 68 61 74 20 74 6f 70 69 63 73 20 63 61 6e 20 62 65 20 6d 61 72 6b 65 64 20 77 mark.that.topics.can.be.marked.w
dea0 69 74 68 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 70 63 61 73 65 2d 6c ith."...(interactive....(pcase-l
dec0 65 74 2a 0a 20 20 20 20 20 20 20 28 28 6d 61 72 6b 73 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a et*........((marks.(forge-sql.[:
dee0 73 65 6c 65 63 74 20 5b 6e 61 6d 65 20 69 64 20 66 61 63 65 20 64 65 73 63 72 69 70 74 69 6f 6e select.[name.id.face.description
df00 5d 20 3a 66 72 6f 6d 20 6d 61 72 6b 5d 29 29 0a 20 20 20 20 20 20 20 20 28 60 28 2c 6e 61 6d 65 ].:from.mark])).........(`(,name
df20 20 2c 69 64 20 2c 66 61 63 65 20 2c 64 65 73 63 72 69 70 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 .,id.,face.,description)........
df40 20 20 28 61 73 73 6f 63 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 45 64 69 74 20 ..(assoc.(completing-read."Edit.
df60 6d 61 72 6b 22 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 6d 61 72 6b 73 29 20 6e 69 6c 20 74 mark".(mapcar.#'car.marks).nil.t
df80 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 61 72 6b 73 29 29 29 0a 20 20 20 20 20 ).................marks)))......
dfa0 28 6c 69 73 74 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 (list.id............(read-string
dfc0 20 22 4e 61 6d 65 3a 20 22 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 ."Name:.".name)............(magi
dfe0 74 2d 72 65 61 64 2d 63 68 61 72 2d 63 61 73 65 20 22 53 65 74 20 61 70 70 65 61 72 61 6e 63 65 t-read-char-case."Set.appearance
e000 20 75 73 69 6e 67 20 22 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 6e 20 22 61 .using.".nil..............(?n."a
e020 20 66 61 63 65 20 5b 6e 5d 61 6d 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 .face.[n]ame"..................(
e040 72 65 61 64 2d 66 61 63 65 2d 6e 61 6d 65 20 22 46 61 63 65 20 6e 61 6d 65 3a 20 22 20 28 61 6e read-face-name."Face.name:.".(an
e060 64 20 28 73 79 6d 62 6f 6c 70 20 66 61 63 65 29 20 66 61 63 65 29 29 29 0a 20 20 20 20 20 20 20 d.(symbolp.face).face)))........
e080 20 20 20 20 20 20 28 3f 73 20 22 66 61 63 65 20 5b 73 5d 65 78 70 22 0a 20 20 20 20 20 20 20 20 ......(?s."face.[s]exp".........
e0a0 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 66 72 6f 6d 2d 6d 69 6e 69 62 75 66 66 65 72 0a 20 .........(read-from-minibuffer..
e0c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 46 61 63 65 20 73 65 78 70 3a 20 22 0a 20 ................."Face.sexp:."..
e0e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6c 69 73 74 70 20 66 61 63 65 .................(if.(listp.face
e100 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 ).......................(format.
e120 22 25 53 22 20 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 "%S".face)....................."
e140 28 3a 62 61 63 6b 67 72 6f 75 6e 64 20 5c 22 5c 22 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 5c 22 (:background.\"\".:foreground.\"
e160 5c 22 20 3a 62 6f 78 20 74 29 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 \".:box.t)")...................r
e180 65 61 64 2d 65 78 70 72 65 73 73 69 6f 6e 2d 6d 61 70 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 ead-expression-map.t))).........
e1a0 20 20 20 28 6c 65 74 20 28 28 73 74 72 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 44 65 73 63 ...(let.((str.(read-string."Desc
e1c0 72 69 70 74 69 6f 6e 3a 20 22 20 6e 69 6c 20 6e 69 6c 20 64 65 73 63 72 69 70 74 69 6f 6e 29 29 ription:.".nil.nil.description))
e1e0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 )..............(and.(not.(equal.
e200 73 74 72 20 22 22 29 29 20 73 74 72 29 29 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b str."")).str)))))...(forge-sql.[
e220 3a 75 70 64 61 74 65 20 6d 61 72 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 74 20 :update.mark...............:set.
e240 28 3d 20 5b 6e 61 6d 65 20 66 61 63 65 20 64 65 73 63 72 69 70 74 69 6f 6e 5d 20 24 76 31 29 0a (=.[name.face.description].$v1).
e260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 69 64 20 24 73 32 29 5d ..............:where.(=.id.$s2)]
e280 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 65 63 74 6f 72 20 6e 61 6d 65 20 66 61 63 65 20 ..............(vector.name.face.
e2a0 64 65 73 63 72 69 70 74 69 6f 6e 29 20 69 64 29 29 0a 0a 3b 3b 3b 20 52 65 6d 6f 74 65 6c 79 0a description).id))..;;;.Remotely.
e2c0 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 66 6f 72 .;;;###autoload.(defun.forge-for
e2e0 6b 20 28 66 6f 72 6b 20 72 65 6d 6f 74 65 29 0a 20 20 22 46 6f 72 6b 20 74 68 65 20 63 75 72 72 k.(fork.remote)..."Fork.the.curr
e300 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 20 46 4f 52 4b 20 61 6e 64 20 61 64 64 20 69 ent.repository.to.FORK.and.add.i
e320 74 20 61 73 20 61 20 52 45 4d 4f 54 45 2e 0a 49 66 20 74 68 65 20 66 6f 72 6b 20 61 6c 72 65 61 t.as.a.REMOTE..If.the.fork.alrea
e340 64 79 20 65 78 69 73 74 73 2c 20 74 68 65 6e 20 74 68 61 74 20 69 73 6e 27 74 20 61 6e 20 65 72 dy.exists,.then.that.isn't.an.er
e360 72 6f 72 3b 20 74 68 65 20 72 65 6d 6f 74 65 0a 69 73 20 61 64 64 65 64 20 61 6e 79 77 61 79 2e ror;.the.remote.is.added.anyway.
e380 20 20 43 75 72 72 65 6e 74 6c 79 20 74 68 69 73 20 6f 6e 6c 79 20 73 75 70 70 6f 72 74 73 20 47 ..Currently.this.only.supports.G
e3a0 69 74 68 75 62 20 61 6e 64 20 47 69 74 6c 61 62 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 ithub.and.Gitlab."...(interactiv
e3c0 65 0a 20 20 20 28 6c 65 74 20 28 28 66 6f 72 6b 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 e....(let.((fork.(magit-completi
e3e0 6e 67 2d 72 65 61 64 20 22 46 6f 72 6b 20 74 6f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ng-read."Fork.to"...............
e400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 ........................(mapcar.
e420 23 27 63 61 72 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e 74 73 29 29 29 29 0a 20 #'car.forge-owned-accounts))))..
e440 20 20 20 20 28 6c 69 73 74 20 66 6f 72 6b 0a 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d ....(list.fork............(read-
e460 73 74 72 69 6e 67 20 22 52 65 6d 6f 74 65 20 6e 61 6d 65 3a 20 22 0a 20 20 20 20 20 20 20 20 20 string."Remote.name:."..........
e480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 28 63 ...............(or.(plist-get.(c
e4a0 64 72 20 28 61 73 73 6f 63 20 66 6f 72 6b 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 dr.(assoc.fork.forge-owned-accou
e4c0 6e 74 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nts))...........................
e4e0 20 20 20 20 20 20 20 20 20 20 20 20 20 27 72 65 6d 6f 74 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 .............'remote-name)......
e500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 6b 29 29 29 29 29 .......................fork)))))
e520 0a 20 20 28 6c 65 74 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 ...(let.((repo.(forge-get-reposi
e540 74 6f 72 79 20 3a 73 74 75 62 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6b 2d 72 tory.:stub))).....(forge--fork-r
e560 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 66 6f 72 6b 29 0a 20 20 20 20 28 6d 61 67 69 74 2d epository.repo.fork).....(magit-
e580 72 65 6d 6f 74 65 2d 61 64 64 20 72 65 6d 6f 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 remote-add.remote...............
e5a0 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 63 6c 6f 6e 65 2d 2d 66 6f 72 6d 61 74 2d 75 72 6c ........(magit-clone--format-url
e5c0 20 28 6f 72 65 66 20 72 65 70 6f 20 67 69 74 68 6f 73 74 29 20 66 6f 72 6b 0a 20 20 20 20 20 20 .(oref.repo.githost).fork.......
e5e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
e600 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 .........(oref.repo.name))......
e620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 22 2d 2d 66 65 74 63 68 22 .................(list."--fetch"
e640 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 ))))..;;;###autoload(autoload.'f
e660 6f 72 67 65 2d 6d 65 72 67 65 20 22 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 22 20 6e 69 6c 20 orge-merge."forge-commands".nil.
e680 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 t).(transient-define-suffix.forg
e6a0 65 2d 6d 65 72 67 65 20 28 70 75 6c 6c 72 65 71 20 6d 65 74 68 6f 64 29 0a 20 20 22 4d 65 72 67 e-merge.(pullreq.method)..."Merg
e6c0 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 75 73 69 6e 67 e.the.current.pull-request.using
e6e0 20 4d 45 54 48 4f 44 20 75 73 69 6e 67 20 74 68 65 20 66 6f 72 67 65 27 73 20 41 50 49 2e 0a 0a .METHOD.using.the.forge's.API...
e700 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 63 75 72 72 65 6e 74 20 70 75 6c 6c 2d 72 65 71 75 If.there.is.no.current.pull-requ
e720 65 73 74 20 6f 72 20 77 69 74 68 20 61 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 2c 0a 74 est.or.with.a.prefix.argument,.t
e740 68 65 6e 20 72 65 61 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 50 55 4c 4c 52 45 51 20 74 6f hen.read.pull-request.PULLREQ.to
e760 20 76 69 73 69 74 20 69 6e 73 74 65 61 64 2e 0a 0a 55 73 65 20 6f 66 20 74 68 69 73 20 63 6f 6d .visit.instead...Use.of.this.com
e780 6d 61 6e 64 20 69 73 20 64 69 73 63 6f 75 72 61 67 65 64 2e 20 20 55 6e 6c 65 73 73 20 74 68 65 mand.is.discouraged...Unless.the
e7a0 20 72 65 6d 6f 74 65 20 72 65 70 6f 73 69 74 6f 72 79 0a 69 73 20 63 6f 6e 66 69 67 75 72 65 64 .remote.repository.is.configured
e7c0 20 74 6f 20 64 69 73 61 6c 6c 6f 77 20 74 68 61 74 2c 20 79 6f 75 20 73 68 6f 75 6c 64 20 69 6e .to.disallow.that,.you.should.in
e7e0 73 74 65 61 64 20 6d 65 72 67 65 20 6c 6f 63 61 6c 6c 79 0a 61 6e 64 20 74 68 65 6e 20 70 75 73 stead.merge.locally.and.then.pus
e800 68 20 74 68 65 20 74 61 72 67 65 74 20 62 72 61 6e 63 68 2e 20 20 46 6f 72 67 65 73 20 64 65 74 h.the.target.branch...Forges.det
e820 65 63 74 20 74 68 61 74 20 79 6f 75 20 68 61 76 65 0a 64 6f 6e 65 20 74 68 61 74 20 61 6e 64 20 ect.that.you.have.done.that.and.
e840 72 65 73 70 6f 6e 64 20 62 79 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 6d 61 72 6b 69 6e 67 respond.by.automatically.marking
e860 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 0a 61 73 20 6d 65 72 67 65 64 2e 22 0a 20 20 .the.pull-request.as.merged."...
e880 28 64 65 63 6c 61 72 65 20 28 69 6e 74 65 72 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 6c 29 29 (declare.(interactive-only.nil))
e8a0 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 72 65 61 ...(interactive.(list.(forge-rea
e8c0 64 2d 70 75 6c 6c 72 65 71 20 22 4d 65 72 67 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 22 29 0a d-pullreq."Merge.pull-request").
e8e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 65 6c 65 .....................(forge-sele
e900 63 74 2d 6d 65 72 67 65 2d 6d 65 74 68 6f 64 29 29 29 0a 20 20 28 6c 65 74 20 28 28 70 75 6c 6c ct-merge-method)))...(let.((pull
e920 72 65 71 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 29 29 req.(forge-get-pullreq.pullreq))
e940 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 65 72 67 65 2d 70 75 6c 6c 72 65 71 20 28 66 6f 72 ).....(forge--merge-pullreq.(for
e960 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 ge-get-repository.pullreq)......
e980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 75 6c 6c 72 65 71 0a 20 20 20 .....................pullreq....
e9a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 72 65 .......................(magit-re
e9c0 76 2d 68 61 73 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 v-hash..........................
e9e0 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 62 72 61 6e 63 68 2d 69 6e 74 65 72 6e 61 ..(forge--pullreq-branch-interna
ea00 6c 20 70 75 6c 6c 72 65 71 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l.pullreq)).....................
ea20 20 20 20 20 20 20 6d 65 74 68 6f 64 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 73 65 ......method)))..(defun.forge-se
ea40 6c 65 63 74 2d 6d 65 72 67 65 2d 6d 65 74 68 6f 64 20 28 29 0a 20 20 28 69 66 20 28 66 6f 72 67 lect-merge-method.()...(if.(forg
ea60 65 2d 2d 63 68 69 6c 64 70 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 e--childp.(forge-get-repository.
ea80 3a 74 72 61 63 6b 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 :tracked)......................'
eaa0 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 28 forge-gitlab-repository).......(
eac0 6d 61 67 69 74 2d 72 65 61 64 2d 63 68 61 72 2d 63 61 73 65 20 22 4d 65 72 67 65 20 6d 65 74 68 magit-read-char-case."Merge.meth
eae0 6f 64 20 22 20 74 0a 20 20 20 20 20 20 20 20 28 3f 6d 20 22 5b 6d 5d 65 72 67 65 22 20 20 27 6d od.".t.........(?m."[m]erge"..'m
eb00 65 72 67 65 29 0a 20 20 20 20 20 20 20 20 28 3f 73 20 22 5b 73 5d 71 75 61 73 68 22 20 27 73 71 erge).........(?s."[s]quash".'sq
eb20 75 61 73 68 29 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 72 65 61 64 2d 63 68 61 72 2d 63 61 73 65 uash)).....(magit-read-char-case
eb40 20 22 4d 65 72 67 65 20 6d 65 74 68 6f 64 20 22 20 74 0a 20 20 20 20 20 20 28 3f 6d 20 22 5b 6d ."Merge.method.".t.......(?m."[m
eb60 5d 65 72 67 65 22 20 20 27 6d 65 72 67 65 29 0a 20 20 20 20 20 20 28 3f 73 20 22 5b 73 5d 71 75 ]erge"..'merge).......(?s."[s]qu
eb80 61 73 68 22 20 27 73 71 75 61 73 68 29 0a 20 20 20 20 20 20 28 3f 72 20 22 5b 72 5d 65 62 61 73 ash".'squash).......(?r."[r]ebas
eba0 65 22 20 27 72 65 62 61 73 65 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 e".'rebase))))..;;;###autoload.(
ebc0 64 65 66 75 6e 20 66 6f 72 67 65 2d 73 65 74 2d 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 20 28 defun.forge-set-default-branch.(
ebe0 29 0a 20 20 22 43 68 61 6e 67 65 20 74 68 65 20 64 65 66 61 75 6c 74 20 62 72 61 6e 63 68 20 6f )..."Change.the.default.branch.o
ec00 6e 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 6d 6f 74 65 20 61 6e 64 20 6c 6f 63 61 6c 6c n.the.upstream.remote.and.locall
ec20 79 2e 0a 41 6c 73 6f 20 75 70 64 61 74 65 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 62 72 61 6e y..Also.update.the.upstream.bran
ec40 63 68 65 73 20 6f 66 20 6c 6f 63 61 6c 20 62 72 61 6e 63 68 65 73 20 61 63 63 6f 72 64 69 6e 67 ches.of.local.branches.according
ec60 6c 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 ly."...(interactive)...(pcase-le
ec80 74 2a 20 28 28 60 28 2c 72 65 70 6f 20 2c 6f 6c 64 29 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 64 t*.((`(,repo.,old).(forge--set-d
eca0 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 2d 72 65 61 64 2d 61 72 67 73 29 29 0a 20 20 20 20 20 20 efault-branch-read-args)).......
ecc0 20 20 20 20 20 20 20 20 20 28 6e 65 77 20 28 6d 61 67 69 74 2d 72 65 61 64 2d 72 65 6d 6f 74 65 .........(new.(magit-read-remote
ece0 2d 62 72 61 6e 63 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f -branch......................(fo
ed00 72 6d 61 74 20 22 53 65 74 20 64 65 66 61 75 6c 74 20 62 72 61 6e 63 68 20 28 77 61 73 3a 20 25 rmat."Set.default.branch.(was:.%
ed20 73 29 22 20 6f 6c 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 s)".old)......................(d
ed40 65 6c 65 74 65 20 6f 6c 64 20 28 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 6d 6f 74 65 29 29 0a 20 elete.old.(forge--get-remote))..
ed60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 6e 69 6c 20 74 29 29 29 ....................nil.nil.t)))
ed80 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 43 68 61 6e 67 69 6e 67 20 64 65 66 61 75 6c 74 20 .....(message."Changing.default.
eda0 62 72 61 6e 63 68 2e 2e 2e 22 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 64 65 66 61 branch...").....(forge--set-defa
edc0 75 6c 74 2d 62 72 61 6e 63 68 20 72 65 70 6f 20 6e 65 77 29 0a 20 20 20 20 28 6d 61 67 69 74 2d ult-branch.repo.new).....(magit-
ede0 2d 73 65 74 2d 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 20 6e 65 77 20 6f 6c 64 29 0a 20 20 20 -set-default-branch.new.old)....
ee00 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 0a 20 20 20 20 28 6d 65 73 .(forge-refresh-buffer).....(mes
ee20 73 61 67 65 20 22 43 68 61 6e 67 69 6e 67 20 64 65 66 61 75 6c 74 20 62 72 61 6e 63 68 2e 2e 2e sage."Changing.default.branch...
ee40 64 6f 6e 65 22 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 done")))..;;;###autoload.(defun.
ee60 66 6f 72 67 65 2d 72 65 6e 61 6d 65 2d 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 20 28 29 0a 20 forge-rename-default-branch.()..
ee80 20 22 52 65 6e 61 6d 65 20 74 68 65 20 64 65 66 61 75 6c 74 20 62 72 61 6e 63 68 20 6f 6e 20 74 ."Rename.the.default.branch.on.t
eea0 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 6d 6f 74 65 20 61 6e 64 20 6c 6f 63 61 6c 6c 79 2e 0a he.upstream.remote.and.locally..
eec0 41 6c 73 6f 20 75 70 64 61 74 65 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 62 72 61 6e 63 68 65 Also.update.the.upstream.branche
eee0 73 20 6f 66 20 6c 6f 63 61 6c 20 62 72 61 6e 63 68 65 73 20 61 63 63 6f 72 64 69 6e 67 6c 79 2e s.of.local.branches.accordingly.
ef00 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 "...(interactive)...(pcase-let*.
ef20 28 28 60 28 2c 72 65 70 6f 20 2c 6f 6c 64 29 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 64 65 66 61 ((`(,repo.,old).(forge--set-defa
ef40 75 6c 74 2d 62 72 61 6e 63 68 2d 72 65 61 64 2d 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20 ult-branch-read-args))..........
ef60 20 20 20 20 20 20 28 64 65 66 61 75 6c 74 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 ......(default.(and.(not.(equal.
ef80 6f 6c 64 20 22 6d 61 69 6e 22 29 29 20 22 6d 61 69 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 old."main"))."main"))...........
efa0 20 20 20 20 20 28 6e 65 77 20 28 72 65 61 64 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 .....(new.(read-string..........
efc0 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 52 65 6e 61 6d 65 20 64 65 66 61 ............(format."Rename.defa
efe0 75 6c 74 20 62 72 61 6e 63 68 20 60 25 73 27 20 74 6f 25 73 3a 20 22 20 6f 6c 64 0a 20 20 20 20 ult.branch.`%s'.to%s:.".old.....
f000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 64 65 66 .........................(if.def
f020 61 75 6c 74 20 28 66 6f 72 6d 61 74 20 22 20 28 64 65 66 61 75 6c 74 3a 20 25 73 29 22 20 64 65 ault.(format.".(default:.%s)".de
f040 66 61 75 6c 74 29 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 fault)."")).....................
f060 20 6e 69 6c 20 6e 69 6c 20 64 65 66 61 75 6c 74 29 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 .nil.nil.default))).....(message
f080 20 22 52 65 6e 61 6d 69 6e 67 20 64 65 66 61 75 6c 74 20 62 72 61 6e 63 68 2e 2e 2e 22 29 0a 20 ."Renaming.default.branch...")..
f0a0 20 20 20 28 66 6f 72 67 65 2d 2d 72 65 6e 61 6d 65 2d 62 72 61 6e 63 68 20 72 65 70 6f 20 6e 65 ...(forge--rename-branch.repo.ne
f0c0 77 20 6f 6c 64 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 2d 73 65 74 2d 64 65 66 61 75 6c 74 2d 62 w.old).....(magit--set-default-b
f0e0 72 61 6e 63 68 20 6e 65 77 20 6f 6c 64 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 20 22 72 ranch.new.old).....(magit-git."r
f100 65 6d 6f 74 65 22 20 22 73 65 74 2d 68 65 61 64 22 20 22 2d 2d 61 75 74 6f 22 20 28 6f 72 65 66 emote"."set-head"."--auto".(oref
f120 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 .repo.remote)).....(forge-refres
f140 68 2d 62 75 66 66 65 72 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 52 65 6e 61 6d 69 6e 67 h-buffer).....(message."Renaming
f160 20 64 65 66 61 75 6c 74 20 62 72 61 6e 63 68 2e 2e 2e 64 6f 6e 65 22 29 29 29 0a 0a 28 64 65 66 .default.branch...done")))..(def
f180 75 6e 20 66 6f 72 67 65 2d 2d 73 65 74 2d 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 2d 72 65 61 un.forge--set-default-branch-rea
f1a0 64 2d 61 72 67 73 20 28 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d d-args.()...(let*.((repo.(forge-
f1c0 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 29 29 0a 20 20 20 20 20 20 get-repository.:tracked)).......
f1e0 20 20 20 28 5f 20 28 75 6e 6c 65 73 73 20 28 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f ...(_.(unless.(forge-github-repo
f200 73 69 74 6f 72 79 2d 70 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 sitory-p.repo)...............(us
f220 65 72 2d 65 72 72 6f 72 20 22 55 70 64 61 74 69 6e 67 20 64 65 66 61 75 6c 74 20 62 72 61 6e 63 er-error."Updating.default.branc
f240 68 20 6e 6f 74 20 73 75 70 70 6f 72 74 65 64 20 66 6f 72 20 66 6f 72 67 65 20 60 25 73 27 22 0a h.not.supported.for.forge.`%s'".
f260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 ..........................(oref.
f280 72 65 70 6f 20 66 6f 72 67 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 74 65 20 repo.forge))))..........(remote.
f2a0 28 6f 72 20 28 61 6e 64 20 28 66 62 6f 75 6e 64 70 20 27 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 (or.(and.(fboundp.'forge--get-re
f2c0 6d 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 mote)...........................
f2e0 28 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 (forge--get-remote))............
f300 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 65 74 2d 73 6f 6d 65 2d 72 65 6d 6f 74 65 ..........(magit-get-some-remote
f320 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 )......................(user-err
f340 6f 72 20 22 4e 6f 20 72 65 6d 6f 74 65 20 63 6f 6e 66 69 67 75 72 65 64 22 29 29 29 0a 20 20 20 or."No.remote.configured")))....
f360 20 20 20 20 20 20 28 73 79 6d 72 65 66 20 28 66 6f 72 6d 61 74 20 22 72 65 66 73 2f 72 65 6d 6f ......(symref.(format."refs/remo
f380 74 65 73 2f 25 73 2f 48 45 41 44 22 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 tes/%s/HEAD".remote))..........(
f3a0 6f 6c 64 68 65 61 64 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 oldhead.(progn..................
f3c0 20 20 20 28 6d 65 73 73 61 67 65 20 22 44 65 74 65 72 6d 69 6e 69 6e 67 20 6f 6c 64 20 64 65 66 ...(message."Determining.old.def
f3e0 61 75 6c 74 20 62 72 61 6e 63 68 2e 2e 2e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ault.branch...")................
f400 20 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 20 22 66 65 74 63 68 22 20 22 2d 2d 70 72 75 6e 65 .....(magit-git."fetch"."--prune
f420 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 69 ").....................(magit-gi
f440 74 20 22 72 65 6d 6f 74 65 22 20 22 73 65 74 2d 68 65 61 64 22 20 22 2d 2d 61 75 74 6f 22 20 72 t."remote"."set-head"."--auto".r
f460 65 6d 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 emote).....................(mess
f480 61 67 65 20 22 44 65 74 65 72 6d 69 6e 69 6e 67 20 6f 6c 64 20 64 65 66 61 75 6c 74 20 62 72 61 age."Determining.old.default.bra
f4a0 6e 63 68 2e 2e 2e 64 6f 6e 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nch...done")....................
f4c0 20 28 6d 61 67 69 74 2d 67 69 74 2d 73 74 72 69 6e 67 20 22 73 79 6d 62 6f 6c 69 63 2d 72 65 66 .(magit-git-string."symbolic-ref
f4e0 22 20 22 2d 2d 73 68 6f 72 74 22 20 73 79 6d 72 65 66 29 29 29 29 0a 20 20 20 20 28 6c 69 73 74 "."--short".symref)))).....(list
f500 20 72 65 70 6f 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 6f 6c 64 68 65 61 64 0a 20 20 20 20 .repo...........(if.oldhead.....
f520 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 6d 61 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e ..........(cdr.(magit-split-bran
f540 63 68 2d 6e 61 6d 65 20 6f 6c 64 68 65 61 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 ch-name.oldhead)).............(e
f560 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 6f 6c 64 20 64 65 66 61 75 rror."Cannot.determine.old.defau
f580 6c 74 20 62 72 61 6e 63 68 22 29 29 29 29 29 0a 0a 3b 3b 3b 20 43 6f 6e 66 69 67 75 72 61 74 69 lt.branch")))))..;;;.Configurati
f5a0 6f 6e 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 on..(transient-define-suffix.for
f5c0 67 65 2d 66 6f 72 67 65 2e 72 65 6d 6f 74 65 20 28 29 0a 20 20 22 43 68 61 6e 67 65 20 74 68 65 ge-forge.remote.()..."Change.the
f5e0 20 6c 6f 63 61 6c 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20 60 66 6f 72 67 65 2e 72 65 6d 6f 74 .local.value.of.the.`forge.remot
f600 65 27 20 47 69 74 20 76 61 72 69 61 62 6c 65 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 6d 61 67 69 e'.Git.variable."...:class.'magi
f620 74 2d 2d 67 69 74 2d 76 61 72 69 61 62 6c 65 3a 63 68 6f 69 63 65 73 0a 20 20 3a 76 61 72 69 61 t--git-variable:choices...:varia
f640 62 6c 65 20 22 66 6f 72 67 65 2e 72 65 6d 6f 74 65 22 0a 20 20 3a 63 68 6f 69 63 65 73 20 23 27 ble."forge.remote"...:choices.#'
f660 6d 61 67 69 74 2d 6c 69 73 74 2d 72 65 6d 6f 74 65 73 0a 20 20 3a 64 65 66 61 75 6c 74 20 28 6c magit-list-remotes...:default.(l
f680 61 6d 62 64 61 20 28 5f 29 20 28 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 6d 6f 74 65 20 74 20 74 ambda.(_).(forge--get-remote.t.t
f6a0 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 6f 62 6a 20 ))...(interactive)...(let.((obj.
f6c0 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 2d 6f 62 6a 65 63 74 29 29 29 0a 20 20 20 20 (transient-suffix-object))).....
f6e0 28 74 72 61 6e 73 69 65 6e 74 2d 69 6e 66 69 78 2d 73 65 74 20 6f 62 6a 20 28 74 72 61 6e 73 69 (transient-infix-set.obj.(transi
f700 65 6e 74 2d 69 6e 66 69 78 2d 72 65 61 64 20 6f 62 6a 29 29 29 0a 20 20 28 69 66 20 28 61 6e 64 ent-infix-read.obj)))...(if.(and
f720 20 74 72 61 6e 73 69 65 6e 74 2d 2d 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 28 65 .transient--prefix............(e
f740 71 20 28 6f 72 65 66 20 74 72 61 6e 73 69 65 6e 74 2d 2d 70 72 65 66 69 78 20 63 6f 6d 6d 61 6e q.(oref.transient--prefix.comman
f760 64 29 20 27 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 0a 20 20 20 20 20 d).'forge-add-repository))......
f780 20 3b 3b 20 49 6d 70 72 6f 76 65 6d 65 6e 74 73 20 74 6f 20 54 72 61 6e 73 69 65 6e 74 20 77 69 .;;.Improvements.to.Transient.wi
f7a0 6c 6c 20 6d 61 6b 65 20 74 68 69 73 20 68 61 63 6b 20 75 6e 6e 65 63 65 73 73 61 72 79 2e 0a 20 ll.make.this.hack.unnecessary...
f7c0 20 20 20 20 20 28 6c 65 74 20 28 28 73 63 6f 70 65 20 28 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 .....(let.((scope.(forge-add-rep
f7e0 6f 73 69 74 6f 72 79 2d 2d 73 63 6f 70 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 ository--scope))).........(oset.
f800 28 74 72 61 6e 73 69 65 6e 74 2d 70 72 65 66 69 78 2d 6f 62 6a 65 63 74 29 20 73 63 6f 70 65 20 (transient-prefix-object).scope.
f820 73 63 6f 70 65 29 29 0a 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 2d 73 68 6f 77 29 29 29 0a scope)).....(transient--show))).
f840 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 69 6e 66 69 78 20 66 6f 72 67 65 2d 66 .(transient-define-infix.forge-f
f860 6f 72 67 65 2e 67 72 61 70 68 71 6c 49 74 65 6d 4c 69 6d 69 74 20 28 29 0a 20 20 22 43 68 61 6e orge.graphqlItemLimit.()..."Chan
f880 67 65 20 74 68 65 20 6d 61 78 69 6d 75 6d 20 6e 75 6d 62 65 72 20 6f 66 20 47 72 61 70 68 51 4c ge.the.maximum.number.of.GraphQL
f8a0 20 65 6e 74 69 74 69 65 73 20 74 6f 20 70 75 6c 6c 20 61 74 20 6f 6e 63 65 2e 22 0a 20 20 3a 69 .entities.to.pull.at.once."...:i
f8c0 66 20 23 27 66 6f 72 67 65 2d 2d 67 65 74 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 f.#'forge--get-github-repository
f8e0 0a 20 20 3a 63 6c 61 73 73 20 27 6d 61 67 69 74 2d 2d 67 69 74 2d 76 61 72 69 61 62 6c 65 0a 20 ...:class.'magit--git-variable..
f900 20 3a 76 61 72 69 61 62 6c 65 20 22 66 6f 72 67 65 2e 67 72 61 70 68 71 6c 49 74 65 6d 4c 69 6d .:variable."forge.graphqlItemLim
f920 69 74 22 0a 20 20 3a 72 65 61 64 65 72 20 23 27 72 65 61 64 2d 73 74 72 69 6e 67 0a 20 20 3a 64 it"...:reader.#'read-string...:d
f940 65 66 61 75 6c 74 20 28 23 23 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 67 68 75 62 2d efault.(##number-to-string.ghub-
f960 67 72 61 70 68 71 6c 2d 69 74 65 6d 73 2d 70 65 72 2d 72 65 71 75 65 73 74 29 29 0a 0a 28 74 72 graphql-items-per-request))..(tr
f980 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 67 67 ansient-define-suffix.forge-togg
f9a0 6c 65 2d 64 69 73 70 6c 61 79 2d 69 6e 2d 73 74 61 74 75 73 2d 62 75 66 66 65 72 20 28 29 0a 20 le-display-in-status-buffer.()..
f9c0 20 22 54 6f 67 67 6c 65 20 77 68 65 74 68 65 72 20 74 6f 20 64 69 73 70 6c 61 79 20 74 6f 70 69 ."Toggle.whether.to.display.topi
f9e0 63 73 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 73 74 61 74 75 73 20 62 75 66 66 65 72 2e cs.in.the.current.status.buffer.
fa00 22 0a 20 20 3a 69 66 2d 6d 6f 64 65 20 27 6d 61 67 69 74 2d 73 74 61 74 75 73 2d 6d 6f 64 65 0a "...:if-mode.'magit-status-mode.
fa20 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 20 23 27 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d ..:inapt-if-not.#'forge--buffer-
fa40 77 69 74 68 2d 74 6f 70 69 63 73 2d 73 65 63 74 69 6f 6e 73 2d 70 0a 20 20 3a 64 65 73 63 72 69 with-topics-sections-p...:descri
fa60 70 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ption.(lambda.()................
fa80 20 20 28 69 66 20 28 61 6e 64 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d ..(if.(and.forge--buffer-topics-
faa0 73 70 65 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 spec...........................(
fac0 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 74 oref.forge--buffer-topics-spec.t
fae0 79 70 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 68 69 64 65 ype))......................"hide
fb00 20 74 6f 70 69 63 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 64 69 73 .topics"...................."dis
fb20 70 6c 61 79 20 74 6f 70 69 63 73 22 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 play.topics"))...(interactive)..
fb40 20 28 6f 73 65 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 .(oset.forge--buffer-topics-spec
fb60 20 74 79 70 65 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 .type.........(if.(oref.forge--b
fb80 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 74 79 70 65 29 20 6e 69 6c 20 27 74 6f 70 uffer-topics-spec.type).nil.'top
fba0 69 63 29 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a 0a ic))...(forge-refresh-buffer))..
fbc0 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 77 69 74 68 2d 74 6f 70 69 63 73 (defun.forge--buffer-with-topics
fbe0 2d 73 65 63 74 69 6f 6e 73 2d 70 20 28 29 0a 20 20 28 61 6e 64 20 66 6f 72 67 65 2d 2d 62 75 66 -sections-p.()...(and.forge--buf
fc00 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 0a 20 20 20 20 20 20 20 28 6e 6f 74 20 28 65 71 20 fer-topics-spec........(not.(eq.
fc20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 6f 64 65 29 29 0a major-mode.'forge-topics-mode)).
fc40 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 .......(forge-get-repository.:tr
fc60 61 63 6b 65 64 3f 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f acked?)))..;;;###autoload(autolo
fc80 61 64 20 27 66 6f 72 67 65 2d 61 64 64 2d 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 20 22 66 ad.'forge-add-pullreq-refspec."f
fca0 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 orge-commands".nil.t).(transient
fcc0 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 61 64 64 2d 70 75 6c 6c 72 65 71 -define-suffix.forge-add-pullreq
fce0 2d 72 65 66 73 70 65 63 20 28 29 0a 20 20 22 43 6f 6e 66 69 67 75 72 65 20 47 69 74 20 74 6f 20 -refspec.()..."Configure.Git.to.
fd00 66 65 74 63 68 20 61 6c 6c 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e 0a 54 68 69 73 20 69 73 fetch.all.pull-requests..This.is
fd20 20 64 6f 6e 65 20 62 79 20 61 64 64 69 6e 67 20 5c 22 2b 72 65 66 73 2f 70 75 6c 6c 2f 2a 2f 68 .done.by.adding.\"+refs/pull/*/h
fd40 65 61 64 3a 72 65 66 73 2f 70 75 6c 6c 72 65 71 73 2f 2a 5c 22 0a 74 6f 20 74 68 65 20 76 61 6c ead:refs/pullreqs/*\".to.the.val
fd60 75 65 20 6f 66 20 60 72 65 6d 6f 74 65 2e 52 45 4d 4f 54 45 2e 66 65 74 63 68 27 2c 20 77 68 65 ue.of.`remote.REMOTE.fetch',.whe
fd80 72 65 20 52 45 4d 4f 54 45 20 69 73 20 74 68 65 0a 75 70 73 74 72 65 61 6d 20 72 65 6d 6f 74 65 re.REMOTE.is.the.upstream.remote
fda0 2e 22 0a 20 20 3a 69 66 2d 6e 6f 74 20 27 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 72 65 66 ."...:if-not.'forge--pullreq-ref
fdc0 73 70 65 63 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 61 64 64 20 70 75 6c 6c 2d 72 65 spec...:description."add.pull-re
fde0 71 75 65 73 74 20 72 65 66 73 70 65 63 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 quest.refspec"...(interactive)..
fe00 20 28 6c 65 74 2a 20 28 28 72 65 70 6f 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f .(let*.((repo....(forge-get-repo
fe20 73 69 74 6f 72 79 20 3a 73 74 75 62 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 74 65 20 sitory.:stub))..........(remote.
fe40 20 28 6f 72 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 .(oref.repo.remote))..........(f
fe60 65 74 63 68 20 20 20 28 6d 61 67 69 74 2d 67 65 74 2d 61 6c 6c 20 22 72 65 6d 6f 74 65 22 20 72 etch...(magit-get-all."remote".r
fe80 65 6d 6f 74 65 20 22 66 65 74 63 68 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 66 73 70 65 emote."fetch"))..........(refspe
fea0 63 20 28 6f 72 65 66 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 29 29 29 0a c.(oref.repo.pullreq-refspec))).
fec0 20 20 20 20 28 69 66 20 28 6d 65 6d 62 65 72 20 72 65 66 73 70 65 63 20 66 65 74 63 68 29 0a 20 ....(if.(member.refspec.fetch)..
fee0 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 50 75 6c 6c 2d 72 65 71 75 65 73 74 20 72 65 .......(message."Pull-request.re
ff00 66 73 70 65 63 20 69 73 20 61 6c 72 65 61 64 79 20 61 63 74 69 76 65 22 29 0a 20 20 20 20 20 20 fspec.is.already.active").......
ff20 28 6d 61 67 69 74 2d 63 61 6c 6c 2d 67 69 74 20 22 63 6f 6e 66 69 67 22 20 22 2d 2d 61 64 64 22 (magit-call-git."config"."--add"
ff40 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 .......................(format."
ff60 72 65 6d 6f 74 65 2e 25 73 2e 66 65 74 63 68 22 20 72 65 6d 6f 74 65 29 0a 20 20 20 20 20 20 20 remote.%s.fetch".remote)........
ff80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 66 73 70 65 63 29 0a 20 20 20 20 20 20 28 6d ...............refspec).......(m
ffa0 61 67 69 74 2d 67 69 74 2d 66 65 74 63 68 20 72 65 6d 6f 74 65 20 28 6d 61 67 69 74 2d 66 65 74 agit-git-fetch.remote.(magit-fet
ffc0 63 68 2d 61 72 67 75 6d 65 6e 74 73 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d ch-arguments)))))..(defun.forge-
ffe0 2d 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 20 28 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 -pullreq-refspec.()...(let*.((re
10000 70 6f 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 po....(forge-get-repository.:stu
10020 62 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 74 65 20 20 28 6f 72 65 66 20 72 65 70 6f b))..........(remote..(oref.repo
10040 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 65 74 63 68 20 20 20 28 6d 61 67 .remote))..........(fetch...(mag
10060 69 74 2d 67 65 74 2d 61 6c 6c 20 22 72 65 6d 6f 74 65 22 20 72 65 6d 6f 74 65 20 22 66 65 74 63 it-get-all."remote".remote."fetc
10080 68 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 66 73 70 65 63 20 28 6f 72 65 66 20 72 65 70 h"))..........(refspec.(oref.rep
100a0 6f 20 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 29 29 29 0a 20 20 20 20 28 63 61 72 20 28 6d o.pullreq-refspec))).....(car.(m
100c0 65 6d 62 65 72 20 72 65 66 73 70 65 63 20 66 65 74 63 68 29 29 29 29 0a 0a 3b 3b 3b 20 41 64 64 ember.refspec.fetch))))..;;;.Add
100e0 20 72 65 70 6f 73 69 74 6f 72 69 65 73 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 .repositories..;;;###autoload(au
10100 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 20 22 66 6f toload.'forge-add-repository."fo
10120 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d rge-commands".nil.t).(transient-
10140 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f define-prefix.forge-add-reposito
10160 72 79 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f 20 6c 69 6d 69 74 29 0a 20 20 22 41 64 64 ry.(&optional.repo.limit)..."Add
10180 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 22 0a .a.repository.to.the.database.".
101a0 20 20 3a 72 65 66 72 65 73 68 2d 73 75 66 66 69 78 65 73 20 74 0a 20 20 5b 3a 63 6c 61 73 73 20 ..:refresh-suffixes.t...[:class.
101c0 74 72 61 6e 73 69 65 6e 74 2d 73 75 62 67 72 6f 75 70 73 0a 0a 20 20 20 3b 3b 20 41 6c 72 65 61 transient-subgroups.....;;.Alrea
101e0 64 79 20 74 72 61 63 6b 65 64 2e 0a 20 20 20 5b 3a 69 66 20 28 23 23 66 6f 72 67 65 2d 2d 73 63 dy.tracked.....[:if.(##forge--sc
10200 6f 70 65 20 3a 74 72 61 63 6b 65 64 29 0a 20 20 20 20 28 3a 69 6e 66 6f 2a 0a 20 20 20 20 20 28 ope.:tracked).....(:info*......(
10220 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 lambda.()........(format........
10240 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 25 73 20 69 73 20 61 6c 72 65 61 64 79 20 62 65 69 6e .(propertize."%s.is.already.bein
10260 67 20 74 72 61 63 6b 65 64 22 20 27 66 61 63 65 20 27 74 72 61 6e 73 69 65 6e 74 2d 68 65 61 64 g.tracked".'face.'transient-head
10280 69 6e 67 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 67 65 2d ing).........(propertize.(forge-
102a0 2d 73 63 6f 70 65 20 27 75 72 6c 29 20 27 66 61 63 65 20 27 62 6f 6c 64 29 29 29 0a 20 20 20 20 -scope.'url).'face.'bold))).....
102c0 20 3a 66 6f 72 6d 61 74 20 22 25 64 22 29 5d 0a 0a 20 20 20 3b 3b 20 4e 6f 74 68 69 6e 67 20 74 .:format."%d")].....;;.Nothing.t
102e0 6f 20 74 72 61 63 6b 65 64 2e 0a 20 20 20 5b 3a 69 66 2d 6e 6f 74 20 28 23 23 66 6f 72 67 65 2d o.tracked.....[:if-not.(##forge-
10300 2d 73 63 6f 70 65 20 27 74 6f 70 64 69 72 29 0a 20 20 20 20 28 3a 69 6e 66 6f 2a 0a 20 20 20 20 -scope.'topdir).....(:info*.....
10320 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 0a 20 20 20 20 20 .(lambda.()........(format......
10340 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 25 73 20 69 73 20 6e 6f 74 20 69 6e 73 69 64 65 ...(propertize."%s.is.not.inside
10360 20 61 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 22 20 27 66 61 63 65 20 27 74 72 61 6e 73 69 .a.Git.repository".'face.'transi
10380 65 6e 74 2d 68 65 61 64 69 6e 67 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 ent-heading).........(propertize
103a0 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 27 66 61 63 65 20 27 62 6f 6c 64 29 29 .default-directory.'face.'bold))
103c0 29 0a 20 20 20 20 20 3a 66 6f 72 6d 61 74 20 22 25 64 22 29 5d 0a 0a 20 20 20 3b 3b 20 43 61 6e )......:format."%d")].....;;.Can
103e0 6e 6f 74 20 74 72 61 63 6b 2e 0a 20 20 20 5b 3a 69 66 20 28 23 23 61 6e 64 20 28 6e 6f 74 20 28 not.track.....[:if.(##and.(not.(
10400 66 6f 72 67 65 2d 2d 73 63 6f 70 65 20 27 72 65 70 6f 29 29 20 28 66 6f 72 67 65 2d 2d 73 63 6f forge--scope.'repo)).(forge--sco
10420 70 65 20 27 74 6f 70 64 69 72 29 29 0a 20 20 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 pe.'topdir)).....:description...
10440 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 ..(lambda.().......(concat......
10460 20 20 28 66 6f 72 6d 61 74 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 43 61 6e 6e 6f 74 20 64 65 ..(format.(propertize."Cannot.de
10480 74 65 72 6d 69 6e 65 20 66 6f 72 67 65 20 68 6f 73 74 20 66 6f 72 20 25 73 5c 6e 22 0a 20 20 20 termine.forge.host.for.%s\n"....
104a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 74 ........................'face.'t
104c0 72 61 6e 73 69 65 6e 74 2d 68 65 61 64 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ransient-heading)...............
104e0 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 67 65 2d 2d 73 63 6f 70 65 20 27 74 6f 70 64 .(propertize.(forge--scope.'topd
10500 69 72 29 20 27 66 61 63 65 20 27 62 6f 6c 64 29 29 0a 20 20 20 20 20 20 20 28 69 66 2d 6c 65 74 ir).'face.'bold))........(if-let
10520 2a 20 28 28 72 65 6d 6f 74 65 20 28 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 6d 6f 74 65 29 29 0a *.((remote.(forge--get-remote)).
10540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 72 6c 20 28 6d 61 67 69 74 2d 67 69 74 .................(url.(magit-git
10560 2d 73 74 72 69 6e 67 20 22 72 65 6d 6f 74 65 22 20 22 67 65 74 2d 75 72 6c 22 20 72 65 6d 6f 74 -string."remote"."get-url".remot
10580 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 28 70 72 6f 70 65 e)))..............(format.(prope
105a0 72 74 69 7a 65 20 22 62 65 63 61 75 73 65 20 25 73 20 69 73 20 6e 6f 74 20 6f 6e 20 61 20 68 6f rtize."because.%s.is.not.on.a.ho
105c0 73 74 20 6b 6e 6f 77 6e 20 74 6f 20 46 6f 72 67 65 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 st.known.to.Forge.".............
105e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 74 72 61 6e .....................'face.'tran
10600 73 69 65 6e 74 2d 68 65 61 64 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sient-heading)..................
10620 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 75 72 6c 20 27 66 61 63 65 20 27 62 6f 6c 64 29 ....(propertize.url.'face.'bold)
10640 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 62 65 63 61 75 73 )............(propertize."becaus
10660 65 20 6e 6f 20 73 75 69 74 61 62 6c 65 20 72 65 6d 6f 74 65 20 77 61 73 20 64 65 74 65 63 74 65 e.no.suitable.remote.was.detecte
10680 64 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 d."........................'face
106a0 20 27 74 72 61 6e 73 69 65 6e 74 2d 68 65 61 64 69 6e 67 29 29 29 29 0a 20 20 20 20 28 22 72 22 .'transient-heading)))).....("r"
106c0 20 66 6f 72 67 65 2d 66 6f 72 67 65 2e 72 65 6d 6f 74 65 20 3a 66 6f 72 6d 61 74 20 22 20 25 6b .forge-forge.remote.:format.".%k
106e0 20 54 72 79 20 61 6e 6f 74 68 65 72 20 25 64 20 25 76 22 20 3a 66 61 63 65 20 27 62 6f 6c 64 29 .Try.another.%d.%v".:face.'bold)
10700 0a 20 20 20 20 28 22 68 22 20 22 4c 65 61 72 6e 20 68 6f 77 20 74 6f 20 63 6f 6e 66 69 67 75 72 .....("h"."Learn.how.to.configur
10720 65 20 61 6e 6f 74 68 65 72 20 47 69 74 68 75 62 20 68 6f 73 74 22 0a 20 20 20 20 20 28 6c 61 6d e.another.Github.host"......(lam
10740 62 64 61 20 28 29 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 69 6e 66 6f 20 22 28 66 6f 72 bda.().(interactive).(info."(for
10760 67 65 29 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 68 65 72 20 47 69 74 68 75 62 20 49 6e 73 74 ge)Setup.for.Another.Github.Inst
10780 61 6e 63 65 22 29 29 29 0a 20 20 20 20 28 22 6c 22 20 22 4c 65 61 72 6e 20 68 6f 77 20 74 6f 20 ance"))).....("l"."Learn.how.to.
107a0 63 6f 6e 66 69 67 75 72 65 20 61 6e 6f 74 68 65 72 20 47 69 74 6c 61 62 20 68 6f 73 74 22 0a 20 configure.another.Gitlab.host"..
107c0 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 69 6e ....(lambda.().(interactive).(in
107e0 66 6f 20 22 28 66 6f 72 67 65 29 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 68 65 72 20 47 69 74 fo."(forge)Setup.for.Another.Git
10800 6c 61 62 20 49 6e 73 74 61 6e 63 65 22 29 29 29 0a 20 20 20 20 28 22 70 22 20 22 4c 65 61 72 6e lab.Instance"))).....("p"."Learn
10820 20 68 6f 77 20 74 6f 20 63 6f 6e 66 69 67 75 72 65 20 70 61 72 74 69 61 6c 6c 79 20 73 75 70 70 .how.to.configure.partially.supp
10840 6f 72 74 65 64 20 68 6f 73 74 22 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 69 6e 74 orted.host"......(lambda.().(int
10860 65 72 61 63 74 69 76 65 29 20 28 69 6e 66 6f 20 22 28 66 6f 72 67 65 29 53 65 74 75 70 20 61 20 eractive).(info."(forge)Setup.a.
10880 50 61 72 74 69 61 6c 6c 79 20 53 75 70 70 6f 72 74 65 64 20 48 6f 73 74 22 29 29 29 5d 0a 0a 20 Partially.Supported.Host")))]...
108a0 20 20 3b 3b 20 54 72 61 63 6b 20 69 74 21 0a 20 20 20 5b 3a 69 66 20 28 23 23 66 6f 72 67 65 2d ..;;.Track.it!....[:if.(##forge-
108c0 2d 73 63 6f 70 65 20 3a 75 6e 74 72 61 63 6b 65 64 29 0a 20 20 20 20 3a 64 65 73 63 72 69 70 74 -scope.:untracked).....:descript
108e0 69 6f 6e 0a 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74 ion.....(lambda.().......(format
10900 0a 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 41 64 64 69 6e 67 20 25 73 20 74 ........(propertize."Adding.%s.t
10920 6f 20 64 61 74 61 62 61 73 65 2c 22 20 27 66 61 63 65 20 27 74 72 61 6e 73 69 65 6e 74 2d 68 65 o.database,".'face.'transient-he
10940 61 64 69 6e 67 29 0a 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 67 65 ading)........(propertize.(forge
10960 2d 2d 73 63 6f 70 65 20 27 75 72 6c 29 20 27 66 61 63 65 20 27 62 6f 6c 64 29 29 29 0a 20 20 20 --scope.'url).'face.'bold)))....
10980 20 28 22 72 22 20 66 6f 72 67 65 2d 66 6f 72 67 65 2e 72 65 6d 6f 74 65 20 3a 66 6f 72 6d 61 74 .("r".forge-forge.remote.:format
109a0 20 22 20 25 6b 20 66 72 6f 6d 20 25 64 20 25 76 2c 22 20 3a 66 61 63 65 20 27 62 6f 6c 64 29 0a .".%k.from.%d.%v,".:face.'bold).
109c0 20 20 20 20 28 22 61 22 20 22 70 75 6c 6c 69 6e 67 20 61 6c 6c 20 74 6f 70 69 63 73 22 0a 20 20 ....("a"."pulling.all.topics"...
109e0 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 70 6f 29 0a 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 ...(lambda.(repo)........(intera
10a00 63 74 69 76 65 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 2d 73 63 6f 70 65 20 27 72 65 70 6f 29 ctive.(list.(forge--scope.'repo)
10a20 29 29 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 20 ))........(forge-add-repository.
10a40 72 65 70 6f 29 29 29 0a 20 20 20 20 28 22 73 22 20 22 70 75 6c 6c 69 6e 67 20 6f 6e 6c 79 20 74 repo))).....("s"."pulling.only.t
10a60 6f 70 69 63 73 20 73 69 6e 63 65 20 3c 64 61 74 65 3e 22 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 opics.since.<date>"......(lambda
10a80 20 28 72 65 70 6f 20 64 61 74 65 29 0a 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 .(repo.date)........(interactive
10aa0 0a 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 2d 73 63 6f 70 65 20 27 72 65 .........(list.(forge--scope.'re
10ac0 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 64 61 po)...............(forge-read-da
10ae0 74 65 20 22 4c 69 6d 69 74 20 70 75 6c 6c 69 6e 67 20 74 6f 20 74 6f 70 69 63 73 20 75 70 64 61 te."Limit.pulling.to.topics.upda
10b00 74 65 64 20 73 69 6e 63 65 3a 20 22 29 29 29 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 61 64 ted.since:.")))........(forge-ad
10b20 64 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 64 61 74 65 29 29 29 0a 20 20 20 20 28 22 d-repository.repo.date))).....("
10b40 69 22 20 22 74 6f 20 61 6c 6c 6f 77 20 70 75 6c 6c 69 6e 67 20 6f 66 20 69 6e 64 69 76 69 64 75 i"."to.allow.pulling.of.individu
10b60 61 6c 20 74 6f 70 69 63 73 22 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 70 6f 29 0a 20 al.topics"......(lambda.(repo)..
10b80 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d ......(interactive.(list.(forge-
10ba0 2d 73 63 6f 70 65 20 27 72 65 70 6f 29 29 29 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 61 64 -scope.'repo)))........(forge-ad
10bc0 64 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 3a 73 65 6c 65 63 74 69 76 65 29 29 29 5d d-repository.repo.:selective)))]
10be0 0a 0a 20 20 20 3b 3b 20 50 69 76 6f 74 2e 0a 20 20 20 5b 28 22 6f 22 20 22 41 64 64 20 61 6e 6f .....;;.Pivot.....[("o"."Add.ano
10c00 74 68 65 72 20 72 65 70 6f 73 69 74 6f 72 79 22 20 66 6f 72 67 65 2d 61 64 64 2d 73 6f 6d 65 2d ther.repository".forge-add-some-
10c20 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 28 37 20 22 55 22 20 22 41 64 64 20 61 6c 6c 20 repository).....(7."U"."Add.all.
10c40 73 6f 75 72 63 65 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 62 65 6c 6f 6e 67 69 6e 67 20 74 6f source.repositories.belonging.to
10c60 20 61 20 75 73 65 72 22 0a 20 20 20 20 20 20 20 66 6f 72 67 65 2d 61 64 64 2d 75 73 65 72 2d 72 .a.user"........forge-add-user-r
10c80 65 70 6f 73 69 74 6f 72 69 65 73 29 0a 20 20 20 20 28 37 20 22 4f 22 20 22 41 64 64 20 61 6c 6c epositories).....(7."O"."Add.all
10ca0 20 73 6f 75 72 63 65 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 62 65 6c 6f 6e 67 69 6e 67 20 74 .source.repositories.belonging.t
10cc0 6f 20 61 6e 20 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 22 0a 20 20 20 20 20 20 20 66 6f 72 67 65 2d o.an.organization"........forge-
10ce0 61 64 64 2d 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 29 5d 5d add-organization-repositories)]]
10d00 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 74 65 72 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 ...(declare.(interactive-only.ni
10d20 6c 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 6f 6e 64 0a 20 20 20 28 l))...(interactive)...(cond....(
10d40 28 6e 6f 74 20 72 65 70 6f 29 0a 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 (not.repo).....(transient-setup.
10d60 27 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 20 6e 69 6c 20 6e 69 6c 0a 20 20 'forge-add-repository.nil.nil...
10d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 63 6f 70 65 20 28 66 6f 72 67 65 ...................:scope.(forge
10da0 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 2d 2d 73 63 6f 70 65 29 29 29 0a 20 20 20 28 28 73 -add-repository--scope)))....((s
10dc0 74 72 69 6e 67 70 20 72 65 70 6f 29 0a 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 tringp.repo).....(transient-setu
10de0 70 20 27 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 20 6e 69 6c 20 6e 69 6c 0a p.'forge-add-repository.nil.nil.
10e00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 63 6f 70 65 20 28 66 6f 72 .....................:scope.(for
10e20 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 2d 2d 73 63 6f 70 65 20 72 65 70 6f 29 29 29 ge-add-repository--scope.repo)))
10e40 0a 20 20 20 28 74 0a 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 2a 0a 20 20 20 20 20 20 20 20 28 28 ....(t.....(when-let*.........((
10e60 5f 28 6e 6f 74 20 28 65 71 20 6c 69 6d 69 74 20 3a 73 65 6c 65 63 74 69 76 65 29 29 29 0a 20 20 _(not.(eq.limit.:selective)))...
10e80 20 20 20 20 20 20 20 28 5f 28 6d 61 67 69 74 2d 67 69 74 2d 63 6f 6e 66 69 67 2d 70 20 22 66 6f .......(_(magit-git-config-p."fo
10ea0 72 67 65 2e 61 75 74 6f 50 75 6c 6c 22 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f rge.autoPull".t))..........(remo
10ec0 74 65 20 20 28 6f 72 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 te..(oref.repo.remote)).........
10ee0 20 28 72 65 66 73 70 65 63 20 28 6f 72 65 66 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 2d 72 65 66 .(refspec.(oref.repo.pullreq-ref
10f00 73 70 65 63 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f spec))..........(default-directo
10f20 72 79 20 28 66 6f 72 67 65 2d 67 65 74 2d 77 6f 72 6b 74 72 65 65 20 72 65 70 6f 29 29 0a 20 20 ry.(forge-get-worktree.repo))...
10f40 20 20 20 20 20 20 20 28 5f 28 61 6e 64 20 28 6e 6f 74 20 28 6d 65 6d 62 65 72 20 72 65 66 73 70 .......(_(and.(not.(member.refsp
10f60 65 63 20 28 6d 61 67 69 74 2d 67 65 74 2d 61 6c 6c 20 22 72 65 6d 6f 74 65 22 20 72 65 6d 6f 74 ec.(magit-get-all."remote".remot
10f80 65 20 22 66 65 74 63 68 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 e."fetch"))).................(or
10fa0 20 28 65 71 20 66 6f 72 67 65 2d 61 64 64 2d 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 20 74 .(eq.forge-add-pullreq-refspec.t
10fc0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 20 66 ).....................(and.(eq.f
10fe0 6f 72 67 65 2d 61 64 64 2d 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 20 27 61 73 6b 29 0a 20 orge-add-pullreq-refspec.'ask)..
11000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 79 2d 6f 72 2d 6e 2d ........................(y-or-n-
11020 70 20 28 66 6f 72 6d 61 74 20 22 41 6c 73 6f 20 61 64 64 20 25 53 20 72 65 66 73 70 65 63 3f 20 p.(format."Also.add.%S.refspec?.
11040 22 20 72 65 66 73 70 65 63 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 63 61 ".refspec))))))).......(magit-ca
11060 6c 6c 2d 67 69 74 20 22 63 6f 6e 66 69 67 22 20 22 2d 2d 61 64 64 22 0a 20 20 20 20 20 20 20 20 ll-git."config"."--add".........
11080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 72 65 6d 6f 74 65 2e 25 73 ..............(format."remote.%s
110a0 2e 66 65 74 63 68 22 20 72 65 6d 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .fetch".remote).................
110c0 20 20 20 20 20 20 72 65 66 73 70 65 63 29 29 0a 20 20 20 20 28 73 65 74 71 20 72 65 70 6f 20 28 ......refspec)).....(setq.repo.(
110e0 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 6e 69 6c 20 3a 69 forge-get-repository.repo.nil.:i
11100 6e 73 65 72 74 21 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 6c 69 6d 69 74 20 3a 73 65 nsert!)).....(when.(eq.limit.:se
11120 6c 65 63 74 69 76 65 29 0a 20 20 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 73 65 6c 65 63 74 lective).......(oset.repo.select
11140 69 76 65 2d 70 20 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 6c 69 6d 69 74 20 6e 69 6c 29 29 ive-p.t).......(setq.limit.nil))
11160 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 20 72 65 70 6f 0a 20 20 20 20 20 20 20 20 20 .....(forge--pull.repo..........
11180 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 66 6f 72 67 65 2d 67 65 74 2d 77 6f 72 ........(and.(not.(forge-get-wor
111a0 6b 74 72 65 65 20 72 65 70 6f 29 29 20 23 27 69 67 6e 6f 72 65 29 0a 20 20 20 20 20 20 20 20 20 ktree.repo)).#'ignore)..........
111c0 20 20 20 20 20 20 20 20 6c 69 6d 69 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d ........limit))))..(defun.forge-
111e0 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 2d 2d 73 63 6f 70 65 20 28 26 6f 70 74 69 6f 6e 61 6c add-repository--scope.(&optional
11200 20 64 69 72 65 63 74 6f 72 79 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 70 6f 20 20 20 20 20 20 .directory)...(let*.((repo......
11220 28 69 66 20 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (if.directory...................
11240 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 64 69 72 65 ......(forge-get-repository.dire
11260 63 74 6f 72 79 20 6e 69 6c 20 3a 73 74 75 62 3f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ctory.nil.:stub?)...............
11280 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 ........(forge-get-repository.:s
112a0 74 75 62 3f 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 77 74 72 65 65 20 20 20 20 20 28 61 6e 64 tub?)))..........(wtree.....(and
112c0 20 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 77 6f 72 6b 74 72 65 65 20 72 65 70 6f 29 29 .repo.(forge-get-worktree.repo))
112e0 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 20 28 61 6e 64 20 72 65 70 6f 20 )..........(condition.(and.repo.
11300 28 6f 72 65 66 20 72 65 70 6f 20 63 6f 6e 64 69 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 (oref.repo.condition))).........
11320 20 28 76 61 6c 0a 20 20 20 20 20 20 20 20 20 20 60 28 28 72 65 70 6f 20 20 20 20 20 20 20 2e 20 .(val...........`((repo.........
11340 2c 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 74 72 65 65 20 20 20 20 20 20 2e ,repo).............(wtree.......
11360 20 2c 77 74 72 65 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 20 .,wtree).............(condition.
11380 20 2e 20 2c 63 6f 6e 64 69 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 74 72 61 ...,condition).............(:tra
113a0 63 6b 65 64 20 20 20 2e 20 2c 28 65 71 20 63 6f 6e 64 69 74 69 6f 6e 20 3a 74 72 61 63 6b 65 64 cked.....,(eq.condition.:tracked
113c0 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 75 6e 74 72 61 63 6b 65 64 20 2e 20 2c 28 6d )).............(:untracked...,(m
113e0 65 6d 71 20 63 6f 6e 64 69 74 69 6f 6e 20 27 28 3a 6b 6e 6f 77 6e 20 3a 73 74 75 62 29 29 29 0a emq.condition.'(:known.:stub))).
11400 20 20 20 20 20 20 20 20 20 20 20 20 28 74 6f 70 64 69 72 20 20 20 20 20 2e 20 2c 28 6f 72 20 77 ............(topdir.......,(or.w
11420 74 72 65 65 20 28 6d 61 67 69 74 2d 74 6f 70 6c 65 76 65 6c 29 29 29 0a 20 20 20 20 20 20 20 20 tree.(magit-toplevel))).........
11440 20 20 20 20 28 75 72 6c 20 20 20 20 20 20 20 20 2e 20 2c 28 61 6e 64 20 72 65 70 6f 20 28 66 6f ....(url..........,(and.repo.(fo
11460 72 67 65 2d 67 65 74 2d 75 72 6c 20 72 65 70 6f 29 29 29 29 29 29 0a 20 20 20 20 76 61 6c 29 29 rge-get-url.repo)))))).....val))
11480 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 73 63 6f 70 65 20 28 26 6f 70 74 69 6f 6e 61 6c ..(defun.forge--scope.(&optional
114a0 20 6b 65 79 29 0a 20 20 3b 3b 20 60 74 72 61 6e 73 69 65 6e 74 2d 73 63 6f 70 65 27 20 69 74 73 .key)...;;.`transient-scope'.its
114c0 65 6c 66 20 70 72 6f 62 61 62 6c 79 20 6f 66 66 65 72 20 6f 70 74 69 6f 6e 61 6c 20 4b 45 59 2e elf.probably.offer.optional.KEY.
114e0 0a 20 20 28 6c 65 74 20 28 28 73 63 6f 70 65 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 63 6f 70 65 ...(let.((scope.(transient-scope
11500 29 29 29 0a 20 20 20 20 28 69 66 20 6b 65 79 20 28 61 6c 69 73 74 2d 67 65 74 20 6b 65 79 20 73 ))).....(if.key.(alist-get.key.s
11520 63 6f 70 65 29 20 73 63 6f 70 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 61 64 64 cope).scope)))..(defun.forge-add
11540 2d 73 6f 6d 65 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 75 72 6c 29 0a 20 20 22 52 65 61 64 20 61 -some-repository.(url)..."Read.a
11560 20 72 65 70 6f 73 69 74 6f 72 79 20 61 6e 64 20 61 64 64 20 69 74 20 74 6f 20 74 68 65 20 64 61 .repository.and.add.it.to.the.da
11580 74 61 62 61 73 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c 65 74 20 tabase."...(interactive....(let.
115a0 28 72 65 74 20 75 72 6c 29 0a 20 20 20 20 20 28 77 68 69 6c 65 20 28 6e 6f 74 20 72 65 74 29 0a (ret.url)......(while.(not.ret).
115c0 20 20 20 20 20 20 20 28 73 65 74 71 20 75 72 6c 20 28 6d 61 67 69 74 2d 72 65 61 64 2d 73 74 72 .......(setq.url.(magit-read-str
115e0 69 6e 67 2d 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 41 64 64 20 72 65 ing-ns..................."Add.re
11600 70 6f 73 69 74 6f 72 79 20 74 6f 20 64 61 74 61 62 61 73 65 20 28 75 72 6c 2c 20 6f 77 6e 65 72 pository.to.database.(url,.owner
11620 2f 6e 61 6d 65 2c 20 6f 72 20 6e 61 6d 65 29 22 20 75 72 6c 29 29 0a 20 20 20 20 20 20 20 28 75 /name,.or.name)".url))........(u
11640 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 28 3a 2f 2f 5c 5c 7c nless.(string-match-p."\\(://\\|
11660 40 5c 5c 29 22 20 75 72 6c 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 75 72 6c 20 28 6d @\\)".url)..........(setq.url.(m
11680 61 67 69 74 2d 63 6c 6f 6e 65 2d 2d 6e 61 6d 65 2d 74 6f 2d 75 72 6c 20 75 72 6c 29 29 29 0a 20 agit-clone--name-to-url.url)))..
116a0 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f ......(cond.((forge-get-reposito
116c0 72 79 20 75 72 6c 20 6e 69 6c 20 3a 74 72 61 63 6b 65 64 3f 29 0a 20 20 20 20 20 20 20 20 20 20 ry.url.nil.:tracked?)...........
116e0 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 20 69 73 20 61 6c 72 65 61 64 79 20 62 65 69 6e ....(message."%s.is.already.bein
11700 67 20 74 72 61 63 6b 65 64 20 6c 6f 63 61 6c 6c 79 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 g.tracked.locally"..............
11720 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 75 72 6c 20 27 66 61 63 65 20 ..........(propertize.url.'face.
11740 27 62 6f 6c 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 69 74 2d 66 6f 72 20 33 'bold))...............(sit-for.3
11760 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 66 6f 72 67 65 2d 67 65 74 ))..............((not.(forge-get
11780 2d 72 65 70 6f 73 69 74 6f 72 79 20 75 72 6c 20 6e 69 6c 20 3a 76 61 6c 69 64 3f 29 29 0a 20 20 -repository.url.nil.:valid?))...
117a0 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 20 64 6f 65 73 20 6e 6f ............(message."%s.does.no
117c0 74 20 65 78 69 73 74 20 6f 72 20 69 73 20 69 6e 61 63 63 65 73 73 69 62 6c 65 22 0a 20 20 20 20 t.exist.or.is.inaccessible".....
117e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 75 ...................(propertize.u
11800 72 6c 20 27 66 61 63 65 20 27 62 6f 6c 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 rl.'face.'bold))...............(
11820 73 69 74 2d 66 6f 72 20 33 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 65 74 71 20 sit-for.3))..............((setq.
11840 72 65 74 20 75 72 6c 29 29 29 29 0a 20 20 20 20 20 28 6c 69 73 74 20 72 65 74 29 29 29 0a 20 20 ret.url))))......(list.ret)))...
11860 28 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 20 75 72 6c 29 29 0a 0a 3b 3b 3b (forge-add-repository.url))..;;;
11880 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 61 64 64 2d 75 73 65 ###autoload.(defun.forge-add-use
118a0 72 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 20 28 68 6f 73 74 20 75 73 65 72 29 0a 20 20 22 41 64 r-repositories.(host.user)..."Ad
118c0 64 20 61 6c 6c 20 6f 66 20 55 53 45 52 27 73 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 66 72 6f d.all.of.USER's.repositories.fro
118e0 6d 20 48 4f 53 54 20 74 6f 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 0a 54 68 69 73 20 6d 61 79 m.HOST.to.the.database..This.may
11900 20 74 61 6b 65 20 61 20 77 68 69 6c 65 2e 20 20 4f 6e 6c 79 20 47 69 74 68 75 62 20 69 73 20 73 .take.a.while...Only.Github.is.s
11920 75 70 70 6f 72 74 65 64 20 61 74 20 74 68 65 20 6d 6f 6d 65 6e 74 2e 22 0a 20 20 28 69 6e 74 65 upported.at.the.moment."...(inte
11940 72 61 63 74 69 76 65 0a 20 20 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 68 6f 73 ractive....(list.(forge-read-hos
11960 74 20 22 41 64 64 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 66 72 6f 6d 20 47 69 74 68 75 62 20 t."Add.repositories.from.Github.
11980 68 6f 73 74 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 host"...........................
119a0 27 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 'forge-github-repository).......
119c0 20 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 55 73 65 72 3a 20 22 29 29 29 0a 20 20 28 66 ...(read-string."User:.")))...(f
119e0 6f 72 67 65 2d 2d 61 64 64 2d 75 73 65 72 2d 72 65 70 6f 73 20 27 66 6f 72 67 65 2d 67 69 74 68 orge--add-user-repos.'forge-gith
11a00 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 20 68 6f 73 74 20 75 73 65 72 29 29 0a 0a 3b 3b 3b 23 23 ub-repository.host.user))..;;;##
11a20 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 61 64 64 2d 6f 72 67 61 6e #autoload.(defun.forge-add-organ
11a40 69 7a 61 74 69 6f 6e 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 20 28 68 6f 73 74 20 6f 72 67 61 6e ization-repositories.(host.organ
11a60 69 7a 61 74 69 6f 6e 29 0a 20 20 22 41 64 64 20 61 6c 6c 20 6f 66 20 4f 52 47 41 4e 49 5a 41 54 ization)..."Add.all.of.ORGANIZAT
11a80 49 4f 4e 27 73 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 66 72 6f 6d 20 48 4f 53 54 20 74 6f 20 ION's.repositories.from.HOST.to.
11aa0 74 68 65 20 64 61 74 61 62 61 73 65 2e 0a 54 68 69 73 20 6d 61 79 20 74 61 6b 65 20 61 20 77 68 the.database..This.may.take.a.wh
11ac0 69 6c 65 2e 20 20 4f 6e 6c 79 20 47 69 74 68 75 62 20 69 73 20 73 75 70 70 6f 72 74 65 64 20 61 ile...Only.Github.is.supported.a
11ae0 74 20 74 68 65 20 6d 6f 6d 65 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 t.the.moment."...(interactive...
11b00 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 68 6f 73 74 20 22 41 64 64 20 72 65 70 .(list.(forge-read-host."Add.rep
11b20 6f 73 69 74 6f 72 69 65 73 20 66 72 6f 6d 20 47 69 74 68 75 62 20 68 6f 73 74 22 0a 20 20 20 20 ositories.from.Github.host".....
11b40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 67 69 74 ......................'forge-git
11b60 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 73 hub-repository)..........(read-s
11b80 74 72 69 6e 67 20 22 4f 72 67 61 6e 69 7a 61 74 69 6f 6e 3a 20 22 29 29 29 0a 20 20 28 66 6f 72 tring."Organization:.")))...(for
11ba0 67 65 2d 2d 61 64 64 2d 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 2d 72 65 70 6f 73 20 27 66 6f 72 67 ge--add-organization-repos.'forg
11bc0 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 20 68 6f 73 74 20 6f 72 67 61 6e 69 7a e-github-repository.host.organiz
11be0 61 74 69 6f 6e 29 29 0a 0a 3b 3b 3b 20 43 6c 65 61 6e 75 70 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f ation))..;;;.Cleanup..;;;###auto
11c00 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 6d 6f 76 65 2d 72 65 70 6f 73 69 74 load.(defun.forge-remove-reposit
11c20 6f 72 79 20 28 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 22 52 65 6d 6f 76 65 20 61 20 72 65 70 ory.(repository)..."Remove.a.rep
11c40 6f 73 69 74 6f 72 79 20 66 72 6f 6d 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 22 0a 20 20 28 69 ository.from.the.database."...(i
11c60 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 72 65 70 6f nteractive....(pcase-let*.((repo
11c80 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 72 65 70 6f 73 69 74 6f 72 79 20 22 52 65 6d 6f 76 65 20 .(forge-read-repository."Remove.
11ca0 72 65 70 6f 73 69 74 6f 72 79 20 66 72 6f 6d 20 64 62 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 repository.from.db"))...........
11cc0 20 20 20 20 20 20 28 28 65 69 65 69 6f 20 67 69 74 68 6f 73 74 20 6f 77 6e 65 72 20 6e 61 6d 65 ......((eieio.githost.owner.name
11ce0 29 20 72 65 70 6f 29 29 0a 20 20 20 20 20 28 69 66 20 28 79 65 73 2d 6f 72 2d 6e 6f 2d 70 20 28 ).repo))......(if.(yes-or-no-p.(
11d00 66 6f 72 6d 61 74 20 22 44 6f 20 79 6f 75 20 72 65 61 6c 6c 79 20 77 61 6e 74 20 74 6f 20 72 65 format."Do.you.really.want.to.re
11d20 6d 6f 76 65 20 5c 22 25 73 2f 25 73 20 40 25 73 5c 22 20 25 73 3f 20 22 0a 20 20 20 20 20 20 20 move.\"%s/%s.@%s\".%s?."........
11d40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 77 6e 65 72 20 6e 61 6d .......................owner.nam
11d60 65 20 67 69 74 68 6f 73 74 20 22 66 72 6f 6d 20 74 68 65 20 64 61 74 61 62 61 73 65 22 29 29 0a e.githost."from.the.database")).
11d80 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 28 75 73 65 .........(list.repo)........(use
11da0 72 2d 65 72 72 6f 72 20 22 41 62 6f 72 74 22 29 29 29 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 64 65 r-error."Abort"))))...(closql-de
11dc0 6c 65 74 65 20 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 lete.repository)...(forge-refres
11de0 68 2d 62 75 66 66 65 72 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 h-buffer))..;;;###autoload.(defu
11e00 6e 20 66 6f 72 67 65 2d 72 65 6d 6f 76 65 2d 74 6f 70 69 63 2d 6c 6f 63 61 6c 6c 79 20 28 74 6f n.forge-remove-topic-locally.(to
11e20 70 69 63 29 0a 20 20 22 52 65 6d 6f 76 65 20 61 20 74 6f 70 69 63 20 66 72 6f 6d 20 74 68 65 20 pic)..."Remove.a.topic.from.the.
11e40 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 20 6f 6e 6c 79 2e 0a 0a 57 68 65 6e 20 74 68 65 20 72 local.database.only...When.the.r
11e60 65 67 69 6f 6e 20 6d 61 72 6b 73 20 6d 75 6c 74 69 70 6c 65 20 74 6f 70 69 63 73 2c 20 74 68 65 egion.marks.multiple.topics,.the
11e80 6e 20 6f 66 66 65 72 20 74 6f 20 72 65 6d 6f 76 65 20 74 68 65 6d 20 61 6c 6c 2e 0a 0a 54 68 65 n.offer.to.remove.them.all...The
11ea0 20 74 6f 70 69 63 20 69 73 20 6e 6f 74 20 72 65 6d 6f 76 65 64 20 66 72 6f 6d 20 74 68 65 20 66 .topic.is.not.removed.from.the.f
11ec0 6f 72 67 65 20 61 6e 64 2c 20 69 66 20 69 74 20 69 73 20 6c 61 74 65 72 20 6d 6f 64 69 66 69 65 orge.and,.if.it.is.later.modifie
11ee0 64 2c 0a 74 68 65 6e 20 69 74 20 77 69 6c 6c 20 62 65 20 61 64 64 65 64 20 74 6f 20 74 68 65 20 d,.then.it.will.be.added.to.the.
11f00 64 61 74 61 62 61 73 65 20 61 67 61 69 6e 20 77 68 65 6e 20 66 65 74 63 68 69 6e 67 20 61 6c 6c database.again.when.fetching.all
11f20 20 74 6f 70 69 63 73 2e 0a 0a 54 68 69 73 20 69 73 20 75 73 65 66 75 6c 20 66 6f 72 20 75 73 65 .topics...This.is.useful.for.use
11f40 72 73 20 77 68 6f 20 6f 6e 6c 79 20 66 65 74 63 68 20 69 6e 64 69 76 69 64 75 61 6c 20 74 6f 70 rs.who.only.fetch.individual.top
11f60 69 63 73 20 61 6e 64 20 77 61 6e 74 20 74 6f 0a 72 65 6d 6f 76 65 20 74 68 65 20 74 6f 70 69 63 ics.and.want.to.remove.the.topic
11f80 73 20 74 68 65 79 20 61 72 65 20 6e 6f 20 6c 6f 6e 67 65 72 20 69 6e 74 65 72 65 73 74 65 64 20 s.they.are.no.longer.interested.
11fa0 69 6e 2e 20 20 54 68 69 73 20 63 61 6e 20 61 6c 73 6f 20 62 65 0a 75 73 65 64 20 74 6f 20 72 65 in...This.can.also.be.used.to.re
11fc0 6d 6f 76 65 20 74 6f 70 69 63 73 20 6c 6f 63 61 6c 6c 79 2c 20 77 68 69 63 68 20 68 61 76 65 20 move.topics.locally,.which.have.
11fe0 61 6c 72 65 61 64 79 20 62 65 65 6e 20 72 65 6d 6f 76 65 64 20 6f 6e 20 74 68 65 0a 66 6f 72 67 already.been.removed.on.the.forg
12000 65 20 28 74 68 65 20 73 65 72 76 69 63 65 29 2e 20 20 46 6f 72 67 65 20 28 74 68 65 20 70 61 63 e.(the.service)...Forge.(the.pac
12020 6b 61 67 65 29 20 63 61 6e 6e 6f 74 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 64 65 74 65 63 kage).cannot.automatically.detec
12040 74 0a 77 68 65 6e 20 74 68 61 74 20 68 61 70 70 65 6e 73 2c 20 62 65 63 61 75 73 65 20 67 69 76 t.when.that.happens,.because.giv
12060 65 6e 20 68 6f 77 20 74 68 65 20 41 50 49 73 20 77 6f 72 6b 2c 20 74 68 69 73 20 77 6f 75 6c 64 en.how.the.APIs.work,.this.would
12080 20 62 65 20 74 6f 6f 0a 65 78 70 65 6e 73 69 76 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 .be.too.expensive."...(interacti
120a0 76 65 0a 20 20 20 28 6c 69 73 74 20 28 69 66 2d 6c 65 74 2a 20 28 28 74 6f 70 69 63 73 20 28 6d ve....(list.(if-let*.((topics.(m
120c0 61 67 69 74 2d 72 65 67 69 6f 6e 2d 76 61 6c 75 65 73 20 27 28 69 73 73 75 65 20 70 75 6c 6c 72 agit-region-values.'(issue.pullr
120e0 65 71 29 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 5f 28 6d 61 eq).t))....................(_(ma
12100 67 69 74 2d 63 6f 6e 66 69 72 6d 20 27 72 65 6d 6f 76 65 2d 74 6f 70 69 63 73 2d 6c 6f 63 61 6c git-confirm.'remove-topics-local
12120 6c 79 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 44 ly.nil........................"D
12140 65 6c 65 74 65 20 25 64 20 74 6f 70 69 63 73 20 6c 6f 63 61 6c 6c 79 22 20 6e 69 6c 0a 20 20 20 elete.%d.topics.locally".nil....
12160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 23 27 66 6f ....................(mapcar.#'fo
12180 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 6c 69 6e 65 20 74 6f 70 69 63 73 29 29 29 rge--format-topic-line.topics)))
121a0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 70 69 63 73 0a 20 20 20 20 20 20 20 20 20 20 )..............topics...........
121c0 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 20 22 44 65 6c 65 74 65 20 74 6f 70 69 63 .(forge-read-topic."Delete.topic
121e0 20 4c 4f 43 41 4c 4c 59 20 6f 6e 6c 79 22 29 29 29 29 0a 20 20 28 69 66 20 28 6c 69 73 74 70 20 .LOCALLY.only"))))...(if.(listp.
12200 74 6f 70 69 63 29 0a 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 6d 61 70 63 20 23 27 63 6c 6f 73 topic).......(progn.(mapc.#'clos
12220 71 6c 2d 64 65 6c 65 74 65 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 ql-delete.topic)..............(f
12240 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 28 73 65 74 71 20 orge-refresh-buffer)).....(setq.
12260 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 74 6f 70 69 63 29 29 0a 20 topic.(forge-get-topic.topic))..
12280 20 20 20 28 63 6c 6f 73 71 6c 2d 64 65 6c 65 74 65 20 74 6f 70 69 63 29 0a 20 20 20 20 28 69 66 ...(closql-delete.topic).....(if
122a0 20 28 61 6e 64 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 74 6f 70 .(and.(derived-mode-p.'forge-top
122c0 69 63 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 75 61 6c 20 28 6f 72 ic-mode)..............(equal.(or
122e0 65 66 20 74 6f 70 69 63 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ef.topic.id)....................
12300 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 20 69 64 29 29 29 0a .(oref.forge-buffer-topic.id))).
12320 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 ........(kill-buffer.(current-bu
12340 66 66 65 72 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 ffer)).......(forge-refresh-buff
12360 65 72 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f er))))..;;;###autoload.(defun.fo
12380 72 67 65 2d 72 65 73 65 74 2d 64 61 74 61 62 61 73 65 20 28 29 0a 20 20 22 4d 6f 76 65 20 74 68 rge-reset-database.()..."Move.th
123a0 65 20 63 75 72 72 65 6e 74 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 20 74 6f 20 74 68 65 20 74 e.current.database.file.to.the.t
123c0 72 61 73 68 2e 0a 54 68 69 73 20 69 73 20 75 73 65 66 75 6c 20 61 66 74 65 72 20 74 68 65 20 64 rash..This.is.useful.after.the.d
123e0 61 74 61 62 61 73 65 20 73 63 68 65 6d 65 20 68 61 73 20 63 68 61 6e 67 65 64 2c 20 77 68 69 63 atabase.scheme.has.changed,.whic
12400 68 20 77 69 6c 6c 0a 68 61 70 70 65 6e 20 61 20 66 65 77 20 74 69 6d 65 73 20 77 68 69 6c 65 20 h.will.happen.a.few.times.while.
12420 74 68 65 20 66 6f 72 67 65 20 66 75 6e 63 74 69 6f 6e 61 6c 69 74 79 20 69 73 20 73 74 69 6c 6c the.forge.functionality.is.still
12440 20 75 6e 64 65 72 0a 68 65 61 76 79 20 64 65 76 65 6c 6f 70 6d 65 6e 74 2e 22 0a 20 20 28 69 6e .under.heavy.development."...(in
12460 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 66 69 6c 65 2d 65 78 teractive)...(when.(and.(file-ex
12480 69 73 74 73 2d 70 20 66 6f 72 67 65 2d 64 61 74 61 62 61 73 65 2d 66 69 6c 65 29 0a 20 20 20 20 ists-p.forge-database-file).....
124a0 20 20 20 20 20 20 20 20 20 28 79 65 73 2d 6f 72 2d 6e 6f 2d 70 20 22 52 65 61 6c 6c 79 20 74 72 .........(yes-or-no-p."Really.tr
124c0 61 73 68 20 46 6f 72 67 65 27 73 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 3f 20 22 29 29 0a 20 ash.Forge's.database.file?."))..
124e0 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 64 62 20 28 66 6f 72 67 65 2d 64 62 20 74 29 29 29 ...(when-let.((db.(forge-db.t)))
12500 0a 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 2d 63 6c 6f 73 65 20 64 62 29 29 0a 20 20 20 20 28 .......(emacsql-close.db)).....(
12520 64 65 6c 65 74 65 2d 66 69 6c 65 20 66 6f 72 67 65 2d 64 61 74 61 62 61 73 65 2d 66 69 6c 65 20 delete-file.forge-database-file.
12540 74 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 0a t).....(forge-refresh-buffer))).
12560 0a 3b 3b 3b 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 .;;;.Miscellaneous..(defun.forge
12580 2d 6d 61 72 6b 2d 63 6f 6d 70 6c 65 74 65 64 2d 74 6f 70 69 63 73 2d 61 73 2d 64 6f 6e 65 20 28 -mark-completed-topics-as-done.(
125a0 29 0a 20 20 22 4d 61 72 6b 20 63 6f 6d 70 6c 65 74 65 64 20 74 6f 70 69 63 73 20 6f 66 20 74 68 )..."Mark.completed.topics.of.th
125c0 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 20 61 73 20 64 6f 6e 65 2e 0a 43 68 e.current.repository.as.done..Ch
125e0 61 6e 67 65 20 74 68 65 20 70 72 69 76 61 74 65 20 73 74 61 74 75 73 20 74 6f 20 5c 22 64 6f 6e ange.the.private.status.to.\"don
12600 65 5c 22 20 66 6f 72 20 74 6f 70 69 63 73 20 77 68 6f 73 65 20 70 72 69 76 61 74 65 20 73 74 61 e\".for.topics.whose.private.sta
12620 74 75 73 20 69 73 0a 5c 22 75 6e 72 65 61 64 5c 22 20 6f 72 20 5c 22 70 65 6e 64 69 6e 67 5c 22 tus.is.\"unread\".or.\"pending\"
12640 20 61 6e 64 20 77 68 6f 73 65 20 70 75 62 6c 69 63 20 73 74 61 74 65 20 69 73 20 5c 22 63 6f 6d .and.whose.public.state.is.\"com
12660 70 6c 65 74 65 64 5c 22 2e 0a 57 68 65 74 68 65 72 20 74 68 69 73 20 61 66 66 65 63 74 73 20 61 pleted\"..Whether.this.affects.a
12680 6c 6c 20 73 75 63 68 20 74 6f 70 69 63 73 20 6f 72 20 6f 6e 6c 79 20 61 6c 6c 20 73 75 63 68 20 ll.such.topics.or.only.all.such.
126a0 74 6f 70 69 63 73 20 6f 66 20 61 0a 63 65 72 74 61 69 6e 20 74 79 70 65 20 28 64 69 73 63 75 73 topics.of.a.certain.type.(discus
126c0 73 69 6f 6e 2c 20 69 73 73 75 65 20 6f 72 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 29 2c 20 64 65 sion,.issue.or.pull-request),.de
126e0 70 65 6e 64 73 20 6f 6e 20 74 68 65 0a 63 6f 6e 74 65 78 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 pends.on.the.context."...(intera
12700 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 74 79 70 65 20 28 66 6f 72 67 65 2d 63 75 72 ctive)...(let*.((type.(forge-cur
12720 72 65 6e 74 2d 74 6f 70 69 63 2d 74 79 70 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 73 63 rent-topic-type))..........(desc
12740 20 28 69 66 20 28 65 71 20 74 79 70 65 20 27 70 75 6c 6c 72 65 71 29 20 27 70 75 6c 6c 2d 72 65 .(if.(eq.type.'pullreq).'pull-re
12760 71 75 65 73 74 20 74 79 70 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 6f 70 69 63 73 20 28 66 quest.type))..........(topics.(f
12780 6f 72 67 65 2d 2d 6c 69 73 74 2d 74 6f 70 69 63 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 orge--list-topics...............
127a0 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 3a 74 79 70 65 20 74 79 ....(forge--topics-spec.:type.ty
127c0 70 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pe..............................
127e0 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 76 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 .........:active.nil............
12800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 74 61 74 ...........................:stat
12820 65 20 27 63 6c 6f 73 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e.'closed.......................
12840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 74 61 74 75 73 20 27 69 6e 62 6f 78 29 0a ................:status.'inbox).
12860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 ..................(forge-get-rep
12880 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 ository.:tracked)))).....(cond.(
128a0 28 6e 6f 74 20 74 6f 70 69 63 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 (not.topics)............(message
128c0 20 22 4e 6f 20 63 6f 6d 70 6c 65 74 65 64 20 25 73 20 74 68 61 74 20 63 6f 75 6c 64 20 62 65 20 ."No.completed.%s.that.could.be.
128e0 6d 61 72 6b 65 64 20 61 73 20 64 6f 6e 65 22 20 64 65 73 63 29 29 0a 20 20 20 20 20 20 20 20 20 marked.as.done".desc))..........
12900 20 28 28 6d 61 67 69 74 2d 63 6f 6e 66 69 72 6d 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .((magit-confirm.t..............
12920 22 4d 61 72 6b 20 5c 22 25 73 5c 22 20 61 73 20 64 6f 6e 65 22 0a 20 20 20 20 20 20 20 20 20 20 "Mark.\"%s\".as.done"...........
12940 20 20 20 28 66 6f 72 6d 61 74 20 22 4d 61 72 6b 20 25 25 64 20 25 73 73 20 61 73 20 64 6f 6e 65 ...(format."Mark.%%d.%ss.as.done
12960 22 20 64 65 73 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 0a 20 20 20 20 20 20 20 ".desc)..............nil........
12980 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 23 27 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f ......(mapcar.#'forge--format-to
129a0 70 69 63 2d 6c 69 6e 65 20 74 6f 70 69 63 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 6f pic-line.topics))............(do
129c0 6c 69 73 74 20 28 74 6f 70 69 63 20 74 6f 70 69 63 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 list.(topic.topics).............
129e0 20 28 6f 73 65 74 20 74 6f 70 69 63 20 73 74 61 74 75 73 20 27 64 6f 6e 65 29 29 0a 20 20 20 20 .(oset.topic.status.'done)).....
12a00 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 29 .......(forge-refresh-buffer))))
12a20 29 0a 0a 28 6d 61 67 69 74 2d 64 65 66 69 6e 65 2d 73 65 63 74 69 6f 6e 2d 6a 75 6d 70 65 72 20 )..(magit-define-section-jumper.
12a40 66 6f 72 67 65 2d 6a 75 6d 70 2d 74 6f 2d 70 75 6c 6c 72 65 71 73 20 22 50 75 6c 6c 20 72 65 71 forge-jump-to-pullreqs."Pull.req
12a60 75 65 73 74 73 22 20 70 75 6c 6c 72 65 71 73 29 0a 28 6d 61 67 69 74 2d 64 65 66 69 6e 65 2d 73 uests".pullreqs).(magit-define-s
12a80 65 63 74 69 6f 6e 2d 6a 75 6d 70 65 72 20 66 6f 72 67 65 2d 6a 75 6d 70 2d 74 6f 2d 69 73 73 75 ection-jumper.forge-jump-to-issu
12aa0 65 73 20 22 49 73 73 75 65 73 22 20 69 73 73 75 65 73 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f es."Issues".issues)..;;;._.;;.Lo
12ac0 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 cal.Variables:.;;.read-symbol-sh
12ae0 6f 72 74 68 61 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 20 orthands:.(.;;...("and$"........
12b00 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 ...."cond-let--and$").;;...("and
12b20 2d 6c 65 74 22 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 -let"........."cond-let--and-let
12b40 22 29 0a 3b 3b 20 20 20 28 22 69 66 2d 6c 65 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 ").;;...("if-let".........."cond
12b60 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 -let--if-let").;;...("when-let".
12b80 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 0a 3b 3b 20 ......."cond-let--when-let").;;.
12ba0 20 20 28 22 62 75 66 66 65 72 2d 73 74 72 69 6e 67 22 20 2e 20 22 62 75 66 66 65 72 2d 73 74 72 ..("buffer-string"..."buffer-str
12bc0 69 6e 67 22 29 0a 3b 3b 20 20 20 28 22 62 75 66 66 65 72 2d 73 74 72 22 20 20 20 20 2e 20 22 66 ing").;;...("buffer-str"......"f
12be0 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 orge--buffer-substring-no-proper
12c00 74 69 65 73 22 29 0a 3b 3b 20 20 20 28 22 70 61 72 74 69 61 6c 22 20 20 20 20 20 20 20 2e 20 22 ties").;;...("partial"........."
12c20 6c 6c 61 6d 61 2d 2d 6c 65 66 74 2d 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 22 29 29 0a 3b llama--left-apply-partially")).;
12c40 3b 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 29 ;.End:.(provide.'forge-commands)
12c60 0a 3b 3b 3b 20 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 .;;;.forge-commands.el.ends.here
12c80 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12e00 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 63 6f 72 65 2e 65 forge-20250916.1119/forge-core.e
12e20 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 l...............................
12e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12e60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
12e80 30 30 34 35 31 31 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 30 30 00 20 30 00 00 00 0045116.00000000000.014500..0...
12ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12f00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
12f20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
12f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
12fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
13000 3b 3b 3b 20 66 6f 72 67 65 2d 63 6f 72 65 2e 65 6c 20 2d 2d 2d 20 43 6f 72 65 20 66 75 6e 63 74 ;;;.forge-core.el.---.Core.funct
13020 69 6f 6e 61 6c 69 74 79 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 ionality..-*-.lexical-binding:t.
13040 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 -*-..;;.Copyright.(C).2018-2025.
13060 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 Jonas.Bernoulli..;;.Author:.Jona
13080 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 s.Bernoulli.<emacs.forge@jonas.b
130a0 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e ernoulli.dev>.;;.Maintainer:.Jon
130c0 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e as.Bernoulli.<emacs.forge@jonas.
130e0 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d bernoulli.dev>..;;.SPDX-License-
13100 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b Identifier:.GPL-3.0-or-later..;;
13120 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 .This.file.is.free.software:.you
13140 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 .can.redistribute.it.and/or.modi
13160 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 fy.;;.it.under.the.terms.of.the.
13180 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 GNU.General.Public.License.as.pu
131a0 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 blished.;;.by.the.Free.Software.
131c0 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 Foundation,.either.version.3.of.
131e0 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 the.License,.;;.or.(at.your.opti
13200 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 on).any.later.version..;;.;;.Thi
13220 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 s.file.is.distributed.in.the.hop
13240 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 e.that.it.will.be.useful,.;;.but
13260 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 .WITHOUT.ANY.WARRANTY;.without.e
13280 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d ven.the.implied.warranty.of.;;.M
132a0 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 ERCHANTABILITY.or.FITNESS.FOR.A.
132c0 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 PARTICULAR.PURPOSE...See.the.;;.
132e0 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d GNU.General.Public.License.for.m
13300 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 ore.details..;;.;;.You.should.ha
13320 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 ve.received.a.copy.of.the.GNU.Ge
13340 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 neral.Public.License.;;.along.wi
13360 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 th.this.file...If.not,.see.<http
13380 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b s://www.gnu.org/licenses/>...;;;
133a0 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 6d 61 67 69 74 29 0a 0a 28 72 65 71 75 69 .Code:..(require.'magit)..(requi
133c0 72 65 20 27 63 6c 2d 6c 69 62 29 0a 28 72 65 71 75 69 72 65 20 27 63 6f 6d 70 61 74 29 0a 28 72 re.'cl-lib).(require.'compat).(r
133e0 65 71 75 69 72 65 20 27 63 6f 6e 64 2d 6c 65 74 29 0a 28 72 65 71 75 69 72 65 20 27 65 69 65 69 equire.'cond-let).(require.'eiei
13400 6f 29 0a 28 72 65 71 75 69 72 65 20 27 6c 6c 61 6d 61 29 0a 28 72 65 71 75 69 72 65 20 27 73 65 o).(require.'llama).(require.'se
13420 71 29 0a 28 72 65 71 75 69 72 65 20 27 73 75 62 72 2d 78 29 0a 0a 28 72 65 71 75 69 72 65 20 27 q).(require.'subr-x)..(require.'
13440 74 72 61 6e 73 69 65 6e 74 29 0a 0a 28 72 65 71 75 69 72 65 20 27 67 68 75 62 2d 67 72 61 70 68 transient)..(require.'ghub-graph
13460 71 6c 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 64 62 29 0a 0a 28 65 76 61 6c 2d 77 ql).(require.'forge-db)..(eval-w
13480 68 65 6e 2d 63 6f 6d 70 69 6c 65 0a 20 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 27 66 6f 72 67 65 hen-compile...(cl-pushnew.'forge
134a0 2d 69 64 20 65 69 65 69 6f 2d 2d 6b 6e 6f 77 6e 2d 73 6c 6f 74 2d 6e 61 6d 65 73 29 0a 20 20 28 -id.eieio--known-slot-names)...(
134c0 63 6c 2d 70 75 73 68 6e 65 77 20 27 6e 75 6d 62 65 72 20 20 20 65 69 65 69 6f 2d 2d 6b 6e 6f 77 cl-pushnew.'number...eieio--know
134e0 6e 2d 73 6c 6f 74 2d 6e 61 6d 65 73 29 0a 20 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 27 6f 77 6e n-slot-names)...(cl-pushnew.'own
13500 65 72 20 20 20 20 65 69 65 69 6f 2d 2d 6b 6e 6f 77 6e 2d 73 6c 6f 74 2d 6e 61 6d 65 73 29 0a 20 er....eieio--known-slot-names)..
13520 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 27 74 68 65 69 72 2d 69 64 20 65 69 65 69 6f 2d 2d 6b 6e .(cl-pushnew.'their-id.eieio--kn
13540 6f 77 6e 2d 73 6c 6f 74 2d 6e 61 6d 65 73 29 29 0a 0a 3b 3b 3b 20 4f 70 74 69 6f 6e 73 0a 0a 28 own-slot-names))..;;;.Options..(
13560 64 65 66 67 72 6f 75 70 20 66 6f 72 67 65 20 6e 69 6c 0a 20 20 22 4f 70 74 69 6f 6e 73 20 63 6f defgroup.forge.nil..."Options.co
13580 6e 63 65 72 6e 69 6e 67 20 47 69 74 20 66 6f 72 67 65 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 ncerning.Git.forges."...:group.'
135a0 6d 61 67 69 74 29 0a 0a 28 64 65 66 67 72 6f 75 70 20 66 6f 72 67 65 2d 66 61 63 65 73 20 6e 69 magit)..(defgroup.forge-faces.ni
135c0 6c 0a 20 20 22 46 61 63 65 73 20 63 6f 6e 63 65 72 6e 69 6e 67 20 47 69 74 20 66 6f 72 67 65 73 l..."Faces.concerning.Git.forges
135e0 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 67 72 6f 75 70 20 27 6d 61 67 ."...:group.'forge...:group.'mag
13600 69 74 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 61 6c 69 73 it-faces)..(defcustom.forge-alis
13620 74 0a 20 20 27 28 3b 3b 20 46 6f 72 67 65 73 0a 20 20 20 20 28 22 67 69 74 68 75 62 2e 63 6f 6d t...'(;;.Forges.....("github.com
13640 22 20 22 61 70 69 2e 67 69 74 68 75 62 2e 63 6f 6d 22 0a 20 20 20 20 20 22 67 69 74 68 75 62 2e "."api.github.com"......"github.
13660 63 6f 6d 22 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 com".forge-github-repository)...
13680 20 20 28 22 73 73 68 2e 67 69 74 68 75 62 2e 63 6f 6d 22 20 22 61 70 69 2e 67 69 74 68 75 62 2e ..("ssh.github.com"."api.github.
136a0 63 6f 6d 22 0a 20 20 20 20 20 22 67 69 74 68 75 62 2e 63 6f 6d 22 20 66 6f 72 67 65 2d 67 69 74 com"......"github.com".forge-git
136c0 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 28 22 67 69 74 6c 61 62 2e 63 6f 6d hub-repository).....("gitlab.com
136e0 22 20 22 67 69 74 6c 61 62 2e 63 6f 6d 2f 61 70 69 2f 76 34 22 0a 20 20 20 20 20 22 67 69 74 6c "."gitlab.com/api/v4"......"gitl
13700 61 62 2e 63 6f 6d 22 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 ab.com".forge-gitlab-repository)
13720 0a 20 20 20 20 28 22 73 61 6c 73 61 2e 64 65 62 69 61 6e 2e 6f 72 67 22 20 22 73 61 6c 73 61 2e .....("salsa.debian.org"."salsa.
13740 64 65 62 69 61 6e 2e 6f 72 67 2f 61 70 69 2f 76 34 22 0a 20 20 20 20 20 22 73 61 6c 73 61 2e 64 debian.org/api/v4"......"salsa.d
13760 65 62 69 61 6e 2e 6f 72 67 22 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f ebian.org".forge-gitlab-reposito
13780 72 79 29 0a 20 20 20 20 28 22 66 72 61 6d 61 67 69 74 2e 6f 72 67 22 20 22 66 72 61 6d 61 67 69 ry).....("framagit.org"."framagi
137a0 74 2e 6f 72 67 2f 61 70 69 2f 76 34 22 0a 20 20 20 20 20 22 66 72 61 6d 61 67 69 74 2e 6f 72 67 t.org/api/v4"......"framagit.org
137c0 22 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 28 ".forge-gitlab-repository).....(
137e0 22 67 69 74 6c 61 62 2e 67 6e 6f 6d 65 2e 6f 72 67 22 20 22 67 69 74 6c 61 62 2e 67 6e 6f 6d 65 "gitlab.gnome.org"."gitlab.gnome
13800 2e 6f 72 67 2f 61 70 69 2f 76 34 22 0a 20 20 20 20 20 22 67 69 74 6c 61 62 2e 67 6e 6f 6d 65 2e .org/api/v4"......"gitlab.gnome.
13820 6f 72 67 22 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 org".forge-gitlab-repository)...
13840 20 20 3b 3b 20 46 6f 72 67 65 73 20 28 41 50 49 20 75 6e 73 75 70 70 6f 72 74 65 64 29 0a 20 20 ..;;.Forges.(API.unsupported)...
13860 20 20 28 22 63 6f 64 65 62 65 72 67 2e 6f 72 67 22 20 22 63 6f 64 65 62 65 72 67 2e 6f 72 67 2f ..("codeberg.org"."codeberg.org/
13880 61 70 69 2f 76 31 22 0a 20 20 20 20 20 22 63 6f 64 65 62 65 72 67 2e 6f 72 67 22 20 66 6f 72 67 api/v1"......"codeberg.org".forg
138a0 65 2d 66 6f 72 67 65 6a 6f 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 28 22 62 69 74 62 e-forgejo-repository).....("bitb
138c0 75 63 6b 65 74 2e 6f 72 67 22 20 22 61 70 69 2e 62 69 74 62 75 63 6b 65 74 2e 6f 72 67 2f 32 2e ucket.org"."api.bitbucket.org/2.
138e0 30 22 0a 20 20 20 20 20 22 62 69 74 62 75 63 6b 65 74 2e 6f 72 67 22 20 66 6f 72 67 65 2d 62 69 0"......"bitbucket.org".forge-bi
13900 74 62 75 63 6b 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 3b 3b 20 53 65 6d 69 2d tbucket-repository).....;;.Semi-
13920 46 6f 72 67 65 73 0a 20 20 20 20 28 22 67 69 74 2e 73 61 76 61 6e 6e 61 68 2e 67 6e 75 2e 6f 72 Forges.....("git.savannah.gnu.or
13940 67 22 20 6e 69 6c 0a 20 20 20 20 20 22 67 69 74 2e 73 61 76 61 6e 6e 61 68 2e 67 6e 75 2e 6f 72 g".nil......"git.savannah.gnu.or
13960 67 22 20 66 6f 72 67 65 2d 63 67 69 74 2a 2a 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 g".forge-cgit**-repository).....
13980 28 22 67 69 74 2e 6b 65 72 6e 65 6c 2e 6f 72 67 22 20 6e 69 6c 0a 20 20 20 20 20 22 67 69 74 2e ("git.kernel.org".nil......"git.
139a0 6b 65 72 6e 65 6c 2e 6f 72 67 22 20 66 6f 72 67 65 2d 63 67 69 74 2d 72 65 70 6f 73 69 74 6f 72 kernel.org".forge-cgit-repositor
139c0 79 29 0a 20 20 20 20 28 22 72 65 70 6f 2e 6f 72 2e 63 7a 22 20 6e 69 6c 0a 20 20 20 20 20 22 72 y).....("repo.or.cz".nil......"r
139e0 65 70 6f 2e 6f 72 2e 63 7a 22 20 66 6f 72 67 65 2d 72 65 70 6f 6f 72 63 7a 2d 72 65 70 6f 73 69 epo.or.cz".forge-repoorcz-reposi
13a00 74 6f 72 79 29 0a 20 20 20 20 28 22 67 69 74 2e 73 75 63 6b 6c 65 73 73 2e 6f 72 67 22 20 6e 69 tory).....("git.suckless.org".ni
13a20 6c 0a 20 20 20 20 20 22 67 69 74 2e 73 75 63 6b 6c 65 73 73 2e 6f 72 67 22 20 66 6f 72 67 65 2d l......"git.suckless.org".forge-
13a40 73 74 61 67 69 74 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 28 22 67 69 74 2e 73 72 2e stagit-repository).....("git.sr.
13a60 68 74 22 20 6e 69 6c 0a 20 20 20 20 20 22 67 69 74 2e 73 72 2e 68 74 22 20 66 6f 72 67 65 2d 73 ht".nil......"git.sr.ht".forge-s
13a80 72 68 74 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 0a 20 20 22 4c 69 73 74 20 6f 66 20 47 69 74 20 rht-repository))..."List.of.Git.
13aa0 66 6f 72 67 65 73 2e 0a 0a 45 61 63 68 20 65 6e 74 72 79 20 68 61 73 20 74 68 65 20 66 6f 72 6d forges...Each.entry.has.the.form
13ac0 20 28 47 49 54 48 4f 53 54 20 41 50 49 48 4f 53 54 20 57 45 42 48 4f 53 54 20 43 4c 41 53 53 29 .(GITHOST.APIHOST.WEBHOST.CLASS)
13ae0 2e 0a 0a 2d 20 47 49 54 48 4f 53 54 20 69 73 20 74 68 65 20 68 6f 73 74 20 75 73 65 64 20 74 6f ...-.GITHOST.is.the.host.used.to
13b00 20 61 63 63 65 73 73 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 6f 6e 20 74 68 65 20 66 6f 72 67 .access.repositories.on.the.forg
13b20 65 20 75 73 69 6e 67 0a 20 20 47 69 74 2e 0a 0a 2d 20 41 50 49 48 4f 53 54 20 69 73 20 74 68 65 e.using...Git...-.APIHOST.is.the
13b40 20 68 6f 73 74 20 75 73 65 64 20 74 6f 20 61 63 63 65 73 73 20 74 68 65 20 66 6f 72 67 65 27 73 .host.used.to.access.the.forge's
13b60 20 41 50 49 2e 20 20 46 6f 72 20 73 6f 6d 65 20 66 6f 72 67 65 73 0a 20 20 74 68 65 20 69 73 6e .API...For.some.forges...the.isn
13b80 27 74 20 6a 75 73 74 20 61 20 68 6f 73 74 2c 20 62 75 74 20 61 20 68 6f 73 74 20 66 6f 6c 6c 6f 't.just.a.host,.but.a.host.follo
13ba0 77 65 64 20 62 79 20 74 68 65 20 70 61 74 68 20 74 6f 20 74 68 65 20 41 50 49 27 73 0a 20 20 65 wed.by.the.path.to.the.API's...e
13bc0 6e 64 70 6f 69 6e 74 2e 0a 0a 2d 20 57 45 42 48 4f 53 54 20 69 73 20 74 68 65 20 68 6f 73 74 20 ndpoint...-.WEBHOST.is.the.host.
13be0 75 73 65 64 20 74 6f 20 61 63 63 65 73 73 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 6f 6e 20 74 used.to.access.repositories.on.t
13c00 68 69 73 20 66 6f 72 67 65 20 75 73 69 6e 67 0a 20 20 61 20 62 72 6f 77 73 65 72 2e 20 20 54 68 his.forge.using...a.browser...Th
13c20 65 20 49 44 73 20 75 73 65 64 20 74 6f 20 69 64 65 6e 74 69 66 79 20 72 65 70 6f 73 69 74 6f 72 e.IDs.used.to.identify.repositor
13c40 69 65 73 20 66 72 6f 6d 20 74 68 65 20 66 6f 72 67 65 20 69 6e 0a 20 20 74 68 65 20 6c 6f 63 61 ies.from.the.forge.in...the.loca
13c60 6c 20 64 61 74 61 62 61 73 65 20 61 6c 73 6f 20 64 65 72 69 76 65 73 20 66 72 6f 6d 20 74 68 69 l.database.also.derives.from.thi
13c80 73 20 76 61 6c 75 65 2e 0a 0a 2d 20 43 4c 41 53 53 20 69 73 20 74 68 65 20 63 6c 61 73 73 20 74 s.value...-.CLASS.is.the.class.t
13ca0 6f 20 62 65 20 75 73 65 64 20 66 6f 72 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 66 72 6f 6d 20 o.be.used.for.repositories.from.
13cc0 74 68 65 20 66 6f 72 67 65 2e 0a 0a 43 6f 6d 70 6c 69 63 61 74 69 6f 6e 73 3a 0a 0a 2d 20 57 68 the.forge...Complications:..-.Wh
13ce0 65 6e 20 63 6f 6e 6e 65 63 74 69 6e 67 20 74 6f 20 61 20 47 69 74 68 75 62 20 45 6e 74 65 72 70 en.connecting.to.a.Github.Enterp
13d00 72 69 73 65 20 65 64 69 74 69 6f 6e 20 77 68 6f 73 65 20 52 45 53 54 20 41 50 49 27 73 0a 20 20 rise.edition.whose.REST.API's...
13d20 65 6e 64 20 70 6f 69 6e 74 20 69 73 20 5c 22 3c 68 6f 73 74 3e 2f 76 33 5c 22 20 61 6e 64 20 77 end.point.is.\"<host>/v3\".and.w
13d40 68 6f 73 65 20 47 72 61 70 68 51 4c 20 41 50 49 27 73 20 65 6e 64 20 70 6f 69 6e 74 20 69 73 0a hose.GraphQL.API's.end.point.is.
13d60 20 20 5c 22 3c 68 6f 73 74 3e 2f 67 72 61 70 68 71 6c 5c 22 2c 20 74 68 65 6e 20 75 73 65 20 5c ..\"<host>/graphql\",.then.use.\
13d80 22 3c 68 6f 73 74 3e 2f 76 33 5c 22 20 61 73 20 41 50 49 48 4f 53 54 2e 20 20 54 68 69 73 20 69 "<host>/v3\".as.APIHOST...This.i
13da0 73 20 61 0a 20 20 68 69 73 74 6f 72 69 63 20 61 63 63 69 64 65 6e 74 2e 20 20 53 65 65 20 69 73 s.a...historic.accident...See.is
13dc0 73 75 65 20 23 31 37 34 2e 0a 0a 2d 20 57 45 42 48 4f 53 54 20 61 6e 64 20 43 4c 41 53 53 20 63 sue.#174...-.WEBHOST.and.CLASS.c
13de0 61 6e 6e 6f 74 20 62 65 20 63 68 61 6e 67 65 64 20 6f 6e 63 65 20 79 6f 75 20 68 61 76 65 20 61 annot.be.changed.once.you.have.a
13e00 64 64 65 64 20 6f 6e 65 20 6f 72 0a 20 20 6d 6f 72 65 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 dded.one.or...more.repositories.
13e20 66 72 6f 6d 20 61 20 66 6f 72 67 65 2e 20 20 43 68 61 6e 67 69 6e 67 20 47 49 54 48 4f 53 54 20 from.a.forge...Changing.GITHOST.
13e40 61 6e 64 2f 6f 72 20 41 50 49 48 4f 53 54 0a 20 20 6d 61 79 20 62 65 20 70 6f 73 73 69 62 6c 65 and/or.APIHOST...may.be.possible
13e60 2c 20 62 75 74 20 73 68 6f 75 6c 64 20 73 65 6c 64 6f 6d 20 62 65 20 6e 65 63 65 73 73 61 72 79 ,.but.should.seldom.be.necessary
13e80 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 ."...:package-version.'(forge...
13ea0 22 30 2e 34 2e 37 22 29 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 "0.4.7")...:group.'forge...:type
13ec0 20 27 28 72 65 70 65 61 74 20 28 6c 69 73 74 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 47 69 .'(repeat.(list.(string.:tag."Gi
13ee0 74 20 68 6f 73 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.host")........................
13f00 28 63 68 6f 69 63 65 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 41 50 49 20 65 6e 64 70 6f 69 (choice.(string.:tag."API.endpoi
13f20 6e 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nt")............................
13f40 20 20 20 20 28 63 6f 6e 73 74 20 20 3a 74 61 67 20 22 4e 6f 20 41 50 49 22 20 6e 69 6c 29 29 0a ....(const..:tag."No.API".nil)).
13f60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 20 3a .......................(string.:
13f80 74 61 67 20 22 49 44 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tag."ID").......................
13fa0 20 28 73 79 6d 62 6f 6c 20 3a 74 61 67 20 22 52 65 70 6f 73 69 74 6f 72 79 20 63 6c 61 73 73 22 .(symbol.:tag."Repository.class"
13fc0 29 29 29 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 ))))..;;;.Class..(defclass.forge
13fe0 2d 6f 62 6a 65 63 74 20 28 63 6c 6f 73 71 6c 2d 6f 62 6a 65 63 74 29 20 28 29 20 3a 61 62 73 74 -object.(closql-object).().:abst
14000 72 61 63 74 20 74 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 66 6f 72 67 65 2d 2d 63 68 69 6c 64 70 ract.t)..(defmacro.forge--childp
14020 20 28 6f 62 6a 20 74 79 70 65 29 0a 20 20 22 53 6f 6d 65 77 68 61 74 20 73 69 6d 69 6c 61 72 20 .(obj.type)..."Somewhat.similar.
14040 74 6f 20 60 63 6c 2d 74 79 70 65 70 27 20 62 75 74 20 6f 6e 6c 79 20 66 6f 72 20 28 70 6f 73 73 to.`cl-typep'.but.only.for.(poss
14060 69 62 6c 79 20 75 6e 6b 6e 6f 77 6e 29 20 63 6c 61 73 73 65 73 2e 0a 54 59 50 45 20 69 73 20 65 ibly.unknown).classes..TYPE.is.e
14080 76 61 6c 75 61 74 65 64 20 61 74 20 6d 61 63 72 6f 2d 65 78 70 61 6e 73 69 6f 6e 20 74 69 6d 65 valuated.at.macro-expansion.time
140a0 20 62 75 74 2c 20 75 6e 6c 69 6b 65 20 77 69 74 68 0a 60 63 6c 2d 74 79 70 65 70 27 2c 20 74 68 .but,.unlike.with.`cl-typep',.th
140c0 65 20 72 65 73 70 65 63 74 69 76 65 20 63 6c 61 73 73 20 64 6f 65 73 20 6e 6f 74 20 68 61 76 65 e.respective.class.does.not.have
140e0 20 74 6f 20 62 65 20 64 65 66 69 6e 65 64 0a 61 74 20 74 68 61 74 20 74 69 6d 65 2e 22 0a 20 20 .to.be.defined.at.that.time."...
14100 28 6c 65 74 20 28 28 66 6e 20 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 28 73 79 6d 62 6f (let.((fn.(intern.(concat.(symbo
14120 6c 2d 6e 61 6d 65 20 28 65 76 61 6c 20 74 79 70 65 29 29 20 22 2d 2d 65 69 65 69 6f 2d 63 68 69 l-name.(eval.type))."--eieio-chi
14140 6c 64 70 22 29 29 29 29 0a 20 20 20 20 60 28 61 6e 64 20 28 66 62 6f 75 6e 64 70 20 27 2c 66 6e ldp")))).....`(and.(fboundp.',fn
14160 29 20 28 2c 66 6e 20 2c 6f 62 6a 29 29 29 29 0a 0a 3b 3b 3b 20 51 75 65 72 79 0a 0a 28 63 6c 2d ).(,fn.,obj))))..;;;.Query..(cl-
14180 64 65 66 67 65 6e 65 72 69 63 20 66 6f 72 67 65 2d 67 65 74 2d 70 61 72 65 6e 74 20 28 6f 62 6a defgeneric.forge-get-parent.(obj
141a0 65 63 74 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 70 61 72 65 6e 74 20 6f 62 6a 65 63 74 ect)..."Return.the.parent.object
141c0 20 6f 66 20 4f 42 4a 45 43 54 2e 0a 54 68 65 20 68 69 65 72 61 72 63 68 79 20 69 73 20 72 65 70 .of.OBJECT..The.hierarchy.is.rep
141e0 6f 73 69 74 6f 72 79 20 3e 20 74 6f 70 69 63 20 3e 20 70 6f 73 74 2e 0a 46 6f 72 20 6f 74 68 65 ository.>.topic.>.post..For.othe
14200 72 20 6f 62 6a 65 63 74 73 20 72 65 74 75 72 6e 20 6e 69 6c 2e 22 29 0a 0a 28 63 6c 2d 64 65 66 r.objects.return.nil.")..(cl-def
14220 67 65 6e 65 72 69 63 20 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 64 65 generic.forge-get-repository.(de
14240 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 66 6f 72 67 65 20 72 65 70 6f 73 69 74 6f mand)..."Return.a.forge.reposito
14260 72 79 20 6f 62 6a 65 63 74 20 6f 72 20 6e 69 6c 2c 20 6f 72 20 73 69 67 6e 61 6c 20 61 6e 20 65 ry.object.or.nil,.or.signal.an.e
14280 72 72 6f 72 2e 0a 0a 41 20 66 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 20 69 73 20 61 20 72 rror...A.forge.repository.is.a.r
142a0 65 70 6f 73 69 74 6f 72 79 20 68 6f 73 74 65 64 20 6f 6e 20 61 20 66 6f 72 67 65 2e 20 20 54 68 epository.hosted.on.a.forge...Th
142c0 65 20 6c 6f 63 61 6c 20 63 6c 6f 6e 65 0a 69 73 20 61 6c 73 6f 20 61 20 5c 22 72 65 70 6f 73 69 e.local.clone.is.also.a.\"reposi
142e0 74 6f 72 79 5c 22 2c 20 62 75 74 20 69 74 20 69 73 20 61 20 5c 22 47 69 74 5c 22 20 72 65 70 6f tory\",.but.it.is.a.\"Git\".repo
14300 73 69 74 6f 72 79 2c 20 6e 6f 74 20 61 20 5c 22 46 6f 72 67 65 5c 22 0a 72 65 70 6f 73 69 74 6f sitory,.not.a.\"Forge\".reposito
14320 72 79 2e 20 20 28 46 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 61 6c 73 ry...(Forge.repositories.are.als
14340 6f 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2c 20 62 75 74 20 6e 6f 74 20 74 68 65 0a o.Git.repositories,.but.not.the.
14360 6f 74 68 65 72 20 77 61 79 20 61 72 6f 75 6e 64 2e 29 0a 0a 41 20 60 3a 6b 6e 6f 77 6e 27 20 72 other.way.around.)..A.`:known'.r
14380 65 70 6f 73 69 74 6f 72 79 20 68 61 73 20 61 6e 20 65 6e 74 72 79 20 69 6e 20 74 68 65 20 6c 6f epository.has.an.entry.in.the.lo
143a0 63 61 6c 20 64 61 74 61 62 61 73 65 2e 20 20 41 6c 6c 20 6f 74 68 65 72 0a 72 65 70 6f 73 69 74 cal.database...All.other.reposit
143c0 6f 72 69 65 73 20 61 72 65 20 75 6e 6b 6e 6f 77 6e 2e 20 20 60 3a 6b 6e 6f 77 6e 27 20 72 65 70 ories.are.unknown...`:known'.rep
143e0 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 64 69 76 69 64 65 64 20 69 6e 74 6f 20 74 77 6f 0a 73 ositories.are.divided.into.two.s
14400 75 62 67 72 6f 75 70 73 3a 20 60 3a 74 72 61 63 6b 65 64 27 20 61 6e 64 20 5c 22 75 6e 74 72 61 ubgroups:.`:tracked'.and.\"untra
14420 63 6b 65 64 5c 22 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 0a 0a 41 20 60 3a 74 72 61 63 6b 65 cked\".repositories...A.`:tracke
14440 64 27 20 72 65 70 6f 73 69 74 6f 72 79 20 77 61 73 20 70 72 65 76 69 6f 75 73 6c 79 20 65 78 70 d'.repository.was.previously.exp
14460 6c 69 63 69 74 6c 79 20 61 64 64 65 64 20 74 6f 20 74 68 65 20 64 61 74 61 62 61 73 65 0a 62 79 licitly.added.to.the.database.by
14480 20 74 68 65 20 75 73 65 72 2e 0a 0a 57 68 65 6e 20 46 6f 72 67 65 20 65 6e 63 6f 75 6e 74 65 72 .the.user...When.Forge.encounter
144a0 73 20 61 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 77 69 74 68 6f 75 74 20 62 65 69 6e 67 20 69 6e s.a.repository,.without.being.in
144c0 73 74 72 75 63 74 65 64 20 62 79 20 74 68 65 20 75 73 65 72 0a 74 6f 20 74 72 61 63 6b 20 69 74 structed.by.the.user.to.track.it
144e0 2c 20 69 74 20 6d 61 79 20 6e 65 76 65 72 74 68 65 6c 65 73 73 20 61 64 64 20 6c 69 6d 69 74 65 ,.it.may.nevertheless.add.limite
14500 64 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 69 74 20 74 6f 20 74 68 65 0a 64 61 d.information.about.it.to.the.da
14520 74 61 62 61 73 65 2e 20 20 53 75 63 68 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 69 73 20 60 3a tabase...Such.a.repository.is.`:
14540 6b 6e 6f 77 6e 27 20 62 75 74 20 69 74 20 69 73 20 6e 6f 74 20 60 3a 74 72 61 63 6b 65 64 27 2e known'.but.it.is.not.`:tracked'.
14560 0a 0a 4f 74 68 65 72 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 5c 22 75 6e 6b 6e 6f ..Other.repositories.are.\"unkno
14580 77 6e 5c 22 2e 20 20 4d 6f 73 74 20 63 6f 6d 6d 61 6e 64 73 20 63 61 6e 20 6f 6e 6c 79 20 64 65 wn\"...Most.commands.can.only.de
145a0 61 6c 20 77 69 74 68 0a 72 65 70 6f 73 69 74 6f 72 69 65 73 20 74 68 61 74 20 61 72 65 20 73 74 al.with.repositories.that.are.st
145c0 6f 72 65 64 20 69 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 20 20 4f 66 20 74 68 65 73 65 2c ored.in.the.database...Of.these,
145e0 20 73 6f 6d 65 20 63 61 6e 20 64 65 61 6c 0a 77 69 74 68 20 61 6e 79 20 60 3a 6b 6e 6f 77 6e 27 .some.can.deal.with.any.`:known'
14600 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2c 20 6f 74 68 65 72 73 20 72 65 71 75 69 72 65 20 74 68 .repositories,.others.require.th
14620 61 74 20 74 68 65 79 20 61 72 65 20 60 3a 74 72 61 63 6b 65 64 27 2e 0a 0a 53 6f 6d 65 20 6f 74 at.they.are.`:tracked'...Some.ot
14640 68 65 72 20 63 6f 6d 6d 61 6e 64 73 20 65 78 69 73 74 20 e2 80 94 20 73 75 63 68 20 61 73 20 74 her.commands.exist.....such.as.t
14660 68 65 20 62 72 6f 77 73 65 20 63 6f 6d 6d 61 6e 64 73 20 e2 80 94 20 74 68 61 74 20 68 61 76 65 he.browse.commands.....that.have
14680 20 6e 6f 0a 73 75 63 68 20 72 65 71 75 69 72 65 6d 65 6e 74 2e 20 20 57 68 69 6c 65 20 73 75 63 .no.such.requirement...While.suc
146a0 68 20 63 6f 6d 6d 61 6e 64 73 20 61 6c 73 6f 20 72 65 71 75 69 72 65 20 61 20 72 65 70 6f 73 69 h.commands.also.require.a.reposi
146c0 74 6f 72 79 20 6f 62 6a 65 63 74 2c 0a 74 68 65 79 20 64 6f 20 6e 6f 74 20 63 61 72 65 20 77 68 tory.object,.they.do.not.care.wh
146e0 65 74 68 65 72 20 74 68 61 74 20 69 73 20 73 74 6f 72 65 64 20 69 6e 20 74 68 65 20 64 61 74 61 ether.that.is.stored.in.the.data
14700 62 61 73 65 2e 20 20 49 6e 73 74 65 61 64 20 74 68 65 79 0a 61 72 65 20 68 61 70 70 79 20 74 6f base...Instead.they.are.happy.to
14720 20 75 73 65 20 61 20 60 3a 73 74 75 62 27 20 72 65 70 6f 73 69 74 6f 72 79 3b 20 61 20 72 65 70 .use.a.`:stub'.repository;.a.rep
14740 6f 73 69 74 6f 72 79 20 74 68 61 74 20 69 73 20 6e 6f 74 20 73 74 6f 72 65 64 0a 69 6e 20 74 68 ository.that.is.not.stored.in.th
14760 65 20 64 61 74 61 62 61 73 65 2e 0a 0a 54 68 65 20 44 45 4d 41 4e 44 20 61 72 67 75 6d 65 6e 74 e.database...The.DEMAND.argument
14780 20 73 70 65 63 69 66 69 65 73 20 77 68 61 74 20 6b 69 6e 64 20 6f 66 20 72 65 70 6f 73 69 74 6f .specifies.what.kind.of.reposito
147a0 72 79 20 6f 62 6a 65 63 74 20 74 68 65 20 63 61 6c 6c 65 72 0a 72 65 71 75 69 72 65 73 2c 20 61 ry.object.the.caller.requires,.a
147c0 74 20 6c 65 61 73 74 2e 20 20 60 3a 74 72 61 63 6b 65 64 27 20 69 73 20 67 72 65 61 74 65 72 20 t.least...`:tracked'.is.greater.
147e0 74 68 61 6e 20 60 3a 6b 6e 6f 77 6e 27 2c 20 77 68 69 63 68 20 69 73 0a 67 72 65 61 74 65 72 20 than.`:known',.which.is.greater.
14800 74 68 61 6e 20 60 3a 73 74 75 62 27 2e 20 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c 20 69 66 20 74 than.`:stub'...For.example,.if.t
14820 68 65 20 63 61 6c 6c 65 72 20 72 65 71 75 65 73 74 73 20 61 20 60 3a 6b 6e 6f 77 6e 27 0a 72 65 he.caller.requests.a.`:known'.re
14840 70 6f 73 69 74 6f 72 79 2c 20 61 20 60 3a 74 72 61 63 6b 65 64 27 20 72 65 70 6f 73 69 74 6f 72 pository,.a.`:tracked'.repositor
14860 79 20 77 69 6c 6c 20 64 6f 2c 20 77 68 69 6c 65 20 61 20 60 3a 73 74 75 62 27 20 72 65 70 6f 73 y.will.do,.while.a.`:stub'.repos
14880 69 74 6f 72 79 0a 77 69 6c 6c 20 6e 6f 74 2e 0a 0a 54 68 65 20 76 61 6c 69 64 20 76 61 6c 75 65 itory.will.not...The.valid.value
148a0 73 20 66 6f 72 20 44 45 4d 41 4e 44 20 61 72 65 3a 0a 0a 2d 20 60 3a 74 72 61 63 6b 65 64 27 20 s.for.DEMAND.are:..-.`:tracked'.
148c0 61 6e 64 20 60 3a 74 72 61 63 6b 65 64 3f 27 20 72 65 71 75 65 73 74 20 61 20 72 65 70 6f 73 69 and.`:tracked?'.request.a.reposi
148e0 74 6f 72 79 20 74 68 61 74 20 74 68 65 20 75 73 65 72 20 61 64 64 65 64 0a 20 20 74 6f 20 74 68 tory.that.the.user.added...to.th
14900 65 20 64 61 74 61 62 61 73 65 2e 20 20 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 e.database...If.there.is.no.such
14920 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 74 68 65 20 66 6f 72 6d 65 72 20 63 61 75 73 65 73 0a 20 .repository,.the.former.causes..
14940 20 61 6e 20 65 72 72 6f 72 20 74 6f 20 62 65 20 73 69 67 6e 61 6c 65 64 2c 20 77 68 69 6c 65 20 .an.error.to.be.signaled,.while.
14960 66 6f 72 20 74 68 65 20 6c 61 74 74 65 72 20 6e 69 6c 20 69 73 20 72 65 74 75 72 6e 65 64 2e 0a for.the.latter.nil.is.returned..
14980 0a 2d 20 60 3a 6b 6e 6f 77 6e 3f 27 20 61 6e 64 20 60 3a 69 6e 73 65 72 74 21 27 20 72 65 71 75 .-.`:known?'.and.`:insert!'.requ
149a0 65 73 74 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 66 72 6f 6d 20 74 68 65 20 64 61 74 61 62 61 est.a.repository.from.the.databa
149c0 73 65 2e 0a 20 20 57 68 65 74 68 65 72 20 74 68 65 20 75 73 65 72 20 65 78 70 6c 69 63 69 74 6c se....Whether.the.user.explicitl
149e0 79 20 61 64 64 65 64 20 69 74 20 64 6f 65 73 20 6e 6f 74 20 6d 61 74 74 65 72 2e 20 20 49 66 20 y.added.it.does.not.matter...If.
14a00 74 68 65 72 65 20 69 73 20 6e 6f 0a 20 20 73 75 63 68 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 6e there.is.no...such.repository,.n
14a20 69 6c 20 69 73 20 72 65 74 75 72 6e 65 64 20 66 6f 72 20 74 68 65 20 66 6f 72 6d 65 72 2c 20 77 il.is.returned.for.the.former,.w
14a40 68 69 6c 65 20 66 6f 72 20 74 68 65 20 6c 61 74 74 65 72 0a 20 20 61 20 6e 65 77 20 72 65 70 6f hile.for.the.latter...a.new.repo
14a60 73 69 74 6f 72 79 20 69 73 20 69 6e 73 65 72 74 65 64 20 69 6e 74 6f 20 74 68 65 20 72 65 70 6f sitory.is.inserted.into.the.repo
14a80 73 69 74 6f 72 79 20 61 6e 64 20 74 68 65 6e 20 72 65 74 75 72 6e 65 64 2e 0a 0a 2d 20 60 3a 73 sitory.and.then.returned...-.`:s
14aa0 74 75 62 27 20 61 6e 64 20 60 3a 73 74 75 62 3f 27 20 72 65 71 75 65 73 74 20 74 68 65 20 46 6f tub'.and.`:stub?'.request.the.Fo
14ac0 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 0a rge.repository.corresponding.to.
14ae0 20 20 74 68 65 20 63 75 72 72 65 6e 74 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 49 ..the.current.Git.repository...I
14b00 74 20 64 6f 65 73 20 6e 6f 74 20 6d 61 74 74 65 72 20 77 68 65 74 68 65 72 20 69 74 20 69 73 20 t.does.not.matter.whether.it.is.
14b20 6b 6e 6f 77 6e 2e 0a 20 20 54 68 69 73 20 66 61 69 6c 73 20 69 66 20 60 64 65 66 61 75 6c 74 2d known....This.fails.if.`default-
14b40 64 69 72 65 63 74 6f 72 79 27 20 69 73 20 6e 6f 74 20 69 6e 73 69 64 65 20 61 20 47 69 74 20 72 directory'.is.not.inside.a.Git.r
14b60 65 70 6f 73 69 74 6f 72 79 2c 20 69 66 0a 20 20 74 68 65 72 65 20 69 73 20 6e 6f 20 6d 61 74 63 epository,.if...there.is.no.matc
14b80 68 69 6e 67 20 65 6e 74 72 79 20 69 6e 20 60 66 6f 72 67 65 2d 61 6c 69 73 74 27 2c 20 6f 72 20 hing.entry.in.`forge-alist',.or.
14ba0 69 66 20 69 74 20 69 73 20 75 6e 63 6c 65 61 72 20 77 68 69 63 68 0a 20 20 72 65 6d 6f 74 65 20 if.it.is.unclear.which...remote.
14bc0 74 6f 20 75 73 65 2e 20 20 49 66 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 63 61 6e 6e 6f to.use...If.the.repository.canno
14be0 74 20 62 65 20 64 65 74 65 72 6d 69 6e 65 64 2c 20 74 68 65 20 66 6f 72 6d 65 72 0a 20 20 63 61 t.be.determined,.the.former...ca
14c00 75 73 65 73 20 61 6e 20 65 72 72 6f 72 20 74 6f 20 62 65 20 73 69 67 6e 61 6c 65 64 2c 20 77 68 uses.an.error.to.be.signaled,.wh
14c20 69 6c 65 20 66 6f 72 20 74 68 65 20 6c 61 74 74 65 72 20 6e 69 6c 20 69 73 20 72 65 74 75 72 6e ile.for.the.latter.nil.is.return
14c40 65 64 2e 0a 0a 20 20 53 74 75 62 20 72 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 65 63 74 73 20 61 ed.....Stub.repository.objects.a
14c60 72 65 20 63 72 65 61 74 65 64 20 77 69 74 68 6f 75 74 20 6d 61 6b 69 6e 67 20 61 6e 20 41 50 49 re.created.without.making.an.API
14c80 20 72 65 71 75 65 73 74 2c 20 73 6f 0a 20 20 77 65 20 6c 61 63 6b 20 61 63 63 65 73 73 20 74 6f .request,.so...we.lack.access.to
14ca0 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 49 44 2c 20 77 68 69 63 68 20 74 68 65 20 49 44 73 20 .the.upstream.ID,.which.the.IDs.
14cc0 75 73 65 64 20 69 6e 20 6f 75 74 20 64 61 74 61 62 61 73 65 2c 0a 20 20 64 65 72 69 76 65 20 66 used.in.out.database,...derive.f
14ce0 72 6f 6d 2e 20 20 53 74 75 62 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 5c 22 75 6e rom...Stub.repositories.are.\"un
14d00 6b 6e 6f 77 6e 5c 22 20 69 6e 20 74 68 65 20 73 65 6e 73 65 20 74 68 61 74 20 74 68 65 69 72 0a known\".in.the.sense.that.their.
14d20 20 20 49 44 73 20 61 72 65 20 6e 6f 74 20 60 3a 6b 6e 6f 77 6e 27 2e 20 20 54 68 69 73 20 69 73 ..IDs.are.not.`:known'...This.is
14d40 20 64 6f 6e 65 20 74 6f 20 61 6c 6c 6f 77 20 6f 66 66 6c 69 6e 65 20 6f 70 65 72 61 74 69 6f 6e .done.to.allow.offline.operation
14d60 73 2e 0a 0a 2d 20 60 3a 76 61 6c 69 64 3f 27 20 72 65 71 75 65 73 74 73 20 74 68 65 20 46 6f 72 s...-.`:valid?'.requests.the.For
14d80 67 65 20 72 65 70 6f 73 69 74 6f 72 79 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 20 74 ge.repository.corresponding.to.t
14da0 68 65 20 63 75 72 72 65 6e 74 0a 20 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 49 74 he.current...Git.repository...It
14dc0 20 64 6f 65 73 20 6e 6f 74 20 6d 61 74 74 65 72 20 77 68 65 74 68 65 72 20 69 74 20 69 73 20 6b .does.not.matter.whether.it.is.k
14de0 6e 6f 77 6e 2e 20 20 49 66 20 69 74 20 69 73 0a 20 20 75 6e 6b 6e 6f 77 6e 2c 20 61 6e 20 41 50 nown...If.it.is...unknown,.an.AP
14e00 49 20 72 65 71 75 65 73 74 20 69 73 20 6d 61 64 65 20 74 6f 20 76 65 72 69 66 79 20 74 68 61 74 I.request.is.made.to.verify.that
14e20 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 65 78 69 73 74 73 0a 20 20 6f 6e 20 74 68 65 20 .the.repository.exists...on.the.
14e40 66 6f 72 67 65 2e 20 20 49 66 20 69 74 20 64 6f 65 73 2c 20 61 6e 20 6f 62 6a 65 63 74 20 77 69 forge...If.it.does,.an.object.wi
14e60 74 68 20 61 20 76 61 6c 69 64 20 75 70 73 74 72 65 61 6d 20 49 44 20 69 73 0a 20 20 72 65 74 75 th.a.valid.upstream.ID.is...retu
14e80 72 6e 65 64 2c 20 62 75 74 20 74 68 61 74 20 69 73 6e 27 74 20 69 6e 73 65 72 74 65 64 20 69 6e rned,.but.that.isn't.inserted.in
14ea0 74 6f 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 20 20 49 66 20 6e 6f 74 2c 20 6e 69 6c 20 69 73 to.the.database...If.not,.nil.is
14ec0 0a 20 20 72 65 74 75 72 6e 65 64 2e 0a 0a 47 69 76 65 6e 20 61 20 72 65 70 6f 73 69 74 6f 72 79 ...returned...Given.a.repository
14ee0 20 6f 62 6a 65 63 74 2c 20 79 6f 75 20 63 61 6e 20 71 75 65 72 79 20 69 74 73 20 60 63 6f 6e 64 .object,.you.can.query.its.`cond
14f00 69 74 69 6f 6e 27 20 73 6c 6f 74 20 74 6f 20 6c 65 61 72 6e 0a 77 68 65 74 68 65 72 20 69 74 20 ition'.slot.to.learn.whether.it.
14f20 69 73 20 60 3a 74 72 61 63 6b 65 64 27 2c 20 60 3a 6b 6e 6f 77 6e 27 20 28 69 2e 65 2e 2c 20 68 is.`:tracked',.`:known'.(i.e.,.h
14f40 61 73 20 61 20 76 61 6c 69 64 20 49 44 20 61 6e 64 20 69 73 20 73 74 6f 72 65 64 0a 69 6e 20 74 as.a.valid.ID.and.is.stored.in.t
14f60 68 65 20 64 61 74 61 62 61 73 65 29 2c 20 6f 72 20 6d 65 72 65 6c 79 20 61 20 60 3a 73 74 75 62 he.database),.or.merely.a.`:stub
14f80 27 2e 0a 0a 59 6f 75 20 63 61 6e 20 61 6c 73 6f 20 75 73 65 20 28 66 6f 72 67 65 2d 67 65 74 20 '...You.can.also.use.(forge-get.
14fa0 72 65 70 6f 73 69 74 6f 72 79 20 4f 42 4a 45 43 54 20 6e 69 6c 20 44 45 4d 41 4e 44 29 20 74 6f repository.OBJECT.nil.DEMAND).to
14fc0 20 63 68 65 63 6b 20 74 68 65 0a 63 6f 6e 64 69 74 69 6f 6e 20 6f 66 20 61 20 72 65 70 6f 73 69 .check.the.condition.of.a.reposi
14fe0 74 6f 72 79 20 6f 62 6a 65 63 74 2c 20 6f 72 20 65 76 65 6e 20 74 6f 20 65 6e 73 75 72 65 20 61 tory.object,.or.even.to.ensure.a
15000 20 72 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 65 63 74 0a 68 61 73 20 61 20 76 61 6c 69 64 20 75 .repository.object.has.a.valid.u
15020 70 73 74 72 65 61 6d 20 49 44 20 28 75 73 69 6e 67 20 60 3a 76 61 6c 69 64 3f 27 29 2c 20 6f 72 pstream.ID.(using.`:valid?'),.or
15040 20 74 68 61 74 20 69 74 20 69 73 20 74 72 61 63 6b 65 64 20 69 6e 20 74 68 65 0a 64 61 74 61 62 .that.it.is.tracked.in.the.datab
15060 61 73 65 20 28 75 73 69 6e 67 20 60 3a 69 6e 73 65 72 74 21 27 29 2e 0a 0a 55 73 65 20 60 66 6f ase.(using.`:insert!')...Use.`fo
15080 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 65 71 75 61 6c 27 20 74 6f 20 63 68 65 63 6b 20 69 rge-repository-equal'.to.check.i
150a0 66 20 74 77 6f 20 6f 62 6a 65 63 74 73 20 72 65 66 65 72 20 74 6f 20 74 68 65 20 73 61 6d 65 0a f.two.objects.refer.to.the.same.
150c0 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a 41 6c 73 6f 20 73 65 65 20 69 6e 66 6f 20 6e 6f 64 65 20 repository...Also.see.info.node.
150e0 60 28 66 6f 72 67 65 29 20 52 65 70 6f 73 69 74 6f 72 79 20 44 65 74 65 63 74 69 6f 6e 27 2e 22 `(forge).Repository.Detection'."
15100 29 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 72 69 63 20 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 )..(cl-defgeneric.forge-get-topi
15120 63 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 66 6f 72 67 65 20 69 73 73 75 65 20 6f 72 20 c.()..."Return.a.forge.issue.or.
15140 70 75 6c 6c 72 65 71 20 6f 62 6a 65 63 74 2e 22 29 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 72 69 pullreq.object.")..(cl-defgeneri
15160 63 20 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 61 c.forge-get-issue.()..."Return.a
15180 20 66 6f 72 67 65 20 69 73 73 75 65 20 6f 62 6a 65 63 74 2e 22 29 0a 0a 28 63 6c 2d 64 65 66 67 .forge.issue.object.")..(cl-defg
151a0 65 6e 65 72 69 63 20 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 28 29 0a 20 20 22 52 eneric.forge-get-pullreq.()..."R
151c0 65 74 75 72 6e 20 61 20 66 6f 72 67 65 20 70 75 6c 6c 72 65 71 20 6f 62 6a 65 63 74 2e 22 29 0a eturn.a.forge.pullreq.object.").
151e0 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 65 74 2d 66 6f 72 67 65 2d 68 6f 73 74 20 28 68 .(defun.forge--get-forge-host.(h
15200 6f 73 74 20 26 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 ost.&optional.demand)..."Return.
15220 60 66 6f 72 67 65 2d 61 6c 69 73 74 27 20 65 6e 74 72 79 20 6d 61 74 63 68 69 6e 67 20 48 4f 53 `forge-alist'.entry.matching.HOS
15240 54 2e 0a 0a 45 6e 74 72 69 65 73 20 68 61 76 65 20 74 68 65 20 66 6f 72 6d 20 28 47 49 54 48 4f T...Entries.have.the.form.(GITHO
15260 53 54 20 41 50 49 48 4f 53 54 20 57 45 42 48 4f 53 54 20 43 4c 41 53 53 29 2e 0a 0a 2d 20 49 66 ST.APIHOST.WEBHOST.CLASS)...-.If
15280 20 48 4f 53 54 20 6d 61 74 63 68 65 73 20 61 20 47 49 54 48 4f 53 54 2c 20 72 65 74 75 72 6e 20 .HOST.matches.a.GITHOST,.return.
152a0 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 65 6e 74 72 79 2e 0a 2d 20 45 6c 73 65 2c the.corresponding.entry..-.Else,
152c0 20 69 66 20 48 4f 53 54 20 69 73 20 61 6e 20 73 73 68 20 61 6c 69 61 73 20 61 6e 64 20 74 68 65 .if.HOST.is.an.ssh.alias.and.the
152e0 20 63 61 6e 6f 6e 69 63 61 6c 20 68 6f 73 74 6e 61 6d 65 20 6d 61 74 63 68 65 73 20 61 0a 20 20 .canonical.hostname.matches.a...
15300 47 49 54 48 4f 53 54 2c 20 72 65 74 75 72 6e 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e GITHOST,.return.the.correspondin
15320 67 20 65 6e 74 72 79 2e 0a 2d 20 46 69 6e 61 6c 6c 79 2c 20 69 66 20 48 4f 53 54 20 6d 61 74 63 g.entry..-.Finally,.if.HOST.matc
15340 68 65 73 20 61 20 57 45 42 48 4f 53 54 2c 20 72 65 74 75 72 6e 20 74 68 65 20 63 6f 72 72 65 73 hes.a.WEBHOST,.return.the.corres
15360 70 6f 6e 64 69 6e 67 20 65 6e 74 72 79 2e 0a 0a 49 66 20 6e 6f 20 65 6e 74 72 79 20 6d 61 74 63 ponding.entry...If.no.entry.matc
15380 68 65 73 2c 20 72 65 74 75 72 6e 20 6e 69 6c 2c 20 6f 72 20 73 69 67 6e 61 6c 20 61 6e 20 65 72 hes,.return.nil,.or.signal.an.er
153a0 72 6f 72 20 69 66 20 6f 70 74 69 6f 6e 61 6c 20 44 45 4d 41 4e 44 0a 69 73 20 6e 6f 6e 2d 6e 69 ror.if.optional.DEMAND.is.non-ni
153c0 6c 2e 22 0a 20 20 28 6f 72 20 28 61 73 73 6f 63 20 68 6f 73 74 20 66 6f 72 67 65 2d 61 6c 69 73 l."...(or.(assoc.host.forge-alis
153e0 74 29 0a 20 20 20 20 20 20 28 61 73 73 6f 63 20 28 73 65 71 2d 73 6f 6d 65 20 28 6c 61 6d 62 64 t).......(assoc.(seq-some.(lambd
15400 61 20 28 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 a.(line)........................
15420 20 20 28 61 6e 64 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 68 6f 73 74 6e 61 6d ..(and.(string-prefix-p."hostnam
15440 65 22 20 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e".line)........................
15460 20 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 6c 69 6e 65 20 39 29 29 29 0a 20 20 20 20 .......(substring.line.9))).....
15480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 ...................(ignore-error
154a0 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 s..........................(proc
154c0 65 73 73 2d 6c 69 6e 65 73 2d 69 67 6e 6f 72 65 2d 73 74 61 74 75 73 20 22 73 73 68 22 20 22 2d ess-lines-ignore-status."ssh"."-
154e0 47 22 20 68 6f 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 61 6c G".host)))..............forge-al
15500 69 73 74 29 0a 20 20 20 20 20 20 28 63 61 72 20 28 63 6c 2d 6d 65 6d 62 65 72 20 68 6f 73 74 20 ist).......(car.(cl-member.host.
15520 66 6f 72 67 65 2d 61 6c 69 73 74 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 20 3a 6b 65 79 20 23 forge-alist.:test.#'equal.:key.#
15540 27 63 61 64 64 72 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 64 65 6d 61 6e 64 0a 20 20 20 20 20 'caddr)).......(and.demand......
15560 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 4e 6f 20 65 6e 74 72 79 20 66 6f 72 20 5c 22 25 73 5c ......(error."No.entry.for.\"%s\
15580 22 20 69 6e 20 60 66 6f 72 67 65 2d 61 6c 69 73 74 27 22 20 68 6f 73 74 29 29 29 29 0a 0a 28 64 ".in.`forge-alist'".host))))..(d
155a0 65 66 75 6e 20 66 6f 72 67 65 2d 2d 73 70 6c 69 74 2d 66 6f 72 67 65 2d 75 72 6c 20 28 75 72 6c efun.forge--split-forge-url.(url
155c0 20 26 6f 70 74 69 6f 6e 61 6c 20 72 65 6c 61 78 29 0a 20 20 28 73 61 76 65 2d 6d 61 74 63 68 2d .&optional.relax)...(save-match-
155e0 64 61 74 61 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 data.....(cond......((string-mat
15600 63 68 0a 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 5c 5c 60 22 0a 20 20 20 20 20 20 20 20 ch........(concat."\\`".........
15620 20 20 20 20 20 20 20 22 5c 5c 28 3f 3a 67 69 74 3a 2f 2f 5c 5c 7c 22 0a 20 20 20 20 20 20 20 20 ......."\\(?:git://\\|".........
15640 20 20 20 20 20 20 20 22 5b 5e 2f 40 5d 2b 40 5c 5c 7c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 ......."[^/@]+@\\|".............
15660 20 20 20 22 5c 5c 28 3f 3a 73 73 68 5c 5c 7c 73 73 68 5c 5c 2b 67 69 74 5c 5c 7c 67 69 74 5c 5c ..."\\(?:ssh\\|ssh\\+git\\|git\\
15680 2b 73 73 68 5c 5c 29 3a 2f 2f 5c 5c 28 3f 3a 5b 5e 2f 40 5d 2b 40 5c 5c 29 3f 5c 5c 7c 22 0a 20 +ssh\\)://\\(?:[^/@]+@\\)?\\|"..
156a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 68 74 74 70 73 3f 3a 2f 2f 5c 5c 28 3f 3a 5b 5e 2f .............."https?://\\(?:[^/
156c0 40 5d 2b 40 5c 5c 29 3f 5c 5c 29 3f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 @]+@\\)?\\)?"................(if
156e0 20 72 65 6c 61 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 28 3f 31 .relax...................."\\(?1
15700 3a 5b 5e 3a 2f 5d 2b 5c 5c 29 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 :[^:/]+\\)"..................(re
15720 67 65 78 70 2d 6f 70 74 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 66 6f 72 67 65 2d 61 6c 69 gexp-opt.(mapcar.#'car.forge-ali
15740 73 74 29 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 28 3f 3a 3a 5b 30 st).t))................"\\(?::[0
15760 2d 39 5d 2b 5c 5c 29 3f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 28 3f 3a 2f -9]+\\)?"................"\\(?:/
15780 5c 5c 7c 3a 2f 3f 5c 5c 29 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 7e 3f 5c 5c 28 \\|:/?\\)"................"~?\\(
157a0 3f 32 3a 2e 2b 3f 5c 5c 29 2f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 28 3f ?2:.+?\\)/"................"\\(?
157c0 33 3a 5b 5e 2f 5d 2b 3f 5c 5c 29 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 28 3:[^/]+?\\)"................"\\(
157e0 3f 3a 5c 5c 2e 67 69 74 5c 5c 7c 2f 5c 5c 29 3f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ?:\\.git\\|/\\)?"...............
15800 20 22 5c 5c 27 22 29 0a 20 20 20 20 20 20 20 75 72 6c 29 0a 20 20 20 20 20 20 28 61 6e 64 2d 6c ."\\'")........url).......(and-l
15820 65 74 20 28 28 65 6c 74 20 28 66 6f 72 67 65 2d 2d 67 65 74 2d 66 6f 72 67 65 2d 68 6f 73 74 20 et.((elt.(forge--get-forge-host.
15840 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 75 72 6c 29 20 28 6e 6f 74 20 72 65 6c 61 78 29 (match-string.1.url).(not.relax)
15860 29 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 52 65 74 75 72 6e 20 74 68 65 20 57 45 42 48 4f 53 ))).........;;.Return.the.WEBHOS
15880 54 20 28 6e 6f 74 20 74 68 65 20 47 49 54 48 4f 53 54 2c 20 55 52 4c 73 20 70 61 73 73 65 64 20 T.(not.the.GITHOST,.URLs.passed.
158a0 74 6f 20 74 68 69 73 0a 20 20 20 20 20 20 20 20 3b 3b 20 66 75 6e 63 74 69 6f 6e 20 75 73 75 61 to.this.........;;.function.usua
158c0 6c 6c 79 20 63 6f 6e 74 61 69 6e 20 61 20 47 49 54 48 4f 53 54 29 20 62 65 63 61 75 73 65 20 74 lly.contain.a.GITHOST).because.t
158e0 68 65 20 49 44 73 20 75 73 65 64 20 74 6f 0a 20 20 20 20 20 20 20 20 3b 3b 20 69 64 65 6e 74 69 he.IDs.used.to.........;;.identi
15900 66 79 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 69 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 20 fy.a.repository.in.the.database.
15920 61 72 65 20 62 61 73 65 64 20 6f 6e 20 57 45 42 48 4f 53 54 73 2e 0a 20 20 20 20 20 20 20 20 28 are.based.on.WEBHOSTs..........(
15940 6c 69 73 74 20 28 63 61 64 64 72 20 65 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 list.(caddr.elt)...............(
15960 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 20 75 72 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 match-string.2.url).............
15980 20 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 33 20 75 72 6c 29 29 29 29 0a 20 20 20 20 20 28 ..(match-string.3.url))))......(
159a0 28 6e 6f 74 20 72 65 6c 61 78 29 0a 20 20 20 20 20 20 3b 3b 20 54 68 65 20 68 6f 73 74 20 70 61 (not.relax).......;;.The.host.pa
159c0 72 74 20 64 69 64 6e 27 74 20 6d 61 74 63 68 20 61 6e 79 20 47 49 54 48 4f 53 54 20 69 6e 20 60 rt.didn't.match.any.GITHOST.in.`
159e0 66 6f 72 67 65 2d 61 6c 69 73 74 27 2c 20 62 75 74 20 69 74 0a 20 20 20 20 20 20 3b 3b 20 6d 69 forge-alist',.but.it.......;;.mi
15a00 67 68 74 20 62 65 20 61 20 73 73 68 20 68 6f 73 74 20 61 6c 69 61 73 2e 20 20 57 65 20 68 61 76 ght.be.a.ssh.host.alias...We.hav
15a20 65 20 74 6f 20 72 65 6c 61 78 20 73 74 72 69 63 74 6e 65 73 73 3b 20 69 6e 20 74 68 65 0a 20 20 e.to.relax.strictness;.in.the...
15a40 20 20 20 20 3b 3b 20 65 78 74 72 65 6d 65 6c 79 20 75 6e 6c 69 6b 65 6c 79 20 63 61 73 65 20 74 ....;;.extremely.unlikely.case.t
15a60 68 61 74 20 74 68 65 72 65 20 69 73 20 61 20 63 6f 6d 6d 6f 6e 20 70 61 74 68 20 62 65 74 77 65 hat.there.is.a.common.path.betwe
15a80 65 6e 20 74 68 65 0a 20 20 20 20 20 20 3b 3b 20 48 4f 53 54 20 61 6e 64 20 74 68 65 20 4f 57 4e en.the.......;;.HOST.and.the.OWN
15aa0 45 52 20 66 6f 72 20 74 68 69 73 20 66 6f 72 67 65 2c 20 77 65 20 77 6f 75 6c 64 20 69 6e 63 6f ER.for.this.forge,.we.would.inco
15ac0 72 72 65 63 74 6c 79 20 65 6e 64 20 75 70 0a 20 20 20 20 20 20 3b 3b 20 6d 61 6b 69 6e 67 20 74 rrectly.end.up.......;;.making.t
15ae0 68 61 74 20 70 61 74 68 20 70 61 72 74 20 6f 66 20 74 68 65 20 6f 77 6e 65 72 2e 0a 20 20 20 20 hat.path.part.of.the.owner......
15b00 20 20 28 66 6f 72 67 65 2d 2d 73 70 6c 69 74 2d 66 6f 72 67 65 2d 75 72 6c 20 75 72 6c 20 74 29 ..(forge--split-forge-url.url.t)
15b20 29 29 29 29 0a 0a 3b 3b 3b 20 49 64 65 6e 74 69 74 79 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 72 ))))..;;;.Identity..(cl-defgener
15b40 69 63 20 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 28 63 6c 61 73 73 20 26 72 65 73 74 ic.forge--object-id.(class.&rest
15b60 20 61 72 67 73 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 20 69 64 .args)..."Return.the.database.id
15b80 20 66 6f 72 20 74 68 65 20 43 4c 41 53 53 20 6f 62 6a 65 63 74 20 73 70 65 63 69 66 69 65 64 20 .for.the.CLASS.object.specified.
15ba0 62 79 20 41 52 47 53 2e 22 29 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 72 69 63 20 66 6f 72 67 65 by.ARGS.")..(cl-defgeneric.forge
15bc0 2d 2d 72 65 70 6f 73 69 74 6f 72 79 2d 69 64 73 20 28 20 63 6c 61 73 73 20 68 6f 73 74 20 6f 77 --repository-ids.(.class.host.ow
15be0 6e 65 72 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ner.name........................
15c00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 73 74 75 62 20 6e ................&optional.stub.n
15c20 6f 65 72 72 6f 72 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 20 61 oerror)..."Return.the.database.a
15c40 6e 64 20 66 6f 72 67 65 20 69 64 73 20 66 6f 72 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 43 nd.forge.ids.for.the.specified.C
15c60 4c 41 53 53 20 6f 62 6a 65 63 74 2e 22 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 74 68 LASS.object.")..(defun.forge--th
15c80 65 69 72 2d 69 64 20 28 61 72 67 20 26 6f 70 74 69 6f 6e 61 6c 20 74 79 70 65 20 72 65 70 6f 29 eir-id.(arg.&optional.type.repo)
15ca0 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 66 6f 72 67 65 27 73 20 49 44 20 66 6f 72 20 41 52 ..."Return.the.forge's.ID.for.AR
15cc0 47 2e 0a 54 68 69 73 20 64 65 61 6c 73 20 77 69 74 68 20 74 65 63 68 6e 69 63 61 6c 20 64 65 62 G..This.deals.with.technical.deb
15ce0 74 20 72 65 6c 61 74 65 64 20 74 6f 20 6f 75 72 20 68 61 6e 64 6c 69 6e 67 20 6f 66 20 49 44 73 t.related.to.our.handling.of.IDs
15d00 2e 22 0a 20 20 28 63 6f 6e 64 0a 20 20 20 28 74 79 70 65 0a 20 20 20 20 28 70 63 61 73 65 20 74 ."...(cond....(type.....(pcase.t
15d20 79 70 65 0a 20 20 20 20 20 20 28 27 61 73 73 69 67 6e 65 65 0a 20 20 20 20 20 20 20 28 66 6f 72 ype.......('assignee........(for
15d40 67 65 2d 73 71 6c 31 20 5b 3a 73 65 6c 65 63 74 20 5b 66 6f 72 67 65 2d 69 64 5d 0a 20 20 20 20 ge-sql1.[:select.[forge-id].....
15d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 61 73 73 69 67 6e 65 65 0a 20 ................:from.assignee..
15d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 ...................:where.(and.(
15da0 3d 20 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 =.repository.$s1)...............
15dc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 6c 6f 67 69 6e 20 24 73 32 29 29 ..................(=.login.$s2))
15de0 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 ]....................(oref.repo.
15e00 69 64 29 20 61 72 67 29 29 0a 20 20 20 20 20 20 28 27 61 73 73 69 67 6e 65 65 73 0a 20 20 20 20 id).arg)).......('assignees.....
15e20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 2d 63 61 72 20 5b 3a 73 65 6c 65 63 74 20 5b 66 6f 72 67 ...(forge-sql-car.[:select.[forg
15e40 65 2d 69 64 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 e-id]........................:fr
15e60 6f 6d 20 61 73 73 69 67 6e 65 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 om.assignee.....................
15e80 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 ...:where.(and.(=.repository.$s1
15ea0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )...............................
15ec0 20 20 20 20 20 28 69 6e 20 6c 6f 67 69 6e 20 24 76 32 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 .....(in.login.$v2))]...........
15ee0 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 0a 20 20 20 20 20 ............(oref.repo.id)......
15f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 63 6f 6e 63 61 74 20 61 72 67 29 29 29 .................(vconcat.arg)))
15f20 0a 20 20 20 20 20 20 28 27 63 61 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d .......('category........(forge-
15f40 73 71 6c 31 20 5b 3a 73 65 6c 65 63 74 20 5b 74 68 65 69 72 2d 69 64 5d 0a 20 20 20 20 20 20 20 sql1.[:select.[their-id]........
15f60 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 64 69 73 63 75 73 73 69 6f 6e 2d 63 61 .............:from.discussion-ca
15f80 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 tegory.....................:wher
15fa0 65 20 28 61 6e 64 20 28 3d 20 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 e.(and.(=.repository.$s1).......
15fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 6e 61 6d ..........................(=.nam
15fe0 65 20 24 73 32 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 e.$s2))]....................(ore
16000 66 20 72 65 70 6f 20 69 64 29 20 61 72 67 29 29 0a 20 20 20 20 20 20 28 27 6c 61 62 65 6c 0a 20 f.repo.id).arg)).......('label..
16020 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 0a 20 20 20 20 20 20 20 20 28 ......(forge--their-id.........(
16040 66 6f 72 67 65 2d 73 71 6c 31 20 5b 3a 73 65 6c 65 63 74 20 5b 69 64 5d 0a 20 20 20 20 20 20 20 forge-sql1.[:select.[id]........
16060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 6c 61 62 65 6c 0a 20 20 20 20 20 20 ..............:from.label.......
16080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 72 65 ...............:where.(and.(=.re
160a0 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pository.$s1)...................
160c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 6e 61 6d 65 20 24 73 32 29 29 5d 0a 20 20 ...............(=.name.$s2))]...
160e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 ..................(oref.repo.id)
16100 20 61 72 67 29 29 29 0a 20 20 20 20 20 20 28 27 6c 61 62 65 6c 73 0a 20 20 20 20 20 20 20 28 6d .arg))).......('labels........(m
16120 61 70 63 61 72 20 28 23 23 66 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 20 25 20 27 6c 61 62 65 apcar.(##forge--their-id.%.'labe
16140 6c 20 72 65 70 6f 29 20 61 72 67 29 29 0a 20 20 20 20 20 20 28 27 6d 69 6c 65 73 74 6f 6e 65 0a l.repo).arg)).......('milestone.
16160 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 0a 20 20 20 20 20 20 20 20 .......(forge--their-id.........
16180 28 66 6f 72 67 65 2d 73 71 6c 31 20 5b 3a 73 65 6c 65 63 74 20 5b 69 64 5d 20 3a 66 72 6f 6d 20 (forge-sql1.[:select.[id].:from.
161a0 6d 69 6c 65 73 74 6f 6e 65 20 3a 77 68 65 72 65 20 28 3d 20 74 69 74 6c 65 20 24 73 31 29 5d 20 milestone.:where.(=.title.$s1)].
161c0 61 72 67 29 29 29 29 29 0a 20 20 20 28 28 73 74 72 69 6e 67 70 20 61 72 67 29 0a 20 20 20 20 28 arg)))))....((stringp.arg).....(
161e0 63 61 72 20 28 6c 61 73 74 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 62 61 73 65 36 34 2d car.(last.(split-string.(base64-
16200 64 65 63 6f 64 65 2d 73 74 72 69 6e 67 20 61 72 67 29 20 22 3a 22 29 29 29 29 0a 20 20 20 28 28 decode-string.arg).":"))))....((
16220 73 6c 6f 74 2d 65 78 69 73 74 73 2d 70 20 61 72 67 20 27 74 68 65 69 72 2d 69 64 29 0a 20 20 20 slot-exists-p.arg.'their-id)....
16240 20 28 6f 72 65 66 20 61 72 67 20 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 28 28 73 6c 6f 74 2d .(oref.arg.their-id))....((slot-
16260 65 78 69 73 74 73 2d 70 20 61 72 67 20 27 66 6f 72 67 65 2d 69 64 29 0a 20 20 20 20 28 6f 72 65 exists-p.arg.'forge-id).....(ore
16280 66 20 61 72 67 20 66 6f 72 67 65 2d 69 64 29 29 0a 20 20 20 28 28 66 6f 72 67 65 2d 2d 74 68 65 f.arg.forge-id))....((forge--the
162a0 69 72 2d 69 64 20 28 6f 72 65 66 20 61 72 67 20 69 64 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 ir-id.(oref.arg.id)))))..(cl-def
162c0 6d 65 74 68 6f 64 20 6d 61 67 69 74 2d 73 65 63 74 69 6f 6e 2d 69 64 65 6e 74 2d 76 61 6c 75 65 method.magit-section-ident-value
162e0 20 28 28 6f 62 6a 20 66 6f 72 67 65 2d 6f 62 6a 65 63 74 29 29 0a 20 20 22 52 65 74 75 72 6e 20 .((obj.forge-object))..."Return.
16300 74 68 65 20 76 61 6c 75 65 20 6f 62 20 4f 42 4a 27 73 20 60 69 64 27 20 73 6c 6f 74 2e 0a 55 73 the.value.ob.OBJ's.`id'.slot..Us
16320 69 6e 67 20 4f 42 4a 20 69 74 73 65 6c 66 20 77 6f 75 6c 64 20 6e 6f 74 20 62 65 20 61 70 70 72 ing.OBJ.itself.would.not.be.appr
16340 6f 70 72 69 61 74 65 20 62 65 63 61 75 73 65 20 6d 75 6c 74 69 70 6c 65 0a 6e 6f 6e 2d 65 71 75 opriate.because.multiple.non-equ
16360 61 6c 20 6f 62 6a 65 63 74 73 20 6d 61 79 20 65 78 69 73 74 2c 20 72 65 70 72 65 73 65 6e 74 69 al.objects.may.exist,.representi
16380 6e 67 20 74 68 65 20 73 61 6d 65 20 74 68 69 6e 67 2e 22 0a 20 20 28 6f 72 65 66 20 6f 62 6a 20 ng.the.same.thing."...(oref.obj.
163a0 69 64 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 73 65 74 2d 63 6f 6e 6e 65 63 74 69 id))..(defun.forge--set-connecti
163c0 6f 6e 73 20 28 72 65 70 6f 20 6f 62 6a 65 63 74 20 73 6c 6f 74 20 6c 69 73 74 29 0a 20 20 28 63 ons.(repo.object.slot.list)...(c
163e0 6c 6f 73 71 6c 2d 64 73 65 74 20 6f 62 6a 65 63 74 20 73 6c 6f 74 0a 20 20 20 20 20 20 20 20 20 losql-dset.object.slot..........
16400 20 20 20 20 20 20 28 6c 65 74 20 28 28 72 69 64 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 29 ......(let.((rid.(oref.repo.id))
16420 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 )..................(mapcar.(lamb
16440 64 61 20 28 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 da.(value)......................
16460 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 0a 20 20 20 20 20 20 20 20 ......(forge--object-id.........
16480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 69 64 0a 20 20 20 20 20 20 20 20 ....................rid.........
164a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 74 6f 6d 20 76 61 ....................(if.(atom.va
164c0 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lue)............................
164e0 20 20 20 20 20 3b 3b 20 46 6f 72 20 47 69 74 6c 61 62 20 6c 61 62 65 6c 73 20 77 65 20 75 6e 66 .....;;.For.Gitlab.labels.we.unf
16500 6f 72 74 75 6e 61 74 65 6c 79 20 6f 6e 6c 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ortunately.only.................
16520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 67 65 74 20 61 20 73 74 72 69 6e 67 2c ................;;.get.a.string,
16540 20 74 68 65 20 61 6d 62 69 67 75 6f 75 73 20 6e 61 6d 65 20 6f 66 20 74 68 65 0a 20 20 20 20 20 .the.ambiguous.name.of.the......
16560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6c 61 ...........................;;.la
16580 62 65 6c 2e 20 20 53 65 65 20 61 6c 73 6f 20 74 68 65 20 63 6f 6d 6d 65 6e 74 20 69 6e 20 74 68 bel...See.also.the.comment.in.th
165a0 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e...............................
165c0 20 20 3b 3b 20 47 69 74 6c 61 62 20 60 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 6c 61 62 65 6c ..;;.Gitlab.`forge--update-label
165e0 73 27 20 6d 65 74 68 6f 64 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s'.method.......................
16600 20 20 20 20 20 20 20 20 20 20 20 76 61 6c 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...........value................
16620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 69 73 74 2d 67 65 74 20 27 69 64 20 76 61 ...............(alist-get.'id.va
16640 6c 75 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lue)))).........................
16660 20 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 29 29 0a 0a 3b 3b 3b 20 .list))................t))..;;;.
16680 46 6f 72 6d 61 74 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 72 69 63 20 66 6f 72 67 65 2d 2d 66 6f Format..(cl-defgeneric.forge--fo
166a0 72 6d 61 74 20 28 6f 62 6a 65 63 74 20 73 6c 6f 74 20 26 6f 70 74 69 6f 6e 61 6c 20 73 70 65 63 rmat.(object.slot.&optional.spec
166c0 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 73 74 72 69 6e 67 20 62 61 73 65 64 20 6f 6e 20 53 50 )..."Return.a.string.based.on.SP
166e0 45 43 20 61 6e 64 20 74 68 65 20 66 6f 72 6d 61 74 2d 73 74 72 69 6e 67 20 69 6e 20 4f 42 4a 45 EC.and.the.format-string.in.OBJE
16700 43 54 27 73 20 53 4c 4f 54 2e 0a 54 68 65 20 61 76 61 69 6c 61 62 6c 65 20 60 66 6f 72 6d 61 74 CT's.SLOT..The.available.`format
16720 27 2d 6c 69 6b 65 20 73 70 65 63 73 20 64 65 70 65 6e 64 20 6f 6e 20 74 68 65 20 74 79 70 65 20 '-like.specs.depend.on.the.type.
16740 6f 66 20 4f 42 4a 45 43 54 2e 0a 53 50 45 43 20 63 61 6e 20 62 65 20 75 73 65 64 20 74 6f 20 61 of.OBJECT..SPEC.can.be.used.to.a
16760 64 64 20 61 64 64 69 74 69 6f 6e 61 6c 20 73 70 65 63 73 2c 20 61 73 20 66 6f 72 20 60 66 6f 72 dd.additional.specs,.as.for.`for
16780 6d 61 74 2d 73 70 65 63 27 2e 0a 54 68 65 20 6c 61 74 74 65 72 20 6f 76 65 72 72 69 64 65 20 74 mat-spec'..The.latter.override.t
167a0 68 65 20 66 6f 72 6d 65 72 2e 20 20 53 4c 4f 54 20 69 73 20 65 78 70 65 63 74 65 64 20 74 6f 20 he.former...SLOT.is.expected.to.
167c0 62 65 20 63 6c 61 73 73 2d 0a 61 6c 6c 6f 63 61 74 65 64 2e 20 20 53 6f 6d 65 20 6d 65 74 68 6f be.class-.allocated...Some.metho
167e0 64 73 20 61 6c 73 6f 20 61 63 63 65 70 74 20 61 20 66 6f 72 6d 61 74 20 73 74 72 69 6e 67 20 69 ds.also.accept.a.format.string.i
16800 6e 20 70 6c 61 63 65 0a 6f 66 20 53 4c 4f 54 2e 22 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f n.place.of.SLOT.")..(cl-defmetho
16820 64 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 72 65 73 6f 75 72 63 65 20 28 28 6f 62 6a 65 63 d.forge--format-resource.((objec
16840 74 20 66 6f 72 67 65 2d 6f 62 6a 65 63 74 29 20 72 65 73 6f 75 72 63 65 29 0a 20 20 22 52 65 74 t.forge-object).resource)..."Ret
16860 75 72 6e 20 61 6e 20 41 50 49 20 72 65 73 6f 75 72 63 65 20 62 61 73 65 64 20 6f 6e 20 52 45 53 urn.an.API.resource.based.on.RES
16880 4f 55 52 43 45 20 61 6e 64 20 73 6c 6f 74 73 20 6f 66 20 4f 42 4a 45 43 54 2e 0a 54 68 69 73 20 OURCE.and.slots.of.OBJECT..This.
168a0 69 73 20 75 73 65 64 20 62 79 20 60 66 6f 72 67 65 2d 2d 72 65 73 74 27 20 61 6e 64 20 62 79 20 is.used.by.`forge--rest'.and.by.
168c0 65 78 74 65 6e 73 69 6f 6e 20 60 66 6f 72 67 65 2d 72 65 73 74 27 2e 0a 52 45 53 4f 55 52 43 45 extension.`forge-rest'..RESOURCE
168e0 20 69 73 20 61 20 73 74 72 69 6e 67 20 73 65 70 61 72 61 74 65 64 20 62 79 20 73 6c 61 73 68 65 .is.a.string.separated.by.slashe
16900 73 2e 20 20 45 61 63 68 20 70 61 72 74 20 74 68 61 74 20 62 65 67 69 6e 73 0a 77 69 74 68 20 61 s...Each.part.that.begins.with.a
16920 20 63 6f 6c 6f 6e 20 69 73 20 72 65 70 6c 61 63 65 64 20 77 69 74 68 20 61 20 76 61 6c 75 65 20 .colon.is.replaced.with.a.value.
16940 66 72 6f 6d 20 4f 42 4a 45 43 54 2e 20 20 60 3a 72 65 70 6f 27 20 69 73 20 61 0a 73 79 6e 6f 6e from.OBJECT...`:repo'.is.a.synon
16960 79 6d 20 66 6f 72 20 60 3a 6e 61 6d 65 27 2e 20 20 60 3a 70 72 6f 6a 65 63 74 27 20 69 73 20 61 ym.for.`:name'...`:project'.is.a
16980 20 6c 69 6b 65 20 60 3a 6f 77 6e 65 72 2f 3a 6e 61 6d 65 27 2c 20 62 75 74 20 74 68 65 0a 73 6c .like.`:owner/:name',.but.the.sl
169a0 61 73 68 20 69 73 20 71 75 6f 74 65 64 20 6f 6e 20 47 69 74 6c 61 62 2e 20 20 60 3a 74 6f 70 69 ash.is.quoted.on.Gitlab...`:topi
169c0 63 27 20 69 73 20 61 20 73 79 6e 6f 6e 79 6d 20 66 6f 72 20 60 3a 6e 75 6d 62 65 72 27 0a 62 75 c'.is.a.synonym.for.`:number'.bu
169e0 74 20 6f 6e 6c 79 20 69 66 20 4f 42 4a 45 43 54 20 69 73 20 61 20 74 6f 70 69 63 2e 20 20 41 6e t.only.if.OBJECT.is.a.topic...An
16a00 79 20 6f 74 68 65 72 20 60 3a 53 4c 4f 54 27 20 6d 65 61 6e 73 20 74 6f 20 75 73 65 0a 74 68 65 y.other.`:SLOT'.means.to.use.the
16a20 20 76 61 6c 75 65 20 6f 66 20 74 68 61 74 20 73 6c 6f 74 20 69 6e 20 4f 42 4a 45 43 54 2c 20 6f .value.of.that.slot.in.OBJECT,.o
16a40 72 20 69 66 20 74 68 61 74 20 64 6f 65 73 6e 27 74 20 65 78 69 73 74 20 69 6e 20 69 74 73 0a 70 r.if.that.doesn't.exist.in.its.p
16a60 61 72 65 6e 74 20 6f 62 6a 65 63 74 20 28 64 65 74 65 72 6d 69 6e 65 64 20 75 73 69 6e 67 20 60 arent.object.(determined.using.`
16a80 66 6f 72 67 65 2d 67 65 74 2d 70 61 72 65 6e 74 27 29 2e 22 0a 20 20 28 73 61 76 65 2d 6d 61 74 forge-get-parent')."...(save-mat
16aa0 63 68 2d 64 61 74 61 0a 20 20 20 20 28 73 65 74 71 20 72 65 73 6f 75 72 63 65 0a 20 20 20 20 20 ch-data.....(setq.resource......
16ac0 20 20 20 20 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 0a 20 .....(replace-regexp-in-string..
16ae0 20 20 20 20 20 20 20 20 20 20 22 3a 5c 5c 28 5b 5e 2f 5d 2b 5c 5c 29 22 0a 20 20 20 20 20 20 20 ..........":\\([^/]+\\)"........
16b00 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 74 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ....(lambda.(str)..............(
16b20 6c 65 74 20 28 28 73 6c 6f 74 20 28 69 6e 74 65 72 6e 20 28 73 75 62 73 74 72 69 6e 67 20 73 74 let.((slot.(intern.(substring.st
16b40 72 20 31 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 61 6e 64 24 r.1))))................(or.(and$
16b60 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(ignore-errors.................
16b80 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 20 73 6c 6f 74 0a 20 20 20 20 20 20 20 20 20 ...........(pcase.slot..........
16ba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 72 65 70 6f 20 20 20 20 28 6f ....................('repo....(o
16bc0 72 65 66 20 6f 62 6a 65 63 74 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ref.object.name))...............
16be0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 70 72 6f 6a 65 63 74 20 28 63 6f 6e 63 61 74 ...............('project.(concat
16c00 20 28 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(string-replace................
16c20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
16c40 20 22 2f 22 20 22 25 32 46 22 20 28 6f 72 65 66 20 6f 62 6a 65 63 74 20 6f 77 6e 65 72 29 29 0a ."/"."%2F".(oref.object.owner)).
16c60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
16c80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 32 46 22 0a 20 20 20 20 20 20 20 20 20 20 20 ..............."%2F"............
16ca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
16cc0 20 20 20 20 28 6f 72 65 66 20 6f 62 6a 65 63 74 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 ....(oref.object.name)))........
16ce0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 74 6f 70 69 63 20 20 20 ......................('topic...
16d00 28 61 6e 64 20 28 66 6f 72 67 65 2d 2d 63 68 69 6c 64 70 20 6f 62 6a 65 63 74 20 27 66 6f 72 67 (and.(forge--childp.object.'forg
16d20 65 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-topic)........................
16d40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 6f 62 6a 65 63 .....................(oref.objec
16d60 74 20 6e 75 6d 62 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.number))).....................
16d80 20 20 20 20 20 20 20 20 20 28 5f 20 20 20 20 20 20 20 20 28 65 69 65 69 6f 2d 6f 72 65 66 20 6f .........(_........(eieio-oref.o
16da0 62 6a 65 63 74 20 73 6c 6f 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 bject.slot))))..................
16dc0 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 24 29 29 0a 20 20 20 20 20 20 20 ........(format."%s".$))........
16de0 20 20 20 20 20 20 20 20 20 20 20 20 73 74 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 72 65 ............str)))............re
16e00 73 6f 75 72 63 65 20 74 20 74 29 29 0a 20 20 20 20 28 63 6f 6e 64 2d 6c 65 74 0a 20 20 20 20 20 source.t.t)).....(cond-let......
16e20 20 28 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 3a 5b 5e 2f 5d 2a 22 20 72 65 .((not.(string-match.":[^/]*".re
16e40 73 6f 75 72 63 65 29 29 0a 20 20 20 20 20 20 20 72 65 73 6f 75 72 63 65 29 0a 20 20 20 20 20 20 source))........resource).......
16e60 28 5b 70 61 72 65 6e 74 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 66 6f 72 67 65 2d 67 ([parent.(ignore-errors.(forge-g
16e80 65 74 2d 70 61 72 65 6e 74 20 6f 62 6a 65 63 74 29 29 5d 0a 20 20 20 20 20 20 20 28 66 6f 72 67 et-parent.object))]........(forg
16ea0 65 2d 2d 66 6f 72 6d 61 74 2d 72 65 73 6f 75 72 63 65 20 70 61 72 65 6e 74 20 72 65 73 6f 75 72 e--format-resource.parent.resour
16ec0 63 65 29 29 0a 20 20 20 20 20 20 28 28 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 72 65 73 6f 6c ce)).......((error."Cannot.resol
16ee0 76 65 20 25 73 20 66 6f 72 20 61 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d ve.%s.for.a.%s"...............(m
16f00 61 74 63 68 2d 73 74 72 69 6e 67 20 30 20 72 65 73 6f 75 72 63 65 29 0a 20 20 20 20 20 20 20 20 atch-string.0.resource).........
16f20 20 20 20 20 20 20 28 65 69 65 69 6f 2d 6f 62 6a 65 63 74 2d 63 6c 61 73 73 20 6f 62 6a 65 63 74 ......(eieio-object-class.object
16f40 29 29 29 29 29 29 0a 0a 3b 3b 3b 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 0a 0a 28 64 65 66 75 ))))))..;;;.Miscellaneous..(defu
16f60 6e 20 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 20 28 26 6f 70 74 69 6f 6e 61 n.forge-refresh-buffer.(&optiona
16f80 6c 20 62 75 66 66 65 72 29 0a 20 20 22 52 65 66 72 65 73 68 20 74 68 65 20 63 75 72 72 65 6e 74 l.buffer)..."Refresh.the.current
16fa0 20 62 75 66 66 65 72 2c 20 69 66 20 69 74 20 69 73 20 61 20 4d 61 67 69 74 20 6f 72 20 46 6f 72 .buffer,.if.it.is.a.Magit.or.For
16fc0 67 65 20 62 75 66 66 65 72 2e 0a 0a 52 65 66 72 65 73 68 20 74 68 65 20 62 75 66 66 65 72 20 69 ge.buffer...Refresh.the.buffer.i
16fe0 66 20 69 74 73 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 64 65 72 69 76 65 73 20 66 72 6f 6d 20 60 6d f.its.major-mode.derives.from.`m
17000 61 67 69 74 2d 6d 6f 64 65 27 0a 6f 72 20 60 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d agit-mode'.or.`forge-repository-
17020 6c 69 73 74 2d 6d 6f 64 65 27 2e 20 20 49 66 20 6f 70 74 69 6f 6e 61 6c 20 42 55 46 46 45 52 20 list-mode'...If.optional.BUFFER.
17040 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 0a 74 68 65 6e 20 72 65 66 72 65 73 68 20 74 68 61 74 20 62 75 is.non-nil,.then.refresh.that.bu
17060 66 66 65 72 2c 20 70 72 6f 76 69 64 65 64 20 69 74 20 69 73 20 61 6c 69 76 65 20 61 6e 64 20 73 ffer,.provided.it.is.alive.and.s
17080 61 74 69 73 66 69 65 73 0a 74 68 65 20 6d 6f 64 65 20 72 65 71 75 69 72 65 6d 65 6e 74 2e 0a 0a atisfies.the.mode.requirement...
170a0 57 68 65 6e 20 63 65 72 74 61 69 6e 20 46 6f 72 67 65 20 6d 65 6e 75 73 20 61 72 65 20 61 63 74 When.certain.Forge.menus.are.act
170c0 69 76 65 2c 20 72 65 66 72 65 73 68 20 74 68 65 6d 20 74 6f 6f 2e 22 0a 20 20 28 69 6e 74 65 72 ive,.refresh.them.too."...(inter
170e0 61 63 74 69 76 65 29 0a 20 20 28 63 6f 6e 64 20 28 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 active)...(cond.(buffer.........
17100 20 28 77 68 65 6e 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 66 65 72 29 0a 20 20 .(when.(buffer-live-p.buffer)...
17120 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 .........(with-current-buffer.bu
17140 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 ffer..............(forge-refresh
17160 2d 62 75 66 66 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 28 64 65 72 69 76 65 64 2d 6d 6f -buffer)))).........((derived-mo
17180 64 65 2d 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 de-p.'forge-topic-mode).........
171a0 20 28 6d 61 67 69 74 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 .(magit-refresh-buffer))........
171c0 20 28 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 6d 61 67 69 74 2d 6d 6f 64 65 29 0a 20 .((derived-mode-p.'magit-mode)..
171e0 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a ........(magit-refresh-buffer)).
17200 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 ........((and.(derived-mode-p.'f
17220 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 orge-topic-mode)...............(
17240 62 6f 75 6e 64 70 20 27 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 boundp.'forge--buffer-topics-spe
17260 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 c)...............(oref.forge--bu
17280 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 67 6c 6f 62 61 6c 29 29 0a 20 20 20 20 20 20 ffer-topics-spec.global)).......
172a0 20 20 20 28 72 65 76 65 72 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 28 64 65 ...(revert-buffer)).........((de
172c0 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c rived-mode-p.'forge-repository-l
172e0 69 73 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 76 65 72 74 2d 62 75 66 66 65 ist-mode)..........(revert-buffe
17300 72 29 29 29 0a 20 20 28 77 68 65 6e 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 63 74 69 76 65 2d 70 r)))...(when.(transient-active-p
17320 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 27 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e refix..........'(forge-topic-men
17340 75 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 0a 20 u............forge-topics-menu..
17360 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 65 ..........forge-notifications-me
17380 6e 75 29 29 0a 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 2d 72 65 66 72 65 73 68 2d 74 72 61 nu)).....(transient--refresh-tra
173a0 6e 73 69 65 6e 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a nsient)))..(defun.forge--sanitiz
173c0 65 2d 73 74 72 69 6e 67 20 28 73 74 72 69 6e 67 29 0a 20 20 3b 3b 20 46 6f 72 20 47 69 74 6c 61 e-string.(string)...;;.For.Gitla
173e0 62 20 74 68 69 73 20 6d 61 79 20 61 6c 73 6f 20 62 65 20 6e 69 6c 2e 0a 20 20 28 69 66 20 73 74 b.this.may.also.be.nil....(if.st
17400 72 69 6e 67 20 28 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 20 22 5c 72 5c 6e 22 20 22 5c 6e 22 ring.(string-replace."\r\n"."\n"
17420 20 73 74 72 69 6e 67 29 20 22 22 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 62 75 66 .string).""))..(defun.forge--buf
17440 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 26 6f 70 fer-substring-no-properties.(&op
17460 74 69 6f 6e 61 6c 20 73 74 61 72 74 20 65 6e 64 29 0a 20 20 22 4c 69 6b 65 20 60 62 75 66 66 65 tional.start.end)..."Like.`buffe
17480 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 27 20 62 75 74 20 74 r-substring-no-properties'.but.t
174a0 68 65 20 61 72 67 75 6d 65 6e 74 73 20 61 72 65 20 6f 70 74 69 6f 6e 61 6c 2e 0a 4f 70 74 69 6f he.arguments.are.optional..Optio
174c0 6e 61 6c 20 53 54 41 52 54 20 64 65 66 61 75 6c 74 73 20 74 6f 20 74 68 65 20 76 61 6c 75 65 20 nal.START.defaults.to.the.value.
174e0 6f 66 20 60 70 6f 69 6e 74 2d 6d 69 6e 27 2e 0a 4f 70 74 69 6f 6e 61 6c 20 45 4e 44 20 64 65 66 of.`point-min'..Optional.END.def
17500 61 75 6c 74 73 20 74 6f 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 60 70 6f 69 6e 74 2d 6d 61 78 aults.to.the.value.of.`point-max
17520 27 2e 22 0a 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 '."...(buffer-substring-no-prope
17540 72 74 69 65 73 20 28 6f 72 20 73 74 61 72 74 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 rties.(or.start.(point-min))....
17560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
17580 6f 72 20 65 6e 64 20 20 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 or.end...(point-max))))..(defun.
175a0 66 6f 72 67 65 2d 2d 75 75 69 64 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 73 74 72 69 6e 67 20 forge--uuid.()..."Return.string.
175c0 77 69 74 68 20 72 61 6e 64 6f 6d 20 28 76 65 72 73 69 6f 6e 20 34 29 20 55 55 49 44 2e 22 0a 20 with.random.(version.4).UUID."..
175e0 20 3b 3b 20 54 68 69 73 20 69 73 20 61 20 63 6f 70 79 20 6f 66 20 60 6f 72 67 2d 69 64 2d 75 75 .;;.This.is.a.copy.of.`org-id-uu
17600 69 64 27 2e 0a 20 20 3b 3b 20 4f 6e 6c 79 20 75 73 65 64 20 69 6e 20 60 66 6f 72 67 65 2d 63 72 id'....;;.Only.used.in.`forge-cr
17620 65 61 74 65 2d 6d 61 72 6b 27 2e 0a 20 20 28 6c 65 74 20 28 28 72 6e 64 20 28 6d 64 35 20 28 66 eate-mark'....(let.((rnd.(md5.(f
17640 6f 72 6d 61 74 20 22 25 73 25 73 25 73 25 73 25 73 25 73 25 73 22 0a 20 20 20 20 20 20 20 20 20 ormat."%s%s%s%s%s%s%s"..........
17660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 61 6e 64 6f 6d 29 0a 20 20 20 20 20 20 .................(random).......
17680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 65 6e 74 2d 74 69 6d ....................(current-tim
176a0 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 e)...........................(us
176c0 65 72 2d 75 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 er-uid).........................
176e0 20 20 28 65 6d 61 63 73 2d 70 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..(emacs-pid)...................
17700 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 66 75 6c 6c 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 ........(user-full-name)........
17720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 73 65 72 2d 6d 61 69 6c 2d 61 64 64 ...................user-mail-add
17740 72 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ress...........................(
17760 72 65 63 65 6e 74 2d 6b 65 79 73 29 29 29 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 recent-keys))))).....(format."%s
17780 2d 25 73 2d 34 25 73 2d 25 73 25 73 2d 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 -%s-4%s-%s%s-%s".............(su
177a0 62 73 74 72 69 6e 67 20 72 6e 64 20 30 20 38 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 bstring.rnd.0.8).............(su
177c0 62 73 74 72 69 6e 67 20 72 6e 64 20 38 20 31 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 bstring.rnd.8.12).............(s
177e0 75 62 73 74 72 69 6e 67 20 72 6e 64 20 31 33 20 31 36 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ubstring.rnd.13.16).............
17800 28 66 6f 72 6d 61 74 20 22 25 78 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (format."%x"....................
17820 20 28 6c 6f 67 69 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 62 .(logior......................#b
17840 31 30 30 30 30 30 30 30 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 10000000......................(l
17860 6f 67 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 62 31 30 ogand.......................#b10
17880 31 31 31 31 31 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 111111.......................(st
178a0 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ring-to-number..................
178c0 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 72 6e 64 20 31 36 20 31 38 29 20 31 36 29 29 ......(substring.rnd.16.18).16))
178e0 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 72 6e 64 20 31 38 )).............(substring.rnd.18
17900 20 32 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 72 6e 64 20 .20).............(substring.rnd.
17920 32 30 20 33 32 29 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 20.32))))..;;;._.;;.Local.Variab
17940 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a 20 les:.;;.read-symbol-shorthands:.
17960 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d (.;;...("and$"............"cond-
17980 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 20 let--and$").;;...("and-let".....
179a0 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 ...."cond-let--and-let").;;...("
179c0 69 66 2d 6c 65 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d 6c if-let".........."cond-let--if-l
179e0 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 6f et").;;...("when-let"........"co
17a00 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f nd-let--when-let")).;;.End:.(pro
17a20 76 69 64 65 20 27 66 6f 72 67 65 2d 63 6f 72 65 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 63 6f 72 65 vide.'forge-core).;;;.forge-core
17a40 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .el.ends.here...................
17a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17c00 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 64 62 2e 65 6c 00 forge-20250916.1119/forge-db.el.
17c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17c60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
17c80 30 30 35 31 36 33 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 31 33 36 00 20 30 00 00 00 0051633.00000000000.014136..0...
17ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17d00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
17d20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
17d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
17e00 3b 3b 3b 20 66 6f 72 67 65 2d 64 62 2e 65 6c 20 2d 2d 2d 20 44 61 74 61 62 61 73 65 20 69 6d 70 ;;;.forge-db.el.---.Database.imp
17e20 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 lementation..-*-.lexical-binding
17e40 3a 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 :t.-*-..;;.Copyright.(C).2018-20
17e60 32 35 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 25.Jonas.Bernoulli..;;.Author:.J
17e80 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 onas.Bernoulli.<emacs.forge@jona
17ea0 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 s.bernoulli.dev>.;;.Maintainer:.
17ec0 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e Jonas.Bernoulli.<emacs.forge@jon
17ee0 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e as.bernoulli.dev>..;;.SPDX-Licen
17f00 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a se-Identifier:.GPL-3.0-or-later.
17f20 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 .;;.This.file.is.free.software:.
17f40 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d you.can.redistribute.it.and/or.m
17f60 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 odify.;;.it.under.the.terms.of.t
17f80 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 he.GNU.General.Public.License.as
17fa0 20 70 75 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 .published.;;.by.the.Free.Softwa
17fc0 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 re.Foundation,.either.version.3.
17fe0 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f of.the.License,.;;.or.(at.your.o
18000 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 ption).any.later.version..;;.;;.
18020 54 68 69 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 This.file.is.distributed.in.the.
18040 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 hope.that.it.will.be.useful,.;;.
18060 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 but.WITHOUT.ANY.WARRANTY;.withou
18080 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b t.even.the.implied.warranty.of.;
180a0 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 ;.MERCHANTABILITY.or.FITNESS.FOR
180c0 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a .A.PARTICULAR.PURPOSE...See.the.
180e0 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f ;;.GNU.General.Public.License.fo
18100 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 r.more.details..;;.;;.You.should
18120 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 .have.received.a.copy.of.the.GNU
18140 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 .General.Public.License.;;.along
18160 20 77 69 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 .with.this.file...If.not,.see.<h
18180 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a ttps://www.gnu.org/licenses/>...
181a0 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 6c 6f 73 71 6c 29 0a 28 72 65 ;;;.Code:..(require.'closql).(re
181c0 71 75 69 72 65 20 27 63 6f 6d 70 61 74 29 0a 28 72 65 71 75 69 72 65 20 27 65 69 65 69 6f 29 0a quire.'compat).(require.'eieio).
181e0 28 72 65 71 75 69 72 65 20 27 65 6d 61 63 73 71 6c 29 0a 0a 3b 3b 20 46 6f 72 20 60 63 6c 6f 73 (require.'emacsql)..;;.For.`clos
18200 71 6c 2d 2d 64 62 2d 75 70 64 61 74 65 2d 73 63 68 65 6d 61 27 3a 0a 28 64 65 63 6c 61 72 65 2d ql--db-update-schema':.(declare-
18220 66 75 6e 63 74 69 6f 6e 20 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 22 66 6f 72 67 65 function.forge--object-id."forge
18240 2d 63 6f 72 65 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 66 6f 72 67 65 2d -core").(declare-function.forge-
18260 67 65 74 2d 69 73 73 75 65 20 22 66 6f 72 67 65 2d 63 6f 72 65 22 29 0a 28 64 65 63 6c 61 72 65 get-issue."forge-core").(declare
18280 2d 66 75 6e 63 74 69 6f 6e 20 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 22 66 6f 72 -function.forge-get-pullreq."for
182a0 67 65 2d 63 6f 72 65 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 66 6f 72 67 ge-core").(declare-function.forg
182c0 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 22 66 6f 72 67 65 2d 63 6f 72 65 22 20 28 64 e-get-repository."forge-core".(d
182e0 65 6d 61 6e 64 29 29 0a 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 0a 20 20 28 63 emand))..(eval-when-compile...(c
18300 6c 2d 70 75 73 68 6e 65 77 20 27 6d 69 6c 65 73 74 6f 6e 65 20 65 69 65 69 6f 2d 2d 6b 6e 6f 77 l-pushnew.'milestone.eieio--know
18320 6e 2d 73 6c 6f 74 2d 6e 61 6d 65 73 29 20 20 3b 20 66 6f 72 67 65 2d 7b 69 73 73 75 65 2c 70 75 n-slot-names)..;.forge-{issue,pu
18340 6c 6c 72 65 71 7d 0a 20 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 27 6e 75 6d 62 65 72 20 20 20 20 llreq}...(cl-pushnew.'number....
18360 65 69 65 69 6f 2d 2d 6b 6e 6f 77 6e 2d 73 6c 6f 74 2d 6e 61 6d 65 73 29 29 20 3b 20 66 6f 72 67 eieio--known-slot-names)).;.forg
18380 65 2d 7b 69 73 73 75 65 2c 70 75 6c 6c 72 65 71 2c 2e 2e 2e 7d 0a 0a 3b 3b 3b 20 4f 70 74 69 6f e-{issue,pullreq,...}..;;;.Optio
183a0 6e 73 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 64 61 74 61 62 61 73 65 2d 66 69 ns..(defcustom.forge-database-fi
183c0 6c 65 0a 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 66 6f 72 67 65 2d 64 61 le...(expand-file-name."forge-da
183e0 74 61 62 61 73 65 2e 73 71 6c 69 74 65 22 20 75 73 65 72 2d 65 6d 61 63 73 2d 64 69 72 65 63 74 tabase.sqlite".user-emacs-direct
18400 6f 72 79 29 0a 20 20 22 54 68 65 20 66 69 6c 65 20 75 73 65 64 20 74 6f 20 73 74 6f 72 65 20 74 ory)..."The.file.used.to.store.t
18420 68 65 20 66 6f 72 67 65 20 64 61 74 61 62 61 73 65 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 he.forge.database."...:package-v
18440 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 31 2e 30 22 29 0a 20 20 3a 67 72 6f ersion.'(forge..."0.1.0")...:gro
18460 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 66 69 6c 65 29 0a 0a 3b 3b 3b 20 43 6f up.'forge...:type.'file)..;;;.Co
18480 72 65 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 64 61 74 61 62 61 73 65 20 28 63 6c re..(defclass.forge-database.(cl
184a0 6f 73 71 6c 2d 64 61 74 61 62 61 73 65 29 0a 20 20 28 28 6e 61 6d 65 20 20 20 20 20 20 20 20 20 osql-database)...((name.........
184c0 3a 69 6e 69 74 66 6f 72 6d 20 22 46 6f 72 67 65 22 29 0a 20 20 20 28 6f 62 6a 65 63 74 2d 63 6c :initform."Forge")....(object-cl
184e0 61 73 73 20 3a 69 6e 69 74 66 6f 72 6d 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 ass.:initform.'forge-repository)
18500 0a 20 20 20 28 66 69 6c 65 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 66 6f 72 ....(file.........:initform.'for
18520 67 65 2d 64 61 74 61 62 61 73 65 2d 66 69 6c 65 29 0a 20 20 20 28 73 63 68 65 6d 61 74 61 20 20 ge-database-file)....(schemata..
18540 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 66 6f 72 67 65 2d 2d 64 62 2d 74 61 62 6c 65 2d 73 63 ...:initform.'forge--db-table-sc
18560 68 65 6d 61 74 61 29 0a 20 20 20 28 76 65 72 73 69 6f 6e 20 20 20 20 20 20 3a 69 6e 69 74 66 6f hemata)....(version......:initfo
18580 72 6d 20 31 35 29 29 29 0a 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 2d 6f 76 65 72 72 69 64 rm.15)))..(defvar.forge--overrid
185a0 65 2d 63 6f 6e 6e 65 63 74 69 6f 6e 2d 63 6c 61 73 73 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 e-connection-class.nil)..(defun.
185c0 66 6f 72 67 65 2d 64 62 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6c 69 76 65 70 29 0a 20 20 28 63 6c forge-db.(&optional.livep)...(cl
185e0 6f 73 71 6c 2d 64 62 20 27 66 6f 72 67 65 2d 64 61 74 61 62 61 73 65 20 6c 69 76 65 70 20 66 6f osql-db.'forge-database.livep.fo
18600 72 67 65 2d 2d 6f 76 65 72 72 69 64 65 2d 63 6f 6e 6e 65 63 74 69 6f 6e 2d 63 6c 61 73 73 29 29 rge--override-connection-class))
18620 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 73 71 6c 20 28 73 71 6c 20 26 72 65 73 74 20 61 72 ..(defun.forge-sql.(sql.&rest.ar
18640 67 73 29 0a 20 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 73 71 6c 29 0a 20 20 20 20 20 20 28 65 gs)...(if.(stringp.sql).......(e
18660 6d 61 63 73 71 6c 20 28 66 6f 72 67 65 2d 64 62 29 20 28 61 70 70 6c 79 20 23 27 66 6f 72 6d 61 macsql.(forge-db).(apply.#'forma
18680 74 20 73 71 6c 20 61 72 67 73 29 29 0a 20 20 20 20 28 61 70 70 6c 79 20 23 27 65 6d 61 63 73 71 t.sql.args)).....(apply.#'emacsq
186a0 6c 20 28 66 6f 72 67 65 2d 64 62 29 20 73 71 6c 20 61 72 67 73 29 29 29 0a 0a 28 64 65 66 75 6e l.(forge-db).sql.args)))..(defun
186c0 20 66 6f 72 67 65 2d 73 71 6c 31 20 28 73 71 6c 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 28 .forge-sql1.(sql.&rest.args)...(
186e0 63 61 61 72 20 28 61 70 70 6c 79 20 23 27 66 6f 72 67 65 2d 73 71 6c 20 73 71 6c 20 61 72 67 73 caar.(apply.#'forge-sql.sql.args
18700 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 73 71 6c 2d 63 61 72 20 28 73 71 6c 20 26 )))..(defun.forge-sql-car.(sql.&
18720 72 65 73 74 20 61 72 67 73 29 0a 20 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 28 61 70 70 6c rest.args)...(mapcar.#'car.(appl
18740 79 20 23 27 66 6f 72 67 65 2d 73 71 6c 20 73 71 6c 20 61 72 67 73 29 29 29 0a 0a 28 64 65 66 75 y.#'forge-sql.sql.args)))..(defu
18760 6e 20 66 6f 72 67 65 2d 73 71 6c 2d 63 64 72 20 28 73 71 6c 20 26 72 65 73 74 20 61 72 67 73 29 n.forge-sql-cdr.(sql.&rest.args)
18780 0a 20 20 28 6d 61 70 63 61 72 20 23 27 63 64 72 20 28 61 70 70 6c 79 20 23 27 66 6f 72 67 65 2d ...(mapcar.#'cdr.(apply.#'forge-
187a0 73 71 6c 20 73 71 6c 20 61 72 67 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 6f sql.sql.args)))..(defun.forge-co
187c0 6e 6e 65 63 74 2d 64 61 74 61 62 61 73 65 2d 6f 6e 63 65 20 28 29 0a 20 20 22 54 72 79 20 74 6f nnect-database-once.()..."Try.to
187e0 20 63 6f 6e 6e 65 63 74 20 46 6f 72 67 65 20 64 61 74 61 62 61 73 65 20 6f 6e 20 66 69 72 73 74 .connect.Forge.database.on.first
18800 20 75 73 65 20 6f 66 20 60 6d 61 67 69 74 2d 73 74 61 74 75 73 27 20 6f 6e 6c 79 2e 22 0a 20 20 .use.of.`magit-status'.only."...
18820 28 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 27 6d 61 67 69 74 2d 73 74 61 74 75 73 2d 6d 6f 64 65 2d (remove-hook.'magit-status-mode-
18840 68 6f 6f 6b 20 23 27 66 6f 72 67 65 2d 63 6f 6e 6e 65 63 74 2d 64 61 74 61 62 61 73 65 2d 6f 6e hook.#'forge-connect-database-on
18860 63 65 29 0a 20 20 28 66 6f 72 67 65 2d 64 62 29 29 0a 28 61 64 64 2d 68 6f 6f 6b 20 27 6d 61 67 ce)...(forge-db)).(add-hook.'mag
18880 69 74 2d 73 74 61 74 75 73 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 23 27 66 6f 72 67 65 2d 63 6f 6e 6e it-status-mode-hook.#'forge-conn
188a0 65 63 74 2d 64 61 74 61 62 61 73 65 2d 6f 6e 63 65 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 ect-database-once)..(defun.forge
188c0 2d 65 6e 61 62 6c 65 2d 73 71 6c 2d 6c 6f 67 67 69 6e 67 20 28 29 0a 20 20 22 45 6e 61 62 6c 65 -enable-sql-logging.()..."Enable
188e0 20 6c 6f 67 67 69 6e 67 20 46 6f 72 67 65 27 73 20 53 51 4c 20 71 75 65 72 69 65 73 2e 22 0a 20 .logging.Forge's.SQL.queries."..
18900 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 63 6f 6e 6e 20 28 6f 72 .(interactive)...(let.((conn.(or
18920 65 66 20 28 66 6f 72 67 65 2d 64 62 29 20 63 6f 6e 6e 65 63 74 69 6f 6e 29 29 29 0a 20 20 20 20 ef.(forge-db).connection))).....
18940 28 65 6d 61 63 73 71 6c 2d 65 6e 61 62 6c 65 2d 64 65 62 75 67 67 69 6e 67 20 63 6f 6e 6e 29 0a (emacsql-enable-debugging.conn).
18960 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 ....(switch-to-buffer-other-wind
18980 6f 77 20 28 6f 72 65 66 20 63 6f 6e 6e 20 6c 6f 67 2d 62 75 66 66 65 72 29 29 29 29 0a 0a 3b 3b ow.(oref.conn.log-buffer))))..;;
189a0 3b 20 53 63 68 65 6d 61 74 61 0a 0a 28 64 65 66 63 6f 6e 73 74 20 66 6f 72 67 65 2d 2d 64 62 2d ;.Schemata..(defconst.forge--db-
189c0 74 61 62 6c 65 2d 73 63 68 65 6d 61 74 61 0a 20 20 27 28 28 72 65 70 6f 73 69 74 6f 72 79 0a 20 table-schemata...'((repository..
189e0 20 20 20 20 5b 28 63 6c 61 73 73 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 69 64 ....[(class.:not-null).......(id
18a00 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 20 20 20 20 20 66 .:not-null.:primary-key).......f
18a20 6f 72 67 65 2d 69 64 0a 20 20 20 20 20 20 66 6f 72 67 65 0a 20 20 20 20 20 20 6f 77 6e 65 72 0a orge-id.......forge.......owner.
18a40 20 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 61 70 69 68 6f 73 74 0a 20 20 20 20 20 20 67 ......name.......apihost.......g
18a60 69 74 68 6f 73 74 0a 20 20 20 20 20 20 72 65 6d 6f 74 65 0a 20 20 20 20 20 20 63 6f 6e 64 69 74 ithost.......remote.......condit
18a80 69 6f 6e 0a 20 20 20 20 20 20 63 72 65 61 74 65 64 0a 20 20 20 20 20 20 75 70 64 61 74 65 64 0a ion.......created.......updated.
18aa0 20 20 20 20 20 20 70 75 73 68 65 64 0a 20 20 20 20 20 20 70 61 72 65 6e 74 0a 20 20 20 20 20 20 ......pushed.......parent.......
18ac0 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 20 20 20 68 6f 6d 65 70 61 67 65 0a 20 20 20 20 20 description.......homepage......
18ae0 20 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 0a 20 20 20 20 20 20 61 72 63 68 69 76 65 64 2d 70 .default-branch.......archived-p
18b00 0a 20 20 20 20 20 20 66 6f 72 6b 2d 70 0a 20 20 20 20 20 20 6c 6f 63 6b 65 64 2d 70 0a 20 20 20 .......fork-p.......locked-p....
18b20 20 20 20 6d 69 72 72 6f 72 2d 70 0a 20 20 20 20 20 20 70 72 69 76 61 74 65 2d 70 0a 20 20 20 20 ...mirror-p.......private-p.....
18b40 20 20 69 73 73 75 65 73 2d 70 0a 20 20 20 20 20 20 77 69 6b 69 2d 70 0a 20 20 20 20 20 20 73 74 ..issues-p.......wiki-p.......st
18b60 61 72 73 0a 20 20 20 20 20 20 77 61 74 63 68 65 72 73 0a 20 20 20 20 20 20 28 61 73 73 69 67 6e ars.......watchers.......(assign
18b80 65 65 73 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 ees.:default.eieio-unbound).....
18ba0 20 20 28 66 6f 72 6b 73 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f ..(forks.....:default.eieio-unbo
18bc0 75 6e 64 29 0a 20 20 20 20 20 20 28 69 73 73 75 65 73 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 und).......(issues....:default.e
18be0 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 6c 61 62 65 6c 73 20 20 20 20 3a ieio-unbound).......(labels....:
18c00 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 72 65 default.eieio-unbound).......(re
18c20 76 6e 6f 74 65 73 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a vnotes..:default.eieio-unbound).
18c40 20 20 20 20 20 20 28 70 75 6c 6c 72 65 71 73 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d ......(pullreqs..:default.eieio-
18c60 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 73 65 6c 65 63 74 69 76 65 2d 70 0a 20 20 20 20 20 unbound).......selective-p......
18c80 20 77 6f 72 6b 74 72 65 65 0a 20 20 20 20 20 20 28 6d 69 6c 65 73 74 6f 6e 65 73 20 3a 64 65 66 .worktree.......(milestones.:def
18ca0 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 69 73 73 75 65 73 ault.eieio-unbound).......issues
18cc0 2d 75 6e 74 69 6c 0a 20 20 20 20 20 20 70 75 6c 6c 72 65 71 73 2d 75 6e 74 69 6c 0a 20 20 20 20 -until.......pullreqs-until.....
18ce0 20 20 74 65 61 6d 73 0a 20 20 20 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 2d 63 61 74 65 67 6f ..teams.......(discussion-catego
18d00 72 69 65 73 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 ries.:default.eieio-unbound)....
18d20 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 73 20 20 20 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 ...(discussions...........:defau
18d40 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 64 69 73 63 75 73 73 69 lt.eieio-unbound).......discussi
18d60 6f 6e 73 2d 70 0a 20 20 20 20 20 20 64 69 73 63 75 73 73 69 6f 6e 73 2d 75 6e 74 69 6c 0a 20 20 ons-p.......discussions-until...
18d80 20 20 20 20 5d 29 0a 0a 20 20 20 20 28 61 73 73 69 67 6e 65 65 0a 20 20 20 20 20 5b 28 72 65 70 ....])......(assignee......[(rep
18da0 6f 73 69 74 6f 72 79 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 69 64 20 3a 6e 6f ository.:not-null).......(id.:no
18dc0 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 20 20 20 20 20 6c 6f 67 69 6e t-null.:primary-key).......login
18de0 0a 20 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 66 6f 72 67 65 2d 69 64 5d 0a 20 20 20 20 .......name.......forge-id].....
18e00 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 72 65 70 6f 73 69 74 6f 72 79 .(:foreign-key.......[repository
18e20 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 72 65 70 6f 73 69 74 6f 72 79 20 5b 69 64 5d 0a 20 20 ].:references.repository.[id]...
18e40 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 ....:on-delete.:cascade))......(
18e60 64 69 73 63 75 73 73 69 6f 6e 0a 20 20 20 20 20 5b 28 63 6c 61 73 73 20 3a 6e 6f 74 2d 6e 75 6c discussion......[(class.:not-nul
18e80 6c 29 0a 20 20 20 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d l).......(id.:not-null.:primary-
18ea0 6b 65 79 29 0a 20 20 20 20 20 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 6e 75 6d 62 key).......repository.......numb
18ec0 65 72 0a 20 20 20 20 20 20 61 6e 73 77 65 72 0a 20 20 20 20 20 20 73 74 61 74 65 0a 20 20 20 20 er.......answer.......state.....
18ee0 20 20 61 75 74 68 6f 72 0a 20 20 20 20 20 20 74 69 74 6c 65 0a 20 20 20 20 20 20 63 72 65 61 74 ..author.......title.......creat
18f00 65 64 0a 20 20 20 20 20 20 75 70 64 61 74 65 64 0a 20 20 20 20 20 20 63 6c 6f 73 65 64 0a 20 20 ed.......updated.......closed...
18f20 20 20 20 20 73 74 61 74 75 73 0a 20 20 20 20 20 20 6c 6f 63 6b 65 64 2d 70 0a 20 20 20 20 20 20 ....status.......locked-p.......
18f40 63 61 74 65 67 6f 72 79 0a 20 20 20 20 20 20 62 6f 64 79 0a 20 20 20 20 20 20 28 63 61 72 64 73 category.......body.......(cards
18f60 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a ........:default.eieio-unbound).
18f80 20 20 20 20 20 20 28 65 64 69 74 73 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 ......(edits........:default.eie
18fa0 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 6c 61 62 65 6c 73 20 20 20 20 20 20 20 io-unbound).......(labels.......
18fc0 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 70 :default.eieio-unbound).......(p
18fe0 61 72 74 69 63 69 70 61 6e 74 73 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 articipants.:default.eieio-unbou
19000 6e 64 29 0a 20 20 20 20 20 20 28 70 6f 73 74 73 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 nd).......(posts........:default
19020 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 72 65 61 63 74 69 6f 6e 73 .eieio-unbound).......(reactions
19040 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 ....:default.eieio-unbound).....
19060 20 20 28 74 69 6d 65 6c 69 6e 65 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 ..(timeline.....:default.eieio-u
19080 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 6d 61 72 6b 73 20 20 20 20 20 20 20 20 3a 64 65 66 nbound).......(marks........:def
190a0 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 6e 6f 74 65 0a 20 ault.eieio-unbound).......note..
190c0 20 20 20 20 20 74 68 65 69 72 2d 69 64 0a 20 20 20 20 20 20 73 6c 75 67 0a 20 20 20 20 20 20 73 .....their-id.......slug.......s
190e0 61 76 65 64 2d 70 5d 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 aved-p]......(:foreign-key......
19100 20 5b 72 65 70 6f 73 69 74 6f 72 79 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 72 65 70 6f 73 69 .[repository].:references.reposi
19120 74 6f 72 79 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 tory.[id].......:on-delete.:casc
19140 61 64 65 29 29 0a 0a 20 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 2d 63 61 74 65 67 6f 72 79 0a ade))......(discussion-category.
19160 20 20 20 20 20 5b 28 72 65 70 6f 73 69 74 6f 72 79 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 .....[(repository.:not-null)....
19180 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 ...(id.:not-null.:primary-key)..
191a0 20 20 20 20 20 74 68 65 69 72 2d 69 64 0a 20 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 65 .....their-id.......name.......e
191c0 6d 6f 6a 69 0a 20 20 20 20 20 20 61 6e 73 77 65 72 61 62 6c 65 2d 70 0a 20 20 20 20 20 20 64 65 moji.......answerable-p.......de
191e0 73 63 72 69 70 74 69 6f 6e 5d 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 scription]......(:foreign-key...
19200 20 20 20 20 5b 72 65 70 6f 73 69 74 6f 72 79 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 72 65 70 ....[repository].:references.rep
19220 6f 73 69 74 6f 72 79 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 ository.[id].......:on-delete.:c
19240 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 2d 6c 61 62 65 6c 0a ascade))......(discussion-label.
19260 20 20 20 20 20 5b 28 64 69 73 63 75 73 73 69 6f 6e 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 .....[(discussion.:not-null)....
19280 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 5d 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 ...(id.:not-null)]......(:foreig
192a0 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 64 69 73 63 75 73 73 69 6f 6e 5d 20 3a 72 65 66 65 72 65 n-key.......[discussion].:refere
192c0 6e 63 65 73 20 64 69 73 63 75 73 73 69 6f 6e 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 nces.discussion.[id].......:on-d
192e0 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b elete.:cascade)......(:foreign-k
19300 65 79 0a 20 20 20 20 20 20 5b 69 64 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 6c 61 62 65 6c 20 ey.......[id].:references.label.
19320 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 [id].......:on-delete.:cascade))
19340 0a 0a 20 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 2d 6d 61 72 6b 0a 20 20 20 20 20 5b 28 64 69 ......(discussion-mark......[(di
19360 73 63 75 73 73 69 6f 6e 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 69 64 20 3a 6e scussion.:not-null).......(id.:n
19380 6f 74 2d 6e 75 6c 6c 29 5d 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 ot-null)]......(:foreign-key....
193a0 20 20 20 5b 64 69 73 63 75 73 73 69 6f 6e 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 64 69 73 63 ...[discussion].:references.disc
193c0 75 73 73 69 6f 6e 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 ussion.[id].......:on-delete.:ca
193e0 73 63 61 64 65 29 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 scade)......(:foreign-key.......
19400 5b 69 64 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 6d 61 72 6b 20 5b 69 64 5d 0a 20 20 20 20 20 [id].:references.mark.[id]......
19420 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 64 69 73 .:on-delete.:cascade))......(dis
19440 63 75 73 73 69 6f 6e 2d 70 6f 73 74 20 3b 20 61 6b 61 20 74 6f 70 2d 6c 65 76 65 6c 20 61 6e 73 cussion-post.;.aka.top-level.ans
19460 77 65 72 0a 20 20 20 20 20 5b 28 63 6c 61 73 73 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 wer......[(class.:not-null).....
19480 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 20 ..(id.:not-null.:primary-key)...
194a0 20 20 20 20 74 68 65 69 72 2d 69 64 0a 20 20 20 20 20 20 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 ....their-id.......number.......
194c0 64 69 73 63 75 73 73 69 6f 6e 0a 20 20 20 20 20 20 61 75 74 68 6f 72 0a 20 20 20 20 20 20 63 72 discussion.......author.......cr
194e0 65 61 74 65 64 0a 20 20 20 20 20 20 75 70 64 61 74 65 64 0a 20 20 20 20 20 20 62 6f 64 79 0a 20 eated.......updated.......body..
19500 20 20 20 20 20 28 65 64 69 74 73 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 .....(edits........:default.eiei
19520 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 72 65 61 63 74 69 6f 6e 73 20 20 20 20 3a o-unbound).......(reactions....:
19540 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 72 65 default.eieio-unbound).......(re
19560 70 6c 69 65 73 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e plies......:default.eieio-unboun
19580 64 29 5d 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 64 69 d)]......(:foreign-key.......[di
195a0 73 63 75 73 73 69 6f 6e 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 64 69 73 63 75 73 73 69 6f 6e scussion].:references.discussion
195c0 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 .[id].......:on-delete.:cascade)
195e0 29 0a 0a 20 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 2d 72 65 70 6c 79 20 3b 20 61 6b 61 20 6e )......(discussion-reply.;.aka.n
19600 65 73 74 65 64 20 72 65 70 6c 79 20 74 6f 20 74 6f 70 2d 6c 65 76 65 6c 20 61 6e 73 77 65 72 0a ested.reply.to.top-level.answer.
19620 20 20 20 20 20 5b 28 63 6c 61 73 73 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 69 .....[(class.:not-null).......(i
19640 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 20 20 20 20 20 d.:not-null.:primary-key).......
19660 74 68 65 69 72 2d 69 64 0a 20 20 20 20 20 20 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 70 6f 73 74 their-id.......number.......post
19680 0a 20 20 20 20 20 20 64 69 73 63 75 73 73 69 6f 6e 0a 20 20 20 20 20 20 61 75 74 68 6f 72 0a 20 .......discussion.......author..
196a0 20 20 20 20 20 63 72 65 61 74 65 64 0a 20 20 20 20 20 20 75 70 64 61 74 65 64 0a 20 20 20 20 20 .....created.......updated......
196c0 20 62 6f 64 79 0a 20 20 20 20 20 20 28 65 64 69 74 73 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 .body.......(edits........:defau
196e0 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 72 65 61 63 74 69 6f lt.eieio-unbound).......(reactio
19700 6e 73 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 5d 0a 20 ns....:default.eieio-unbound)]..
19720 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 70 6f 73 74 5d 20 3a ....(:foreign-key.......[post].:
19740 72 65 66 65 72 65 6e 63 65 73 20 64 69 73 63 75 73 73 69 6f 6e 2d 70 6f 73 74 20 5b 69 64 5d 0a references.discussion-post.[id].
19760 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 0a 20 20 20 20 20 ......:on-delete.:cascade)......
19780 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 64 69 73 63 75 73 73 69 6f 6e 5d (:foreign-key.......[discussion]
197a0 20 3a 72 65 66 65 72 65 6e 63 65 73 20 64 69 73 63 75 73 73 69 6f 6e 20 5b 69 64 5d 0a 20 20 20 .:references.discussion.[id]....
197c0 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 66 ...:on-delete.:cascade))......(f
197e0 6f 72 6b 0a 20 20 20 20 20 5b 28 70 61 72 65 6e 74 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 ork......[(parent.:not-null)....
19800 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 ...(id.:not-null.:primary-key)..
19820 20 20 20 20 20 6f 77 6e 65 72 0a 20 20 20 20 20 20 6e 61 6d 65 5d 0a 20 20 20 20 20 28 3a 66 6f .....owner.......name]......(:fo
19840 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 70 61 72 65 6e 74 5d 20 3a 72 65 66 65 72 65 reign-key.......[parent].:refere
19860 6e 63 65 73 20 72 65 70 6f 73 69 74 6f 72 79 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 nces.repository.[id].......:on-d
19880 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 69 73 73 75 65 0a 20 20 20 elete.:cascade))......(issue....
198a0 20 20 5b 28 63 6c 61 73 73 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 69 64 20 3a ..[(class.:not-null).......(id.:
198c0 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 20 20 20 20 20 72 65 70 not-null.:primary-key).......rep
198e0 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 73 74 61 74 65 ository.......number.......state
19900 0a 20 20 20 20 20 20 61 75 74 68 6f 72 0a 20 20 20 20 20 20 74 69 74 6c 65 0a 20 20 20 20 20 20 .......author.......title.......
19920 63 72 65 61 74 65 64 0a 20 20 20 20 20 20 75 70 64 61 74 65 64 0a 20 20 20 20 20 20 63 6c 6f 73 created.......updated.......clos
19940 65 64 0a 20 20 20 20 20 20 73 74 61 74 75 73 0a 20 20 20 20 20 20 6c 6f 63 6b 65 64 2d 70 0a 20 ed.......status.......locked-p..
19960 20 20 20 20 20 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 20 20 20 20 62 6f 64 79 0a 20 20 20 20 20 20 .....milestone.......body.......
19980 28 61 73 73 69 67 6e 65 65 73 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 (assignees....:default.eieio-unb
199a0 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 63 61 72 64 73 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 ound).......(cards........:defau
199c0 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 65 64 69 74 73 20 20 lt.eieio-unbound).......(edits..
199e0 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 ......:default.eieio-unbound)...
19a00 20 20 20 20 28 6c 61 62 65 6c 73 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f ....(labels.......:default.eieio
19a20 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 70 61 72 74 69 63 69 70 61 6e 74 73 20 3a 64 -unbound).......(participants.:d
19a40 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 70 6f 73 efault.eieio-unbound).......(pos
19a60 74 73 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 ts........:default.eieio-unbound
19a80 29 0a 20 20 20 20 20 20 28 72 65 61 63 74 69 6f 6e 73 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 ).......(reactions....:default.e
19aa0 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 74 69 6d 65 6c 69 6e 65 20 20 20 ieio-unbound).......(timeline...
19ac0 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 ..:default.eieio-unbound).......
19ae0 28 6d 61 72 6b 73 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 (marks........:default.eieio-unb
19b00 6f 75 6e 64 29 0a 20 20 20 20 20 20 6e 6f 74 65 0a 20 20 20 20 20 20 74 68 65 69 72 2d 69 64 0a ound).......note.......their-id.
19b20 20 20 20 20 20 20 73 6c 75 67 0a 20 20 20 20 20 20 73 61 76 65 64 2d 70 5d 0a 20 20 20 20 20 28 ......slug.......saved-p]......(
19b40 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 72 65 70 6f 73 69 74 6f 72 79 5d 20 :foreign-key.......[repository].
19b60 3a 72 65 66 65 72 65 6e 63 65 73 20 72 65 70 6f 73 69 74 6f 72 79 20 5b 69 64 5d 0a 20 20 20 20 :references.repository.[id].....
19b80 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 69 73 ..:on-delete.:cascade))......(is
19ba0 73 75 65 2d 61 73 73 69 67 6e 65 65 0a 20 20 20 20 20 5b 28 69 73 73 75 65 20 3a 6e 6f 74 2d 6e sue-assignee......[(issue.:not-n
19bc0 75 6c 6c 29 0a 20 20 20 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 5d 0a 20 20 20 20 20 ull).......(id.:not-null)]......
19be0 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 69 73 73 75 65 5d 20 3a 72 65 66 (:foreign-key.......[issue].:ref
19c00 65 72 65 6e 63 65 73 20 69 73 73 75 65 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c erences.issue.[id].......:on-del
19c20 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 69 73 73 75 65 2d 6c 61 62 65 6c ete.:cascade))......(issue-label
19c40 0a 20 20 20 20 20 5b 28 69 73 73 75 65 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 ......[(issue.:not-null).......(
19c60 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 5d 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 id.:not-null)]......(:foreign-ke
19c80 79 0a 20 20 20 20 20 20 5b 69 73 73 75 65 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 69 73 73 75 y.......[issue].:references.issu
19ca0 65 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 e.[id].......:on-delete.:cascade
19cc0 29 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 69 64 5d 20 )......(:foreign-key.......[id].
19ce0 3a 72 65 66 65 72 65 6e 63 65 73 20 6c 61 62 65 6c 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e :references.label.[id].......:on
19d00 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 69 73 73 75 65 2d 6d -delete.:cascade))......(issue-m
19d20 61 72 6b 0a 20 20 20 20 20 5b 28 69 73 73 75 65 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 ark......[(issue.:not-null).....
19d40 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 5d 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e ..(id.:not-null)]......(:foreign
19d60 2d 6b 65 79 0a 20 20 20 20 20 20 5b 69 73 73 75 65 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 69 -key.......[issue].:references.i
19d80 73 73 75 65 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 ssue.[id].......:on-delete.:casc
19da0 61 64 65 29 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 69 ade)......(:foreign-key.......[i
19dc0 64 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 6d 61 72 6b 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a d].:references.mark.[id].......:
19de0 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 69 73 73 75 65 on-delete.:cascade))......(issue
19e00 2d 70 6f 73 74 0a 20 20 20 20 20 5b 28 63 6c 61 73 73 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 -post......[(class.:not-null)...
19e20 20 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a ....(id.:not-null.:primary-key).
19e40 20 20 20 20 20 20 69 73 73 75 65 0a 20 20 20 20 20 20 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 61 ......issue.......number.......a
19e60 75 74 68 6f 72 0a 20 20 20 20 20 20 63 72 65 61 74 65 64 0a 20 20 20 20 20 20 75 70 64 61 74 65 uthor.......created.......update
19e80 64 0a 20 20 20 20 20 20 62 6f 64 79 0a 20 20 20 20 20 20 28 65 64 69 74 73 20 3a 64 65 66 61 75 d.......body.......(edits.:defau
19ea0 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 72 65 61 63 74 69 6f lt.eieio-unbound).......(reactio
19ec0 6e 73 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 5d 0a 20 20 20 20 ns.:default.eieio-unbound)].....
19ee0 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 69 73 73 75 65 5d 20 3a 72 65 .(:foreign-key.......[issue].:re
19f00 66 65 72 65 6e 63 65 73 20 69 73 73 75 65 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 ferences.issue.[id].......:on-de
19f20 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 6c 61 62 65 6c 0a 20 20 20 20 lete.:cascade))......(label.....
19f40 20 5b 28 72 65 70 6f 73 69 74 6f 72 79 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 .[(repository.:not-null).......(
19f60 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 20 20 20 20 id.:not-null.:primary-key)......
19f80 20 6e 61 6d 65 0a 20 20 20 20 20 20 63 6f 6c 6f 72 0a 20 20 20 20 20 20 64 65 73 63 72 69 70 74 .name.......color.......descript
19fa0 69 6f 6e 5d 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 72 ion]......(:foreign-key.......[r
19fc0 65 70 6f 73 69 74 6f 72 79 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 72 65 70 6f 73 69 74 6f 72 epository].:references.repositor
19fe0 79 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 y.[id].......:on-delete.:cascade
1a000 29 29 0a 0a 20 20 20 20 28 6d 61 72 6b 0a 20 20 20 20 20 5b 3b 3b 20 46 6f 72 20 6e 6f 77 20 74 ))......(mark......[;;.For.now.t
1a020 68 69 73 20 69 73 20 61 6c 77 61 79 73 20 6e 69 6c 20 62 65 63 61 75 73 65 20 69 74 20 73 65 65 his.is.always.nil.because.it.see
1a040 6d 73 20 6d 6f 72 65 20 75 73 65 66 75 6c 20 74 6f 0a 20 20 20 20 20 20 3b 3b 20 73 68 61 72 65 ms.more.useful.to.......;;.share
1a060 20 6d 61 72 6b 73 20 62 65 74 77 65 65 6e 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 20 20 57 65 .marks.between.repositories...We
1a080 20 63 61 6e 6e 6f 74 20 6f 6d 69 74 20 74 68 69 73 20 73 6c 6f 74 0a 20 20 20 20 20 20 3b 3b 20 .cannot.omit.this.slot.......;;.
1a0a0 74 68 6f 75 67 68 20 62 65 63 61 75 73 65 20 60 63 6c 6f 73 71 6c 2d 2d 69 72 65 66 27 20 65 78 though.because.`closql--iref'.ex
1a0c0 70 65 63 74 73 20 60 69 64 27 20 74 6f 20 62 65 20 74 68 65 20 73 65 63 6f 6e 64 0a 20 20 20 20 pects.`id'.to.be.the.second.....
1a0e0 20 20 3b 3b 20 73 6c 6f 74 2e 0a 20 20 20 20 20 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 ..;;.slot........repository.....
1a100 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 20 ..(id.:not-null.:primary-key)...
1a120 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 66 61 63 65 0a 20 20 20 20 20 20 64 65 73 63 72 69 ....name.......face.......descri
1a140 70 74 69 6f 6e 5d 29 0a 0a 20 20 20 20 28 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 20 20 20 5b 28 72 ption])......(milestone......[(r
1a160 65 70 6f 73 69 74 6f 72 79 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 69 64 20 3a epository.:not-null).......(id.:
1a180 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 20 20 20 20 20 6e 75 6d not-null.:primary-key).......num
1a1a0 62 65 72 0a 20 20 20 20 20 20 74 69 74 6c 65 0a 20 20 20 20 20 20 63 72 65 61 74 65 64 0a 20 20 ber.......title.......created...
1a1c0 20 20 20 20 75 70 64 61 74 65 64 0a 20 20 20 20 20 20 64 75 65 0a 20 20 20 20 20 20 63 6c 6f 73 ....updated.......due.......clos
1a1e0 65 64 0a 20 20 20 20 20 20 64 65 73 63 72 69 70 74 69 6f 6e 5d 0a 20 20 20 20 20 28 3a 66 6f 72 ed.......description]......(:for
1a200 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 72 65 70 6f 73 69 74 6f 72 79 5d 20 3a 72 65 66 eign-key.......[repository].:ref
1a220 65 72 65 6e 63 65 73 20 72 65 70 6f 73 69 74 6f 72 79 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f erences.repository.[id].......:o
1a240 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 6e 6f 74 69 66 69 n-delete.:cascade))......(notifi
1a260 63 61 74 69 6f 6e 0a 20 20 20 20 20 5b 28 63 6c 61 73 73 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 cation......[(class.:not-null)..
1a280 20 20 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 .....(id.:not-null.:primary-key)
1a2a0 0a 20 20 20 20 20 20 74 68 72 65 61 64 2d 69 64 0a 20 20 20 20 20 20 72 65 70 6f 73 69 74 6f 72 .......thread-id.......repositor
1a2c0 79 0a 20 20 20 20 20 20 74 79 70 65 0a 20 20 20 20 20 20 74 6f 70 69 63 0a 20 20 20 20 20 20 75 y.......type.......topic.......u
1a2e0 72 6c 0a 20 20 20 20 20 20 74 69 74 6c 65 0a 20 20 20 20 20 20 72 65 61 73 6f 6e 0a 20 20 20 20 rl.......title.......reason.....
1a300 20 20 6c 61 73 74 2d 72 65 61 64 0a 20 20 20 20 20 20 75 70 64 61 74 65 64 5d 0a 20 20 20 20 20 ..last-read.......updated]......
1a320 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 72 65 70 6f 73 69 74 6f 72 79 5d (:foreign-key.......[repository]
1a340 20 3a 72 65 66 65 72 65 6e 63 65 73 20 72 65 70 6f 73 69 74 6f 72 79 20 5b 69 64 5d 0a 20 20 20 .:references.repository.[id]....
1a360 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 70 ...:on-delete.:cascade))......(p
1a380 75 6c 6c 72 65 71 0a 20 20 20 20 20 5b 28 63 6c 61 73 73 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 ullreq......[(class.:not-null)..
1a3a0 20 20 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 .....(id.:not-null.:primary-key)
1a3c0 0a 20 20 20 20 20 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 6e 75 6d 62 65 72 0a 20 .......repository.......number..
1a3e0 20 20 20 20 20 73 74 61 74 65 0a 20 20 20 20 20 20 61 75 74 68 6f 72 0a 20 20 20 20 20 20 74 69 .....state.......author.......ti
1a400 74 6c 65 0a 20 20 20 20 20 20 63 72 65 61 74 65 64 0a 20 20 20 20 20 20 75 70 64 61 74 65 64 0a tle.......created.......updated.
1a420 20 20 20 20 20 20 63 6c 6f 73 65 64 0a 20 20 20 20 20 20 6d 65 72 67 65 64 0a 20 20 20 20 20 20 ......closed.......merged.......
1a440 73 74 61 74 75 73 0a 20 20 20 20 20 20 6c 6f 63 6b 65 64 2d 70 0a 20 20 20 20 20 20 65 64 69 74 status.......locked-p.......edit
1a460 61 62 6c 65 2d 70 0a 20 20 20 20 20 20 63 72 6f 73 73 2d 72 65 70 6f 2d 70 0a 20 20 20 20 20 20 able-p.......cross-repo-p.......
1a480 62 61 73 65 2d 72 65 66 0a 20 20 20 20 20 20 62 61 73 65 2d 72 65 70 6f 0a 20 20 20 20 20 20 68 base-ref.......base-repo.......h
1a4a0 65 61 64 2d 72 65 66 0a 20 20 20 20 20 20 68 65 61 64 2d 75 73 65 72 0a 20 20 20 20 20 20 68 65 ead-ref.......head-user.......he
1a4c0 61 64 2d 72 65 70 6f 0a 20 20 20 20 20 20 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 20 20 20 20 62 6f ad-repo.......milestone.......bo
1a4e0 64 79 0a 20 20 20 20 20 20 28 61 73 73 69 67 6e 65 65 73 20 20 20 20 20 20 20 3a 64 65 66 61 75 dy.......(assignees.......:defau
1a500 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 63 61 72 64 73 20 20 lt.eieio-unbound).......(cards..
1a520 20 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 .........:default.eieio-unbound)
1a540 0a 20 20 20 20 20 20 28 63 6f 6d 6d 69 74 73 20 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 .......(commits.........:default
1a560 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 65 64 69 74 73 20 20 20 20 .eieio-unbound).......(edits....
1a580 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 .......:default.eieio-unbound)..
1a5a0 20 20 20 20 20 28 6c 61 62 65 6c 73 20 20 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 .....(labels..........:default.e
1a5c0 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 70 61 72 74 69 63 69 70 61 6e 74 ieio-unbound).......(participant
1a5e0 73 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 s....:default.eieio-unbound)....
1a600 20 20 20 28 70 6f 73 74 73 20 20 20 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 ...(posts...........:default.eie
1a620 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 72 65 61 63 74 69 6f 6e 73 20 20 20 20 io-unbound).......(reactions....
1a640 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 ...:default.eieio-unbound)......
1a660 20 28 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f .(review-requests.:default.eieio
1a680 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 72 65 76 69 65 77 73 20 20 20 20 20 20 20 20 -unbound).......(reviews........
1a6a0 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 .:default.eieio-unbound).......(
1a6c0 74 69 6d 65 6c 69 6e 65 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 timeline........:default.eieio-u
1a6e0 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 6d 61 72 6b 73 20 20 20 20 20 20 20 20 20 20 20 3a nbound).......(marks...........:
1a700 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 6e 6f 74 default.eieio-unbound).......not
1a720 65 0a 20 20 20 20 20 20 62 61 73 65 2d 72 65 76 0a 20 20 20 20 20 20 68 65 61 64 2d 72 65 76 0a e.......base-rev.......head-rev.
1a740 20 20 20 20 20 20 64 72 61 66 74 2d 70 0a 20 20 20 20 20 20 74 68 65 69 72 2d 69 64 0a 20 20 20 ......draft-p.......their-id....
1a760 20 20 20 73 6c 75 67 0a 20 20 20 20 20 20 73 61 76 65 64 2d 70 5d 0a 20 20 20 20 20 28 3a 66 6f ...slug.......saved-p]......(:fo
1a780 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 72 65 70 6f 73 69 74 6f 72 79 5d 20 3a 72 65 reign-key.......[repository].:re
1a7a0 66 65 72 65 6e 63 65 73 20 72 65 70 6f 73 69 74 6f 72 79 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a ferences.repository.[id].......:
1a7c0 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 70 75 6c 6c 72 on-delete.:cascade))......(pullr
1a7e0 65 71 2d 61 73 73 69 67 6e 65 65 0a 20 20 20 20 20 5b 28 70 75 6c 6c 72 65 71 20 3a 6e 6f 74 2d eq-assignee......[(pullreq.:not-
1a800 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 5d 0a 20 20 20 20 null).......(id.:not-null)].....
1a820 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 70 75 6c 6c 72 65 71 5d 20 3a .(:foreign-key.......[pullreq].:
1a840 72 65 66 65 72 65 6e 63 65 73 20 70 75 6c 6c 72 65 71 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f references.pullreq.[id].......:o
1a860 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 70 75 6c 6c 72 65 n-delete.:cascade))......(pullre
1a880 71 2d 6c 61 62 65 6c 0a 20 20 20 20 20 5b 28 70 75 6c 6c 72 65 71 20 3a 6e 6f 74 2d 6e 75 6c 6c q-label......[(pullreq.:not-null
1a8a0 29 0a 20 20 20 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 5d 0a 20 20 20 20 20 28 3a 66 ).......(id.:not-null)]......(:f
1a8c0 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 70 75 6c 6c 72 65 71 5d 20 3a 72 65 66 65 oreign-key.......[pullreq].:refe
1a8e0 72 65 6e 63 65 73 20 70 75 6c 6c 72 65 71 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 rences.pullreq.[id].......:on-de
1a900 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 lete.:cascade)......(:foreign-ke
1a920 79 0a 20 20 20 20 20 20 5b 69 64 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 6c 61 62 65 6c 20 5b y.......[id].:references.label.[
1a940 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a id].......:on-delete.:cascade)).
1a960 0a 20 20 20 20 28 70 75 6c 6c 72 65 71 2d 6d 61 72 6b 0a 20 20 20 20 20 5b 28 70 75 6c 6c 72 65 .....(pullreq-mark......[(pullre
1a980 71 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c q.:not-null).......(id.:not-null
1a9a0 29 5d 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 70 75 6c )]......(:foreign-key.......[pul
1a9c0 6c 72 65 71 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 70 75 6c 6c 72 65 71 20 5b 69 64 5d 0a 20 lreq].:references.pullreq.[id]..
1a9e0 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 0a 20 20 20 20 20 28 .....:on-delete.:cascade)......(
1aa00 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 69 64 5d 20 3a 72 65 66 65 72 65 6e :foreign-key.......[id].:referen
1aa20 63 65 73 20 6d 61 72 6b 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a ces.mark.[id].......:on-delete.:
1aa40 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 70 75 6c 6c 72 65 71 2d 70 6f 73 74 0a 20 20 20 cascade))......(pullreq-post....
1aa60 20 20 5b 28 63 6c 61 73 73 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 69 64 20 3a ..[(class.:not-null).......(id.:
1aa80 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 20 20 20 20 20 70 75 6c not-null.:primary-key).......pul
1aaa0 6c 72 65 71 0a 20 20 20 20 20 20 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 61 75 74 68 6f 72 0a 20 lreq.......number.......author..
1aac0 20 20 20 20 20 63 72 65 61 74 65 64 0a 20 20 20 20 20 20 75 70 64 61 74 65 64 0a 20 20 20 20 20 .....created.......updated......
1aae0 20 62 6f 64 79 0a 20 20 20 20 20 20 28 65 64 69 74 73 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 .body.......(edits.:default.eiei
1ab00 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 72 65 61 63 74 69 6f 6e 73 20 3a 64 65 66 o-unbound).......(reactions.:def
1ab20 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 5d 0a 20 20 20 20 20 28 3a 66 6f 72 65 ault.eieio-unbound)]......(:fore
1ab40 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 70 75 6c 6c 72 65 71 5d 20 3a 72 65 66 65 72 65 6e ign-key.......[pullreq].:referen
1ab60 63 65 73 20 70 75 6c 6c 72 65 71 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 ces.pullreq.[id].......:on-delet
1ab80 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 70 75 6c 6c 72 65 71 2d 72 65 76 69 65 e.:cascade))......(pullreq-revie
1aba0 77 2d 72 65 71 75 65 73 74 0a 20 20 20 20 20 5b 28 70 75 6c 6c 72 65 71 20 3a 6e 6f 74 2d 6e 75 w-request......[(pullreq.:not-nu
1abc0 6c 6c 29 0a 20 20 20 20 20 20 28 69 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 5d 0a 20 20 20 20 20 28 ll).......(id.:not-null)]......(
1abe0 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 5b 70 75 6c 6c 72 65 71 5d 20 3a 72 65 :foreign-key.......[pullreq].:re
1ac00 66 65 72 65 6e 63 65 73 20 70 75 6c 6c 72 65 71 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d ferences.pullreq.[id].......:on-
1ac20 64 65 6c 65 74 65 20 3a 63 61 73 63 61 64 65 29 29 0a 0a 20 20 20 20 28 72 65 76 6e 6f 74 65 0a delete.:cascade))......(revnote.
1ac40 20 20 20 20 20 5b 28 63 6c 61 73 73 20 3a 6e 6f 74 2d 6e 75 6c 6c 29 0a 20 20 20 20 20 20 28 69 .....[(class.:not-null).......(i
1ac60 64 20 3a 6e 6f 74 2d 6e 75 6c 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 29 0a 20 20 20 20 20 20 d.:not-null.:primary-key).......
1ac80 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 63 6f 6d 6d 69 74 0a 20 20 20 20 20 20 66 69 repository.......commit.......fi
1aca0 6c 65 0a 20 20 20 20 20 20 6c 69 6e 65 0a 20 20 20 20 20 20 61 75 74 68 6f 72 0a 20 20 20 20 20 le.......line.......author......
1acc0 20 62 6f 64 79 5d 0a 20 20 20 20 20 28 3a 66 6f 72 65 69 67 6e 2d 6b 65 79 0a 20 20 20 20 20 20 .body]......(:foreign-key.......
1ace0 5b 72 65 70 6f 73 69 74 6f 72 79 5d 20 3a 72 65 66 65 72 65 6e 63 65 73 20 72 65 70 6f 73 69 74 [repository].:references.reposit
1ad00 6f 72 79 20 5b 69 64 5d 0a 20 20 20 20 20 20 3a 6f 6e 2d 64 65 6c 65 74 65 20 3a 63 61 73 63 61 ory.[id].......:on-delete.:casca
1ad20 64 65 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 63 6c 6f 73 71 6c 2d 2d 64 62 de))))..(cl-defmethod.closql--db
1ad40 2d 75 70 64 61 74 65 2d 73 63 68 65 6d 61 20 28 28 64 62 20 66 6f 72 67 65 2d 64 61 74 61 62 61 -update-schema.((db.forge-databa
1ad60 73 65 29 29 0a 20 20 28 6c 65 74 20 28 28 76 65 72 73 69 6f 6e 20 28 63 6c 6f 73 71 6c 2d 2d 64 se))...(let.((version.(closql--d
1ad80 62 2d 67 65 74 2d 76 65 72 73 69 6f 6e 20 64 62 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 3c b-get-version.db))).....(when.(<
1ada0 20 76 65 72 73 69 6f 6e 20 28 6f 72 65 66 2d 64 65 66 61 75 6c 74 20 27 66 6f 72 67 65 2d 64 61 .version.(oref-default.'forge-da
1adc0 74 61 62 61 73 65 20 76 65 72 73 69 6f 6e 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 62 tabase.version)).......(forge--b
1ade0 61 63 6b 75 70 2d 64 61 74 61 62 61 73 65 20 64 62 29 0a 20 20 20 20 20 20 28 63 6c 6f 73 71 6c ackup-database.db).......(closql
1ae00 2d 77 69 74 68 2d 74 72 61 6e 73 61 63 74 69 6f 6e 20 64 62 0a 20 20 20 20 20 20 20 20 28 66 6f -with-transaction.db.........(fo
1ae20 72 67 65 2d 2d 64 62 2d 75 70 64 61 74 65 2d 73 63 68 65 6d 61 20 64 62 20 76 65 72 73 69 6f 6e rge--db-update-schema.db.version
1ae40 29 29 29 0a 20 20 20 20 28 63 6c 2d 63 61 6c 6c 2d 6e 65 78 74 2d 6d 65 74 68 6f 64 29 29 29 0a ))).....(cl-call-next-method))).
1ae60 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 64 62 2d 75 70 64 61 74 65 2d 73 63 68 65 6d 61 20 .(defun.forge--db-update-schema.
1ae80 28 64 62 20 76 65 72 73 69 6f 6e 29 0a 20 20 28 63 6c 2d 6d 61 63 72 6f 6c 65 74 0a 20 20 20 20 (db.version)...(cl-macrolet.....
1aea0 20 20 28 28 75 70 20 28 74 6f 20 26 72 65 73 74 20 62 6f 64 79 29 0a 20 20 20 20 20 20 20 20 20 ..((up.(to.&rest.body)..........
1aec0 60 28 77 68 65 6e 20 28 3d 20 28 31 2b 20 76 65 72 73 69 6f 6e 29 20 2c 74 6f 29 0a 20 20 20 20 `(when.(=.(1+.version).,to).....
1aee0 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 55 70 67 72 61 64 69 6e 67 20 46 6f 72 67 ........(message."Upgrading.Forg
1af00 65 20 64 61 74 61 62 61 73 65 20 66 72 6f 6d 20 76 65 72 73 69 6f 6e 20 25 73 20 74 6f 20 25 73 e.database.from.version.%s.to.%s
1af20 2e 2e 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 65 72 73 69 6f ..."......................versio
1af40 6e 20 2c 74 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 62 6f 64 79 0a 20 20 20 20 20 20 n.,to).............,@body.......
1af60 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 2d 64 62 2d 73 65 74 2d 76 65 72 73 69 6f 6e 20 64 62 ......(closql--db-set-version.db
1af80 20 2c 74 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 55 70 67 72 .,to).............(message."Upgr
1afa0 61 64 69 6e 67 20 46 6f 72 67 65 20 64 61 74 61 62 61 73 65 20 66 72 6f 6d 20 76 65 72 73 69 6f ading.Forge.database.from.versio
1afc0 6e 20 25 73 20 74 6f 20 25 73 2e 2e 2e 64 6f 6e 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 n.%s.to.%s...done"..............
1afe0 20 20 20 20 20 20 20 20 76 65 72 73 69 6f 6e 20 2c 74 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 ........version.,to)............
1b000 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 2c 74 6f 29 29 29 29 0a 20 20 20 20 28 75 70 20 33 .(setq.version.,to)))).....(up.3
1b020 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 63 72 65 61 74 65 2d 74 61 .........(emacsql.db.[:create-ta
1b040 62 6c 65 20 70 75 6c 6c 72 65 71 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 20 24 53 31 5d 0a ble.pullreq-review-request.$S1].
1b060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 71 20 27 70 75 6c .................(cdr.(assq.'pul
1b080 6c 72 65 71 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 20 66 6f 72 67 65 2d 2d 64 62 2d 74 61 lreq-review-request.forge--db-ta
1b0a0 62 6c 65 2d 73 63 68 65 6d 61 74 61 29 29 29 29 0a 20 20 20 20 28 75 70 20 34 0a 20 20 20 20 20 ble-schemata)))).....(up.4......
1b0c0 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 64 72 6f 70 2d 74 61 62 6c 65 20 6e 6f 74 69 ...(emacsql.db.[:drop-table.noti
1b0e0 66 69 63 61 74 69 6f 6e 5d 29 0a 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 fication]).........(pcase-dolist
1b100 20 28 60 28 2c 74 61 62 6c 65 20 2e 20 2c 73 63 68 65 6d 61 29 20 66 6f 72 67 65 2d 2d 64 62 2d .(`(,table...,schema).forge--db-
1b120 74 61 62 6c 65 2d 73 63 68 65 6d 61 74 61 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 table-schemata)...........(when.
1b140 28 6d 65 6d 71 20 74 61 62 6c 65 20 27 28 6e 6f 74 69 66 69 63 61 74 69 6f 6e 0a 20 20 20 20 20 (memq.table.'(notification......
1b160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 61 72 6b 20 69 73 .........................mark.is
1b180 73 75 65 2d 6d 61 72 6b 20 70 75 6c 6c 72 65 71 2d 6d 61 72 6b 29 29 0a 20 20 20 20 20 20 20 20 sue-mark.pullreq-mark)).........
1b1a0 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 63 72 65 61 74 65 2d 74 61 62 6c 65 20 24 ....(emacsql.db.[:create-table.$
1b1c0 69 31 20 24 53 32 5d 20 74 61 62 6c 65 20 73 63 68 65 6d 61 29 29 29 0a 20 20 20 20 20 20 20 20 i1.$S2].table.schema))).........
1b1e0 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 69 73 73 75 65 20 (emacsql.db.[:alter-table.issue.
1b200 20 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 6d 61 72 6b 73 20 3a 64 65 66 61 75 6c 74 20 24 73 31 ..:add-column.marks.:default.$s1
1b220 5d 20 27 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 ].'eieio-unbound).........(emacs
1b240 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 70 75 6c 6c 72 65 71 20 3a 61 64 64 ql.db.[:alter-table.pullreq.:add
1b260 2d 63 6f 6c 75 6d 6e 20 6d 61 72 6b 73 20 3a 64 65 66 61 75 6c 74 20 24 73 31 5d 20 27 65 69 65 -column.marks.:default.$s1].'eie
1b280 69 6f 2d 75 6e 62 6f 75 6e 64 29 29 0a 20 20 20 20 28 75 70 20 35 0a 20 20 20 20 20 20 20 20 28 io-unbound)).....(up.5.........(
1b2a0 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 72 65 70 6f 73 69 74 emacsql.db.[:alter-table.reposit
1b2c0 6f 72 79 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 73 65 6c 65 63 74 69 76 65 2d 70 20 3a 64 65 66 ory.:add-column.selective-p.:def
1b2e0 61 75 6c 74 20 6e 69 6c 5d 29 29 0a 20 20 20 20 28 75 70 20 36 0a 20 20 20 20 20 20 20 20 28 65 ault.nil])).....(up.6.........(e
1b300 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 72 65 70 6f 73 69 74 6f macsql.db.[:alter-table.reposito
1b320 72 79 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 77 6f 72 6b 74 72 65 65 20 3a 64 65 66 61 75 6c 74 ry.:add-column.worktree.:default
1b340 20 6e 69 6c 5d 29 29 0a 20 20 20 20 28 75 70 20 37 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 .nil])).....(up.7.........(emacs
1b360 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 69 73 73 75 65 20 20 20 3a 61 64 64 ql.db.[:alter-table.issue...:add
1b380 2d 63 6f 6c 75 6d 6e 20 6e 6f 74 65 20 3a 64 65 66 61 75 6c 74 20 6e 69 6c 5d 29 0a 20 20 20 20 -column.note.:default.nil]).....
1b3a0 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 70 75 ....(emacsql.db.[:alter-table.pu
1b3c0 6c 6c 72 65 71 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 6e 6f 74 65 20 3a 64 65 66 61 75 6c 74 20 llreq.:add-column.note.:default.
1b3e0 6e 69 6c 5d 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 63 72 65 61 nil]).........(emacsql.db.[:crea
1b400 74 65 2d 74 61 62 6c 65 20 6d 69 6c 65 73 74 6f 6e 65 20 24 53 31 5d 0a 20 20 20 20 20 20 20 20 te-table.milestone.$S1].........
1b420 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 71 20 27 6d 69 6c 65 73 74 6f 6e 65 20 66 .........(cdr.(assq.'milestone.f
1b440 6f 72 67 65 2d 2d 64 62 2d 74 61 62 6c 65 2d 73 63 68 65 6d 61 74 61 29 29 29 0a 20 20 20 20 20 orge--db-table-schemata)))......
1b460 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 72 65 70 ...(emacsql.db.[:alter-table.rep
1b480 6f 73 69 74 6f 72 79 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 6d 69 6c 65 73 74 6f 6e 65 73 20 3a ository.:add-column.milestones.:
1b4a0 64 65 66 61 75 6c 74 20 24 73 31 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 65 default.$s1]..................'e
1b4c0 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c ieio-unbound).........(pcase-dol
1b4e0 69 73 74 20 28 60 28 2c 72 65 70 6f 2d 69 64 20 2c 69 73 73 75 65 2d 69 64 20 2c 6d 69 6c 65 73 ist.(`(,repo-id.,issue-id.,miles
1b500 74 6f 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6d tone)........................(em
1b520 61 63 73 71 6c 20 64 62 20 5b 3a 73 65 6c 65 63 74 20 5b 72 65 70 6f 73 69 74 6f 72 79 20 69 64 acsql.db.[:select.[repository.id
1b540 20 6d 69 6c 65 73 74 6f 6e 65 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .milestone].....................
1b560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 69 73 73 75 65 0a 20 20 20 20 ................:from.issue.....
1b580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1b5a0 3a 77 68 65 72 65 20 28 6e 6f 74 6e 75 6c 6c 20 6d 69 6c 65 73 74 6f 6e 65 29 5d 29 29 0a 20 20 :where.(notnull.milestone)]))...
1b5c0 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 70 20 6d 69 6c 65 73 74 6f ........(unless.(stringp.milesto
1b5e0 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 28 66 6f 72 67 65 2d 67 65 74 ne).............(oset.(forge-get
1b600 2d 69 73 73 75 65 20 69 73 73 75 65 2d 69 64 29 20 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 20 20 20 -issue.issue-id).milestone......
1b620 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 72 .............(forge--object-id.r
1b640 65 70 6f 2d 69 64 20 28 63 64 61 72 20 6d 69 6c 65 73 74 6f 6e 65 29 29 29 29 29 0a 20 20 20 20 epo-id.(cdar.milestone))))).....
1b660 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 72 65 70 6f 2d 69 64 20 2c 70 ....(pcase-dolist.(`(,repo-id.,p
1b680 75 6c 6c 72 65 71 2d 69 64 20 2c 6d 69 6c 65 73 74 6f 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 ullreq-id.,milestone)...........
1b6a0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 73 65 6c 65 63 .............(emacsql.db.[:selec
1b6c0 74 20 5b 72 65 70 6f 73 69 74 6f 72 79 20 69 64 20 6d 69 6c 65 73 74 6f 6e 65 5d 0a 20 20 20 20 t.[repository.id.milestone].....
1b6e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1b700 3a 66 72 6f 6d 20 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :from.pullreq...................
1b720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 6e 6f 74 6e 75 6c ..................:where.(notnul
1b740 6c 20 6d 69 6c 65 73 74 6f 6e 65 29 5d 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 l.milestone)]))...........(unles
1b760 73 20 28 73 74 72 69 6e 67 70 20 6d 69 6c 65 73 74 6f 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 s.(stringp.milestone)...........
1b780 20 20 28 6f 73 65 74 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 70 75 6c 6c 72 ..(oset.(forge-get-pullreq.pullr
1b7a0 65 71 2d 69 64 29 20 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eq-id).milestone................
1b7c0 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 72 65 70 6f 2d 69 64 20 28 63 64 ...(forge--object-id.repo-id.(cd
1b7e0 61 72 20 6d 69 6c 65 73 74 6f 6e 65 29 29 29 29 29 29 0a 20 20 20 20 28 75 70 20 38 0a 20 20 20 ar.milestone)))))).....(up.8....
1b800 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 70 .....(emacsql.db.[:alter-table.p
1b820 75 6c 6c 72 65 71 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 62 61 73 65 2d 72 65 76 20 3a 64 65 66 ullreq.:add-column.base-rev.:def
1b840 61 75 6c 74 20 6e 69 6c 5d 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b ault.nil]).........(emacsql.db.[
1b860 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 70 75 6c 6c 72 65 71 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e :alter-table.pullreq.:add-column
1b880 20 68 65 61 64 2d 72 65 76 20 3a 64 65 66 61 75 6c 74 20 6e 69 6c 5d 29 0a 20 20 20 20 20 20 20 .head-rev.:default.nil])........
1b8a0 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 70 75 6c 6c 72 .(emacsql.db.[:alter-table.pullr
1b8c0 65 71 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 64 72 61 66 74 2d 70 20 20 3a 64 65 66 61 75 6c 74 eq.:add-column.draft-p..:default
1b8e0 20 6e 69 6c 5d 29 29 0a 20 20 20 20 28 75 70 20 39 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 .nil])).....(up.9.........(emacs
1b900 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 70 75 6c 6c 72 65 71 20 3a 61 64 64 ql.db.[:alter-table.pullreq.:add
1b920 2d 63 6f 6c 75 6d 6e 20 74 68 65 69 72 2d 69 64 20 3a 64 65 66 61 75 6c 74 20 6e 69 6c 5d 29 0a -column.their-id.:default.nil]).
1b940 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c ........(emacsql.db.[:alter-tabl
1b960 65 20 69 73 73 75 65 20 20 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 74 68 65 69 72 2d 69 64 20 3a e.issue...:add-column.their-id.:
1b980 64 65 66 61 75 6c 74 20 6e 69 6c 5d 29 29 0a 20 20 20 20 28 75 70 20 31 30 0a 20 20 20 20 20 20 default.nil])).....(up.10.......
1b9a0 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 70 75 6c 6c ..(emacsql.db.[:alter-table.pull
1b9c0 72 65 71 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 73 6c 75 67 20 3a 64 65 66 61 75 6c 74 20 6e 69 req.:add-column.slug.:default.ni
1b9e0 6c 5d 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d l]).........(emacsql.db.[:alter-
1ba00 74 61 62 6c 65 20 69 73 73 75 65 20 20 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 73 6c 75 67 20 3a table.issue...:add-column.slug.:
1ba20 64 65 66 61 75 6c 74 20 6e 69 6c 5d 29 0a 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c default.nil]).........(pcase-dol
1ba40 69 73 74 20 28 60 28 2c 69 64 20 2c 6e 75 6d 62 65 72 20 2c 74 79 70 65 29 0a 20 20 20 20 20 20 ist.(`(,id.,number.,type).......
1ba60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 0a 20 20 20 20 20 20 .................(emacsql.......
1ba80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 62 0a 20 20 20 20 20 20 20 20 20 20 20 ..................db............
1baa0 20 20 20 20 20 20 20 20 20 20 20 20 20 5b 3a 73 65 6c 65 63 74 20 5b 70 75 6c 6c 72 65 71 3a 69 .............[:select.[pullreq:i
1bac0 64 20 70 75 6c 6c 72 65 71 3a 6e 75 6d 62 65 72 20 72 65 70 6f 73 69 74 6f 72 79 3a 63 6c 61 73 d.pullreq:number.repository:clas
1bae0 73 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f s]..........................:fro
1bb00 6d 20 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 m.pullreq.......................
1bb20 20 20 20 3a 6a 6f 69 6e 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 ...:join.repository.............
1bb40 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 6e 20 28 3d 20 70 75 6c 6c 72 65 71 3a 72 65 70 6f .............:on.(=.pullreq:repo
1bb60 73 69 74 6f 72 79 20 72 65 70 6f 73 69 74 6f 72 79 3a 69 64 29 5d 29 29 0a 20 20 20 20 20 20 20 sitory.repository:id)]))........
1bb80 20 20 20 28 6c 65 74 20 28 28 67 69 74 6c 61 62 70 20 28 6d 65 6d 71 20 74 79 70 65 0a 20 20 20 ...(let.((gitlabp.(memq.type....
1bba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 ............................(app
1bbc0 65 6e 64 20 28 63 6c 6f 73 71 6c 2d 77 68 65 72 65 2d 63 6c 61 73 73 2d 69 6e 0a 20 20 20 20 20 end.(closql-where-class-in......
1bbe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1bc00 20 20 20 27 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 2d 65 69 65 ...'forge-gitlab-repository--eie
1bc20 69 6f 2d 63 68 69 6c 64 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 io-childp)......................
1bc40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 ..................nil)))).......
1bc60 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 75 70 64 61 74 65 20 70 75 6c 6c 72 ......(emacsql.db.[:update.pullr
1bc80 65 71 20 3a 73 65 74 20 28 3d 20 73 6c 75 67 20 24 73 31 29 20 3a 77 68 65 72 65 20 28 3d 20 69 eq.:set.(=.slug.$s1).:where.(=.i
1bca0 64 20 24 73 32 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f d.$s2)]......................(fo
1bcc0 72 6d 61 74 20 22 25 73 25 73 22 20 28 69 66 20 67 69 74 6c 61 62 70 20 22 21 22 20 22 23 22 29 rmat."%s%s".(if.gitlabp."!"."#")
1bce0 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 .number)......................id
1bd00 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 69 64 ))).........(pcase-dolist.(`(,id
1bd20 20 2c 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .,number).......................
1bd40 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 73 65 6c 65 63 74 20 5b 69 64 20 6e 75 6d 62 65 72 .(emacsql.db.[:select.[id.number
1bd60 5d 20 3a 66 72 6f 6d 20 69 73 73 75 65 5d 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 6d 61 63 ].:from.issue]))...........(emac
1bd80 73 71 6c 20 64 62 20 5b 3a 75 70 64 61 74 65 20 69 73 73 75 65 20 3a 73 65 74 20 28 3d 20 73 6c sql.db.[:update.issue.:set.(=.sl
1bda0 75 67 20 24 73 31 29 20 3a 77 68 65 72 65 20 28 3d 20 69 64 20 24 73 32 29 5d 0a 20 20 20 20 20 ug.$s1).:where.(=.id.$s2)]......
1bdc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 23 25 73 22 20 6e 75 6d 62 ..............(format."#%s".numb
1bde0 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 29 0a 20 20 20 er)....................id)))....
1be00 20 28 75 70 20 31 31 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 64 72 .(up.11.........(emacsql.db.[:dr
1be20 6f 70 2d 74 61 62 6c 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 5d 29 0a 20 20 20 20 20 20 20 20 op-table.notification]).........
1be40 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 63 72 65 61 74 65 2d 74 61 62 6c 65 20 6e 6f 74 69 66 (emacsql.db.[:create-table.notif
1be60 69 63 61 74 69 6f 6e 20 24 53 31 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 ication.$S1]..................(c
1be80 64 72 20 28 61 73 73 71 20 27 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 66 6f 72 67 65 2d 2d 64 62 dr.(assq.'notification.forge--db
1bea0 2d 74 61 62 6c 65 2d 73 63 68 65 6d 61 74 61 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 -table-schemata))).........(emac
1bec0 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 70 75 6c 6c 72 65 71 20 3a 72 65 sql.db.[:alter-table.pullreq.:re
1bee0 6e 61 6d 65 2d 63 6f 6c 75 6d 6e 20 75 6e 72 65 61 64 2d 70 20 3a 74 6f 20 73 74 61 74 75 73 5d name-column.unread-p.:to.status]
1bf00 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 ).........(emacsql.db.[:alter-ta
1bf20 62 6c 65 20 69 73 73 75 65 20 20 20 3a 72 65 6e 61 6d 65 2d 63 6f 6c 75 6d 6e 20 75 6e 72 65 61 ble.issue...:rename-column.unrea
1bf40 64 2d 70 20 3a 74 6f 20 73 74 61 74 75 73 5d 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 d-p.:to.status]).........(emacsq
1bf60 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 70 75 6c 6c 72 65 71 20 3a 61 64 64 2d l.db.[:alter-table.pullreq.:add-
1bf80 63 6f 6c 75 6d 6e 20 73 61 76 65 64 2d 70 20 3a 64 65 66 61 75 6c 74 20 6e 69 6c 5d 29 0a 20 20 column.saved-p.:default.nil])...
1bfa0 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 ......(emacsql.db.[:alter-table.
1bfc0 69 73 73 75 65 20 20 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 73 61 76 65 64 2d 70 20 3a 64 65 66 issue...:add-column.saved-p.:def
1bfe0 61 75 6c 74 20 6e 69 6c 5d 29 29 0a 20 20 20 20 28 75 70 20 31 32 0a 20 20 20 20 20 20 20 20 28 ault.nil])).....(up.12.........(
1c000 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 64 72 6f 70 2d 74 61 62 6c 65 20 6e 6f 74 69 66 69 63 61 emacsql.db.[:drop-table.notifica
1c020 74 69 6f 6e 5d 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 63 72 65 tion]).........(emacsql.db.[:cre
1c040 61 74 65 2d 74 61 62 6c 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 24 53 31 5d 0a 20 20 20 20 ate-table.notification.$S1].....
1c060 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 71 20 27 6e 6f 74 69 66 69 63 .............(cdr.(assq.'notific
1c080 61 74 69 6f 6e 20 66 6f 72 67 65 2d 2d 64 62 2d 74 61 62 6c 65 2d 73 63 68 65 6d 61 74 61 29 29 ation.forge--db-table-schemata))
1c0a0 29 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 69 64 20 28 65 6d 61 63 73 71 6c 20 64 ).........(dolist.(id.(emacsql.d
1c0c0 62 20 5b 3a 73 65 6c 65 63 74 20 69 64 20 3a 66 72 6f 6d 20 69 73 73 75 65 20 3a 77 68 65 72 65 b.[:select.id.:from.issue.:where
1c0e0 20 28 3d 20 73 74 61 74 65 20 27 63 6c 6f 73 65 64 29 5d 29 29 0a 20 20 20 20 20 20 20 20 20 20 .(=.state.'closed)]))...........
1c100 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 75 70 64 61 74 65 20 69 73 73 75 65 20 3a 73 65 74 20 (emacsql.db.[:update.issue.:set.
1c120 28 3d 20 73 74 61 74 65 20 27 63 6f 6d 70 6c 65 74 65 64 29 20 3a 77 68 65 72 65 20 28 3d 20 69 (=.state.'completed).:where.(=.i
1c140 64 20 24 73 31 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 0a d.$s1)]....................id)).
1c160 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 69 64 20 28 65 6d 61 63 73 71 6c 20 64 62 20 ........(dolist.(id.(emacsql.db.
1c180 5b 3a 73 65 6c 65 63 74 20 69 64 20 3a 66 72 6f 6d 20 69 73 73 75 65 20 3a 77 68 65 72 65 20 28 [:select.id.:from.issue.:where.(
1c1a0 69 73 6e 75 6c 6c 20 73 74 61 74 75 73 29 5d 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 6d 61 isnull.status)]))...........(ema
1c1c0 63 73 71 6c 20 64 62 20 5b 3a 75 70 64 61 74 65 20 69 73 73 75 65 20 3a 73 65 74 20 28 3d 20 73 csql.db.[:update.issue.:set.(=.s
1c1e0 74 61 74 65 20 27 64 6f 6e 65 29 20 3a 77 68 65 72 65 20 28 3d 20 69 64 20 24 73 31 29 5d 0a 20 tate.'done).:where.(=.id.$s1)]..
1c200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 ..................id)).........(
1c220 64 6f 6c 69 73 74 20 28 69 64 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 73 65 6c 65 63 74 20 dolist.(id.(emacsql.db.[:select.
1c240 69 64 20 3a 66 72 6f 6d 20 70 75 6c 6c 72 65 71 20 3a 77 68 65 72 65 20 28 3d 20 73 74 61 74 65 id.:from.pullreq.:where.(=.state
1c260 20 27 63 6c 6f 73 65 64 29 5d 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 .'closed)]))...........(emacsql.
1c280 64 62 20 5b 3a 75 70 64 61 74 65 20 70 75 6c 6c 72 65 71 20 3a 73 65 74 20 28 3d 20 73 74 61 74 db.[:update.pullreq.:set.(=.stat
1c2a0 65 20 27 72 65 6a 65 63 74 65 64 29 20 3a 77 68 65 72 65 20 28 3d 20 69 64 20 24 73 31 29 5d 0a e.'rejected).:where.(=.id.$s1)].
1c2c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 ...................id)).........
1c2e0 28 64 6f 6c 69 73 74 20 28 69 64 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 73 65 6c 65 63 74 (dolist.(id.(emacsql.db.[:select
1c300 20 69 64 20 3a 66 72 6f 6d 20 70 75 6c 6c 72 65 71 20 3a 77 68 65 72 65 20 28 69 73 6e 75 6c 6c .id.:from.pullreq.:where.(isnull
1c320 20 73 74 61 74 75 73 29 5d 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 .status)]))...........(emacsql.d
1c340 62 20 5b 3a 75 70 64 61 74 65 20 70 75 6c 6c 72 65 71 20 3a 73 65 74 20 28 3d 20 73 74 61 74 65 b.[:update.pullreq.:set.(=.state
1c360 20 27 64 6f 6e 65 29 20 3a 77 68 65 72 65 20 28 3d 20 69 64 20 24 73 31 29 5d 0a 20 20 20 20 20 .'done).:where.(=.id.$s1)]......
1c380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 ..............id)).........(emac
1c3a0 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 72 65 70 6f 73 69 74 6f 72 79 20 sql.db.[:alter-table.repository.
1c3c0 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 69 73 73 75 65 73 2d 75 6e 74 69 6c 20 3a 64 65 66 61 75 6c :add-column.issues-until.:defaul
1c3e0 74 20 6e 69 6c 5d 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c t.nil]).........(emacsql.db.[:al
1c400 74 65 72 2d 74 61 62 6c 65 20 72 65 70 6f 73 69 74 6f 72 79 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e ter-table.repository.:add-column
1c420 20 70 75 6c 6c 72 65 71 73 2d 75 6e 74 69 6c 20 3a 64 65 66 61 75 6c 74 20 6e 69 6c 5d 29 29 0a .pullreqs-until.:default.nil])).
1c440 20 20 20 20 28 75 70 20 31 33 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 69 64 20 28 ....(up.13.........(dolist.(id.(
1c460 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 73 65 6c 65 63 74 20 69 64 20 3a 66 72 6f 6d 20 72 65 70 emacsql.db.[:select.id.:from.rep
1c480 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ository.........................
1c4a0 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 69 73 6e 75 6c 6c 20 69 73 73 75 65 73 2d 75 .........:where.(isnull.issues-u
1c4c0 6e 74 69 6c 29 5d 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 0a 20 20 20 20 ntil)]))...........(emacsql.....
1c4e0 20 20 20 20 20 20 20 64 62 20 5b 3a 75 70 64 61 74 65 20 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 .......db.[:update.repository.:s
1c500 65 74 20 28 3d 20 69 73 73 75 65 73 2d 75 6e 74 69 6c 20 24 73 31 29 20 3a 77 68 65 72 65 20 28 et.(=.issues-until.$s1).:where.(
1c520 3d 20 69 64 20 24 73 32 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c =.id.$s2)]............(forge-sql
1c540 31 20 5b 3a 73 65 6c 65 63 74 20 5b 75 70 64 61 74 65 64 5d 20 3a 66 72 6f 6d 20 69 73 73 75 65 1.[:select.[updated].:from.issue
1c560 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 .........................:where.
1c580 28 3d 20 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 (=.repository.$s1)..............
1c5a0 20 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 64 65 73 63 20 75 70 64 61 ...........:order-by.[(desc.upda
1c5c0 74 65 64 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c ted)].........................:l
1c5e0 69 6d 69 74 20 31 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 imit.1]........................i
1c600 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 d)............id)).........(doli
1c620 73 74 20 28 69 64 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 73 65 6c 65 63 74 20 69 64 20 3a st.(id.(emacsql.db.[:select.id.:
1c640 66 72 6f 6d 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 from.repository.................
1c660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 69 73 6e 75 6c 6c 20 .................:where.(isnull.
1c680 70 75 6c 6c 72 65 71 73 2d 75 6e 74 69 6c 29 5d 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 6d pullreqs-until)]))...........(em
1c6a0 61 63 73 71 6c 0a 20 20 20 20 20 20 20 20 20 20 20 64 62 20 5b 3a 75 70 64 61 74 65 20 72 65 70 acsql............db.[:update.rep
1c6c0 6f 73 69 74 6f 72 79 20 3a 73 65 74 20 28 3d 20 70 75 6c 6c 72 65 71 73 2d 75 6e 74 69 6c 20 24 ository.:set.(=.pullreqs-until.$
1c6e0 73 31 29 20 3a 77 68 65 72 65 20 28 3d 20 69 64 20 24 73 32 29 5d 0a 20 20 20 20 20 20 20 20 20 s1).:where.(=.id.$s2)]..........
1c700 20 20 28 66 6f 72 67 65 2d 73 71 6c 31 20 5b 3a 73 65 6c 65 63 74 20 5b 75 70 64 61 74 65 64 5d ..(forge-sql1.[:select.[updated]
1c720 20 3a 66 72 6f 6d 20 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .:from.pullreq..................
1c740 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 .......:where.(=.repository.$s1)
1c760 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 72 2d .........................:order-
1c780 62 79 20 5b 28 64 65 73 63 20 75 70 64 61 74 65 64 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 by.[(desc.updated)].............
1c7a0 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 6d 69 74 20 31 5d 0a 20 20 20 20 20 20 20 20 20 20 ............:limit.1]...........
1c7c0 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 .............id)............id))
1c7e0 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 .........(emacsql.db.[:alter-tab
1c800 6c 65 20 72 65 70 6f 73 69 74 6f 72 79 20 3a 72 65 6e 61 6d 65 2d 63 6f 6c 75 6d 6e 20 73 70 61 le.repository.:rename-column.spa
1c820 72 73 65 2d 70 20 3a 74 6f 20 63 6f 6e 64 69 74 69 6f 6e 5d 29 0a 20 20 20 20 20 20 20 20 28 70 rse-p.:to.condition]).........(p
1c840 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 69 64 20 2c 6e 6f 74 2d 74 72 61 63 6b 65 64 29 case-dolist.(`(,id.,not-tracked)
1c860 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c ........................(emacsql
1c880 20 64 62 20 5b 3a 73 65 6c 65 63 74 20 5b 69 64 20 63 6f 6e 64 69 74 69 6f 6e 5d 20 3a 66 72 6f .db.[:select.[id.condition].:fro
1c8a0 6d 20 72 65 70 6f 73 69 74 6f 72 79 5d 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 m.repository]))...........(emacs
1c8c0 71 6c 0a 20 20 20 20 20 20 20 20 20 20 20 64 62 20 5b 3a 75 70 64 61 74 65 20 72 65 70 6f 73 69 ql............db.[:update.reposi
1c8e0 74 6f 72 79 20 3a 73 65 74 20 28 3d 20 63 6f 6e 64 69 74 69 6f 6e 20 24 73 31 29 20 3a 77 68 65 tory.:set.(=.condition.$s1).:whe
1c900 72 65 20 28 3d 20 69 64 20 24 73 32 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 6e 6f re.(=.id.$s2)]............(if.no
1c920 74 2d 74 72 61 63 6b 65 64 20 3a 6b 6e 6f 77 6e 20 3a 74 72 61 63 6b 65 64 29 0a 20 20 20 20 20 t-tracked.:known.:tracked)......
1c940 20 20 20 20 20 20 69 64 29 29 29 0a 20 20 20 20 28 75 70 20 31 34 0a 20 20 20 20 20 20 20 20 28 ......id))).....(up.14.........(
1c960 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 72 65 70 6f 73 69 74 emacsql.db.[:alter-table.reposit
1c980 6f 72 79 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 74 65 61 6d 73 20 3a 64 65 66 61 75 6c 74 20 6e ory.:add-column.teams.:default.n
1c9a0 69 6c 5d 29 29 0a 20 20 20 20 28 75 70 20 31 35 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 il])).....(up.15.........(emacsq
1c9c0 6c 20 64 62 20 5b 3a 63 72 65 61 74 65 2d 74 61 62 6c 65 20 64 69 73 63 75 73 73 69 6f 6e 20 24 l.db.[:create-table.discussion.$
1c9e0 53 31 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 71 20 S1]..................(cdr.(assq.
1ca00 27 64 69 73 63 75 73 73 69 6f 6e 20 66 6f 72 67 65 2d 2d 64 62 2d 74 61 62 6c 65 2d 73 63 68 65 'discussion.forge--db-table-sche
1ca20 6d 61 74 61 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 63 72 mata))).........(emacsql.db.[:cr
1ca40 65 61 74 65 2d 74 61 62 6c 65 20 64 69 73 63 75 73 73 69 6f 6e 2d 63 61 74 65 67 6f 72 79 20 24 eate-table.discussion-category.$
1ca60 53 31 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 71 20 S1]..................(cdr.(assq.
1ca80 27 64 69 73 63 75 73 73 69 6f 6e 2d 63 61 74 65 67 6f 72 79 20 66 6f 72 67 65 2d 2d 64 62 2d 74 'discussion-category.forge--db-t
1caa0 61 62 6c 65 2d 73 63 68 65 6d 61 74 61 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 able-schemata))).........(emacsq
1cac0 6c 20 64 62 20 5b 3a 63 72 65 61 74 65 2d 74 61 62 6c 65 20 64 69 73 63 75 73 73 69 6f 6e 2d 6c l.db.[:create-table.discussion-l
1cae0 61 62 65 6c 20 24 53 31 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 abel.$S1]..................(cdr.
1cb00 28 61 73 73 71 20 27 64 69 73 63 75 73 73 69 6f 6e 2d 6c 61 62 65 6c 20 66 6f 72 67 65 2d 2d 64 (assq.'discussion-label.forge--d
1cb20 62 2d 74 61 62 6c 65 2d 73 63 68 65 6d 61 74 61 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 b-table-schemata))).........(ema
1cb40 63 73 71 6c 20 64 62 20 5b 3a 63 72 65 61 74 65 2d 74 61 62 6c 65 20 64 69 73 63 75 73 73 69 6f csql.db.[:create-table.discussio
1cb60 6e 2d 6d 61 72 6b 20 24 53 31 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 n-mark.$S1]..................(cd
1cb80 72 20 28 61 73 73 71 20 27 64 69 73 63 75 73 73 69 6f 6e 2d 6d 61 72 6b 20 66 6f 72 67 65 2d 2d r.(assq.'discussion-mark.forge--
1cba0 64 62 2d 74 61 62 6c 65 2d 73 63 68 65 6d 61 74 61 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 6d db-table-schemata))).........(em
1cbc0 61 63 73 71 6c 20 64 62 20 5b 3a 63 72 65 61 74 65 2d 74 61 62 6c 65 20 64 69 73 63 75 73 73 69 acsql.db.[:create-table.discussi
1cbe0 6f 6e 2d 70 6f 73 74 20 24 53 31 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 on-post.$S1]..................(c
1cc00 64 72 20 28 61 73 73 71 20 27 64 69 73 63 75 73 73 69 6f 6e 2d 70 6f 73 74 20 66 6f 72 67 65 2d dr.(assq.'discussion-post.forge-
1cc20 2d 64 62 2d 74 61 62 6c 65 2d 73 63 68 65 6d 61 74 61 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 -db-table-schemata))).........(e
1cc40 6d 61 63 73 71 6c 20 64 62 20 5b 3a 63 72 65 61 74 65 2d 74 61 62 6c 65 20 64 69 73 63 75 73 73 macsql.db.[:create-table.discuss
1cc60 69 6f 6e 2d 72 65 70 6c 79 20 24 53 31 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ion-reply.$S1]..................
1cc80 28 63 64 72 20 28 61 73 73 71 20 27 64 69 73 63 75 73 73 69 6f 6e 2d 72 65 70 6c 79 20 66 6f 72 (cdr.(assq.'discussion-reply.for
1cca0 67 65 2d 2d 64 62 2d 74 61 62 6c 65 2d 73 63 68 65 6d 61 74 61 29 29 29 29 0a 20 20 20 20 20 20 ge--db-table-schemata)))).......
1ccc0 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 72 65 70 6f ..(emacsql.db.[:alter-table.repo
1cce0 73 69 74 6f 72 79 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 64 69 73 63 75 73 73 69 6f 6e 2d 63 61 sitory.:add-column.discussion-ca
1cd00 74 65 67 6f 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 tegories......................:d
1cd20 65 66 61 75 6c 74 20 27 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 5d 29 0a 20 20 20 20 20 20 20 20 efault.'eieio-unbound]).........
1cd40 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 72 65 70 6f 73 69 (emacsql.db.[:alter-table.reposi
1cd60 74 6f 72 79 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 64 69 73 63 75 73 73 69 6f 6e 73 0a 20 20 20 tory.:add-column.discussions....
1cd80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 27 65 69 65 69 ..................:default.'eiei
1cda0 6f 2d 75 6e 62 6f 75 6e 64 5d 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 o-unbound]).........(emacsql.db.
1cdc0 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 72 65 70 6f 73 69 74 6f 72 79 20 3a 61 64 64 2d 63 6f [:alter-table.repository.:add-co
1cde0 6c 75 6d 6e 20 64 69 73 63 75 73 73 69 6f 6e 73 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 lumn.discussions-p..............
1ce00 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 6e 69 6c 5d 29 0a 20 20 20 20 20 20 20 20 28 ........:default.nil]).........(
1ce20 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a 61 6c 74 65 72 2d 74 61 62 6c 65 20 72 65 70 6f 73 69 74 emacsql.db.[:alter-table.reposit
1ce40 6f 72 79 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 64 69 73 63 75 73 73 69 6f 6e 73 2d 75 6e 74 69 ory.:add-column.discussions-unti
1ce60 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 65 66 61 75 6c 74 20 l......................:default.
1ce80 6e 69 6c 5d 29 0a 20 20 20 20 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 62 61 63 6b nil]).....))..(defun.forge--back
1cea0 75 70 2d 64 61 74 61 62 61 73 65 20 28 64 62 29 0a 20 20 28 6c 65 74 20 28 28 64 73 74 20 28 63 up-database.(db)...(let.((dst.(c
1cec0 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 73 61 6e 73 2d 65 78 74 65 6e 73 69 6f 6e 20 oncat.(file-name-sans-extension.
1cee0 66 6f 72 67 65 2d 64 61 74 61 62 61 73 65 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 forge-database-file)............
1cf00 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 2d 76 25 73 22 20 28 63 61 61 72 20 28 ..........(format."-v%s".(caar.(
1cf20 65 6d 61 63 73 71 6c 20 28 6f 72 65 66 20 64 62 20 63 6f 6e 6e 65 63 74 69 6f 6e 29 0a 20 20 20 emacsql.(oref.db.connection)....
1cf40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1cf60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5b 3a 70 72 61 67 6d 61 20 75 73 65 72 2d 76 65 ................[:pragma.user-ve
1cf80 72 73 69 6f 6e 5d 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 rsion])))......................(
1cfa0 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 20 22 2d 25 59 25 6d 25 64 2d 25 48 25 4d format-time-string."-%Y%m%d-%H%M
1cfc0 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2e 73 71 6c 69 74 65 ")......................".sqlite
1cfe0 22 29 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 43 6f 70 79 69 6e 67 20 46 6f 72 67 65 "))).....(message."Copying.Forge
1d000 20 64 61 74 61 62 61 73 65 20 74 6f 20 25 73 2e 2e 2e 22 20 64 73 74 29 0a 20 20 20 20 28 63 6f .database.to.%s...".dst).....(co
1d020 70 79 2d 66 69 6c 65 20 66 6f 72 67 65 2d 64 61 74 61 62 61 73 65 2d 66 69 6c 65 20 64 73 74 29 py-file.forge-database-file.dst)
1d040 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 43 6f 70 79 69 6e 67 20 46 6f 72 67 65 20 64 61 74 .....(message."Copying.Forge.dat
1d060 61 62 61 73 65 20 74 6f 20 25 73 2e 2e 2e 64 6f 6e 65 22 20 64 73 74 29 29 29 0a 0a 3b 3b 3b 20 abase.to.%s...done".dst)))..;;;.
1d080 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 _.;;.Local.Variables:.;;.read-sy
1d0a0 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 mbol-shorthands:.(.;;...("and$".
1d0c0 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 ..........."cond-let--and$").;;.
1d0e0 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d ..("and-let"........."cond-let--
1d100 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 69 66 2d 6c 65 74 22 20 20 20 20 20 20 20 20 and-let").;;...("if-let"........
1d120 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 .."cond-let--if-let").;;...("whe
1d140 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 n-let"........"cond-let--when-le
1d160 74 22 29 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 64 62 29 t")).;;.End:.(provide.'forge-db)
1d180 0a 3b 3b 3b 20 66 6f 72 67 65 2d 64 62 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 .;;;.forge-db.el.ends.here......
1d1a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d1c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d1e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d200 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 64 69 73 63 75 73 forge-20250916.1119/forge-discus
1d220 73 69 6f 6e 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 sion.el.........................
1d240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d260 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
1d280 30 30 32 35 34 33 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 37 33 32 00 20 30 00 00 00 0025432.00000000000.015732..0...
1d2a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d2c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d2e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d300 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
1d320 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
1d340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1d400 3b 3b 3b 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2e 65 6c 20 2d 2d 2d 20 44 69 73 63 ;;;.forge-discussion.el.---.Disc
1d420 75 73 73 69 6f 6e 20 73 75 70 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 ussion.support..-*-.lexical-bind
1d440 69 6e 67 3a 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 ing:t.-*-..;;.Copyright.(C).2018
1d460 2d 32 30 32 35 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 -2025.Jonas.Bernoulli..;;.Author
1d480 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c :.Jonas.Bernoulli.<jonas@bernoul
1d4a0 2e 6c 69 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 .li>.;;.Maintainer:.Jonas.Bernou
1d4c0 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 0a 3b 3b 20 53 50 44 58 2d lli.<jonas@bernoul.li>..;;.SPDX-
1d4e0 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c License-Identifier:.GPL-3.0-or-l
1d500 61 74 65 72 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 ater..;;.This.file.is.free.softw
1d520 61 72 65 3a 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 are:.you.can.redistribute.it.and
1d540 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 /or.modify.;;.it.under.the.terms
1d560 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e .of.the.GNU.General.Public.Licen
1d580 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 se.as.published.;;.by.the.Free.S
1d5a0 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 oftware.Foundation,.either.versi
1d5c0 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 on.3.of.the.License,.;;.or.(at.y
1d5e0 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b our.option).any.later.version..;
1d600 3b 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e ;.;;.This.file.is.distributed.in
1d620 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c .the.hope.that.it.will.be.useful
1d640 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 ,.;;.but.WITHOUT.ANY.WARRANTY;.w
1d660 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 ithout.even.the.implied.warranty
1d680 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 .of.;;.MERCHANTABILITY.or.FITNES
1d6a0 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 S.FOR.A.PARTICULAR.PURPOSE...See
1d6c0 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e .the.;;.GNU.General.Public.Licen
1d6e0 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 se.for.more.details..;;.;;.You.s
1d700 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 hould.have.received.a.copy.of.th
1d720 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 e.GNU.General.Public.License.;;.
1d740 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 along.with.this.file...If.not,.s
1d760 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 ee.<https://www.gnu.org/licenses
1d780 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 />...;;;.Code:..(require.'forge)
1d7a0 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 70 6f 73 74 29 0a 28 72 65 71 75 69 72 65 20 .(require.'forge-post).(require.
1d7c0 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 65 73 0a 0a 28 64 65 66 'forge-topic)..;;;.Classes..(def
1d7e0 63 6c 61 73 73 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 66 6f 72 67 65 2d 74 6f class.forge-discussion.(forge-to
1d800 70 69 63 29 0a 20 20 28 28 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 20 20 20 20 20 20 20 20 3a 69 pic)...((closql-table.........:i
1d820 6e 69 74 66 6f 72 6d 20 27 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d nitform.'discussion)....(closql-
1d840 70 72 69 6d 61 72 79 2d 6b 65 79 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 69 64 29 0a 20 20 20 primary-key...:initform.'id)....
1d860 28 63 6c 6f 73 71 6c 2d 6f 72 64 65 72 2d 62 79 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 (closql-order-by......:initform.
1d880 5b 28 64 65 73 63 20 6e 75 6d 62 65 72 29 5d 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 66 6f 72 65 [(desc.number)])....(closql-fore
1d8a0 69 67 6e 2d 6b 65 79 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 72 65 70 6f 73 69 74 6f 72 79 29 ign-key...:initform.'repository)
1d8c0 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 63 6c 61 73 73 2d 70 72 65 66 69 78 20 20 3a 69 6e 69 74 66 ....(closql-class-prefix..:initf
1d8e0 6f 72 6d 20 22 66 6f 72 67 65 2d 22 29 0a 20 20 20 28 69 64 20 20 20 20 20 20 20 20 20 20 20 20 orm."forge-")....(id............
1d900 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 69 64 29 0a 20 20 20 28 72 65 70 6f 73 69 74 .......:initarg.:id)....(reposit
1d920 6f 72 79 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 72 65 70 6f 73 69 74 6f ory...........:initarg.:reposito
1d940 72 79 29 0a 20 20 20 28 6e 75 6d 62 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e ry)....(number...............:in
1d960 69 74 61 72 67 20 3a 6e 75 6d 62 65 72 29 0a 20 20 20 28 61 6e 73 77 65 72 20 20 20 20 20 20 20 itarg.:number)....(answer.......
1d980 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 61 6e 73 77 65 72 29 0a 20 20 20 28 73 74 ........:initarg.:answer)....(st
1d9a0 61 74 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 73 74 61 ate................:initarg.:sta
1d9c0 74 65 29 0a 20 20 20 28 61 75 74 68 6f 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e te)....(author...............:in
1d9e0 69 74 61 72 67 20 3a 61 75 74 68 6f 72 29 0a 20 20 20 28 74 69 74 6c 65 20 20 20 20 20 20 20 20 itarg.:author)....(title........
1da00 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 69 74 6c 65 29 0a 20 20 20 28 63 72 65 ........:initarg.:title)....(cre
1da20 61 74 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 63 72 65 61 ated..............:initarg.:crea
1da40 74 65 64 29 0a 20 20 20 28 75 70 64 61 74 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 ted)....(updated..............:i
1da60 6e 69 74 61 72 67 20 3a 75 70 64 61 74 65 64 29 0a 20 20 20 28 63 6c 6f 73 65 64 20 20 20 20 20 nitarg.:updated)....(closed.....
1da80 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 63 6c 6f 73 65 64 29 0a 20 20 20 28 ..........:initarg.:closed)....(
1daa0 73 74 61 74 75 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 73 status...............:initarg.:s
1dac0 74 61 74 75 73 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 6c 6f 63 6b 65 64 2d tatus.:initform.nil)....(locked-
1dae0 70 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6c 6f 63 6b 65 64 2d 70 p.............:initarg.:locked-p
1db00 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 63 61 74 65 67 6f 72 79 20 20 20 20 .:initform.nil)....(category....
1db20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 63 61 74 65 67 6f 72 79 29 0a 20 20 20 .........:initarg.:category)....
1db40 28 62 6f 64 79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a (body.................:initarg.:
1db60 62 6f 64 79 29 0a 20 20 20 28 70 72 6f 6a 65 63 74 2d 63 61 72 64 73 29 20 3b 20 70 72 6f 6a 65 body)....(project-cards).;.proje
1db80 63 74 73 43 61 72 64 73 0a 20 20 20 28 65 64 69 74 73 29 20 3b 20 75 73 65 72 43 6f 6e 74 65 6e ctsCards....(edits).;.userConten
1dba0 74 45 64 69 74 73 0a 20 20 20 28 6c 61 62 65 6c 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tEdits....(labels...............
1dbc0 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 73 20 28 64 69 73 63 75 73 73 69 6f 6e 2d 6c 61 62 65 6c :closql-tables.(discussion-label
1dbe0 20 6c 61 62 65 6c 29 29 0a 20 20 20 28 70 61 72 74 69 63 69 70 61 6e 74 73 29 0a 20 20 20 28 70 .label))....(participants)....(p
1dc00 6f 73 74 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 63 6c 61 73 osts................:closql-clas
1dc20 73 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 70 6f 73 74 29 0a 20 20 20 28 72 65 61 s.forge-discussion-post)....(rea
1dc40 63 74 69 6f 6e 73 29 0a 20 20 20 28 74 69 6d 65 6c 69 6e 65 29 0a 20 20 20 28 6d 61 72 6b 73 20 ctions)....(timeline)....(marks.
1dc60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 73 20 28 64 ...............:closql-tables.(d
1dc80 69 73 63 75 73 73 69 6f 6e 2d 6d 61 72 6b 20 6d 61 72 6b 29 29 0a 20 20 20 28 6e 6f 74 65 20 20 iscussion-mark.mark))....(note..
1dca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6e 6f 74 65 20 20 20 ...............:initarg.:note...
1dcc0 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 74 68 65 69 72 2d 69 64 20 20 20 ..:initform.nil)....(their-id...
1dce0 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 68 65 69 72 2d 69 64 29 0a 20 20 ..........:initarg.:their-id)...
1dd00 20 28 73 6c 75 67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 .(slug.................:initarg.
1dd20 3a 73 6c 75 67 29 0a 20 20 20 28 73 61 76 65 64 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :slug)....(saved-p..............
1dd40 3a 69 6e 69 74 61 72 67 20 3a 73 61 76 65 64 2d 70 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 :initarg.:saved-p.:initform.nil)
1dd60 0a 20 20 20 29 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 ....))..(defclass.forge-discussi
1dd80 6f 6e 2d 70 6f 73 74 20 28 66 6f 72 67 65 2d 70 6f 73 74 29 0a 20 20 28 28 63 6c 6f 73 71 6c 2d on-post.(forge-post)...((closql-
1dda0 74 61 62 6c 65 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 64 69 73 63 75 73 73 table.........:initform.'discuss
1ddc0 69 6f 6e 2d 70 6f 73 74 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 70 72 69 6d 61 72 79 2d 6b 65 79 ion-post)....(closql-primary-key
1dde0 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 69 64 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 6f 72 64 ...:initform.'id)....(closql-ord
1de00 65 72 2d 62 79 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 5b 28 61 73 63 20 6e 75 6d 62 65 er-by......:initform.[(asc.numbe
1de20 72 29 5d 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 66 6f 72 65 69 67 6e 2d 6b 65 79 20 20 20 3a 69 r)])....(closql-foreign-key...:i
1de40 6e 69 74 66 6f 72 6d 20 27 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d nitform.'discussion)....(closql-
1de60 63 6c 61 73 73 2d 70 72 65 66 69 78 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 66 6f 72 67 65 2d 64 class-prefix..:initform."forge-d
1de80 69 73 63 75 73 73 69 6f 6e 2d 22 29 0a 20 20 20 28 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 iscussion-")....(id.............
1dea0 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 69 64 29 0a 20 20 20 28 74 68 65 69 72 2d 69 64 ......:initarg.:id)....(their-id
1dec0 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 68 65 69 72 2d 69 64 29 .............:initarg.:their-id)
1dee0 0a 20 20 20 28 6e 75 6d 62 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 ....(number...............:inita
1df00 72 67 20 3a 6e 75 6d 62 65 72 29 0a 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 20 20 20 20 20 20 rg.:number)....(discussion......
1df20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 28 61 .....:initarg.:discussion)....(a
1df40 75 74 68 6f 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 61 75 uthor...............:initarg.:au
1df60 74 68 6f 72 29 0a 20 20 20 28 63 72 65 61 74 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a thor)....(created..............:
1df80 69 6e 69 74 61 72 67 20 3a 63 72 65 61 74 65 64 29 0a 20 20 20 28 75 70 64 61 74 65 64 20 20 20 initarg.:created)....(updated...
1dfa0 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 75 70 64 61 74 65 64 29 0a 20 20 ...........:initarg.:updated)...
1dfc0 20 28 62 6f 64 79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 .(body.................:initarg.
1dfe0 3a 62 6f 64 79 29 0a 20 20 20 28 65 64 69 74 73 29 0a 20 20 20 28 72 65 61 63 74 69 6f 6e 73 29 :body)....(edits)....(reactions)
1e000 0a 20 20 20 28 72 65 70 6c 69 65 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 ....(replies..............:closq
1e020 6c 2d 63 6c 61 73 73 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 72 65 70 6c 79 29 0a l-class.forge-discussion-reply).
1e040 20 20 20 29 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f ...))..(defclass.forge-discussio
1e060 6e 2d 72 65 70 6c 79 20 28 66 6f 72 67 65 2d 70 6f 73 74 29 0a 20 20 28 28 63 6c 6f 73 71 6c 2d n-reply.(forge-post)...((closql-
1e080 74 61 62 6c 65 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 64 69 73 63 75 73 73 table.........:initform.'discuss
1e0a0 69 6f 6e 2d 72 65 70 6c 79 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 70 72 69 6d 61 72 79 2d 6b 65 ion-reply)....(closql-primary-ke
1e0c0 79 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 69 64 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 6f 72 y...:initform.'id)....(closql-or
1e0e0 64 65 72 2d 62 79 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 5b 28 61 73 63 20 6e 75 6d 62 der-by......:initform.[(asc.numb
1e100 65 72 29 5d 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 66 6f 72 65 69 67 6e 2d 6b 65 79 20 20 20 3a er)])....(closql-foreign-key...:
1e120 69 6e 69 74 66 6f 72 6d 20 27 70 6f 73 74 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 63 6c 61 73 73 initform.'post)....(closql-class
1e140 2d 70 72 65 66 69 78 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 66 6f 72 67 65 2d 64 69 73 63 75 73 -prefix..:initform."forge-discus
1e160 73 69 6f 6e 2d 22 29 0a 20 20 20 28 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sion-")....(id..................
1e180 20 3a 69 6e 69 74 61 72 67 20 3a 69 64 29 0a 20 20 20 28 74 68 65 69 72 2d 69 64 20 20 20 20 20 .:initarg.:id)....(their-id.....
1e1a0 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 68 65 69 72 2d 69 64 29 0a 20 20 20 28 ........:initarg.:their-id)....(
1e1c0 6e 75 6d 62 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6e number...............:initarg.:n
1e1e0 75 6d 62 65 72 29 0a 20 20 20 28 70 6f 73 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 umber)....(post.................
1e200 3a 69 6e 69 74 61 72 67 20 3a 70 6f 73 74 29 0a 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 20 20 :initarg.:post)....(discussion..
1e220 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 .........:initarg.:discussion)..
1e240 20 20 28 61 75 74 68 6f 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 ..(author...............:initarg
1e260 20 3a 61 75 74 68 6f 72 29 0a 20 20 20 28 63 72 65 61 74 65 64 20 20 20 20 20 20 20 20 20 20 20 .:author)....(created...........
1e280 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 63 72 65 61 74 65 64 29 0a 20 20 20 28 75 70 64 61 74 65 ...:initarg.:created)....(update
1e2a0 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 75 70 64 61 74 65 64 d..............:initarg.:updated
1e2c0 29 0a 20 20 20 28 62 6f 64 79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 )....(body.................:init
1e2e0 61 72 67 20 3a 62 6f 64 79 29 0a 20 20 20 28 65 64 69 74 73 29 0a 20 20 20 28 72 65 61 63 74 69 arg.:body)....(edits)....(reacti
1e300 6f 6e 73 29 0a 20 20 20 29 29 0a 0a 3b 3b 3b 20 51 75 65 72 79 0a 3b 3b 3b 3b 20 47 65 74 0a 0a ons)....))..;;;.Query.;;;;.Get..
1e320 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f (cl-defmethod.forge-get-reposito
1e340 72 79 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 70 6f 73 74 29 ry.((post.forge-discussion-post)
1e360 29 0a 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 )...(forge-get-repository.(forge
1e380 2d 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 70 6f 73 74 29 29 29 0a 0a 28 63 6c 2d 64 65 66 -get-discussion.post)))..(cl-def
1e3a0 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 28 70 6f method.forge-get-repository.((po
1e3c0 73 74 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 72 65 70 6c 79 29 29 0a 20 20 28 66 st.forge-discussion-reply))...(f
1e3e0 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 67 65 74 2d 64 orge-get-repository.(forge-get-d
1e400 69 73 63 75 73 73 69 6f 6e 20 70 6f 73 74 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 iscussion.post)))..(cl-defmethod
1e420 20 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 64 69 .forge-get-topic.((post.forge-di
1e440 73 63 75 73 73 69 6f 6e 2d 70 6f 73 74 29 29 0a 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 64 69 73 scussion-post))...(forge-get-dis
1e460 63 75 73 73 69 6f 6e 20 70 6f 73 74 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f cussion.post))..(cl-defmethod.fo
1e480 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 64 69 73 63 75 rge-get-topic.((post.forge-discu
1e4a0 73 73 69 6f 6e 2d 72 65 70 6c 79 29 29 0a 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 64 69 73 63 75 ssion-reply))...(forge-get-discu
1e4c0 73 73 69 6f 6e 20 70 6f 73 74 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 ssion.post))..(cl-defmethod.forg
1e4e0 65 2d 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 28 64 69 73 63 20 66 6f 72 67 65 2d 64 69 e-get-discussion.((disc.forge-di
1e500 73 63 75 73 73 69 6f 6e 29 29 0a 20 20 64 69 73 63 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f scussion))...disc)..(cl-defmetho
1e520 64 20 66 6f 72 67 65 2d 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 28 72 65 70 6f 20 66 6f d.forge-get-discussion.((repo.fo
1e540 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 6e 75 6d 62 65 72 29 0a 20 20 28 63 6c 2d 61 73 rge-repository).number)...(cl-as
1e560 73 65 72 74 20 28 6e 75 6d 62 65 72 70 20 6e 75 6d 62 65 72 29 20 74 29 0a 20 20 28 63 6c 6f 73 sert.(numberp.number).t)...(clos
1e580 71 6c 2d 67 65 74 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ql-get.(forge-db)...............
1e5a0 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 (forge--object-id.'forge-discuss
1e5c0 69 6f 6e 20 72 65 70 6f 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 ion.repo.number)...............'
1e5e0 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f forge-discussion))..(cl-defmetho
1e600 64 20 66 6f 72 67 65 2d 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 28 6e 75 6d 62 65 72 20 d.forge-get-discussion.((number.
1e620 69 6e 74 65 67 65 72 29 29 0a 20 20 28 61 6e 64 24 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 integer))...(and$.(forge-get-rep
1e640 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 20 6e 69 6c 20 27 6e 6f 74 61 74 70 74 29 0a 20 ository.:tracked.nil.'notatpt)..
1e660 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 24 20 6e .......(forge-get-discussion.$.n
1e680 75 6d 62 65 72 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 umber)))..(cl-defmethod.forge-ge
1e6a0 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 28 69 64 20 73 74 72 69 6e 67 29 29 0a 20 20 28 63 6c t-discussion.((id.string))...(cl
1e6c0 6f 73 71 6c 2d 67 65 74 20 28 66 6f 72 67 65 2d 64 62 29 20 69 64 20 27 66 6f 72 67 65 2d 64 69 osql-get.(forge-db).id.'forge-di
1e6e0 73 63 75 73 73 69 6f 6e 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d scussion))..(cl-defmethod.forge-
1e700 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 64 69 73 63 get-discussion.((post.forge-disc
1e720 75 73 73 69 6f 6e 2d 70 6f 73 74 29 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 67 65 74 20 28 66 6f 72 ussion-post))...(closql-get.(for
1e740 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 70 6f 73 74 20 ge-db)...............(oref.post.
1e760 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 discussion)...............'forge
1e780 2d 64 69 73 63 75 73 73 69 6f 6e 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 -discussion))..(cl-defmethod.for
1e7a0 67 65 2d 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 64 ge-get-discussion.((post.forge-d
1e7c0 69 73 63 75 73 73 69 6f 6e 2d 72 65 70 6c 79 29 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 67 65 74 20 iscussion-reply))...(closql-get.
1e7e0 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 70 (forge-db)...............(oref.p
1e800 6f 73 74 20 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 ost.discussion)...............'f
1e820 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 29 0a 0a 3b 3b 3b 3b 20 43 75 72 72 65 6e 74 0a orge-discussion))..;;;;.Current.
1e840 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 63 68 61 74 74 65 72 20 28 26 .(defun.forge-current-chatter.(&
1e860 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 64 optional.demand)..."Return.the.d
1e880 69 73 63 75 73 73 69 6f 6e 20 6f 72 20 69 73 73 75 65 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 62 iscussion.or.issue.at.point.or.b
1e8a0 65 69 6e 67 20 76 69 73 69 74 65 64 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 eing.visited..If.there.is.no.suc
1e8c0 68 20 64 69 73 63 75 73 73 69 6f 6e 20 6f 72 20 69 73 73 75 65 20 61 6e 64 20 44 45 4d 41 4e 44 h.discussion.or.issue.and.DEMAND
1e8e0 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 0a 73 69 67 6e 61 6c 20 61 6e 20 65 72 72 6f .is.non-nil,.then.signal.an.erro
1e900 72 2e 22 0a 20 20 28 6f 72 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 61 74 2d 70 r."...(or.(forge-discussion-at-p
1e920 6f 69 6e 74 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 61 74 2d 70 6f 69 6e oint).......(forge-issue-at-poin
1e940 74 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 6f 72 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 t).......(and.(or.(forge-discuss
1e960 69 6f 6e 2d 70 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 ion-p.forge-buffer-topic).......
1e980 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 20 66 6f 72 67 65 2d 62 75 .........(forge-issue-p.forge-bu
1e9a0 66 66 65 72 2d 74 6f 70 69 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 62 75 ffer-topic))............forge-bu
1e9c0 66 66 65 72 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 28 61 6e 64 20 64 65 6d 61 6e 64 20 28 75 ffer-topic).......(and.demand.(u
1e9e0 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 20 63 75 72 72 65 6e 74 20 64 69 73 63 75 73 73 69 6f 6e ser-error."No.current.discussion
1ea00 20 6f 72 20 69 73 73 75 65 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 75 72 .or.issue"))))..(defun.forge-cur
1ea20 72 65 6e 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 6e rent-discussion.(&optional.deman
1ea40 64 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 64 69 73 63 75 73 73 69 6f 6e 20 61 74 20 70 d)..."Return.the.discussion.at.p
1ea60 6f 69 6e 74 20 6f 72 20 62 65 69 6e 67 20 76 69 73 69 74 65 64 2e 0a 49 66 20 74 68 65 72 65 20 oint.or.being.visited..If.there.
1ea80 69 73 20 6e 6f 20 73 75 63 68 20 64 69 73 63 75 73 73 69 6f 6e 20 61 6e 64 20 44 45 4d 41 4e 44 is.no.such.discussion.and.DEMAND
1eaa0 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 73 69 67 6e 61 6c 0a 61 6e 20 65 72 72 6f .is.non-nil,.then.signal.an.erro
1eac0 72 2e 22 0a 20 20 28 6f 72 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 61 74 2d 70 r."...(or.(forge-discussion-at-p
1eae0 6f 69 6e 74 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 oint).......(and.(forge-discussi
1eb00 6f 6e 2d 70 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 on-p.forge-buffer-topic)........
1eb20 20 20 20 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 28 61 ....forge-buffer-topic).......(a
1eb40 6e 64 20 64 65 6d 61 6e 64 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 20 63 75 72 72 65 6e nd.demand.(user-error."No.curren
1eb60 74 20 64 69 73 63 75 73 73 69 6f 6e 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d t.discussion"))))..(defun.forge-
1eb80 64 69 73 63 75 73 73 69 6f 6e 2d 61 74 2d 70 6f 69 6e 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 discussion-at-point.(&optional.d
1eba0 65 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 64 69 73 63 75 73 73 69 6f 6e 20 emand)..."Return.the.discussion.
1ebc0 61 74 20 70 6f 69 6e 74 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 20 64 69 at.point..If.there.is.no.such.di
1ebe0 73 63 75 73 73 69 6f 6e 20 61 6e 64 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 scussion.and.DEMAND.is.non-nil,.
1ec00 74 68 65 6e 20 73 69 67 6e 61 6c 0a 61 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 28 74 68 then.signal.an.error."...(or.(th
1ec20 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a ing-at-point.'forge-discussion).
1ec40 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 65 63 74 69 6f 6e 2d 76 61 6c 75 65 2d 69 66 20 27 64 ......(magit-section-value-if.'d
1ec60 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 20 20 28 61 6e 64 20 64 65 6d 61 6e 64 20 28 75 73 iscussion).......(and.demand.(us
1ec80 65 72 2d 65 72 72 6f 72 20 22 4e 6f 20 64 69 73 63 75 73 73 69 6f 6e 20 61 74 20 70 6f 69 6e 74 er-error."No.discussion.at.point
1eca0 22 29 29 29 29 0a 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 27 74 "))))..(put.'forge-discussion.'t
1ecc0 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 23 27 66 6f 72 67 65 2d 74 68 69 6e 67 61 74 70 74 2d hing-at-point.#'forge-thingatpt-
1ece0 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 74 68 69 6e 67 61 -discussion).(defun.forge-thinga
1ed00 74 70 74 2d 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 29 0a 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 tpt--discussion.()...(and-let.((
1ed20 5f 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 23 5c 5c _(thing-at-point-looking-at."#\\
1ed40 28 5b 30 2d 39 5d 2b 5c 5c 29 5c 5c 5f 3e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6e ([0-9]+\\)\\_>")).............(n
1ed60 75 6d 62 65 72 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 28 6d 61 74 63 68 2d 73 umber.(string-to-number.(match-s
1ed80 74 72 69 6e 67 20 31 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 66 6f tring.1))).............(repo.(fo
1eda0 72 67 65 2d 2d 72 65 70 6f 2d 66 6f 72 2d 74 68 69 6e 67 61 74 70 74 29 29 29 0a 20 20 20 20 28 rge--repo-for-thingatpt))).....(
1edc0 66 6f 72 67 65 2d 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 72 65 70 6f 20 6e 75 6d 62 65 72 forge-get-discussion.repo.number
1ede0 29 29 29 0a 0a 3b 3b 3b 20 52 65 61 64 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 )))..;;;.Read..(defun.forge-read
1ee00 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 70 72 6f 6d 70 74 29 0a 20 20 22 52 65 61 64 20 61 6e 20 -discussion.(prompt)..."Read.an.
1ee20 61 63 74 69 76 65 20 64 69 73 63 75 73 73 69 6f 6e 20 77 69 74 68 20 63 6f 6d 70 6c 65 74 69 6f active.discussion.with.completio
1ee40 6e 20 75 73 69 6e 67 20 50 52 4f 4d 50 54 2e 0a 0a 4f 70 65 6e 2c 20 75 6e 72 65 61 64 20 61 6e n.using.PROMPT...Open,.unread.an
1ee60 64 20 70 65 6e 64 69 6e 67 20 64 69 73 63 75 73 73 69 6f 6e 73 20 61 72 65 20 63 6f 6e 73 69 64 d.pending.discussions.are.consid
1ee80 65 72 65 64 20 61 63 74 69 76 65 2e 0a 44 65 66 61 75 6c 74 20 74 6f 20 74 68 65 20 63 75 72 72 ered.active..Default.to.the.curr
1eea0 65 6e 74 20 64 69 73 63 75 73 73 69 6f 6e 2c 20 65 76 65 6e 20 69 66 20 69 74 20 69 73 6e 27 74 ent.discussion,.even.if.it.isn't
1eec0 20 61 63 74 69 76 65 2e 0a 0a 5c 5c 3c 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d 69 .active...\\<forge-read-topic-mi
1eee0 6e 69 62 75 66 66 65 72 2d 6d 61 70 3e 57 68 69 6c 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 69 73 nibuffer-map>While.completion.is
1ef00 20 69 6e 20 5c 0a 70 72 6f 67 72 65 73 73 2c 20 5c 5c 5b 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f .in.\.progress,.\\[forge-read-to
1ef20 70 69 63 2d 6c 69 66 74 2d 6c 69 6d 69 74 5d 20 6c 69 66 74 73 20 74 68 65 20 6c 69 6d 69 74 2c pic-lift-limit].lifts.the.limit,
1ef40 20 65 78 74 65 6e 64 69 6e 67 0a 74 68 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 .extending.the.completion.candid
1ef60 61 74 65 73 20 74 6f 20 69 6e 63 6c 75 64 65 20 61 6c 6c 20 64 69 73 63 75 73 73 69 6f 6e 73 2e ates.to.include.all.discussions.
1ef80 0a 0a 49 66 20 60 66 6f 72 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 63 65 73 27 ..If.`forge-limit-topic-choices'
1efa0 20 69 73 20 6e 69 6c 2c 20 74 68 65 6e 20 61 6c 6c 20 63 61 6e 64 69 64 61 74 65 73 0a 63 61 6e .is.nil,.then.all.candidates.can
1efc0 20 62 65 20 73 65 6c 65 63 74 65 64 20 66 72 6f 6d 20 74 68 65 20 73 74 61 72 74 2e 22 0a 20 20 .be.selected.from.the.start."...
1efe0 28 66 6f 72 67 65 2d 2d 72 65 61 64 2d 74 6f 70 69 63 20 70 72 6f 6d 70 74 0a 20 20 20 20 20 20 (forge--read-topic.prompt.......
1f000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 64 ...............#'forge-current-d
1f020 69 73 63 75 73 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 iscussion......................(
1f040 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 3a 74 79 70 65 20 27 64 69 73 63 75 73 forge--topics-spec.:type.'discus
1f060 73 69 6f 6e 20 3a 61 63 74 69 76 65 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sion.:active.t).................
1f080 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 3a 74 79 70 65 20 27 .....(forge--topics-spec.:type.'
1f0a0 64 69 73 63 75 73 73 69 6f 6e 20 3a 61 63 74 69 76 65 20 6e 69 6c 20 3a 73 74 61 74 65 20 6e 69 discussion.:active.nil.:state.ni
1f0c0 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 63 61 l)))..(defun.forge-read-topic-ca
1f0e0 74 65 67 6f 72 79 20 28 26 6f 70 74 69 6f 6e 61 6c 20 74 6f 70 69 63 20 70 72 6f 6d 70 74 29 0a tegory.(&optional.topic.prompt).
1f100 20 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 0a 20 20 20 28 6f 72 20 ..(magit-completing-read....(or.
1f120 70 72 6f 6d 70 74 20 22 43 61 74 65 67 6f 72 79 22 29 0a 20 20 20 28 6d 61 70 63 61 72 20 23 27 prompt."Category")....(mapcar.#'
1f140 63 61 64 64 72 0a 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 28 66 6f 72 67 65 2d 67 65 caddr............(oref.(forge-ge
1f160 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 6f 72 20 74 6f 70 69 63 20 3a 74 72 61 63 6b 65 64 29 t-repository.(or.topic.:tracked)
1f180 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 73 63 75 73 73 69 6f 6e 2d 63 61 )..................discussion-ca
1f1a0 74 65 67 6f 72 69 65 73 29 29 0a 20 20 20 6e 69 6c 20 74 0a 20 20 20 28 61 6e 64 20 74 6f 70 69 tegories))....nil.t....(and.topi
1f1c0 63 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 63 61 74 65 67 6f 72 79 20 c.(forge--format-topic-category.
1f1e0 74 6f 70 69 63 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d topic))))..(defun.forge--select-
1f200 64 69 73 63 75 73 73 69 6f 6e 2d 61 6e 73 77 65 72 20 28 74 6f 70 69 63 29 0a 20 20 28 69 66 2d discussion-answer.(topic)...(if-
1f220 6c 65 74 20 28 28 70 6f 73 74 20 28 66 6f 72 67 65 2d 70 6f 73 74 2d 61 74 2d 70 6f 69 6e 74 29 let.((post.(forge-post-at-point)
1f240 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f )).......(cond.((forge-discussio
1f260 6e 2d 70 20 28 66 6f 72 67 65 2d 70 6f 73 74 2d 61 74 2d 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 n-p.(forge-post-at-point))......
1f280 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 70 69 63 6b ........(user-error."Cannot.pick
1f2a0 20 74 68 65 20 71 75 65 73 74 69 6f 6e 20 61 73 20 69 74 73 20 6f 77 6e 20 61 6e 73 77 65 72 22 .the.question.as.its.own.answer"
1f2c0 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 24 20 28 6f 72 65 66 20 74 6f 70 69 )).............((and$.(oref.topi
1f2e0 63 20 61 6e 73 77 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 c.answer)....................(eq
1f300 75 61 6c 20 28 6f 72 65 66 20 70 6f 73 74 20 74 68 65 69 72 2d 69 64 29 0a 20 20 20 20 20 20 20 ual.(oref.post.their-id)........
1f320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 68 65 69 72 ...................(forge--their
1f340 2d 69 64 20 24 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 29 0a 20 20 20 20 20 -id.$)))..............nil)......
1f360 20 20 20 20 20 20 20 28 70 6f 73 74 29 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 .......(post)).....(user-error."
1f380 50 6f 69 6e 74 20 6d 75 73 74 20 62 65 20 6f 6e 20 61 6e 20 72 65 70 6c 79 20 74 6f 20 6d 61 72 Point.must.be.on.an.reply.to.mar
1f3a0 6b 20 69 74 20 61 73 20 74 68 65 20 61 6e 73 77 65 72 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 k.it.as.the.answer")))..(defun.f
1f3c0 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 64 69 73 63 75 73 73 69 6f 6e 2d 72 65 70 6c 79 2d 74 61 orge--select-discussion-reply-ta
1f3e0 72 67 65 74 20 28 29 0a 20 20 28 69 66 2d 6c 65 74 20 28 28 61 6e 73 77 65 72 73 20 28 6f 72 65 rget.()...(if-let.((answers.(ore
1f400 66 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 20 70 6f 73 74 73 29 29 29 0a 20 20 f.forge-buffer-topic.posts)))...
1f420 20 20 20 20 28 6c 65 74 2a 20 28 28 66 6f 72 6d 61 74 2d 61 6e 73 77 65 72 0a 20 20 20 20 20 20 ....(let*.((format-answer.......
1f440 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 61 6e 73 77 65 72 29 0a 20 20 20 20 20 20 20 ........(lambda.(answer)........
1f460 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 74 65 78 74 20 28 6f 72 65 66 20 61 6e 73 77 65 .........(let.((text.(oref.answe
1f480 72 20 62 6f 64 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 r.body)))...................(sav
1f4a0 65 2d 6d 61 74 63 68 2d 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-match-data....................
1f4c0 20 28 63 6f 6e 73 20 28 66 6f 72 6d 61 74 20 22 52 65 70 6c 79 20 74 6f 20 61 6e 73 77 65 72 20 .(cons.(format."Reply.to.answer.
1f4e0 25 53 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 %S".............................
1f500 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 6e 22 20 74 65 78 ......(if.(string-match."\n".tex
1f520 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t)..............................
1f540 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 74 65 78 74 20 30 20 28 6d 61 74 63 .........(substring.text.0.(matc
1f560 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 h-beginning.0)).................
1f580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 65 78 74 29 29 0a 20 20 20 20 20 ....................text))......
1f5a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 6e 73 77 65 72 29 29 29 29 29 .....................answer)))))
1f5c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 65 77 2d 61 6e 73 77 65 72 20 28 63 6f 6e 73 20 ..............(new-answer.(cons.
1f5e0 22 41 64 64 20 6e 65 77 20 74 6f 70 2d 6c 65 76 65 6c 20 61 6e 73 77 65 72 22 20 66 6f 72 67 65 "Add.new.top-level.answer".forge
1f600 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f -buffer-topic))..............(po
1f620 73 74 20 28 66 6f 72 67 65 2d 70 6f 73 74 2d 61 74 2d 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 st.(forge-post-at-point)).......
1f640 20 20 20 20 20 20 20 28 64 65 66 61 75 6c 74 20 28 63 6c 2d 74 79 70 65 63 61 73 65 20 70 6f 73 .......(default.(cl-typecase.pos
1f660 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 t.........................(forge
1f680 2d 64 69 73 63 75 73 73 69 6f 6e 2d 72 65 70 6c 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -discussion-reply...............
1f6a0 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6f 72 6d 61 74 2d 61 6e 73 77 65 ...........(funcall.format-answe
1f6c0 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r...............................
1f6e0 20 20 20 20 28 6d 61 67 69 74 2d 73 65 63 74 69 6f 6e 2d 70 61 72 65 6e 74 2d 76 61 6c 75 65 0a ....(magit-section-parent-value.
1f700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1f720 20 20 20 28 6d 61 67 69 74 2d 63 75 72 72 65 6e 74 2d 73 65 63 74 69 6f 6e 29 29 29 29 0a 20 20 ...(magit-current-section))))...
1f740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 ......................(forge-dis
1f760 63 75 73 73 69 6f 6e 2d 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 cussion-post....................
1f780 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6f 72 6d 61 74 2d 61 6e 73 77 65 72 20 70 6f 73 ......(funcall.format-answer.pos
1f7a0 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 t)).........................(for
1f7c0 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 6e 65 77 2d 61 6e 73 77 65 72 29 29 29 0a 20 20 20 20 ge-discussion.new-answer))).....
1f7e0 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 73 20 28 63 6f 6e 73 20 6e 65 77 2d 61 6e 73 77 .........(choices.(cons.new-answ
1f800 65 72 20 28 6d 61 70 63 61 72 20 66 6f 72 6d 61 74 2d 61 6e 73 77 65 72 20 61 6e 73 77 65 72 73 er.(mapcar.format-answer.answers
1f820 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 6f 63 20 28 6d 61 67 69 74 2d )))).........(cdr.(assoc.(magit-
1f840 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 52 65 70 6c 79 20 74 6f 3a 20 22 0a 20 20 20 completing-read."Reply.to:."....
1f860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1f880 20 20 20 20 20 20 20 20 63 68 6f 69 63 65 73 20 6e 69 6c 20 74 20 6e 69 6c 20 6e 69 6c 20 64 65 ........choices.nil.t.nil.nil.de
1f8a0 66 61 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 68 6f 69 63 fault).....................choic
1f8c0 65 73 29 29 29 0a 20 20 20 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 29 0a 0a es))).....forge-buffer-topic))..
1f8e0 3b 3b 3b 20 49 6e 73 65 72 74 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 ;;;.Insert..(defvar-keymap.forge
1f900 2d 64 69 73 63 75 73 73 69 6f 6e 73 2d 73 65 63 74 69 6f 6e 2d 6d 61 70 0a 20 20 22 3c 72 65 6d -discussions-section-map..."<rem
1f920 61 70 3e 20 3c 6d 61 67 69 74 2d 62 72 6f 77 73 65 2d 74 68 69 6e 67 3e 22 20 23 27 66 6f 72 67 ap>.<magit-browse-thing>".#'forg
1f940 65 2d 62 72 6f 77 73 65 2d 64 69 73 63 75 73 73 69 6f 6e 73 0a 20 20 22 3c 72 65 6d 61 70 3e 20 e-browse-discussions..."<remap>.
1f960 3c 6d 61 67 69 74 2d 76 69 73 69 74 2d 74 68 69 6e 67 3e 22 20 20 23 27 66 6f 72 67 65 2d 6c 69 <magit-visit-thing>"..#'forge-li
1f980 73 74 2d 64 69 73 63 75 73 73 69 6f 6e 73 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 st-discussions..."<remap>.<forge
1f9a0 2d 2d 6c 69 73 74 2d 6d 65 6e 75 3e 22 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d --list-menu>"...#'forge-topics-m
1f9c0 65 6e 75 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 69 74 65 6d 2d 6d 65 6e 75 enu..."<remap>.<forge--item-menu
1f9e0 3e 22 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 0a 20 20 22 43 2d 63 20 43 >"...#'forge-topic-menu..."C-c.C
1fa00 2d 6e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 -n"......................#'forge
1fa20 2d 63 72 65 61 74 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 -create-discussion)..(defvar-key
1fa40 6d 61 70 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 73 65 63 74 69 6f 6e 2d 6d 61 70 map.forge-discussion-section-map
1fa60 0a 20 20 3a 70 61 72 65 6e 74 20 66 6f 72 67 65 2d 63 6f 6d 6d 6f 6e 2d 6d 61 70 0a 20 20 22 3c ...:parent.forge-common-map..."<
1fa80 72 65 6d 61 70 3e 20 3c 6d 61 67 69 74 2d 76 69 73 69 74 2d 74 68 69 6e 67 3e 22 20 20 23 27 66 remap>.<magit-visit-thing>"..#'f
1faa0 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 74 6f 70 69 63 0a 20 20 22 3c 72 65 6d 61 70 3e orge-visit-this-topic..."<remap>
1fac0 20 3c 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 6d 65 6e 75 3e 22 20 20 20 23 27 66 6f 72 67 65 2d 74 .<forge--list-menu>"...#'forge-t
1fae0 6f 70 69 63 73 2d 6d 65 6e 75 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 69 74 opics-menu..."<remap>.<forge--it
1fb00 65 6d 2d 6d 65 6e 75 3e 22 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 0a em-menu>"...#'forge-topic-menu).
1fb20 0a 28 63 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 64 69 73 63 75 73 73 69 .(cl-defun.forge-insert-discussi
1fb40 6f 6e 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 28 73 70 65 63 20 6e 69 6c 20 73 73 70 65 63 29 20 ons.(&optional.(spec.nil.sspec).
1fb60 68 65 61 64 69 6e 67 29 0a 20 20 22 49 6e 73 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 64 69 73 heading)..."Insert.a.list.of.dis
1fb80 63 75 73 73 69 6f 6e 73 2c 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 60 66 6f 72 67 65 2d 2d 62 cussions,.according.to.`forge--b
1fba0 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 27 2e 0a 4f 70 74 69 6f 6e 61 6c 20 53 50 45 uffer-topics-spec'..Optional.SPE
1fbc0 43 20 63 61 6e 20 62 65 20 75 73 65 64 20 74 6f 20 6f 76 65 72 72 69 64 65 20 74 68 61 74 20 66 C.can.be.used.to.override.that.f
1fbe0 69 6c 74 65 72 69 6e 67 20 73 70 65 63 69 66 69 63 61 74 69 6f 6e 2c 0a 61 6e 64 20 6f 70 74 69 iltering.specification,.and.opti
1fc00 6f 6e 61 6c 20 48 45 41 44 49 4e 47 20 74 6f 20 63 68 61 6e 67 65 20 74 68 65 20 73 65 63 74 69 onal.HEADING.to.change.the.secti
1fc20 6f 6e 20 68 65 61 64 69 6e 67 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 5f 28 66 6f on.heading."...(when-let*.((_(fo
1fc40 72 67 65 2d 64 62 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 rge-db.t))...............(repo.(
1fc60 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 29 forge-get-repository.:tracked?))
1fc80 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 5f 28 6f 72 65 66 20 72 65 70 6f 20 64 69 73 63 ...............(_(oref.repo.disc
1fca0 75 73 73 69 6f 6e 73 2d 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 70 65 63 20 ussions-p))...............(spec.
1fcc0 28 69 66 20 73 73 70 65 63 20 73 70 65 63 20 28 66 6f 72 67 65 2d 2d 63 6c 6f 6e 65 2d 62 75 66 (if.sspec.spec.(forge--clone-buf
1fce0 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 fer-topics-spec)))..............
1fd00 20 28 5f 28 6d 65 6d 71 20 28 6f 72 65 66 20 73 70 65 63 20 74 79 70 65 29 20 27 28 74 6f 70 69 .(_(memq.(oref.spec.type).'(topi
1fd20 63 20 64 69 73 63 75 73 73 69 6f 6e 29 29 29 29 0a 20 20 20 20 28 6f 73 65 74 20 73 70 65 63 20 c.discussion)))).....(oset.spec.
1fd40 74 79 70 65 20 27 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 69 6e type.'discussion).....(forge--in
1fd60 73 65 72 74 2d 74 6f 70 69 63 73 20 27 64 69 73 63 75 73 73 69 6f 6e 73 0a 20 20 20 20 20 20 20 sert-topics.'discussions........
1fd80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 68 65 61 64 69 6e 67 20 22 ...................(or.heading."
1fda0 44 69 73 63 75 73 73 69 6f 6e 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Discussions")...................
1fdc0 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 74 6f 70 69 63 73 20 73 70 65 63 ........(forge--list-topics.spec
1fde0 20 72 65 70 6f 29 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 .repo))))..;;;._.;;.Local.Variab
1fe00 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a 20 les:.;;.read-symbol-shorthands:.
1fe20 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d (.;;...("and$"............"cond-
1fe40 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 20 let--and$").;;...("and-let".....
1fe60 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 ...."cond-let--and-let").;;...("
1fe80 69 66 2d 6c 65 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d 6c if-let".........."cond-let--if-l
1fea0 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 6f et").;;...("when-let"........"co
1fec0 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f nd-let--when-let")).;;.End:.(pro
1fee0 76 69 64 65 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 3b 3b 3b 20 66 6f 72 67 vide.'forge-discussion).;;;.forg
1ff00 65 2d 64 69 73 63 75 73 73 69 6f 6e 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 e-discussion.el.ends.here.......
1ff20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ff40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ff60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ff80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ffa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ffc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
1ffe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20000 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 66 6f 72 67 65 6a forge-20250916.1119/forge-forgej
20020 6f 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 o.el............................
20040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20060 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
20080 30 30 30 34 30 34 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 31 37 34 00 20 30 00 00 00 0004042.00000000000.015174..0...
200a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
200c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
200e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20100 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
20120 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
20140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
201a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
201c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
201e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20200 3b 3b 3b 20 66 6f 72 67 65 2d 66 6f 72 67 65 6a 6f 2e 65 6c 20 2d 2d 2d 20 46 6f 72 67 65 6a 6f ;;;.forge-forgejo.el.---.Forgejo
20220 20 73 75 70 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 .support..-*-.lexical-binding:t.
20240 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 -*-..;;.Copyright.(C).2018-2025.
20260 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 Jonas.Bernoulli..;;.Author:.Jona
20280 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 s.Bernoulli.<emacs.forge@jonas.b
202a0 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e ernoulli.dev>.;;.Maintainer:.Jon
202c0 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e as.Bernoulli.<emacs.forge@jonas.
202e0 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d bernoulli.dev>..;;.SPDX-License-
20300 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b Identifier:.GPL-3.0-or-later..;;
20320 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 .This.file.is.free.software:.you
20340 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 .can.redistribute.it.and/or.modi
20360 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 fy.;;.it.under.the.terms.of.the.
20380 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 GNU.General.Public.License.as.pu
203a0 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 blished.;;.by.the.Free.Software.
203c0 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 Foundation,.either.version.3.of.
203e0 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 the.License,.;;.or.(at.your.opti
20400 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 on).any.later.version..;;.;;.Thi
20420 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 s.file.is.distributed.in.the.hop
20440 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 e.that.it.will.be.useful,.;;.but
20460 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 .WITHOUT.ANY.WARRANTY;.without.e
20480 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d ven.the.implied.warranty.of.;;.M
204a0 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 ERCHANTABILITY.or.FITNESS.FOR.A.
204c0 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 PARTICULAR.PURPOSE...See.the.;;.
204e0 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d GNU.General.Public.License.for.m
20500 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 ore.details..;;.;;.You.should.ha
20520 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 ve.received.a.copy.of.the.GNU.Ge
20540 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 neral.Public.License.;;.along.wi
20560 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 th.this.file...If.not,.see.<http
20580 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b s://www.gnu.org/licenses/>...;;;
205a0 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 0a 3b 3b 3b 20 43 6c .Code:..(require.'forge)..;;;.Cl
205c0 61 73 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 66 6f 72 67 65 6a 6f 2d 72 65 70 ass..(defclass.forge-forgejo-rep
205e0 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 75 6e 75 73 65 64 61 70 69 2d 72 65 70 6f 73 69 74 ository.(forge-unusedapi-reposit
20600 6f 72 79 29 0a 20 20 28 28 69 73 73 75 65 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 ory)...((issues-url-format......
20620 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 ...:initform."https://%h/%o/%n/i
20640 73 73 75 65 73 22 29 0a 20 20 20 28 69 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 ssues")....(issue-url-format....
20660 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 ......:initform."https://%h/%o/%
20680 6e 2f 69 73 73 75 65 73 2f 25 69 22 29 0a 20 20 20 3b 3b 20 54 68 65 20 61 6e 63 68 6f 72 20 66 n/issues/%i")....;;.The.anchor.f
206a0 6f 72 20 74 68 65 20 69 73 73 75 65 20 69 74 73 65 6c 66 20 69 73 20 2e 2e 2e 2f 25 69 23 69 73 or.the.issue.itself.is..../%i#is
206c0 73 75 65 2d 25 69 0a 20 20 20 28 69 73 73 75 65 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 sue-%i....(issue-post-url-format
206e0 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e .....:initform."https://%h/%o/%n
20700 2f 69 73 73 75 65 73 2f 25 69 23 69 73 73 75 65 63 6f 6d 6d 65 6e 74 2d 25 49 22 29 0a 20 20 20 /issues/%i#issuecomment-%I")....
20720 28 70 75 6c 6c 72 65 71 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 3a 69 6e 69 74 (pullreqs-url-format.......:init
20740 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 22 29 0a 20 form."https://%h/%o/%n/pulls")..
20760 20 20 28 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 3a 69 6e ..(pullreq-url-format........:in
20780 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 2f 25 itform."https://%h/%o/%n/pulls/%
207a0 69 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 i")....(pullreq-post-url-format.
207c0 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 ..:initform."https://%h/%o/%n/pu
207e0 6c 6c 73 2f 25 69 23 69 73 73 75 65 63 6f 6d 6d 65 6e 74 2d 25 49 22 29 0a 20 20 20 28 63 6f 6d lls/%i#issuecomment-%I")....(com
20800 6d 69 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d mit-url-format.........:initform
20820 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 63 6f 6d 6d 69 74 2f 25 72 22 29 0a 20 ."https://%h/%o/%n/commit/%r")..
20840 20 20 28 62 72 61 6e 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e ..(branch-url-format.........:in
20860 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 63 6f 6d 6d 69 74 73 itform."https://%h/%o/%n/commits
20880 2f 62 72 61 6e 63 68 2f 25 72 22 29 0a 20 20 20 28 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f 72 6d /branch/%r")....(remote-url-form
208a0 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 at.........:initform."https://%h
208c0 2f 25 6f 2f 25 6e 22 29 0a 20 20 20 28 62 6c 6f 62 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 /%o/%n")....(blob-url-format....
208e0 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f .......:initform."https://%h/%o/
20900 25 6e 2f 73 72 63 2f 25 72 2f 25 66 22 29 0a 20 20 20 28 63 72 65 61 74 65 2d 69 73 73 75 65 2d %n/src/%r/%f")....(create-issue-
20920 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f url-format...:initform."https://
20940 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 65 73 2f 6e 65 77 22 29 0a 20 20 20 28 63 72 65 61 74 65 %h/%o/%n/issues/new")....(create
20960 2d 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 -pullreq-url-format.:initform."h
20980 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 22 29 20 3b 20 73 69 63 0a 20 20 ttps://%h/%o/%n/pulls").;.sic...
209a0 20 28 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 20 3a 69 6e 69 74 66 6f 72 6d 20 22 2b 72 65 .(pullreq-refspec.:initform."+re
209c0 66 73 2f 70 75 6c 6c 2f 2a 2f 68 65 61 64 3a 72 65 66 73 2f 70 75 6c 6c 72 65 71 73 2f 2a 22 29 fs/pull/*/head:refs/pullreqs/*")
209e0 29 29 0a 0a 3b 3b 3b 20 5f 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 66 6f 72 67 65 6a ))..;;;._.(provide.'forge-forgej
20a00 6f 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 66 6f 72 67 65 6a 6f 2e 65 6c 20 65 6e 64 73 20 68 65 72 o).;;;.forge-forgejo.el.ends.her
20a20 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 e...............................
20a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20c00 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 67 69 74 65 61 2e forge-20250916.1119/forge-gitea.
20c20 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 el..............................
20c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20c60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
20c80 30 30 30 34 34 30 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 36 33 33 00 20 30 00 00 00 0004403.00000000000.014633..0...
20ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20d00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
20d20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
20d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
20e00 3b 3b 3b 20 66 6f 72 67 65 2d 67 69 74 65 61 2e 65 6c 20 2d 2d 2d 20 47 69 74 65 61 20 73 75 70 ;;;.forge-gitea.el.---.Gitea.sup
20e20 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 2d 2a 2d 0a port..-*-.lexical-binding:t.-*-.
20e40 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f 6e 61 .;;.Copyright.(C).2018-2025.Jona
20e60 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 73 20 42 65 s.Bernoulli..;;.Author:.Jonas.Be
20e80 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f rnoulli.<emacs.forge@jonas.berno
20ea0 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 ulli.dev>.;;.Maintainer:.Jonas.B
20ec0 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e ernoulli.<emacs.forge@jonas.bern
20ee0 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e oulli.dev>..;;.SPDX-License-Iden
20f00 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 68 69 tifier:.GPL-3.0-or-later..;;.Thi
20f20 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61 6e s.file.is.free.software:.you.can
20f40 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b .redistribute.it.and/or.modify.;
20f60 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 ;.it.under.the.terms.of.the.GNU.
20f80 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 General.Public.License.as.publis
20fa0 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e hed.;;.by.the.Free.Software.Foun
20fc0 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 dation,.either.version.3.of.the.
20fe0 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 License,.;;.or.(at.your.option).
21000 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 66 69 any.later.version..;;.;;.This.fi
21020 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 le.is.distributed.in.the.hope.th
21040 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 at.it.will.be.useful,.;;.but.WIT
21060 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 HOUT.ANY.WARRANTY;.without.even.
21080 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 the.implied.warranty.of.;;.MERCH
210a0 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 ANTABILITY.or.FITNESS.FOR.A.PART
210c0 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 ICULAR.PURPOSE...See.the.;;.GNU.
210e0 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 General.Public.License.for.more.
21100 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 details..;;.;;.You.should.have.r
21120 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 eceived.a.copy.of.the.GNU.Genera
21140 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 l.Public.License.;;.along.with.t
21160 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f his.file...If.not,.see.<https://
21180 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 64 www.gnu.org/licenses/>...;;;.Cod
211a0 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 0a e:..(require.'forge)..;;;.Class.
211c0 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 67 69 74 65 61 2d 72 65 70 6f 73 69 74 6f 72 .(defclass.forge-gitea-repositor
211e0 79 20 28 66 6f 72 67 65 2d 75 6e 75 73 65 64 61 70 69 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 y.(forge-unusedapi-repository)..
21200 20 28 28 69 73 73 75 65 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e .((issues-url-format.........:in
21220 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 65 73 22 itform."https://%h/%o/%n/issues"
21240 29 0a 20 20 20 28 69 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 )....(issue-url-format..........
21260 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 :initform."https://%h/%o/%n/issu
21280 65 73 2f 25 69 22 29 0a 20 20 20 3b 3b 20 54 68 65 20 61 6e 63 68 6f 72 20 66 6f 72 20 74 68 65 es/%i")....;;.The.anchor.for.the
212a0 20 69 73 73 75 65 20 69 74 73 65 6c 66 20 69 73 20 2e 2e 2e 2f 25 69 23 69 73 73 75 65 2d 25 69 .issue.itself.is..../%i#issue-%i
212c0 0a 20 20 20 28 69 73 73 75 65 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 3a ....(issue-post-url-format.....:
212e0 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 65 initform."https://%h/%o/%n/issue
21300 73 2f 25 69 23 69 73 73 75 65 63 6f 6d 6d 65 6e 74 2d 25 49 22 29 0a 20 20 20 28 70 75 6c 6c 72 s/%i#issuecomment-%I")....(pullr
21320 65 71 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 eqs-url-format.......:initform."
21340 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 22 29 0a 20 20 20 28 70 75 6c https://%h/%o/%n/pulls")....(pul
21360 6c 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d lreq-url-format........:initform
21380 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 2f 25 69 22 29 0a 20 20 ."https://%h/%o/%n/pulls/%i")...
213a0 20 28 70 75 6c 6c 72 65 71 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 3a 69 6e 69 .(pullreq-post-url-format...:ini
213c0 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 2f 25 69 tform."https://%h/%o/%n/pulls/%i
213e0 23 69 73 73 75 65 63 6f 6d 6d 65 6e 74 2d 25 49 22 29 0a 20 20 20 28 63 6f 6d 6d 69 74 2d 75 72 #issuecomment-%I")....(commit-ur
21400 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 l-format.........:initform."http
21420 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 63 6f 6d 6d 69 74 2f 25 72 22 29 0a 20 20 20 28 62 72 61 s://%h/%o/%n/commit/%r")....(bra
21440 6e 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d nch-url-format.........:initform
21460 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 63 6f 6d 6d 69 74 73 2f 62 72 61 6e 63 ."https://%h/%o/%n/commits/branc
21480 68 2f 25 72 22 29 0a 20 20 20 28 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 h/%r")....(remote-url-format....
214a0 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e .....:initform."https://%h/%o/%n
214c0 22 29 0a 20 20 20 28 62 6c 6f 62 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 ")....(blob-url-format..........
214e0 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 73 72 63 .:initform."https://%h/%o/%n/src
21500 2f 25 72 2f 25 66 22 29 0a 20 20 20 28 63 72 65 61 74 65 2d 69 73 73 75 65 2d 75 72 6c 2d 66 6f /%r/%f")....(create-issue-url-fo
21520 72 6d 61 74 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f rmat...:initform."https://%h/%o/
21540 25 6e 2f 69 73 73 75 65 73 2f 6e 65 77 22 29 0a 20 20 20 28 63 72 65 61 74 65 2d 70 75 6c 6c 72 %n/issues/new")....(create-pullr
21560 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f eq-url-format.:initform."https:/
21580 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 22 29 20 3b 20 73 69 63 0a 20 20 20 28 70 75 6c 6c /%h/%o/%n/pulls").;.sic....(pull
215a0 72 65 71 2d 72 65 66 73 70 65 63 20 3a 69 6e 69 74 66 6f 72 6d 20 22 2b 72 65 66 73 2f 70 75 6c req-refspec.:initform."+refs/pul
215c0 6c 2f 2a 2f 68 65 61 64 3a 72 65 66 73 2f 70 75 6c 6c 72 65 71 73 2f 2a 22 29 29 29 0a 0a 3b 3b l/*/head:refs/pullreqs/*")))..;;
215e0 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d ;._.;;.Local.Variables:.;;.read-
21600 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 symbol-shorthands:.(.;;...("and$
21620 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b "............"cond-let--and$").;
21640 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 ;...("and-let"........."cond-let
21660 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 69 66 2d 6c 65 74 22 20 20 20 20 20 20 --and-let").;;...("if-let"......
21680 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 ...."cond-let--if-let").;;...("w
216a0 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d hen-let"........"cond-let--when-
216c0 6c 65 74 22 29 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 67 let")).;;.End:.(provide.'forge-g
216e0 69 74 65 61 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 67 69 74 65 61 2e 65 6c 20 65 6e 64 73 20 68 65 itea).;;;.forge-gitea.el.ends.he
21700 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 re..............................
21720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
21740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
21760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
21780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
217a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
217c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
217e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
21800 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 67 69 74 68 75 62 forge-20250916.1119/forge-github
21820 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .el.............................
21840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
21860 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
21880 30 31 35 32 33 35 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 33 33 00 20 30 00 00 00 0152352.00000000000.015033..0...
218a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
218c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
218e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
21900 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
21920 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
21940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
21960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
21980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
219a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
219c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
219e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
21a00 3b 3b 3b 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2e 65 6c 20 2d 2d 2d 20 47 69 74 68 75 62 20 73 ;;;.forge-github.el.---.Github.s
21a20 75 70 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 2d 2a upport..-*-.lexical-binding:t.-*
21a40 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f -..;;.Copyright.(C).2018-2025.Jo
21a60 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 73 20 nas.Bernoulli..;;.Author:.Jonas.
21a80 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 Bernoulli.<emacs.forge@jonas.ber
21aa0 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 noulli.dev>.;;.Maintainer:.Jonas
21ac0 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 .Bernoulli.<emacs.forge@jonas.be
21ae0 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 rnoulli.dev>..;;.SPDX-License-Id
21b00 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 entifier:.GPL-3.0-or-later..;;.T
21b20 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 his.file.is.free.software:.you.c
21b40 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 an.redistribute.it.and/or.modify
21b60 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e .;;.it.under.the.terms.of.the.GN
21b80 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c U.General.Public.License.as.publ
21ba0 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f ished.;;.by.the.Free.Software.Fo
21bc0 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 undation,.either.version.3.of.th
21be0 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e e.License,.;;.or.(at.your.option
21c00 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 ).any.later.version..;;.;;.This.
21c20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 file.is.distributed.in.the.hope.
21c40 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 that.it.will.be.useful,.;;.but.W
21c60 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 ITHOUT.ANY.WARRANTY;.without.eve
21c80 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 n.the.implied.warranty.of.;;.MER
21ca0 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 CHANTABILITY.or.FITNESS.FOR.A.PA
21cc0 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e RTICULAR.PURPOSE...See.the.;;.GN
21ce0 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 U.General.Public.License.for.mor
21d00 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 e.details..;;.;;.You.should.have
21d20 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 .received.a.copy.of.the.GNU.Gene
21d40 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 ral.Public.License.;;.along.with
21d60 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a .this.file...If.not,.see.<https:
21d80 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 //www.gnu.org/licenses/>...;;;.C
21da0 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 63 6c 69 65 6e 74 29 0a 28 72 ode:..(require.'forge-client).(r
21dc0 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 28 72 65 71 75 69 equire.'forge-discussion).(requi
21de0 72 65 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 re.'forge-issue).(require.'forge
21e00 2d 70 75 6c 6c 72 65 71 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 -pullreq)..;;;.Class..(defclass.
21e20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 72 forge-github-repository.(forge-r
21e40 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 28 28 64 69 73 63 75 73 73 69 6f 6e 73 2d 75 72 6c 2d 66 epository)...((discussions-url-f
21e60 6f 72 6d 61 74 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f ormat.....:initform."https://%h/
21e80 25 6f 2f 25 6e 2f 64 69 73 63 75 73 73 69 6f 6e 73 22 29 0a 20 20 20 28 64 69 73 63 75 73 73 69 %o/%n/discussions")....(discussi
21ea0 6f 6e 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 on-url-format......:initform."ht
21ec0 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 64 69 73 63 75 73 73 69 6f 6e 73 2f 25 69 22 29 0a tps://%h/%o/%n/discussions/%i").
21ee0 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a ...(discussion-post-url-format.:
21f00 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 64 69 73 63 75 initform."https://%h/%o/%n/discu
21f20 73 73 69 6f 6e 73 2f 25 69 23 64 69 73 63 75 73 73 69 6f 6e 63 6f 6d 6d 65 6e 74 2d 25 49 22 29 ssions/%i#discussioncomment-%I")
21f40 0a 20 20 20 28 69 73 73 75 65 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 ....(issues-url-format..........
21f60 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 :initform."https://%h/%o/%n/issu
21f80 65 73 22 29 0a 20 20 20 28 69 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 es")....(issue-url-format.......
21fa0 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f ....:initform."https://%h/%o/%n/
21fc0 69 73 73 75 65 73 2f 25 69 22 29 0a 20 20 20 28 69 73 73 75 65 2d 70 6f 73 74 2d 75 72 6c 2d 66 issues/%i")....(issue-post-url-f
21fe0 6f 72 6d 61 74 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 ormat......:initform."https://%h
22000 2f 25 6f 2f 25 6e 2f 69 73 73 75 65 73 2f 25 69 23 69 73 73 75 65 63 6f 6d 6d 65 6e 74 2d 25 49 /%o/%n/issues/%i#issuecomment-%I
22020 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 ")....(pullreqs-url-format......
22040 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 ..:initform."https://%h/%o/%n/pu
22060 6c 6c 73 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 lls")....(pullreq-url-format....
22080 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e .....:initform."https://%h/%o/%n
220a0 2f 70 75 6c 6c 2f 25 69 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 70 6f 73 74 2d 75 72 6c 2d /pull/%i")....(pullreq-post-url-
220c0 66 6f 72 6d 61 74 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f format....:initform."https://%h/
220e0 25 6f 2f 25 6e 2f 70 75 6c 6c 2f 25 69 23 69 73 73 75 65 63 6f 6d 6d 65 6e 74 2d 25 49 22 29 0a %o/%n/pull/%i#issuecomment-%I").
22100 20 20 20 28 63 6f 6d 6d 69 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 3a ...(commit-url-format..........:
22120 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 63 6f 6d 6d 69 initform."https://%h/%o/%n/commi
22140 74 2f 25 72 22 29 0a 20 20 20 28 62 72 61 6e 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 t/%r")....(branch-url-format....
22160 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 ......:initform."https://%h/%o/%
22180 6e 2f 63 6f 6d 6d 69 74 73 2f 25 72 22 29 0a 20 20 20 28 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f n/commits/%r")....(remote-url-fo
221a0 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f rmat..........:initform."https:/
221c0 2f 25 68 2f 25 6f 2f 25 6e 22 29 0a 20 20 20 28 62 6c 6f 62 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 /%h/%o/%n")....(blob-url-format.
221e0 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 ...........:initform."https://%h
22200 2f 25 6f 2f 25 6e 2f 62 6c 6f 62 2f 25 72 2f 25 66 22 29 0a 20 20 20 28 63 72 65 61 74 65 2d 69 /%o/%n/blob/%r/%f")....(create-i
22220 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 ssue-url-format....:initform."ht
22240 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 65 73 2f 6e 65 77 22 29 0a 20 20 20 28 tps://%h/%o/%n/issues/new")....(
22260 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 3a 69 6e 69 74 create-pullreq-url-format..:init
22280 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 63 6f 6d 70 61 72 65 22 29 form."https://%h/%o/%n/compare")
222a0 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 20 20 20 20 20 20 20 20 20 20 20 20 ....(pullreq-refspec............
222c0 3a 69 6e 69 74 66 6f 72 6d 20 22 2b 72 65 66 73 2f 70 75 6c 6c 2f 2a 2f 68 65 61 64 3a 72 65 66 :initform."+refs/pull/*/head:ref
222e0 73 2f 70 75 6c 6c 72 65 71 73 2f 2a 22 29 29 29 0a 0a 3b 3b 3b 20 51 75 65 72 79 0a 0a 28 64 65 s/pullreqs/*")))..;;;.Query..(de
22300 66 75 6e 20 66 6f 72 67 65 2d 2d 67 65 74 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 fun.forge--get-github-repository
22320 20 28 29 0a 20 20 28 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 70 .()...(forge-github-repository-p
22340 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 3f 29 29 29 .(forge-get-repository.:stub?)))
22360 0a 0a 3b 3b 3b 20 50 75 6c 6c 0a 3b 3b 3b 3b 20 47 72 61 70 68 51 4c 0a 0a 28 64 65 66 63 6f 6e ..;;;.Pull.;;;;.GraphQL..(defcon
22380 73 74 20 66 6f 72 67 65 2d 2d 67 69 74 68 75 62 2d 73 70 61 72 73 65 2d 72 65 70 6f 73 69 74 6f st.forge--github-sparse-reposito
223a0 72 79 2d 71 75 65 72 79 0a 20 20 27 28 71 75 65 72 79 0a 20 20 20 20 28 20 20 72 65 70 6f 73 69 ry-query...'(query.....(..reposi
223c0 74 6f 72 79 0a 20 20 20 20 20 20 20 5b 28 6f 77 6e 65 72 20 24 6f 77 6e 65 72 20 53 74 72 69 6e tory........[(owner.$owner.Strin
223e0 67 21 29 0a 20 20 20 20 20 20 20 20 28 6e 61 6d 65 20 20 24 6e 61 6d 65 20 20 53 74 72 69 6e 67 g!).........(name..$name..String
22400 21 29 5d 0a 20 20 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 69 64 0a 20 20 20 20 20 20 !)]........name........id.......
22420 20 63 72 65 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 75 70 64 61 74 65 64 41 74 0a 20 20 20 20 .createdAt........updatedAt.....
22440 20 20 20 6e 61 6d 65 57 69 74 68 4f 77 6e 65 72 0a 20 20 20 20 20 20 20 28 70 61 72 65 6e 74 20 ...nameWithOwner........(parent.
22460 6e 61 6d 65 57 69 74 68 4f 77 6e 65 72 29 0a 20 20 20 20 20 20 20 64 65 73 63 72 69 70 74 69 6f nameWithOwner)........descriptio
22480 6e 0a 20 20 20 20 20 20 20 68 6f 6d 65 70 61 67 65 55 72 6c 0a 20 20 20 20 20 20 20 28 64 65 66 n........homepageUrl........(def
224a0 61 75 6c 74 42 72 61 6e 63 68 52 65 66 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 69 73 41 72 63 aultBranchRef.name)........isArc
224c0 68 69 76 65 64 0a 20 20 20 20 20 20 20 69 73 46 6f 72 6b 0a 20 20 20 20 20 20 20 69 73 4c 6f 63 hived........isFork........isLoc
224e0 6b 65 64 0a 20 20 20 20 20 20 20 69 73 4d 69 72 72 6f 72 0a 20 20 20 20 20 20 20 69 73 50 72 69 ked........isMirror........isPri
22500 76 61 74 65 0a 20 20 20 20 20 20 20 68 61 73 44 69 73 63 75 73 73 69 6f 6e 73 45 6e 61 62 6c 65 vate........hasDiscussionsEnable
22520 64 0a 20 20 20 20 20 20 20 68 61 73 49 73 73 75 65 73 45 6e 61 62 6c 65 64 0a 20 20 20 20 20 20 d........hasIssuesEnabled.......
22540 20 68 61 73 57 69 6b 69 45 6e 61 62 6c 65 64 0a 20 20 20 20 20 20 20 28 6c 69 63 65 6e 73 65 49 .hasWikiEnabled........(licenseI
22560 6e 66 6f 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 28 73 74 61 72 67 61 7a 65 72 73 20 74 6f 74 nfo.name)........(stargazers.tot
22580 61 6c 43 6f 75 6e 74 29 0a 20 20 20 20 20 20 20 28 77 61 74 63 68 65 72 73 20 74 6f 74 61 6c 43 alCount)........(watchers.totalC
225a0 6f 75 6e 74 29 29 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 66 6f 72 67 65 2d 2d 67 69 74 68 75 ount))))..(defconst.forge--githu
225c0 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 71 75 65 72 79 0a 20 20 60 28 71 75 65 72 79 0a 20 20 20 b-repository-query...`(query....
225e0 20 28 20 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 2c 40 28 63 64 72 20 28 63 61 .(..repository........,@(cdr.(ca
22600 64 72 20 66 6f 72 67 65 2d 2d 67 69 74 68 75 62 2d 73 70 61 72 73 65 2d 72 65 70 6f 73 69 74 6f dr.forge--github-sparse-reposito
22620 72 79 2d 71 75 65 72 79 29 29 0a 20 20 20 20 20 20 20 28 20 20 61 73 73 69 67 6e 61 62 6c 65 55 ry-query))........(..assignableU
22640 73 65 72 73 20 5b 28 3a 65 64 67 65 73 20 74 29 5d 0a 20 20 20 20 20 20 20 20 20 20 69 64 0a 20 sers.[(:edges.t)]...........id..
22660 20 20 20 20 20 20 20 20 20 6c 6f 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 29 0a 20 .........login...........name)..
22680 20 20 20 20 20 20 28 20 20 64 69 73 63 75 73 73 69 6f 6e 43 61 74 65 67 6f 72 69 65 73 20 5b 28 ......(..discussionCategories.[(
226a0 3a 65 64 67 65 73 20 74 29 5d 0a 20 20 20 20 20 20 20 20 20 20 69 64 0a 20 20 20 20 20 20 20 20 :edges.t)]...........id.........
226c0 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 65 6d 6f 6a 69 0a 20 20 20 20 20 20 20 20 20 ..name...........emoji..........
226e0 20 69 73 41 6e 73 77 65 72 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 64 65 73 63 72 69 70 74 .isAnswerable...........descript
22700 69 6f 6e 29 0a 20 20 20 20 20 20 20 28 20 20 64 69 73 63 75 73 73 69 6f 6e 73 20 5b 28 3a 65 64 ion)........(..discussions.[(:ed
22720 67 65 73 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a ges.t)........................(:
22740 73 69 6e 67 75 6c 61 72 20 64 69 73 63 75 73 73 69 6f 6e 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 singular.discussion.number).....
22760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 64 65 72 42 79 20 28 28 66 69 ...................(orderBy.((fi
22780 65 6c 64 20 55 50 44 41 54 45 44 5f 41 54 29 20 28 64 69 72 65 63 74 69 6f 6e 20 44 45 53 43 29 eld.UPDATED_AT).(direction.DESC)
227a0 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 64 61 74 61 62 ))]...........id...........datab
227c0 61 73 65 49 64 0a 20 20 20 20 20 20 20 20 20 20 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 20 20 20 aseId...........number..........
227e0 20 75 72 6c 0a 20 20 20 20 20 20 20 20 20 20 73 74 61 74 65 52 65 61 73 6f 6e 0a 20 20 20 20 20 .url...........stateReason......
22800 20 20 20 20 20 3b 3b 20 44 69 73 63 75 73 73 69 6f 6e 73 20 6c 61 63 6b 20 69 73 52 65 61 64 42 .....;;.Discussions.lack.isReadB
22820 79 56 69 65 77 65 72 2e 0a 20 20 20 20 20 20 20 20 20 20 28 61 6e 73 77 65 72 20 69 64 29 0a 20 yViewer............(answer.id)..
22840 20 20 20 20 20 20 20 20 20 28 61 75 74 68 6f 72 20 6c 6f 67 69 6e 29 0a 20 20 20 20 20 20 20 20 .........(author.login).........
22860 20 20 74 69 74 6c 65 0a 20 20 20 20 20 20 20 20 20 20 63 72 65 61 74 65 64 41 74 0a 20 20 20 20 ..title...........createdAt.....
22880 20 20 20 20 20 20 75 70 64 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 63 6c 6f 73 65 64 ......updatedAt...........closed
228a0 41 74 0a 20 20 20 20 20 20 20 20 20 20 6c 6f 63 6b 65 64 0a 20 20 20 20 20 20 20 20 20 20 28 63 At...........locked...........(c
228c0 61 74 65 67 6f 72 79 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 62 6f 64 79 0a 20 20 20 20 20 ategory.id)...........body......
228e0 20 20 20 20 20 28 20 20 63 6f 6d 6d 65 6e 74 73 20 5b 28 3a 65 64 67 65 73 20 74 29 5d 0a 20 20 .....(..comments.[(:edges.t)]...
22900 20 20 20 20 20 20 20 20 20 20 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 64 61 74 61 62 ...........id..............datab
22920 61 73 65 49 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 75 74 68 6f 72 20 6c 6f 67 69 6e aseId..............(author.login
22940 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 63 72 65 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 )..............createdAt........
22960 20 20 20 20 20 20 75 70 64 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 62 6f 64 ......updatedAt..............bod
22980 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 20 20 72 65 70 6c 69 65 73 20 5b 28 3a 65 64 67 y..............(..replies.[(:edg
229a0 65 73 20 32 30 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 0a 20 20 20 20 20 es.20)].................id......
229c0 20 20 20 20 20 20 20 20 20 20 20 64 61 74 61 62 61 73 65 49 64 0a 20 20 20 20 20 20 20 20 20 20 ...........databaseId...........
229e0 20 20 20 20 20 20 28 61 75 74 68 6f 72 20 6c 6f 67 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 ......(author.login)............
22a00 20 20 20 20 20 63 72 65 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 .....createdAt.................u
22a20 70 64 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 6f 64 79 29 29 0a pdatedAt.................body)).
22a40 20 20 20 20 20 20 20 20 20 20 28 20 20 20 6c 61 62 65 6c 73 20 5b 28 3a 65 64 67 65 73 20 74 29 ..........(...labels.[(:edges.t)
22a60 5d 20 69 64 29 29 0a 20 20 20 20 20 20 20 28 20 20 69 73 73 75 65 73 20 5b 28 3a 65 64 67 65 73 ].id))........(..issues.[(:edges
22a80 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 73 69 6e 67 75 6c 61 72 .t)...................(:singular
22aa0 20 69 73 73 75 65 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .issue.number)..................
22ac0 20 28 6f 72 64 65 72 42 79 20 28 28 66 69 65 6c 64 20 55 50 44 41 54 45 44 5f 41 54 29 20 28 64 .(orderBy.((field.UPDATED_AT).(d
22ae0 69 72 65 63 74 69 6f 6e 20 44 45 53 43 29 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 6e 75 6d 62 irection.DESC)))]...........numb
22b00 65 72 0a 20 20 20 20 20 20 20 20 20 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 73 74 61 74 65 0a er...........id...........state.
22b20 20 20 20 20 20 20 20 20 20 20 73 74 61 74 65 52 65 61 73 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 ..........stateReason...........
22b40 69 73 52 65 61 64 42 79 56 69 65 77 65 72 0a 20 20 20 20 20 20 20 20 20 20 28 61 75 74 68 6f 72 isReadByViewer...........(author
22b60 20 6c 6f 67 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20 74 69 74 6c 65 0a 20 20 20 20 20 20 20 20 .login)...........title.........
22b80 20 20 63 72 65 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 75 70 64 61 74 65 64 41 74 0a ..createdAt...........updatedAt.
22ba0 20 20 20 20 20 20 20 20 20 20 63 6c 6f 73 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 6c 6f 63 ..........closedAt...........loc
22bc0 6b 65 64 0a 20 20 20 20 20 20 20 20 20 20 28 6d 69 6c 65 73 74 6f 6e 65 20 69 64 29 0a 20 20 20 ked...........(milestone.id)....
22be0 20 20 20 20 20 20 20 62 6f 64 79 0a 20 20 20 20 20 20 20 20 20 20 28 20 20 61 73 73 69 67 6e 65 .......body...........(..assigne
22c00 65 73 20 5b 28 3a 65 64 67 65 73 20 74 29 5d 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 28 20 es.[(:edges.t)].id)...........(.
22c20 20 63 6f 6d 6d 65 6e 74 73 20 5b 28 3a 65 64 67 65 73 20 74 29 5d 0a 20 20 20 20 20 20 20 20 20 .comments.[(:edges.t)]..........
22c40 20 20 20 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 64 61 74 61 62 61 73 65 49 64 0a 20 ....id..............databaseId..
22c60 20 20 20 20 20 20 20 20 20 20 20 20 28 61 75 74 68 6f 72 20 6c 6f 67 69 6e 29 0a 20 20 20 20 20 ............(author.login)......
22c80 20 20 20 20 20 20 20 20 63 72 65 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 75 ........createdAt..............u
22ca0 70 64 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 62 6f 64 79 29 0a 20 20 20 20 pdatedAt..............body).....
22cc0 20 20 20 20 20 20 28 20 20 6c 61 62 65 6c 73 20 5b 28 3a 65 64 67 65 73 20 74 29 5d 20 69 64 29 ......(..labels.[(:edges.t)].id)
22ce0 29 0a 20 20 20 20 20 20 20 28 20 20 6c 61 62 65 6c 73 20 5b 28 3a 65 64 67 65 73 20 74 29 20 28 )........(..labels.[(:edges.t).(
22d00 3a 73 69 6e 67 75 6c 61 72 20 6c 61 62 65 6c 20 69 64 29 5d 0a 20 20 20 20 20 20 20 20 20 20 69 :singular.label.id)]...........i
22d20 64 0a 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6f 72 d...........name...........color
22d40 0a 20 20 20 20 20 20 20 20 20 20 64 65 73 63 72 69 70 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 28 ...........description)........(
22d60 20 20 6d 69 6c 65 73 74 6f 6e 65 73 20 5b 28 3a 65 64 67 65 73 20 74 29 20 28 3a 73 69 6e 67 75 ..milestones.[(:edges.t).(:singu
22d80 6c 61 72 20 6d 69 6c 65 73 74 6f 6e 65 20 69 64 29 5d 0a 20 20 20 20 20 20 20 20 20 20 69 64 0a lar.milestone.id)]...........id.
22da0 20 20 20 20 20 20 20 20 20 20 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 20 20 20 20 74 69 74 6c 65 ..........number...........title
22dc0 0a 20 20 20 20 20 20 20 20 20 20 63 72 65 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 75 ...........createdAt...........u
22de0 70 64 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 64 75 65 4f 6e 0a 20 20 20 20 20 20 20 pdatedAt...........dueOn........
22e00 20 20 20 63 6c 6f 73 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 64 65 73 63 72 69 70 74 69 6f ...closedAt...........descriptio
22e20 6e 29 0a 20 20 20 20 20 20 20 28 20 20 70 75 6c 6c 52 65 71 75 65 73 74 73 20 5b 28 3a 65 64 67 n)........(..pullRequests.[(:edg
22e40 65 73 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a es.t).........................(:
22e60 73 69 6e 67 75 6c 61 72 20 70 75 6c 6c 52 65 71 75 65 73 74 20 6e 75 6d 62 65 72 29 0a 20 20 20 singular.pullRequest.number)....
22e80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 64 65 72 42 79 20 28 28 .....................(orderBy.((
22ea0 66 69 65 6c 64 20 55 50 44 41 54 45 44 5f 41 54 29 20 28 64 69 72 65 63 74 69 6f 6e 20 44 45 53 field.UPDATED_AT).(direction.DES
22ec0 43 29 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 20 20 20 C)))]...........number..........
22ee0 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 73 74 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 69 73 .id...........state...........is
22f00 52 65 61 64 42 79 56 69 65 77 65 72 0a 20 20 20 20 20 20 20 20 20 20 28 61 75 74 68 6f 72 20 6c ReadByViewer...........(author.l
22f20 6f 67 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20 74 69 74 6c 65 0a 20 20 20 20 20 20 20 20 20 20 ogin)...........title...........
22f40 63 72 65 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 75 70 64 61 74 65 64 41 74 0a 20 20 createdAt...........updatedAt...
22f60 20 20 20 20 20 20 20 20 63 6c 6f 73 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 6d 65 72 67 65 ........closedAt...........merge
22f80 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 69 73 44 72 61 66 74 0a 20 20 20 20 20 20 20 20 20 20 dAt...........isDraft...........
22fa0 6c 6f 63 6b 65 64 0a 20 20 20 20 20 20 20 20 20 20 6d 61 69 6e 74 61 69 6e 65 72 43 61 6e 4d 6f locked...........maintainerCanMo
22fc0 64 69 66 79 0a 20 20 20 20 20 20 20 20 20 20 69 73 43 72 6f 73 73 52 65 70 6f 73 69 74 6f 72 79 dify...........isCrossRepository
22fe0 0a 20 20 20 20 20 20 20 20 20 20 28 6d 69 6c 65 73 74 6f 6e 65 20 69 64 29 0a 20 20 20 20 20 20 ...........(milestone.id).......
23000 20 20 20 20 62 6f 64 79 0a 20 20 20 20 20 20 20 20 20 20 28 62 61 73 65 52 65 66 20 6e 61 6d 65 ....body...........(baseRef.name
23020 20 28 72 65 70 6f 73 69 74 6f 72 79 20 6e 61 6d 65 57 69 74 68 4f 77 6e 65 72 29 29 0a 20 20 20 .(repository.nameWithOwner))....
23040 20 20 20 20 20 20 20 62 61 73 65 52 65 66 4f 69 64 0a 20 20 20 20 20 20 20 20 20 20 28 68 65 61 .......baseRefOid...........(hea
23060 64 52 65 66 20 6e 61 6d 65 20 28 72 65 70 6f 73 69 74 6f 72 79 20 28 6f 77 6e 65 72 20 6c 6f 67 dRef.name.(repository.(owner.log
23080 69 6e 29 20 6e 61 6d 65 57 69 74 68 4f 77 6e 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 68 65 in).nameWithOwner))...........he
230a0 61 64 52 65 66 4f 69 64 0a 20 20 20 20 20 20 20 20 20 20 28 20 20 61 73 73 69 67 6e 65 65 73 20 adRefOid...........(..assignees.
230c0 5b 28 3a 65 64 67 65 73 20 74 29 5d 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 28 20 20 72 65 [(:edges.t)].id)...........(..re
230e0 76 69 65 77 52 65 71 75 65 73 74 73 20 5b 28 3a 65 64 67 65 73 20 74 29 5d 0a 20 20 20 20 20 20 viewRequests.[(:edges.t)].......
23100 20 20 20 20 20 20 20 28 72 65 71 75 65 73 74 65 64 52 65 76 69 65 77 65 72 20 22 2e 2e 2e 20 6f .......(requestedReviewer."....o
23120 6e 20 55 73 65 72 20 7b 20 69 64 20 7d 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 20 20 n.User.{.id.}\n"))...........(..
23140 63 6f 6d 6d 65 6e 74 73 20 5b 28 3a 65 64 67 65 73 20 74 29 5d 0a 20 20 20 20 20 20 20 20 20 20 comments.[(:edges.t)]...........
23160 20 20 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 64 61 74 61 62 61 73 65 49 64 0a 20 20 ...id..............databaseId...
23180 20 20 20 20 20 20 20 20 20 20 20 28 61 75 74 68 6f 72 20 6c 6f 67 69 6e 29 0a 20 20 20 20 20 20 ...........(author.login).......
231a0 20 20 20 20 20 20 20 63 72 65 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 75 70 .......createdAt..............up
231c0 64 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 62 6f 64 79 29 0a 20 20 20 20 20 datedAt..............body)......
231e0 20 20 20 20 20 28 20 20 6c 61 62 65 6c 73 20 5b 28 3a 65 64 67 65 73 20 74 29 5d 20 69 64 29 29 .....(..labels.[(:edges.t)].id))
23200 29 29 29 0a 0a 3b 3b 3b 3b 20 52 65 70 6f 73 69 74 6f 72 79 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 )))..;;;;.Repository..(cl-defmet
23220 68 6f 64 20 66 6f 72 67 65 2d 2d 70 75 6c 6c 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 hod.forge--pull.((repo.forge-git
23240 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 hub-repository).................
23260 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6c 6c 62 61 63 6b 20 73 69 ...........&optional.callback.si
23280 6e 63 65 29 0a 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 6e 6f 74 20 28 61 6e 64 20 73 69 6e 63 nce)...(cl-assert.(not.(and.sinc
232a0 65 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 6e 69 6c e.(forge-get-repository.repo.nil
232c0 20 3a 74 72 61 63 6b 65 64 3f 29 29 29 29 0a 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 6d 6f .:tracked?))))...(setq.forge--mo
232e0 64 65 2d 6c 69 6e 65 2d 62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 de-line-buffer.(current-buffer))
23300 0a 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 74 20 6e 69 6c 20 22 50 75 6c 6c 69 ...(forge--msg.repo.t.nil."Pulli
23320 6e 67 20 52 45 50 4f 22 29 0a 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 63 75 72 72 65 6e 74 2d ng.REPO")...(let.((buf.(current-
23340 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 71 75 65 72 79 20 72 65 70 6f buffer))).....(forge--query.repo
23360 0a 20 20 20 20 20 20 28 69 66 20 28 6f 72 65 66 20 72 65 70 6f 20 73 65 6c 65 63 74 69 76 65 2d .......(if.(oref.repo.selective-
23380 70 29 0a 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 2d 67 69 74 68 75 62 2d 73 70 61 72 73 p)...........forge--github-spars
233a0 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 71 75 65 72 79 0a 20 20 20 20 20 20 20 20 66 6f 72 67 65 e-repository-query.........forge
233c0 2d 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 71 75 65 72 79 29 0a 20 20 20 20 20 --github-repository-query)......
233e0 20 60 28 28 6f 77 6e 65 72 20 2e 20 2c 28 6f 72 65 66 20 72 65 70 6f 20 6f 77 6e 65 72 29 29 0a .`((owner...,(oref.repo.owner)).
23400 20 20 20 20 20 20 20 20 28 6e 61 6d 65 20 20 2e 20 2c 28 6f 72 65 66 20 72 65 70 6f 20 6e 61 6d ........(name....,(oref.repo.nam
23420 65 29 29 29 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 0a 20 20 20 20 20 20 28 6c 61 6d 62 e))).......:callback.......(lamb
23440 64 61 20 28 64 61 74 61 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 da.(data).........(forge--msg.re
23460 70 6f 20 74 20 74 20 20 20 22 50 75 6c 6c 69 6e 67 20 52 45 50 4f 22 29 0a 20 20 20 20 20 20 20 po.t.t..."Pulling.REPO")........
23480 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 74 20 6e 69 6c 20 22 53 74 6f 72 69 6e 67 .(forge--msg.repo.t.nil."Storing
234a0 20 52 45 50 4f 22 29 0a 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 61 .REPO").........(closql-with-tra
234c0 6e 73 61 63 74 69 6f 6e 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c nsaction.(forge-db)...........(l
234e0 65 74 2d 61 6c 69 73 74 20 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 et-alist.data.............(forge
23500 2d 2d 75 70 64 61 74 65 2d 72 65 70 6f 73 69 74 6f 72 79 20 20 72 65 70 6f 20 64 61 74 61 29 0a --update-repository..repo.data).
23520 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 61 73 73 69 67 ............(forge--update-assig
23540 6e 65 65 73 20 20 20 72 65 70 6f 20 2e 61 73 73 69 67 6e 61 62 6c 65 55 73 65 72 73 29 0a 20 20 nees...repo..assignableUsers)...
23560 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 66 6f 72 6b 73 20 20 ..........(forge--update-forks..
23580 20 20 20 20 20 72 65 70 6f 20 2e 66 6f 72 6b 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 .....repo..forks).............(f
235a0 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 6c 61 62 65 6c 73 20 20 20 20 20 20 72 65 70 6f 20 2e 6c orge--update-labels......repo..l
235c0 61 62 65 6c 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 abels).............(forge--updat
235e0 65 2d 6d 69 6c 65 73 74 6f 6e 65 73 20 20 72 65 70 6f 20 2e 6d 69 6c 65 73 74 6f 6e 65 73 29 0a e-milestones..repo..milestones).
23600 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 64 69 73 63 75 ............(forge--update-discu
23620 73 73 69 6f 6e 2d 63 61 74 65 67 6f 72 69 65 73 20 72 65 70 6f 20 2e 64 69 73 63 75 73 73 69 6f ssion-categories.repo..discussio
23640 6e 43 61 74 65 67 6f 72 69 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d nCategories).............(forge-
23660 2d 75 70 64 61 74 65 2d 64 69 73 63 75 73 73 69 6f 6e 73 20 72 65 70 6f 20 2e 64 69 73 63 75 73 -update-discussions.repo..discus
23680 73 69 6f 6e 73 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 sions.t).............(forge--upd
236a0 61 74 65 2d 69 73 73 75 65 73 20 20 20 20 20 20 72 65 70 6f 20 2e 69 73 73 75 65 73 20 74 29 0a ate-issues......repo..issues.t).
236c0 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 70 75 6c 6c 72 ............(forge--update-pullr
236e0 65 71 73 20 20 20 20 72 65 70 6f 20 2e 70 75 6c 6c 52 65 71 75 65 73 74 73 20 74 29 0a 20 20 20 eqs....repo..pullRequests.t)....
23700 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 72 65 76 6e 6f 74 65 73 .........(forge--update-revnotes
23720 20 20 20 20 72 65 70 6f 20 2e 63 6f 6d 6d 69 74 43 6f 6d 6d 65 6e 74 73 29 29 0a 20 20 20 20 20 ....repo..commitComments))......
23740 20 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 63 6f 6e 64 69 74 69 6f 6e 20 3a 74 72 61 63 6b .....(oset.repo.condition.:track
23760 65 64 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 74 20 ed)).........(forge--msg.repo.t.
23780 74 20 20 20 22 53 74 6f 72 69 6e 67 20 52 45 50 4f 22 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e t..."Storing.REPO").........(con
237a0 64 0a 20 20 20 20 20 20 20 20 20 28 28 6f 72 65 66 20 72 65 70 6f 20 73 65 6c 65 63 74 69 76 65 d..........((oref.repo.selective
237c0 2d 70 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 61 6c 6c 62 61 63 6b 20 28 66 75 6e 63 61 6c 6c -p))..........(callback.(funcall
237e0 20 63 61 6c 6c 62 61 63 6b 29 29 0a 20 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 2d 6d 61 .callback))..........((forge--ma
23800 79 62 65 2d 67 69 74 2d 66 65 74 63 68 20 72 65 70 6f 20 62 75 66 29 29 29 29 0a 20 20 20 20 20 ybe-git-fetch.repo.buf))))......
23820 20 3a 6e 61 72 72 6f 77 20 27 28 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 3a 75 6e .:narrow.'(repository).......:un
23840 74 69 6c 0a 20 20 20 20 20 20 3b 3b 20 4b 65 79 73 20 68 61 76 65 20 74 68 65 20 66 6f 72 6d 20 til.......;;.Keys.have.the.form.
23860 60 46 49 45 4c 44 2d 75 6e 74 69 6c 27 2c 20 77 68 65 72 65 20 46 49 45 4c 44 20 69 73 20 74 68 `FIELD-until',.where.FIELD.is.th
23880 65 20 6e 61 6d 65 20 6f 66 20 61 0a 20 20 20 20 20 20 3b 3b 20 66 69 65 6c 64 20 6f 66 20 52 65 e.name.of.a.......;;.field.of.Re
238a0 70 6f 73 69 74 6f 72 79 20 6f 62 6a 65 63 74 73 2e 20 20 53 65 65 20 60 67 68 75 62 2d 2d 67 72 pository.objects...See.`ghub--gr
238c0 61 70 68 71 6c 2d 77 61 6c 6b 2d 72 65 73 70 6f 6e 73 65 27 2e 0a 20 20 20 20 20 20 60 28 28 64 aphql-walk-response'........`((d
238e0 69 73 63 75 73 73 69 6f 6e 73 2d 75 6e 74 69 6c 20 20 2e 20 2c 28 6f 72 20 73 69 6e 63 65 20 28 iscussions-until....,(or.since.(
23900 6f 72 65 66 20 72 65 70 6f 20 64 69 73 63 75 73 73 69 6f 6e 73 2d 75 6e 74 69 6c 29 29 29 0a 20 oref.repo.discussions-until)))..
23920 20 20 20 20 20 20 20 28 69 73 73 75 65 73 2d 75 6e 74 69 6c 20 20 20 20 20 20 20 2e 20 2c 28 6f .......(issues-until.........,(o
23940 72 20 73 69 6e 63 65 20 28 6f 72 65 66 20 72 65 70 6f 20 69 73 73 75 65 73 2d 75 6e 74 69 6c 29 r.since.(oref.repo.issues-until)
23960 29 29 0a 20 20 20 20 20 20 20 20 28 70 75 6c 6c 52 65 71 75 65 73 74 73 2d 75 6e 74 69 6c 20 2e )).........(pullRequests-until..
23980 20 2c 28 6f 72 20 73 69 6e 63 65 20 28 6f 72 65 66 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 73 2d .,(or.since.(oref.repo.pullreqs-
239a0 75 6e 74 69 6c 29 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 until)))))))..(cl-defmethod.forg
239c0 65 2d 2d 75 70 64 61 74 65 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 28 72 65 70 6f 20 66 6f 72 67 e--update-repository.((repo.forg
239e0 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 64 61 74 61 29 0a 20 20 28 6c 65 e-github-repository).data)...(le
23a00 74 2d 61 6c 69 73 74 20 64 61 74 61 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 63 72 65 61 t-alist.data.....(oset.repo.crea
23a20 74 65 64 20 20 20 20 20 20 20 20 2e 63 72 65 61 74 65 64 41 74 29 0a 20 20 20 20 28 6f 73 65 74 ted.........createdAt).....(oset
23a40 20 72 65 70 6f 20 75 70 64 61 74 65 64 20 20 20 20 20 20 20 20 2e 75 70 64 61 74 65 64 41 74 29 .repo.updated.........updatedAt)
23a60 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 70 75 73 68 65 64 20 20 20 20 20 20 20 20 20 2e .....(oset.repo.pushed..........
23a80 70 75 73 68 65 64 41 74 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 70 61 72 65 6e 74 20 pushedAt).....(oset.repo.parent.
23aa0 20 20 20 20 20 20 20 20 2e 70 61 72 65 6e 74 2e 6e 61 6d 65 57 69 74 68 4f 77 6e 65 72 29 0a 20 .........parent.nameWithOwner)..
23ac0 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 64 65 73 63 72 69 70 74 69 6f 6e 20 20 20 20 2e 64 65 ...(oset.repo.description.....de
23ae0 73 63 72 69 70 74 69 6f 6e 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 68 6f 6d 65 70 61 scription).....(oset.repo.homepa
23b00 67 65 20 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 2e 68 6f 6d 65 70 ge.......(and.(not.(equal..homep
23b20 61 67 65 55 72 6c 20 22 22 29 29 20 2e 68 6f 6d 65 70 61 67 65 55 72 6c 29 29 0a 20 20 20 20 28 ageUrl.""))..homepageUrl)).....(
23b40 6f 73 65 74 20 72 65 70 6f 20 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 20 2e 64 65 66 61 75 6c oset.repo.default-branch..defaul
23b60 74 42 72 61 6e 63 68 52 65 66 2e 6e 61 6d 65 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 tBranchRef.name).....(oset.repo.
23b80 61 72 63 68 69 76 65 64 2d 70 20 20 20 20 20 2e 69 73 41 72 63 68 69 76 65 64 29 0a 20 20 20 20 archived-p......isArchived).....
23ba0 28 6f 73 65 74 20 72 65 70 6f 20 66 6f 72 6b 2d 70 20 20 20 20 20 20 20 20 20 2e 69 73 46 6f 72 (oset.repo.fork-p..........isFor
23bc0 6b 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 6c 6f 63 6b 65 64 2d 70 20 20 20 20 20 20 k).....(oset.repo.locked-p......
23be0 20 2e 69 73 4c 6f 63 6b 65 64 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 6d 69 72 72 6f ..isLocked).....(oset.repo.mirro
23c00 72 2d 70 20 20 20 20 20 20 20 2e 69 73 4d 69 72 72 6f 72 29 0a 20 20 20 20 28 6f 73 65 74 20 72 r-p........isMirror).....(oset.r
23c20 65 70 6f 20 70 72 69 76 61 74 65 2d 70 20 20 20 20 20 20 2e 69 73 50 72 69 76 61 74 65 29 0a 20 epo.private-p.......isPrivate)..
23c40 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 69 73 73 75 65 73 2d 70 20 20 20 20 20 20 20 2e 68 61 ...(oset.repo.issues-p........ha
23c60 73 49 73 73 75 65 73 45 6e 61 62 6c 65 64 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 64 sIssuesEnabled).....(oset.repo.d
23c80 69 73 63 75 73 73 69 6f 6e 73 2d 70 20 20 2e 68 61 73 44 69 73 63 75 73 73 69 6f 6e 73 45 6e 61 iscussions-p...hasDiscussionsEna
23ca0 62 6c 65 64 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 77 69 6b 69 2d 70 20 20 20 20 20 bled).....(oset.repo.wiki-p.....
23cc0 20 20 20 20 2e 68 61 73 57 69 6b 69 45 6e 61 62 6c 65 64 29 0a 20 20 20 20 28 6f 73 65 74 20 72 .....hasWikiEnabled).....(oset.r
23ce0 65 70 6f 20 73 74 61 72 73 20 20 20 20 20 20 20 20 20 20 2e 73 74 61 72 67 61 7a 65 72 73 2e 74 epo.stars...........stargazers.t
23d00 6f 74 61 6c 43 6f 75 6e 74 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 77 61 74 63 68 65 otalCount).....(oset.repo.watche
23d20 72 73 20 20 20 20 20 20 20 2e 77 61 74 63 68 65 72 73 2e 74 6f 74 61 6c 43 6f 75 6e 74 29 0a 20 rs........watchers.totalCount)..
23d40 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 74 65 61 6d 73 20 20 20 20 20 20 20 20 20 20 28 6d 61 ...(oset.repo.teams..........(ma
23d60 70 63 61 72 20 23 27 63 64 61 72 20 2e 6f 77 6e 65 72 2e 74 65 61 6d 73 29 29 29 29 0a 0a 28 63 pcar.#'cdar..owner.teams))))..(c
23d80 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 72 65 76 6e 6f 74 l-defmethod.forge--update-revnot
23da0 65 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 es.((repo.forge-github-repositor
23dc0 79 29 20 64 61 74 61 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 61 6e 73 61 63 74 y).data)...(closql-with-transact
23de0 69 6f 6e 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 28 6d 61 70 63 20 28 23 23 66 6f 72 67 ion.(forge-db).....(mapc.(##forg
23e00 65 2d 2d 75 70 64 61 74 65 2d 72 65 76 6e 6f 74 65 20 72 65 70 6f 20 25 29 20 64 61 74 61 29 29 e--update-revnote.repo.%).data))
23e20 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 72 )..(cl-defmethod.forge--update-r
23e40 65 76 6e 6f 74 65 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 evnote.((repo.forge-github-repos
23e60 69 74 6f 72 79 29 20 64 61 74 61 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 61 6e itory).data)...(closql-with-tran
23e80 73 61 63 74 69 6f 6e 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 saction.(forge-db).....(let-alis
23ea0 74 20 64 61 74 61 0a 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 0a 20 20 20 20 t.data.......(closql-insert.....
23ec0 20 20 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 76 6e ...(forge-db)........(forge-revn
23ee0 6f 74 65 0a 20 20 20 20 20 20 20 20 3a 69 64 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 ote.........:id...........(forge
23f00 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 27 66 6f 72 67 65 2d 72 65 76 6e 6f 74 65 20 72 65 70 6f 20 --object-id.'forge-revnote.repo.
23f20 2e 69 64 29 0a 20 20 20 20 20 20 20 20 3a 72 65 70 6f 73 69 74 6f 72 79 20 20 20 28 6f 72 65 66 .id).........:repository...(oref
23f40 20 72 65 70 6f 20 69 64 29 0a 20 20 20 20 20 20 20 20 3a 63 6f 6d 6d 69 74 20 20 20 20 20 20 20 .repo.id).........:commit.......
23f60 2e 63 6f 6d 6d 69 74 2e 6f 69 64 0a 20 20 20 20 20 20 20 20 3a 66 69 6c 65 20 20 20 20 20 20 20 .commit.oid.........:file.......
23f80 20 20 2e 70 61 74 68 0a 20 20 20 20 20 20 20 20 3a 6c 69 6e 65 20 20 20 20 20 20 20 20 20 2e 70 ...path.........:line..........p
23fa0 6f 73 69 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 3a 61 75 74 68 6f 72 20 20 20 20 20 20 20 2e 61 osition.........:author........a
23fc0 75 74 68 6f 72 2e 6c 6f 67 69 6e 0a 20 20 20 20 20 20 20 20 3a 62 6f 64 79 20 20 20 20 20 20 20 uthor.login.........:body.......
23fe0 20 20 2e 62 6f 64 79 29 0a 20 20 20 20 20 20 20 74 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 ...body)........t))))..(cl-defme
24000 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 61 73 73 69 67 6e 65 65 73 20 28 28 72 thod.forge--update-assignees.((r
24020 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 64 61 74 epo.forge-github-repository).dat
24040 61 29 0a 20 20 28 6f 73 65 74 20 72 65 70 6f 20 61 73 73 69 67 6e 65 65 73 0a 20 20 20 20 20 20 a)...(oset.repo.assignees.......
24060 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 69 64 29 20 72 65 70 6f 0a 20 20 20 20 20 20 20 20 ..(with-slots.(id).repo.........
24080 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 72 6f 77 29 0a 20 20 20 20 20 20 20 20 ..(mapcar.(lambda.(row).........
240a0 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 72 6f 77 0a 20 20 20 20 20 ............(let-alist.row......
240c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 2d 6f .................(list.(forge--o
240e0 62 6a 65 63 74 2d 69 64 20 69 64 20 2e 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 bject-id.id..id)................
24100 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6c 6f 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 ..............login.............
24120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 .................name...........
24140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 69 64 29 29 29 0a 20 20 20 20 20 20 20 ...................id)))........
24160 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64 75 70 73 20 64 61 74 61 29 29 29 29 ...........(delete-dups.data))))
24180 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 66 )..(cl-defmethod.forge--update-f
241a0 6f 72 6b 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 orks.((repo.forge-github-reposit
241c0 6f 72 79 29 20 64 61 74 61 29 0a 20 20 28 6f 73 65 74 20 72 65 70 6f 20 66 6f 72 6b 73 0a 20 20 ory).data)...(oset.repo.forks...
241e0 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 69 64 29 20 72 65 70 6f 0a 20 20 20 20 ......(with-slots.(id).repo.....
24200 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 72 6f 77 29 0a 20 20 20 20 ......(mapcar.(lambda.(row).....
24220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 72 6f 77 0a 20 ................(let-alist.row..
24240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 66 6f 72 .....................(nconc.(for
24260 67 65 2d 2d 72 65 70 6f 73 69 74 6f 72 79 2d 69 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ge--repository-ids..............
24280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 69 65 69 6f 2d 6f 62 6a 65 63 74 2d 63 .................(eieio-object-c
242a0 6c 61 73 73 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lass.repo)......................
242c0 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 67 69 74 68 6f 73 74 29 0a 20 20 20 .........(oref.repo.githost)....
242e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6f 77 6e 65 ............................owne
24300 72 2e 6c 6f 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r.login.........................
24320 20 20 20 20 20 20 2e 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .......name)....................
24340 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 2e 6f 77 6e 65 72 2e 6c 6f 67 69 6e 0a 20 20 20 ..........(list..owner.login....
24360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
24380 2e 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c .name))))...................(del
243a0 65 74 65 2d 64 75 70 73 20 64 61 74 61 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f ete-dups.data)))))..(cl-defmetho
243c0 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 6c 61 62 65 6c 73 20 28 28 72 65 70 6f 20 66 6f d.forge--update-labels.((repo.fo
243e0 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 64 61 74 61 29 0a 20 20 28 rge-github-repository).data)...(
24400 6f 73 65 74 20 72 65 70 6f 20 6c 61 62 65 6c 73 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 oset.repo.labels.........(with-s
24420 6c 6f 74 73 20 28 69 64 29 20 72 65 70 6f 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 lots.(id).repo...........(mapcar
24440 20 28 6c 61 6d 62 64 61 20 28 72 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(lambda.(row)..................
24460 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 72 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...(let-alist.row...............
24480 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 ........(list.(forge--object-id.
244a0 69 64 20 2e 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 id..id).........................
244c0 20 20 20 20 2e 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....name.......................
244e0 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 23 22 20 28 64 6f 77 6e 63 61 73 65 20 2e 63 6f 6c ......(concat."#".(downcase..col
24500 6f 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 or))............................
24520 20 2e 64 65 73 63 72 69 70 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..description)))................
24540 20 20 20 28 64 65 6c 65 74 65 2d 64 75 70 73 20 64 61 74 61 29 29 29 29 29 0a 0a 28 63 6c 2d 64 ...(delete-dups.data)))))..(cl-d
24560 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 6d 69 6c 65 73 74 6f 6e 65 efmethod.forge--update-milestone
24580 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 s.((repo.forge-github-repository
245a0 29 20 64 61 74 61 29 0a 20 20 28 6f 73 65 74 20 72 65 70 6f 20 6d 69 6c 65 73 74 6f 6e 65 73 0a ).data)...(oset.repo.milestones.
245c0 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 69 64 29 20 72 65 70 6f 0a 20 20 ........(with-slots.(id).repo...
245e0 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 72 6f 77 29 0a 20 20 ........(mapcar.(lambda.(row)...
24600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 72 6f 77 ..................(let-alist.row
24620 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 66 6f .......................(list.(fo
24640 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 69 64 20 2e 69 64 29 0a 20 20 20 20 20 20 20 20 20 rge--object-id.id..id)..........
24660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6e 75 6d 62 65 72 0a 20 20 20 20 20 ....................number......
24680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 74 69 74 6c 65 0a 20 20 ........................title...
246a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 63 72 65 61 74 ...........................creat
246c0 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 edAt............................
246e0 20 2e 75 70 64 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..updatedAt.....................
24700 20 20 20 20 20 20 20 20 2e 64 75 65 4f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .........dueOn..................
24720 20 20 20 20 20 20 20 20 20 20 20 2e 63 6c 6f 73 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 ............closedAt............
24740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 64 65 73 63 72 69 70 74 69 6f 6e 29 29 29 ..................description)))
24760 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64 75 70 73 20 ...................(delete-dups.
24780 64 61 74 61 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d data)))))..(cl-defmethod.forge--
247a0 75 70 64 61 74 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 63 61 74 65 67 6f 72 69 65 73 20 28 28 72 update-discussion-categories.((r
247c0 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 64 61 74 epo.forge-github-repository).dat
247e0 61 29 0a 20 20 28 6f 73 65 74 20 72 65 70 6f 20 64 69 73 63 75 73 73 69 6f 6e 2d 63 61 74 65 67 a)...(oset.repo.discussion-categ
24800 6f 72 69 65 73 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 69 64 29 20 72 ories.........(with-slots.(id).r
24820 65 70 6f 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 72 epo...........(mapcar.(lambda.(r
24840 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 ow).....................(let-ali
24860 73 74 20 72 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 st.row.......................(li
24880 73 74 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 69 64 20 2e 69 64 29 0a 20 20 20 st.(forge--object-id.id..id)....
248a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 69 64 0a 20 20 20 ..........................id....
248c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6e 61 6d 65 0a 20 ..........................name..
248e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 65 6d 6f 6a ............................emoj
24900 69 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 69 i..............................i
24920 73 41 6e 73 77 65 72 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sAnswerable.....................
24940 20 20 20 20 20 20 20 20 2e 64 65 73 63 72 69 70 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 .........description))).........
24960 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64 75 70 73 20 64 61 74 61 29 29 29 29 29 ..........(delete-dups.data)))))
24980 0a 0a 3b 3b 3b 3b 20 54 6f 70 69 63 73 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 ..;;;;.Topics..(cl-defmethod.for
249a0 67 65 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 ge--pull-topic.((repo.forge-gith
249c0 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ub-repository)..................
249e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 20 6e 75 6d 62 65 72 29 29 ................(number.number))
24a00 0a 20 20 28 66 6f 72 67 65 2d 2d 71 75 65 72 79 20 72 65 70 6f 0a 20 20 20 20 60 28 71 75 65 72 ...(forge--query.repo.....`(quer
24a20 79 0a 20 20 20 20 20 20 5b 28 24 6f 77 6e 65 72 20 53 74 72 69 6e 67 21 29 0a 20 20 20 20 20 20 y.......[($owner.String!).......
24a40 20 28 24 6e 61 6d 65 20 20 53 74 72 69 6e 67 21 29 5d 0a 20 20 20 20 20 20 28 72 65 70 6f 73 69 .($name..String!)].......(reposi
24a60 74 6f 72 79 0a 20 20 20 20 20 20 5b 28 6f 77 6e 65 72 20 24 6f 77 6e 65 72 29 0a 20 20 20 20 20 tory.......[(owner.$owner)......
24a80 20 20 28 6e 61 6d 65 20 20 24 6e 61 6d 65 29 5d 0a 20 20 20 20 20 20 20 2c 28 63 61 64 64 72 20 ..(name..$name)]........,(caddr.
24aa0 28 63 61 64 64 72 20 28 67 68 75 62 2d 2d 67 72 61 70 68 71 6c 2d 70 72 65 70 61 72 65 2d 71 75 (caddr.(ghub--graphql-prepare-qu
24ac0 65 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 ery........................forge
24ae0 2d 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 71 75 65 72 79 0a 20 20 20 20 20 20 --github-repository-query.......
24b00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 72 65 70 6f 73 69 74 6f 72 79 20 64 69 .................`(repository.di
24b20 73 63 75 73 73 69 6f 6e 73 20 28 64 69 73 63 75 73 73 69 6f 6e 20 2e 20 2c 6e 75 6d 62 65 72 29 scussions.(discussion...,number)
24b40 29 29 29 29 0a 20 20 20 20 20 20 20 2c 28 63 61 64 64 72 20 28 63 61 64 64 72 20 28 67 68 75 62 ))))........,(caddr.(caddr.(ghub
24b60 2d 2d 67 72 61 70 68 71 6c 2d 70 72 65 70 61 72 65 2d 71 75 65 72 79 0a 20 20 20 20 20 20 20 20 --graphql-prepare-query.........
24b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 2d 67 69 74 68 75 62 2d 72 65 70 ...............forge--github-rep
24ba0 6f 73 69 74 6f 72 79 2d 71 75 65 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ository-query...................
24bc0 20 20 20 20 20 60 28 72 65 70 6f 73 69 74 6f 72 79 20 69 73 73 75 65 73 20 28 69 73 73 75 65 20 .....`(repository.issues.(issue.
24be0 2e 20 2c 6e 75 6d 62 65 72 29 29 29 29 29 0a 20 20 20 20 20 20 20 2c 28 63 61 64 64 72 20 28 63 ..,number)))))........,(caddr.(c
24c00 61 64 64 72 20 28 67 68 75 62 2d 2d 67 72 61 70 68 71 6c 2d 70 72 65 70 61 72 65 2d 71 75 65 72 addr.(ghub--graphql-prepare-quer
24c20 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 2d y........................forge--
24c40 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 71 75 65 72 79 0a 20 20 20 20 20 20 20 20 github-repository-query.........
24c60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 72 65 70 6f 73 69 74 6f 72 79 20 70 75 6c 6c ...............`(repository.pull
24c80 52 65 71 75 65 73 74 73 20 28 70 75 6c 6c 72 65 71 20 2e 20 2c 6e 75 6d 62 65 72 29 29 29 29 29 Requests.(pullreq...,number)))))
24ca0 29 29 0a 20 20 20 20 60 28 28 6f 77 6e 65 72 20 2e 20 2c 28 6f 72 65 66 20 72 65 70 6f 20 6f 77 )).....`((owner...,(oref.repo.ow
24cc0 6e 65 72 29 29 0a 20 20 20 20 20 20 28 6e 61 6d 65 20 20 2e 20 2c 28 6f 72 65 66 20 72 65 70 6f ner)).......(name....,(oref.repo
24ce0 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 3a 6e 6f 65 72 72 6f 72 20 74 0a 20 20 20 20 3a 63 61 6c .name))).....:noerror.t.....:cal
24d00 6c 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 64 61 74 61 29 0a 20 20 20 20 20 20 20 20 20 20 20 lback.(lambda.(data)............
24d20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 .....(let-alist.data............
24d40 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 73 65 74 71 20 64 61 74 61 20 2e 72 65 70 6f 73 69 .......(cond.((setq.data..reposi
24d60 74 6f 72 79 2e 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tory.discussion)................
24d80 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 64 69 73 63 75 73 73 ..........(forge--update-discuss
24da0 69 6f 6e 20 72 65 70 6f 20 64 61 74 61 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ion.repo.data)).................
24dc0 20 20 20 20 20 20 20 20 28 28 73 65 74 71 20 64 61 74 61 20 2e 72 65 70 6f 73 69 74 6f 72 79 2e ........((setq.data..repository.
24de0 69 73 73 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 issue)..........................
24e00 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 69 73 73 75 65 20 72 65 70 6f 20 64 61 74 61 29 29 (forge--update-issue.repo.data))
24e20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 65 74 71 20 .........................((setq.
24e40 64 61 74 61 20 2e 72 65 70 6f 73 69 74 6f 72 79 2e 70 75 6c 6c 52 65 71 75 65 73 74 29 0a 20 20 data..repository.pullRequest)...
24e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 .......................(forge--u
24e80 70 64 61 74 65 2d 70 75 6c 6c 72 65 71 20 72 65 70 6f 20 64 61 74 61 29 29 29 29 0a 20 20 20 20 pdate-pullreq.repo.data)))).....
24ea0 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 ............(forge-refresh-buffe
24ec0 72 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 70 75 6c 6c r))))..(cl-defmethod.forge--pull
24ee0 2d 74 6f 70 69 63 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 -topic.((repo.forge-github-repos
24f00 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 itory)..........................
24f20 20 20 20 20 20 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 ........(topic.forge-discussion)
24f40 29 0a 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 2d 31 20 72 65 70 6f 20 23 27 )...(forge--pull-topic-1.repo.#'
24f60 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 64 69 73 63 75 73 73 69 6f 6e 0a 20 20 20 20 60 28 72 forge--update-discussion.....`(r
24f80 65 70 6f 73 69 74 6f 72 79 20 64 69 73 63 75 73 73 69 6f 6e 73 20 28 64 69 73 63 75 73 73 69 6f epository.discussions.(discussio
24fa0 6e 20 2e 20 2c 28 6f 72 65 66 20 74 6f 70 69 63 20 6e 75 6d 62 65 72 29 29 29 29 29 0a 0a 28 63 n...,(oref.topic.number)))))..(c
24fc0 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 20 28 28 l-defmethod.forge--pull-topic.((
24fe0 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 repo.forge-github-repository)...
25000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
25020 74 6f 70 69 63 20 66 6f 72 67 65 2d 69 73 73 75 65 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 70 75 topic.forge-issue))...(forge--pu
25040 6c 6c 2d 74 6f 70 69 63 2d 31 20 72 65 70 6f 20 23 27 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d ll-topic-1.repo.#'forge--update-
25060 69 73 73 75 65 0a 20 20 20 20 60 28 72 65 70 6f 73 69 74 6f 72 79 20 69 73 73 75 65 73 20 28 69 issue.....`(repository.issues.(i
25080 73 73 75 65 20 2e 20 2c 28 6f 72 65 66 20 74 6f 70 69 63 20 6e 75 6d 62 65 72 29 29 29 29 29 0a ssue...,(oref.topic.number))))).
250a0 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 .(cl-defmethod.forge--pull-topic
250c0 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 .((repo.forge-github-repository)
250e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
25100 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 0a 20 20 28 66 6f 72 67 ..(topic.forge-pullreq))...(forg
25120 65 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 2d 31 20 72 65 70 6f 20 23 27 66 6f 72 67 65 2d 2d 75 70 e--pull-topic-1.repo.#'forge--up
25140 64 61 74 65 2d 70 75 6c 6c 72 65 71 0a 20 20 20 20 60 28 72 65 70 6f 73 69 74 6f 72 79 20 70 75 date-pullreq.....`(repository.pu
25160 6c 6c 52 65 71 75 65 73 74 73 20 28 70 75 6c 6c 52 65 71 75 65 73 74 20 2e 20 2c 28 6f 72 65 66 llRequests.(pullRequest...,(oref
25180 20 74 6f 70 69 63 20 6e 75 6d 62 65 72 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 66 6f .topic.number)))))..(cl-defun.fo
251a0 72 67 65 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 2d 31 20 28 72 65 70 6f 20 75 70 64 61 74 65 20 6e rge--pull-topic-1.(repo.update.n
251c0 61 72 72 6f 77 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 arrow)...(declare.(indent.defun)
251e0 29 0a 20 20 28 66 6f 72 67 65 2d 2d 71 75 65 72 79 20 72 65 70 6f 0a 20 20 20 20 28 67 68 75 62 )...(forge--query.repo.....(ghub
25200 2d 2d 67 72 61 70 68 71 6c 2d 70 72 65 70 61 72 65 2d 71 75 65 72 79 20 66 6f 72 67 65 2d 2d 67 --graphql-prepare-query.forge--g
25220 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 71 75 65 72 79 20 6e 61 72 72 6f 77 29 0a 20 ithub-repository-query.narrow)..
25240 20 20 20 60 28 28 6f 77 6e 65 72 20 2e 20 2c 28 6f 72 65 66 20 72 65 70 6f 20 6f 77 6e 65 72 29 ...`((owner...,(oref.repo.owner)
25260 29 0a 20 20 20 20 20 20 28 6e 61 6d 65 20 20 2e 20 2c 28 6f 72 65 66 20 72 65 70 6f 20 6e 61 6d ).......(name....,(oref.repo.nam
25280 65 29 29 29 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 64 61 74 61 e))).....:callback.(lambda.(data
252a0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 75 70 64 61 74 ).................(funcall.updat
252c0 65 20 72 65 70 6f 20 28 63 64 72 20 28 63 61 64 72 20 28 63 61 64 72 20 64 61 74 61 29 29 29 29 e.repo.(cdr.(cadr.(cadr.data))))
252e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d .................(forge-refresh-
25300 62 75 66 66 65 72 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d buffer))))..(cl-defmethod.forge-
25320 2d 75 70 64 61 74 65 2d 73 74 61 74 75 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 -update-status.((repo.forge-gith
25340 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ub-repository)..................
25360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 70 69 63 20 64 61 74 61 20 62 75 ...................topic.data.bu
25380 6d 70 20 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 29 0a 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 61 mp.initial-pull)...(let-alist.da
253a0 74 61 0a 20 20 20 20 28 6c 65 74 20 28 28 75 70 64 61 74 65 64 20 28 6f 72 20 2e 75 70 64 61 74 ta.....(let.((updated.(or..updat
253c0 65 64 41 74 20 2e 63 72 65 61 74 65 64 41 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 75 72 edAt..createdAt))...........(cur
253e0 72 65 6e 74 2d 73 74 61 74 75 73 20 28 6f 72 65 66 20 74 6f 70 69 63 20 73 74 61 74 75 73 29 29 rent-status.(oref.topic.status))
25400 29 0a 20 20 20 20 20 20 28 69 66 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 70 20 ).......(if.(forge-discussion-p.
25420 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 44 69 73 63 75 73 73 69 6f 6e 73 20 topic)...........;;.Discussions.
25440 6c 61 63 6b 20 60 69 73 52 65 61 64 42 79 56 69 65 77 65 72 27 2c 20 73 6f 20 77 65 20 68 61 76 lack.`isReadByViewer',.so.we.hav
25460 65 20 74 6f 20 75 73 65 20 61 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 68 65 75 72 69 73 74 69 e.to.use.a...........;;.heuristi
25480 63 2c 20 77 68 69 63 68 20 69 73 20 65 76 65 6e 20 77 6f 72 73 65 20 74 68 61 6e 20 77 68 61 74 c,.which.is.even.worse.than.what
254a0 20 77 65 20 75 73 65 20 66 6f 72 20 6f 74 68 65 72 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 .we.use.for.other...........;;.t
254c0 6f 70 69 63 20 74 79 70 65 73 2e 20 20 45 78 63 65 70 74 20 64 75 72 69 6e 67 20 74 68 65 20 72 opic.types...Except.during.the.r
254e0 65 70 6f 73 69 74 6f 72 79 27 73 20 69 6e 69 74 69 61 6c 20 70 75 6c 6c 2c 0a 20 20 20 20 20 20 epository's.initial.pull,.......
25500 20 20 20 20 3b 3b 20 61 6c 6c 20 6e 65 77 20 64 69 73 63 75 73 73 69 6f 6e 73 20 73 74 61 72 74 ....;;.all.new.discussions.start
25520 20 6f 75 74 20 61 73 20 60 75 6e 72 65 61 64 27 2e 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 20 .out.as.`unread'............;;..
25540 20 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 77 65 20 70 75 6c 6c 20 61 20 64 69 73 63 75 73 73 .........;;.If.we.pull.a.discuss
25560 69 6f 6e 20 61 66 74 65 72 20 74 68 65 20 75 73 65 72 20 6d 75 74 61 74 65 64 20 69 74 2c 20 73 ion.after.the.user.mutated.it,.s
25580 65 74 74 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 65 20 73 74 61 74 75 73 20 74 etting...........;;.the.status.t
255a0 6f 20 60 75 6e 72 65 61 64 27 20 69 73 20 68 69 67 68 6c 79 20 75 6e 64 65 73 69 72 61 62 6c 65 o.`unread'.is.highly.undesirable
255c0 20 28 73 69 6e 63 65 20 74 68 65 79 20 6d 61 64 65 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 .(since.they.made...........;;.t
255e0 68 65 20 6d 75 74 61 74 69 6f 6e 2c 20 74 68 65 79 20 68 61 76 65 20 61 6c 72 65 61 64 79 20 22 he.mutation,.they.have.already."
25600 72 65 61 64 22 20 69 74 29 2c 20 79 65 74 20 74 68 61 74 20 69 73 20 77 68 61 74 0a 20 20 20 20 read".it),.yet.that.is.what.....
25620 20 20 20 20 20 20 3b 3b 20 77 65 20 64 6f 20 68 65 72 65 2e 20 20 48 6f 77 65 76 65 72 2c 20 74 ......;;.we.do.here...However,.t
25640 68 65 20 63 61 6c 6c 62 61 63 6b 20 75 73 65 64 20 62 79 20 74 68 65 20 64 69 73 63 75 73 73 69 he.callback.used.by.the.discussi
25660 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6d 65 74 68 6f 64 20 6f 66 20 60 66 6f 72 67 65 on...........;;.method.of.`forge
25680 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 27 2c 20 61 66 74 65 72 77 61 72 64 73 20 72 65 73 65 74 73 --pull-topic',.afterwards.resets
256a0 20 74 68 65 20 73 74 61 74 75 73 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 6f 20 74 68 65 20 .the.status...........;;.to.the.
256c0 70 72 65 76 69 6f 75 73 20 76 61 6c 75 65 2e 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 20 20 20 previous.value............;;....
256e0 20 20 20 20 20 20 20 3b 3b 20 4f 66 20 63 6f 75 72 73 65 20 69 74 20 69 73 20 70 6f 73 73 69 62 .......;;.Of.course.it.is.possib
25700 6c 65 20 74 68 61 74 20 77 65 20 70 75 6c 6c 20 6f 74 68 65 72 20 63 68 61 6e 67 65 73 20 62 79 le.that.we.pull.other.changes.by
25720 20 6f 74 68 65 72 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 65 6f 70 6c 65 20 61 74 20 74 68 .other...........;;.people.at.th
25740 65 20 73 61 6d 65 20 74 69 6d 65 2c 20 62 75 74 20 77 65 20 68 61 76 65 20 6e 6f 20 28 72 65 61 e.same.time,.but.we.have.no.(rea
25760 73 6f 6e 61 62 6c 65 29 20 77 61 79 20 6f 66 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6b 6e 6f sonable).way.of...........;;.kno
25780 77 69 6e 67 20 74 68 61 74 2e 20 20 53 6f 20 69 6e 20 74 68 61 74 20 63 61 73 65 20 74 6f 6f 20 wing.that...So.in.that.case.too.
257a0 74 68 65 20 73 74 61 74 75 73 20 73 61 64 6c 79 20 64 6f 65 73 6e 27 74 0a 20 20 20 20 20 20 20 the.status.sadly.doesn't........
257c0 20 20 20 3b 3b 20 65 6e 64 20 75 70 20 61 73 20 60 75 6e 72 65 61 64 27 2e 0a 20 20 20 20 20 20 ...;;.end.up.as.`unread'........
257e0 20 20 20 20 3b 3b 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 63 61 6c 6c 62 61 63 6b ....;;...........;;.The.callback
25800 20 6b 6c 75 64 67 65 20 69 73 20 6e 6f 74 20 6e 65 65 64 65 64 20 66 6f 72 20 61 6c 6c 20 6d 75 .kludge.is.not.needed.for.all.mu
25820 74 61 74 69 6f 6e 73 2e 20 20 53 6f 6d 65 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6d 75 74 61 tations...Some...........;;.muta
25840 74 69 6f 6e 73 20 28 65 2e 67 2e 2c 20 73 65 74 74 69 6e 67 20 6c 61 62 65 6c 73 29 20 64 6f 20 tions.(e.g.,.setting.labels).do.
25860 6e 6f 74 20 63 61 75 73 65 20 60 75 70 64 61 74 65 64 5f 61 74 27 0a 20 20 20 20 20 20 20 20 20 not.cause.`updated_at'..........
25880 20 3b 3b 20 74 6f 20 62 65 20 62 75 6d 70 65 64 3b 20 74 68 69 73 20 73 65 63 6f 6e 64 20 64 65 .;;.to.be.bumped;.this.second.de
258a0 66 65 63 74 20 63 61 6e 63 65 6c 73 20 6f 75 74 20 74 68 65 20 66 69 72 73 74 2e 0a 20 20 20 20 fect.cancels.out.the.first......
258c0 20 20 20 20 20 20 28 63 6f 6e 64 20 28 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 0a 20 20 20 20 20 20 ......(cond.(initial-pull.......
258e0 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 63 20 73 74 61 74 75 73 20 27 64 ...........(oset.topic.status.'d
25900 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 75 6c 6c 20 63 75 72 one)).................((null.cur
25920 72 65 6e 74 2d 73 74 61 74 75 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f rent-status)..................(o
25940 73 65 74 20 74 6f 70 69 63 20 73 74 61 74 75 73 20 27 75 6e 72 65 61 64 29 29 0a 20 20 20 20 20 set.topic.status.'unread))......
25960 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 3e 20 75 70 64 61 74 65 64 20 28 6f 72 ...........((string>.updated.(or
25980 65 66 20 74 6f 70 69 63 20 75 70 64 61 74 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ef.topic.updated))..............
259a0 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 63 20 73 74 61 74 75 73 20 27 75 6e 72 65 61 64 29 29 ....(oset.topic.status.'unread))
259c0 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 6e 6f 74 20 2e 69 73 52 65 61 64 42 79 56 ).........(cond.((not..isReadByV
259e0 69 65 77 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 iewer)................(oset.topi
25a00 63 20 73 74 61 74 75 73 20 27 75 6e 72 65 61 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 c.status.'unread))..............
25a20 20 28 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f .(initial-pull................(o
25a40 73 65 74 20 74 6f 70 69 63 20 73 74 61 74 75 73 20 27 64 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 set.topic.status.'done))........
25a60 20 20 20 20 20 20 20 28 28 6e 75 6c 6c 20 63 75 72 72 65 6e 74 2d 73 74 61 74 75 73 29 0a 20 20 .......((null.current-status)...
25a80 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 63 20 73 74 61 74 75 73 20 .............(oset.topic.status.
25aa0 27 70 65 6e 64 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 'pending))...............((strin
25ac0 67 3e 20 75 70 64 61 74 65 64 20 28 6f 72 65 66 20 74 6f 70 69 63 20 75 70 64 61 74 65 64 29 29 g>.updated.(oref.topic.updated))
25ae0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 63 20 73 74 61 74 ................(oset.topic.stat
25b00 75 73 20 27 70 65 6e 64 69 6e 67 29 29 29 29 0a 20 20 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 us.'pending)))).......(oset.topi
25b20 63 20 75 70 64 61 74 65 64 20 75 70 64 61 74 65 64 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 62 c.updated.updated).......(when.b
25b40 75 6d 70 0a 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 73 6c 6f 74 20 28 63 6c 2d 74 79 70 ump.........(let*.((slot.(cl-typ
25b60 65 63 61 73 65 20 74 6f 70 69 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ecase.topic.....................
25b80 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 27 64 69 73 63 75 73 73 69 6f 6e ...(forge-discussion.'discussion
25ba0 73 2d 75 6e 74 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s-until)........................
25bc0 28 66 6f 72 67 65 2d 69 73 73 75 65 20 20 20 20 20 20 27 69 73 73 75 65 73 2d 75 6e 74 69 6c 29 (forge-issue......'issues-until)
25be0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 ........................(forge-p
25c00 75 6c 6c 72 65 71 20 20 20 20 27 70 75 6c 6c 72 65 71 73 2d 75 6e 74 69 6c 29 29 29 0a 20 20 20 ullreq....'pullreqs-until)))....
25c20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 74 69 6c 20 28 65 69 65 69 6f 2d 6f 72 65 66 20 72 ............(until.(eieio-oref.r
25c40 65 70 6f 20 73 6c 6f 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 epo.slot)))...........(when.(or.
25c60 28 6e 6f 74 20 75 6e 74 69 6c 29 20 28 73 74 72 69 6e 67 3e 20 75 70 64 61 74 65 64 20 75 6e 74 (not.until).(string>.updated.unt
25c80 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 69 65 69 6f 2d 6f 73 65 74 20 72 65 70 il)).............(eieio-oset.rep
25ca0 6f 20 73 6c 6f 74 20 75 70 64 61 74 65 64 29 29 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 44 69 73 63 o.slot.updated)))))))..;;;;.Disc
25cc0 75 73 73 69 6f 6e 73 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 ussions..(cl-defmethod.forge--up
25ce0 64 61 74 65 2d 64 69 73 63 75 73 73 69 6f 6e 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 date-discussions.((repo.forge-gi
25d00 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 64 61 74 61 20 62 75 6d 70 29 0a 20 20 28 63 thub-repository).data.bump)...(c
25d20 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 61 6e 73 61 63 74 69 6f 6e 20 28 66 6f 72 67 65 2d 64 62 losql-with-transaction.(forge-db
25d40 29 0a 20 20 20 20 28 6c 65 74 20 28 28 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 20 28 6e 6f 74 20 28 ).....(let.((initial-pull.(not.(
25d60 6f 72 65 66 20 72 65 70 6f 20 64 69 73 63 75 73 73 69 6f 6e 73 2d 75 6e 74 69 6c 29 29 29 29 0a oref.repo.discussions-until)))).
25d80 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 65 6c 74 20 64 61 74 61 29 0a 20 20 20 20 20 20 20 ......(dolist.(elt.data)........
25da0 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 72 65 70 6f 20 .(forge--update-discussion.repo.
25dc0 65 6c 74 20 62 75 6d 70 20 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 29 29 29 29 29 0a 0a 28 63 6c 2d elt.bump.initial-pull)))))..(cl-
25de0 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 64 69 73 63 75 73 73 69 defmethod.forge--update-discussi
25e00 6f 6e 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 on.((repo.forge-github-repositor
25e20 79 29 20 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 y).data.........................
25e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 62 75 6d 70 20 69 ................&optional.bump.i
25e60 6e 69 74 69 61 6c 2d 70 75 6c 6c 29 0a 20 20 28 6c 65 74 20 28 28 72 65 70 6f 2d 69 64 20 28 6f nitial-pull)...(let.((repo-id.(o
25e80 72 65 66 20 72 65 70 6f 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 64 69 73 63 75 73 73 69 6f 6e ref.repo.id)).........discussion
25ea0 2d 69 64 20 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 -id.discussion).....(let-alist.d
25ec0 61 74 61 0a 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 61 6e 73 61 63 74 69 ata.......(closql-with-transacti
25ee0 6f 6e 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 64 69 73 63 on.(forge-db).........(setq.disc
25f00 75 73 73 69 6f 6e 2d 69 64 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 27 66 6f 72 ussion-id.(forge--object-id.'for
25f20 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 72 65 70 6f 20 2e 6e 75 6d 62 65 72 29 29 0a 20 20 20 ge-discussion.repo..number))....
25f40 20 20 20 20 20 28 73 65 74 71 20 64 69 73 63 75 73 73 69 6f 6e 20 28 6f 72 20 28 66 6f 72 67 65 .....(setq.discussion.(or.(forge
25f60 2d 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 72 65 70 6f 20 2e 6e 75 6d 62 65 72 29 0a 20 20 -get-discussion.repo..number)...
25f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 ...........................(clos
25fa0 71 6c 2d 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ql-insert.......................
25fc0 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ........(forge-db)..............
25fe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 .................(forge-discussi
26000 6f 6e 20 3a 69 64 20 20 20 20 20 20 20 20 20 64 69 73 63 75 73 73 69 6f 6e 2d 69 64 0a 20 20 20 on.:id.........discussion-id....
26020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
26040 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 2d 69 64 .............:repository.repo-id
26060 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
26080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 75 6d 62 65 72 20 20 20 20 20 2e 6e 75 .................:number......nu
260a0 6d 62 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 64 69 73 63 75 73 73 69 6f mber)))).........(oset.discussio
260c0 6e 20 74 68 65 69 72 2d 69 64 20 20 20 2e 69 64 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 n.their-id....id).........(oset.
260e0 64 69 73 63 75 73 73 69 6f 6e 20 73 6c 75 67 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 23 discussion.slug.......(format."#
26100 25 73 22 20 2e 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 64 69 73 63 %s"..number)).........(oset.disc
26120 75 73 73 69 6f 6e 20 61 75 74 68 6f 72 20 20 20 20 20 2e 61 75 74 68 6f 72 2e 6c 6f 67 69 6e 29 ussion.author......author.login)
26140 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 64 69 73 63 75 73 73 69 6f 6e 20 74 69 74 6c 65 20 .........(oset.discussion.title.
26160 20 20 20 20 20 2e 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 64 69 73 63 75 ......title).........(oset.discu
26180 73 73 69 6f 6e 20 63 72 65 61 74 65 64 20 20 20 20 2e 63 72 65 61 74 65 64 41 74 29 0a 20 20 20 ssion.created.....createdAt)....
261a0 20 20 20 20 20 28 6f 73 65 74 20 64 69 73 63 75 73 73 69 6f 6e 20 63 6c 6f 73 65 64 20 20 20 20 .....(oset.discussion.closed....
261c0 20 2e 63 6c 6f 73 65 64 41 74 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 64 69 73 63 75 73 ..closedAt).........(oset.discus
261e0 73 69 6f 6e 20 6c 6f 63 6b 65 64 2d 70 20 20 20 2e 6c 6f 63 6b 65 64 29 0a 20 20 20 20 20 20 20 sion.locked-p....locked)........
26200 20 28 6f 73 65 74 20 64 69 73 63 75 73 73 69 6f 6e 20 63 61 74 65 67 6f 72 79 20 20 20 28 66 6f .(oset.discussion.category...(fo
26220 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 72 65 70 6f 2d 69 64 20 2e 63 61 74 65 67 6f 72 79 rge--object-id.repo-id..category
26240 2e 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 64 69 73 63 75 73 73 69 6f 6e 20 62 .id)).........(oset.discussion.b
26260 6f 64 79 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 73 74 72 69 6e ody.......(forge--sanitize-strin
26280 67 20 2e 62 6f 64 79 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 64 69 73 63 75 73 73 69 g..body)).........(oset.discussi
262a0 6f 6e 20 61 6e 73 77 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 2e 61 6e on.answer...............(and..an
262c0 73 77 65 72 2e 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 swer.id....................(forg
262e0 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 64 69 73 63 75 73 73 69 6f 6e 2d 69 64 20 2e 61 6e 73 77 e--object-id.discussion-id..answ
26300 65 72 2e 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 64 69 73 63 75 73 73 69 6f er.id))).........(oset.discussio
26320 6e 20 73 74 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 65 78 68 n.state...............(pcase-exh
26340 61 75 73 74 69 76 65 20 2e 73 74 61 74 65 52 65 61 73 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 austive..stateReason............
26360 20 20 20 20 20 28 22 52 45 53 4f 4c 56 45 44 22 20 20 27 63 6f 6d 70 6c 65 74 65 64 29 20 3b 73 .....("RESOLVED"..'completed).;s
26380 69 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 44 55 50 4c 49 43 41 54 45 22 20 ic.................("DUPLICATE".
263a0 27 64 75 70 6c 69 63 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 4f 55 'duplicate).................("OU
263c0 54 44 41 54 45 44 22 20 20 27 6f 75 74 64 61 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 TDATED"..'outdated).............
263e0 20 20 20 20 28 22 52 45 4f 50 45 4e 45 44 22 20 20 27 6f 70 65 6e 29 0a 20 20 20 20 20 20 20 20 ....("REOPENED"..'open).........
26400 20 20 20 20 20 20 20 20 28 27 6e 69 6c 20 20 20 20 20 20 20 20 27 6f 70 65 6e 29 29 29 0a 20 20 ........('nil........'open)))...
26420 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 70 20 2e 63 6f 6d 6d 65 6e 74 73 29 0a 20 20 20 20 ......(dolist.(p..comments).....
26440 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 ......(let-alist.p.............(
26460 6c 65 74 20 28 28 70 6f 73 74 2d 69 64 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 let.((post-id.(forge--object-id.
26480 64 69 73 63 75 73 73 69 6f 6e 2d 69 64 20 2e 64 61 74 61 62 61 73 65 49 64 29 29 29 0a 20 20 20 discussion-id..databaseId)))....
264a0 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 0a 20 20 20 20 20 20 ...........(closql-insert.......
264c0 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .........(forge-db).............
264e0 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 70 6f 73 74 0a 20 20 20 20 20 20 ...(forge-discussion-post.......
26500 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 20 20 20 20 20 20 20 20 70 6f 73 74 2d 69 64 0a 20 20 ..........:id.........post-id...
26520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 68 65 69 72 2d 69 64 20 20 20 2e 69 64 0a 20 20 ..............:their-id....id...
26540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 75 6d 62 65 72 20 20 20 20 20 2e 64 61 74 61 62 ..............:number......datab
26560 61 73 65 49 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 69 73 63 75 73 73 69 6f aseId.................:discussio
26580 6e 20 64 69 73 63 75 73 73 69 6f 6e 2d 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n.discussion-id.................
265a0 3a 61 75 74 68 6f 72 20 20 20 20 20 2e 61 75 74 68 6f 72 2e 6c 6f 67 69 6e 0a 20 20 20 20 20 20 :author......author.login.......
265c0 20 20 20 20 20 20 20 20 20 20 3a 63 72 65 61 74 65 64 20 20 20 20 2e 63 72 65 61 74 65 64 41 74 ..........:created.....createdAt
265e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 70 64 61 74 65 64 20 20 20 20 2e 75 70 .................:updated.....up
26600 64 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 6f 64 79 20 20 20 datedAt.................:body...
26620 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 73 74 72 69 6e 67 20 2e 62 6f 64 ....(forge--sanitize-string..bod
26640 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 y))................t)...........
26660 20 20 20 20 28 64 6f 6c 69 73 74 20 28 72 65 70 6c 79 2d 64 61 74 61 20 2e 72 65 70 6c 69 65 73 ....(dolist.(reply-data..replies
26680 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 72 65 70 ).................(let-alist.rep
266a0 6c 79 2d 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 ly-data...................(closq
266c0 6c 2d 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 l-insert....................(for
266e0 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 ge-db)....................(forge
26700 2d 64 69 73 63 75 73 73 69 6f 6e 2d 72 65 70 6c 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -discussion-reply...............
26720 20 20 20 20 20 20 3a 69 64 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 ......:id.........(forge--object
26740 2d 69 64 20 64 69 73 63 75 73 73 69 6f 6e 2d 69 64 20 2e 64 61 74 61 62 61 73 65 49 64 29 0a 20 -id.discussion-id..databaseId)..
26760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 68 65 69 72 2d 69 64 20 20 20 2e ...................:their-id....
26780 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 75 6d 62 65 72 20 20 id.....................:number..
267a0 20 20 20 2e 64 61 74 61 62 61 73 65 49 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....databaseId..................
267c0 20 20 20 3a 70 6f 73 74 20 20 20 20 20 20 20 70 6f 73 74 2d 69 64 0a 20 20 20 20 20 20 20 20 20 ...:post.......post-id..........
267e0 20 20 20 20 20 20 20 20 20 20 20 3a 64 69 73 63 75 73 73 69 6f 6e 20 64 69 73 63 75 73 73 69 6f ...........:discussion.discussio
26800 6e 2d 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 75 74 68 6f 72 n-id.....................:author
26820 20 20 20 20 20 2e 61 75 74 68 6f 72 2e 6c 6f 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ......author.login..............
26840 20 20 20 20 20 20 20 3a 63 72 65 61 74 65 64 20 20 20 20 2e 63 72 65 61 74 65 64 41 74 0a 20 20 .......:created.....createdAt...
26860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 70 64 61 74 65 64 20 20 20 20 2e 75 ..................:updated.....u
26880 70 64 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 6f pdatedAt.....................:bo
268a0 64 79 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 73 74 72 69 6e 67 dy.......(forge--sanitize-string
268c0 20 2e 62 6f 64 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 29 29 29 ..body))....................t)))
268e0 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 73 74 61 74 75 ))).........(forge--update-statu
26900 73 20 72 65 70 6f 20 64 69 73 63 75 73 73 69 6f 6e 20 64 61 74 61 20 62 75 6d 70 20 69 6e 69 74 s.repo.discussion.data.bump.init
26920 69 61 6c 2d 70 75 6c 6c 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 63 6f 6e ial-pull)).......(forge--set-con
26940 6e 65 63 74 69 6f 6e 73 20 72 65 70 6f 20 64 69 73 63 75 73 73 69 6f 6e 20 27 6c 61 62 65 6c 73 nections.repo.discussion.'labels
26960 20 2e 6c 61 62 65 6c 73 29 0a 20 20 20 20 20 20 64 69 73 63 75 73 73 69 6f 6e 29 29 29 0a 0a 3b ..labels).......discussion)))..;
26980 3b 3b 3b 20 49 73 73 75 65 73 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d ;;;.Issues..(cl-defmethod.forge-
269a0 2d 75 70 64 61 74 65 2d 69 73 73 75 65 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 -update-issues.((repo.forge-gith
269c0 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 ub-repository).data.............
269e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 ........................&optiona
26a00 6c 20 62 75 6d 70 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 61 6e 73 61 63 74 69 l.bump)...(closql-with-transacti
26a20 6f 6e 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 28 6c 65 74 20 28 28 69 6e 69 74 69 61 6c on.(forge-db).....(let.((initial
26a40 2d 70 75 6c 6c 20 28 6e 6f 74 20 28 6f 72 65 66 20 72 65 70 6f 20 69 73 73 75 65 73 2d 75 6e 74 -pull.(not.(oref.repo.issues-unt
26a60 69 6c 29 29 29 29 0a 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 65 6c 74 20 64 61 74 61 29 0a il)))).......(dolist.(elt.data).
26a80 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 69 73 73 75 65 20 72 65 70 ........(forge--update-issue.rep
26aa0 6f 20 65 6c 74 20 62 75 6d 70 20 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 29 29 29 29 29 0a 0a 28 63 o.elt.bump.initial-pull)))))..(c
26ac0 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 69 73 73 75 65 20 l-defmethod.forge--update-issue.
26ae0 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 ((repo.forge-github-repository).
26b00 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 data............................
26b20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 62 75 6d 70 20 69 6e 69 74 69 61 6c 2d 70 ........&optional.bump.initial-p
26b40 75 6c 6c 29 0a 20 20 28 6c 65 74 20 28 28 72 65 70 6f 2d 69 64 20 28 6f 72 65 66 20 72 65 70 6f ull)...(let.((repo-id.(oref.repo
26b60 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 69 73 73 75 65 2d 69 64 20 69 73 73 75 65 29 0a 20 20 .id)).........issue-id.issue)...
26b80 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 61 74 61 0a 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d ..(let-alist.data.......(closql-
26ba0 77 69 74 68 2d 74 72 61 6e 73 61 63 74 69 6f 6e 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 with-transaction.(forge-db).....
26bc0 20 20 20 20 28 73 65 74 71 20 69 73 73 75 65 2d 69 64 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 ....(setq.issue-id.(forge--objec
26be0 74 2d 69 64 20 27 66 6f 72 67 65 2d 69 73 73 75 65 20 72 65 70 6f 20 2e 6e 75 6d 62 65 72 29 29 t-id.'forge-issue.repo..number))
26c00 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 69 73 73 75 65 20 28 6f 72 20 28 66 6f 72 67 65 2d .........(setq.issue.(or.(forge-
26c20 67 65 74 2d 69 73 73 75 65 20 72 65 70 6f 20 2e 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 20 get-issue.repo..number).........
26c40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 0a 20 ................(closql-insert..
26c60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 ........................(forge-d
26c80 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 b)..........................(for
26ca0 67 65 2d 69 73 73 75 65 20 3a 69 64 20 20 20 20 20 20 20 20 20 69 73 73 75 65 2d 69 64 0a 20 20 ge-issue.:id.........issue-id...
26cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
26ce0 20 20 20 20 3a 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 2d 69 64 0a 20 20 20 20 20 20 20 20 ....:repository.repo-id.........
26d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e ..............................:n
26d20 75 6d 62 65 72 20 20 20 20 20 2e 6e 75 6d 62 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f umber......number)))).........(o
26d40 73 65 74 20 69 73 73 75 65 20 74 68 65 69 72 2d 69 64 20 20 20 2e 69 64 29 0a 20 20 20 20 20 20 set.issue.their-id....id).......
26d60 20 20 28 6f 73 65 74 20 69 73 73 75 65 20 73 6c 75 67 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 ..(oset.issue.slug.......(format
26d80 20 22 23 25 73 22 20 2e 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 69 ."#%s"..number)).........(oset.i
26da0 73 73 75 65 20 73 74 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d ssue.state...............(pcase-
26dc0 65 78 68 61 75 73 74 69 76 65 20 28 6c 69 73 74 20 2e 73 74 61 74 65 52 65 61 73 6f 6e 20 2e 73 exhaustive.(list..stateReason..s
26de0 74 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 28 22 43 4f 4d 50 4c 45 tate).................('("COMPLE
26e00 54 45 44 22 20 20 20 22 43 4c 4f 53 45 44 22 29 20 27 63 6f 6d 70 6c 65 74 65 64 29 0a 20 20 20 TED"..."CLOSED").'completed)....
26e20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 28 22 4e 4f 54 5f 50 4c 41 4e 4e 45 44 22 20 22 43 .............('("NOT_PLANNED"."C
26e40 4c 4f 53 45 44 22 29 20 27 75 6e 70 6c 61 6e 6e 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 LOSED").'unplanned).............
26e60 20 20 20 20 28 27 28 22 44 55 50 4c 49 43 41 54 45 22 20 20 20 22 43 4c 4f 53 45 44 22 29 20 27 ....('("DUPLICATE"..."CLOSED").'
26e80 64 75 70 6c 69 63 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 28 22 52 duplicate).................('("R
26ea0 45 4f 50 45 4e 45 44 22 20 20 20 20 20 20 22 4f 50 45 4e 22 29 20 27 6f 70 65 6e 29 0a 20 20 20 EOPENED"......"OPEN").'open)....
26ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 28 6e 69 6c 20 20 20 20 20 20 20 20 20 20 20 20 20 .............('(nil.............
26ee0 22 4f 50 45 4e 22 29 20 27 6f 70 65 6e 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 69 "OPEN").'open))).........(oset.i
26f00 73 73 75 65 20 61 75 74 68 6f 72 20 20 20 20 20 2e 61 75 74 68 6f 72 2e 6c 6f 67 69 6e 29 0a 20 ssue.author......author.login)..
26f20 20 20 20 20 20 20 20 28 6f 73 65 74 20 69 73 73 75 65 20 74 69 74 6c 65 20 20 20 20 20 20 2e 74 .......(oset.issue.title.......t
26f40 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 69 73 73 75 65 20 63 72 65 61 74 65 itle).........(oset.issue.create
26f60 64 20 20 20 20 2e 63 72 65 61 74 65 64 41 74 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 69 d.....createdAt).........(oset.i
26f80 73 73 75 65 20 63 6c 6f 73 65 64 20 20 20 20 20 2e 63 6c 6f 73 65 64 41 74 29 0a 20 20 20 20 20 ssue.closed......closedAt)......
26fa0 20 20 20 28 6f 73 65 74 20 69 73 73 75 65 20 6c 6f 63 6b 65 64 2d 70 20 20 20 2e 6c 6f 63 6b 65 ...(oset.issue.locked-p....locke
26fc0 64 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 69 73 73 75 65 20 6d 69 6c 65 73 74 6f 6e 65 d).........(oset.issue.milestone
26fe0 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 72 65 70 6f 2d 69 64 20 2e 6d 69 6c ..(forge--object-id.repo-id..mil
27000 65 73 74 6f 6e 65 2e 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 69 73 73 75 65 20 estone.id)).........(oset.issue.
27020 62 6f 64 79 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 73 74 72 69 body.......(forge--sanitize-stri
27040 6e 67 20 2e 62 6f 64 79 29 29 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 63 20 2e 63 ng..body)).........(dolist.(c..c
27060 6f 6d 6d 65 6e 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 63 0a omments)...........(let-alist.c.
27080 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 0a 20 20 20 20 20 ............(closql-insert......
270a0 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ........(forge-db)..............
270c0 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (forge-issue-post...............
270e0 3a 69 64 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 69 73 73 75 65 :id......(forge--object-id.issue
27100 2d 69 64 20 2e 64 61 74 61 62 61 73 65 49 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a -id..databaseId)...............:
27120 69 73 73 75 65 20 20 20 69 73 73 75 65 2d 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a issue...issue-id...............:
27140 6e 75 6d 62 65 72 20 20 2e 64 61 74 61 62 61 73 65 49 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 number...databaseId.............
27160 20 20 3a 61 75 74 68 6f 72 20 20 2e 61 75 74 68 6f 72 2e 6c 6f 67 69 6e 0a 20 20 20 20 20 20 20 ..:author...author.login........
27180 20 20 20 20 20 20 20 3a 63 72 65 61 74 65 64 20 2e 63 72 65 61 74 65 64 41 74 0a 20 20 20 20 20 .......:created..createdAt......
271a0 20 20 20 20 20 20 20 20 20 3a 75 70 64 61 74 65 64 20 2e 75 70 64 61 74 65 64 41 74 0a 20 20 20 .........:updated..updatedAt....
271c0 20 20 20 20 20 20 20 20 20 20 20 3a 62 6f 64 79 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 61 6e 69 ...........:body....(forge--sani
271e0 74 69 7a 65 2d 73 74 72 69 6e 67 20 2e 62 6f 64 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 tize-string..body)).............
27200 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 73 74 61 .t))).........(forge--update-sta
27220 74 75 73 20 72 65 70 6f 20 69 73 73 75 65 20 64 61 74 61 20 62 75 6d 70 20 69 6e 69 74 69 61 6c tus.repo.issue.data.bump.initial
27240 2d 70 75 6c 6c 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 63 6f 6e 6e 65 63 -pull)).......(forge--set-connec
27260 74 69 6f 6e 73 20 72 65 70 6f 20 69 73 73 75 65 20 27 61 73 73 69 67 6e 65 65 73 20 2e 61 73 73 tions.repo.issue.'assignees..ass
27280 69 67 6e 65 65 73 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 63 6f 6e 6e 65 63 ignees).......(forge--set-connec
272a0 74 69 6f 6e 73 20 72 65 70 6f 20 69 73 73 75 65 20 27 6c 61 62 65 6c 73 20 2e 6c 61 62 65 6c 73 tions.repo.issue.'labels..labels
272c0 29 29 0a 20 20 20 20 69 73 73 75 65 29 29 0a 0a 3b 3b 3b 3b 20 50 75 6c 6c 72 65 71 73 0a 0a 28 )).....issue))..;;;;.Pullreqs..(
272e0 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 70 75 6c 6c 72 cl-defmethod.forge--update-pullr
27300 65 71 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f eqs.((repo.forge-github-reposito
27320 72 79 29 20 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ry).data........................
27340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 62 75 6d 70 29 0a 20 ...............&optional.bump)..
27360 20 28 63 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 61 6e 73 61 63 74 69 6f 6e 20 28 66 6f 72 67 65 .(closql-with-transaction.(forge
27380 2d 64 62 29 0a 20 20 20 20 28 6c 65 74 20 28 28 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 20 28 6e 6f -db).....(let.((initial-pull.(no
273a0 74 20 28 6f 72 65 66 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 73 2d 75 6e 74 69 6c 29 29 29 29 0a t.(oref.repo.pullreqs-until)))).
273c0 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 65 6c 74 20 64 61 74 61 29 0a 20 20 20 20 20 20 20 ......(dolist.(elt.data)........
273e0 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 70 75 6c 6c 72 65 71 20 72 65 70 6f 20 65 6c 74 .(forge--update-pullreq.repo.elt
27400 20 62 75 6d 70 20 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 .bump.initial-pull)))))..(cl-def
27420 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 70 75 6c 6c 72 65 71 20 28 28 72 method.forge--update-pullreq.((r
27440 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 64 61 74 epo.forge-github-repository).dat
27460 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 a...............................
27480 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 62 75 6d 70 20 69 6e 69 74 69 61 6c 2d 70 75 .......&optional.bump.initial-pu
274a0 6c 6c 29 0a 20 20 28 6c 65 74 20 28 28 72 65 70 6f 2d 69 64 20 28 6f 72 65 66 20 72 65 70 6f 20 ll)...(let.((repo-id.(oref.repo.
274c0 69 64 29 29 0a 20 20 20 20 20 20 20 20 70 75 6c 6c 72 65 71 2d 69 64 20 70 75 6c 6c 72 65 71 29 id)).........pullreq-id.pullreq)
274e0 0a 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 61 74 61 0a 20 20 20 20 20 20 28 63 6c 6f 73 .....(let-alist.data.......(clos
27500 71 6c 2d 77 69 74 68 2d 74 72 61 6e 73 61 63 74 69 6f 6e 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 ql-with-transaction.(forge-db)..
27520 20 20 20 20 20 20 20 28 73 65 74 71 20 70 75 6c 6c 72 65 71 2d 69 64 20 28 66 6f 72 67 65 2d 2d .......(setq.pullreq-id.(forge--
27540 6f 62 6a 65 63 74 2d 69 64 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 72 65 70 6f 20 2e 6e object-id.'forge-pullreq.repo..n
27560 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 75 6c 6c 72 65 71 20 28 6f umber)).........(setq.pullreq.(o
27580 72 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 72 65 70 6f 20 2e 6e 75 6d 62 65 r.(forge-get-pullreq.repo..numbe
275a0 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c r)...........................(cl
275c0 6f 73 71 6c 2d 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 osql-insert.....................
275e0 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .......(forge-db)...............
27600 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 3a 69 64 20 .............(forge-pullreq.:id.
27620 20 20 20 20 20 20 20 20 70 75 6c 6c 72 65 71 2d 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ........pullreq-id..............
27640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 .............................:re
27660 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 2d 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pository.repo-id................
27680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 75 6d 62 ...........................:numb
276a0 65 72 20 20 20 20 20 2e 6e 75 6d 62 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 er......number)))).........(oset
276c0 20 70 75 6c 6c 72 65 71 20 74 68 65 69 72 2d 69 64 20 20 20 20 20 2e 69 64 29 0a 20 20 20 20 20 .pullreq.their-id......id)......
276e0 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 73 6c 75 67 20 20 20 20 20 20 20 20 20 28 66 ...(oset.pullreq.slug.........(f
27700 6f 72 6d 61 74 20 22 23 25 73 22 20 2e 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 6f ormat."#%s"..number)).........(o
27720 73 65 74 20 70 75 6c 6c 72 65 71 20 73 74 61 74 65 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d set.pullreq.state........(pcase-
27740 65 78 68 61 75 73 74 69 76 65 20 2e 73 74 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 exhaustive..state...............
27760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 4d 45 52 47 45 44 22 .......................("MERGED"
27780 20 27 6d 65 72 67 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .'merged).......................
277a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 43 4c 4f 53 45 44 22 20 27 72 65 6a 65 63 74 ...............("CLOSED".'reject
277c0 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ed).............................
277e0 20 20 20 20 20 20 20 20 20 28 22 4f 50 45 4e 22 20 20 20 27 6f 70 65 6e 29 29 29 0a 20 20 20 20 .........("OPEN"...'open))).....
27800 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 61 75 74 68 6f 72 20 20 20 20 20 20 20 2e ....(oset.pullreq.author........
27820 61 75 74 68 6f 72 2e 6c 6f 67 69 6e 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c author.login).........(oset.pull
27840 72 65 71 20 74 69 74 6c 65 20 20 20 20 20 20 20 20 2e 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 req.title.........title)........
27860 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 63 72 65 61 74 65 64 20 20 20 20 20 20 2e 63 72 65 .(oset.pullreq.created.......cre
27880 61 74 65 64 41 74 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 63 6c atedAt).........(oset.pullreq.cl
278a0 6f 73 65 64 20 20 20 20 20 20 20 2e 63 6c 6f 73 65 64 41 74 29 0a 20 20 20 20 20 20 20 20 28 6f osed........closedAt).........(o
278c0 73 65 74 20 70 75 6c 6c 72 65 71 20 6d 65 72 67 65 64 20 20 20 20 20 20 20 2e 6d 65 72 67 65 64 set.pullreq.merged........merged
278e0 41 74 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 64 72 61 66 74 2d At).........(oset.pullreq.draft-
27900 70 20 20 20 20 20 20 2e 69 73 44 72 61 66 74 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 p.......isDraft).........(oset.p
27920 75 6c 6c 72 65 71 20 6c 6f 63 6b 65 64 2d 70 20 20 20 20 20 2e 6c 6f 63 6b 65 64 29 0a 20 20 20 ullreq.locked-p......locked)....
27940 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 65 64 69 74 61 62 6c 65 2d 70 20 20 20 .....(oset.pullreq.editable-p...
27960 2e 6d 61 69 6e 74 61 69 6e 65 72 43 61 6e 4d 6f 64 69 66 79 29 0a 20 20 20 20 20 20 20 20 28 6f .maintainerCanModify).........(o
27980 73 65 74 20 70 75 6c 6c 72 65 71 20 63 72 6f 73 73 2d 72 65 70 6f 2d 70 20 2e 69 73 43 72 6f 73 set.pullreq.cross-repo-p..isCros
279a0 73 52 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 sRepository).........(oset.pullr
279c0 65 71 20 62 61 73 65 2d 72 65 66 20 20 20 20 20 2e 62 61 73 65 52 65 66 2e 6e 61 6d 65 29 0a 20 eq.base-ref......baseRef.name)..
279e0 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 62 61 73 65 2d 72 65 76 20 20 20 .......(oset.pullreq.base-rev...
27a00 20 20 2e 62 61 73 65 52 65 66 4f 69 64 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c ...baseRefOid).........(oset.pul
27a20 6c 72 65 71 20 62 61 73 65 2d 72 65 70 6f 20 20 20 20 2e 62 61 73 65 52 65 66 2e 72 65 70 6f 73 lreq.base-repo.....baseRef.repos
27a40 69 74 6f 72 79 2e 6e 61 6d 65 57 69 74 68 4f 77 6e 65 72 29 0a 20 20 20 20 20 20 20 20 28 6f 73 itory.nameWithOwner).........(os
27a60 65 74 20 70 75 6c 6c 72 65 71 20 68 65 61 64 2d 72 65 66 20 20 20 20 20 2e 68 65 61 64 52 65 66 et.pullreq.head-ref......headRef
27a80 2e 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 68 65 61 .name).........(oset.pullreq.hea
27aa0 64 2d 72 65 76 20 20 20 20 20 2e 68 65 61 64 52 65 66 4f 69 64 29 0a 20 20 20 20 20 20 20 20 28 d-rev......headRefOid).........(
27ac0 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 68 65 61 64 2d 75 73 65 72 20 20 20 20 2e 68 65 61 64 52 oset.pullreq.head-user.....headR
27ae0 65 66 2e 72 65 70 6f 73 69 74 6f 72 79 2e 6f 77 6e 65 72 2e 6c 6f 67 69 6e 29 0a 20 20 20 20 20 ef.repository.owner.login)......
27b00 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 68 65 61 64 2d 72 65 70 6f 20 20 20 20 2e 68 ...(oset.pullreq.head-repo.....h
27b20 65 61 64 52 65 66 2e 72 65 70 6f 73 69 74 6f 72 79 2e 6e 61 6d 65 57 69 74 68 4f 77 6e 65 72 29 eadRef.repository.nameWithOwner)
27b40 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 6d 69 6c 65 73 74 6f 6e 65 .........(oset.pullreq.milestone
27b60 20 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 72 65 70 6f 2d 69 64 20 2e 6d ....(forge--object-id.repo-id..m
27b80 69 6c 65 73 74 6f 6e 65 2e 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c ilestone.id)).........(oset.pull
27ba0 72 65 71 20 62 6f 64 79 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a req.body.........(forge--sanitiz
27bc0 65 2d 73 74 72 69 6e 67 20 2e 62 6f 64 79 29 29 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 e-string..body)).........(dolist
27be0 20 28 70 20 2e 63 6f 6d 6d 65 6e 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c .(p..comments)...........(let-al
27c00 69 73 74 20 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 ist.p.............(closql-insert
27c20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 ..............(forge-db)........
27c40 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 0a 20 20 20 20 20 20 ......(forge-pullreq-post.......
27c60 20 20 20 20 20 20 20 20 3a 69 64 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d ........:id......(forge--object-
27c80 69 64 20 70 75 6c 6c 72 65 71 2d 69 64 20 2e 64 61 74 61 62 61 73 65 49 64 29 0a 20 20 20 20 20 id.pullreq-id..databaseId)......
27ca0 20 20 20 20 20 20 20 20 20 3a 70 75 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 2d 69 64 0a 20 20 20 .........:pullreq.pullreq-id....
27cc0 20 20 20 20 20 20 20 20 20 20 20 3a 6e 75 6d 62 65 72 20 20 2e 64 61 74 61 62 61 73 65 49 64 0a ...........:number...databaseId.
27ce0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 75 74 68 6f 72 20 20 2e 61 75 74 68 6f 72 2e 6c ..............:author...author.l
27d00 6f 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 72 65 61 74 65 64 20 2e 63 72 65 ogin...............:created..cre
27d20 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 70 64 61 74 65 64 20 2e 75 atedAt...............:updated..u
27d40 70 64 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 6f 64 79 20 20 20 20 pdatedAt...............:body....
27d60 28 66 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 73 74 72 69 6e 67 20 2e 62 6f 64 79 29 29 0a (forge--sanitize-string..body)).
27d80 20 20 20 20 20 20 20 20 20 20 20 20 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 .............t))).........(forge
27da0 2d 2d 75 70 64 61 74 65 2d 73 74 61 74 75 73 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 20 64 61 74 --update-status.repo.pullreq.dat
27dc0 61 20 62 75 6d 70 20 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 29 29 0a 20 20 20 20 20 20 28 66 6f 72 a.bump.initial-pull)).......(for
27de0 67 65 2d 2d 73 65 74 2d 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 ge--set-connections.repo.pullreq
27e00 20 27 61 73 73 69 67 6e 65 65 73 20 2e 61 73 73 69 67 6e 65 65 73 29 0a 20 20 20 20 20 20 28 66 .'assignees..assignees).......(f
27e20 6f 72 67 65 2d 2d 73 65 74 2d 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 72 65 70 6f 20 70 75 6c 6c 72 orge--set-connections.repo.pullr
27e40 65 71 20 27 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 eq.'review-requests.............
27e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 23 23 61 6c 69 ..................(mapcar.(##ali
27e80 73 74 2d 67 65 74 20 27 72 65 71 75 65 73 74 65 64 52 65 76 69 65 77 65 72 20 25 29 0a 20 20 20 st-get.'requestedReviewer.%)....
27ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
27ec0 20 20 20 2e 72 65 76 69 65 77 52 65 71 75 65 73 74 73 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 ....reviewRequests)).......(forg
27ee0 65 2d 2d 73 65 74 2d 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 20 e--set-connections.repo.pullreq.
27f00 27 6c 61 62 65 6c 73 20 2e 6c 61 62 65 6c 73 29 29 0a 20 20 20 20 70 75 6c 6c 72 65 71 29 29 0a 'labels..labels)).....pullreq)).
27f20 0a 3b 3b 3b 3b 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 .;;;;.Notifications..(cl-defmeth
27f40 6f 64 20 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 0a 20 20 28 od.forge--pull-notifications...(
27f60 28 5f 63 6c 61 73 73 20 28 73 75 62 63 6c 61 73 73 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 (_class.(subclass.forge-github-r
27f80 65 70 6f 73 69 74 6f 72 79 29 29 20 67 69 74 68 6f 73 74 20 26 6f 70 74 69 6f 6e 61 6c 20 63 61 epository)).githost.&optional.ca
27fa0 6c 6c 62 61 63 6b 29 0a 20 20 3b 3b 20 54 68 65 20 47 72 61 70 68 51 4c 20 41 50 49 20 64 6f 65 llback)...;;.The.GraphQL.API.doe
27fc0 73 6e 27 74 20 73 75 70 70 6f 72 74 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 61 6e 64 20 73 sn't.support.notifications.and.s
27fe0 75 70 70 6f 72 74 20 69 6e 20 74 68 65 0a 20 20 3b 3b 20 52 45 53 54 20 41 50 49 20 69 73 20 61 upport.in.the...;;.REST.API.is.a
28000 62 79 73 6d 61 6c 20 2d 2d 20 66 6f 72 63 69 6e 67 20 75 73 20 74 6f 20 70 65 72 66 6f 72 6d 20 bysmal.--.forcing.us.to.perform.
28020 61 20 6d 61 6a 6f 72 20 72 61 69 6e 20 64 61 6e 63 65 2e 0a 20 20 28 6c 65 74 20 28 28 62 75 66 a.major.rain.dance....(let.((buf
28040 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 73 fer.(current-buffer)).........(s
28060 70 65 63 20 28 66 6f 72 67 65 2d 2d 67 65 74 2d 66 6f 72 67 65 2d 68 6f 73 74 20 67 69 74 68 6f pec.(forge--get-forge-host.githo
28080 73 74 20 74 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 6e 69 6c 20 74 20 6e 69 st.t))).....(forge--msg.nil.t.ni
280a0 6c 20 22 50 75 6c 6c 69 6e 67 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 29 0a 20 20 20 20 28 l."Pulling.notifications").....(
280c0 70 63 61 73 65 2d 6c 65 74 2a 0a 20 20 20 20 20 20 20 20 28 28 60 28 2c 5f 20 2c 61 70 69 68 6f pcase-let*.........((`(,_.,apiho
280e0 73 74 20 2c 66 6f 72 67 65 20 2c 5f 29 20 73 70 65 63 29 0a 20 20 20 20 20 20 20 20 20 28 73 69 st.,forge.,_).spec)..........(si
28100 6e 63 65 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 nce.(forge--ghub-notifications-s
28120 69 6e 63 65 20 66 6f 72 67 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 6f 74 69 66 73 0a 20 20 ince.forge))..........(notifs...
28140 20 20 20 20 20 20 20 20 28 73 65 71 2d 6b 65 65 70 20 28 6c 61 6d 62 64 61 20 28 64 61 74 61 29 ........(seq-keep.(lambda.(data)
28160 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 47 69 74 68 75 62 .......................;;.Github
28180 20 72 65 74 75 72 6e 73 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 66 6f 72 20 72 65 70 6f 73 .returns.notifications.for.repos
281a0 69 74 6f 72 69 65 73 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 itories.the.....................
281c0 20 20 3b 3b 20 75 73 65 72 20 6e 6f 20 6c 6f 6e 67 65 72 20 68 61 73 20 61 63 63 65 73 73 20 74 ..;;.user.no.longer.has.access.t
281e0 6f 2e 20 20 54 72 79 69 6e 67 20 74 6f 20 72 65 74 72 69 65 76 65 0a 20 20 20 20 20 20 20 20 20 o...Trying.to.retrieve..........
28200 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 .............;;.information.for.
28220 73 75 63 68 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 6c 65 61 64 73 20 74 6f 20 65 72 72 6f 72 such.repositories.leads.to.error
28240 73 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 68 69 63 s,.......................;;.whic
28260 68 20 77 65 20 73 75 70 70 72 65 73 73 2e 20 20 53 65 65 20 23 31 36 34 2e 0a 20 20 20 20 20 20 h.we.suppress...See.#164........
28280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 64 65 6d 6f 74 65 64 2d 65 72 ................(with-demoted-er
282a0 72 6f 72 73 20 22 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 3a rors."forge--pull-notifications:
282c0 20 25 53 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f .%S".........................(fo
282e0 72 67 65 2d 2d 67 68 75 62 2d 6d 61 73 73 61 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 64 rge--ghub-massage-notification.d
28300 61 74 61 20 67 69 74 68 6f 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ata.githost)))..................
28320 20 20 20 28 66 6f 72 67 65 2d 72 65 73 74 20 61 70 69 68 6f 73 74 20 22 47 45 54 22 20 22 2f 6e ...(forge-rest.apihost."GET"."/n
28340 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 otifications"...................
28360 20 20 20 20 28 28 61 6c 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....((all.t)....................
28380 20 20 20 20 28 61 6e 64 20 73 69 6e 63 65 20 28 73 69 6e 63 65 20 73 69 6e 63 65 29 29 29 0a 20 ....(and.since.(since.since)))..
283a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 6e 70 61 67 69 6e 61 74 65 .....................:unpaginate
283c0 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 53 70 6c 69 74 20 69 6e 74 6f 20 6d 75 6c .t)))..........;;.Split.into.mul
283e0 74 69 70 6c 65 20 72 65 71 75 65 73 74 73 20 74 6f 20 72 65 64 75 63 65 20 72 69 73 6b 20 6f 66 tiple.requests.to.reduce.risk.of
28400 20 74 69 6d 65 6f 75 74 73 2e 0a 20 20 20 20 20 20 20 20 20 28 67 72 6f 75 70 73 20 28 73 65 71 .timeouts...........(groups.(seq
28420 2d 70 61 72 74 69 74 69 6f 6e 20 6e 6f 74 69 66 73 20 35 30 29 29 0a 20 20 20 20 20 20 20 20 20 -partition.notifs.50))..........
28440 28 70 61 67 65 73 20 20 28 6c 65 6e 67 74 68 20 67 72 6f 75 70 73 29 29 0a 20 20 20 20 20 20 20 (pages..(length.groups))........
28460 20 20 28 70 61 67 65 20 20 20 30 29 0a 20 20 20 20 20 20 20 20 20 28 74 6f 70 69 63 73 20 6e 69 ..(page...0)..........(topics.ni
28480 6c 29 29 0a 20 20 20 20 20 20 28 63 6c 2d 6c 61 62 65 6c 73 0a 20 20 20 20 20 20 20 20 20 20 28 l)).......(cl-labels...........(
284a0 28 63 62 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 61 74 61 20 5f 68 65 61 64 65 72 73 20 5f 73 74 (cb.(&optional.data._headers._st
284c0 61 74 75 73 20 5f 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 64 61 atus._req)..............(when.da
284e0 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 6f 70 69 63 73 20 28 ta................(setq.topics.(
28500 6e 63 6f 6e 63 20 74 6f 70 69 63 73 20 28 63 64 72 20 64 61 74 61 29 29 29 29 0a 20 20 20 20 20 nconc.topics.(cdr.data))))......
28520 20 20 20 20 20 20 20 20 28 69 66 20 67 72 6f 75 70 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ........(if.groups..............
28540 20 20 20 20 28 6c 65 74 2a 20 28 28 71 75 65 72 79 20 28 63 6f 6e 73 20 27 71 75 65 72 79 20 28 ....(let*.((query.(cons.'query.(
28560 73 65 71 2d 6b 65 65 70 20 23 27 63 61 64 64 72 20 28 70 6f 70 20 67 72 6f 75 70 73 29 29 29 29 seq-keep.#'caddr.(pop.groups))))
28580 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 69 65 73 20 .........................(tries.
285a0 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 3).........................(erro
285c0 72 62 61 63 6b 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rback.nil)......................
285e0 20 20 20 28 76 61 63 75 75 6d 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 ...(vacuum.(lambda.()...........
28600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d ........................(forge--
28620 71 75 65 72 79 20 61 70 69 68 6f 73 74 20 71 75 65 72 79 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 query.apihost.query.nil.........
28640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c ............................:cal
28660 6c 62 61 63 6b 20 23 27 63 62 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lback.#'cb......................
28680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 65 72 72 6f 72 62 ...............:errorback.errorb
286a0 61 63 6b 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 47 69 ack))))....................;;.Gi
286c0 74 68 75 62 20 61 6c 73 6f 20 72 65 74 75 72 6e 73 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 thub.also.returns.notifications.
286e0 66 6f 72 20 69 73 73 75 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b for.issues....................;;
28700 20 62 65 6c 6f 6e 67 69 6e 67 20 74 6f 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 66 6f 72 20 77 .belonging.to.repositories.for.w
28720 68 69 63 68 20 69 73 73 75 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b hich.issues....................;
28740 3b 20 68 61 76 65 20 62 65 65 6e 20 64 69 73 61 62 6c 65 64 2e 20 20 44 72 6f 70 20 74 68 65 6d ;.have.been.disabled...Drop.them
28760 20 61 6e 64 20 74 72 79 20 61 67 61 69 6e 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .and.try.again..................
28780 20 20 20 28 73 65 74 71 20 65 72 72 6f 72 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ...(setq.errorback..............
287a0 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 65 72 72 6f 72 73 20 5f 68 65 61 ............(lambda.(errors._hea
287c0 64 65 72 73 20 5f 73 74 61 74 75 73 20 5f 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ders._status._req)..............
287e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 7a 65 72 6f 70 20 74 72 69 65 73 29 0a ..............(if.(zerop.tries).
28800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
28820 67 68 75 62 2d 2d 73 69 67 6e 61 6c 2d 65 72 72 6f 72 20 65 72 72 6f 72 73 29 0a 20 20 20 20 20 ghub--signal-error.errors)......
28840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 64 65 63 66 ........................(cl-decf
28860 20 74 72 69 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .tries).........................
28880 20 20 20 20 20 28 63 6f 6e 64 2d 6c 65 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....(cond-let..................
288a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 5b 6e 6f 74 66 6f 75 6e 64 0a 20 20 20 20 20 20 20 ..............([notfound........
288c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 71 2d 6b ..........................(seq-k
288e0 65 65 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eep.............................
28900 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 65 72 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ......(lambda.(err).............
28920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 ........................(and.(eq
28940 75 61 6c 20 28 63 64 72 20 28 61 73 73 71 20 27 74 79 70 65 20 65 72 72 29 29 0a 20 20 20 20 20 ual.(cdr.(assq.'type.err))......
28960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
28980 20 20 20 20 20 20 20 20 20 20 20 22 4e 4f 54 5f 46 4f 55 4e 44 22 29 0a 20 20 20 20 20 20 20 20 ..........."NOT_FOUND").........
289a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
289c0 20 28 63 61 64 72 20 28 61 73 73 71 20 27 70 61 74 68 20 65 72 72 29 29 0a 20 20 20 20 20 20 20 .(cadr.(assq.'path.err))........
289e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
28a00 20 20 28 69 6e 74 65 72 6e 20 28 63 61 64 72 20 28 61 73 73 71 20 27 70 61 74 68 20 65 72 72 29 ..(intern.(cadr.(assq.'path.err)
28a20 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ))))............................
28a40 20 20 20 20 20 20 20 28 63 64 72 20 65 72 72 6f 72 73 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 .......(cdr.errors))]...........
28a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 71 75 65 72 ......................(setq.quer
28a80 79 20 28 63 6c 2d 64 65 6c 65 74 65 2d 69 66 20 28 23 23 6d 65 6d 71 20 25 20 6e 6f 74 66 6f 75 y.(cl-delete-if.(##memq.%.notfou
28aa0 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nd).............................
28ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 71 75 ..............................qu
28ae0 65 72 79 20 3a 6b 65 79 20 23 27 63 61 61 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ery.:key.#'caar))...............
28b00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 76 61 63 75 75 ..................(funcall.vacuu
28b20 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 m)).............................
28b40 20 20 20 28 28 67 68 75 62 2d 2d 73 69 67 6e 61 6c 2d 65 72 72 6f 72 20 65 72 72 6f 72 73 29 29 ...((ghub--signal-error.errors))
28b60 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 ))))....................(cl-incf
28b80 20 70 61 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 .page)....................(forge
28ba0 2d 2d 6d 73 67 20 6e 69 6c 20 74 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --msg.nil.t.nil.................
28bc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 50 75 6c 6c 69 6e 67 20 6e 6f 74 69 66 69 63 61 ..............."Pulling.notifica
28be0 74 69 6f 6e 73 20 28 70 61 67 65 20 25 73 2f 25 73 29 22 20 70 61 67 65 20 70 61 67 65 73 29 0a tions.(page.%s/%s)".page.pages).
28c00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 76 61 63 75 ...................(funcall.vacu
28c20 75 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 um))................(forge--msg.
28c40 6e 69 6c 20 74 20 74 20 20 20 22 50 75 6c 6c 69 6e 67 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 nil.t.t..."Pulling.notifications
28c60 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 6e 69 ")................(forge--msg.ni
28c80 6c 20 74 20 6e 69 6c 20 22 53 74 6f 72 69 6e 67 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 29 l.t.nil."Storing.notifications")
28ca0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 75 70 64 ................(forge--ghub-upd
28cc0 61 74 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 6e 6f 74 69 66 73 20 74 6f 70 69 63 73 20 ate-notifications.notifs.topics.
28ce0 28 6e 6f 74 20 73 69 6e 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 (not.since))................(for
28d00 67 65 2d 2d 6d 73 67 20 6e 69 6c 20 74 20 74 20 22 53 74 6f 72 69 6e 67 20 6e 6f 74 69 66 69 63 ge--msg.nil.t.t."Storing.notific
28d20 61 74 69 6f 6e 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 ations")................(forge-r
28d40 65 66 72 65 73 68 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 efresh-buffer.buffer)...........
28d60 20 20 20 20 20 28 77 68 65 6e 20 63 61 6c 6c 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 .....(when.callback.............
28d80 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 6c 62 61 63 6b 29 29 29 29 29 0a 20 20 20 20 .....(funcall.callback))))).....
28da0 20 20 20 20 28 63 62 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 68 75 62 ....(cb)))))..(defun.forge--ghub
28dc0 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 69 6e 63 65 20 28 66 6f 72 67 65 29 0a 20 20 28 -notifications-since.(forge)...(
28de0 66 6f 72 67 65 2d 73 71 6c 31 20 5b 3a 73 65 6c 65 63 74 20 3a 64 69 73 74 69 6e 63 74 20 5b 6e forge-sql1.[:select.:distinct.[n
28e00 6f 74 69 66 69 63 61 74 69 6f 6e 3a 75 70 64 61 74 65 64 5d 0a 20 20 20 20 20 20 20 20 20 20 20 otification:updated]............
28e20 20 20 20 20 3a 66 72 6f 6d 20 5b 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 72 65 70 6f 73 69 74 6f ....:from.[notification.reposito
28e40 72 79 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 ry]................:where.(and.(
28e60 3d 20 72 65 70 6f 73 69 74 6f 72 79 3a 66 6f 72 67 65 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 =.repository:forge.$s1).........
28e80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 72 65 70 6f 73 69 74 6f 72 79 ...................(=.repository
28ea0 3a 69 64 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 3a 72 65 70 6f 73 69 74 6f 72 79 29 29 0a 20 20 :id.notification:repository))...
28ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 64 65 73 63 20 6e 6f .............:order-by.[(desc.no
28ee0 74 69 66 69 63 61 74 69 6f 6e 3a 75 70 64 61 74 65 64 29 5d 5d 0a 20 20 20 20 20 20 20 20 20 20 tification:updated)]]...........
28f00 20 20 20 20 66 6f 72 67 65 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 68 75 62 2d ....forge))..(defun.forge--ghub-
28f20 6d 61 73 73 61 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 28 64 61 74 61 20 67 69 74 68 6f massage-notification.(data.githo
28f40 73 74 29 0a 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 61 74 61 0a 20 20 20 20 28 6c 65 74 2a 20 st)...(let-alist.data.....(let*.
28f60 28 28 74 79 70 65 20 28 69 6e 74 65 72 6e 20 28 64 6f 77 6e 63 61 73 65 20 2e 73 75 62 6a 65 63 ((type.(intern.(downcase..subjec
28f80 74 2e 74 79 70 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 79 70 65 20 28 69 66 20 28 t.type)))............(type.(if.(
28fa0 65 71 20 74 79 70 65 20 27 70 75 6c 6c 72 65 71 75 65 73 74 29 20 27 70 75 6c 6c 72 65 71 20 74 eq.type.'pullrequest).'pullreq.t
28fc0 79 70 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 5f 20 28 75 6e 6c 65 73 73 20 28 6d 65 6d ype))............(_.(unless.(mem
28fe0 71 20 74 79 70 65 20 27 28 20 64 69 73 63 75 73 73 69 6f 6e 20 69 73 73 75 65 20 70 75 6c 6c 72 q.type.'(.discussion.issue.pullr
29000 65 71 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eq..............................
29020 20 20 20 20 20 20 20 63 6f 6d 6d 69 74 20 72 65 6c 65 61 73 65 29 29 0a 20 20 20 20 20 20 20 20 .......commit.release)).........
29040 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 42 55 47 3a 20 4e 65 77 20 75 6e 73 75 70 70 6f ........(error."BUG:.New.unsuppo
29060 72 74 65 64 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 74 79 70 65 3a 20 25 73 22 20 74 79 70 65 rted.notification.type:.%s".type
29080 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 2d 6f 72 2d 63 6f 6d 6d 69 74 )))............(number-or-commit
290a0 20 28 61 6e 64 20 2e 73 75 62 6a 65 63 74 2e 75 72 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .(and..subject.url..............
290c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 .....................(string-mat
290e0 63 68 20 22 5b 5e 2f 5d 2a 5c 5c 27 22 20 2e 73 75 62 6a 65 63 74 2e 75 72 6c 29 0a 20 20 20 20 ch."[^/]*\\'"..subject.url).....
29100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d ..............................(m
29120 61 74 63 68 2d 73 74 72 69 6e 67 20 30 20 2e 73 75 62 6a 65 63 74 2e 75 72 6c 29 29 29 0a 20 20 atch-string.0..subject.url)))...
29140 20 20 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 20 28 61 6e 64 20 28 6d 65 6d 71 20 74 79 70 65 .........(number.(and.(memq.type
29160 20 27 28 64 69 73 63 75 73 73 69 6f 6e 20 69 73 73 75 65 20 70 75 6c 6c 72 65 71 29 29 0a 20 20 .'(discussion.issue.pullreq))...
29180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 74 6f ......................(string-to
291a0 2d 6e 75 6d 62 65 72 20 6e 75 6d 62 65 72 2d 6f 72 2d 63 6f 6d 6d 69 74 29 29 29 0a 20 20 20 20 -number.number-or-commit))).....
291c0 20 20 20 20 20 20 20 28 72 65 70 6f 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 .......(repo...(forge-get-reposi
291e0 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 67 tory.....................(list.g
29200 69 74 68 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ithost..........................
29220 20 2e 72 65 70 6f 73 69 74 6f 72 79 2e 6f 77 6e 65 72 2e 6c 6f 67 69 6e 0a 20 20 20 20 20 20 20 ..repository.owner.login........
29240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 72 65 70 6f 73 69 74 6f 72 79 2e 6e ....................repository.n
29260 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 3a 69 6e ame).....................nil.:in
29280 73 65 72 74 21 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 69 64 20 28 6f 72 65 66 sert!))............(repoid.(oref
292a0 20 72 65 70 6f 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6f 77 6e 65 72 20 20 28 6f .repo.id))............(owner..(o
292c0 72 65 66 20 72 65 70 6f 20 6f 77 6e 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6e 61 6d ref.repo.owner))............(nam
292e0 65 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 e...(oref.repo.name))...........
29300 20 28 69 64 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 72 65 70 6f 69 .(id.....(forge--object-id.repoi
29320 64 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 2e 69 64 29 29 29 0a 20 20 20 20 20 d.(string-to-number..id)))......
29340 20 20 20 20 20 20 28 61 6c 69 61 73 20 20 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 22 5f ......(alias..(intern.(concat."_
29360 22 20 28 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 20 22 3d 22 20 22 5f 22 20 69 64 29 29 29 29 ".(string-replace."="."_".id))))
29380 29 0a 20 20 20 20 20 20 28 61 6e 64 20 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 28 ).......(and.number............(
293a0 6c 69 73 74 20 61 6c 69 61 73 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 list.alias.id..................`
293c0 28 28 2c 61 6c 69 61 73 20 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 ((,alias.repository)............
293e0 20 20 20 20 20 20 20 20 5b 28 6e 61 6d 65 20 2c 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 ........[(name.,name)...........
29400 20 20 20 20 20 20 20 20 20 20 28 6f 77 6e 65 72 20 2c 6f 77 6e 65 72 29 5d 0a 20 20 20 20 20 20 ..........(owner.,owner)].......
29420 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 63 64 64 72 0a 20 20 20 20 20 20 20 20 20 20 20 .............,@(cddr............
29440 20 20 20 20 20 20 20 20 20 20 20 28 63 61 64 64 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...........(caddr...............
29460 20 20 20 20 20 20 20 20 20 28 67 68 75 62 2d 2d 67 72 61 70 68 71 6c 2d 70 72 65 70 61 72 65 2d .........(ghub--graphql-prepare-
29480 71 75 65 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f query.........................fo
294a0 72 67 65 2d 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 71 75 65 72 79 0a 20 20 20 rge--github-repository-query....
294c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 20 74 79 70 65 .....................(pcase.type
294e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 64 69 73 ...........................('dis
29500 63 75 73 73 69 6f 6e 20 60 28 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 cussion.`(repository............
29520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 ..............................di
29540 73 63 75 73 73 69 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 scussions.......................
29560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 20 2e ...................(discussion..
29580 20 2c 6e 75 6d 62 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .,number))).....................
295a0 20 20 20 20 20 20 28 27 69 73 73 75 65 20 20 20 20 20 20 60 28 72 65 70 6f 73 69 74 6f 72 79 0a ......('issue......`(repository.
295c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
295e0 20 20 20 20 20 20 20 20 20 69 73 73 75 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .........issues.................
29600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 73 75 65 20 .........................(issue.
29620 2e 20 2c 6e 75 6d 62 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..,number)))....................
29640 20 20 20 20 20 20 20 28 27 70 75 6c 6c 72 65 71 20 20 20 20 60 28 72 65 70 6f 73 69 74 6f 72 79 .......('pullreq....`(repository
29660 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
29680 20 20 20 20 20 20 20 20 20 20 70 75 6c 6c 52 65 71 75 65 73 74 0a 20 20 20 20 20 20 20 20 20 20 ..........pullRequest...........
296a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
296c0 70 75 6c 6c 52 65 71 75 65 73 74 20 2e 20 2c 6e 75 6d 62 65 72 29 29 29 29 29 29 29 29 0a 20 20 pullRequest...,number))))))))...
296e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 70 6f 20 74 79 70 65 20 64 61 74 61 29 29 29 ...............repo.type.data)))
29700 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 68 75 62 2d 75 70 64 61 74 65 2d 6e 6f ))..(defun.forge--ghub-update-no
29720 74 69 66 69 63 61 74 69 6f 6e 73 20 28 6e 6f 74 69 66 73 20 74 6f 70 69 63 73 20 69 6e 69 74 69 tifications.(notifs.topics.initi
29740 61 6c 2d 70 75 6c 6c 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 61 6e 73 61 63 74 al-pull)...(closql-with-transact
29760 69 6f 6e 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 ion.(forge-db).....(pcase-dolist
29780 20 28 60 28 2c 61 6c 69 61 73 20 2c 69 64 20 2c 5f 71 75 65 72 79 20 2c 72 65 70 6f 20 2c 74 79 .(`(,alias.,id.,_query.,repo.,ty
297a0 70 65 20 2c 64 61 74 61 29 20 6e 6f 74 69 66 73 29 0a 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 pe.,data).notifs).......(let-ali
297c0 73 74 20 64 61 74 61 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 2a 0a 20 20 20 20 20 st.data.........(when-let*......
297e0 20 20 20 20 20 20 20 28 28 74 6f 70 69 63 2d 64 61 74 61 20 28 63 64 72 20 28 63 61 64 72 20 28 .......((topic-data.(cdr.(cadr.(
29800 61 73 73 71 20 61 6c 69 61 73 20 74 6f 70 69 63 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 assq.alias.topics))))...........
29820 20 20 20 28 74 6f 70 69 63 20 28 66 75 6e 63 61 6c 6c 20 28 70 63 61 73 65 2d 65 78 68 61 75 73 ...(topic.(funcall.(pcase-exhaus
29840 74 69 76 65 20 74 79 70 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tive.type.......................
29860 20 20 20 20 20 20 20 20 20 28 27 64 69 73 63 75 73 73 69 6f 6e 20 23 27 66 6f 72 67 65 2d 2d 75 .........('discussion.#'forge--u
29880 70 64 61 74 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pdate-discussion)...............
298a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 69 73 73 75 65 20 20 20 20 20 20 23 27 .................('issue......#'
298c0 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 69 73 73 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 forge--update-issue)............
298e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 70 75 6c 6c 72 65 71 20 20 20 ....................('pullreq...
29900 20 23 27 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 70 75 6c 6c 72 65 71 29 29 0a 20 20 20 20 20 .#'forge--update-pullreq))......
29920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 70 6f 20 74 6f 70 ........................repo.top
29940 69 63 2d 64 61 74 61 20 6e 69 6c 20 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 29 29 0a 20 20 20 20 20 ic-data.nil.initial-pull))......
29960 20 20 20 20 20 20 20 20 28 6e 6f 74 69 66 20 28 6f 72 20 28 66 6f 72 67 65 2d 67 65 74 2d 6e 6f ........(notif.(or.(forge-get-no
29980 74 69 66 69 63 61 74 69 6f 6e 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tification.id)..................
299a0 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 20 28 66 6f 72 67 65 2d 64 62 29 .......(closql-insert.(forge-db)
299c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
299e0 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 0a 20 20 20 20 ........(forge-notification.....
29a00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
29a20 20 20 20 20 3a 69 64 20 20 20 20 20 20 20 20 20 20 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 ....:id...........id............
29a40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 68 .............................:th
29a60 72 65 61 64 2d 69 64 20 20 20 20 2e 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 read-id.....id..................
29a80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 70 6f 73 69 74 6f .......................:reposito
29aa0 72 79 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ry...(oref.repo.id).............
29ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 ............................:typ
29ae0 65 20 20 20 20 20 20 20 20 20 74 79 70 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e.........type..................
29b00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 6f 70 69 63 20 20 20 .......................:topic...
29b20 20 20 20 20 20 28 6f 72 65 66 20 74 6f 70 69 63 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 .....(oref.topic.id)............
29b40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 72 .............................:ur
29b60 6c 20 20 20 20 20 20 20 20 20 20 2e 73 75 62 6a 65 63 74 2e 75 72 6c 29 29 29 29 29 0a 20 20 20 l...........subject.url)))))....
29b80 20 20 20 20 20 20 20 28 6f 73 65 74 20 6e 6f 74 69 66 20 74 69 74 6c 65 20 20 20 20 20 2e 73 75 .......(oset.notif.title......su
29ba0 62 6a 65 63 74 2e 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 6e 6f 74 bject.title)...........(oset.not
29bc0 69 66 20 72 65 61 73 6f 6e 20 20 20 20 28 69 6e 74 65 72 6e 20 28 64 6f 77 6e 63 61 73 65 20 2e if.reason....(intern.(downcase..
29be0 72 65 61 73 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 6e 6f 74 69 66 20 reason)))...........(oset.notif.
29c00 6c 61 73 74 2d 72 65 61 64 20 2e 6c 61 73 74 5f 72 65 61 64 5f 61 74 29 0a 20 20 20 20 20 20 20 last-read..last_read_at)........
29c20 20 20 20 28 6f 73 65 74 20 6e 6f 74 69 66 20 75 70 64 61 74 65 64 20 20 20 2e 75 70 64 61 74 65 ...(oset.notif.updated....update
29c40 64 5f 61 74 29 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 0a 0a d_at))))))..;;;;.Miscellaneous..
29c60 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 61 64 64 2d 75 73 65 72 2d 72 65 (cl-defmethod.forge--add-user-re
29c80 70 6f 73 0a 20 20 28 28 63 6c 61 73 73 20 28 73 75 62 63 6c 61 73 73 20 66 6f 72 67 65 2d 67 69 pos...((class.(subclass.forge-gi
29ca0 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 20 68 6f 73 74 20 75 73 65 72 29 0a 20 20 28 thub-repository)).host.user)...(
29cc0 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 75 73 65 72 2d 72 65 70 6f 73 0a 20 20 20 63 6c 61 73 73 forge--fetch-user-repos....class
29ce0 20 28 66 6f 72 67 65 2d 2d 61 73 2d 61 70 69 68 6f 73 74 20 68 6f 73 74 29 20 75 73 65 72 0a 20 .(forge--as-apihost.host).user..
29d00 20 20 28 70 61 72 74 69 61 6c 20 23 27 66 6f 72 67 65 2d 2d 62 61 74 63 68 2d 61 64 64 2d 63 61 ..(partial.#'forge--batch-add-ca
29d20 6c 6c 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 61 73 2d 67 69 74 68 6f 73 74 20 68 6f 73 74 29 20 llback.(forge--as-githost.host).
29d40 75 73 65 72 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 61 64 user)))..(cl-defmethod.forge--ad
29d60 64 2d 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 2d 72 65 70 6f 73 0a 20 20 28 28 63 6c 61 73 73 20 28 d-organization-repos...((class.(
29d80 73 75 62 63 6c 61 73 73 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 subclass.forge-github-repository
29da0 29 29 20 68 6f 73 74 20 6f 72 67 29 0a 20 20 28 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 6f 72 67 )).host.org)...(forge--fetch-org
29dc0 61 6e 69 7a 61 74 69 6f 6e 2d 72 65 70 6f 73 0a 20 20 20 63 6c 61 73 73 20 28 66 6f 72 67 65 2d anization-repos....class.(forge-
29de0 2d 61 73 2d 61 70 69 68 6f 73 74 20 68 6f 73 74 29 20 6f 72 67 0a 20 20 20 28 70 61 72 74 69 61 -as-apihost.host).org....(partia
29e00 6c 20 23 27 66 6f 72 67 65 2d 2d 62 61 74 63 68 2d 61 64 64 2d 63 61 6c 6c 62 61 63 6b 20 28 66 l.#'forge--batch-add-callback.(f
29e20 6f 72 67 65 2d 2d 61 73 2d 67 69 74 68 6f 73 74 20 68 6f 73 74 29 20 6f 72 67 29 29 29 0a 0a 28 orge--as-githost.host).org)))..(
29e40 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 75 73 65 72 2d 72 cl-defmethod.forge--fetch-user-r
29e60 65 70 6f 73 0a 20 20 28 28 5f 20 28 73 75 62 63 6c 61 73 73 20 66 6f 72 67 65 2d 67 69 74 68 75 epos...((_.(subclass.forge-githu
29e80 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 20 68 6f 73 74 20 75 73 65 72 20 63 61 6c 6c 62 61 63 b-repository)).host.user.callbac
29ea0 6b 29 0a 20 20 28 66 6f 72 67 65 2d 71 75 65 72 79 20 68 6f 73 74 0a 20 20 20 20 28 75 73 65 72 k)...(forge-query.host.....(user
29ec0 20 5b 28 6c 6f 67 69 6e 20 24 6c 6f 67 69 6e 20 53 74 72 69 6e 67 21 29 5d 0a 20 20 20 20 20 20 .[(login.$login.String!)].......
29ee0 20 20 20 20 28 72 65 70 6f 73 69 74 6f 72 69 65 73 20 5b 28 3a 65 64 67 65 73 20 74 29 20 28 6f ....(repositories.[(:edges.t).(o
29f00 77 6e 65 72 41 66 66 69 6c 69 61 74 69 6f 6e 73 20 2e 20 28 4f 57 4e 45 52 29 29 5d 20 6e 61 6d wnerAffiliations...(OWNER))].nam
29f20 65 29 29 0a 20 20 20 20 28 28 6c 6f 67 69 6e 20 75 73 65 72 29 29 0a 20 20 20 20 3a 63 61 6c 6c e)).....((login.user)).....:call
29f40 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 back.(lambda.(d)................
29f60 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 6c 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .(funcall.callback..............
29f80 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 23 23 61 6c 69 73 74 2d 67 65 74 ............(mapcar.(##alist-get
29fa0 20 27 6e 61 6d 65 20 25 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .'name.%).......................
29fc0 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 20 2e 75 73 65 72 2e 72 65 ...........(let-alist.d..user.re
29fe0 70 6f 73 69 74 6f 72 69 65 73 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 positories))))))..(cl-defmethod.
2a000 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 2d 72 65 70 6f 73 0a forge--fetch-organization-repos.
2a020 20 20 28 28 5f 20 28 73 75 62 63 6c 61 73 73 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 ..((_.(subclass.forge-github-rep
2a040 6f 73 69 74 6f 72 79 29 29 20 68 6f 73 74 20 6f 72 67 20 63 61 6c 6c 62 61 63 6b 29 0a 20 20 28 ository)).host.org.callback)...(
2a060 66 6f 72 67 65 2d 71 75 65 72 79 20 68 6f 73 74 0a 20 20 20 20 28 6f 72 67 61 6e 69 7a 61 74 69 forge-query.host.....(organizati
2a080 6f 6e 20 5b 28 6c 6f 67 69 6e 20 24 6c 6f 67 69 6e 20 53 74 72 69 6e 67 21 29 5d 0a 20 20 20 20 on.[(login.$login.String!)].....
2a0a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 73 69 74 6f 72 69 65 73 20 5b 28 3a 65 ..............(repositories.[(:e
2a0c0 64 67 65 73 20 74 29 5d 20 6e 61 6d 65 29 29 0a 20 20 20 20 28 28 6c 6f 67 69 6e 20 6f 72 67 29 dges.t)].name)).....((login.org)
2a0e0 29 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 64 29 0a 20 20 20 20 ).....:callback.(lambda.(d).....
2a100 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 6c 62 61 63 6b 0a 20 20 ............(funcall.callback...
2a120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 .......................(mapcar.(
2a140 23 23 61 6c 69 73 74 2d 67 65 74 20 27 6e 61 6d 65 20 25 29 0a 20 20 20 20 20 20 20 20 20 20 20 ##alist-get.'name.%)............
2a160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 ......................(let-alist
2a180 20 64 20 2e 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 2e 72 65 70 6f 73 69 74 6f 72 69 65 73 29 29 29 .d..organization.repositories)))
2a1a0 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 62 61 74 63 68 2d 61 64 64 2d 63 61 6c )))..(defun.forge--batch-add-cal
2a1c0 6c 62 61 63 6b 20 28 68 6f 73 74 20 6f 77 6e 65 72 20 6e 61 6d 65 73 29 0a 20 20 28 6c 65 74 20 lback.(host.owner.names)...(let.
2a1e0 28 28 72 65 70 6f 73 20 28 6d 61 70 63 61 6e 20 28 6c 61 6d 62 64 61 20 28 6e 61 6d 65 29 0a 20 ((repos.(mapcan.(lambda.(name)..
2a200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 72 ........................(let.((r
2a220 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 epo.(forge-get-repository.......
2a240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
2a260 28 6c 69 73 74 20 68 6f 73 74 20 6f 77 6e 65 72 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 (list.host.owner.name)..........
2a280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c .............................nil
2a2a0 20 3a 69 6e 73 65 72 74 21 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .:insert!)))....................
2a2c0 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 ........(and.(not.(forge-get-rep
2a2e0 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 6e 69 6c 20 3a 74 72 61 63 6b 65 64 3f 29 29 0a 20 20 20 ository.repo.nil.:tracked?))....
2a300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 .............................(li
2a320 73 74 20 72 65 70 6f 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 st.repo)))).....................
2a340 20 20 20 6e 61 6d 65 73 29 29 0a 20 20 20 20 20 20 20 20 28 63 62 20 6e 69 6c 29 29 0a 20 20 20 ...names)).........(cb.nil))....
2a360 20 28 73 65 74 71 20 63 62 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 .(setq.cb.(lambda.()............
2a380 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 72 65 70 6f 20 28 70 6f 70 20 72 65 70 6f 73 29 ....(when-let.((repo.(pop.repos)
2a3a0 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c ))..................(forge--pull
2a3c0 20 72 65 70 6f 20 63 62 29 29 29 29 0a 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 62 29 29 29 0a .repo.cb)))).....(funcall.cb))).
2a3e0 0a 3b 3b 3b 20 4d 75 74 61 74 69 6f 6e 73 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f .;;;.Mutations..(cl-defmethod.fo
2a400 72 67 65 2d 2d 73 75 62 6d 69 74 2d 63 72 65 61 74 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 28 28 rge--submit-create-discussion.((
2a420 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 5f 29 repo.forge-github-repository)._)
2a440 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 74 69 74 6c 65 20 2e 20 2c 62 6f 64 79 ...(pcase-let.((`(,title...,body
2a460 29 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 62 75 66 66 65 72 2d 74 65 78 74 29 29 29 0a 20 20 ).(forge--post-buffer-text)))...
2a480 20 20 28 66 6f 72 67 65 2d 6d 75 74 61 74 65 20 72 65 70 6f 20 63 72 65 61 74 65 44 69 73 63 75 ..(forge-mutate.repo.createDiscu
2a4a0 73 73 69 6f 6e 0a 20 20 20 20 20 20 28 28 72 65 70 6f 73 69 74 6f 72 79 49 64 20 28 66 6f 72 67 ssion.......((repositoryId.(forg
2a4c0 65 2d 2d 74 68 65 69 72 2d 69 64 20 72 65 70 6f 29 29 0a 20 20 20 20 20 20 20 28 63 61 74 65 67 e--their-id.repo))........(categ
2a4e0 6f 72 79 49 64 20 28 66 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 20 66 6f 72 67 65 2d 2d 62 75 oryId.(forge--their-id.forge--bu
2a500 66 66 65 72 2d 63 61 74 65 67 6f 72 79 20 27 63 61 74 65 67 6f 72 79 20 72 65 70 6f 29 29 0a 20 ffer-category.'category.repo))..
2a520 20 20 20 20 20 20 28 74 69 74 6c 65 20 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 28 62 6f 64 79 ......(title.title)........(body
2a540 20 20 62 6f 64 79 29 29 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 20 28 66 6f 72 67 65 ..body)).......:callback..(forge
2a560 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 6b 20 74 29 0a 20 20 20 20 20 20 --post-submit-callback.t).......
2a580 3a 65 72 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 65 :errorback.(forge--post-submit-e
2a5a0 72 72 6f 72 62 61 63 6b 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 rrorback))))..(cl-defmethod.forg
2a5c0 65 2d 2d 73 75 62 6d 69 74 2d 63 72 65 61 74 65 2d 69 73 73 75 65 20 28 28 72 65 70 6f 20 66 6f e--submit-create-issue.((repo.fo
2a5e0 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 5f 29 0a 20 20 28 70 63 61 rge-github-repository)._)...(pca
2a600 73 65 2d 6c 65 74 20 28 28 60 28 2c 74 69 74 6c 65 20 2e 20 2c 62 6f 64 79 29 20 28 66 6f 72 67 se-let.((`(,title...,body).(forg
2a620 65 2d 2d 70 6f 73 74 2d 62 75 66 66 65 72 2d 74 65 78 74 29 29 29 0a 20 20 20 20 28 66 6f 72 67 e--post-buffer-text))).....(forg
2a640 65 2d 6d 75 74 61 74 65 20 72 65 70 6f 20 63 72 65 61 74 65 49 73 73 75 65 0a 20 20 20 20 20 20 e-mutate.repo.createIssue.......
2a660 28 28 72 65 70 6f 73 69 74 6f 72 79 49 64 20 28 66 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 20 ((repositoryId.(forge--their-id.
2a680 72 65 70 6f 29 29 0a 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 74 69 74 6c 65 29 0a 20 20 20 20 repo))........(title.title).....
2a6a0 20 20 20 28 62 6f 64 79 20 20 62 6f 64 79 29 0a 20 20 20 20 20 20 20 28 61 6e 64 20 66 6f 72 67 ...(body..body)........(and.forg
2a6c0 65 2d 2d 62 75 66 66 65 72 2d 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 e--buffer-milestone.............
2a6e0 28 6d 69 6c 65 73 74 6f 6e 65 49 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 (milestoneId..............(forge
2a700 2d 2d 74 68 65 69 72 2d 69 64 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6d 69 6c 65 73 74 6f --their-id.forge--buffer-milesto
2a720 6e 65 20 27 6d 69 6c 65 73 74 6f 6e 65 29 29 29 0a 20 20 20 20 20 20 20 28 61 6e 64 20 66 6f 72 ne.'milestone)))........(and.for
2a740 67 65 2d 2d 62 75 66 66 65 72 2d 6c 61 62 65 6c 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c ge--buffer-labels.............(l
2a760 61 62 65 6c 49 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 63 6f 6e 63 61 74 20 28 66 abelIds..............(vconcat.(f
2a780 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 61 62 orge--their-id.forge--buffer-lab
2a7a0 65 6c 73 20 27 6c 61 62 65 6c 73 20 72 65 70 6f 29 29 29 29 0a 20 20 20 20 20 20 20 28 61 6e 64 els.'labels.repo))))........(and
2a7c0 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 61 73 73 69 67 6e 65 65 73 0a 20 20 20 20 20 20 20 .forge--buffer-assignees........
2a7e0 20 20 20 20 20 28 61 73 73 69 67 6e 65 65 49 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 .....(assigneeIds..............(
2a800 76 63 6f 6e 63 61 74 20 28 66 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 20 66 6f 72 67 65 2d 2d vconcat.(forge--their-id.forge--
2a820 62 75 66 66 65 72 2d 61 73 73 69 67 6e 65 65 73 20 27 61 73 73 69 67 6e 65 65 73 20 72 65 70 6f buffer-assignees.'assignees.repo
2a840 29 29 29 29 29 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 20 28 66 6f 72 67 65 2d 2d 70 ))))).......:callback..(forge--p
2a860 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 6b 20 74 29 0a 20 20 20 20 20 20 3a 65 72 ost-submit-callback.t).......:er
2a880 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 65 72 72 6f rorback.(forge--post-submit-erro
2a8a0 72 62 61 63 6b 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d rback))))..(cl-defmethod.forge--
2a8c0 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 66 72 6f 6d 2d 69 73 73 75 65 0a 20 20 28 28 72 65 create-pullreq-from-issue...((re
2a8e0 70 6f 20 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 po..forge-github-repository)....
2a900 28 69 73 73 75 65 20 66 6f 72 67 65 2d 69 73 73 75 65 29 0a 20 20 20 73 6f 75 72 63 65 20 74 61 (issue.forge-issue)....source.ta
2a920 72 67 65 74 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 60 28 2c 62 61 73 65 2d 72 65 rget)...(pcase-let*.((`(,base-re
2a940 6d 6f 74 65 20 2e 20 2c 62 61 73 65 2d 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 mote...,base-branch)............
2a960 20 20 20 20 20 28 6d 61 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 74 61 .....(magit-split-branch-name.ta
2a980 72 67 65 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 68 65 61 64 2d 72 rget))................(`(,head-r
2a9a0 65 6d 6f 74 65 20 2e 20 2c 68 65 61 64 2d 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 emote...,head-branch)...........
2a9c0 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 73 ......(magit-split-branch-name.s
2a9e0 6f 75 72 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 65 61 64 2d 72 65 70 ource))................(head-rep
2aa00 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 20 68 65 o.(forge-get-repository.:stub.he
2aa20 61 64 2d 72 65 6d 6f 74 65 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 72 65 73 74 20 72 65 70 ad-remote))).....(forge-rest.rep
2aa40 6f 20 22 50 4f 53 54 22 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 70 75 o."POST"."/repos/:owner/:repo/pu
2aa60 6c 6c 73 22 0a 20 20 20 20 20 20 28 28 69 73 73 75 65 20 28 6f 72 65 66 20 69 73 73 75 65 20 6e lls".......((issue.(oref.issue.n
2aa80 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 28 62 61 73 65 20 62 61 73 65 2d 62 72 61 6e 63 68 umber))........(base.base-branch
2aaa0 29 0a 20 20 20 20 20 20 20 28 68 65 61 64 20 28 69 66 20 28 65 71 75 61 6c 20 68 65 61 64 2d 72 )........(head.(if.(equal.head-r
2aac0 65 6d 6f 74 65 20 62 61 73 65 2d 72 65 6d 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 emote.base-remote)..............
2aae0 20 20 20 20 68 65 61 64 2d 62 72 61 6e 63 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ....head-branch................(
2ab00 63 6f 6e 63 61 74 20 28 6f 72 65 66 20 68 65 61 64 2d 72 65 70 6f 20 6f 77 6e 65 72 29 20 22 3a concat.(oref.head-repo.owner).":
2ab20 22 20 68 65 61 64 2d 62 72 61 6e 63 68 29 29 29 0a 20 20 20 20 20 20 20 28 6d 61 69 6e 74 61 69 ".head-branch)))........(maintai
2ab40 6e 65 72 5f 63 61 6e 5f 6d 6f 64 69 66 79 20 74 29 29 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 ner_can_modify.t)).......:callba
2ab60 63 6b 20 20 28 6c 61 6d 62 64 61 20 28 26 72 65 73 74 20 5f 29 0a 20 20 20 20 20 20 20 20 20 20 ck..(lambda.(&rest._)...........
2ab80 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 64 65 6c 65 74 65 20 69 73 73 75 65 29 0a 20 .........(closql-delete.issue)..
2aba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 20 72 ..................(forge--pull.r
2abc0 65 70 6f 29 29 0a 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 epo)).......:errorback.(lambda.(
2abe0 26 72 65 73 74 20 5f 29 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 20 72 65 70 6f 29 29 29 29 29 0a &rest._).(forge--pull.repo))))).
2ac00 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 63 72 65 .(cl-defmethod.forge--submit-cre
2ac20 61 74 65 2d 70 75 6c 6c 72 65 71 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d ate-pullreq.((repo.forge-github-
2ac40 72 65 70 6f 73 69 74 6f 72 79 29 20 5f 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 60 repository)._)...(pcase-let*.((`
2ac60 28 2c 74 69 74 6c 65 20 2e 20 2c 62 6f 64 79 29 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 62 75 (,title...,body).(forge--post-bu
2ac80 66 66 65 72 2d 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 62 ffer-text))................(`(,b
2aca0 61 73 65 2d 72 65 6d 6f 74 65 20 2e 20 2c 62 61 73 65 2d 62 72 61 6e 63 68 29 0a 20 20 20 20 20 ase-remote...,base-branch)......
2acc0 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e ...........(magit-split-branch-n
2ace0 61 6d 65 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 62 61 73 65 2d 62 72 61 6e 63 68 29 29 0a ame.forge--buffer-base-branch)).
2ad00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 68 65 61 64 2d 72 65 6d 6f 74 65 20 2e ...............(`(,head-remote..
2ad20 20 2c 68 65 61 64 2d 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 .,head-branch).................(
2ad40 6d 61 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 66 6f 72 67 65 2d 2d 62 magit-split-branch-name.forge--b
2ad60 75 66 66 65 72 2d 68 65 61 64 2d 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 uffer-head-branch)).............
2ad80 20 20 20 28 68 65 61 64 2d 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 ...(head-repo.(forge-get-reposit
2ada0 6f 72 79 20 3a 73 74 75 62 20 68 65 61 64 2d 72 65 6d 6f 74 65 29 29 29 0a 20 20 20 20 3b 3b 20 ory.:stub.head-remote))).....;;.
2adc0 43 61 6e 6e 6f 74 20 75 73 65 20 60 63 72 65 61 74 65 50 75 6c 6c 52 65 71 75 65 73 74 27 20 62 Cannot.use.`createPullRequest'.b
2ade0 65 63 61 75 73 65 20 76 61 6c 75 65 20 66 6f 72 0a 20 20 20 20 3b 3b 20 60 68 65 61 64 52 65 70 ecause.value.for.....;;.`headRep
2ae00 6f 73 69 74 6f 72 79 49 64 27 20 69 73 20 75 6e 61 76 61 69 6c 61 62 6c 65 2e 0a 20 20 20 20 28 ositoryId'.is.unavailable......(
2ae20 66 6f 72 67 65 2d 72 65 73 74 20 72 65 70 6f 20 22 50 4f 53 54 22 20 22 2f 72 65 70 6f 73 2f 3a forge-rest.repo."POST"."/repos/:
2ae40 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 70 75 6c 6c 73 22 0a 20 20 20 20 20 20 28 28 74 69 74 6c 65 owner/:repo/pulls".......((title
2ae60 20 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 28 62 6f 64 79 20 20 62 6f 64 79 29 0a 20 20 20 20 .title)........(body..body).....
2ae80 20 20 20 28 62 61 73 65 20 20 62 61 73 65 2d 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 28 68 ...(base..base-branch)........(h
2aea0 65 61 64 20 20 28 69 66 20 28 65 71 75 61 6c 20 68 65 61 64 2d 72 65 6d 6f 74 65 20 62 61 73 65 ead..(if.(equal.head-remote.base
2aec0 2d 72 65 6d 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 68 65 61 64 2d -remote)...................head-
2aee0 62 72 61 6e 63 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 branch.................(concat.(
2af00 6f 72 65 66 20 68 65 61 64 2d 72 65 70 6f 20 6f 77 6e 65 72 29 20 22 3a 22 20 68 65 61 64 2d 62 oref.head-repo.owner).":".head-b
2af20 72 61 6e 63 68 29 29 29 0a 20 20 20 20 20 20 20 28 64 72 61 66 74 20 66 6f 72 67 65 2d 2d 62 75 ranch)))........(draft.forge--bu
2af40 66 66 65 72 2d 64 72 61 66 74 2d 70 29 0a 20 20 20 20 20 20 20 28 6d 61 69 6e 74 61 69 6e 65 72 ffer-draft-p)........(maintainer
2af60 5f 63 61 6e 5f 6d 6f 64 69 66 79 20 74 29 29 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 _can_modify.t)).......:callback.
2af80 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 6b 20 74 29 .(forge--post-submit-callback.t)
2afa0 0a 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 .......:errorback.(forge--post-s
2afc0 75 62 6d 69 74 2d 65 72 72 6f 72 62 61 63 6b 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 ubmit-errorback))))..(cl-defmeth
2afe0 6f 64 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 63 72 65 61 74 65 2d 70 6f 73 74 0a 20 20 28 od.forge--submit-create-post...(
2b000 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 (repo.forge-github-repository)..
2b020 20 20 28 70 6f 73 74 20 66 6f 72 67 65 2d 70 6f 73 74 29 29 0a 20 20 28 66 6f 72 67 65 2d 6d 75 ..(post.forge-post))...(forge-mu
2b040 74 61 74 65 20 72 65 70 6f 20 61 64 64 43 6f 6d 6d 65 6e 74 0a 20 20 20 20 28 28 73 75 62 6a 65 tate.repo.addComment.....((subje
2b060 63 74 49 64 20 28 6f 72 65 66 20 70 6f 73 74 20 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 20 20 ctId.(oref.post.their-id))......
2b080 28 62 6f 64 79 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 74 72 69 6d 20 28 62 75 66 66 65 72 2d (body......(string-trim.(buffer-
2b0a0 73 74 72 29 29 29 29 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 20 28 66 6f 72 67 65 2d 2d 70 str)))).....:callback..(forge--p
2b0c0 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 6b 29 0a 20 20 20 20 3a 65 72 72 6f 72 62 ost-submit-callback).....:errorb
2b0e0 61 63 6b 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 65 72 72 6f 72 62 61 63 ack.(forge--post-submit-errorbac
2b100 6b 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 k)))..(cl-defmethod.forge--submi
2b120 74 2d 63 72 65 61 74 65 2d 70 6f 73 74 0a 20 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 t-create-post...((repo.forge-git
2b140 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 70 6f 73 74 20 66 6f 72 67 65 2d 64 hub-repository)....(post.forge-d
2b160 69 73 63 75 73 73 69 6f 6e 2d 70 6f 73 74 29 29 0a 20 20 28 66 6f 72 67 65 2d 6d 75 74 61 74 65 iscussion-post))...(forge-mutate
2b180 20 72 65 70 6f 20 61 64 64 44 69 73 63 75 73 73 69 6f 6e 43 6f 6d 6d 65 6e 74 0a 20 20 20 20 28 .repo.addDiscussionComment.....(
2b1a0 28 64 69 73 63 75 73 73 69 6f 6e 49 64 20 28 6f 72 65 66 20 28 66 6f 72 67 65 2d 67 65 74 2d 64 (discussionId.(oref.(forge-get-d
2b1c0 69 73 63 75 73 73 69 6f 6e 20 70 6f 73 74 29 20 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 20 20 iscussion.post).their-id))......
2b1e0 28 72 65 70 6c 79 54 6f 49 64 20 20 20 20 28 6f 72 65 66 20 70 6f 73 74 20 74 68 65 69 72 2d 69 (replyToId....(oref.post.their-i
2b200 64 29 29 0a 20 20 20 20 20 28 62 6f 64 79 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 74 d))......(body.........(string-t
2b220 72 69 6d 20 28 62 75 66 66 65 72 2d 73 74 72 29 29 29 29 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 rim.(buffer-str)))).....:callbac
2b240 6b 20 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 6b 29 k..(forge--post-submit-callback)
2b260 0a 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 .....:errorback.(forge--post-sub
2b280 6d 69 74 2d 65 72 72 6f 72 62 61 63 6b 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 mit-errorback)))..(cl-defmethod.
2b2a0 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 63 72 65 61 74 65 2d 70 6f 73 74 0a 20 20 28 28 72 65 forge--submit-create-post...((re
2b2c0 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 po.forge-github-repository)....(
2b2e0 70 6f 73 74 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 29 0a 20 20 28 66 6f 72 67 65 post.forge-discussion))...(forge
2b300 2d 6d 75 74 61 74 65 20 72 65 70 6f 20 61 64 64 44 69 73 63 75 73 73 69 6f 6e 43 6f 6d 6d 65 6e -mutate.repo.addDiscussionCommen
2b320 74 0a 20 20 20 20 28 28 64 69 73 63 75 73 73 69 6f 6e 49 64 20 28 6f 72 65 66 20 70 6f 73 74 20 t.....((discussionId.(oref.post.
2b340 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 20 20 28 62 6f 64 79 20 20 20 20 20 20 20 20 20 28 73 their-id))......(body.........(s
2b360 74 72 69 6e 67 2d 74 72 69 6d 20 28 62 75 66 66 65 72 2d 73 74 72 29 29 29 29 0a 20 20 20 20 3a tring-trim.(buffer-str)))).....:
2b380 63 61 6c 6c 62 61 63 6b 20 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 callback..(forge--post-submit-ca
2b3a0 6c 6c 62 61 63 6b 29 0a 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 70 llback).....:errorback.(forge--p
2b3c0 6f 73 74 2d 73 75 62 6d 69 74 2d 65 72 72 6f 72 62 61 63 6b 29 29 29 0a 0a 28 63 6c 2d 64 65 66 ost-submit-errorback)))..(cl-def
2b3e0 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 65 64 69 74 2d 70 6f 73 74 0a 20 method.forge--submit-edit-post..
2b400 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 .((repo.forge-github-repository)
2b420 0a 20 20 20 28 70 6f 73 74 20 66 6f 72 67 65 2d 70 6f 73 74 29 29 0a 20 20 28 63 6c 2d 74 79 70 ....(post.forge-post))...(cl-typ
2b440 65 63 61 73 65 20 70 6f 73 74 0a 20 20 20 20 28 28 6f 72 20 66 6f 72 67 65 2d 69 73 73 75 65 2d ecase.post.....((or.forge-issue-
2b460 70 6f 73 74 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 29 0a 20 20 20 20 20 3b 3b post.forge-pullreq-post)......;;
2b480 20 43 61 6e 6e 6f 74 20 75 73 65 20 47 72 61 70 68 51 4c 20 62 65 63 61 75 73 65 20 77 65 20 6d .Cannot.use.GraphQL.because.we.m
2b4a0 61 64 65 20 74 68 65 20 6d 69 73 74 61 6b 65 20 74 6f 20 64 65 72 69 76 65 20 6f 75 72 20 49 44 ade.the.mistake.to.derive.our.ID
2b4c0 0a 20 20 20 20 20 3b 3b 20 66 72 6f 6d 20 74 68 65 20 6e 75 6d 62 65 72 20 69 6e 73 74 65 61 64 ......;;.from.the.number.instead
2b4e0 20 6f 66 20 74 68 65 69 72 20 49 44 2e 20 20 60 75 70 64 61 74 65 50 75 6c 6c 52 65 71 75 65 73 .of.their.ID...`updatePullReques
2b500 74 43 6f 6d 6d 65 6e 74 27 0a 20 20 20 20 20 3b 3b 20 28 6f 72 20 73 6f 6d 65 74 68 69 6e 67 20 tComment'......;;.(or.something.
2b520 65 71 75 69 76 61 6c 65 6e 74 20 75 6e 64 65 72 20 61 6e 20 69 6e 63 6f 6e 73 69 73 74 65 6e 74 equivalent.under.an.inconsistent
2b540 20 6e 61 6d 65 29 20 64 6f 65 73 20 6e 6f 74 0a 20 20 20 20 20 3b 3b 20 65 78 69 73 74 2c 20 73 .name).does.not......;;.exist,.s
2b560 6f 20 66 6f 72 20 74 68 61 74 20 77 65 20 77 6f 75 6c 64 20 68 61 76 65 20 74 6f 20 63 6f 6e 74 o.for.that.we.would.have.to.cont
2b580 69 6e 75 65 20 74 6f 20 75 73 65 20 52 45 53 54 20 61 6e 79 77 61 79 2e 0a 20 20 20 20 20 28 66 inue.to.use.REST.anyway.......(f
2b5a0 6f 72 67 65 2d 72 65 73 74 20 70 6f 73 74 20 22 50 41 54 43 48 22 20 22 2f 72 65 70 6f 73 2f 3a orge-rest.post."PATCH"."/repos/:
2b5c0 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 69 73 73 75 65 73 2f 63 6f 6d 6d 65 6e 74 73 2f 3a 6e 75 6d owner/:repo/issues/comments/:num
2b5e0 62 65 72 22 0a 20 20 20 20 20 20 20 28 28 62 6f 64 79 20 28 73 74 72 69 6e 67 2d 74 72 69 6d 20 ber"........((body.(string-trim.
2b600 28 62 75 66 66 65 72 2d 73 74 72 29 29 29 29 0a 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b (buffer-str))))........:callback
2b620 20 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 6b 29 0a ..(forge--post-submit-callback).
2b640 20 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 .......:errorback.(forge--post-s
2b660 75 62 6d 69 74 2d 65 72 72 6f 72 62 61 63 6b 29 29 29 0a 20 20 20 20 28 74 0a 20 20 20 20 20 28 ubmit-errorback))).....(t......(
2b680 66 6f 72 67 65 2d 2d 71 75 65 72 79 20 72 65 70 6f 0a 20 20 20 20 20 20 20 60 28 6d 75 74 61 74 forge--query.repo........`(mutat
2b6a0 69 6f 6e 20 28 2c 28 63 6c 2d 65 74 79 70 65 63 61 73 65 20 70 6f 73 74 0a 20 20 20 20 20 20 20 ion.(,(cl-etypecase.post........
2b6c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e ...............(forge-discussion
2b6e0 20 20 20 20 20 20 20 27 75 70 64 61 74 65 44 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 20 20 .......'updateDiscussion).......
2b700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 73 73 75 65 20 20 20 20 ................(forge-issue....
2b720 20 20 20 20 20 20 20 20 27 75 70 64 61 74 65 49 73 73 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 ........'updateIssue)...........
2b740 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 20 20 20 20 20 ............(forge-pullreq......
2b760 20 20 20 20 27 75 70 64 61 74 65 50 75 6c 6c 52 65 71 75 65 73 74 29 0a 20 20 20 20 20 20 20 20 ....'updatePullRequest).........
2b780 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d ..............(forge-discussion-
2b7a0 70 6f 73 74 20 20 27 75 70 64 61 74 65 44 69 73 63 75 73 73 69 6f 6e 43 6f 6d 6d 65 6e 74 29 0a post..'updateDiscussionComment).
2b7c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 ......................(forge-dis
2b7e0 63 75 73 73 69 6f 6e 2d 72 65 70 6c 79 20 27 75 70 64 61 74 65 44 69 73 63 75 73 73 69 6f 6e 43 cussion-reply.'updateDiscussionC
2b800 6f 6d 6d 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 omment).......................(f
2b820 6f 72 67 65 2d 69 73 73 75 65 2d 70 6f 73 74 20 20 20 20 20 20 20 27 75 70 64 61 74 65 49 73 73 orge-issue-post.......'updateIss
2b840 75 65 43 6f 6d 6d 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ueComment)......................
2b860 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 20 20 20 20 20 27 75 70 64 61 74 65 .(forge-pullreq-post.....'update
2b880 50 75 6c 6c 52 65 71 75 65 73 74 43 6f 6d 6d 65 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 PullRequestComment))............
2b8a0 20 20 20 20 20 20 20 20 5b 28 69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ........[(input.................
2b8c0 20 20 20 20 20 24 69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....$input.....................
2b8e0 20 2c 28 63 6c 2d 65 74 79 70 65 63 61 73 65 20 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 .,(cl-etypecase.post............
2b900 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 20 .............(forge-discussion..
2b920 20 20 20 20 20 27 55 70 64 61 74 65 44 69 73 63 75 73 73 69 6f 6e 49 6e 70 75 74 21 29 0a 20 20 .....'UpdateDiscussionInput!)...
2b940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 73 73 ......................(forge-iss
2b960 75 65 20 20 20 20 20 20 20 20 20 20 20 20 27 55 70 64 61 74 65 49 73 73 75 65 49 6e 70 75 74 21 ue............'UpdateIssueInput!
2b980 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 ).........................(forge
2b9a0 2d 70 75 6c 6c 72 65 71 20 20 20 20 20 20 20 20 20 20 27 55 70 64 61 74 65 50 75 6c 6c 52 65 71 -pullreq..........'UpdatePullReq
2b9c0 75 65 73 74 49 6e 70 75 74 21 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 uestInput!).....................
2b9e0 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 70 6f 73 74 20 20 27 55 70 64 ....(forge-discussion-post..'Upd
2ba00 61 74 65 44 69 73 63 75 73 73 69 6f 6e 43 6f 6d 6d 65 6e 74 49 6e 70 75 74 21 29 0a 20 20 20 20 ateDiscussionCommentInput!).....
2ba20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 ....................(forge-discu
2ba40 73 73 69 6f 6e 2d 72 65 70 6c 79 20 27 55 70 64 61 74 65 44 69 73 63 75 73 73 69 6f 6e 43 6f 6d ssion-reply.'UpdateDiscussionCom
2ba60 6d 65 6e 74 49 6e 70 75 74 21 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 mentInput!).....................
2ba80 20 20 20 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 6f 73 74 20 20 20 20 20 20 20 27 55 70 64 ....(forge-issue-post.......'Upd
2baa0 61 74 65 49 73 73 75 65 43 6f 6d 6d 65 6e 74 49 6e 70 75 74 21 29 0a 20 20 20 20 20 20 20 20 20 ateIssueCommentInput!)..........
2bac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f ...............(forge-pullreq-po
2bae0 73 74 20 20 20 20 20 27 55 70 64 61 74 65 50 75 6c 6c 52 65 71 75 65 73 74 43 6f 6d 6d 65 6e 74 st.....'UpdatePullRequestComment
2bb00 49 6e 70 75 74 21 29 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6c Input!)))]....................cl
2bb20 69 65 6e 74 4d 75 74 61 74 69 6f 6e 49 64 29 29 0a 20 20 20 20 20 20 20 60 28 28 69 6e 70 75 74 ientMutationId))........`((input
2bb40 20 28 2c 28 63 6c 2d 65 74 79 70 65 63 61 73 65 20 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 .(,(cl-etypecase.post...........
2bb60 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 20 20 20 20 ..........(forge-discussion.....
2bb80 20 20 27 64 69 73 63 75 73 73 69 6f 6e 49 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..'discussionId)................
2bba0 20 20 20 20 20 28 66 6f 72 67 65 2d 69 73 73 75 65 20 20 20 20 20 20 20 20 20 20 20 20 27 69 64 .....(forge-issue............'id
2bbc0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 75 6c ).....................(forge-pul
2bbe0 6c 72 65 71 20 20 20 20 20 20 20 20 20 20 27 70 75 6c 6c 52 65 71 75 65 73 74 49 64 29 0a 20 20 lreq..........'pullRequestId)...
2bc00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 ..................(forge-discuss
2bc20 69 6f 6e 2d 70 6f 73 74 20 20 27 63 6f 6d 6d 65 6e 74 49 64 29 0a 20 20 20 20 20 20 20 20 20 20 ion-post..'commentId)...........
2bc40 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 72 65 70 6c ..........(forge-discussion-repl
2bc60 79 20 27 63 6f 6d 6d 65 6e 74 49 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 y.'commentId)...................
2bc80 20 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 6f 73 74 20 20 20 20 20 20 20 27 69 64 29 0a 20 ..(forge-issue-post.......'id)..
2bca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 ...................(forge-pullre
2bcc0 71 2d 70 6f 73 74 20 20 20 20 20 27 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 q-post.....'id))................
2bce0 20 20 2e 20 2c 28 66 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 20 70 6f 73 74 29 29 0a 20 20 20 ....,(forge--their-id.post))....
2bd00 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 69 66 20 28 63 6c 2d 74 79 70 65 70 20 70 6f 73 .............,@(if.(cl-typep.pos
2bd20 74 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.'forge-topic).................
2bd40 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 74 69 74 6c 65 20 2e 20 2c 62 ......(pcase-let.((`(,title...,b
2bd60 6f 64 79 29 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 62 75 66 66 65 72 2d 74 65 78 74 29 29 29 ody).(forge--post-buffer-text)))
2bd80 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 74 69 74 6c .........................`((titl
2bda0 65 20 2e 20 2c 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e...,title).....................
2bdc0 20 20 20 20 20 20 28 62 6f 64 79 20 20 2e 20 2c 62 6f 64 79 29 29 29 0a 20 20 20 20 20 20 20 20 ......(body....,body))).........
2bde0 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 62 6f 64 79 20 2e 20 2c 28 73 74 72 69 6e 67 2d 74 ............`((body...,(string-t
2be00 72 69 6d 20 28 62 75 66 66 65 72 2d 73 74 72 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 3a 63 rim.(buffer-str)))))))........:c
2be20 61 6c 6c 62 61 63 6b 20 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c allback..(forge--post-submit-cal
2be40 6c 62 61 63 6b 29 0a 20 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 65 2d lback)........:errorback.(forge-
2be60 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 65 72 72 6f 72 62 61 63 6b 29 29 29 29 29 0a 0a 28 63 6c -post-submit-errorback)))))..(cl
2be80 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 61 70 70 72 6f 76 65 -defmethod.forge--submit-approve
2bea0 2d 70 75 6c 6c 72 65 71 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d -pullreq...((_repo.forge-github-
2bec0 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 70 75 6c 6c repository)....(topic.forge-pull
2bee0 72 65 71 29 29 0a 20 20 28 6c 65 74 20 28 28 62 6f 64 79 20 28 73 74 72 69 6e 67 2d 74 72 69 6d req))...(let.((body.(string-trim
2bf00 20 28 62 75 66 66 65 72 2d 73 74 72 29 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 72 65 73 74 .(buffer-str)))).....(forge-rest
2bf20 20 74 6f 70 69 63 20 22 50 4f 53 54 22 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 .topic."POST"."/repos/:owner/:re
2bf40 70 6f 2f 70 75 6c 6c 73 2f 3a 6e 75 6d 62 65 72 2f 72 65 76 69 65 77 73 22 0a 20 20 20 20 20 20 po/pulls/:number/reviews".......
2bf60 28 28 65 76 65 6e 74 20 22 41 50 50 52 4f 56 45 22 29 0a 20 20 20 20 20 20 20 28 61 6e 64 20 28 ((event."APPROVE")........(and.(
2bf80 6e 6f 74 20 28 65 71 75 61 6c 20 62 6f 64 79 20 22 22 29 29 20 28 62 6f 64 79 20 62 6f 64 79 29 not.(equal.body."")).(body.body)
2bfa0 29 29 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 )).......:callback..(forge--post
2bfc0 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 6b 29 0a 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 -submit-callback).......:errorba
2bfe0 63 6b 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 65 72 72 6f 72 62 61 63 6b ck.(forge--post-submit-errorback
2c000 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 ))))..(cl-defmethod.forge--submi
2c020 74 2d 72 65 71 75 65 73 74 2d 63 68 61 6e 67 65 73 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 t-request-changes...((_repo.forg
2c040 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 e-github-repository)....(topic.f
2c060 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 0a 20 20 28 6c 65 74 20 28 28 62 6f 64 79 20 28 73 74 orge-pullreq))...(let.((body.(st
2c080 72 69 6e 67 2d 74 72 69 6d 20 28 62 75 66 66 65 72 2d 73 74 72 29 29 29 29 0a 20 20 20 20 28 66 ring-trim.(buffer-str)))).....(f
2c0a0 6f 72 67 65 2d 72 65 73 74 20 74 6f 70 69 63 20 22 50 4f 53 54 22 20 22 2f 72 65 70 6f 73 2f 3a orge-rest.topic."POST"."/repos/:
2c0c0 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 70 75 6c 6c 73 2f 3a 6e 75 6d 62 65 72 2f 72 65 76 69 65 77 owner/:repo/pulls/:number/review
2c0e0 73 22 0a 20 20 20 20 20 20 28 28 65 76 65 6e 74 20 22 52 45 51 55 45 53 54 5f 43 48 41 4e 47 45 s".......((event."REQUEST_CHANGE
2c100 53 22 29 0a 20 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 62 6f 64 79 S")........(and.(not.(equal.body
2c120 20 22 22 29 29 20 28 62 6f 64 79 20 62 6f 64 79 29 29 29 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 ."")).(body.body))).......:callb
2c140 61 63 6b 20 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 ack..(forge--post-submit-callbac
2c160 6b 29 0a 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 k).......:errorback.(forge--post
2c180 2d 73 75 62 6d 69 74 2d 65 72 72 6f 72 62 61 63 6b 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 -submit-errorback))))..(cl-defme
2c1a0 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 74 69 74 6c 65 0a 20 20 28 28 thod.forge--set-topic-title...((
2c1c0 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 _repo.forge-github-repository)..
2c1e0 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 74 69 ..(topic.forge-discussion)....ti
2c200 74 6c 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 6d 75 74 61 74 65 2d 66 69 65 6c 64 20 74 6f 70 69 tle)...(forge--mutate-field.topi
2c220 63 20 75 70 64 61 74 65 44 69 73 63 75 73 73 69 6f 6e 0a 20 20 20 20 28 28 64 69 73 63 75 73 73 c.updateDiscussion.....((discuss
2c240 69 6f 6e 49 64 20 28 6f 72 65 66 20 74 6f 70 69 63 20 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 ionId.(oref.topic.their-id))....
2c260 20 20 28 74 69 74 6c 65 20 20 20 20 20 20 20 20 74 69 74 6c 65 29 29 29 29 0a 0a 28 63 6c 2d 64 ..(title........title))))..(cl-d
2c280 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 74 69 74 6c 65 0a efmethod.forge--set-topic-title.
2c2a0 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 ..((_repo.forge-github-repositor
2c2c0 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 69 73 73 75 65 29 0a 20 20 20 74 69 74 y)....(topic.forge-issue)....tit
2c2e0 6c 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 6d 75 74 61 74 65 2d 66 69 65 6c 64 20 74 6f 70 69 63 le)...(forge--mutate-field.topic
2c300 20 75 70 64 61 74 65 49 73 73 75 65 0a 20 20 20 20 28 28 69 64 20 20 20 20 28 6f 72 65 66 20 74 .updateIssue.....((id....(oref.t
2c320 6f 70 69 63 20 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 20 20 28 74 69 74 6c 65 20 74 69 74 6c opic.their-id))......(title.titl
2c340 65 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d e))))..(cl-defmethod.forge--set-
2c360 74 6f 70 69 63 2d 74 69 74 6c 65 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 topic-title...((_repo.forge-gith
2c380 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 70 ub-repository)....(topic.forge-p
2c3a0 75 6c 6c 72 65 71 29 0a 20 20 20 74 69 74 6c 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 6d 75 74 61 ullreq)....title)...(forge--muta
2c3c0 74 65 2d 66 69 65 6c 64 20 74 6f 70 69 63 20 75 70 64 61 74 65 50 75 6c 6c 52 65 71 75 65 73 74 te-field.topic.updatePullRequest
2c3e0 0a 20 20 20 20 28 28 70 75 6c 6c 52 65 71 75 65 73 74 49 64 20 28 6f 72 65 66 20 74 6f 70 69 63 .....((pullRequestId.(oref.topic
2c400 20 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 20 20 28 74 69 74 6c 65 20 20 20 20 20 20 20 20 20 .their-id))......(title.........
2c420 74 69 74 6c 65 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d title))))..(cl-defmethod.forge--
2c440 73 65 74 2d 74 6f 70 69 63 2d 73 74 61 74 65 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d set-topic-state...((_repo.forge-
2c460 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 github-repository)....(topic.for
2c480 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 73 74 61 74 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 72 65 ge-topic)....state)...(forge--re
2c4a0 73 74 20 74 6f 70 69 63 20 22 50 41 54 43 48 22 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f st.topic."PATCH"."/repos/:owner/
2c4c0 3a 72 65 70 6f 2f 69 73 73 75 65 73 2f 3a 6e 75 6d 62 65 72 22 0a 20 20 20 20 28 70 63 61 73 65 :repo/issues/:number".....(pcase
2c4e0 2d 65 78 68 61 75 73 74 69 76 65 20 73 74 61 74 65 0a 20 20 20 20 20 20 3b 3b 20 4d 65 72 67 69 -exhaustive.state.......;;.Mergi
2c500 6e 67 20 69 73 6e 27 74 20 64 6f 6e 65 20 74 68 72 6f 75 67 68 20 68 65 72 65 2e 0a 20 20 20 20 ng.isn't.done.through.here......
2c520 20 20 3b 3b 20 4d 61 72 6b 69 6e 67 20 61 73 20 61 20 64 75 70 6c 69 63 61 74 65 20 69 73 6e 27 ..;;.Marking.as.a.duplicate.isn'
2c540 74 20 73 75 70 70 6f 72 74 65 64 20 76 69 61 20 41 50 49 2e 0a 20 20 20 20 20 20 28 27 63 6f 6d t.supported.via.API........('com
2c560 70 6c 65 74 65 64 20 27 28 28 73 74 61 74 65 20 2e 20 22 63 6c 6f 73 65 64 22 29 20 28 73 74 61 pleted.'((state..."closed").(sta
2c580 74 65 5f 72 65 61 73 6f 6e 20 2e 20 22 63 6f 6d 70 6c 65 74 65 64 22 29 29 29 0a 20 20 20 20 20 te_reason..."completed")))......
2c5a0 20 28 27 75 6e 70 6c 61 6e 6e 65 64 20 27 28 28 73 74 61 74 65 20 2e 20 22 63 6c 6f 73 65 64 22 .('unplanned.'((state..."closed"
2c5c0 29 20 28 73 74 61 74 65 5f 72 65 61 73 6f 6e 20 2e 20 22 6e 6f 74 5f 70 6c 61 6e 6e 65 64 22 29 ).(state_reason..."not_planned")
2c5e0 29 29 0a 20 20 20 20 20 20 28 27 72 65 6a 65 63 74 65 64 20 20 27 28 28 73 74 61 74 65 20 2e 20 )).......('rejected..'((state...
2c600 22 63 6c 6f 73 65 64 22 29 29 29 0a 20 20 20 20 20 20 28 27 6f 70 65 6e 20 20 20 20 20 20 27 28 "closed"))).......('open......'(
2c620 28 73 74 61 74 65 20 2e 20 22 6f 70 65 6e 22 29 29 29 29 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 (state..."open")))).....:callbac
2c640 6b 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 66 69 65 6c 64 2d 63 61 6c 6c 62 61 63 6b 20 74 6f 70 k.(forge--set-field-callback.top
2c660 69 63 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d ic)))..(cl-defmethod.forge--set-
2c680 74 6f 70 69 63 2d 73 74 61 74 65 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 topic-state...((_repo.forge-gith
2c6a0 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 64 ub-repository)....(topic.forge-d
2c6c0 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 73 74 61 74 65 29 0a 20 20 28 63 6f 6e 64 20 28 28 65 iscussion)....state)...(cond.((e
2c6e0 71 20 73 74 61 74 65 20 27 6f 70 65 6e 29 0a 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d q.state.'open)..........(forge--
2c700 6d 75 74 61 74 65 2d 66 69 65 6c 64 20 74 6f 70 69 63 20 72 65 6f 70 65 6e 44 69 73 63 75 73 73 mutate-field.topic.reopenDiscuss
2c720 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 28 64 69 73 63 75 73 73 69 6f 6e 49 64 20 28 6f ion............((discussionId.(o
2c740 72 65 66 20 74 6f 70 69 63 20 74 68 65 69 72 2d 69 64 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 ref.topic.their-id))))).........
2c760 28 28 66 6f 72 67 65 2d 2d 6d 75 74 61 74 65 2d 66 69 65 6c 64 20 74 6f 70 69 63 20 63 6c 6f 73 ((forge--mutate-field.topic.clos
2c780 65 44 69 73 63 75 73 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 28 64 69 73 63 75 73 73 eDiscussion............((discuss
2c7a0 69 6f 6e 49 64 20 28 6f 72 65 66 20 74 6f 70 69 63 20 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 ionId.(oref.topic.their-id))....
2c7c0 20 20 20 20 20 20 20 20 20 28 72 65 61 73 6f 6e 20 28 70 63 61 73 65 2d 65 78 68 61 75 73 74 69 .........(reason.(pcase-exhausti
2c7e0 76 65 20 73 74 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ve.state.......................(
2c800 27 63 6f 6d 70 6c 65 74 65 64 20 22 52 45 53 4f 4c 56 45 44 22 29 0a 20 20 20 20 20 20 20 20 20 'completed."RESOLVED")..........
2c820 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 64 75 70 6c 69 63 61 74 65 20 22 44 55 50 4c 49 43 .............('duplicate."DUPLIC
2c840 41 54 45 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 6f 75 ATE").......................('ou
2c860 74 64 61 74 65 64 20 20 22 4f 55 54 44 41 54 45 44 22 29 29 29 29 29 29 29 29 0a 0a 28 63 6c 2d tdated.."OUTDATED"))))))))..(cl-
2c880 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 64 72 61 66 74 defmethod.forge--set-topic-draft
2c8a0 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f ...((_repo.forge-github-reposito
2c8c0 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 76 61 ry)....(topic.forge-topic)....va
2c8e0 6c 75 65 29 0a 20 20 28 63 6f 6e 64 20 28 76 61 6c 75 65 0a 20 20 20 20 20 20 20 20 20 28 66 6f lue)...(cond.(value..........(fo
2c900 72 67 65 2d 2d 6d 75 74 61 74 65 2d 66 69 65 6c 64 20 74 6f 70 69 63 20 63 6f 6e 76 65 72 74 50 rge--mutate-field.topic.convertP
2c920 75 6c 6c 52 65 71 75 65 73 74 54 6f 44 72 61 66 74 0a 20 20 20 20 20 20 20 20 20 20 20 28 28 70 ullRequestToDraft............((p
2c940 75 6c 6c 52 65 71 75 65 73 74 49 64 20 28 6f 72 65 66 20 74 6f 70 69 63 20 74 68 65 69 72 2d 69 ullRequestId.(oref.topic.their-i
2c960 64 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 2d 6d 75 74 61 74 65 2d 66 d))))).........((forge--mutate-f
2c980 69 65 6c 64 20 74 6f 70 69 63 20 6d 61 72 6b 50 75 6c 6c 52 65 71 75 65 73 74 52 65 61 64 79 46 ield.topic.markPullRequestReadyF
2c9a0 6f 72 52 65 76 69 65 77 0a 20 20 20 20 20 20 20 20 20 20 20 28 28 70 75 6c 6c 52 65 71 75 65 73 orReview............((pullReques
2c9c0 74 49 64 20 28 6f 72 65 66 20 74 6f 70 69 63 20 74 68 65 69 72 2d 69 64 29 29 29 29 29 29 29 0a tId.(oref.topic.their-id))))))).
2c9e0 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d .(cl-defmethod.forge--set-topic-
2ca00 63 61 74 65 67 6f 72 79 0a 20 20 28 28 72 65 70 6f 20 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d category...((repo..forge-github-
2ca20 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 64 69 73 63 repository)....(topic.forge-disc
2ca40 75 73 73 69 6f 6e 29 0a 20 20 20 63 61 74 65 67 6f 72 79 29 0a 20 20 28 66 6f 72 67 65 2d 2d 6d ussion)....category)...(forge--m
2ca60 75 74 61 74 65 2d 66 69 65 6c 64 20 74 6f 70 69 63 20 75 70 64 61 74 65 44 69 73 63 75 73 73 69 utate-field.topic.updateDiscussi
2ca80 6f 6e 0a 20 20 20 20 28 28 64 69 73 63 75 73 73 69 6f 6e 49 64 20 28 6f 72 65 66 20 74 6f 70 69 on.....((discussionId.(oref.topi
2caa0 63 20 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 20 20 28 63 61 74 65 67 6f 72 79 49 64 20 28 66 c.their-id))......(categoryId.(f
2cac0 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 20 63 61 74 65 67 6f 72 79 20 27 63 61 74 65 67 6f 72 orge--their-id.category.'categor
2cae0 79 20 72 65 70 6f 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 y.repo)))))..(cl-defmethod.forge
2cb00 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 61 6e 73 77 65 72 0a 20 20 28 28 72 65 70 6f 20 20 66 6f 72 --set-topic-answer...((repo..for
2cb20 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 ge-github-repository)....(topic.
2cb40 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 61 6e 73 77 65 72 29 0a 20 20 28 forge-discussion)....answer)...(
2cb60 6c 65 74 2a 20 28 28 6f 6c 64 20 28 6f 72 65 66 20 74 6f 70 69 63 20 61 6e 73 77 65 72 29 29 0a let*.((old.(oref.topic.answer)).
2cb80 20 20 20 20 20 20 20 20 20 28 6f 6c 64 20 28 61 6e 64 20 6f 6c 64 20 28 66 6f 72 67 65 2d 2d 74 .........(old.(and.old.(forge--t
2cba0 68 65 69 72 2d 69 64 20 6f 6c 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 65 77 20 28 61 6e heir-id.old)))..........(new.(an
2cbc0 64 20 61 6e 73 77 65 72 20 28 6f 72 65 66 20 61 6e 73 77 65 72 20 74 68 65 69 72 2d 69 64 29 29 d.answer.(oref.answer.their-id))
2cbe0 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 71 75 65 72 79 20 72 65 70 6f 0a 20 20 20 20 20 20 )).....(forge--query.repo.......
2cc00 60 28 6d 75 74 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 6f 6c 64 20 27 28 `(mutation.........,@(and.old.'(
2cc20 28 75 6e 6d 61 72 6b 44 69 73 63 75 73 73 69 6f 6e 43 6f 6d 6d 65 6e 74 41 73 41 6e 73 77 65 72 (unmarkDiscussionCommentAsAnswer
2cc40 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5b 28 69 6e 70 75 74 20 24 .......................[(input.$
2cc60 6f 6c 64 20 55 6e 6d 61 72 6b 44 69 73 63 75 73 73 69 6f 6e 43 6f 6d 6d 65 6e 74 41 73 41 6e 73 old.UnmarkDiscussionCommentAsAns
2cc80 77 65 72 49 6e 70 75 74 21 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 werInput!)].....................
2cca0 20 20 63 6c 69 65 6e 74 4d 75 74 61 74 69 6f 6e 49 64 29 29 29 0a 20 20 20 20 20 20 20 20 2c 40 ..clientMutationId))).........,@
2ccc0 28 61 6e 64 20 6e 65 77 20 27 28 28 6d 61 72 6b 44 69 73 63 75 73 73 69 6f 6e 43 6f 6d 6d 65 6e (and.new.'((markDiscussionCommen
2cce0 74 41 73 41 6e 73 77 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tAsAnswer.......................
2cd00 5b 28 69 6e 70 75 74 20 24 6e 65 77 20 4d 61 72 6b 44 69 73 63 75 73 73 69 6f 6e 43 6f 6d 6d 65 [(input.$new.MarkDiscussionComme
2cd20 6e 74 41 73 41 6e 73 77 65 72 49 6e 70 75 74 21 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ntAsAnswerInput!)]..............
2cd40 20 20 20 20 20 20 20 20 20 63 6c 69 65 6e 74 4d 75 74 61 74 69 6f 6e 49 64 29 29 29 29 0a 20 20 .........clientMutationId))))...
2cd60 20 20 20 20 60 28 2c 40 28 61 6e 64 20 6f 6c 64 20 60 28 28 6f 6c 64 20 28 69 64 20 2e 20 2c 6f ....`(,@(and.old.`((old.(id...,o
2cd80 6c 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 6e 65 77 20 60 28 28 6e 65 77 ld)))).........,@(and.new.`((new
2cda0 20 28 69 64 20 2e 20 2c 6e 65 77 29 29 29 29 29 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b .(id...,new))))).......:callback
2cdc0 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 66 69 65 6c 64 2d 63 61 6c 6c 62 61 63 6b 20 74 6f 70 69 .(forge--set-field-callback.topi
2cde0 63 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d c))))..(cl-defmethod.forge--set-
2ce00 74 6f 70 69 63 2d 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 28 28 72 65 70 6f 20 20 66 6f 72 67 65 2d topic-milestone...((repo..forge-
2ce20 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 github-repository)....(topic.for
2ce40 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 6d 69 6c 65 73 74 6f 6e 65 29 0a 20 20 28 66 6f 72 67 65 ge-topic)....milestone)...(forge
2ce60 2d 72 65 73 74 20 74 6f 70 69 63 20 22 50 4f 53 54 22 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 -rest.topic."POST"."/repos/:owne
2ce80 72 2f 3a 72 65 70 6f 2f 69 73 73 75 65 73 2f 3a 6e 75 6d 62 65 72 22 0a 20 20 20 20 28 28 6d 69 r/:repo/issues/:number".....((mi
2cea0 6c 65 73 74 6f 6e 65 20 28 69 66 20 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 20 20 20 20 20 20 20 20 lestone.(if.milestone...........
2cec0 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 31 20 5b 3a 73 65 6c 65 63 74 20 5b ..........(forge-sql1.[:select.[
2cee0 6e 75 6d 62 65 72 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 number].........................
2cf00 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 20 20 20 20 20 .........:from.milestone........
2cf20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 ..........................:where
2cf40 20 28 61 6e 64 20 28 3d 20 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 .(and.(=.repository.$s1)........
2cf60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
2cf80 20 20 20 20 20 20 28 3d 20 74 69 74 6c 65 20 24 73 32 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 ......(=.title.$s2))]...........
2cfa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f ......................(oref.repo
2cfc0 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .id)............................
2cfe0 20 20 20 20 20 6d 69 6c 65 73 74 6f 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....milestone).................
2d000 20 20 3a 6e 75 6c 6c 29 29 29 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 66 6f 72 67 65 2d ..:null))).....:callback.(forge-
2d020 2d 73 65 74 2d 66 69 65 6c 64 2d 63 61 6c 6c 62 61 63 6b 20 74 6f 70 69 63 29 29 29 0a 0a 28 63 -set-field-callback.topic)))..(c
2d040 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 6c 61 62 l-defmethod.forge--set-topic-lab
2d060 65 6c 73 0a 20 20 28 28 72 65 70 6f 20 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 els...((repo..forge-github-repos
2d080 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 itory)....(topic.forge-topic)...
2d0a0 20 6c 61 62 65 6c 73 29 0a 20 20 28 6c 65 74 2a 20 28 28 74 6f 70 69 63 2d 69 64 20 28 6f 72 65 .labels)...(let*.((topic-id.(ore
2d0c0 66 20 74 6f 70 69 63 20 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 68 65 f.topic.their-id))..........(the
2d0e0 69 72 2d 69 64 20 3b 20 49 20 72 65 61 6c 6c 79 20 6d 65 73 73 65 64 20 75 70 20 49 44 73 21 20 ir-id.;.I.really.messed.up.IDs!.
2d100 3a 28 0a 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 69 :(...........(pcase-lambda.(`(,i
2d120 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 70 61 72 74 73 20 28 73 d)).............(let*.((parts.(s
2d140 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 62 61 73 65 36 34 2d 64 65 63 6f 64 65 2d 73 74 72 69 6e plit-string.(base64-decode-strin
2d160 67 20 69 64 29 20 22 3a 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 g.id).":"))....................(
2d180 6d 61 79 62 65 2d 69 64 20 28 63 61 72 20 28 6c 61 73 74 20 70 61 72 74 73 29 29 29 29 0a 20 20 maybe-id.(car.(last.parts))))...
2d1a0 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 ............(if.(string-prefix-p
2d1c0 20 22 4c 61 62 65 6c 22 20 6d 61 79 62 65 2d 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ."Label".maybe-id)..............
2d1e0 20 20 20 20 20 28 62 61 73 65 36 34 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 73 74 72 69 .....(base64-encode-string.(stri
2d200 6e 67 2d 6a 6f 69 6e 20 28 6c 61 73 74 20 70 61 72 74 73 20 32 29 20 22 3a 22 29 29 0a 20 20 20 ng-join.(last.parts.2).":"))....
2d220 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 61 79 62 65 2d 69 64 29 29 29 29 0a 20 20 20 20 20 20 .............maybe-id)))).......
2d240 20 20 20 28 6f 6c 64 20 28 6d 61 70 63 61 72 20 74 68 65 69 72 2d 69 64 20 28 6f 72 65 66 20 74 ...(old.(mapcar.their-id.(oref.t
2d260 6f 70 69 63 20 6c 61 62 65 6c 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 65 77 20 28 6d 61 opic.labels)))..........(new.(ma
2d280 70 63 61 72 20 74 68 65 69 72 2d 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pcar.their-id...................
2d2a0 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 5b 69 64 5d 20 3a 66 72 ....(forge-sql.[:select.[id].:fr
2d2c0 6f 6d 20 6c 61 62 65 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 om.label........................
2d2e0 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 72 65 70 6f 73 69 ...........:where.(and.(=.reposi
2d300 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tory.$s1).......................
2d320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 20 6e 61 6d 65 ........................(in.name
2d340 20 24 76 32 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .$v2))].........................
2d360 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 0a 20 20 20 20 20 20 20 20 .........(oref.repo.id).........
2d380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 63 6f 6e 63 61 .........................(vconca
2d3a0 74 20 6c 61 62 65 6c 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 64 64 20 28 63 6c 2d 73 t.labels))))..........(add.(cl-s
2d3c0 65 74 2d 64 69 66 66 65 72 65 6e 63 65 20 6e 65 77 20 6f 6c 64 20 3a 74 65 73 74 20 23 27 65 71 et-difference.new.old.:test.#'eq
2d3e0 75 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 6c 20 28 63 6c 2d 73 65 74 2d 64 69 66 66 ual))..........(del.(cl-set-diff
2d400 65 72 65 6e 63 65 20 6f 6c 64 20 6e 65 77 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 29 29 29 0a erence.old.new.:test.#'equal))).
2d420 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 61 64 64 20 64 65 6c 29 0a 20 20 20 20 20 20 28 66 6f ....(when.(or.add.del).......(fo
2d440 72 67 65 2d 2d 71 75 65 72 79 20 72 65 70 6f 0a 20 20 20 20 20 20 20 20 60 28 6d 75 74 61 74 69 rge--query.repo.........`(mutati
2d460 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 61 64 64 20 27 28 28 61 64 64 4c 61 on...........,@(and.add.'((addLa
2d480 62 65 6c 73 54 6f 4c 61 62 65 6c 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 belsToLabelable.................
2d4a0 20 20 20 20 20 20 20 20 5b 28 69 6e 70 75 74 20 24 61 64 64 20 41 64 64 4c 61 62 65 6c 73 54 6f ........[(input.$add.AddLabelsTo
2d4c0 4c 61 62 65 6c 61 62 6c 65 49 6e 70 75 74 21 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LabelableInput!)]...............
2d4e0 20 20 20 20 20 20 20 20 20 20 63 6c 69 65 6e 74 4d 75 74 61 74 69 6f 6e 49 64 29 29 29 0a 20 20 ..........clientMutationId)))...
2d500 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 64 65 6c 20 27 28 28 72 65 6d 6f 76 65 4c 61 62 65 ........,@(and.del.'((removeLabe
2d520 6c 73 46 72 6f 6d 4c 61 62 65 6c 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lsFromLabelable.................
2d540 20 20 20 20 20 20 20 20 5b 28 69 6e 70 75 74 20 24 64 65 6c 20 52 65 6d 6f 76 65 4c 61 62 65 6c ........[(input.$del.RemoveLabel
2d560 73 46 72 6f 6d 4c 61 62 65 6c 61 62 6c 65 49 6e 70 75 74 21 29 5d 0a 20 20 20 20 20 20 20 20 20 sFromLabelableInput!)]..........
2d580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6c 69 65 6e 74 4d 75 74 61 74 69 6f 6e 49 64 29 ...............clientMutationId)
2d5a0 29 29 29 0a 20 20 20 20 20 20 20 20 60 28 2c 40 28 61 6e 64 20 61 64 64 20 60 28 28 61 64 64 20 ))).........`(,@(and.add.`((add.
2d5c0 28 6c 61 62 65 6c 61 62 6c 65 49 64 20 2e 20 2c 74 6f 70 69 63 2d 69 64 29 0a 20 20 20 20 20 20 (labelableId...,topic-id).......
2d5e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 62 65 6c 49 64 73 20 ......................(labelIds.
2d600 2e 20 2c 28 76 63 6f 6e 63 61 74 20 61 64 64 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 2c ..,(vconcat.add)))))...........,
2d620 40 28 61 6e 64 20 64 65 6c 20 60 28 28 64 65 6c 20 28 6c 61 62 65 6c 61 62 6c 65 49 64 20 2e 20 @(and.del.`((del.(labelableId...
2d640 2c 74 6f 70 69 63 2d 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,topic-id)......................
2d660 20 20 20 20 20 20 20 28 6c 61 62 65 6c 49 64 73 20 2e 20 2c 28 76 63 6f 6e 63 61 74 20 64 65 6c .......(labelIds...,(vconcat.del
2d680 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 66 6f 72 67 65 2d )))))).........:callback.(forge-
2d6a0 2d 73 65 74 2d 66 69 65 6c 64 2d 63 61 6c 6c 62 61 63 6b 20 74 6f 70 69 63 29 29 29 29 29 0a 0a -set-field-callback.topic)))))..
2d6c0 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 61 (cl-defmethod.forge--set-topic-a
2d6e0 73 73 69 67 6e 65 65 73 0a 20 20 28 28 72 65 70 6f 20 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d ssignees...((repo..forge-github-
2d700 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 74 6f 70 69 repository)....(topic.forge-topi
2d720 63 29 0a 20 20 20 61 73 73 69 67 6e 65 65 73 29 0a 20 20 28 6c 65 74 2a 20 28 28 74 6f 70 69 63 c)....assignees)...(let*.((topic
2d740 2d 69 64 20 28 6f 72 65 66 20 74 6f 70 69 63 20 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 20 20 -id.(oref.topic.their-id))......
2d760 20 20 20 20 28 6f 6c 64 20 28 6d 61 70 63 61 72 20 28 23 23 6e 74 68 20 33 20 25 29 20 28 6f 72 ....(old.(mapcar.(##nth.3.%).(or
2d780 65 66 20 74 6f 70 69 63 20 61 73 73 69 67 6e 65 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 ef.topic.assignees)))..........(
2d7a0 6e 65 77 20 28 66 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 20 61 73 73 69 67 6e 65 65 73 20 27 new.(forge--their-id.assignees.'
2d7c0 61 73 73 69 67 6e 65 65 73 20 72 65 70 6f 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 64 64 20 28 assignees.repo))..........(add.(
2d7e0 63 6c 2d 73 65 74 2d 64 69 66 66 65 72 65 6e 63 65 20 6e 65 77 20 6f 6c 64 20 3a 74 65 73 74 20 cl-set-difference.new.old.:test.
2d800 23 27 65 71 75 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 6c 20 28 63 6c 2d 73 65 74 2d #'equal))..........(del.(cl-set-
2d820 64 69 66 66 65 72 65 6e 63 65 20 6f 6c 64 20 6e 65 77 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c difference.old.new.:test.#'equal
2d840 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 61 64 64 20 64 65 6c 29 0a 20 20 20 20 20 ))).....(when.(or.add.del)......
2d860 20 28 66 6f 72 67 65 2d 2d 71 75 65 72 79 20 72 65 70 6f 0a 20 20 20 20 20 20 20 20 60 28 6d 75 .(forge--query.repo.........`(mu
2d880 74 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 61 64 64 20 27 28 28 61 tation...........,@(and.add.'((a
2d8a0 64 64 41 73 73 69 67 6e 65 65 73 54 6f 41 73 73 69 67 6e 61 62 6c 65 0a 20 20 20 20 20 20 20 20 ddAssigneesToAssignable.........
2d8c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5b 28 69 6e 70 75 74 20 24 61 64 64 20 41 64 64 ................[(input.$add.Add
2d8e0 41 73 73 69 67 6e 65 65 73 54 6f 41 73 73 69 67 6e 61 62 6c 65 49 6e 70 75 74 21 29 5d 0a 20 20 AssigneesToAssignableInput!)]...
2d900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6c 69 65 6e 74 4d 75 74 61 ......................clientMuta
2d920 74 69 6f 6e 49 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 64 65 6c 20 27 tionId)))...........,@(and.del.'
2d940 28 28 72 65 6d 6f 76 65 41 73 73 69 67 6e 65 65 73 46 72 6f 6d 41 73 73 69 67 6e 61 62 6c 65 0a ((removeAssigneesFromAssignable.
2d960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5b 28 69 6e 70 75 74 20 ........................[(input.
2d980 24 64 65 6c 20 52 65 6d 6f 76 65 41 73 73 69 67 6e 65 65 73 46 72 6f 6d 41 73 73 69 67 6e 61 62 $del.RemoveAssigneesFromAssignab
2d9a0 6c 65 49 6e 70 75 74 21 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 leInput!)]......................
2d9c0 20 20 20 63 6c 69 65 6e 74 4d 75 74 61 74 69 6f 6e 49 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 ...clientMutationId)))).........
2d9e0 60 28 2c 40 28 61 6e 64 20 61 64 64 20 60 28 28 61 64 64 20 28 61 73 73 69 67 6e 61 62 6c 65 49 `(,@(and.add.`((add.(assignableI
2da00 64 20 2e 20 2c 74 6f 70 69 63 2d 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d...,topic-id)..................
2da20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 73 69 67 6e 65 65 49 64 73 20 2e 20 2c 28 76 63 6f 6e ...........(assigneeIds...,(vcon
2da40 63 61 74 20 61 64 64 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 64 65 cat.add)))))...........,@(and.de
2da60 6c 20 60 28 28 64 65 6c 20 28 61 73 73 69 67 6e 61 62 6c 65 49 64 20 2e 20 2c 74 6f 70 69 63 2d l.`((del.(assignableId...,topic-
2da80 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 id).............................
2daa0 28 61 73 73 69 67 6e 65 65 49 64 73 20 2e 20 2c 28 76 63 6f 6e 63 61 74 20 64 65 6c 29 29 29 29 (assigneeIds...,(vconcat.del))))
2dac0 29 29 0a 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 73 65 74 )).........:callback.(forge--set
2dae0 2d 66 69 65 6c 64 2d 63 61 6c 6c 62 61 63 6b 20 74 6f 70 69 63 29 29 29 29 29 0a 0a 28 63 6c 2d -field-callback.topic)))))..(cl-
2db00 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 72 65 76 69 65 defmethod.forge--set-topic-revie
2db20 77 2d 72 65 71 75 65 73 74 73 0a 20 20 28 28 72 65 70 6f 20 20 66 6f 72 67 65 2d 67 69 74 68 75 w-requests...((repo..forge-githu
2db40 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 74 6f b-repository)....(topic.forge-to
2db60 70 69 63 29 0a 20 20 20 72 65 76 69 65 77 65 72 73 29 0a 20 20 28 6c 65 74 20 28 28 75 73 65 72 pic)....reviewers)...(let.((user
2db80 73 20 28 66 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 20 28 73 65 71 2d 72 65 6d 6f 76 65 20 28 s.(forge--their-id.(seq-remove.(
2dba0 23 23 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 2f 22 20 25 29 20 72 65 76 69 65 77 65 72 73 29 ##string-match."/".%).reviewers)
2dbc0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
2dbe0 20 27 61 73 73 69 67 6e 65 65 73 20 72 65 70 6f 29 29 0a 20 20 20 20 20 20 20 20 28 74 65 61 6d .'assignees.repo)).........(team
2dc00 73 20 6e 69 6c 29 29 20 3b 54 4f 44 4f 20 49 6e 76 65 73 74 69 67 61 74 65 20 23 37 34 32 2c 20 s.nil)).;TODO.Investigate.#742,.
2dc20 74 72 61 63 6b 20 69 64 2c 20 74 68 65 6e 20 75 73 65 20 69 74 20 68 65 72 65 2e 0a 20 20 20 20 track.id,.then.use.it.here......
2dc40 28 66 6f 72 67 65 2d 2d 6d 75 74 61 74 65 2d 66 69 65 6c 64 20 74 6f 70 69 63 20 72 65 71 75 65 (forge--mutate-field.topic.reque
2dc60 73 74 52 65 76 69 65 77 73 0a 20 20 20 20 20 20 28 28 70 75 6c 6c 52 65 71 75 65 73 74 49 64 20 stReviews.......((pullRequestId.
2dc80 28 6f 72 65 66 20 74 6f 70 69 63 20 74 68 65 69 72 2d 69 64 29 29 0a 20 20 20 20 20 20 20 28 61 (oref.topic.their-id))........(a
2dca0 6e 64 20 75 73 65 72 73 20 28 75 73 65 72 49 64 73 20 28 76 63 6f 6e 63 61 74 20 75 73 65 72 73 nd.users.(userIds.(vconcat.users
2dcc0 29 29 29 0a 20 20 20 20 20 20 20 28 61 6e 64 20 74 65 61 6d 73 20 28 74 65 61 6d 49 64 73 20 28 )))........(and.teams.(teamIds.(
2dce0 76 63 6f 6e 63 61 74 20 74 65 61 6d 73 29 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 vconcat.teams)))))))..(cl-defmet
2dd00 68 6f 64 20 66 6f 72 67 65 2d 2d 64 65 6c 65 74 65 2d 63 6f 6d 6d 65 6e 74 0a 20 20 28 28 5f 20 hod.forge--delete-comment...((_.
2dd20 20 20 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 ...forge-github-repository)....(
2dd40 70 6f 73 74 20 66 6f 72 67 65 2d 70 6f 73 74 29 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 73 74 20 post.forge-post))...(forge-rest.
2dd60 70 6f 73 74 20 22 44 45 4c 45 54 45 22 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 post."DELETE"."/repos/:owner/:re
2dd80 70 6f 2f 69 73 73 75 65 73 2f 63 6f 6d 6d 65 6e 74 73 2f 3a 6e 75 6d 62 65 72 22 29 0a 20 20 28 po/issues/comments/:number")...(
2dda0 63 6c 6f 73 71 6c 2d 64 65 6c 65 74 65 20 70 6f 73 74 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 closql-delete.post)...(forge-ref
2ddc0 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 resh-buffer))..(cl-defmethod.for
2dde0 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 2d 66 69 6c 65 73 20 28 28 72 65 70 6f 20 ge--topic-template-files.((repo.
2de00 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 forge-github-repository)........
2de20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
2de40 20 20 20 20 28 5f 20 28 73 75 62 63 6c 61 73 73 20 66 6f 72 67 65 2d 69 73 73 75 65 29 29 29 0a ....(_.(subclass.forge-issue))).
2de60 20 20 3b 3b 20 55 70 73 74 72 65 61 6d 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 69 73 20 75 ..;;.Upstream.documentation.is.u
2de80 6e 63 6c 65 61 72 20 62 75 74 20 65 78 70 65 72 69 6d 65 6e 74 61 74 69 6f 6e 20 69 6e 64 69 63 nclear.but.experimentation.indic
2dea0 61 74 65 73 20 74 68 61 74 0a 20 20 3b 3b 20 70 6c 61 63 69 6e 67 20 74 68 65 20 74 65 6d 70 6c ates.that...;;.placing.the.templ
2dec0 61 74 65 20 64 69 72 65 63 74 6f 72 79 20 69 6e 20 2e 2f 20 6f 72 20 64 6f 63 73 2f 20 64 6f 65 ate.directory.in../.or.docs/.doe
2dee0 73 20 6e 6f 74 20 77 6f 72 6b 2c 20 61 20 73 69 6e 67 6c 65 0a 20 20 3b 3b 20 74 65 6d 70 6c 61 s.not.work,.a.single...;;.templa
2df00 74 65 20 66 69 6c 65 20 69 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 65 64 2c 20 61 6e 64 20 73 69 te.file.is.not.supported,.and.si
2df20 6c 6c 79 20 6e 61 6d 65 73 20 6c 69 6b 65 20 49 73 53 75 45 5f 74 45 6d 50 6c 41 74 45 0a 20 20 lly.names.like.IsSuE_tEmPlAtE...
2df40 3b 3b 20 61 72 65 20 73 75 70 70 6f 72 74 65 64 20 28 62 75 74 20 77 65 20 64 6f 6e 27 74 20 73 ;;.are.supported.(but.we.don't.s
2df60 75 70 70 6f 72 74 20 74 68 61 74 20 68 65 72 65 20 61 6e 79 77 61 79 29 2e 20 20 57 65 20 64 6f upport.that.here.anyway)...We.do
2df80 20 6e 6f 74 0a 20 20 3b 3b 20 73 75 70 70 6f 72 74 20 65 78 70 65 72 69 6d 65 6e 74 61 6c 20 69 .not...;;.support.experimental.i
2dfa0 73 73 75 65 20 2a 66 6f 72 6d 73 2a 20 66 6f 72 20 6e 6f 77 2e 20 20 4d 61 6b 65 20 73 75 72 65 ssue.*forms*.for.now...Make.sure
2dfc0 20 74 68 65 20 63 6f 6e 66 69 67 0a 20 20 3b 3b 20 66 69 6c 65 20 63 6f 6d 65 73 20 6c 61 73 74 .the.config...;;.file.comes.last
2dfe0 2e 0a 20 20 28 6f 72 20 28 6e 63 6f 6e 63 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d ....(or.(nconc.(forge--topic-tem
2e000 70 6c 61 74 65 2d 66 69 6c 65 73 2d 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 70 6f plate-files-1...............repo
2e020 20 22 6d 64 22 20 22 2e 67 69 74 68 75 62 2f 69 73 73 75 65 5f 74 65 6d 70 6c 61 74 65 22 29 0a ."md".".github/issue_template").
2e040 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c .............(forge--topic-templ
2e060 61 74 65 2d 66 69 6c 65 73 2d 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 70 6f 20 6e ate-files-1...............repo.n
2e080 69 6c 20 20 22 2e 67 69 74 68 75 62 2f 69 73 73 75 65 5f 74 65 6d 70 6c 61 74 65 2f 63 6f 6e 66 il..".github/issue_template/conf
2e0a0 69 67 2e 79 6d 6c 22 29 29 0a 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 66 6f 72 67 65 2d 2d 74 ig.yml")).......(nconc.(forge--t
2e0c0 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 2d 66 69 6c 65 73 2d 31 0a 20 20 20 20 20 20 20 20 20 20 opic-template-files-1...........
2e0e0 20 20 20 20 72 65 70 6f 20 22 6d 64 22 20 22 2e 67 69 74 68 75 62 2f 49 53 53 55 45 5f 54 45 4d ....repo."md".".github/ISSUE_TEM
2e100 50 4c 41 54 45 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 6f 70 PLATE")..............(forge--top
2e120 69 63 2d 74 65 6d 70 6c 61 74 65 2d 66 69 6c 65 73 2d 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 ic-template-files-1.............
2e140 20 20 72 65 70 6f 20 6e 69 6c 20 20 22 2e 67 69 74 68 75 62 2f 49 53 53 55 45 5f 54 45 4d 50 4c ..repo.nil..".github/ISSUE_TEMPL
2e160 41 54 45 2f 63 6f 6e 66 69 67 2e 79 6d 6c 22 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 ATE/config.yml"))))..(cl-defmeth
2e180 6f 64 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 2d 66 69 6c 65 73 20 28 od.forge--topic-template-files.(
2e1a0 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 (repo.forge-github-repository)..
2e1c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
2e1e0 20 20 20 20 20 20 20 20 20 20 28 5f 20 28 73 75 62 63 6c 61 73 73 20 66 6f 72 67 65 2d 70 75 6c ..........(_.(subclass.forge-pul
2e200 6c 72 65 71 29 29 29 0a 20 20 3b 3b 20 54 68 65 20 77 65 62 20 69 6e 74 65 72 66 61 63 65 20 64 lreq)))...;;.The.web.interface.d
2e220 6f 65 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 20 6d 75 6c 74 69 70 6c 65 20 70 75 6c 6c 2d 72 65 oes.not.support.multiple.pull-re
2e240 71 75 65 73 74 20 74 65 6d 70 6c 61 74 65 73 2c 0a 20 20 3b 3b 20 61 6e 64 20 77 68 69 6c 65 20 quest.templates,...;;.and.while.
2e260 74 68 65 20 41 50 49 20 74 68 65 6f 72 65 74 69 63 61 6c 6c 79 20 64 6f 65 73 2c 20 77 65 20 64 the.API.theoretically.does,.we.d
2e280 6f 6e 27 74 20 73 75 70 70 6f 72 74 20 74 68 61 74 20 68 65 72 65 2e 0a 20 20 3b 3b 20 57 68 65 on't.support.that.here....;;.Whe
2e2a0 6e 20 74 68 65 72 65 20 61 72 65 20 6d 75 6c 74 69 70 6c 65 20 63 6f 6e 66 6c 69 63 74 69 6e 67 n.there.are.multiple.conflicting
2e2c0 20 22 64 65 66 61 75 6c 74 22 20 74 65 6d 70 6c 61 74 65 73 2c 20 74 68 65 20 72 75 6c 65 73 0a ."default".templates,.the.rules.
2e2e0 20 20 3b 3b 20 75 73 65 64 20 62 79 20 47 69 74 68 75 62 20 61 72 65 20 6d 6f 72 65 20 63 6f 6d ..;;.used.by.Github.are.more.com
2e300 70 6c 65 78 20 74 68 61 6e 20 6a 75 73 74 20 73 6f 72 74 69 6e 67 20 61 6c 70 68 61 62 65 74 69 plex.than.just.sorting.alphabeti
2e320 63 61 6c 6c 79 20 61 6e 64 0a 20 20 3b 3b 20 74 68 65 6e 20 74 61 6b 69 6e 67 20 74 68 65 20 66 cally.and...;;.then.taking.the.f
2e340 69 72 73 74 20 66 6f 75 6e 64 20 66 69 6c 65 2e 20 20 54 6f 6f 20 62 61 64 3b 20 74 68 61 74 27 irst.found.file...Too.bad;.that'
2e360 73 20 77 68 61 74 20 77 65 20 64 6f 2e 0a 20 20 28 6c 65 74 20 28 28 62 72 61 6e 63 68 20 28 6f s.what.we.do....(let.((branch.(o
2e380 72 65 66 20 72 65 70 6f 20 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 ref.repo.default-branch)).......
2e3a0 20 20 28 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 74 29 29 0a 20 20 20 20 28 73 65 71 ..(case-fold-search.t)).....(seq
2e3c0 2d 73 6f 6d 65 20 28 6c 61 6d 62 64 61 20 28 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 -some.(lambda.(file)............
2e3e0 20 20 20 20 20 28 61 6e 64 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 0a 5c 5c 60 .....(and.(string-match-p."\.\\`
2e400 5c 5c 28 2e 67 69 74 68 75 62 2f 5c 5c 7c 64 6f 63 73 2f 5c 5c 29 3f 70 75 6c 6c 5f 72 65 71 75 \\(.github/\\|docs/\\)?pull_requ
2e420 65 73 74 5f 74 65 6d 70 6c 61 74 65 5c 5c 28 5c 5c 2e 5b 61 2d 7a 41 2d 5a 30 2d 39 5d 2b 5c 5c est_template\\(\\.[a-zA-Z0-9]+\\
2e440 29 3f 5c 5c 27 22 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )?\\'".file)....................
2e460 20 20 28 6c 69 73 74 20 28 63 6f 6e 63 61 74 20 62 72 61 6e 63 68 20 22 3a 22 20 66 69 6c 65 29 ..(list.(concat.branch.":".file)
2e480 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 2d 69 74 65 )))...............(magit-git-ite
2e4a0 6d 73 20 22 6c 73 2d 74 72 65 65 22 20 22 2d 7a 22 20 22 2d 2d 66 75 6c 6c 2d 74 72 65 65 22 20 ms."ls-tree"."-z"."--full-tree".
2e4c0 22 2d 2d 6e 61 6d 65 2d 6f 6e 6c 79 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 "--name-only"...................
2e4e0 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 72 22 20 62 72 61 6e 63 68 29 29 29 29 0a 0a 28 63 ............."-r".branch))))..(c
2e500 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 64 65 66 61 75 6c 74 2d 62 l-defmethod.forge--set-default-b
2e520 72 61 6e 63 68 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 ranch.((repo.forge-github-reposi
2e540 74 6f 72 79 29 20 62 72 61 6e 63 68 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 73 74 20 72 65 70 6f tory).branch)...(forge-rest.repo
2e560 20 22 50 41 54 43 48 22 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 22 0a 20 ."PATCH"."/repos/:owner/:repo"..
2e580 20 20 20 28 28 64 65 66 61 75 6c 74 5f 62 72 61 6e 63 68 20 62 72 61 6e 63 68 29 29 29 0a 20 20 ...((default_branch.branch)))...
2e5a0 28 6d 65 73 73 61 67 65 20 22 57 61 69 74 69 6e 67 20 35 20 73 65 63 6f 6e 64 73 20 66 6f 72 20 (message."Waiting.5.seconds.for.
2e5c0 47 69 74 48 75 62 20 74 6f 20 63 6f 6d 70 6c 65 74 65 20 75 70 64 61 74 65 2e 2e 2e 22 29 0a 20 GitHub.to.complete.update...")..
2e5e0 20 28 73 6c 65 65 70 2d 66 6f 72 20 35 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 57 61 69 74 69 .(sleep-for.5)...(message."Waiti
2e600 6e 67 20 35 20 73 65 63 6f 6e 64 73 20 66 6f 72 20 47 69 74 48 75 62 20 74 6f 20 63 6f 6d 70 6c ng.5.seconds.for.GitHub.to.compl
2e620 65 74 65 20 75 70 64 61 74 65 2e 2e 2e 64 6f 6e 65 22 29 0a 20 20 28 6c 65 74 20 28 28 72 65 6d ete.update...done")...(let.((rem
2e640 6f 74 65 20 28 6f 72 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 29 29 0a 20 20 20 20 28 6d 61 ote.(oref.repo.remote))).....(ma
2e660 67 69 74 2d 63 61 6c 6c 2d 67 69 74 20 22 66 65 74 63 68 22 20 22 2d 2d 70 72 75 6e 65 22 20 72 git-call-git."fetch"."--prune".r
2e680 65 6d 6f 74 65 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 63 61 6c 6c 2d 67 69 74 20 22 72 65 6d 6f emote).....(magit-call-git."remo
2e6a0 74 65 22 20 22 73 65 74 2d 68 65 61 64 22 20 22 2d 2d 61 75 74 6f 22 20 72 65 6d 6f 74 65 29 29 te"."set-head"."--auto".remote))
2e6c0 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 72 65 6e 61 6d 65 2d 62 )..(cl-defmethod.forge--rename-b
2e6e0 72 61 6e 63 68 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 ranch.((repo.forge-github-reposi
2e700 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tory)...........................
2e720 20 20 20 20 20 20 20 20 20 20 6e 65 77 6e 61 6d 65 20 6f 6c 64 6e 61 6d 65 29 0a 20 20 28 66 6f ..........newname.oldname)...(fo
2e740 72 67 65 2d 72 65 73 74 20 72 65 70 6f 20 22 50 4f 53 54 22 0a 20 20 20 20 28 66 6f 72 6d 61 74 rge-rest.repo."POST".....(format
2e760 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 6e 61 6d 65 2f 62 72 61 6e 63 68 65 73 2f 25 ."/repos/:owner/:name/branches/%
2e780 73 2f 72 65 6e 61 6d 65 22 20 6f 6c 64 6e 61 6d 65 29 0a 20 20 20 20 28 28 6e 65 77 5f 6e 61 6d s/rename".oldname).....((new_nam
2e7a0 65 20 6e 65 77 6e 61 6d 65 29 29 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 57 61 69 74 69 6e 67 e.newname)))...(message."Waiting
2e7c0 20 35 20 73 65 63 6f 6e 64 73 20 66 6f 72 20 47 69 74 48 75 62 20 74 6f 20 63 6f 6d 70 6c 65 74 .5.seconds.for.GitHub.to.complet
2e7e0 65 20 72 65 6e 61 6d 65 2e 2e 2e 22 29 0a 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 35 29 0a 20 20 e.rename...")...(sleep-for.5)...
2e800 28 6d 65 73 73 61 67 65 20 22 57 61 69 74 69 6e 67 20 35 20 73 65 63 6f 6e 64 73 20 66 6f 72 20 (message."Waiting.5.seconds.for.
2e820 47 69 74 48 75 62 20 74 6f 20 63 6f 6d 70 6c 65 74 65 20 72 65 6e 61 6d 65 2e 2e 2e 64 6f 6e 65 GitHub.to.complete.rename...done
2e840 22 29 0a 20 20 28 6d 61 67 69 74 2d 63 61 6c 6c 2d 67 69 74 20 22 66 65 74 63 68 22 20 22 2d 2d ")...(magit-call-git."fetch"."--
2e860 70 72 75 6e 65 22 20 28 6f 72 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 29 29 0a 0a 28 63 6c prune".(oref.repo.remote)))..(cl
2e880 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 6f 72 6b 2d 72 65 70 6f 73 69 74 6f 72 -defmethod.forge--fork-repositor
2e8a0 79 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 y.((repo.forge-github-repository
2e8c0 29 20 66 6f 72 6b 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 6e 61 6d 65 20 61 70 69 68 ).fork)...(with-slots.(name.apih
2e8e0 6f 73 74 29 20 72 65 70 6f 0a 20 20 20 20 28 66 6f 72 67 65 2d 72 65 73 74 20 72 65 70 6f 20 22 ost).repo.....(forge-rest.repo."
2e900 50 4f 53 54 22 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 6e 61 6d 65 2f 66 6f 72 6b 73 POST"."/repos/:owner/:name/forks
2e920 22 0a 20 20 20 20 20 20 28 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 66 6f 72 6b 20 28 ".......((and.(not.(equal.fork.(
2e940 67 68 75 62 2d 2d 75 73 65 72 6e 61 6d 65 20 61 70 69 68 6f 73 74 29 29 29 0a 20 20 20 20 20 20 ghub--username.apihost))).......
2e960 20 20 20 20 20 20 28 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 20 66 6f 72 6b 29 29 29 29 0a 20 20 20 ......(organization.fork))))....
2e980 20 28 67 68 75 62 2d 77 61 69 74 20 28 66 6f 72 6d 61 74 20 22 2f 72 65 70 6f 73 2f 25 73 2f 25 .(ghub-wait.(format."/repos/%s/%
2e9a0 73 22 20 66 6f 72 6b 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c s".fork.name)................nil
2e9c0 20 3a 61 75 74 68 20 27 66 6f 72 67 65 20 3a 68 6f 73 74 20 61 70 69 68 6f 73 74 29 29 29 0a 0a .:auth.'forge.:host.apihost)))..
2e9e0 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 6d 65 72 67 65 2d 70 75 6c 6c 72 (cl-defmethod.forge--merge-pullr
2ea00 65 71 0a 20 20 28 28 72 65 70 6f 20 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 eq...((repo..forge-github-reposi
2ea20 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 20 tory)....(topic.forge-pullreq)..
2ea40 20 20 68 61 73 68 20 6d 65 74 68 6f 64 29 0a 20 20 28 66 6f 72 67 65 2d 6d 75 74 61 74 65 20 74 ..hash.method)...(forge-mutate.t
2ea60 6f 70 69 63 20 6d 65 72 67 65 50 75 6c 6c 52 65 71 75 65 73 74 0a 20 20 20 20 28 28 70 75 6c 6c opic.mergePullRequest.....((pull
2ea80 52 65 71 75 65 73 74 49 64 20 28 6f 72 65 66 20 74 6f 70 69 63 20 74 68 65 69 72 2d 69 64 29 29 RequestId.(oref.topic.their-id))
2eaa0 0a 20 20 20 20 20 28 6d 65 72 67 65 4d 65 74 68 6f 64 20 28 75 70 63 61 73 65 20 28 73 79 6d 62 ......(mergeMethod.(upcase.(symb
2eac0 6f 6c 2d 6e 61 6d 65 20 6d 65 74 68 6f 64 29 29 29 0a 20 20 20 20 20 28 61 6e 64 20 68 61 73 68 ol-name.method)))......(and.hash
2eae0 20 28 65 78 70 65 63 74 65 64 48 65 61 64 4f 69 64 20 68 61 73 68 29 29 29 0a 20 20 20 20 3a 63 .(expectedHeadOid.hash))).....:c
2eb00 61 6c 6c 62 61 63 6b 0a 20 20 20 20 28 6c 61 6d 62 64 61 20 28 5f 29 0a 20 20 20 20 20 20 28 66 allback.....(lambda.(_).......(f
2eb20 6f 72 67 65 2d 2d 70 75 6c 6c 0a 20 20 20 20 20 20 20 72 65 70 6f 0a 20 20 20 20 20 20 20 28 6c orge--pull........repo........(l
2eb40 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 62 ambda.()..........(when-let*.((b
2eb60 72 61 6e 63 68 20 28 6f 72 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 62 72 61 6e 63 68 ranch.(or.(forge--pullreq-branch
2eb80 2d 61 63 74 69 76 65 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -active.topic)..................
2eba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 62 72 61 6e 63 68 2d 70 ................(forge--branch-p
2ebc0 75 6c 6c 72 65 71 20 74 6f 70 69 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ullreq.topic))).................
2ebe0 20 20 20 20 20 28 75 70 73 74 72 65 61 6d 20 28 6d 61 67 69 74 2d 67 65 74 2d 6c 6f 63 61 6c 2d .....(upstream.(magit-get-local-
2ec00 75 70 73 74 72 65 61 6d 2d 62 72 61 6e 63 68 20 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 20 upstream-branch.branch))........
2ec20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 74 65 20 28 6f 72 65 66 20 72 65 70 6f ..............(remote.(oref.repo
2ec40 20 72 65 6d 6f 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 63 61 6c .remote)))............(magit-cal
2ec60 6c 2d 67 69 74 20 22 63 68 65 63 6b 6f 75 74 22 20 75 70 73 74 72 65 61 6d 29 0a 20 20 20 20 20 l-git."checkout".upstream)......
2ec80 20 20 20 20 20 20 28 6d 61 67 69 74 2d 63 61 6c 6c 2d 67 69 74 20 22 70 75 6c 6c 22 20 22 2d 2d ......(magit-call-git."pull"."--
2eca0 66 66 2d 6f 6e 6c 79 22 20 72 65 6d 6f 74 65 20 28 6d 61 67 69 74 2d 70 75 6c 6c 2d 61 72 67 75 ff-only".remote.(magit-pull-argu
2ecc0 6d 65 6e 74 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 63 61 6c 6c 2d 67 ments))............(magit-call-g
2ece0 69 74 20 22 62 72 61 6e 63 68 22 20 22 2d 64 22 20 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 it."branch"."-d".branch)........
2ed00 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 29 29 29 29 ....(forge-refresh-buffer)))))))
2ed20 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 72 ..;;;._.;;.Local.Variables:.;;.r
2ed40 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 28 22 ead-symbol-shorthands:.(.;;...("
2ed60 61 6e 64 24 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 24 and$"............"cond-let--and$
2ed80 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 ").;;...("and-let"........."cond
2eda0 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 69 66 2d 6c 65 74 22 20 20 -let--and-let").;;...("if-let"..
2edc0 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b 20 20 ........"cond-let--if-let").;;..
2ede0 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 .("when-let"........"cond-let--w
2ee00 68 65 6e 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 62 75 66 66 65 72 2d 73 74 72 69 6e 67 22 20 hen-let").;;...("buffer-string".
2ee20 2e 20 22 62 75 66 66 65 72 2d 73 74 72 69 6e 67 22 29 0a 3b 3b 20 20 20 28 22 62 75 66 66 65 72 .."buffer-string").;;...("buffer
2ee40 2d 73 74 72 22 20 20 20 20 2e 20 22 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 73 75 62 73 74 72 -str"......"forge--buffer-substr
2ee60 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 22 29 0a 3b 3b 20 20 20 28 22 70 61 72 74 69 ing-no-properties").;;...("parti
2ee80 61 6c 22 20 20 20 20 20 20 20 2e 20 22 6c 6c 61 6d 61 2d 2d 6c 65 66 74 2d 61 70 70 6c 79 2d 70 al"........."llama--left-apply-p
2eea0 61 72 74 69 61 6c 6c 79 22 29 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f artially")).;;.End:.(provide.'fo
2eec0 72 67 65 2d 67 69 74 68 75 62 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2e 65 6c 20 rge-github).;;;.forge-github.el.
2eee0 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ends.here.......................
2ef00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2ef20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2ef40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2ef60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2ef80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2efa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2efc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2efe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2f000 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 67 69 74 6c 61 62 forge-20250916.1119/forge-gitlab
2f020 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .el.............................
2f040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2f060 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
2f080 30 30 37 34 30 34 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 31 36 00 20 30 00 00 00 0074046.00000000000.015016..0...
2f0a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2f0c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2f0e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2f100 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
2f120 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
2f140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2f160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2f180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2f1a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2f1c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2f1e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2f200 3b 3b 3b 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2e 65 6c 20 2d 2d 2d 20 47 69 74 6c 61 62 20 73 ;;;.forge-gitlab.el.---.Gitlab.s
2f220 75 70 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 2d 2a upport..-*-.lexical-binding:t.-*
2f240 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f -..;;.Copyright.(C).2018-2025.Jo
2f260 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 73 20 nas.Bernoulli..;;.Author:.Jonas.
2f280 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 Bernoulli.<emacs.forge@jonas.ber
2f2a0 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 noulli.dev>.;;.Maintainer:.Jonas
2f2c0 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 .Bernoulli.<emacs.forge@jonas.be
2f2e0 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 rnoulli.dev>..;;.SPDX-License-Id
2f300 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 entifier:.GPL-3.0-or-later..;;.T
2f320 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 his.file.is.free.software:.you.c
2f340 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 an.redistribute.it.and/or.modify
2f360 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e .;;.it.under.the.terms.of.the.GN
2f380 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c U.General.Public.License.as.publ
2f3a0 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f ished.;;.by.the.Free.Software.Fo
2f3c0 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 undation,.either.version.3.of.th
2f3e0 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e e.License,.;;.or.(at.your.option
2f400 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 ).any.later.version..;;.;;.This.
2f420 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 file.is.distributed.in.the.hope.
2f440 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 that.it.will.be.useful,.;;.but.W
2f460 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 ITHOUT.ANY.WARRANTY;.without.eve
2f480 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 n.the.implied.warranty.of.;;.MER
2f4a0 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 CHANTABILITY.or.FITNESS.FOR.A.PA
2f4c0 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e RTICULAR.PURPOSE...See.the.;;.GN
2f4e0 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 U.General.Public.License.for.mor
2f500 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 e.details..;;.;;.You.should.have
2f520 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 .received.a.copy.of.the.GNU.Gene
2f540 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 ral.Public.License.;;.along.with
2f560 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a .this.file...If.not,.see.<https:
2f580 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 //www.gnu.org/licenses/>...;;;.C
2f5a0 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 63 6c 69 65 6e 74 29 0a 28 72 ode:..(require.'forge-client).(r
2f5c0 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 0a 28 72 65 71 75 69 72 65 20 27 66 equire.'forge-issue).(require.'f
2f5e0 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 0a 0a 28 64 65 66 63 6c orge-pullreq)..;;;.Class..(defcl
2f600 61 73 73 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 ass.forge-gitlab-repository.(for
2f620 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 28 28 69 73 73 75 65 73 2d 75 72 6c 2d 66 6f ge-repository)...((issues-url-fo
2f640 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f rmat.........:initform."https://
2f660 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 65 73 22 29 0a 20 20 20 28 69 73 73 75 65 2d 75 72 6c 2d %h/%o/%n/issues")....(issue-url-
2f680 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 format..........:initform."https
2f6a0 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 65 73 2f 25 69 22 29 0a 20 20 20 28 69 73 73 75 ://%h/%o/%n/issues/%i")....(issu
2f6c0 65 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 e-post-url-format.....:initform.
2f6e0 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 65 73 2f 25 69 23 6e 6f 74 65 "https://%h/%o/%n/issues/%i#note
2f700 5f 25 49 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 _%I")....(pullreqs-url-format...
2f720 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f ....:initform."https://%h/%o/%n/
2f740 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 75 72 6c merge_requests")....(pullreq-url
2f760 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a -format........:initform."https:
2f780 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 2f 25 69 22 29 0a 20 //%h/%o/%n/merge_requests/%i")..
2f7a0 20 20 28 70 75 6c 6c 72 65 71 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 3a 69 6e ..(pullreq-post-url-format...:in
2f7c0 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 6d 65 72 67 65 5f 72 itform."https://%h/%o/%n/merge_r
2f7e0 65 71 75 65 73 74 73 2f 25 69 23 6e 6f 74 65 5f 25 49 22 29 0a 20 20 20 28 63 6f 6d 6d 69 74 2d equests/%i#note_%I")....(commit-
2f800 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 url-format.........:initform."ht
2f820 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 63 6f 6d 6d 69 74 2f 25 72 22 29 0a 20 20 20 28 62 tps://%h/%o/%n/commit/%r")....(b
2f840 72 61 6e 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f ranch-url-format.........:initfo
2f860 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 63 6f 6d 6d 69 74 73 2f 25 72 22 rm."https://%h/%o/%n/commits/%r"
2f880 29 0a 20 20 20 28 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 )....(remote-url-format.........
2f8a0 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 22 29 0a 20 20 :initform."https://%h/%o/%n")...
2f8c0 20 28 62 6c 6f 62 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 .(blob-url-format...........:ini
2f8e0 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 2d 2f 62 6c 6f 62 2f 25 tform."https://%h/%o/%n/-/blob/%
2f900 72 2f 25 66 22 29 0a 20 20 20 28 63 72 65 61 74 65 2d 69 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d r/%f")....(create-issue-url-form
2f920 61 74 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e at...:initform."https://%h/%o/%n
2f940 2f 69 73 73 75 65 73 2f 6e 65 77 22 29 0a 20 20 20 28 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 /issues/new")....(create-pullreq
2f960 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 -url-format.:initform."https://%
2f980 68 2f 25 6f 2f 25 6e 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 2f 6e 65 77 22 29 0a 20 20 20 h/%o/%n/merge_requests/new")....
2f9a0 28 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 20 3a 69 6e 69 74 66 6f 72 6d 20 22 2b 72 65 66 (pullreq-refspec.:initform."+ref
2f9c0 73 2f 6d 65 72 67 65 2d 72 65 71 75 65 73 74 73 2f 2a 2f 68 65 61 64 3a 72 65 66 73 2f 70 75 6c s/merge-requests/*/head:refs/pul
2f9e0 6c 72 65 71 73 2f 2a 22 29 29 29 0a 0a 3b 3b 3b 20 50 75 6c 6c 0a 3b 3b 3b 3b 20 52 65 70 6f 73 lreqs/*")))..;;;.Pull.;;;;.Repos
2fa00 69 74 6f 72 79 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 70 75 6c 6c itory..(cl-defmethod.forge--pull
2fa20 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 .((repo.forge-gitlab-repository)
2fa40 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 ............................&opt
2fa60 69 6f 6e 61 6c 20 63 61 6c 6c 62 61 63 6b 20 73 69 6e 63 65 29 0a 20 20 28 63 6c 2d 61 73 73 65 ional.callback.since)...(cl-asse
2fa80 72 74 20 28 6e 6f 74 20 28 61 6e 64 20 73 69 6e 63 65 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 rt.(not.(and.since.(forge-get-re
2faa0 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 6e 69 6c 20 3a 74 72 61 63 6b 65 64 3f 29 29 29 29 0a pository.repo.nil.:tracked?)))).
2fac0 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 62 75 66 66 65 72 20 ..(setq.forge--mode-line-buffer.
2fae0 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 (current-buffer))...(forge--msg.
2fb00 72 65 70 6f 20 74 20 6e 69 6c 20 22 50 75 6c 6c 69 6e 67 20 52 45 50 4f 22 29 0a 20 20 28 6c 65 repo.t.nil."Pulling.REPO")...(le
2fb20 74 20 28 28 63 62 20 28 6c 65 74 20 28 28 62 75 66 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 t.((cb.(let.((buf.(current-buffe
2fb40 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 61 6c 20 6e 69 6c 29 29 r))...................(val.nil))
2fb60 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 63 62 20 26 6f 70 74 69 ...............(lambda.(cb.&opti
2fb80 6f 6e 61 6c 20 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 76 20 onal.v).................(when.v.
2fba0 28 69 66 20 76 61 6c 20 28 70 75 73 68 20 76 20 76 61 6c 29 20 28 73 65 74 71 20 76 61 6c 20 76 (if.val.(push.v.val).(setq.val.v
2fbc0 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 76 ))).................(let-alist.v
2fbe0 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 al...................(cond......
2fc00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 76 61 6c 29 0a 20 20 20 20 20 20 20 ..............((not.val)........
2fc20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 72 65 70 6f 73 .............(forge--fetch-repos
2fc40 69 74 6f 72 79 20 72 65 70 6f 20 63 62 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 itory.repo.cb)).................
2fc60 20 20 20 28 28 6e 6f 74 20 28 61 73 73 71 20 27 61 73 73 69 67 6e 65 65 73 20 76 61 6c 29 29 0a ...((not.(assq.'assignees.val)).
2fc80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 65 74 63 ....................(forge--fetc
2fca0 68 2d 61 73 73 69 67 6e 65 65 73 20 72 65 70 6f 20 63 62 29 29 0a 20 20 20 20 20 20 20 20 20 20 h-assignees.repo.cb))...........
2fcc0 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 61 73 73 71 20 27 66 6f 72 6b 73 20 76 61 6c 29 .........((not.(assq.'forks.val)
2fce0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 65 ).....................(forge--fe
2fd00 74 63 68 2d 66 6f 72 6b 73 20 72 65 70 6f 20 63 62 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 tch-forks.repo.cb)).............
2fd20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 61 73 73 71 20 27 6c 61 62 65 6c 73 20 76 61 6c 29 29 .......((not.(assq.'labels.val))
2fd40 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 65 74 .....................(forge--fet
2fd60 63 68 2d 6c 61 62 65 6c 73 20 72 65 70 6f 20 63 62 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ch-labels.repo.cb)).............
2fd80 20 20 20 20 20 20 20 28 28 61 6e 64 20 2e 69 73 73 75 65 73 5f 65 6e 61 62 6c 65 64 0a 20 20 20 .......((and..issues_enabled....
2fda0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 61 73 73 71 ......................(not.(assq
2fdc0 20 27 69 73 73 75 65 73 20 76 61 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .'issues.val))).................
2fde0 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 69 73 73 75 65 73 20 72 65 70 6f 20 63 62 ....(forge--fetch-issues.repo.cb
2fe00 20 73 69 6e 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 61 6e .since))....................((an
2fe20 64 20 2e 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 5f 65 6e 61 62 6c 65 64 0a 20 20 20 20 20 20 d..merge_requests_enabled.......
2fe40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 61 73 73 71 20 27 70 ...................(not.(assq.'p
2fe60 75 6c 6c 72 65 71 73 20 76 61 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ullreqs.val)))..................
2fe80 20 20 20 28 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 70 75 6c 6c 72 65 71 73 20 72 65 70 6f 20 63 ...(forge--fetch-pullreqs.repo.c
2fea0 62 20 73 69 6e 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 0a b.since))....................(t.
2fec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 ....................(forge--msg.
2fee0 72 65 70 6f 20 74 20 74 20 20 20 22 50 75 6c 6c 69 6e 67 20 52 45 50 4f 22 29 0a 20 20 20 20 20 repo.t.t..."Pulling.REPO")......
2ff00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 ...............(forge--msg.repo.
2ff20 74 20 6e 69 6c 20 22 53 74 6f 72 69 6e 67 20 52 45 50 4f 22 29 0a 20 20 20 20 20 20 20 20 20 20 t.nil."Storing.REPO")...........
2ff40 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 61 6e 73 61 63 74 69 ..........(closql-with-transacti
2ff60 6f 6e 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 on.(forge-db)...................
2ff80 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 ....(forge--update-repository.re
2ffa0 70 6f 20 76 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 po.val).......................(f
2ffc0 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 61 73 73 69 67 6e 65 65 73 20 20 72 65 70 6f 20 2e 61 73 orge--update-assignees..repo..as
2ffe0 73 69 67 6e 65 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 signees).......................(
30000 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 6c 61 62 65 6c 73 20 20 20 20 20 72 65 70 6f 20 2e 6c forge--update-labels.....repo..l
30020 61 62 65 6c 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f abels).......................(do
30040 6c 69 73 74 20 28 76 20 2e 69 73 73 75 65 73 29 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 list.(v..issues)...(forge--updat
30060 65 2d 69 73 73 75 65 20 72 65 70 6f 20 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-issue.repo.v))................
30080 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 76 20 2e 70 75 6c 6c 72 65 71 73 29 20 28 66 6f .......(dolist.(v..pullreqs).(fo
300a0 72 67 65 2d 2d 75 70 64 61 74 65 2d 70 75 6c 6c 72 65 71 20 72 65 70 6f 20 76 29 29 0a 20 20 20 rge--update-pullreq.repo.v))....
300c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 63 6f ...................(oset.repo.co
300e0 6e 64 69 74 69 6f 6e 20 3a 74 72 61 63 6b 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ndition.:tracked))..............
30100 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 74 20 74 20 22 53 74 6f .......(forge--msg.repo.t.t."Sto
30120 72 69 6e 67 20 52 45 50 4f 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ring.REPO").....................
30140 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6f 72 65 (cond......................((ore
30160 66 20 72 65 70 6f 20 73 65 6c 65 63 74 69 76 65 2d 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 f.repo.selective-p))............
30180 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 6c 62 61 63 6b 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c ..........(callback.(funcall.cal
301a0 6c 62 61 63 6b 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 lback))......................((f
301c0 6f 72 67 65 2d 2d 6d 61 79 62 65 2d 67 69 74 2d 66 65 74 63 68 20 72 65 70 6f 20 62 75 66 29 29 orge--maybe-git-fetch.repo.buf))
301e0 29 29 29 29 29 29 29 29 0a 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 62 20 63 62 29 29 29 0a 0a )))))))).....(funcall.cb.cb)))..
30200 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 72 65 70 6f 73 (cl-defmethod.forge--fetch-repos
30220 69 74 6f 72 79 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 itory.((repo.forge-gitlab-reposi
30240 74 6f 72 79 29 20 63 61 6c 6c 62 61 63 6b 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 67 tory).callback)...(forge--glab-g
30260 65 74 20 72 65 70 6f 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 22 20 6e 69 6c et.repo."/projects/:project".nil
30280 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 76 61 6c 75 65 20 5f 68 .....:callback.(lambda.(value._h
302a0 65 61 64 65 72 73 20 5f 73 74 61 74 75 73 20 5f 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 eaders._status._req)............
302c0 20 20 20 20 20 28 63 6f 6e 64 20 28 28 6f 72 65 66 20 72 65 70 6f 20 73 65 6c 65 63 74 69 76 65 .....(cond.((oref.repo.selective
302e0 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 -p)........................(setq
30300 20 76 61 6c 75 65 20 28 61 70 70 65 6e 64 20 27 28 28 61 73 73 69 67 6e 65 65 73 29 20 28 66 6f .value.(append.'((assignees).(fo
30320 72 6b 73 29 20 28 6c 61 62 65 6c 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rks).(labels)...................
30340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 73 75 ...........................(issu
30360 65 73 29 20 28 70 75 6c 6c 72 65 71 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 es).(pullreqs)).................
30380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 61 6c 75 65 ...........................value
303a0 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6d 61 67 69 ))).......................((magi
303c0 74 2d 67 65 74 2d 62 6f 6f 6c 65 61 6e 20 22 66 6f 72 67 65 2e 6f 6d 69 74 45 78 70 65 6e 73 69 t-get-boolean."forge.omitExpensi
303e0 76 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 ve")........................(set
30400 71 20 76 61 6c 75 65 20 28 61 70 70 65 6e 64 20 27 28 28 61 73 73 69 67 6e 65 65 73 29 20 28 66 q.value.(append.'((assignees).(f
30420 6f 72 6b 73 29 20 28 6c 61 62 65 6c 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 orks).(labels)).................
30440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 61 6c 75 65 ...........................value
30460 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 61 )))).................(funcall.ca
30480 6c 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b 20 76 61 6c 75 65 29 29 29 29 0a 0a 28 63 6c 2d 64 llback.callback.value))))..(cl-d
304a0 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 72 65 70 6f 73 69 74 6f 72 efmethod.forge--update-repositor
304c0 79 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 y.((repo.forge-gitlab-repository
304e0 29 20 64 61 74 61 29 0a 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 61 74 61 0a 20 20 20 20 28 6f ).data)...(let-alist.data.....(o
30500 73 65 74 20 72 65 70 6f 20 63 72 65 61 74 65 64 20 20 20 20 20 20 20 20 2e 63 72 65 61 74 65 64 set.repo.created.........created
30520 5f 61 74 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 75 70 64 61 74 65 64 20 20 20 20 20 _at).....(oset.repo.updated.....
30540 20 20 20 2e 6c 61 73 74 5f 61 63 74 69 76 69 74 79 5f 61 74 29 0a 20 20 20 20 28 6f 73 65 74 20 ....last_activity_at).....(oset.
30560 72 65 70 6f 20 70 75 73 68 65 64 20 20 20 20 20 20 20 20 20 6e 69 6c 29 0a 20 20 20 20 28 6f 73 repo.pushed.........nil).....(os
30580 65 74 20 72 65 70 6f 20 70 61 72 65 6e 74 20 20 20 20 20 20 20 20 20 2e 66 6f 72 6b 65 64 5f 66 et.repo.parent..........forked_f
305a0 72 6f 6d 5f 70 72 6f 6a 65 63 74 2e 70 61 74 68 5f 77 69 74 68 5f 6e 61 6d 65 73 70 61 63 65 29 rom_project.path_with_namespace)
305c0 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 64 65 73 63 72 69 70 74 69 6f 6e 20 20 20 20 2e .....(oset.repo.description.....
305e0 64 65 73 63 72 69 70 74 69 6f 6e 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 68 6f 6d 65 description).....(oset.repo.home
30600 70 61 67 65 20 20 20 20 20 20 20 6e 69 6c 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 64 page.......nil).....(oset.repo.d
30620 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 20 2e 64 65 66 61 75 6c 74 5f 62 72 61 6e 63 68 29 0a 20 efault-branch..default_branch)..
30640 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 61 72 63 68 69 76 65 64 2d 70 20 20 20 20 20 2e 61 72 ...(oset.repo.archived-p......ar
30660 63 68 69 76 65 64 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 66 6f 72 6b 2d 70 20 20 20 chived).....(oset.repo.fork-p...
30680 20 20 20 20 20 20 28 61 6e 64 20 2e 66 6f 72 6b 65 64 5f 66 72 6f 6d 5f 70 72 6f 6a 65 63 74 2e ......(and..forked_from_project.
306a0 70 61 74 68 5f 77 69 74 68 5f 6e 61 6d 65 73 70 61 63 65 20 74 29 29 0a 20 20 20 20 28 6f 73 65 path_with_namespace.t)).....(ose
306c0 74 20 72 65 70 6f 20 6c 6f 63 6b 65 64 2d 70 20 20 20 20 20 20 20 6e 69 6c 29 0a 20 20 20 20 28 t.repo.locked-p.......nil).....(
306e0 6f 73 65 74 20 72 65 70 6f 20 6d 69 72 72 6f 72 2d 70 20 20 20 20 20 20 20 2e 6d 69 72 72 6f 72 oset.repo.mirror-p........mirror
30700 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 70 72 69 76 61 74 65 2d 70 20 20 20 20 20 20 ).....(oset.repo.private-p......
30720 28 65 71 75 61 6c 20 2e 76 69 73 69 62 69 6c 69 74 79 20 22 70 72 69 76 61 74 65 22 29 29 0a 20 (equal..visibility."private"))..
30740 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 69 73 73 75 65 73 2d 70 20 20 20 20 20 20 20 2e 69 73 ...(oset.repo.issues-p........is
30760 73 75 65 73 5f 65 6e 61 62 6c 65 64 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 77 69 6b sues_enabled).....(oset.repo.wik
30780 69 2d 70 20 20 20 20 20 20 20 20 20 2e 77 69 6b 69 5f 65 6e 61 62 6c 65 64 29 0a 20 20 20 20 28 i-p..........wiki_enabled).....(
307a0 6f 73 65 74 20 72 65 70 6f 20 73 74 61 72 73 20 20 20 20 20 20 20 20 20 20 2e 73 74 61 72 5f 63 oset.repo.stars...........star_c
307c0 6f 75 6e 74 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 77 61 74 63 68 65 72 73 20 20 20 ount).....(oset.repo.watchers...
307e0 20 20 20 20 2e 73 74 61 72 5f 63 6f 75 6e 74 29 29 29 0a 0a 3b 3b 3b 3b 20 54 6f 70 69 63 73 0a .....star_count)))..;;;;.Topics.
30800 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 .(cl-defmethod.forge--pull-topic
30820 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 .((repo.forge-gitlab-repository)
30840 20 5f 74 6f 70 69 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ._topic.........................
30860 20 20 20 20 20 20 20 20 20 26 6b 65 79 20 63 61 6c 6c 62 61 63 6b 20 5f 65 72 72 6f 72 62 61 63 .........&key.callback._errorbac
30880 6b 29 0a 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 20 72 65 70 6f 20 63 61 6c 6c 62 61 63 6b 29 k)...(forge--pull.repo.callback)
308a0 29 20 3b 20 54 4f 44 4f 20 50 75 6c 6c 20 6f 6e 6c 79 20 74 68 65 20 6f 6e 65 20 74 6f 70 69 63 ).;.TODO.Pull.only.the.one.topic
308c0 2e 0a 0a 3b 3b 3b 3b 20 49 73 73 75 65 73 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f ...;;;;.Issues..(cl-defmethod.fo
308e0 72 67 65 2d 2d 66 65 74 63 68 2d 69 73 73 75 65 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 rge--fetch-issues.((repo.forge-g
30900 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 63 61 6c 6c 62 61 63 6b 20 73 69 6e 63 65 itlab-repository).callback.since
30920 29 0a 20 20 28 6c 65 74 20 28 28 63 62 20 28 6c 65 74 20 28 76 61 6c 20 63 75 72 20 63 6e 74 20 )...(let.((cb.(let.(val.cur.cnt.
30940 70 6f 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 63 62 20 26 pos)...............(lambda.(cb.&
30960 6f 70 74 69 6f 6e 61 6c 20 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e optional.v).................(con
30980 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 70 6f 73 29 0a 20 20 d..................((not.pos)...
309a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 65 74 71 20 63 75 72 20 28 73 ................(if.(setq.cur.(s
309c0 65 74 71 20 76 61 6c 20 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 etq.val.v)).....................
309e0 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..(progn........................
30a00 20 28 73 65 74 71 20 70 6f 73 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(setq.pos.1)...................
30a20 20 20 20 20 20 20 28 73 65 74 71 20 63 6e 74 20 28 6c 65 6e 67 74 68 20 76 61 6c 29 29 0a 20 20 ......(setq.cnt.(length.val))...
30a40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 ......................(forge--ms
30a60 67 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 22 50 75 6c 6c 69 6e 67 20 69 73 73 75 65 20 25 73 2f g.nil.nil.nil."Pulling.issue.%s/
30a80 25 73 22 20 70 6f 73 20 63 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 %s".pos.cnt)....................
30aa0 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 69 73 73 75 65 2d 70 6f 73 74 73 20 72 .....(forge--fetch-issue-posts.r
30ac0 65 70 6f 20 63 75 72 20 63 62 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 epo.cur.cb))....................
30ae0 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 74 20 74 20 22 50 75 6c 6c 69 6e 67 20 52 .(forge--msg.repo.t.t."Pulling.R
30b00 45 50 4f 20 69 73 73 75 65 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EPO.issues")....................
30b20 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b 20 28 63 6f 6e .(funcall.callback.callback.(con
30b40 73 20 27 69 73 73 75 65 73 20 76 61 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s.'issues.val))))...............
30b60 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 65 74 ...(t...................(if.(set
30b80 71 20 63 75 72 20 28 63 64 72 20 63 75 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 q.cur.(cdr.cur))................
30ba0 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .......(progn...................
30bc0 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 70 6f 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ......(cl-incf.pos).............
30be0 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 6e 69 6c 20 6e 69 6c 20 ............(forge--msg.nil.nil.
30c00 6e 69 6c 20 22 50 75 6c 6c 69 6e 67 20 69 73 73 75 65 20 25 73 2f 25 73 22 20 70 6f 73 20 63 6e nil."Pulling.issue.%s/%s".pos.cn
30c20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 t).........................(forg
30c40 65 2d 2d 66 65 74 63 68 2d 69 73 73 75 65 2d 70 6f 73 74 73 20 72 65 70 6f 20 63 75 72 20 63 62 e--fetch-issue-posts.repo.cur.cb
30c60 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d )).....................(forge--m
30c80 73 67 20 72 65 70 6f 20 74 20 74 20 22 50 75 6c 6c 69 6e 67 20 52 45 50 4f 20 69 73 73 75 65 73 sg.repo.t.t."Pulling.REPO.issues
30ca0 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 ").....................(funcall.
30cc0 63 61 6c 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b 20 28 63 6f 6e 73 20 27 69 73 73 75 65 73 20 callback.callback.(cons.'issues.
30ce0 76 61 6c 29 29 29 29 29 29 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 val))))))))).....(forge--msg.rep
30d00 6f 20 74 20 6e 69 6c 20 22 50 75 6c 6c 69 6e 67 20 52 45 50 4f 20 69 73 73 75 65 73 22 29 0a 20 o.t.nil."Pulling.REPO.issues")..
30d20 20 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 67 65 74 20 72 65 70 6f 20 22 2f 70 72 6f 6a 65 ...(forge--glab-get.repo."/proje
30d40 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 69 73 73 75 65 73 22 0a 20 20 20 20 20 20 60 28 28 70 65 cts/:project/issues".......`((pe
30d60 72 5f 70 61 67 65 20 2e 20 31 30 30 29 0a 20 20 20 20 20 20 20 20 28 6f 72 64 65 72 5f 62 79 20 r_page...100).........(order_by.
30d80 2e 20 22 75 70 64 61 74 65 64 5f 61 74 22 29 0a 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 2d 6c .."updated_at").........,@(and-l
30da0 65 74 20 28 28 61 66 74 65 72 20 28 6f 72 20 73 69 6e 63 65 20 28 6f 72 65 66 20 72 65 70 6f 20 et.((after.(or.since.(oref.repo.
30dc0 69 73 73 75 65 73 2d 75 6e 74 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 issues-until)))).............`((
30de0 75 70 64 61 74 65 64 5f 61 66 74 65 72 20 2e 20 2c 61 66 74 65 72 29 29 29 29 0a 20 20 20 20 20 updated_after...,after))))......
30e00 20 3a 75 6e 70 61 67 69 6e 61 74 65 20 74 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 .:unpaginate.t.......:callback.(
30e20 6c 61 6d 62 64 61 20 28 76 61 6c 75 65 20 5f 68 65 61 64 65 72 73 20 5f 73 74 61 74 75 73 20 5f lambda.(value._headers._status._
30e40 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 req)...................(funcall.
30e60 63 62 20 63 62 20 76 61 6c 75 65 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 cb.cb.value)))))..(cl-defmethod.
30e80 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 69 73 73 75 65 2d 70 6f 73 74 73 20 28 28 72 65 70 6f 20 forge--fetch-issue-posts.((repo.
30ea0 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 63 75 72 20 63 62 29 forge-gitlab-repository).cur.cb)
30ec0 0a 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 28 63 61 72 20 63 75 72 29 0a 20 20 20 20 28 66 6f 72 ...(let-alist.(car.cur).....(for
30ee0 67 65 2d 2d 67 6c 61 62 2d 67 65 74 20 72 65 70 6f 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 ge--glab-get.repo.......(format.
30f00 22 2f 70 72 6f 6a 65 63 74 73 2f 25 73 2f 69 73 73 75 65 73 2f 25 73 2f 6e 6f 74 65 73 22 20 2e "/projects/%s/issues/%s/notes"..
30f20 70 72 6f 6a 65 63 74 5f 69 64 20 2e 69 69 64 29 0a 20 20 20 20 20 20 27 28 28 70 65 72 5f 70 61 project_id..iid).......'((per_pa
30f40 67 65 20 2e 20 31 30 30 29 29 0a 20 20 20 20 20 20 3a 75 6e 70 61 67 69 6e 61 74 65 20 74 0a 20 ge...100)).......:unpaginate.t..
30f60 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 76 61 6c 75 65 20 5f 68 .....:callback.(lambda.(value._h
30f80 65 61 64 65 72 73 20 5f 73 74 61 74 75 73 20 5f 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 eaders._status._req)............
30fa0 20 20 20 20 20 20 20 28 73 65 74 66 20 28 61 6c 69 73 74 2d 67 65 74 20 27 6e 6f 74 65 73 20 28 .......(setf.(alist-get.'notes.(
30fc0 63 61 72 20 63 75 72 29 29 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 car.cur)).value)................
30fe0 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 62 20 63 62 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d ...(funcall.cb.cb)))))..(cl-defm
31000 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 69 73 73 75 65 20 28 28 72 65 70 6f ethod.forge--update-issue.((repo
31020 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 64 61 74 61 29 0a .forge-gitlab-repository).data).
31040 20 20 28 63 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 61 6e 73 61 63 74 69 6f 6e 20 28 66 6f 72 67 ..(closql-with-transaction.(forg
31060 65 2d 64 62 29 0a 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 61 74 61 0a 20 20 20 20 20 20 e-db).....(let-alist.data.......
31080 28 6c 65 74 2a 20 28 28 69 73 73 75 65 2d 69 64 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d (let*.((issue-id.(forge--object-
310a0 69 64 20 27 66 6f 72 67 65 2d 69 73 73 75 65 20 72 65 70 6f 20 2e 69 69 64 29 29 0a 20 20 20 20 id.'forge-issue.repo..iid)).....
310c0 20 20 20 20 20 20 20 20 20 28 69 73 73 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 .........(issue...............(f
310e0 6f 72 67 65 2d 69 73 73 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 20 20 orge-issue................:id...
31100 20 20 20 20 20 20 20 20 69 73 73 75 65 2d 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ........issue-id................
31120 3a 74 68 65 69 72 2d 69 64 20 20 20 20 20 2e 69 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 :their-id......iid..............
31140 20 20 3a 6e 75 6d 62 65 72 20 20 20 20 20 20 20 2e 69 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 ..:number........iid............
31160 20 20 20 20 3a 73 6c 75 67 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 23 25 73 22 20 ....:slug.........(format."#%s".
31180 2e 69 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 70 6f 73 69 74 6f 72 79 .iid)................:repository
311a0 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...(oref.repo.id)...............
311c0 20 3b 3b 20 47 69 74 6c 61 62 20 64 6f 65 73 6e 27 74 20 6d 61 6b 65 20 61 20 64 69 73 74 69 6e .;;.Gitlab.doesn't.make.a.distin
311e0 63 74 69 6f 6e 20 62 65 74 77 65 65 6e 20 63 6f 6d 70 6c 65 74 65 64 0a 20 20 20 20 20 20 20 20 ction.between.completed.........
31200 20 20 20 20 20 20 20 3b 3b 20 61 6e 64 20 75 6e 70 6c 61 6e 6e 65 64 20 69 73 73 75 65 73 2e 20 .......;;.and.unplanned.issues..
31220 20 54 72 65 61 74 20 74 68 65 6d 20 61 6c 6c 20 61 73 20 63 6f 6d 70 6c 65 74 65 64 2e 0a 20 20 .Treat.them.all.as.completed....
31240 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 74 61 74 65 20 20 20 20 20 20 20 20 28 70 63 61 73 .............:state........(pcas
31260 65 2d 65 78 68 61 75 73 74 69 76 65 20 2e 73 74 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 e-exhaustive..state.............
31280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 63 6c 6f 73 65 64 22 20 27 63 6f ...................("closed".'co
312a0 6d 70 6c 65 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 mpleted)........................
312c0 20 20 20 20 20 20 20 20 28 22 6f 70 65 6e 65 64 22 20 27 6f 70 65 6e 29 29 0a 20 20 20 20 20 20 ........("opened".'open)).......
312e0 20 20 20 20 20 20 20 20 20 3a 61 75 74 68 6f 72 20 20 20 20 20 20 20 2e 61 75 74 68 6f 72 2e 75 .........:author........author.u
31300 73 65 72 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 69 74 6c 65 20 20 20 sername................:title...
31320 20 20 20 20 20 2e 74 69 74 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 72 65 61 ......title................:crea
31340 74 65 64 20 20 20 20 20 20 2e 63 72 65 61 74 65 64 5f 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 ted.......created_at............
31360 20 20 20 20 3a 75 70 64 61 74 65 64 20 20 20 20 20 20 2e 75 70 64 61 74 65 64 5f 61 74 0a 20 20 ....:updated.......updated_at...
31380 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 2e 63 6c 6f 73 65 64 5f 61 74 27 20 6d 61 79 .............;;.`.closed_at'.may
313a0 20 62 65 20 6e 69 6c 20 65 76 65 6e 20 74 68 6f 75 67 68 20 74 68 65 20 69 73 73 75 65 73 20 69 .be.nil.even.though.the.issues.i
313c0 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 63 6c 6f 73 65 64 2e 20 20 49 6e 20 s................;;.closed...In.
313e0 73 75 63 68 20 63 61 73 65 73 20 75 73 65 20 31 2c 20 73 6f 20 74 68 61 74 20 74 68 69 73 20 73 such.cases.use.1,.so.that.this.s
31400 6c 6f 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 74 20 6c 65 61 73 74 20 63 lot................;;.at.least.c
31420 61 6e 20 73 65 72 76 65 20 61 73 20 61 20 62 6f 6f 6c 65 61 6e 2e 0a 20 20 20 20 20 20 20 20 20 an.serve.as.a.boolean...........
31440 20 20 20 20 20 20 3a 63 6c 6f 73 65 64 20 20 20 20 20 20 20 28 6f 72 20 2e 63 6c 6f 73 65 64 5f ......:closed.......(or..closed_
31460 61 74 20 28 61 6e 64 20 28 65 71 75 61 6c 20 2e 73 74 61 74 65 20 22 63 6c 6f 73 65 64 22 29 20 at.(and.(equal..state."closed").
31480 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 6f 63 6b 65 64 2d 70 20 20 20 20 1))................:locked-p....
314a0 20 2e 64 69 73 63 75 73 73 69 6f 6e 5f 6c 6f 63 6b 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 ..discussion_locked.............
314c0 20 20 20 3a 6d 69 6c 65 73 74 6f 6e 65 20 20 20 20 2e 6d 69 6c 65 73 74 6f 6e 65 2e 69 69 64 0a ...:milestone.....milestone.iid.
314e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 6f 64 79 20 20 20 20 20 20 20 20 20 28 66 6f ...............:body.........(fo
31500 72 67 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 73 74 72 69 6e 67 20 2e 64 65 73 63 72 69 70 74 69 6f rge--sanitize-string..descriptio
31520 6e 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 20 28 66 6f n)))).........(closql-insert.(fo
31540 72 67 65 2d 64 62 29 20 69 73 73 75 65 20 74 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 rge-db).issue.t).........(unless
31560 20 28 6d 61 67 69 74 2d 67 65 74 2d 62 6f 6f 6c 65 61 6e 20 22 66 6f 72 67 65 2e 6f 6d 69 74 45 .(magit-get-boolean."forge.omitE
31580 78 70 65 6e 73 69 76 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 xpensive")...........(forge--set
315a0 2d 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 72 65 70 6f 20 69 73 73 75 65 20 27 61 73 73 69 67 6e 65 -connections.repo.issue.'assigne
315c0 65 73 20 2e 61 73 73 69 67 6e 65 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d es..assignees)...........(forge-
315e0 2d 73 65 74 2d 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 72 65 70 6f 20 69 73 73 75 65 20 27 6c 61 62 -set-connections.repo.issue.'lab
31600 65 6c 73 20 2e 6c 61 62 65 6c 73 29 29 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 63 els..labels)).........(dolist.(c
31620 20 2e 6e 6f 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 63 0a ..notes)...........(let-alist.c.
31640 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 6f 73 74 0a 20 20 20 20 20 20 20 20 ............(let.((post.........
31660 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 6f 73 74 0a 20 20 20 ...........(forge-issue-post....
31680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 20 20 20 20 20 28 66 6f 72 67 65 .................:id......(forge
316a0 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 69 73 73 75 65 2d 69 64 20 2e 69 64 29 0a 20 20 20 20 20 20 --object-id.issue-id..id).......
316c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 73 73 75 65 20 20 20 69 73 73 75 65 2d 69 64 0a ..............:issue...issue-id.
316e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 75 6d 62 65 72 20 20 2e 69 64 ....................:number...id
31700 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 75 74 68 6f 72 20 20 2e 61 .....................:author...a
31720 75 74 68 6f 72 2e 75 73 65 72 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 uthor.username..................
31740 20 20 20 3a 63 72 65 61 74 65 64 20 2e 63 72 65 61 74 65 64 5f 61 74 0a 20 20 20 20 20 20 20 20 ...:created..created_at.........
31760 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 70 64 61 74 65 64 20 2e 75 70 64 61 74 65 64 5f 61 74 ............:updated..updated_at
31780 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 6f 64 79 20 20 20 20 28 66 .....................:body....(f
317a0 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 73 74 72 69 6e 67 20 2e 62 6f 64 79 29 29 29 29 0a orge--sanitize-string..body)))).
317c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 20 28 66 6f ..............(closql-insert.(fo
317e0 72 67 65 2d 64 62 29 20 70 6f 73 74 20 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 rge-db).post.t)))).........(let.
31800 28 28 75 6e 74 69 6c 20 28 6f 72 65 66 20 72 65 70 6f 20 69 73 73 75 65 73 2d 75 6e 74 69 6c 29 ((until.(oref.repo.issues-until)
31820 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 28 6e 6f 74 20 75 6e 74 69 ))...........(when.(or.(not.unti
31840 6c 29 20 28 73 74 72 69 6e 67 3e 20 2e 75 70 64 61 74 65 64 5f 61 74 20 75 6e 74 69 6c 29 29 0a l).(string>..updated_at.until)).
31860 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 69 73 73 75 65 73 2d 75 6e ............(oset.repo.issues-un
31880 74 69 6c 20 2e 75 70 64 61 74 65 64 5f 61 74 29 29 29 0a 20 20 20 20 20 20 20 20 69 73 73 75 65 til..updated_at))).........issue
318a0 29 29 29 29 0a 0a 3b 3b 3b 3b 20 50 75 6c 6c 72 65 71 73 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 ))))..;;;;.Pullreqs..(cl-defmeth
318c0 6f 64 20 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 70 75 6c 6c 72 65 71 73 20 28 28 72 65 70 6f 20 od.forge--fetch-pullreqs.((repo.
318e0 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 63 61 6c 6c 62 61 63 forge-gitlab-repository).callbac
31900 6b 20 73 69 6e 63 65 29 0a 20 20 28 6c 65 74 20 28 28 63 62 20 28 6c 65 74 20 28 76 61 6c 20 63 k.since)...(let.((cb.(let.(val.c
31920 75 72 20 63 6e 74 20 70 6f 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 ur.cnt.pos)...............(lambd
31940 61 20 28 63 62 20 26 6f 70 74 69 6f 6e 61 6c 20 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 a.(cb.&optional.v)..............
31960 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 ...(cond..................((not.
31980 70 6f 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 65 74 71 pos)...................(if.(setq
319a0 20 63 75 72 20 28 73 65 74 71 20 76 61 6c 20 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .cur.(setq.val.v))..............
319c0 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .........(progn.................
319e0 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 6f 73 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 ........(setq.pos.1)............
31a00 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6e 74 20 28 6c 65 6e 67 74 68 20 76 .............(setq.cnt.(length.v
31a20 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f al)).........................(fo
31a40 72 67 65 2d 2d 6d 73 67 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 22 50 75 6c 6c 69 6e 67 20 70 75 rge--msg.nil.nil.nil."Pulling.pu
31a60 6c 6c 72 65 71 20 25 73 2f 25 73 22 20 70 6f 73 20 63 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 llreq.%s/%s".pos.cnt)...........
31a80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 70 75 6c 6c ..............(forge--fetch-pull
31aa0 72 65 71 2d 70 6f 73 74 73 20 72 65 70 6f 20 63 75 72 20 63 62 29 29 0a 20 20 20 20 20 20 20 20 req-posts.repo.cur.cb)).........
31ac0 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 74 20 74 ............(forge--msg.repo.t.t
31ae0 20 22 50 75 6c 6c 69 6e 67 20 52 45 50 4f 20 70 75 6c 6c 72 65 71 73 22 29 0a 20 20 20 20 20 20 ."Pulling.REPO.pullreqs").......
31b00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 6c 62 61 63 6b 20 ..............(funcall.callback.
31b20 63 61 6c 6c 62 61 63 6b 20 28 63 6f 6e 73 20 27 70 75 6c 6c 72 65 71 73 20 76 61 6c 29 29 29 29 callback.(cons.'pullreqs.val))))
31b40 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 61 73 73 71 20 27 73 ..................((not.(assq.'s
31b60 6f 75 72 63 65 5f 70 72 6f 6a 65 63 74 20 28 63 61 72 20 63 75 72 29 29 29 0a 20 20 20 20 20 20 ource_project.(car.cur))).......
31b80 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 70 75 6c 6c 72 65 ............(forge--fetch-pullre
31ba0 71 2d 73 6f 75 72 63 65 2d 72 65 70 6f 20 72 65 70 6f 20 63 75 72 20 63 62 29 29 0a 20 20 20 20 q-source-repo.repo.cur.cb)).....
31bc0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 61 73 73 71 20 27 74 61 72 67 65 74 .............((not.(assq.'target
31be0 5f 70 72 6f 6a 65 63 74 20 28 63 61 72 20 63 75 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 _project.(car.cur)))............
31c00 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 70 75 6c 6c 72 65 71 2d 74 61 72 .......(forge--fetch-pullreq-tar
31c20 67 65 74 2d 72 65 70 6f 20 72 65 70 6f 20 63 75 72 20 63 62 29 29 0a 20 20 20 20 20 20 20 20 20 get-repo.repo.cur.cb))..........
31c40 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 ........(t...................(if
31c60 20 28 73 65 74 71 20 63 75 72 20 28 63 64 72 20 63 75 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 .(setq.cur.(cdr.cur))...........
31c80 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ............(progn..............
31ca0 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 70 6f 73 29 0a 20 20 20 20 20 20 20 ...........(cl-incf.pos)........
31cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 6e 69 6c .................(forge--msg.nil
31ce0 20 6e 69 6c 20 6e 69 6c 20 22 50 75 6c 6c 69 6e 67 20 70 75 6c 6c 72 65 71 20 25 73 2f 25 73 22 .nil.nil."Pulling.pullreq.%s/%s"
31d00 20 70 6f 73 20 63 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .pos.cnt).......................
31d20 20 20 28 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 73 20 72 65 ..(forge--fetch-pullreq-posts.re
31d40 70 6f 20 63 75 72 20 63 62 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 po.cur.cb)).....................
31d60 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 74 20 74 20 22 50 75 6c 6c 69 6e 67 20 52 45 (forge--msg.repo.t.t."Pulling.RE
31d80 50 4f 20 70 75 6c 6c 72 65 71 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PO.pullreqs")...................
31da0 20 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b 20 28 63 6f ..(funcall.callback.callback.(co
31dc0 6e 73 20 27 70 75 6c 6c 72 65 71 73 20 76 61 6c 29 29 29 29 29 29 29 29 29 0a 20 20 20 20 28 66 ns.'pullreqs.val))))))))).....(f
31de0 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 74 20 6e 69 6c 20 22 50 75 6c 6c 69 6e 67 20 52 45 orge--msg.repo.t.nil."Pulling.RE
31e00 50 4f 20 70 75 6c 6c 72 65 71 73 22 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 67 PO.pullreqs").....(forge--glab-g
31e20 65 74 20 72 65 70 6f 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 6d 65 72 67 et.repo."/projects/:project/merg
31e40 65 5f 72 65 71 75 65 73 74 73 22 0a 20 20 20 20 20 20 60 28 28 70 65 72 5f 70 61 67 65 20 2e 20 e_requests".......`((per_page...
31e60 31 30 30 29 0a 20 20 20 20 20 20 20 20 28 6f 72 64 65 72 5f 62 79 20 2e 20 22 75 70 64 61 74 65 100).........(order_by..."update
31e80 64 5f 61 74 22 29 0a 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 2d 6c 65 74 20 28 28 61 66 74 65 d_at").........,@(and-let.((afte
31ea0 72 20 28 6f 72 20 73 69 6e 63 65 20 28 6f 72 65 66 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 73 2d r.(or.since.(oref.repo.pullreqs-
31ec0 75 6e 74 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 75 70 64 61 74 65 64 until)))).............`((updated
31ee0 5f 61 66 74 65 72 20 2e 20 2c 61 66 74 65 72 29 29 29 29 0a 20 20 20 20 20 20 3a 75 6e 70 61 67 _after...,after)))).......:unpag
31f00 69 6e 61 74 65 20 74 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 inate.t.......:callback.(lambda.
31f20 28 76 61 6c 75 65 20 5f 68 65 61 64 65 72 73 20 5f 73 74 61 74 75 73 20 5f 72 65 71 29 0a 20 20 (value._headers._status._req)...
31f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 62 20 63 62 20 76 ................(funcall.cb.cb.v
31f60 61 6c 75 65 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d alue)))))..(cl-defmethod.forge--
31f80 66 65 74 63 68 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 73 0a 20 20 28 28 72 65 70 6f 20 66 6f 72 fetch-pullreq-posts...((repo.for
31fa0 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 63 75 72 20 63 62 29 0a 20 20 ge-gitlab-repository).cur.cb)...
31fc0 28 6c 65 74 2d 61 6c 69 73 74 20 28 63 61 72 20 63 75 72 29 0a 20 20 20 20 28 66 6f 72 67 65 2d (let-alist.(car.cur).....(forge-
31fe0 2d 67 6c 61 62 2d 67 65 74 20 72 65 70 6f 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 2f 70 -glab-get.repo.......(format."/p
32000 72 6f 6a 65 63 74 73 2f 25 73 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 2f 25 73 2f 6e 6f 74 rojects/%s/merge_requests/%s/not
32020 65 73 22 20 2e 74 61 72 67 65 74 5f 70 72 6f 6a 65 63 74 5f 69 64 20 2e 69 69 64 29 0a 20 20 20 es"..target_project_id..iid)....
32040 20 20 20 27 28 28 70 65 72 5f 70 61 67 65 20 2e 20 31 30 30 29 29 0a 20 20 20 20 20 20 3a 75 6e ...'((per_page...100)).......:un
32060 70 61 67 69 6e 61 74 65 20 74 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 6c 61 6d 62 paginate.t.......:callback.(lamb
32080 64 61 20 28 76 61 6c 75 65 20 5f 68 65 61 64 65 72 73 20 5f 73 74 61 74 75 73 20 5f 72 65 71 29 da.(value._headers._status._req)
320a0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 61 6c 69 73 74 2d ...................(setf.(alist-
320c0 67 65 74 20 27 6e 6f 74 65 73 20 28 63 61 72 20 63 75 72 29 29 20 76 61 6c 75 65 29 0a 20 20 20 get.'notes.(car.cur)).value)....
320e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 62 20 63 62 29 29 29 ...............(funcall.cb.cb)))
32100 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 70 ))..(cl-defmethod.forge--fetch-p
32120 75 6c 6c 72 65 71 2d 73 6f 75 72 63 65 2d 72 65 70 6f 0a 20 20 28 28 72 65 70 6f 20 66 6f 72 67 ullreq-source-repo...((repo.forg
32140 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 63 75 72 20 63 62 29 0a 20 20 3b e-gitlab-repository).cur.cb)...;
32160 3b 20 49 66 20 74 68 65 20 66 6f 72 6b 20 6e 6f 20 6c 6f 6e 67 65 72 20 65 78 69 73 74 73 2c 20 ;.If.the.fork.no.longer.exists,.
32180 74 68 65 6e 20 60 2e 73 6f 75 72 63 65 5f 70 72 6f 6a 65 63 74 5f 69 64 27 20 69 73 20 6e 69 6c then.`.source_project_id'.is.nil
321a0 2e 0a 20 20 3b 3b 20 54 68 69 73 20 77 69 6c 6c 20 6c 65 61 64 20 74 6f 20 64 69 66 66 69 63 75 ....;;.This.will.lead.to.difficu
321c0 6c 74 69 65 73 20 6c 61 74 65 72 20 6f 6e 20 62 75 74 20 74 68 65 72 65 20 69 73 20 6e 6f 74 68 lties.later.on.but.there.is.noth
321e0 69 6e 67 20 77 65 0a 20 20 3b 3b 20 63 61 6e 20 64 6f 20 61 62 6f 75 74 20 69 74 2e 0a 20 20 28 ing.we...;;.can.do.about.it....(
32200 6c 65 74 2d 61 6c 69 73 74 20 28 63 61 72 20 63 75 72 29 0a 20 20 20 20 28 69 66 20 2e 73 6f 75 let-alist.(car.cur).....(if..sou
32220 72 63 65 5f 70 72 6f 6a 65 63 74 5f 69 64 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 rce_project_id.........(forge--g
32240 6c 61 62 2d 67 65 74 20 72 65 70 6f 20 28 66 6f 72 6d 61 74 20 22 2f 70 72 6f 6a 65 63 74 73 2f lab-get.repo.(format."/projects/
32260 25 73 22 20 2e 73 6f 75 72 63 65 5f 70 72 6f 6a 65 63 74 5f 69 64 29 20 6e 69 6c 0a 20 20 20 20 %s"..source_project_id).nil.....
32280 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 5f 65 72 72 20 5f ......:errorback.(lambda.(_err._
322a0 68 65 61 64 65 72 73 20 5f 73 74 61 74 75 73 20 5f 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 headers._status._req)...........
322c0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 61 6c 69 73 74 2d 67 65 74 20 27 73 .............(setf.(alist-get.'s
322e0 6f 75 72 63 65 5f 70 72 6f 6a 65 63 74 20 28 63 61 72 20 63 75 72 29 29 20 6e 69 6c 29 0a 20 20 ource_project.(car.cur)).nil)...
32300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 62 .....................(funcall.cb
32320 20 63 62 29 29 0a 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 6c 61 6d 62 64 .cb))...........:callback.(lambd
32340 61 20 28 76 61 6c 75 65 20 5f 68 65 61 64 65 72 73 20 5f 73 74 61 74 75 73 20 5f 72 65 71 29 0a a.(value._headers._status._req).
32360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 61 6c 69 ......................(setf.(ali
32380 73 74 2d 67 65 74 20 27 73 6f 75 72 63 65 5f 70 72 6f 6a 65 63 74 20 28 63 61 72 20 63 75 72 29 st-get.'source_project.(car.cur)
323a0 29 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ).value).......................(
323c0 66 75 6e 63 61 6c 6c 20 63 62 20 63 62 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 66 20 28 61 6c funcall.cb.cb))).......(setf.(al
323e0 69 73 74 2d 67 65 74 20 27 73 6f 75 72 63 65 5f 70 72 6f 6a 65 63 74 20 28 63 61 72 20 63 75 72 ist-get.'source_project.(car.cur
32400 29 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 62 20 63 62 29 29 29 29 )).nil).......(funcall.cb.cb))))
32420 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 70 75 6c ..(cl-defmethod.forge--fetch-pul
32440 6c 72 65 71 2d 74 61 72 67 65 74 2d 72 65 70 6f 0a 20 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d lreq-target-repo...((repo.forge-
32460 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 63 75 72 20 63 62 29 0a 20 20 28 6c 65 gitlab-repository).cur.cb)...(le
32480 74 2d 61 6c 69 73 74 20 28 63 61 72 20 63 75 72 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 6c t-alist.(car.cur).....(forge--gl
324a0 61 62 2d 67 65 74 20 72 65 70 6f 20 28 66 6f 72 6d 61 74 20 22 2f 70 72 6f 6a 65 63 74 73 2f 25 ab-get.repo.(format."/projects/%
324c0 73 22 20 2e 74 61 72 67 65 74 5f 70 72 6f 6a 65 63 74 5f 69 64 29 20 6e 69 6c 0a 20 20 20 20 20 s"..target_project_id).nil......
324e0 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 5f 65 72 72 20 5f 68 65 61 64 65 .:errorback.(lambda.(_err._heade
32500 72 73 20 5f 73 74 61 74 75 73 20 5f 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rs._status._req)................
32520 20 20 20 20 28 73 65 74 66 20 28 61 6c 69 73 74 2d 67 65 74 20 27 74 61 72 67 65 74 5f 70 72 6f ....(setf.(alist-get.'target_pro
32540 6a 65 63 74 20 28 63 61 72 20 63 75 72 29 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 ject.(car.cur)).nil)............
32560 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 62 20 63 62 29 29 0a 20 20 20 20 20 20 3a ........(funcall.cb.cb)).......:
32580 63 61 6c 6c 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 76 61 6c 75 65 20 5f 68 65 61 64 65 72 73 callback.(lambda.(value._headers
325a0 20 5f 73 74 61 74 75 73 20 5f 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ._status._req)..................
325c0 20 28 73 65 74 66 20 28 61 6c 69 73 74 2d 67 65 74 20 27 74 61 72 67 65 74 5f 70 72 6f 6a 65 63 .(setf.(alist-get.'target_projec
325e0 74 20 28 63 61 72 20 63 75 72 29 29 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 t.(car.cur)).value).............
32600 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 62 20 63 62 29 29 29 29 29 0a 0a 28 63 6c 2d 64 ......(funcall.cb.cb)))))..(cl-d
32620 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 70 75 6c 6c 72 65 71 20 28 efmethod.forge--update-pullreq.(
32640 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 64 (repo.forge-gitlab-repository).d
32660 61 74 61 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 61 6e 73 61 63 74 69 6f 6e 20 ata)...(closql-with-transaction.
32680 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 61 74 61 0a 20 (forge-db).....(let-alist.data..
326a0 20 20 20 20 20 28 6c 65 74 2a 20 28 28 70 75 6c 6c 72 65 71 2d 69 64 20 28 66 6f 72 67 65 2d 2d .....(let*.((pullreq-id.(forge--
326c0 6f 62 6a 65 63 74 2d 69 64 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 72 65 70 6f 20 2e 69 object-id.'forge-pullreq.repo..i
326e0 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 id))..............(pullreq......
32700 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 20 20 20 .........(forge-pullreq.........
32720 20 20 20 20 20 20 20 3a 69 64 20 20 20 20 20 20 20 20 20 20 20 70 75 6c 6c 72 65 71 2d 69 64 0a .......:id...........pullreq-id.
32740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 68 65 69 72 2d 69 64 20 20 20 20 20 2e 69 69 ...............:their-id......ii
32760 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 75 6d 62 65 72 20 20 20 20 20 20 20 2e d................:number........
32780 69 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 6c 75 67 20 20 20 20 20 20 20 20 iid................:slug........
327a0 20 28 66 6f 72 6d 61 74 20 22 21 25 73 22 20 2e 69 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 .(format."!%s"..iid)............
327c0 20 20 20 20 3a 72 65 70 6f 73 69 74 6f 72 79 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 ....:repository...(oref.repo.id)
327e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 74 61 74 65 20 20 20 20 20 20 20 20 28 70 ................:state........(p
32800 63 61 73 65 2d 65 78 68 61 75 73 74 69 76 65 20 2e 73 74 61 74 65 0a 20 20 20 20 20 20 20 20 20 case-exhaustive..state..........
32820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 6d 65 72 67 65 64 22 20 ......................("merged".
32840 27 6d 65 72 67 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 'merged)........................
32860 20 20 20 20 20 20 20 20 28 22 63 6c 6f 73 65 64 22 20 27 72 65 6a 65 63 74 65 64 29 0a 20 20 20 ........("closed".'rejected)....
32880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 6f 70 ............................("op
328a0 65 6e 65 64 22 20 27 6f 70 65 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 75 ened".'open))................:au
328c0 74 68 6f 72 20 20 20 20 20 20 20 2e 61 75 74 68 6f 72 2e 75 73 65 72 6e 61 6d 65 0a 20 20 20 20 thor........author.username.....
328e0 20 20 20 20 20 20 20 20 20 20 20 3a 74 69 74 6c 65 20 20 20 20 20 20 20 20 2e 74 69 74 6c 65 0a ...........:title.........title.
32900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 72 65 61 74 65 64 20 20 20 20 20 20 2e 63 72 ...............:created.......cr
32920 65 61 74 65 64 5f 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 70 64 61 74 65 64 eated_at................:updated
32940 20 20 20 20 20 20 2e 75 70 64 61 74 65 64 5f 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .......updated_at...............
32960 20 3b 3b 20 60 2e 6d 65 72 67 65 64 5f 61 74 27 20 61 6e 64 20 60 2e 63 6c 6f 73 65 64 5f 61 74 .;;.`.merged_at'.and.`.closed_at
32980 27 20 6d 61 79 20 62 6f 74 68 20 62 65 20 6e 69 6c 20 65 76 65 6e 0a 20 20 20 20 20 20 20 20 20 '.may.both.be.nil.even..........
329a0 20 20 20 20 20 20 3b 3b 20 74 68 6f 75 67 68 20 74 68 65 20 70 75 6c 6c 72 65 71 20 69 73 20 6d ......;;.though.the.pullreq.is.m
329c0 65 72 67 65 64 20 6f 72 20 6f 74 68 65 72 77 69 73 65 20 63 6c 6f 73 65 64 2e 0a 20 20 20 20 20 erged.or.otherwise.closed.......
329e0 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 6e 20 73 75 63 68 20 63 61 73 65 73 20 75 73 65 20 31 ..........;;.In.such.cases.use.1
32a00 2c 20 73 6f 20 74 68 61 74 20 74 68 65 73 65 20 73 6c 6f 74 73 20 61 74 20 6c 65 61 73 74 0a 20 ,.so.that.these.slots.at.least..
32a20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 63 61 6e 20 73 65 72 76 65 20 61 73 20 62 6f ..............;;.can.serve.as.bo
32a40 6f 6c 65 61 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 65 64 20 20 oleans.................:closed..
32a60 20 20 20 20 20 28 6f 72 20 2e 63 6c 6f 73 65 64 5f 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 .....(or..closed_at.............
32a80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6d 65 6d 62 65 .....................(and.(membe
32aa0 72 20 2e 73 74 61 74 65 20 27 28 22 63 6c 6f 73 65 64 22 20 22 6d 65 72 67 65 64 22 29 29 20 31 r..state.'("closed"."merged")).1
32ac0 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6d 65 72 67 65 64 20 20 20 20 20 20 20 ))................:merged.......
32ae0 28 6f 72 20 2e 6d 65 72 67 65 64 5f 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (or..merged_at..................
32b00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 75 61 6c 20 2e 73 74 61 ................(and.(equal..sta
32b20 74 65 20 22 6d 65 72 67 65 64 22 29 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 te."merged").1))................
32b40 3a 64 72 61 66 74 2d 70 20 20 20 20 20 20 2e 64 72 61 66 74 0a 20 20 20 20 20 20 20 20 20 20 20 :draft-p.......draft............
32b60 20 20 20 20 3a 6c 6f 63 6b 65 64 2d 70 20 20 20 20 20 2e 64 69 73 63 75 73 73 69 6f 6e 5f 6c 6f ....:locked-p......discussion_lo
32b80 63 6b 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 65 64 69 74 61 62 6c 65 2d 70 20 cked................:editable-p.
32ba0 20 20 2e 61 6c 6c 6f 77 5f 6d 61 69 6e 74 61 69 6e 65 72 5f 74 6f 5f 70 75 73 68 0a 20 20 20 20 ...allow_maintainer_to_push.....
32bc0 20 20 20 20 20 20 20 20 20 20 20 3a 63 72 6f 73 73 2d 72 65 70 6f 2d 70 20 28 6e 6f 74 20 28 65 ...........:cross-repo-p.(not.(e
32be0 71 75 61 6c 20 2e 73 6f 75 72 63 65 5f 70 72 6f 6a 65 63 74 5f 69 64 0a 20 20 20 20 20 20 20 20 qual..source_project_id.........
32c00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
32c20 20 2e 74 61 72 67 65 74 5f 70 72 6f 6a 65 63 74 5f 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 ..target_project_id))...........
32c40 20 20 20 20 20 3a 62 61 73 65 2d 72 65 66 20 20 20 20 20 2e 74 61 72 67 65 74 5f 62 72 61 6e 63 .....:base-ref......target_branc
32c60 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 61 73 65 2d 72 65 76 20 20 20 20 20 2e h................:base-rev......
32c80 64 69 66 66 5f 72 65 66 73 2e 73 74 61 72 74 5f 73 68 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 diff_refs.start_sha.............
32ca0 20 20 20 3a 62 61 73 65 2d 72 65 70 6f 20 20 20 20 2e 74 61 72 67 65 74 5f 70 72 6f 6a 65 63 74 ...:base-repo.....target_project
32cc0 2e 70 61 74 68 5f 77 69 74 68 5f 6e 61 6d 65 73 70 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 .path_with_namespace............
32ce0 20 20 20 20 3a 68 65 61 64 2d 72 65 66 20 20 20 20 20 2e 73 6f 75 72 63 65 5f 62 72 61 6e 63 68 ....:head-ref......source_branch
32d00 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 65 61 64 2d 72 65 76 20 20 20 20 20 2e 64 ................:head-rev......d
32d20 69 66 66 5f 72 65 66 73 2e 68 65 61 64 5f 73 68 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 iff_refs.head_sha...............
32d40 20 3a 68 65 61 64 2d 75 73 65 72 20 20 20 20 2e 73 6f 75 72 63 65 5f 70 72 6f 6a 65 63 74 2e 6f .:head-user.....source_project.o
32d60 77 6e 65 72 2e 75 73 65 72 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 65 wner.username................:he
32d80 61 64 2d 72 65 70 6f 20 20 20 20 2e 73 6f 75 72 63 65 5f 70 72 6f 6a 65 63 74 2e 70 61 74 68 5f ad-repo.....source_project.path_
32da0 77 69 74 68 5f 6e 61 6d 65 73 70 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6d with_namespace................:m
32dc0 69 6c 65 73 74 6f 6e 65 20 20 20 20 2e 6d 69 6c 65 73 74 6f 6e 65 2e 69 69 64 0a 20 20 20 20 20 ilestone.....milestone.iid......
32de0 20 20 20 20 20 20 20 20 20 20 3a 62 6f 64 79 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d ..........:body.........(forge--
32e00 73 61 6e 69 74 69 7a 65 2d 73 74 72 69 6e 67 20 2e 64 65 73 63 72 69 70 74 69 6f 6e 29 29 29 29 sanitize-string..description))))
32e20 0a 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 20 28 66 6f 72 67 65 2d 64 .........(closql-insert.(forge-d
32e40 62 29 20 70 75 6c 6c 72 65 71 20 74 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6d b).pullreq.t).........(unless.(m
32e60 61 67 69 74 2d 67 65 74 2d 62 6f 6f 6c 65 61 6e 20 22 66 6f 72 67 65 2e 6f 6d 69 74 45 78 70 65 agit-get-boolean."forge.omitExpe
32e80 6e 73 69 76 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 63 6f nsive")...........(forge--set-co
32ea0 6e 6e 65 63 74 69 6f 6e 73 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 20 27 61 73 73 69 67 6e 65 65 nnections.repo.pullreq.'assignee
32ec0 73 20 2e 61 73 73 69 67 6e 65 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d s..assignees)...........(forge--
32ee0 73 65 74 2d 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 20 27 72 65 set-connections.repo.pullreq.'re
32f00 76 69 65 77 2d 72 65 71 75 65 73 74 73 20 2e 72 65 76 69 65 77 65 72 73 29 0a 20 20 20 20 20 20 view-requests..reviewers).......
32f20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 72 65 70 6f ....(forge--set-connections.repo
32f40 20 70 75 6c 6c 72 65 71 20 27 6c 61 62 65 6c 73 20 2e 6c 61 62 65 6c 73 29 29 0a 20 20 20 20 20 .pullreq.'labels..labels))......
32f60 20 20 20 28 64 6f 6c 69 73 74 20 28 63 20 2e 6e 6f 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 ...(dolist.(c..notes)...........
32f80 28 6c 65 74 2d 61 6c 69 73 74 20 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 (let-alist.c.............(let.((
32fa0 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 post....................(forge-p
32fc0 75 6c 6c 72 65 71 2d 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ullreq-post.....................
32fe0 3a 69 64 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 70 75 6c 6c 72 :id......(forge--object-id.pullr
33000 65 71 2d 69 64 20 2e 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a eq-id..id).....................:
33020 70 75 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 2d 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 pullreq.pullreq-id..............
33040 20 20 20 20 20 20 20 3a 6e 75 6d 62 65 72 20 20 2e 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 .......:number...id.............
33060 20 20 20 20 20 20 20 20 3a 61 75 74 68 6f 72 20 20 2e 61 75 74 68 6f 72 2e 75 73 65 72 6e 61 6d ........:author...author.usernam
33080 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 72 65 61 74 65 64 20 2e e.....................:created..
330a0 63 72 65 61 74 65 64 5f 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a created_at.....................:
330c0 75 70 64 61 74 65 64 20 2e 75 70 64 61 74 65 64 5f 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 updated..updated_at.............
330e0 20 20 20 20 20 20 20 20 3a 62 6f 64 79 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a ........:body....(forge--sanitiz
33100 65 2d 73 74 72 69 6e 67 20 2e 62 6f 64 79 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 e-string..body))))..............
33120 20 28 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 20 28 66 6f 72 67 65 2d 64 62 29 20 70 6f 73 74 20 .(closql-insert.(forge-db).post.
33140 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 75 6e 74 69 6c 20 28 6f 72 65 66 t)))).........(let.((until.(oref
33160 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 73 2d 75 6e 74 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 .repo.pullreqs-until))).........
33180 20 20 28 77 68 65 6e 20 28 6f 72 20 28 6e 6f 74 20 75 6e 74 69 6c 29 20 28 73 74 72 69 6e 67 3e ..(when.(or.(not.until).(string>
331a0 20 2e 75 70 64 61 74 65 64 5f 61 74 20 75 6e 74 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 ..updated_at.until))............
331c0 20 28 6f 73 65 74 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 73 2d 75 6e 74 69 6c 20 2e 75 70 64 61 .(oset.repo.pullreqs-until..upda
331e0 74 65 64 5f 61 74 29 29 29 0a 20 20 20 20 20 20 20 20 70 75 6c 6c 72 65 71 29 29 29 29 0a 0a 3b ted_at))).........pullreq))))..;
33200 3b 3b 3b 20 4f 74 68 65 72 0a 0a 3b 3b 20 54 68 65 20 65 78 74 65 6e 64 20 6f 66 20 74 68 65 20 ;;;.Other..;;.The.extend.of.the.
33220 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 66 6f 72 20 22 47 45 54 20 2f 70 72 6f 6a 65 63 74 73 documentation.for."GET./projects
33240 2f 3a 69 64 2f 75 73 65 72 73 22 20 69 73 0a 3b 3b 20 22 47 65 74 20 74 68 65 20 75 73 65 72 73 /:id/users".is.;;."Get.the.users
33260 20 6c 69 73 74 20 6f 66 20 61 20 70 72 6f 6a 65 63 74 2e 22 20 20 49 20 64 6f 6e 27 74 20 6b 6e .list.of.a.project."..I.don't.kn
33280 6f 77 20 77 68 61 74 20 74 68 61 74 20 6d 65 61 6e 73 2c 0a 3b 3b 20 62 75 74 20 69 74 20 73 74 ow.what.that.means,.;;.but.it.st
332a0 61 6e 64 73 20 74 6f 20 72 65 61 73 6f 6e 20 74 68 61 74 20 74 68 69 73 20 6d 75 73 74 20 61 74 ands.to.reason.that.this.must.at
332c0 20 6c 65 61 73 74 20 6f 76 65 72 6c 61 70 20 77 69 74 68 20 74 68 65 0a 3b 3b 20 73 65 74 20 6f .least.overlap.with.the.;;.set.o
332e0 66 20 75 73 65 72 73 20 74 68 61 74 20 63 61 6e 20 62 65 20 61 73 73 69 67 6e 65 64 20 74 6f 20 f.users.that.can.be.assigned.to.
33300 74 6f 70 69 63 73 2e 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 65 topics...(cl-defmethod.forge--fe
33320 74 63 68 2d 61 73 73 69 67 6e 65 65 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 tch-assignees.((repo.forge-gitla
33340 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 63 61 6c 6c 62 61 63 6b 29 0a 20 20 28 66 6f 72 67 65 b-repository).callback)...(forge
33360 2d 2d 67 6c 61 62 2d 67 65 74 20 72 65 70 6f 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a --glab-get.repo."/projects/:proj
33380 65 63 74 2f 75 73 65 72 73 22 0a 20 20 20 20 27 28 28 70 65 72 5f 70 61 67 65 20 2e 20 31 30 30 ect/users".....'((per_page...100
333a0 29 29 0a 20 20 20 20 3a 75 6e 70 61 67 69 6e 61 74 65 20 74 0a 20 20 20 20 3a 63 61 6c 6c 62 61 )).....:unpaginate.t.....:callba
333c0 63 6b 20 28 6c 61 6d 62 64 61 20 28 76 61 6c 75 65 20 5f 68 65 61 64 65 72 73 20 5f 73 74 61 74 ck.(lambda.(value._headers._stat
333e0 75 73 20 5f 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c us._req).................(funcal
33400 6c 20 63 61 6c 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b 20 28 63 6f 6e 73 20 27 61 73 73 69 67 l.callback.callback.(cons.'assig
33420 6e 65 65 73 20 76 61 6c 75 65 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 nees.value)))))..(cl-defmethod.f
33440 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 61 73 73 69 67 6e 65 65 73 20 28 28 72 65 70 6f 20 66 6f orge--update-assignees.((repo.fo
33460 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 64 61 74 61 29 0a 20 20 28 rge-gitlab-repository).data)...(
33480 6f 73 65 74 20 72 65 70 6f 20 61 73 73 69 67 6e 65 65 73 0a 20 20 20 20 20 20 20 20 28 77 69 74 oset.repo.assignees.........(wit
334a0 68 2d 73 6c 6f 74 73 20 28 69 64 29 20 72 65 70 6f 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 h-slots.(id).repo...........(map
334c0 63 61 72 20 28 6c 61 6d 62 64 61 20 28 72 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 car.(lambda.(row)...............
334e0 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 72 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 ......(let-alist.row............
33500 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 6f 72 20 6f 74 68 65 72 20 66 6f 72 67 65 73 20 77 ...........;;.For.other.forges.w
33520 65 20 64 6f 6e 27 74 20 6e 65 65 64 20 74 6f 20 73 74 6f 72 65 20 60 69 64 27 0a 20 20 20 20 20 e.don't.need.to.store.`id'......
33540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 62 75 74 20 68 65 72 65 20 77 65 20 .................;;.but.here.we.
33560 64 6f 20 62 65 63 61 75 73 65 20 74 68 61 74 27 73 20 77 68 61 74 20 68 61 73 20 74 6f 20 62 65 do.because.that's.what.has.to.be
33580 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 75 73 65 64 20 77 .......................;;.used.w
335a0 68 65 6e 20 61 73 73 69 67 6e 69 6e 67 20 69 73 73 75 65 73 2e 0a 20 20 20 20 20 20 20 20 20 20 hen.assigning.issues............
335c0 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 ............(list.(forge--object
335e0 2d 69 64 20 69 64 20 2e 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -id.id..id).....................
33600 20 20 20 20 20 20 20 20 2e 75 73 65 72 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .........username...............
33620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 ...............name.............
33640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 .................id)))..........
33660 20 20 20 20 20 20 20 20 20 64 61 74 61 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 .........data))))..(cl-defmethod
33680 20 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 66 6f 72 6b 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 .forge--fetch-forks.((repo.forge
336a0 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 63 61 6c 6c 62 61 63 6b 29 0a 20 20 -gitlab-repository).callback)...
336c0 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 67 65 74 20 72 65 70 6f 20 22 2f 70 72 6f 6a 65 63 74 73 (forge--glab-get.repo."/projects
336e0 2f 3a 70 72 6f 6a 65 63 74 2f 66 6f 72 6b 73 22 0a 20 20 20 20 27 28 28 70 65 72 5f 70 61 67 65 /:project/forks".....'((per_page
33700 20 2e 20 31 30 30 29 0a 20 20 20 20 20 20 28 73 69 6d 70 6c 65 20 2e 20 74 29 29 0a 20 20 20 20 ...100).......(simple...t)).....
33720 3a 75 6e 70 61 67 69 6e 61 74 65 20 74 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 6c 61 6d :unpaginate.t.....:callback.(lam
33740 62 64 61 20 28 76 61 6c 75 65 20 5f 68 65 61 64 65 72 73 20 5f 73 74 61 74 75 73 20 5f 72 65 71 bda.(value._headers._status._req
33760 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 6c 62 ).................(funcall.callb
33780 61 63 6b 20 63 61 6c 6c 62 61 63 6b 20 28 63 6f 6e 73 20 27 66 6f 72 6b 73 20 76 61 6c 75 65 29 ack.callback.(cons.'forks.value)
337a0 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 ))))..(cl-defmethod.forge--updat
337c0 65 2d 66 6f 72 6b 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f e-forks.((repo.forge-gitlab-repo
337e0 73 69 74 6f 72 79 29 20 64 61 74 61 29 0a 20 20 28 6f 73 65 74 20 72 65 70 6f 20 66 6f 72 6b 73 sitory).data)...(oset.repo.forks
33800 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 69 64 29 20 72 65 70 6f 0a 20 .........(with-slots.(id).repo..
33820 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 72 6f 77 29 0a 20 .........(mapcar.(lambda.(row)..
33840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 72 6f ...................(let-alist.ro
33860 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 w.......................(nconc.(
33880 66 6f 72 67 65 2d 2d 72 65 70 6f 73 69 74 6f 72 79 2d 69 64 73 0a 20 20 20 20 20 20 20 20 20 20 forge--repository-ids...........
338a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 69 65 69 6f 2d 6f 62 6a 65 63 ....................(eieio-objec
338c0 74 2d 63 6c 61 73 73 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t-class.repo)...................
338e0 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 67 69 74 68 6f 73 74 29 0a ............(oref.repo.githost).
33900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6e ...............................n
33920 61 6d 65 73 70 61 63 65 2e 70 61 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 amespace.path...................
33940 20 20 20 20 20 20 20 20 20 20 20 20 2e 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .............path)..............
33960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 2e 6e 61 6d 65 73 70 61 63 65 ................(list..namespace
33980 2e 70 61 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .path...........................
339a0 20 20 20 20 20 20 20 20 20 2e 70 61 74 68 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ..........path))))..............
339c0 20 20 20 20 20 64 61 74 61 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 .....data))))..(cl-defmethod.for
339e0 67 65 2d 2d 66 65 74 63 68 2d 6c 61 62 65 6c 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 ge--fetch-labels.((repo.forge-gi
33a00 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 63 61 6c 6c 62 61 63 6b 29 0a 20 20 28 66 6f tlab-repository).callback)...(fo
33a20 72 67 65 2d 2d 67 6c 61 62 2d 67 65 74 20 72 65 70 6f 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 rge--glab-get.repo."/projects/:p
33a40 72 6f 6a 65 63 74 2f 6c 61 62 65 6c 73 22 0a 20 20 20 20 27 28 28 70 65 72 5f 70 61 67 65 20 2e roject/labels".....'((per_page..
33a60 20 31 30 30 29 29 0a 20 20 20 20 3a 75 6e 70 61 67 69 6e 61 74 65 20 74 0a 20 20 20 20 3a 63 61 .100)).....:unpaginate.t.....:ca
33a80 6c 6c 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 76 61 6c 75 65 20 5f 68 65 61 64 65 72 73 20 5f llback.(lambda.(value._headers._
33aa0 73 74 61 74 75 73 20 5f 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 status._req).................(fu
33ac0 6e 63 61 6c 6c 20 63 61 6c 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b 20 28 63 6f 6e 73 20 27 6c ncall.callback.callback.(cons.'l
33ae0 61 62 65 6c 73 20 76 61 6c 75 65 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 abels.value)))))..(cl-defmethod.
33b00 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 6c 61 62 65 6c 73 20 28 28 72 65 70 6f 20 66 6f 72 67 forge--update-labels.((repo.forg
33b20 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 64 61 74 61 29 0a 20 20 28 6f 73 e-gitlab-repository).data)...(os
33b40 65 74 20 72 65 70 6f 20 6c 61 62 65 6c 73 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c 6f et.repo.labels.........(with-slo
33b60 74 73 20 28 69 64 29 20 72 65 70 6f 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 ts.(id).repo...........(mapcar.(
33b80 6c 61 6d 62 64 61 20 28 72 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lambda.(row)....................
33ba0 20 28 6c 65 74 2d 61 6c 69 73 74 20 72 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(let-alist.row.................
33bc0 20 20 20 20 20 20 3b 3b 20 57 65 20 73 68 6f 75 6c 64 20 75 73 65 20 74 68 65 20 6c 61 62 65 6c ......;;.We.should.use.the.label
33be0 27 73 20 60 69 64 27 20 69 6e 73 74 65 61 64 20 6f 66 20 69 74 73 0a 20 20 20 20 20 20 20 20 20 's.`id'.instead.of.its..........
33c00 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 6e 61 6d 65 27 20 62 75 74 20 61 20 74 6f 70 .............;;.`name'.but.a.top
33c20 69 63 27 73 20 60 6c 61 62 65 6c 73 27 20 66 69 65 6c 64 20 69 73 20 61 20 6c 69 73 74 0a 20 20 ic's.`labels'.field.is.a.list...
33c40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 66 20 6e 61 6d 65 73 20 ....................;;.of.names.
33c60 69 6e 73 74 65 61 64 20 6f 66 20 61 20 6c 69 73 74 20 6f 66 20 69 64 73 20 6f 72 20 61 6e 20 61 instead.of.a.list.of.ids.or.an.a
33c80 6c 69 73 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 list........................;;.A
33ca0 73 20 61 20 72 65 73 75 6c 74 20 6f 66 20 74 68 69 73 20 77 65 20 63 61 6e 6e 6f 74 20 72 65 63 s.a.result.of.this.we.cannot.rec
33cc0 6f 67 6e 69 7a 65 20 77 68 65 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ognize.when.....................
33ce0 20 20 3b 3b 20 61 20 6c 61 62 65 6c 20 69 73 20 72 65 6e 61 6d 65 64 20 61 6e 64 20 61 20 74 6f ..;;.a.label.is.renamed.and.a.to
33d00 70 69 63 20 63 6f 6e 74 69 6e 75 65 73 20 74 6f 20 62 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 pic.continues.to.be.............
33d20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 61 67 67 65 64 20 77 69 74 68 20 74 68 65 20 6f 6c 64 ..........;;.tagged.with.the.old
33d40 20 6c 61 62 65 6c 20 6e 61 6d 65 20 75 6e 74 69 6c 20 69 74 20 69 74 73 65 6c 66 0a 20 20 20 20 .label.name.until.it.itself.....
33d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 69 73 20 6d 6f 64 69 66 69 65 64 ..................;;.is.modified
33d80 20 73 6f 6d 65 68 6f 77 2e 20 20 41 64 64 69 74 69 6f 6e 61 6c 6c 79 20 69 74 20 6c 65 61 64 73 .somehow...Additionally.it.leads
33da0 20 74 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6e 61 6d .to.......................;;.nam
33dc0 65 20 63 6f 6e 66 6c 69 63 74 73 20 62 65 74 77 65 65 6e 20 67 72 6f 75 70 20 61 6e 64 20 70 72 e.conflicts.between.group.and.pr
33de0 6f 6a 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6c oject.......................;;.l
33e00 61 62 65 6c 73 2e 20 20 53 65 65 20 23 31 36 30 2e 20 20 41 6c 73 6f 20 73 65 65 20 74 68 65 20 abels...See.#160...Also.see.the.
33e20 63 6f 6d 6d 65 6e 74 20 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 comment.in......................
33e40 20 3b 3b 20 60 66 6f 72 67 65 2d 2d 73 65 74 2d 63 6f 6e 6e 65 63 74 69 6f 6e 73 27 2e 0a 20 20 .;;.`forge--set-connections'....
33e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 66 6f 72 67 65 ....................(list.(forge
33e80 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 69 64 20 2e 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 --object-id.id..name)...........
33ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 ...................name.........
33ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 77 6e 63 61 73 65 20 2e 63 ....................(downcase..c
33ee0 6f 6c 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 olor)...........................
33f00 20 20 2e 64 65 73 63 72 69 70 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...description)))...............
33f20 20 20 20 20 3b 3b 20 46 6f 72 20 6e 6f 77 20 73 69 6d 70 6c 79 20 72 65 6d 6f 76 65 20 6f 6e 65 ....;;.For.now.simply.remove.one
33f40 20 6f 66 20 74 68 65 20 64 75 70 6c 69 63 61 74 65 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 .of.the.duplicates..............
33f60 20 20 20 20 20 20 28 63 6c 2d 64 65 6c 65 74 65 2d 64 75 70 6c 69 63 61 74 65 73 20 64 61 74 61 ......(cl-delete-duplicates.data
33f80 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
33fa0 20 20 20 20 20 20 20 20 20 3a 6b 65 79 20 28 23 23 61 6c 69 73 74 2d 67 65 74 20 27 6e 61 6d 65 .........:key.(##alist-get.'name
33fc0 20 25 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .%).............................
33fe0 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 29 29 29 29 29 0a 0a ............:test.#'equal)))))..
34000 3b 3b 3b 3b 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 0a 0a 3b 3b 20 54 68 65 20 63 6c 6f 73 65 ;;;;.Notifications..;;.The.close
34020 73 74 20 74 6f 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 74 68 61 74 20 47 69 74 6c 61 62 20 st.to.notifications.that.Gitlab.
34040 70 72 6f 76 69 64 65 73 20 61 72 65 20 22 65 76 65 6e 74 73 22 20 61 73 0a 3b 3b 20 64 65 73 63 provides.are."events".as.;;.desc
34060 72 69 62 65 64 20 61 74 20 68 74 74 70 73 3a 2f 2f 64 6f 63 73 2e 67 69 74 6c 61 62 2e 63 6f 6d ribed.at.https://docs.gitlab.com
34080 2f 65 65 2f 61 70 69 2f 65 76 65 6e 74 73 2e 68 74 6d 6c 2e 20 20 54 68 69 73 0a 3b 3b 20 61 6c /ee/api/events.html...This.;;.al
340a0 6c 6f 77 73 20 75 73 20 74 6f 20 73 65 65 20 74 68 65 20 6c 61 73 74 20 65 76 65 6e 74 73 20 74 lows.us.to.see.the.last.events.t
340c0 68 61 74 20 74 6f 6f 6b 20 70 6c 61 63 65 2c 20 62 75 74 20 74 68 61 74 20 69 73 20 6e 6f 74 0a hat.took.place,.but.that.is.not.
340e0 3b 3b 20 67 6f 6f 64 20 65 6e 6f 75 67 68 20 62 65 63 61 75 73 65 20 77 65 20 61 72 65 20 6d 6f ;;.good.enough.because.we.are.mo
34100 73 74 6c 79 20 69 6e 74 65 72 65 73 74 65 64 20 69 6e 20 65 76 65 6e 74 73 20 77 65 20 68 61 76 stly.interested.in.events.we.hav
34120 65 6e 27 74 0a 3b 3b 20 6c 6f 6f 6b 65 64 20 61 74 20 79 65 74 2e 20 20 47 69 74 6c 61 62 20 64 en't.;;.looked.at.yet...Gitlab.d
34140 6f 65 73 6e 27 74 20 6d 61 6b 65 20 61 20 64 69 73 74 69 6e 63 74 69 6f 6e 20 62 65 74 77 65 65 oesn't.make.a.distinction.betwee
34160 6e 20 75 6e 72 65 61 64 0a 3b 3b 20 61 6e 64 20 72 65 61 64 20 65 76 65 6e 74 73 2c 20 73 6f 20 n.unread.;;.and.read.events,.so.
34180 74 68 69 73 20 69 73 20 72 61 74 68 65 72 20 75 73 65 6c 65 73 73 20 61 6e 64 20 77 65 20 64 6f this.is.rather.useless.and.we.do
341a0 6e 27 74 20 75 73 65 20 69 74 20 66 6f 72 0a 3b 3b 20 74 68 65 20 74 69 6d 65 20 62 65 69 6e 67 n't.use.it.for.;;.the.time.being
341c0 2e 0a 0a 3b 3b 3b 20 4d 75 74 61 74 69 6f 6e 73 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 ...;;;.Mutations..(cl-defmethod.
341e0 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 63 72 65 61 74 65 2d 69 73 73 75 65 20 28 28 5f 20 66 forge--submit-create-issue.((_.f
34200 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 72 65 70 6f 29 0a 20 20 orge-gitlab-repository).repo)...
34220 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 70 6f 73 74 20 72 65 70 6f 20 22 2f 70 72 6f 6a 65 63 74 (forge--glab-post.repo."/project
34240 73 2f 3a 70 72 6f 6a 65 63 74 2f 69 73 73 75 65 73 22 0a 20 20 20 20 28 70 63 61 73 65 2d 6c 65 s/:project/issues".....(pcase-le
34260 74 20 28 28 60 28 2c 74 69 74 6c 65 20 2e 20 2c 62 6f 64 79 29 20 28 66 6f 72 67 65 2d 2d 70 6f t.((`(,title...,body).(forge--po
34280 73 74 2d 62 75 66 66 65 72 2d 74 65 78 74 29 29 29 0a 20 20 20 20 20 20 60 28 28 74 69 74 6c 65 st-buffer-text))).......`((title
342a0 20 20 20 20 20 20 20 20 2e 20 2c 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 28 64 65 73 63 72 ..........,title).........(descr
342c0 69 70 74 69 6f 6e 20 20 2e 20 2c 62 6f 64 79 29 29 29 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b iption....,body))).....:callback
342e0 20 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 6b 29 0a ..(forge--post-submit-callback).
34300 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d ....:errorback.(forge--post-subm
34320 69 74 2d 65 72 72 6f 72 62 61 63 6b 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 it-errorback)))..(cl-defmethod.f
34340 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 20 28 28 5f 20 orge--submit-create-pullreq.((_.
34360 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 62 61 73 65 2d 72 65 forge-gitlab-repository).base-re
34380 70 6f 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 60 28 2c 74 69 74 6c 65 20 2e 20 2c po)...(pcase-let*.((`(,title...,
343a0 62 6f 64 79 29 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 62 75 66 66 65 72 2d 74 65 78 74 29 29 body).(forge--post-buffer-text))
343c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 5f 62 61 73 65 2d 72 65 6d 6f 74 65 ................(`(,_base-remote
343e0 20 2e 20 2c 62 61 73 65 2d 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...,base-branch)................
34400 20 28 6d 61 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 66 6f 72 67 65 2d .(magit-split-branch-name.forge-
34420 2d 62 75 66 66 65 72 2d 62 61 73 65 2d 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 -buffer-base-branch))...........
34440 20 20 20 20 20 28 60 28 2c 68 65 61 64 2d 72 65 6d 6f 74 65 20 2e 20 2c 68 65 61 64 2d 62 72 61 .....(`(,head-remote...,head-bra
34460 6e 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 70 6c 69 nch).................(magit-spli
34480 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 68 65 61 64 t-branch-name.forge--buffer-head
344a0 2d 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 65 61 64 2d 72 -branch))................(head-r
344c0 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 20 epo.(forge-get-repository.:stub.
344e0 68 65 61 64 2d 72 65 6d 6f 74 65 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d head-remote))).....(forge--glab-
34500 70 6f 73 74 20 68 65 61 64 2d 72 65 70 6f 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 post.head-repo."/projects/:proje
34520 63 74 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 22 0a 20 20 20 20 20 20 60 28 28 74 69 74 6c ct/merge_requests".......`((titl
34540 65 20 2e 20 2c 28 69 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 64 72 61 66 74 2d 70 0a 20 e...,(if.forge--buffer-draft-p..
34560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 44 72 .....................(concat."Dr
34580 61 66 74 3a 20 22 20 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 aft:.".title)...................
345a0 20 20 74 69 74 6c 65 29 29 0a 20 20 20 20 20 20 20 20 28 64 65 73 63 72 69 70 74 69 6f 6e 20 2e ..title)).........(description..
345c0 20 2c 62 6f 64 79 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 2c 40 28 61 6e 64 20 28 6e 6f 74 20 28 .,body).........;;.,@(and.(not.(
345e0 65 71 75 61 6c 20 68 65 61 64 2d 72 65 6d 6f 74 65 20 62 61 73 65 2d 72 65 6d 6f 74 65 29 29 0a equal.head-remote.base-remote)).
34600 20 20 20 20 20 20 20 20 28 74 61 72 67 65 74 5f 70 72 6f 6a 65 63 74 5f 69 64 20 2e 20 2c 28 6f ........(target_project_id...,(o
34620 72 65 66 20 62 61 73 65 2d 72 65 70 6f 20 66 6f 72 67 65 2d 69 64 29 29 0a 20 20 20 20 20 20 20 ref.base-repo.forge-id))........
34640 20 28 74 61 72 67 65 74 5f 62 72 61 6e 63 68 20 2e 20 2c 62 61 73 65 2d 62 72 61 6e 63 68 29 0a .(target_branch...,base-branch).
34660 20 20 20 20 20 20 20 20 28 73 6f 75 72 63 65 5f 62 72 61 6e 63 68 20 2e 20 2c 68 65 61 64 2d 62 ........(source_branch...,head-b
34680 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 20 28 61 6c 6c 6f 77 5f 63 6f 6c 6c 61 62 6f 72 61 74 ranch).........(allow_collaborat
346a0 69 6f 6e 20 2e 20 74 29 29 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 20 28 66 6f 72 67 ion...t)).......:callback..(forg
346c0 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 6b 29 0a 20 20 20 20 20 20 3a e--post-submit-callback).......:
346e0 65 72 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 65 72 errorback.(forge--post-submit-er
34700 72 6f 72 62 61 63 6b 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 rorback))))..(cl-defmethod.forge
34720 2d 2d 73 75 62 6d 69 74 2d 63 72 65 61 74 65 2d 70 6f 73 74 0a 20 20 28 28 5f 20 20 20 20 20 66 --submit-create-post...((_.....f
34740 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 orge-gitlab-repository)....(topi
34760 63 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 70 c.forge-topic))...(forge--glab-p
34780 6f 73 74 20 74 6f 70 69 63 0a 20 20 20 20 28 69 66 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 ost.topic.....(if.(forge-issue-p
347a0 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a .topic)........."/projects/:proj
347c0 65 63 74 2f 69 73 73 75 65 73 2f 3a 6e 75 6d 62 65 72 2f 6e 6f 74 65 73 22 0a 20 20 20 20 20 20 ect/issues/:number/notes".......
347e0 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 "/projects/:project/merge_reques
34800 74 73 2f 3a 6e 75 6d 62 65 72 2f 6e 6f 74 65 73 22 29 0a 20 20 20 20 60 28 28 62 6f 64 79 20 2e ts/:number/notes").....`((body..
34820 20 2c 28 73 74 72 69 6e 67 2d 74 72 69 6d 20 28 62 75 66 66 65 72 2d 73 74 72 29 29 29 29 0a 20 .,(string-trim.(buffer-str))))..
34840 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 ...:callback..(forge--post-submi
34860 74 2d 63 61 6c 6c 62 61 63 6b 29 0a 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 t-callback).....:errorback.(forg
34880 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 65 72 72 6f 72 62 61 63 6b 29 29 29 0a 0a 28 63 6c e--post-submit-errorback)))..(cl
348a0 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 65 64 69 74 2d 70 6f -defmethod.forge--submit-edit-po
348c0 73 74 0a 20 20 28 28 5f 20 20 20 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 st...((_....forge-gitlab-reposit
348e0 6f 72 79 29 0a 20 20 20 28 70 6f 73 74 20 66 6f 72 67 65 2d 70 6f 73 74 29 29 0a 20 20 28 66 6f ory)....(post.forge-post))...(fo
34900 72 67 65 2d 2d 67 6c 61 62 2d 70 75 74 20 70 6f 73 74 0a 20 20 20 20 28 63 6c 2d 65 74 79 70 65 rge--glab-put.post.....(cl-etype
34920 63 61 73 65 20 70 6f 73 74 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 20 case.post.......(forge-pullreq..
34940 20 20 20 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 6d 65 72 67 65 5f 72 65 ...."/projects/:project/merge_re
34960 71 75 65 73 74 73 2f 3a 6e 75 6d 62 65 72 22 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 73 quests/:number").......(forge-is
34980 73 75 65 20 20 20 20 20 20 20 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 69 sue........"/projects/:project/i
349a0 73 73 75 65 73 2f 3a 6e 75 6d 62 65 72 22 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 73 73 ssues/:number").......(forge-iss
349c0 75 65 2d 70 6f 73 74 20 20 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 69 73 ue-post..."/projects/:project/is
349e0 73 75 65 73 2f 3a 74 6f 70 69 63 2f 6e 6f 74 65 73 2f 3a 6e 75 6d 62 65 72 22 29 0a 20 20 20 20 sues/:topic/notes/:number").....
34a00 20 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 20 22 2f 70 72 6f 6a 65 63 74 73 ..(forge-pullreq-post."/projects
34a20 2f 3a 70 72 6f 6a 65 63 74 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 2f 3a 74 6f 70 69 63 2f /:project/merge_requests/:topic/
34a40 6e 6f 74 65 73 2f 3a 6e 75 6d 62 65 72 22 29 29 0a 20 20 20 20 28 69 66 20 28 63 6c 2d 74 79 70 notes/:number")).....(if.(cl-typ
34a60 65 70 20 70 6f 73 74 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 28 70 ep.post.'forge-topic).........(p
34a80 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 74 69 74 6c 65 20 2e 20 2c 62 6f 64 79 29 20 28 66 6f case-let.((`(,title...,body).(fo
34aa0 72 67 65 2d 2d 70 6f 73 74 2d 62 75 66 66 65 72 2d 74 65 78 74 29 29 29 0a 20 20 20 20 20 20 20 rge--post-buffer-text)))........
34ac0 20 20 20 60 28 28 74 69 74 6c 65 20 2e 20 2c 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 ...`((title...,title)...........
34ae0 20 20 3b 3b 20 4b 65 65 70 20 47 69 74 6c 61 62 20 66 72 6f 6d 20 63 6c 61 69 6d 69 6e 67 20 74 ..;;.Keep.Gitlab.from.claiming.t
34b00 68 61 74 20 74 68 65 20 75 73 65 72 20 63 68 61 6e 67 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 hat.the.user.changed............
34b20 20 3b 3b 20 74 68 65 20 64 65 73 63 72 69 70 74 69 6f 6e 20 77 68 65 6e 20 74 68 61 74 20 69 73 .;;.the.description.when.that.is
34b40 6e 27 74 20 74 72 75 65 2e 20 20 54 68 65 20 73 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 n't.true...The.same.............
34b60 3b 3b 20 69 73 6e 27 74 20 6e 65 63 65 73 73 61 72 79 20 66 6f 72 20 74 68 65 20 74 69 74 6c 65 ;;.isn't.necessary.for.the.title
34b80 3b 20 66 6f 72 20 74 68 61 74 2c 20 47 69 74 6c 61 62 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b ;.for.that,.Gitlab.............;
34ba0 3b 20 70 65 72 66 6f 72 6d 73 20 74 68 65 20 6e 65 63 65 73 73 61 72 79 20 63 68 65 63 6b 20 69 ;.performs.the.necessary.check.i
34bc0 74 73 65 6c 66 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 28 6e 6f 74 20 28 tself..............,@(and.(not.(
34be0 65 71 75 61 6c 20 62 6f 64 79 20 28 6f 72 65 66 20 70 6f 73 74 20 62 6f 64 79 29 29 29 0a 20 20 equal.body.(oref.post.body)))...
34c00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 64 65 73 63 72 69 70 74 69 6f 6e 20 .................`((description.
34c20 2e 20 2c 62 6f 64 79 29 29 29 29 29 0a 20 20 20 20 20 20 60 28 28 62 6f 64 79 20 2e 20 2c 28 73 ..,body))))).......`((body...,(s
34c40 74 72 69 6e 67 2d 74 72 69 6d 20 28 62 75 66 66 65 72 2d 73 74 72 29 29 29 29 29 0a 20 20 20 20 tring-trim.(buffer-str))))).....
34c60 3a 63 61 6c 6c 62 61 63 6b 20 20 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 63 :callback..(forge--post-submit-c
34c80 61 6c 6c 62 61 63 6b 29 0a 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d allback).....:errorback.(forge--
34ca0 70 6f 73 74 2d 73 75 62 6d 69 74 2d 65 72 72 6f 72 62 61 63 6b 29 29 29 0a 0a 28 63 6c 2d 64 65 post-submit-errorback)))..(cl-de
34cc0 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 66 69 65 6c 64 0a 20 fmethod.forge--set-topic-field..
34ce0 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 .((_repo.forge-gitlab-repository
34d00 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 66 69 65 6c )....(topic.forge-topic)....fiel
34d20 64 20 76 61 6c 75 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 70 75 74 20 74 6f 70 69 d.value)...(forge--glab-put.topi
34d40 63 0a 20 20 20 20 28 63 6c 2d 74 79 70 65 63 61 73 65 20 74 6f 70 69 63 0a 20 20 20 20 20 20 28 c.....(cl-typecase.topic.......(
34d60 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 forge-pullreq."/projects/:projec
34d80 74 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 2f 3a 6e 75 6d 62 65 72 22 29 0a 20 20 20 20 20 t/merge_requests/:number")......
34da0 20 28 66 6f 72 67 65 2d 69 73 73 75 65 20 20 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a .(forge-issue..."/projects/:proj
34dc0 65 63 74 2f 69 73 73 75 65 73 2f 3a 6e 75 6d 62 65 72 22 29 29 0a 20 20 20 20 60 28 28 2c 66 69 ect/issues/:number")).....`((,fi
34de0 65 6c 64 20 2e 20 2c 28 69 66 20 28 61 6e 64 20 76 61 6c 75 65 20 28 6c 69 73 74 70 20 76 61 6c eld...,(if.(and.value.(listp.val
34e00 75 65 29 29 20 28 76 63 6f 6e 63 61 74 20 76 61 6c 75 65 29 20 76 61 6c 75 65 29 29 29 0a 20 20 ue)).(vconcat.value).value)))...
34e20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 66 69 65 6c 64 2d 63 61 ..:callback.(forge--set-field-ca
34e40 6c 6c 62 61 63 6b 20 74 6f 70 69 63 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 llback.topic)))..(cl-defmethod.f
34e60 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 74 69 74 6c 65 0a 20 20 28 28 72 65 70 6f 20 20 orge--set-topic-title...((repo..
34e80 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 forge-gitlab-repository)....(top
34ea0 69 63 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 74 69 74 6c 65 29 0a 20 20 28 66 6f 72 ic.forge-topic)....title)...(for
34ec0 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 66 69 65 6c 64 20 72 65 70 6f 20 74 6f 70 69 63 20 27 ge--set-topic-field.repo.topic.'
34ee0 74 69 74 6c 65 20 74 69 74 6c 65 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 title.title))..(cl-defmethod.for
34f00 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 73 74 61 74 65 0a 20 20 28 28 72 65 70 6f 20 20 66 6f ge--set-topic-state...((repo..fo
34f20 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 rge-gitlab-repository)....(topic
34f40 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 73 74 61 74 65 29 0a 20 20 28 66 6f 72 67 65 .forge-topic)....state)...(forge
34f60 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 66 69 65 6c 64 20 72 65 70 6f 20 74 6f 70 69 63 20 27 73 74 --set-topic-field.repo.topic.'st
34f80 61 74 65 5f 65 76 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ate_event.......................
34fa0 20 20 20 20 28 70 63 61 73 65 2d 65 78 68 61 75 73 74 69 76 65 20 73 74 61 74 65 0a 20 20 20 20 ....(pcase-exhaustive.state.....
34fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4d 65 72 67 69 ........................;;.Mergi
34fe0 6e 67 20 69 73 6e 27 74 20 64 6f 6e 65 20 74 68 72 6f 75 67 68 20 68 65 72 65 2e 0a 20 20 20 20 ng.isn't.done.through.here......
35000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 63 6f 6d 70 6c 65 ........................('comple
35020 74 65 64 20 22 63 6c 6f 73 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ted."close")....................
35040 20 20 20 20 20 20 20 20 20 28 27 75 6e 70 6c 61 6e 6e 65 64 20 22 63 6c 6f 73 65 22 29 0a 20 20 .........('unplanned."close")...
35060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 72 65 6a 65 ..........................('reje
35080 63 74 65 64 20 20 22 63 6c 6f 73 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 cted.."close")..................
350a0 20 20 20 20 20 20 20 20 20 20 20 28 27 6f 70 65 6e 20 20 20 20 20 20 22 72 65 6f 70 65 6e 22 29 ...........('open......"reopen")
350c0 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f )))..(cl-defmethod.forge--set-to
350e0 70 69 63 2d 64 72 61 66 74 0a 20 20 28 28 72 65 70 6f 20 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 pic-draft...((repo..forge-gitlab
35100 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 74 6f 70 -repository)....(topic.forge-top
35120 69 63 29 0a 20 20 20 76 61 6c 75 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 6d 75 74 61 74 65 2d 66 ic)....value)...(forge--mutate-f
35140 69 65 6c 64 20 74 6f 70 69 63 20 6d 65 72 67 65 52 65 71 75 65 73 74 53 65 74 44 72 61 66 74 0a ield.topic.mergeRequestSetDraft.
35160 20 20 20 20 28 28 70 72 6f 6a 65 63 74 50 61 74 68 20 28 6f 72 65 66 20 72 65 70 6f 20 73 6c 75 ....((projectPath.(oref.repo.slu
35180 67 29 29 0a 20 20 20 20 20 28 69 69 64 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 g))......(iid.(number-to-string.
351a0 28 6f 72 65 66 20 74 6f 70 69 63 20 6e 75 6d 62 65 72 29 29 29 0a 20 20 20 20 20 28 64 72 61 66 (oref.topic.number)))......(draf
351c0 74 20 76 61 6c 75 65 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 t.value))))..(cl-defmethod.forge
351e0 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 73 0a 20 20 28 28 72 65 70 6f 20 20 66 6f 72 --set-topic-labels...((repo..for
35200 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 ge-gitlab-repository)....(topic.
35220 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 6c 61 62 65 6c 73 29 0a 20 20 28 66 6f 72 67 65 forge-topic)....labels)...(forge
35240 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 66 69 65 6c 64 20 72 65 70 6f 20 74 6f 70 69 63 20 27 6c 61 --set-topic-field.repo.topic.'la
35260 62 65 6c 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 bels...........................(
35280 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 6c 61 62 65 6c 73 20 22 2c 22 29 29 29 0a 0a 28 63 6c 2d 64 string-join.labels.",")))..(cl-d
352a0 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 61 73 73 69 67 6e efmethod.forge--set-topic-assign
352c0 65 65 73 0a 20 20 28 28 72 65 70 6f 20 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 ees...((repo..forge-gitlab-repos
352e0 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 itory)....(topic.forge-topic)...
35300 20 61 73 73 69 67 6e 65 65 73 29 0a 20 20 28 6c 65 74 20 28 28 75 73 65 72 73 20 28 6d 61 70 63 .assignees)...(let.((users.(mapc
35320 61 72 20 23 27 63 64 72 20 28 6f 72 65 66 20 72 65 70 6f 20 61 73 73 69 67 6e 65 65 73 29 29 29 ar.#'cdr.(oref.repo.assignees)))
35340 29 0a 20 20 20 20 28 63 6c 2d 74 79 70 65 63 61 73 65 20 74 6f 70 69 63 0a 20 20 20 20 20 20 28 ).....(cl-typecase.topic.......(
35360 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 3b 20 43 61 6e 20 6f 6e 6c 79 20 62 65 20 61 73 73 69 forge-pullreq.;.Can.only.be.assi
35380 67 6e 65 64 20 74 6f 20 61 20 73 69 6e 67 6c 65 20 75 73 65 72 2e 0a 20 20 20 20 20 20 20 28 66 gned.to.a.single.user.........(f
353a0 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 66 69 65 6c 64 20 72 65 70 6f 20 74 6f 70 69 63 orge--set-topic-field.repo.topic
353c0 20 27 61 73 73 69 67 6e 65 65 5f 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .'assignee_id...................
353e0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 63 61 64 64 72 20 28 61 73 73 6f 63 20 28 .............(or.(caddr.(assoc.(
35400 63 61 72 20 61 73 73 69 67 6e 65 65 73 29 20 75 73 65 72 73 29 29 0a 20 20 20 20 20 20 20 20 20 car.assignees).users))..........
35420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 29 29 29 0a 20 ..........................0)))..
35440 20 20 20 20 20 28 66 6f 72 67 65 2d 69 73 73 75 65 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d .....(forge-issue........(forge-
35460 2d 73 65 74 2d 74 6f 70 69 63 2d 66 69 65 6c 64 20 72 65 70 6f 20 74 6f 70 69 63 20 27 61 73 73 -set-topic-field.repo.topic.'ass
35480 69 67 6e 65 65 5f 69 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ignee_ids.......................
354a0 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 6d 61 70 63 61 72 20 28 23 23 63 61 64 64 72 20 28 61 .........(or.(mapcar.(##caddr.(a
354c0 73 73 6f 63 20 25 20 75 73 65 72 73 29 29 20 61 73 73 69 67 6e 65 65 73 29 0a 20 20 20 20 20 20 ssoc.%.users)).assignees).......
354e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 29 29 .............................0))
35500 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 ))))..(cl-defmethod.forge--set-t
35520 6f 70 69 63 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 0a 20 20 28 28 72 65 70 6f 20 20 66 opic-review-requests...((repo..f
35540 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 orge-gitlab-repository)....(topi
35560 63 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 20 20 20 72 65 76 69 65 77 65 72 73 29 0a 20 c.forge-pullreq)....reviewers)..
35580 20 28 6c 65 74 20 28 28 75 73 65 72 73 20 28 6d 61 70 63 61 72 20 23 27 63 64 72 20 28 6f 72 65 .(let.((users.(mapcar.#'cdr.(ore
355a0 66 20 72 65 70 6f 20 61 73 73 69 67 6e 65 65 73 29 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d f.repo.assignees)))).....(forge-
355c0 2d 73 65 74 2d 74 6f 70 69 63 2d 66 69 65 6c 64 20 72 65 70 6f 20 74 6f 70 69 63 20 27 72 65 76 -set-topic-field.repo.topic.'rev
355e0 69 65 77 65 72 5f 69 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 iewer_ids.......................
35600 20 20 20 20 20 20 28 6f 72 20 28 6d 61 70 63 61 72 20 28 23 23 63 61 64 64 72 20 28 61 73 73 6f ......(or.(mapcar.(##caddr.(asso
35620 63 20 25 20 75 73 65 72 73 29 29 20 72 65 76 69 65 77 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 c.%.users)).reviewers)..........
35640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 29 29 29 29 0a 0a 28 63 .......................0))))..(c
35660 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 64 65 6c 65 74 65 2d 63 6f 6d 6d 65 6e l-defmethod.forge--delete-commen
35680 74 0a 20 20 28 28 5f 20 20 20 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f t...((_....forge-gitlab-reposito
356a0 72 79 29 0a 20 20 20 28 70 6f 73 74 20 66 6f 72 67 65 2d 70 6f 73 74 29 29 0a 20 20 28 66 6f 72 ry)....(post.forge-post))...(for
356c0 67 65 2d 2d 67 6c 61 62 2d 64 65 6c 65 74 65 20 70 6f 73 74 0a 20 20 20 20 28 63 6c 2d 65 74 79 ge--glab-delete.post.....(cl-ety
356e0 70 65 63 61 73 65 20 70 6f 73 74 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 pecase.post.......(forge-pullreq
35700 2d 70 6f 73 74 0a 20 20 20 20 20 20 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 -post........"/projects/:project
35720 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 2f 3a 74 6f 70 69 63 2f 6e 6f 74 65 73 2f 3a 6e 75 /merge_requests/:topic/notes/:nu
35740 6d 62 65 72 22 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 6f 73 74 0a 20 mber").......(forge-issue-post..
35760 20 20 20 20 20 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 69 73 73 75 65 73 ......"/projects/:project/issues
35780 2f 3a 74 6f 70 69 63 2f 6e 6f 74 65 73 2f 3a 6e 75 6d 62 65 72 22 29 29 29 0a 20 20 28 63 6c 6f /:topic/notes/:number")))...(clo
357a0 73 71 6c 2d 64 65 6c 65 74 65 20 70 6f 73 74 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 sql-delete.post)...(forge-refres
357c0 68 2d 62 75 66 66 65 72 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d h-buffer))..(cl-defmethod.forge-
357e0 2d 74 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 2d 66 69 6c 65 73 20 28 28 72 65 70 6f 20 66 6f 72 -topic-template-files.((repo.for
35800 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 ge-gitlab-repository)...........
35820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
35840 20 28 5f 20 28 73 75 62 63 6c 61 73 73 20 66 6f 72 67 65 2d 69 73 73 75 65 29 29 29 0a 20 20 28 .(_.(subclass.forge-issue)))...(
35860 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 2d 66 69 6c 65 73 2d 31 20 72 65 forge--topic-template-files-1.re
35880 70 6f 20 22 6d 64 22 20 22 2e 67 69 74 6c 61 62 2f 69 73 73 75 65 5f 74 65 6d 70 6c 61 74 65 73 po."md".".gitlab/issue_templates
358a0 22 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d "))..(cl-defmethod.forge--topic-
358c0 74 65 6d 70 6c 61 74 65 2d 66 69 6c 65 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c template-files.((repo.forge-gitl
358e0 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ab-repository)..................
35900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 5f 20 28 73 75 ..........................(_.(su
35920 62 63 6c 61 73 73 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 29 0a 20 20 28 66 6f 72 67 65 bclass.forge-pullreq)))...(forge
35940 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 2d 66 69 6c 65 73 2d 31 20 72 65 70 6f 20 22 6d --topic-template-files-1.repo."m
35960 64 22 20 22 2e 67 69 74 6c 61 62 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 5f 74 65 6d 70 6c 61 d".".gitlab/merge_request_templa
35980 74 65 73 22 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 6f 72 tes"))..(cl-defmethod.forge--for
359a0 6b 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 k-repository.((repo.forge-gitlab
359c0 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 66 6f 72 6b 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 -repository).fork)...(with-slots
359e0 20 28 6e 61 6d 65 20 61 70 69 68 6f 73 74 29 20 72 65 70 6f 0a 20 20 20 20 28 66 6f 72 67 65 2d .(name.apihost).repo.....(forge-
35a00 2d 67 6c 61 62 2d 70 6f 73 74 20 72 65 70 6f 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a -glab-post.repo."/projects/:proj
35a20 65 63 74 2f 66 6f 72 6b 22 0a 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c ect/fork".......(and.(not.(equal
35a40 20 66 6f 72 6b 20 28 67 68 75 62 2d 2d 75 73 65 72 6e 61 6d 65 20 61 70 69 68 6f 73 74 20 27 67 .fork.(ghub--username.apihost.'g
35a60 69 74 6c 61 62 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 60 28 28 6e 61 6d 65 73 70 61 63 65 itlab)))............`((namespace
35a80 20 2e 20 2c 66 6f 72 6b 29 29 29 0a 20 20 20 20 20 20 3a 6e 6f 65 72 72 6f 72 20 74 29 0a 20 20 ...,fork))).......:noerror.t)...
35aa0 20 20 28 67 68 75 62 2d 77 61 69 74 20 28 66 6f 72 6d 61 74 20 22 2f 70 72 6f 6a 65 63 74 73 2f ..(ghub-wait.(format."/projects/
35ac0 25 73 25 25 32 46 25 73 22 20 28 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 20 22 2f 22 20 22 25 %s%%2F%s".(string-replace."/"."%
35ae0 32 46 22 20 66 6f 72 6b 29 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 2F".fork).name)................n
35b00 69 6c 20 3a 61 75 74 68 20 27 66 6f 72 67 65 20 3a 68 6f 73 74 20 61 70 69 68 6f 73 74 20 3a 66 il.:auth.'forge.:host.apihost.:f
35b20 6f 72 67 65 20 27 67 69 74 6c 61 62 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 orge.'gitlab)))..(cl-defmethod.f
35b40 6f 72 67 65 2d 2d 6d 65 72 67 65 2d 70 75 6c 6c 72 65 71 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f orge--merge-pullreq...((_repo.fo
35b60 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 74 6f 70 69 63 rge-gitlab-repository)....(topic
35b80 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 68 61 73 68 20 6d 65 74 68 6f 64 29 0a 20 20 .forge-topic)....hash.method)...
35ba0 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 70 75 74 20 74 6f 70 69 63 0a 20 20 20 20 22 2f 70 72 6f (forge--glab-put.topic....."/pro
35bc0 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 2f 3a 6e jects/:project/merge_requests/:n
35be0 75 6d 62 65 72 2f 6d 65 72 67 65 22 0a 20 20 20 20 60 28 28 73 71 75 61 73 68 20 2e 20 2c 28 65 umber/merge".....`((squash...,(e
35c00 71 20 6d 65 74 68 6f 64 20 27 73 71 75 61 73 68 29 29 0a 20 20 20 20 20 20 2c 40 28 61 6e 64 20 q.method.'squash)).......,@(and.
35c20 68 61 73 68 20 60 28 28 73 68 61 20 2e 20 2c 68 61 73 68 29 29 29 29 29 29 0a 0a 3b 3b 3b 20 57 hash.`((sha...,hash))))))..;;;.W
35c40 72 61 70 70 65 72 73 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 67 rappers..(cl-defun.forge--glab-g
35c60 65 74 20 28 6f 62 6a 20 72 65 73 6f 75 72 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 et.(obj.resource................
35c80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 70 61 72 61 6d 73 ................&optional.params
35ca0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
35cc0 26 6b 65 79 20 71 75 65 72 79 20 70 61 79 6c 6f 61 64 20 68 65 61 64 65 72 73 0a 20 20 20 20 20 &key.query.payload.headers......
35ce0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 69 6c 65 6e 74 ..........................silent
35d00 20 75 6e 70 61 67 69 6e 61 74 65 20 6e 6f 65 72 72 6f 72 20 72 65 61 64 65 72 0a 20 20 20 20 20 .unpaginate.noerror.reader......
35d20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 68 6f 73 74 20 63 ..........................host.c
35d40 61 6c 6c 62 61 63 6b 20 65 72 72 6f 72 62 61 63 6b 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 allback.errorback)...(declare.(i
35d60 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 67 68 75 62 2d 72 65 71 75 65 73 74 20 22 47 ndent.defun))...(ghub-request."G
35d80 45 54 22 20 28 69 66 20 6f 62 6a 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 72 65 73 6f 75 ET".(if.obj.(forge--format-resou
35da0 72 63 65 20 6f 62 6a 20 72 65 73 6f 75 72 63 65 29 20 72 65 73 6f 75 72 63 65 29 0a 20 20 20 20 rce.obj.resource).resource).....
35dc0 20 20 20 20 20 20 20 20 20 20 20 20 70 61 72 61 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ............params..............
35de0 20 20 20 3a 66 6f 72 67 65 20 27 67 69 74 6c 61 62 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...:forge.'gitlab...............
35e00 20 20 3a 68 6f 73 74 20 28 6f 72 20 68 6f 73 74 20 28 6f 72 65 66 20 28 66 6f 72 67 65 2d 67 65 ..:host.(or.host.(oref.(forge-ge
35e20 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 29 20 61 70 69 68 6f 73 74 29 29 0a 20 20 20 20 t-repository.obj).apihost)).....
35e40 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 75 74 68 20 27 66 6f 72 67 65 0a 20 20 20 20 20 20 20 ............:auth.'forge........
35e60 20 20 20 20 20 20 20 20 20 3a 71 75 65 72 79 20 71 75 65 72 79 20 3a 70 61 79 6c 6f 61 64 20 70 .........:query.query.:payload.p
35e80 61 79 6c 6f 61 64 20 3a 68 65 61 64 65 72 73 20 68 65 61 64 65 72 73 0a 20 20 20 20 20 20 20 20 ayload.:headers.headers.........
35ea0 20 20 20 20 20 20 20 20 3a 73 69 6c 65 6e 74 20 73 69 6c 65 6e 74 20 3a 75 6e 70 61 67 69 6e 61 ........:silent.silent.:unpagina
35ec0 74 65 20 75 6e 70 61 67 69 6e 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e te.unpaginate.................:n
35ee0 6f 65 72 72 6f 72 20 6e 6f 65 72 72 6f 72 20 3a 72 65 61 64 65 72 20 72 65 61 64 65 72 0a 20 20 oerror.noerror.:reader.reader...
35f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b ..............:callback.callback
35f20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 6f 72 20 .................:errorback.(or.
35f40 65 72 72 6f 72 62 61 63 6b 20 28 61 6e 64 20 63 61 6c 6c 62 61 63 6b 20 74 29 29 29 29 0a 0a 28 errorback.(and.callback.t))))..(
35f60 63 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 70 75 74 20 28 6f 62 6a 20 72 65 cl-defun.forge--glab-put.(obj.re
35f80 73 6f 75 72 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 source..........................
35fa0 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 70 61 72 61 6d 73 0a 20 20 20 20 20 20 20 20 20 ......&optional.params..........
35fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6b 65 79 20 71 75 65 72 79 ......................&key.query
35fe0 20 70 61 79 6c 6f 61 64 20 68 65 61 64 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .payload.headers................
36000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 69 6c 65 6e 74 20 75 6e 70 61 67 69 6e 61 74 ................silent.unpaginat
36020 65 20 6e 6f 65 72 72 6f 72 20 72 65 61 64 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e.noerror.reader................
36040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 68 6f 73 74 20 63 61 6c 6c 62 61 63 6b 20 65 72 ................host.callback.er
36060 72 6f 72 62 61 63 6b 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 rorback)...(declare.(indent.defu
36080 6e 29 29 0a 20 20 28 67 68 75 62 2d 72 65 71 75 65 73 74 20 22 50 55 54 22 20 28 69 66 20 6f 62 n))...(ghub-request."PUT".(if.ob
360a0 6a 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 72 65 73 6f 75 72 63 65 20 6f 62 6a 20 72 65 j.(forge--format-resource.obj.re
360c0 73 6f 75 72 63 65 29 20 72 65 73 6f 75 72 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 source).resource)...............
360e0 20 20 70 61 72 61 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 6f 72 67 65 20 ..params.................:forge.
36100 27 67 69 74 6c 61 62 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 6f 73 74 20 28 6f 'gitlab.................:host.(o
36120 72 20 68 6f 73 74 20 28 6f 72 65 66 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f r.host.(oref.(forge-get-reposito
36140 72 79 20 6f 62 6a 29 20 61 70 69 68 6f 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ry.obj).apihost))...............
36160 20 20 3a 61 75 74 68 20 27 66 6f 72 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a ..:auth.'forge.................:
36180 71 75 65 72 79 20 71 75 65 72 79 20 3a 70 61 79 6c 6f 61 64 20 70 61 79 6c 6f 61 64 20 3a 68 65 query.query.:payload.payload.:he
361a0 61 64 65 72 73 20 68 65 61 64 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 aders.headers.................:s
361c0 69 6c 65 6e 74 20 73 69 6c 65 6e 74 20 3a 75 6e 70 61 67 69 6e 61 74 65 20 75 6e 70 61 67 69 6e ilent.silent.:unpaginate.unpagin
361e0 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 65 72 72 6f 72 20 6e 6f 65 ate.................:noerror.noe
36200 72 72 6f 72 20 3a 72 65 61 64 65 72 20 72 65 61 64 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 rror.:reader.reader.............
36220 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 ....:callback.callback..........
36240 20 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 6f 72 20 65 72 72 6f 72 62 61 63 6b 20 .......:errorback.(or.errorback.
36260 28 61 6e 64 20 63 61 6c 6c 62 61 63 6b 20 74 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 66 (and.callback.t))))..(cl-defun.f
36280 6f 72 67 65 2d 2d 67 6c 61 62 2d 70 6f 73 74 20 28 6f 62 6a 20 72 65 73 6f 75 72 63 65 0a 20 20 orge--glab-post.(obj.resource...
362a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f ..............................&o
362c0 70 74 69 6f 6e 61 6c 20 70 61 72 61 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ptional.params..................
362e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6b 65 79 20 71 75 65 72 79 20 70 61 79 6c 6f 61 ...............&key.query.payloa
36300 64 20 68 65 61 64 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d.headers.......................
36320 20 20 20 20 20 20 20 20 20 20 73 69 6c 65 6e 74 20 75 6e 70 61 67 69 6e 61 74 65 20 6e 6f 65 72 ..........silent.unpaginate.noer
36340 72 6f 72 20 72 65 61 64 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ror.reader......................
36360 20 20 20 20 20 20 20 20 20 20 20 68 6f 73 74 20 63 61 6c 6c 62 61 63 6b 20 65 72 72 6f 72 62 61 ...........host.callback.errorba
36380 63 6b 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 ck)...(declare.(indent.defun))..
363a0 20 28 67 68 75 62 2d 72 65 71 75 65 73 74 20 22 50 4f 53 54 22 20 28 66 6f 72 67 65 2d 2d 66 6f .(ghub-request."POST".(forge--fo
363c0 72 6d 61 74 2d 72 65 73 6f 75 72 63 65 20 6f 62 6a 20 72 65 73 6f 75 72 63 65 29 0a 20 20 20 20 rmat-resource.obj.resource).....
363e0 20 20 20 20 20 20 20 20 20 20 20 20 70 61 72 61 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ............params..............
36400 20 20 20 3a 66 6f 72 67 65 20 27 67 69 74 6c 61 62 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...:forge.'gitlab...............
36420 20 20 3a 68 6f 73 74 20 28 6f 72 20 68 6f 73 74 20 28 6f 72 65 66 20 28 66 6f 72 67 65 2d 67 65 ..:host.(or.host.(oref.(forge-ge
36440 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 29 20 61 70 69 68 6f 73 74 29 29 0a 20 20 20 20 t-repository.obj).apihost)).....
36460 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 75 74 68 20 27 66 6f 72 67 65 0a 20 20 20 20 20 20 20 ............:auth.'forge........
36480 20 20 20 20 20 20 20 20 20 3a 71 75 65 72 79 20 71 75 65 72 79 20 3a 70 61 79 6c 6f 61 64 20 70 .........:query.query.:payload.p
364a0 61 79 6c 6f 61 64 20 3a 68 65 61 64 65 72 73 20 68 65 61 64 65 72 73 0a 20 20 20 20 20 20 20 20 ayload.:headers.headers.........
364c0 20 20 20 20 20 20 20 20 3a 73 69 6c 65 6e 74 20 73 69 6c 65 6e 74 20 3a 75 6e 70 61 67 69 6e 61 ........:silent.silent.:unpagina
364e0 74 65 20 75 6e 70 61 67 69 6e 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e te.unpaginate.................:n
36500 6f 65 72 72 6f 72 20 6e 6f 65 72 72 6f 72 20 3a 72 65 61 64 65 72 20 72 65 61 64 65 72 0a 20 20 oerror.noerror.:reader.reader...
36520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b ..............:callback.callback
36540 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 6f 72 20 .................:errorback.(or.
36560 65 72 72 6f 72 62 61 63 6b 20 28 61 6e 64 20 63 61 6c 6c 62 61 63 6b 20 74 29 29 29 29 0a 0a 28 errorback.(and.callback.t))))..(
36580 63 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 64 65 6c 65 74 65 20 28 6f 62 6a cl-defun.forge--glab-delete.(obj
365a0 20 72 65 73 6f 75 72 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .resource.......................
365c0 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 70 61 72 61 6d 73 0a 20 20 20 ............&optional.params....
365e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 ...............................&
36600 6b 65 79 20 71 75 65 72 79 20 70 61 79 6c 6f 61 64 20 68 65 61 64 65 72 73 0a 20 20 20 20 20 20 key.query.payload.headers.......
36620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 69 6c 65 ............................sile
36640 6e 74 20 75 6e 70 61 67 69 6e 61 74 65 20 6e 6f 65 72 72 6f 72 20 72 65 61 64 65 72 0a 20 20 20 nt.unpaginate.noerror.reader....
36660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 68 ...............................h
36680 6f 73 74 20 63 61 6c 6c 62 61 63 6b 20 65 72 72 6f 72 62 61 63 6b 29 0a 20 20 28 64 65 63 6c 61 ost.callback.errorback)...(decla
366a0 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 67 68 75 62 2d 72 65 71 75 65 re.(indent.defun))...(ghub-reque
366c0 73 74 20 22 44 45 4c 45 54 45 22 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 72 65 73 6f 75 st."DELETE".(forge--format-resou
366e0 72 63 65 20 6f 62 6a 20 72 65 73 6f 75 72 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rce.obj.resource)...............
36700 20 20 70 61 72 61 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 6f 72 67 65 20 ..params.................:forge.
36720 27 67 69 74 6c 61 62 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 6f 73 74 20 28 6f 'gitlab.................:host.(o
36740 72 20 68 6f 73 74 20 28 6f 72 65 66 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f r.host.(oref.(forge-get-reposito
36760 72 79 20 6f 62 6a 29 20 61 70 69 68 6f 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ry.obj).apihost))...............
36780 20 20 3a 61 75 74 68 20 27 66 6f 72 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a ..:auth.'forge.................:
367a0 71 75 65 72 79 20 71 75 65 72 79 20 3a 70 61 79 6c 6f 61 64 20 70 61 79 6c 6f 61 64 20 3a 68 65 query.query.:payload.payload.:he
367c0 61 64 65 72 73 20 68 65 61 64 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 aders.headers.................:s
367e0 69 6c 65 6e 74 20 73 69 6c 65 6e 74 20 3a 75 6e 70 61 67 69 6e 61 74 65 20 75 6e 70 61 67 69 6e ilent.silent.:unpaginate.unpagin
36800 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 65 72 72 6f 72 20 6e 6f 65 ate.................:noerror.noe
36820 72 72 6f 72 20 3a 72 65 61 64 65 72 20 72 65 61 64 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 rror.:reader.reader.............
36840 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 63 61 6c 6c 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 ....:callback.callback..........
36860 20 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 6f 72 20 65 72 72 6f 72 62 61 63 6b 20 .......:errorback.(or.errorback.
36880 28 61 6e 64 20 63 61 6c 6c 62 61 63 6b 20 74 29 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f (and.callback.t))))..;;;._.;;.Lo
368a0 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 cal.Variables:.;;.read-symbol-sh
368c0 6f 72 74 68 61 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 20 orthands:.(.;;...("and$"........
368e0 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 ...."cond-let--and$").;;...("and
36900 2d 6c 65 74 22 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 -let"........."cond-let--and-let
36920 22 29 0a 3b 3b 20 20 20 28 22 69 66 2d 6c 65 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 ").;;...("if-let".........."cond
36940 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 -let--if-let").;;...("when-let".
36960 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 0a 3b 3b 20 ......."cond-let--when-let").;;.
36980 20 20 28 22 62 75 66 66 65 72 2d 73 74 72 69 6e 67 22 20 2e 20 22 62 75 66 66 65 72 2d 73 74 72 ..("buffer-string"..."buffer-str
369a0 69 6e 67 22 29 0a 3b 3b 20 20 20 28 22 62 75 66 66 65 72 2d 73 74 72 22 20 20 20 20 2e 20 22 66 ing").;;...("buffer-str"......"f
369c0 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 orge--buffer-substring-no-proper
369e0 74 69 65 73 22 29 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d ties")).;;.End:.(provide.'forge-
36a00 67 69 74 6c 61 62 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2e 65 6c 20 65 6e 64 73 gitlab).;;;.forge-gitlab.el.ends
36a20 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .here...........................
36a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36c00 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 67 6f 67 73 2e 65 forge-20250916.1119/forge-gogs.e
36c20 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 l...............................
36c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36c60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
36c80 30 30 30 33 37 32 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 30 35 00 20 30 00 00 00 0003723.00000000000.014505..0...
36ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36d00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
36d20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
36d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36e00 3b 3b 3b 20 66 6f 72 67 65 2d 67 6f 67 73 2e 65 6c 20 2d 2d 2d 20 47 6f 67 73 20 73 75 70 70 6f ;;;.forge-gogs.el.---.Gogs.suppo
36e20 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 2d 2a 2d 0a 0a 3b rt..-*-.lexical-binding:t.-*-..;
36e40 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f 6e 61 73 20 ;.Copyright.(C).2018-2025.Jonas.
36e60 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e Bernoulli..;;.Author:.Jonas.Bern
36e80 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c oulli.<emacs.forge@jonas.bernoul
36ea0 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 li.dev>.;;.Maintainer:.Jonas.Ber
36ec0 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 noulli.<emacs.forge@jonas.bernou
36ee0 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 lli.dev>..;;.SPDX-License-Identi
36f00 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 68 69 73 20 fier:.GPL-3.0-or-later..;;.This.
36f20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61 6e 20 72 file.is.free.software:.you.can.r
36f40 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 edistribute.it.and/or.modify.;;.
36f60 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 it.under.the.terms.of.the.GNU.Ge
36f80 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 neral.Public.License.as.publishe
36fa0 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 d.;;.by.the.Free.Software.Founda
36fc0 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 tion,.either.version.3.of.the.Li
36fe0 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e cense,.;;.or.(at.your.option).an
37000 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 y.later.version..;;.;;.This.file
37020 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 .is.distributed.in.the.hope.that
37040 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f .it.will.be.useful,.;;.but.WITHO
37060 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 UT.ANY.WARRANTY;.without.even.th
37080 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e e.implied.warranty.of.;;.MERCHAN
370a0 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 TABILITY.or.FITNESS.FOR.A.PARTIC
370c0 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 ULAR.PURPOSE...See.the.;;.GNU.Ge
370e0 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 neral.Public.License.for.more.de
37100 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 tails..;;.;;.You.should.have.rec
37120 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 eived.a.copy.of.the.GNU.General.
37140 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 Public.License.;;.along.with.thi
37160 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 s.file...If.not,.see.<https://ww
37180 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a w.gnu.org/licenses/>...;;;.Code:
371a0 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 0a 0a 28 ..(require.'forge)..;;;.Class..(
371c0 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 67 6f 67 73 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 defclass.forge-gogs-repository.(
371e0 66 6f 72 67 65 2d 75 6e 75 73 65 64 61 70 69 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 28 28 forge-unusedapi-repository)...((
37200 69 73 73 75 65 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 issues-url-format.........:initf
37220 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 65 73 22 29 0a 20 orm."https://%h/%o/%n/issues")..
37240 20 20 28 69 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 3a 69 6e ..(issue-url-format..........:in
37260 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 73 73 75 65 73 2f itform."https://%h/%o/%n/issues/
37280 25 69 22 29 0a 20 20 20 28 69 73 73 75 65 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 %i")....(issue-post-url-format..
372a0 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 69 ...:initform."https://%h/%o/%n/i
372c0 73 73 75 65 73 2f 25 69 23 69 73 73 75 65 63 6f 6d 6d 65 6e 74 2d 25 49 22 29 0a 20 20 20 28 70 ssues/%i#issuecomment-%I")....(p
372e0 75 6c 6c 72 65 71 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f ullreqs-url-format.......:initfo
37300 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 22 29 0a 20 20 20 rm."https://%h/%o/%n/pulls")....
37320 28 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 3a 69 6e 69 74 (pullreq-url-format........:init
37340 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 2f 25 69 22 form."https://%h/%o/%n/pulls/%i"
37360 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 )....(pullreq-post-url-format...
37380 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c :initform."https://%h/%o/%n/pull
373a0 73 2f 25 69 23 69 73 73 75 65 63 6f 6d 6d 65 6e 74 2d 25 49 22 29 0a 20 20 20 28 63 6f 6d 6d 69 s/%i#issuecomment-%I")....(commi
373c0 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 t-url-format.........:initform."
373e0 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 63 6f 6d 6d 69 74 2f 25 72 22 29 0a 20 20 20 https://%h/%o/%n/commit/%r")....
37400 28 62 72 61 6e 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 (branch-url-format.........:init
37420 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 63 6f 6d 6d 69 74 73 2f 25 form."https://%h/%o/%n/commits/%
37440 72 22 29 0a 20 20 20 28 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 r")....(remote-url-format.......
37460 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 22 29 0a ..:initform."https://%h/%o/%n").
37480 20 20 20 28 62 6c 6f 62 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 20 3a 69 ...(blob-url-format...........:i
374a0 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 73 72 63 2f 25 72 nitform."https://%h/%o/%n/src/%r
374c0 2f 25 66 22 29 0a 20 20 20 28 63 72 65 61 74 65 2d 69 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 /%f")....(create-issue-url-forma
374e0 74 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f t...:initform."https://%h/%o/%n/
37500 69 73 73 75 65 73 2f 6e 65 77 22 29 0a 20 20 20 28 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d issues/new")....(create-pullreq-
37520 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 url-format.:initform."https://%h
37540 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 22 29 20 3b 20 73 69 63 0a 20 20 20 28 70 75 6c 6c 72 65 71 /%o/%n/pulls").;.sic....(pullreq
37560 2d 72 65 66 73 70 65 63 20 3a 69 6e 69 74 66 6f 72 6d 20 22 2b 72 65 66 73 2f 70 75 6c 6c 2f 2a -refspec.:initform."+refs/pull/*
37580 2f 68 65 61 64 3a 72 65 66 73 2f 70 75 6c 6c 72 65 71 73 2f 2a 22 29 29 29 0a 0a 3b 3b 3b 20 5f /head:refs/pullreqs/*")))..;;;._
375a0 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 67 6f 67 73 29 0a 3b 3b 3b 20 66 6f 72 67 65 .(provide.'forge-gogs).;;;.forge
375c0 2d 67 6f 67 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 -gogs.el.ends.here..............
375e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37600 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 69 73 73 75 65 2e forge-20250916.1119/forge-issue.
37620 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 el..............................
37640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37660 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
37680 30 30 32 30 33 36 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 36 37 33 00 20 30 00 00 00 0020361.00000000000.014673..0...
376a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
376c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
376e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37700 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
37720 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
37740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
377a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
377c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
377e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37800 3b 3b 3b 20 66 6f 72 67 65 2d 69 73 73 75 65 2e 65 6c 20 2d 2d 2d 20 49 73 73 75 65 20 73 75 70 ;;;.forge-issue.el.---.Issue.sup
37820 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 2d 2a 2d 0a port..-*-.lexical-binding:t.-*-.
37840 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f 6e 61 .;;.Copyright.(C).2018-2025.Jona
37860 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 73 20 42 65 s.Bernoulli..;;.Author:.Jonas.Be
37880 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f rnoulli.<emacs.forge@jonas.berno
378a0 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 ulli.dev>.;;.Maintainer:.Jonas.B
378c0 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e ernoulli.<emacs.forge@jonas.bern
378e0 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e oulli.dev>..;;.SPDX-License-Iden
37900 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 68 69 tifier:.GPL-3.0-or-later..;;.Thi
37920 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61 6e s.file.is.free.software:.you.can
37940 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b .redistribute.it.and/or.modify.;
37960 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 ;.it.under.the.terms.of.the.GNU.
37980 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 General.Public.License.as.publis
379a0 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e hed.;;.by.the.Free.Software.Foun
379c0 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 dation,.either.version.3.of.the.
379e0 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 License,.;;.or.(at.your.option).
37a00 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 66 69 any.later.version..;;.;;.This.fi
37a20 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 le.is.distributed.in.the.hope.th
37a40 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 at.it.will.be.useful,.;;.but.WIT
37a60 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 HOUT.ANY.WARRANTY;.without.even.
37a80 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 the.implied.warranty.of.;;.MERCH
37aa0 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 ANTABILITY.or.FITNESS.FOR.A.PART
37ac0 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 ICULAR.PURPOSE...See.the.;;.GNU.
37ae0 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 General.Public.License.for.more.
37b00 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 details..;;.;;.You.should.have.r
37b20 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 eceived.a.copy.of.the.GNU.Genera
37b40 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 l.Public.License.;;.along.with.t
37b60 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f his.file...If.not,.see.<https://
37b80 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 64 www.gnu.org/licenses/>...;;;.Cod
37ba0 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 28 72 65 71 75 69 72 65 20 27 66 e:..(require.'forge).(require.'f
37bc0 6f 72 67 65 2d 70 6f 73 74 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 orge-post).(require.'forge-topic
37be0 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 65 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d )..;;;.Classes..(defclass.forge-
37c00 69 73 73 75 65 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 28 28 63 6c 6f 73 71 6c 2d 74 issue.(forge-topic)...((closql-t
37c20 61 62 6c 65 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 69 73 73 75 65 29 0a 20 able.........:initform.'issue)..
37c40 20 20 28 63 6c 6f 73 71 6c 2d 70 72 69 6d 61 72 79 2d 6b 65 79 20 20 20 3a 69 6e 69 74 66 6f 72 ..(closql-primary-key...:initfor
37c60 6d 20 27 69 64 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 6f 72 64 65 72 2d 62 79 20 20 20 20 20 20 m.'id)....(closql-order-by......
37c80 3a 69 6e 69 74 66 6f 72 6d 20 5b 28 64 65 73 63 20 6e 75 6d 62 65 72 29 5d 29 0a 20 20 20 28 63 :initform.[(desc.number)])....(c
37ca0 6c 6f 73 71 6c 2d 66 6f 72 65 69 67 6e 2d 6b 65 79 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 72 losql-foreign-key...:initform.'r
37cc0 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 63 6c 61 73 73 2d 70 72 65 66 epository)....(closql-class-pref
37ce0 69 78 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 66 6f 72 67 65 2d 22 29 0a 20 20 20 28 69 64 20 20 ix..:initform."forge-")....(id..
37d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 69 64 29 0a 20 .................:initarg.:id)..
37d20 20 20 28 72 65 70 6f 73 69 74 6f 72 79 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 ..(repository...........:initarg
37d40 20 3a 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 6e 75 6d 62 65 72 20 20 20 20 20 20 20 20 .:repository)....(number........
37d60 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6e 75 6d 62 65 72 29 0a 20 20 20 28 73 74 61 .......:initarg.:number)....(sta
37d80 74 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 73 74 61 74 te................:initarg.:stat
37da0 65 29 0a 20 20 20 28 61 75 74 68 6f 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 e)....(author...............:ini
37dc0 74 61 72 67 20 3a 61 75 74 68 6f 72 29 0a 20 20 20 28 74 69 74 6c 65 20 20 20 20 20 20 20 20 20 targ.:author)....(title.........
37de0 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 69 74 6c 65 29 0a 20 20 20 28 63 72 65 61 .......:initarg.:title)....(crea
37e00 74 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 63 72 65 61 74 ted..............:initarg.:creat
37e20 65 64 29 0a 20 20 20 28 75 70 64 61 74 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e ed)....(updated..............:in
37e40 69 74 61 72 67 20 3a 75 70 64 61 74 65 64 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 itarg.:updated.:initform.nil)...
37e60 20 28 63 6c 6f 73 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 .(closed...............:initarg.
37e80 3a 63 6c 6f 73 65 64 29 0a 20 20 20 28 73 74 61 74 75 73 20 20 20 20 20 20 20 20 20 20 20 20 20 :closed)....(status.............
37ea0 20 20 3a 69 6e 69 74 61 72 67 20 3a 73 74 61 74 75 73 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c ..:initarg.:status.:initform.nil
37ec0 29 0a 20 20 20 28 6c 6f 63 6b 65 64 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 )....(locked-p.............:init
37ee0 61 72 67 20 3a 6c 6f 63 6b 65 64 2d 70 29 0a 20 20 20 28 6d 69 6c 65 73 74 6f 6e 65 20 20 20 20 arg.:locked-p)....(milestone....
37f00 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6d 69 6c 65 73 74 6f 6e 65 29 0a 20 20 20 ........:initarg.:milestone)....
37f20 28 62 6f 64 79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a (body.................:initarg.:
37f40 62 6f 64 79 29 0a 20 20 20 28 61 73 73 69 67 6e 65 65 73 20 20 20 20 20 20 20 20 20 20 20 20 3a body)....(assignees............:
37f60 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 73 20 28 69 73 73 75 65 2d 61 73 73 69 67 6e 65 65 20 61 73 closql-tables.(issue-assignee.as
37f80 73 69 67 6e 65 65 29 29 0a 20 20 20 28 70 72 6f 6a 65 63 74 2d 63 61 72 64 73 29 20 3b 20 70 72 signee))....(project-cards).;.pr
37fa0 6f 6a 65 63 74 73 43 61 72 64 73 0a 20 20 20 28 65 64 69 74 73 29 20 3b 20 75 73 65 72 43 6f 6e ojectsCards....(edits).;.userCon
37fc0 74 65 6e 74 45 64 69 74 73 0a 20 20 20 28 6c 61 62 65 6c 73 20 20 20 20 20 20 20 20 20 20 20 20 tentEdits....(labels............
37fe0 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 73 20 28 69 73 73 75 65 2d 6c 61 62 65 6c 20 6c ...:closql-tables.(issue-label.l
38000 61 62 65 6c 29 29 0a 20 20 20 28 70 61 72 74 69 63 69 70 61 6e 74 73 29 0a 20 20 20 28 70 6f 73 abel))....(participants)....(pos
38020 74 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 63 6c 61 73 73 20 ts................:closql-class.
38040 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 6f 73 74 29 0a 20 20 20 28 72 65 61 63 74 69 6f 6e 73 29 forge-issue-post)....(reactions)
38060 0a 20 20 20 28 74 69 6d 65 6c 69 6e 65 29 0a 20 20 20 28 6d 61 72 6b 73 20 20 20 20 20 20 20 20 ....(timeline)....(marks........
38080 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 73 20 28 69 73 73 75 65 2d 6d 61 ........:closql-tables.(issue-ma
380a0 72 6b 20 6d 61 72 6b 29 29 0a 20 20 20 28 6e 6f 74 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rk.mark))....(note..............
380c0 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6e 6f 74 65 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 ...:initarg.:note.:initform.nil)
380e0 0a 20 20 20 28 74 68 65 69 72 2d 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 ....(their-id.............:inita
38100 72 67 20 3a 74 68 65 69 72 2d 69 64 29 0a 20 20 20 28 73 6c 75 67 20 20 20 20 20 20 20 20 20 20 rg.:their-id)....(slug..........
38120 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 73 6c 75 67 29 0a 20 20 20 28 73 61 76 65 64 .......:initarg.:slug)....(saved
38140 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 73 61 76 65 64 2d -p..............:initarg.:saved-
38160 70 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 29 29 0a 0a 28 63 6c 2d 64 65 66 6d p.:initform.nil)....))..(cl-defm
38180 65 74 68 6f 64 20 63 6c 6f 73 71 6c 2d 64 72 65 66 20 28 28 6f 62 6a 20 66 6f 72 67 65 2d 69 73 ethod.closql-dref.((obj.forge-is
381a0 73 75 65 29 20 28 5f 28 65 71 6c 20 61 73 73 69 67 6e 65 65 73 29 29 29 0a 20 20 28 66 6f 72 67 sue).(_(eql.assignees)))...(forg
381c0 65 2d 73 71 6c 2d 63 64 72 0a 20 20 20 5b 3a 73 65 6c 65 63 74 20 61 73 73 69 67 6e 65 65 3a 2a e-sql-cdr....[:select.assignee:*
381e0 20 3a 66 72 6f 6d 20 61 73 73 69 67 6e 65 65 0a 20 20 20 20 3a 6a 6f 69 6e 20 69 73 73 75 65 2d .:from.assignee.....:join.issue-
38200 61 73 73 69 67 6e 65 65 20 3a 6f 6e 20 28 3d 20 69 73 73 75 65 2d 61 73 73 69 67 6e 65 65 3a 69 assignee.:on.(=.issue-assignee:i
38220 64 20 61 73 73 69 67 6e 65 65 3a 69 64 29 0a 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 69 73 73 d.assignee:id).....:where.(=.iss
38240 75 65 2d 61 73 73 69 67 6e 65 65 3a 69 73 73 75 65 20 24 73 31 29 0a 20 20 20 20 3a 6f 72 64 65 ue-assignee:issue.$s1).....:orde
38260 72 2d 62 79 20 5b 28 61 73 63 20 6c 6f 67 69 6e 29 5d 5d 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 2d r-by.[(asc.login)]]....(closql--
38280 6f 72 65 66 20 6f 62 6a 20 27 69 64 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 63 oref.obj.'id)))..(cl-defmethod.c
382a0 6c 6f 73 71 6c 2d 64 72 65 66 20 28 28 6f 62 6a 20 66 6f 72 67 65 2d 69 73 73 75 65 29 20 28 5f losql-dref.((obj.forge-issue).(_
382c0 28 65 71 6c 20 6c 61 62 65 6c 73 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 73 71 6c 2d 63 64 72 0a (eql.labels)))...(forge-sql-cdr.
382e0 20 20 20 5b 3a 73 65 6c 65 63 74 20 6c 61 62 65 6c 3a 2a 20 3a 66 72 6f 6d 20 6c 61 62 65 6c 0a ...[:select.label:*.:from.label.
38300 20 20 20 20 3a 6a 6f 69 6e 20 69 73 73 75 65 2d 6c 61 62 65 6c 20 3a 6f 6e 20 28 3d 20 69 73 73 ....:join.issue-label.:on.(=.iss
38320 75 65 2d 6c 61 62 65 6c 3a 69 64 20 6c 61 62 65 6c 3a 69 64 29 0a 20 20 20 20 3a 77 68 65 72 65 ue-label:id.label:id).....:where
38340 20 28 3d 20 69 73 73 75 65 2d 6c 61 62 65 6c 3a 69 73 73 75 65 20 24 73 31 29 0a 20 20 20 20 3a .(=.issue-label:issue.$s1).....:
38360 6f 72 64 65 72 2d 62 79 20 5b 28 61 73 63 20 6e 61 6d 65 29 5d 5d 0a 20 20 20 28 63 6c 6f 73 71 order-by.[(asc.name)]]....(closq
38380 6c 2d 2d 6f 72 65 66 20 6f 62 6a 20 27 69 64 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f l--oref.obj.'id)))..(cl-defmetho
383a0 64 20 63 6c 6f 73 71 6c 2d 64 72 65 66 20 28 28 6f 62 6a 20 66 6f 72 67 65 2d 69 73 73 75 65 29 d.closql-dref.((obj.forge-issue)
383c0 20 28 5f 28 65 71 6c 20 6d 61 72 6b 73 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 73 71 6c 2d 63 64 .(_(eql.marks)))...(forge-sql-cd
383e0 72 0a 20 20 20 5b 3a 73 65 6c 65 63 74 20 6d 61 72 6b 3a 2a 20 3a 66 72 6f 6d 20 6d 61 72 6b 0a r....[:select.mark:*.:from.mark.
38400 20 20 20 20 3a 6a 6f 69 6e 20 69 73 73 75 65 2d 6d 61 72 6b 20 3a 6f 6e 20 28 3d 20 69 73 73 75 ....:join.issue-mark.:on.(=.issu
38420 65 2d 6d 61 72 6b 3a 69 64 20 6d 61 72 6b 3a 69 64 29 0a 20 20 20 20 3a 77 68 65 72 65 20 28 3d e-mark:id.mark:id).....:where.(=
38440 20 69 73 73 75 65 2d 6d 61 72 6b 3a 69 73 73 75 65 20 24 73 31 29 0a 20 20 20 20 3a 6f 72 64 65 .issue-mark:issue.$s1).....:orde
38460 72 2d 62 79 20 5b 28 61 73 63 20 6e 61 6d 65 29 5d 5d 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 2d 6f r-by.[(asc.name)]]....(closql--o
38480 72 65 66 20 6f 62 6a 20 27 69 64 29 29 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d ref.obj.'id)))..(defclass.forge-
384a0 69 73 73 75 65 2d 70 6f 73 74 20 28 66 6f 72 67 65 2d 70 6f 73 74 29 0a 20 20 28 28 63 6c 6f 73 issue-post.(forge-post)...((clos
384c0 71 6c 2d 74 61 62 6c 65 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 69 73 73 75 ql-table.........:initform.'issu
384e0 65 2d 70 6f 73 74 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 70 72 69 6d 61 72 79 2d 6b 65 79 20 20 e-post)....(closql-primary-key..
38500 20 3a 69 6e 69 74 66 6f 72 6d 20 27 69 64 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 6f 72 64 65 72 .:initform.'id)....(closql-order
38520 2d 62 79 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 5b 28 61 73 63 20 6e 75 6d 62 65 72 29 -by......:initform.[(asc.number)
38540 5d 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 66 6f 72 65 69 67 6e 2d 6b 65 79 20 20 20 3a 69 6e 69 ])....(closql-foreign-key...:ini
38560 74 66 6f 72 6d 20 27 69 73 73 75 65 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 63 6c 61 73 73 2d 70 tform.'issue)....(closql-class-p
38580 72 65 66 69 78 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 66 6f 72 67 65 2d 69 73 73 75 65 2d 22 29 refix..:initform."forge-issue-")
385a0 0a 20 20 20 28 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 ....(id...................:inita
385c0 72 67 20 3a 69 64 29 0a 20 20 20 28 69 73 73 75 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rg.:id)....(issue...............
385e0 20 3a 69 6e 69 74 61 72 67 20 3a 69 73 73 75 65 29 0a 20 20 20 28 6e 75 6d 62 65 72 20 20 20 20 .:initarg.:issue)....(number....
38600 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6e 75 6d 62 65 72 29 0a 20 20 20 ...........:initarg.:number)....
38620 28 61 75 74 68 6f 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a (author...............:initarg.:
38640 61 75 74 68 6f 72 29 0a 20 20 20 28 63 72 65 61 74 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 author)....(created.............
38660 20 3a 69 6e 69 74 61 72 67 20 3a 63 72 65 61 74 65 64 29 0a 20 20 20 28 75 70 64 61 74 65 64 20 .:initarg.:created)....(updated.
38680 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 75 70 64 61 74 65 64 29 0a .............:initarg.:updated).
386a0 20 20 20 28 62 6f 64 79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 ...(body.................:initar
386c0 67 20 3a 62 6f 64 79 29 0a 20 20 20 28 65 64 69 74 73 29 0a 20 20 20 28 72 65 61 63 74 69 6f 6e g.:body)....(edits)....(reaction
386e0 73 29 0a 20 20 20 29 29 0a 0a 3b 3b 3b 20 51 75 65 72 79 0a 3b 3b 3b 3b 20 47 65 74 0a 0a 28 63 s)....))..;;;.Query.;;;;.Get..(c
38700 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 l-defmethod.forge-get-repository
38720 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 6f 73 74 29 29 0a 20 20 28 66 6f .((post.forge-issue-post))...(fo
38740 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 67 65 74 2d 69 73 rge-get-repository.(forge-get-is
38760 73 75 65 20 70 6f 73 74 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 sue.post)))..(cl-defmethod.forge
38780 2d 67 65 74 2d 74 6f 70 69 63 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 6f -get-topic.((post.forge-issue-po
387a0 73 74 29 29 0a 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 70 6f 73 74 29 29 0a 0a st))...(forge-get-issue.post))..
387c0 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 28 28 (cl-defmethod.forge-get-issue.((
387e0 69 73 73 75 65 20 66 6f 72 67 65 2d 69 73 73 75 65 29 29 0a 20 20 69 73 73 75 65 29 0a 0a 28 63 issue.forge-issue))...issue)..(c
38800 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 28 28 72 65 l-defmethod.forge-get-issue.((re
38820 70 6f 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 6e 75 6d 62 65 72 29 0a 20 20 28 po.forge-repository).number)...(
38840 63 6c 2d 61 73 73 65 72 74 20 28 6e 75 6d 62 65 72 70 20 6e 75 6d 62 65 72 29 20 74 29 0a 20 20 cl-assert.(numberp.number).t)...
38860 28 63 6c 6f 73 71 6c 2d 67 65 74 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 (closql-get.(forge-db)..........
38880 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 27 66 6f 72 67 65 2d 69 73 .....(forge--object-id.'forge-is
388a0 73 75 65 20 72 65 70 6f 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 sue.repo.number)...............'
388c0 66 6f 72 67 65 2d 69 73 73 75 65 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 forge-issue))..(cl-defmethod.for
388e0 67 65 2d 67 65 74 2d 69 73 73 75 65 20 28 28 6e 75 6d 62 65 72 20 69 6e 74 65 67 65 72 29 29 0a ge-get-issue.((number.integer)).
38900 20 20 28 61 6e 64 24 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 ..(and$.(forge-get-repository.:t
38920 72 61 63 6b 65 64 20 6e 69 6c 20 27 6e 6f 74 61 74 70 74 29 0a 20 20 20 20 20 20 20 20 28 66 6f racked.nil.'notatpt).........(fo
38940 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 24 20 6e 75 6d 62 65 72 29 29 29 0a 0a 28 63 6c 2d 64 rge-get-issue.$.number)))..(cl-d
38960 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 28 28 69 64 20 73 74 efmethod.forge-get-issue.((id.st
38980 72 69 6e 67 29 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 67 65 74 20 28 66 6f 72 67 65 2d 64 62 29 20 ring))...(closql-get.(forge-db).
389a0 69 64 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 id.'forge-issue))..(cl-defmethod
389c0 20 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 69 73 .forge-get-issue.((post.forge-is
389e0 73 75 65 2d 70 6f 73 74 29 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 67 65 74 20 28 66 6f 72 67 65 2d sue-post))...(closql-get.(forge-
38a00 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 70 6f 73 74 20 69 73 73 db)...............(oref.post.iss
38a20 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 29 ue)...............'forge-issue))
38a40 0a 0a 3b 3b 3b 3b 20 43 75 72 72 65 6e 74 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 75 72 ..;;;;.Current..(defun.forge-cur
38a60 72 65 6e 74 2d 69 73 73 75 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 6e 64 29 0a 20 20 rent-issue.(&optional.demand)...
38a80 22 52 65 74 75 72 6e 20 74 68 65 20 69 73 73 75 65 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 62 65 "Return.the.issue.at.point.or.be
38aa0 69 6e 67 20 76 69 73 69 74 65 64 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 ing.visited..If.there.is.no.such
38ac0 20 69 73 73 75 65 20 61 6e 64 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 .issue.and.DEMAND.is.non-nil,.th
38ae0 65 6e 20 73 69 67 6e 61 6c 0a 61 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 28 66 6f 72 67 en.signal.an.error."...(or.(forg
38b00 65 2d 69 73 73 75 65 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 66 6f e-issue-at-point).......(and.(fo
38b20 72 67 65 2d 69 73 73 75 65 2d 70 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 0a rge-issue-p.forge-buffer-topic).
38b40 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 0a 20 ...........forge-buffer-topic)..
38b60 20 20 20 20 20 28 61 6e 64 20 64 65 6d 61 6e 64 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f .....(and.demand.(user-error."No
38b80 20 63 75 72 72 65 6e 74 20 69 73 73 75 65 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 .current.issue"))))..(defun.forg
38ba0 65 2d 69 73 73 75 65 2d 61 74 2d 70 6f 69 6e 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 e-issue-at-point.(&optional.dema
38bc0 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 69 73 73 75 65 20 61 74 20 70 6f 69 6e 74 nd)..."Return.the.issue.at.point
38be0 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 20 69 73 73 75 65 20 61 6e 64 20 ..If.there.is.no.such.issue.and.
38c00 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 73 69 67 6e 61 6c 0a 61 DEMAND.is.non-nil,.then.signal.a
38c20 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 n.error."...(or.(thing-at-point.
38c40 27 66 6f 72 67 65 2d 69 73 73 75 65 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 65 63 74 69 'forge-issue).......(magit-secti
38c60 6f 6e 2d 76 61 6c 75 65 2d 69 66 20 27 69 73 73 75 65 29 0a 20 20 20 20 20 20 28 61 6e 64 20 64 on-value-if.'issue).......(and.d
38c80 65 6d 61 6e 64 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 20 69 73 73 75 65 20 61 74 20 70 emand.(user-error."No.issue.at.p
38ca0 6f 69 6e 74 22 29 29 29 29 0a 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 69 73 73 75 65 20 27 74 68 oint"))))..(put.'forge-issue.'th
38cc0 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 23 27 66 6f 72 67 65 2d 74 68 69 6e 67 61 74 70 74 2d 2d ing-at-point.#'forge-thingatpt--
38ce0 69 73 73 75 65 29 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 74 68 69 6e 67 61 74 70 74 2d 2d 69 issue).(defun.forge-thingatpt--i
38d00 73 73 75 65 20 28 29 0a 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 5f 28 74 68 69 6e 67 2d 61 74 2d ssue.()...(and-let.((_(thing-at-
38d20 70 6f 69 6e 74 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 23 5c 5c 28 5b 30 2d 39 5d 2b 5c 5c 29 5c point-looking-at."#\\([0-9]+\\)\
38d40 5c 5f 3e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 20 28 73 74 72 69 \_>")).............(number.(stri
38d60 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 29 29 0a ng-to-number.(match-string.1))).
38d80 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 2d 72 65 70 6f 2d 66 ............(repo.(forge--repo-f
38da0 6f 72 2d 74 68 69 6e 67 61 74 70 74 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 69 or-thingatpt))).....(forge-get-i
38dc0 73 73 75 65 20 72 65 70 6f 20 6e 75 6d 62 65 72 29 29 29 0a 0a 3b 3b 3b 20 52 65 61 64 0a 0a 28 ssue.repo.number)))..;;;.Read..(
38de0 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 69 73 73 75 65 20 28 70 72 6f 6d 70 74 29 0a defun.forge-read-issue.(prompt).
38e00 20 20 22 52 65 61 64 20 61 6e 20 61 63 74 69 76 65 20 69 73 73 75 65 20 77 69 74 68 20 63 6f 6d .."Read.an.active.issue.with.com
38e20 70 6c 65 74 69 6f 6e 20 75 73 69 6e 67 20 50 52 4f 4d 50 54 2e 0a 0a 4f 70 65 6e 2c 20 75 6e 72 pletion.using.PROMPT...Open,.unr
38e40 65 61 64 20 61 6e 64 20 70 65 6e 64 69 6e 67 20 69 73 73 75 65 73 20 61 72 65 20 63 6f 6e 73 69 ead.and.pending.issues.are.consi
38e60 64 65 72 65 64 20 61 63 74 69 76 65 2e 0a 44 65 66 61 75 6c 74 20 74 6f 20 74 68 65 20 63 75 72 dered.active..Default.to.the.cur
38e80 72 65 6e 74 20 69 73 73 75 65 2c 20 65 76 65 6e 20 69 66 20 69 74 20 69 73 6e 27 74 20 61 63 74 rent.issue,.even.if.it.isn't.act
38ea0 69 76 65 2e 0a 0a 5c 5c 3c 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d 69 6e 69 62 75 ive...\\<forge-read-topic-minibu
38ec0 66 66 65 72 2d 6d 61 70 3e 57 68 69 6c 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 69 73 20 69 6e 20 ffer-map>While.completion.is.in.
38ee0 5c 0a 70 72 6f 67 72 65 73 73 2c 20 5c 5c 5b 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d \.progress,.\\[forge-read-topic-
38f00 6c 69 66 74 2d 6c 69 6d 69 74 5d 20 6c 69 66 74 73 20 74 68 65 20 6c 69 6d 69 74 2c 20 65 78 74 lift-limit].lifts.the.limit,.ext
38f20 65 6e 64 69 6e 67 0a 74 68 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 61 74 65 73 ending.the.completion.candidates
38f40 20 74 6f 20 69 6e 63 6c 75 64 65 20 61 6c 6c 20 69 73 73 75 65 73 2e 0a 0a 49 66 20 60 66 6f 72 .to.include.all.issues...If.`for
38f60 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 63 65 73 27 20 69 73 20 6e 69 6c 2c 20 ge-limit-topic-choices'.is.nil,.
38f80 74 68 65 6e 20 61 6c 6c 20 63 61 6e 64 69 64 61 74 65 73 0a 63 61 6e 20 62 65 20 73 65 6c 65 63 then.all.candidates.can.be.selec
38fa0 74 65 64 20 66 72 6f 6d 20 74 68 65 20 73 74 61 72 74 2e 22 0a 20 20 28 66 6f 72 67 65 2d 2d 72 ted.from.the.start."...(forge--r
38fc0 65 61 64 2d 74 6f 70 69 63 20 70 72 6f 6d 70 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ead-topic.prompt................
38fe0 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 69 73 73 75 65 0a 20 20 20 20 ......#'forge-current-issue.....
39000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d .................(forge--topics-
39020 73 70 65 63 20 3a 74 79 70 65 20 27 69 73 73 75 65 20 3a 61 63 74 69 76 65 20 74 29 0a 20 20 20 spec.:type.'issue.:active.t)....
39040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 ..................(forge--topics
39060 2d 73 70 65 63 20 3a 74 79 70 65 20 27 69 73 73 75 65 20 3a 61 63 74 69 76 65 20 6e 69 6c 20 3a -spec.:type.'issue.:active.nil.:
39080 73 74 61 74 65 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d state.nil)))..(defun.forge-read-
390a0 6f 70 65 6e 2d 69 73 73 75 65 20 28 70 72 6f 6d 70 74 29 0a 20 20 22 52 65 61 64 20 61 6e 20 6f open-issue.(prompt)..."Read.an.o
390c0 70 65 6e 20 69 73 73 75 65 20 77 69 74 68 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 75 73 69 6e 67 20 pen.issue.with.completion.using.
390e0 50 52 4f 4d 50 54 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 63 75 72 72 65 6e 74 20 28 66 6f 72 67 PROMPT."...(let*.((current.(forg
39100 65 2d 63 75 72 72 65 6e 74 2d 69 73 73 75 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 70 6f e-current-issue))..........(repo
39120 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 6f 72 20 63 75 ....(forge-get-repository.(or.cu
39140 72 72 65 6e 74 20 3a 74 72 61 63 6b 65 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 61 rrent.:tracked)))..........(defa
39160 75 6c 74 20 28 61 6e 64 20 63 75 72 72 65 6e 74 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d ult.(and.current.(forge--format-
39180 74 6f 70 69 63 2d 6c 69 6e 65 20 63 75 72 72 65 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 topic-line.current)))..........(
391a0 61 6c 69 73 74 20 20 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e alist...(forge--topic-collection
391c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6c 69 73 74 ....................(forge--list
391e0 2d 74 6f 70 69 63 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 -topics.....................(for
39200 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 3a 74 79 70 65 20 27 69 73 73 75 65 20 3a 73 74 ge--topics-spec.:type.'issue.:st
39220 61 74 65 20 27 6f 70 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 ate.'open).....................r
39240 65 70 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 73 20 28 6d 61 70 63 61 72 epo)))..........(choices.(mapcar
39260 20 23 27 63 61 72 20 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 20 .#'car.alist))..........(choice.
39280 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 70 72 6f 6d 70 74 20 63 .(magit-completing-read.prompt.c
392a0 68 6f 69 63 65 73 20 6e 69 6c 20 74 20 6e 69 6c 20 6e 69 6c 20 64 65 66 61 75 6c 74 29 29 29 0a hoices.nil.t.nil.nil.default))).
392c0 20 20 20 20 28 63 64 72 20 28 61 73 73 6f 63 20 63 68 6f 69 63 65 20 61 6c 69 73 74 29 29 29 29 ....(cdr.(assoc.choice.alist))))
392e0 0a 0a 3b 3b 3b 20 49 6e 73 65 72 74 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 ..;;;.Insert..(defvar-keymap.for
39300 67 65 2d 69 73 73 75 65 73 2d 73 65 63 74 69 6f 6e 2d 6d 61 70 0a 20 20 3a 70 61 72 65 6e 74 20 ge-issues-section-map...:parent.
39320 66 6f 72 67 65 2d 63 6f 6d 6d 6f 6e 2d 6d 61 70 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 forge-common-map..."<remap>.<mag
39340 69 74 2d 62 72 6f 77 73 65 2d 74 68 69 6e 67 3e 22 20 23 27 66 6f 72 67 65 2d 62 72 6f 77 73 65 it-browse-thing>".#'forge-browse
39360 2d 69 73 73 75 65 73 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 69 74 2d 76 69 73 69 74 2d -issues..."<remap>.<magit-visit-
39380 74 68 69 6e 67 3e 22 20 20 23 27 66 6f 72 67 65 2d 6c 69 73 74 2d 69 73 73 75 65 73 0a 20 20 22 thing>"..#'forge-list-issues..."
393a0 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 6d 65 6e 75 3e 22 20 20 20 23 27 <remap>.<forge--list-menu>"...#'
393c0 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 66 6f forge-topics-menu..."<remap>.<fo
393e0 72 67 65 2d 2d 69 74 65 6d 2d 6d 65 6e 75 3e 22 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 rge--item-menu>"...#'forge-topic
39400 2d 6d 65 6e 75 0a 20 20 22 43 2d 63 20 43 2d 6e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -menu..."C-c.C-n"...............
39420 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 69 73 73 75 65 29 0a 0a 28 64 .......#'forge-create-issue)..(d
39440 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 73 65 63 74 69 6f 6e efvar-keymap.forge-issue-section
39460 2d 6d 61 70 0a 20 20 3a 70 61 72 65 6e 74 20 66 6f 72 67 65 2d 63 6f 6d 6d 6f 6e 2d 6d 61 70 0a -map...:parent.forge-common-map.
39480 20 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 69 74 2d 76 69 73 69 74 2d 74 68 69 6e 67 3e 22 20 .."<remap>.<magit-visit-thing>".
394a0 20 23 27 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 74 6f 70 69 63 0a 20 20 22 3c 72 65 .#'forge-visit-this-topic..."<re
394c0 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 6d 65 6e 75 3e 22 20 20 20 23 27 66 6f 72 map>.<forge--list-menu>"...#'for
394e0 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 ge-topics-menu..."<remap>.<forge
39500 2d 2d 69 74 65 6d 2d 6d 65 6e 75 3e 22 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 --item-menu>"...#'forge-topic-me
39520 6e 75 29 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 69 73 73 75 nu)..(cl-defun.forge-insert-issu
39540 65 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 28 73 70 65 63 20 6e 69 6c 20 73 73 70 65 63 29 20 68 es.(&optional.(spec.nil.sspec).h
39560 65 61 64 69 6e 67 29 0a 20 20 22 49 6e 73 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 69 73 73 75 eading)..."Insert.a.list.of.issu
39580 65 73 2c 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 60 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d es,.according.to.`forge--buffer-
395a0 74 6f 70 69 63 73 2d 73 70 65 63 27 2e 0a 4f 70 74 69 6f 6e 61 6c 20 53 50 45 43 20 63 61 6e 20 topics-spec'..Optional.SPEC.can.
395c0 62 65 20 75 73 65 64 20 74 6f 20 6f 76 65 72 72 69 64 65 20 74 68 61 74 20 66 69 6c 74 65 72 69 be.used.to.override.that.filteri
395e0 6e 67 20 73 70 65 63 69 66 69 63 61 74 69 6f 6e 2c 0a 61 6e 64 20 6f 70 74 69 6f 6e 61 6c 20 48 ng.specification,.and.optional.H
39600 45 41 44 49 4e 47 20 74 6f 20 63 68 61 6e 67 65 20 74 68 65 20 73 65 63 74 69 6f 6e 20 68 65 61 EADING.to.change.the.section.hea
39620 64 69 6e 67 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 5f 28 66 6f 72 67 65 2d 64 62 ding."...(when-let*.((_(forge-db
39640 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 66 6f 72 67 65 2d .t))...............(repo.(forge-
39660 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 29 0a 20 20 20 20 20 get-repository.:tracked?))......
39680 20 20 20 20 20 20 20 20 20 28 5f 28 6f 72 65 66 20 72 65 70 6f 20 69 73 73 75 65 73 2d 70 29 29 .........(_(oref.repo.issues-p))
396a0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 70 65 63 20 28 69 66 20 73 73 70 65 63 20 73 ...............(spec.(if.sspec.s
396c0 70 65 63 20 28 66 6f 72 67 65 2d 2d 63 6c 6f 6e 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d pec.(forge--clone-buffer-topics-
396e0 73 70 65 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 5f 28 6d 65 6d 71 20 28 6f spec)))...............(_(memq.(o
39700 72 65 66 20 73 70 65 63 20 74 79 70 65 29 20 27 28 74 6f 70 69 63 20 69 73 73 75 65 29 29 29 29 ref.spec.type).'(topic.issue))))
39720 0a 20 20 20 20 28 6f 73 65 74 20 73 70 65 63 20 74 79 70 65 20 27 69 73 73 75 65 29 0a 20 20 20 .....(oset.spec.type.'issue)....
39740 20 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 73 20 27 69 73 73 75 65 73 0a 20 .(forge--insert-topics.'issues..
39760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 68 65 61 .........................(or.hea
39780 64 69 6e 67 20 22 49 73 73 75 65 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ding."Issues")..................
397a0 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 74 6f 70 69 63 73 20 73 70 65 .........(forge--list-topics.spe
397c0 63 20 72 65 70 6f 29 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 c.repo))))..;;;._.;;.Local.Varia
397e0 62 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a bles:.;;.read-symbol-shorthands:
39800 20 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 .(.;;...("and$"............"cond
39820 2d 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 -let--and$").;;...("and-let"....
39840 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 ....."cond-let--and-let").;;...(
39860 22 69 66 2d 6c 65 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d "if-let".........."cond-let--if-
39880 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 let").;;...("when-let"........"c
398a0 6f 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 ond-let--when-let")).;;.End:.(pr
398c0 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 69 73 ovide.'forge-issue).;;;.forge-is
398e0 73 75 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 sue.el.ends.here................
39900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
399a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
399c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
399e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39a00 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 6e 6f 74 69 66 79 forge-20250916.1119/forge-notify
39a20 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .el.............................
39a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39a60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
39a80 30 30 33 30 37 37 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 36 34 00 20 30 00 00 00 0030774.00000000000.015064..0...
39aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39b00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
39b20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
39b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
39c00 3b 3b 3b 20 66 6f 72 67 65 2d 6e 6f 74 69 66 79 2e 65 6c 20 2d 2d 2d 20 4e 6f 74 69 66 79 20 73 ;;;.forge-notify.el.---.Notify.s
39c20 75 70 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 2d 2a upport..-*-.lexical-binding:t.-*
39c40 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f -..;;.Copyright.(C).2018-2025.Jo
39c60 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 73 20 nas.Bernoulli..;;.Author:.Jonas.
39c80 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 Bernoulli.<emacs.forge@jonas.ber
39ca0 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 noulli.dev>.;;.Maintainer:.Jonas
39cc0 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 .Bernoulli.<emacs.forge@jonas.be
39ce0 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 rnoulli.dev>..;;.SPDX-License-Id
39d00 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 entifier:.GPL-3.0-or-later..;;.T
39d20 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 his.file.is.free.software:.you.c
39d40 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 an.redistribute.it.and/or.modify
39d60 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e .;;.it.under.the.terms.of.the.GN
39d80 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c U.General.Public.License.as.publ
39da0 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f ished.;;.by.the.Free.Software.Fo
39dc0 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 undation,.either.version.3.of.th
39de0 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e e.License,.;;.or.(at.your.option
39e00 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 ).any.later.version..;;.;;.This.
39e20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 file.is.distributed.in.the.hope.
39e40 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 that.it.will.be.useful,.;;.but.W
39e60 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 ITHOUT.ANY.WARRANTY;.without.eve
39e80 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 n.the.implied.warranty.of.;;.MER
39ea0 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 CHANTABILITY.or.FITNESS.FOR.A.PA
39ec0 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e RTICULAR.PURPOSE...See.the.;;.GN
39ee0 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 U.General.Public.License.for.mor
39f00 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 e.details..;;.;;.You.should.have
39f20 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 .received.a.copy.of.the.GNU.Gene
39f40 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 ral.Public.License.;;.along.with
39f60 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a .this.file...If.not,.see.<https:
39f80 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 //www.gnu.org/licenses/>...;;;.C
39fa0 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 28 72 65 71 75 69 72 65 20 ode:..(require.'forge).(require.
39fc0 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 0a 0a 28 64 65 66 63 6c 'forge-topic)..;;;.Class..(defcl
39fe0 61 73 73 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 28 66 6f 72 67 65 2d 6f 62 ass.forge-notification.(forge-ob
3a000 6a 65 63 74 29 0a 20 20 28 28 63 6c 6f 73 71 6c 2d 63 6c 61 73 73 2d 70 72 65 66 69 78 20 20 20 ject)...((closql-class-prefix...
3a020 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 66 6f 72 67 65 2d 22 29 0a 20 20 20 28 63 6c 6f 73 ....:initform."forge-")....(clos
3a040 71 6c 2d 74 61 62 6c 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 ql-table..............:initform.
3a060 27 6e 6f 74 69 66 69 63 61 74 69 6f 6e 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 70 72 69 6d 61 72 'notification)....(closql-primar
3a080 79 2d 6b 65 79 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 69 64 29 0a 20 20 20 28 y-key........:initform.'id)....(
3a0a0 63 6c 6f 73 71 6c 2d 6f 72 64 65 72 2d 62 79 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 closql-order-by...........:initf
3a0c0 6f 72 6d 20 5b 28 64 65 73 63 20 69 64 29 5d 29 0a 20 20 20 28 69 64 20 20 20 20 20 20 20 20 20 orm.[(desc.id)])....(id.........
3a0e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 69 64 29 0a 20 20 20 ...............:initarg.:id)....
3a100 28 74 68 72 65 61 64 2d 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 (thread-id.................:init
3a120 61 72 67 20 3a 74 68 72 65 61 64 2d 69 64 29 0a 20 20 20 28 72 65 70 6f 73 69 74 6f 72 79 20 20 arg.:thread-id)....(repository..
3a140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 72 65 70 6f 73 69 74 6f ..............:initarg.:reposito
3a160 72 79 29 0a 20 20 20 28 74 79 70 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ry)....(type....................
3a180 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 79 70 65 29 0a 20 20 20 28 74 6f 70 69 63 20 20 20 20 20 ..:initarg.:type)....(topic.....
3a1a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 6f 70 69 63 29 ................:initarg.:topic)
3a1c0 0a 20 20 20 28 75 72 6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a ....(url.......................:
3a1e0 69 6e 69 74 61 72 67 20 3a 75 72 6c 29 0a 20 20 20 28 74 69 74 6c 65 20 20 20 20 20 20 20 20 20 initarg.:url)....(title.........
3a200 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 69 74 6c 65 29 0a 20 20 20 ............:initarg.:title)....
3a220 28 72 65 61 73 6f 6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 (reason....................:init
3a240 61 72 67 20 3a 72 65 61 73 6f 6e 29 0a 20 20 20 28 6c 61 73 74 2d 72 65 61 64 20 20 20 20 20 20 arg.:reason)....(last-read......
3a260 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6c 61 73 74 2d 72 65 61 64 29 0a ...........:initarg.:last-read).
3a280 20 20 20 28 75 70 64 61 74 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 ...(updated...................:i
3a2a0 6e 69 74 61 72 67 20 3a 75 70 64 61 74 65 64 29 29 29 0a 0a 3b 3b 3b 20 51 75 65 72 79 0a 3b 3b nitarg.:updated)))..;;;.Query.;;
3a2c0 3b 3b 20 47 65 74 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d ;;.Get..(cl-defmethod.forge-get-
3a2e0 72 65 70 6f 73 69 74 6f 72 79 20 28 28 6e 6f 74 69 66 79 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 repository.((notify.forge-notifi
3a300 63 61 74 69 6f 6e 29 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6f 62 6a 65 63 74 20 66 6f cation))..."Return.the.object.fo
3a320 72 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 74 68 61 74 20 4e 4f 54 49 46 59 20 62 65 6c r.the.repository.that.NOTIFY.bel
3a340 6f 6e 67 73 20 74 6f 2e 22 0a 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 69 64 20 28 6f 72 65 66 20 ongs.to."...(and-let.((id.(oref.
3a360 6e 6f 74 69 66 79 20 72 65 70 6f 73 69 74 6f 72 79 29 29 29 0a 20 20 20 20 28 63 6c 6f 73 71 6c notify.repository))).....(closql
3a380 2d 67 65 74 20 28 66 6f 72 67 65 2d 64 62 29 20 69 64 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 -get.(forge-db).id.'forge-reposi
3a3a0 74 6f 72 79 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 tory)))..(cl-defmethod.forge-get
3a3c0 2d 74 6f 70 69 63 20 28 28 6e 6f 74 69 66 79 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 -topic.((notify.forge-notificati
3a3e0 6f 6e 29 29 0a 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 on))...(and-let.((repo.(forge-ge
3a400 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 6e 6f 74 69 66 79 29 29 29 0a 20 20 20 20 28 66 6f 72 67 t-repository.notify))).....(forg
3a420 65 2d 67 65 74 2d 74 6f 70 69 63 20 72 65 70 6f 20 28 6f 72 65 66 20 6e 6f 74 69 66 79 20 74 6f e-get-topic.repo.(oref.notify.to
3a440 70 69 63 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 pic))))..(cl-defmethod.forge-get
3a460 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 28 28 69 64 20 73 74 72 69 6e 67 29 29 0a 20 20 28 63 -notification.((id.string))...(c
3a480 6c 6f 73 71 6c 2d 67 65 74 20 28 66 6f 72 67 65 2d 64 62 29 20 69 64 20 27 66 6f 72 67 65 2d 6e losql-get.(forge-db).id.'forge-n
3a4a0 6f 74 69 66 69 63 61 74 69 6f 6e 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 otification))..(cl-defmethod.for
3a4c0 67 65 2d 67 65 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 28 28 74 6f 70 69 63 20 66 6f 72 67 ge-get-notification.((topic.forg
3a4e0 65 2d 74 6f 70 69 63 29 29 0a 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 72 6f 77 20 28 63 61 72 20 e-topic))...(and-let.((row.(car.
3a500 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 2a 20 3a 66 72 6f 6d 20 6e 6f 74 69 (forge-sql.[:select.*.:from.noti
3a520 66 69 63 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 fication........................
3a540 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 72 65 70 6f 73 69 ...........:where.(and.(=.reposi
3a560 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tory.$s1).......................
3a580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 74 6f 70 69 63 ........................(=.topic
3a5a0 20 24 73 32 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .$s2))].........................
3a5c0 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 74 6f 70 69 63 20 72 65 70 6f 73 69 74 6f 72 79 29 .........(oref.topic.repository)
3a5e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
3a600 20 20 28 6f 72 65 66 20 74 6f 70 69 63 20 6e 75 6d 62 65 72 29 29 29 29 29 0a 20 20 20 20 28 63 ..(oref.topic.number))))).....(c
3a620 6c 6f 73 71 6c 2d 2d 72 65 6d 61 6b 65 2d 69 6e 73 74 61 6e 63 65 20 27 66 6f 72 67 65 2d 6e 6f losql--remake-instance.'forge-no
3a640 74 69 66 69 63 61 74 69 6f 6e 20 28 66 6f 72 67 65 2d 64 62 29 20 72 6f 77 29 29 29 0a 0a 3b 3b tification.(forge-db).row)))..;;
3a660 3b 3b 20 43 75 72 72 65 6e 74 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 ;;.Current..(defun.forge-current
3a680 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 6e 64 29 -notification.(&optional.demand)
3a6a0 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 6e 6f 74 69 66 69 63 61 74 ..."Return.the.current.notificat
3a6c0 69 6f 6e 2c 20 63 61 73 74 69 6e 67 20 61 20 74 6f 70 69 63 20 69 66 20 6e 65 63 65 73 73 61 72 ion,.casting.a.topic.if.necessar
3a6e0 79 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 20 6e 6f 74 69 66 69 63 61 74 y..If.there.is.no.such.notificat
3a700 69 6f 6e 20 61 6e 64 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 0a ion.and.DEMAND.is.non-nil,.then.
3a720 73 69 67 6e 61 6c 20 61 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 28 6d 61 67 69 74 2d 73 signal.an.error."...(or.(magit-s
3a740 65 63 74 69 6f 6e 2d 76 61 6c 75 65 2d 69 66 20 27 6e 6f 74 69 66 69 63 61 74 69 6f 6e 29 0a 20 ection-value-if.'notification)..
3a760 20 20 20 20 20 28 61 6e 64 24 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 29 .....(and$.(forge-current-topic)
3a780 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 6e 6f 74 69 66 69 63 61 .............(forge-get-notifica
3a7a0 74 69 6f 6e 20 24 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 64 65 6d 61 6e 64 20 28 75 73 65 72 tion.$)).......(and.demand.(user
3a7c0 2d 65 72 72 6f 72 20 22 4e 6f 20 63 75 72 72 65 6e 74 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 22 -error."No.current.notification"
3a7e0 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 2d ))))..(defun.forge-notification-
3a800 61 74 2d 70 6f 69 6e 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 6e 64 29 0a 20 20 22 52 at-point.(&optional.demand)..."R
3a820 65 74 75 72 6e 20 74 68 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 61 74 20 70 6f 69 6e 74 2c eturn.the.notification.at.point,
3a840 20 63 61 73 74 69 6e 67 20 61 20 74 6f 70 69 63 20 69 66 20 6e 65 63 65 73 73 61 72 79 2e 0a 49 .casting.a.topic.if.necessary..I
3a860 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 f.there.is.no.such.notification.
3a880 61 6e 64 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 0a 73 69 67 6e and.DEMAND.is.non-nil,.then.sign
3a8a0 61 6c 20 61 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 28 6d 61 67 69 74 2d 73 65 63 74 69 al.an.error."...(or.(magit-secti
3a8c0 6f 6e 2d 76 61 6c 75 65 2d 69 66 20 27 6e 6f 74 69 66 69 63 61 74 69 6f 6e 29 0a 20 20 20 20 20 on-value-if.'notification)......
3a8e0 20 28 61 6e 64 24 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 .(and$.(forge-topic-at-point)...
3a900 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f ..........(forge-get-notificatio
3a920 6e 20 24 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 64 65 6d 61 6e 64 20 28 75 73 65 72 2d 65 72 n.$)).......(and.demand.(user-er
3a940 72 6f 72 20 22 4e 6f 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 61 74 20 70 6f 69 6e 74 22 29 29 ror."No.notification.at.point"))
3a960 29 29 0a 0a 3b 3b 3b 3b 20 4c 69 73 74 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d ))..;;;;.List..(defun.forge--ls-
3a980 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 28 73 74 61 74 75 73 29 0a 20 20 28 6c 65 74 2a 20 28 notifications.(status)...(let*.(
3a9a0 28 73 74 61 74 75 73 20 28 65 6e 73 75 72 65 2d 6c 69 73 74 20 73 74 61 74 75 73 29 29 0a 20 20 (status.(ensure-list.status))...
3a9c0 20 20 20 20 20 20 20 28 73 61 76 65 64 70 20 28 6d 65 6d 71 20 27 73 61 76 65 64 20 73 74 61 74 .......(savedp.(memq.'saved.stat
3a9e0 75 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 74 61 74 75 73 20 28 72 65 6d 71 20 27 73 61 76 us))..........(status.(remq.'sav
3aa00 65 64 20 73 74 61 74 75 73 29 29 29 0a 20 20 20 20 28 6d 61 70 63 61 72 0a 20 20 20 20 20 28 70 ed.status))).....(mapcar......(p
3aa20 61 72 74 69 61 6c 20 23 27 63 6c 6f 73 71 6c 2d 2d 72 65 6d 61 6b 65 2d 69 6e 73 74 61 6e 63 65 artial.#'closql--remake-instance
3aa40 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 28 66 6f 72 67 65 2d 64 62 29 29 .'forge-notification.(forge-db))
3aa60 0a 20 20 20 20 20 28 69 66 20 28 73 65 71 2d 73 65 74 2d 65 71 75 61 6c 2d 70 20 73 74 61 74 75 ......(if.(seq-set-equal-p.statu
3aa80 73 20 27 28 75 6e 72 65 61 64 20 70 65 6e 64 69 6e 67 20 64 6f 6e 65 29 20 23 27 65 71 29 0a 20 s.'(unread.pending.done).#'eq)..
3aaa0 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 2a 20 3a 66 ........(forge-sql.[:select.*.:f
3aac0 72 6f 6d 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 64 65 73 rom.notification.:order-by.[(des
3aae0 63 20 75 70 64 61 74 65 64 29 5d 5d 29 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 0a c.updated)]])........(forge-sql.
3ab00 20 20 20 20 20 20 20 20 60 5b 3a 73 65 6c 65 63 74 20 3a 64 69 73 74 69 6e 63 74 20 6e 6f 74 69 ........`[:select.:distinct.noti
3ab20 66 69 63 61 74 69 6f 6e 3a 2a 0a 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 5b 6e 6f 74 69 fication:*...........:from.[noti
3ab40 66 69 63 61 74 69 6f 6e 20 28 61 73 20 69 73 73 75 65 20 74 6f 70 69 63 29 5d 0a 20 20 20 20 20 fication.(as.issue.topic)]......
3ab60 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e .....:where.(and.(=.notification
3ab80 3a 74 6f 70 69 63 20 74 6f 70 69 63 3a 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :topic.topic:id)................
3aba0 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 73 74 61 74 75 73 20 27 28 28 69 6e 20 74 6f 70 69 63 .......,@(and.status.'((in.topic
3abc0 3a 73 74 61 74 75 73 20 24 76 31 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :status.$v1)))..................
3abe0 20 20 20 20 20 2c 40 28 61 6e 64 20 73 61 76 65 64 70 20 27 28 28 3d 20 74 6f 70 69 63 3a 73 61 .....,@(and.savedp.'((=.topic:sa
3ac00 76 65 64 2d 70 20 27 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 3a 75 6e 69 6f 6e 0a 20 20 ved-p.'t))))...........:union...
3ac20 20 20 20 20 20 20 20 20 3a 73 65 6c 65 63 74 20 3a 64 69 73 74 69 6e 63 74 20 6e 6f 74 69 66 69 ........:select.:distinct.notifi
3ac40 63 61 74 69 6f 6e 3a 2a 0a 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 5b 6e 6f 74 69 66 69 cation:*...........:from.[notifi
3ac60 63 61 74 69 6f 6e 20 28 61 73 20 70 75 6c 6c 72 65 71 20 74 6f 70 69 63 29 5d 0a 20 20 20 20 20 cation.(as.pullreq.topic)]......
3ac80 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e .....:where.(and.(=.notification
3aca0 3a 74 6f 70 69 63 20 74 6f 70 69 63 3a 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :topic.topic:id)................
3acc0 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 73 74 61 74 75 73 20 27 28 28 69 6e 20 74 6f 70 69 63 .......,@(and.status.'((in.topic
3ace0 3a 73 74 61 74 75 73 20 24 76 31 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :status.$v1)))..................
3ad00 20 20 20 20 20 2c 40 28 61 6e 64 20 73 61 76 65 64 70 20 27 28 28 3d 20 74 6f 70 69 63 3a 73 61 .....,@(and.savedp.'((=.topic:sa
3ad20 76 65 64 2d 70 20 27 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 ved-p.'t))))...........:order-by
3ad40 20 5b 28 64 65 73 63 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 3a 75 70 64 61 74 65 64 29 5d 5d 0a .[(desc.notification:updated)]].
3ad60 20 20 20 20 20 20 20 20 28 76 63 6f 6e 63 61 74 20 73 74 61 74 75 73 29 29 29 29 29 29 0a 0a 3b ........(vconcat.status))))))..;
3ad80 3b 3b 20 4d 6f 64 65 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 6e 6f ;;.Mode..(defvar-keymap.forge-no
3ada0 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 3a 64 6f 63 20 22 4b 65 79 tifications-mode-map...:doc."Key
3adc0 6d 61 70 20 66 6f 72 20 60 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 map.for.`forge-notifications-mod
3ade0 65 27 2e 22 0a 20 20 3a 70 61 72 65 6e 74 20 28 6d 61 6b 65 2d 63 6f 6d 70 6f 73 65 64 2d 6b 65 e'."...:parent.(make-composed-ke
3ae00 79 6d 61 70 20 66 6f 72 67 65 2d 63 6f 6d 6d 6f 6e 2d 6d 61 70 20 6d 61 67 69 74 2d 6d 6f 64 65 ymap.forge-common-map.magit-mode
3ae20 2d 6d 61 70 29 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 69 74 2d 72 65 66 72 65 73 68 3e -map)..."<remap>.<magit-refresh>
3ae40 22 20 20 20 20 23 27 6d 61 67 69 74 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 0a 20 20 22 3c "....#'magit-refresh-buffer..."<
3ae60 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 6d 65 6e 75 3e 22 20 23 27 66 6f 72 remap>.<forge--list-menu>".#'for
3ae80 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 65 6e 75 29 0a 0a 28 64 65 66 69 6e 65 2d ge-notifications-menu)..(define-
3aea0 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 derived-mode.forge-notifications
3aec0 2d 6d 6f 64 65 20 6d 61 67 69 74 2d 6d 6f 64 65 20 22 46 6f 72 67 65 20 4e 6f 74 69 66 69 63 61 -mode.magit-mode."Forge.Notifica
3aee0 74 69 6f 6e 73 22 0a 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 6c 6f 6f 6b 69 6e 67 tions"..."Major.mode.for.looking
3af00 20 61 74 20 66 6f 72 67 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 22 0a 20 20 3a 69 6e 74 .at.forge.notifications."...:int
3af20 65 72 61 63 74 69 76 65 20 6e 69 6c 0a 20 20 28 6d 61 67 69 74 2d 68 61 63 6b 2d 64 69 72 2d 6c eractive.nil...(magit-hack-dir-l
3af40 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 6e ocal-variables))..(defun.forge-n
3af60 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 28 29 0a 20 20 28 otifications-setup-buffer.()...(
3af80 6d 61 67 69 74 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 23 27 66 6f 72 67 65 2d 6e 6f 74 69 66 magit-setup-buffer.#'forge-notif
3afa0 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 20 6e 69 6c 0a 20 20 20 20 3a 62 75 66 66 65 72 20 28 67 ications-mode.nil.....:buffer.(g
3afc0 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 22 2a 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 et-buffer-create."*forge-notific
3afe0 61 74 69 6f 6e 73 2a 22 29 0a 20 20 20 20 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 ations*").....(default-directory
3b000 20 22 2f 22 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 75 6e 61 73 73 6f 63 69 ."/").....(forge-buffer-unassoci
3b020 61 74 65 64 2d 70 20 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 ated-p.t)))..(defun.forge-notifi
3b040 63 61 74 69 6f 6e 73 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 20 28 29 0a 20 20 28 6d 61 67 cations-refresh-buffer.()...(mag
3b060 69 74 2d 73 65 74 2d 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 20 28 66 6f 72 67 65 it-set-header-line-format.(forge
3b080 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 62 75 66 66 65 72 2d 64 65 73 63 29 29 0a 20 20 28 -notifications-buffer-desc))...(
3b0a0 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 29 29 0a 0a 28 64 forge-insert-notifications))..(d
3b0c0 65 66 75 6e 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 62 75 66 66 65 72 2d efun.forge-notifications-buffer-
3b0e0 64 65 73 63 20 28 29 0a 20 20 28 6c 65 74 20 28 28 73 74 61 74 75 73 20 66 6f 72 67 65 2d 6e 6f desc.()...(let.((status.forge-no
3b100 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 65 6c 65 63 74 69 6f 6e 29 29 0a 20 20 20 20 28 63 6f 6e tifications-selection)).....(con
3b120 64 0a 20 20 20 20 20 28 28 6e 6f 74 20 28 6c 69 73 74 70 20 73 74 61 74 75 73 29 29 0a 20 20 20 d......((not.(listp.status))....
3b140 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 20 28 63 ...(format."%s.notifications".(c
3b160 61 70 69 74 61 6c 69 7a 65 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 73 74 61 74 75 73 29 29 29 apitalize.(symbol-name.status)))
3b180 29 0a 20 20 20 20 20 28 28 73 65 71 2d 73 65 74 2d 65 71 75 61 6c 2d 70 20 73 74 61 74 75 73 20 )......((seq-set-equal-p.status.
3b1a0 27 28 75 6e 72 65 61 64 20 70 65 6e 64 69 6e 67 29 29 20 22 49 6e 62 6f 78 22 29 0a 20 20 20 20 '(unread.pending))."Inbox").....
3b1c0 20 28 28 73 65 71 2d 73 65 74 2d 65 71 75 61 6c 2d 70 20 73 74 61 74 75 73 20 27 28 75 6e 72 65 .((seq-set-equal-p.status.'(unre
3b1e0 61 64 20 70 65 6e 64 69 6e 67 20 64 6f 6e 65 29 29 20 22 41 6c 6c 20 6e 6f 74 69 66 69 63 61 74 ad.pending.done))."All.notificat
3b200 69 6f 6e 73 22 29 0a 20 20 20 20 20 28 28 66 6f 72 6d 61 74 20 22 4e 6f 74 69 66 69 63 61 74 69 ions")......((format."Notificati
3b220 6f 6e 73 20 25 73 22 20 73 74 61 74 75 73 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 66 6f 72 ons.%s".status)))))..(defvar.for
3b240 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 73 74 79 6c 65 20 27 ge-notifications-display-style.'
3b260 66 6c 61 74 29 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e flat).(defvar.forge-notification
3b280 73 2d 73 65 6c 65 63 74 69 6f 6e 20 27 28 75 6e 72 65 61 64 20 70 65 6e 64 69 6e 67 29 29 0a 0a s-selection.'(unread.pending))..
3b2a0 3b 3b 3b 20 43 6f 6d 6d 61 6e 64 73 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d ;;;.Commands..(transient-define-
3b2c0 70 72 65 66 69 78 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 65 6e 75 20 prefix.forge-notifications-menu.
3b2e0 28 29 0a 20 20 22 43 6f 6e 74 72 6f 6c 20 6c 69 73 74 20 6f 66 20 6e 6f 74 69 66 69 63 61 74 69 ()..."Control.list.of.notificati
3b300 6f 6e 73 20 61 6e 64 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 61 74 20 70 6f 69 6e 74 2e 22 0a ons.and.notification.at.point.".
3b320 20 20 3a 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 20 74 0a 20 20 3a 74 72 61 6e 73 69 65 ..:transient-suffix.t...:transie
3b340 6e 74 2d 6e 6f 6e 2d 73 75 66 66 69 78 20 23 27 74 72 61 6e 73 69 65 6e 74 2d 2d 64 6f 2d 63 61 nt-non-suffix.#'transient--do-ca
3b360 6c 6c 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 2d 73 77 69 74 63 68 2d 66 72 61 6d 65 20 6e 69 6c ll...:transient-switch-frame.nil
3b380 0a 20 20 3a 72 65 66 72 65 73 68 2d 73 75 66 66 69 78 65 73 20 74 0a 20 20 3a 65 6e 76 69 72 6f ...:refresh-suffixes.t...:enviro
3b3a0 6e 6d 65 6e 74 20 23 27 66 6f 72 67 65 2d 2d 6d 65 6e 75 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 0a nment.#'forge--menu-environment.
3b3c0 20 20 3a 63 6f 6c 75 6d 6e 2d 77 69 64 74 68 73 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6d 65 ..:column-widths.forge--topic-me
3b3e0 6e 75 73 2d 63 6f 6c 75 6d 6e 2d 77 69 64 74 68 73 0a 20 20 5b 3a 68 69 64 65 20 61 6c 77 61 79 nus-column-widths...[:hide.alway
3b400 73 20 28 22 71 22 20 66 6f 72 67 65 2d 6d 65 6e 75 2d 71 75 69 74 2d 6c 69 73 74 29 5d 0a 20 20 s.("q".forge-menu-quit-list)]...
3b420 5b 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6d 65 6e 75 73 2d 67 72 6f 75 70 0a 20 20 20 5b 22 53 [forge--topic-menus-group....["S
3b440 65 6c 65 63 74 69 6f 6e 22 0a 20 20 20 20 28 22 49 22 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 election".....("I".forge-notific
3b460 61 74 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 69 6e 62 6f 78 29 0a 20 20 20 20 28 22 53 22 20 66 ations-display-inbox).....("S".f
3b480 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 73 61 76 65 64 orge-notifications-display-saved
3b4a0 29 0a 20 20 20 20 28 22 44 22 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 ).....("D".forge-notifications-d
3b4c0 69 73 70 6c 61 79 2d 64 6f 6e 65 29 0a 20 20 20 20 28 22 41 22 20 66 6f 72 67 65 2d 6e 6f 74 69 isplay-done).....("A".forge-noti
3b4e0 66 69 63 61 74 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 61 6c 6c 29 5d 5d 0a 20 20 5b 66 6f 72 67 fications-display-all)]]...[forg
3b500 65 2d 2d 6c 69 73 74 73 2d 67 72 6f 75 70 0a 20 20 20 5b 22 44 69 73 70 6c 61 79 22 0a 20 20 20 e--lists-group....["Display"....
3b520 20 28 22 2d 46 22 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 74 79 6c 65 .("-F".forge-notifications-style
3b540 2d 66 6c 61 74 29 0a 20 20 20 20 28 22 2d 47 22 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 -flat).....("-G".forge-notificat
3b560 69 6f 6e 73 2d 73 74 79 6c 65 2d 6e 65 73 74 65 64 29 0a 20 20 20 20 28 22 2d 48 22 20 66 6f 72 ions-style-nested).....("-H".for
3b580 67 65 2d 74 6f 67 67 6c 65 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 29 5d 5d 0a 20 20 5b 66 6f 72 ge-toggle-topic-legend)]]...[for
3b5a0 67 65 2d 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 2d 67 72 6f 75 70 5d 0a 20 20 28 69 6e 74 65 72 ge--topic-legend-group]...(inter
3b5c0 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d active)...(unless.(derived-mode-
3b5e0 70 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 29 0a 20 20 20 p.'forge-notifications-mode)....
3b600 20 28 66 6f 72 67 65 2d 6c 69 73 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 29 29 0a 20 20 28 .(forge-list-notifications))...(
3b620 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 transient-setup.'forge-notificat
3b640 69 6f 6e 73 2d 6d 65 6e 75 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 61 75 67 6d 65 6e 74 2d ions-menu))..(transient-augment-
3b660 73 75 66 66 69 78 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 65 6e 75 0a suffix.forge-notifications-menu.
3b680 20 20 3a 74 72 61 6e 73 69 65 6e 74 20 23 27 74 72 61 6e 73 69 65 6e 74 2d 2d 64 6f 2d 72 65 70 ..:transient.#'transient--do-rep
3b6a0 6c 61 63 65 0a 20 20 3a 69 66 2d 6d 6f 64 65 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 lace...:if-mode.'forge-notificat
3b6c0 69 6f 6e 73 2d 6d 6f 64 65 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 28 23 23 65 71 20 28 6f 72 65 ions-mode...:inapt-if.(##eq.(ore
3b6e0 66 20 74 72 61 6e 73 69 65 6e 74 2d 2d 70 72 65 66 69 78 20 63 6f 6d 6d 61 6e 64 29 20 27 66 6f f.transient--prefix.command).'fo
3b700 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 65 6e 75 29 0a 20 20 3a 69 6e 61 70 74 rge-notifications-menu)...:inapt
3b720 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 29 0a 0a 3b 3b 3b -face.'forge-suffix-active)..;;;
3b740 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 73 74 ###autoload(autoload.'forge-list
3b760 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 22 66 6f 72 67 65 2d 6e 6f 74 69 66 79 22 20 6e 69 -notifications."forge-notify".ni
3b780 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f l.t).(transient-define-suffix.fo
3b7a0 72 67 65 2d 6c 69 73 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 28 29 0a 20 20 22 4c 69 73 rge-list-notifications.()..."Lis
3b7c0 74 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6d 6f t.notifications."...:inapt-if-mo
3b7e0 64 65 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 0a 20 20 3a de.'forge-notifications-mode...:
3b800 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 0a inapt-face.'forge-suffix-active.
3b820 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 74 65 72 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 6c ..(declare.(interactive-only.nil
3b840 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 6e 6f 74 69 ))...(interactive)...(forge-noti
3b860 66 69 63 61 74 69 6f 6e 73 2d 73 65 74 75 70 2d 62 75 66 66 65 72 29 0a 20 20 28 74 72 61 6e 73 fications-setup-buffer)...(trans
3b880 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d ient-setup.'forge-notifications-
3b8a0 6d 65 6e 75 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 menu))..(transient-define-suffix
3b8c0 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 69 6e 62 .forge-notifications-display-inb
3b8e0 6f 78 20 28 29 0a 20 20 22 4c 69 73 74 20 75 6e 72 65 61 64 20 61 6e 64 20 70 65 6e 64 69 6e 67 ox.()..."List.unread.and.pending
3b900 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 .notifications."...:description.
3b920 22 69 6e 62 6f 78 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 28 23 23 65 71 75 61 6c 20 66 6f 72 "inbox"...:inapt-if.(##equal.for
3b940 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 65 6c 65 63 74 69 6f 6e 20 27 28 75 6e 72 ge-notifications-selection.'(unr
3b960 65 61 64 20 70 65 6e 64 69 6e 67 29 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 ead.pending))...:inapt-face.'for
3b980 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 ge-suffix-active...(interactive)
3b9a0 0a 20 20 28 75 6e 6c 65 73 73 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 ...(unless.(derived-mode-p.'forg
3b9c0 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 29 0a 20 20 20 20 28 75 73 65 72 2d e-notifications-mode).....(user-
3b9e0 65 72 72 6f 72 20 22 4e 6f 74 20 69 6e 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 62 75 66 66 65 error."Not.in.notification.buffe
3ba00 72 22 29 29 0a 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 r"))...(setq.forge-notifications
3ba20 2d 73 65 6c 65 63 74 69 6f 6e 20 27 28 75 6e 72 65 61 64 20 70 65 6e 64 69 6e 67 29 29 0a 20 20 -selection.'(unread.pending))...
3ba40 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a 0a 28 74 72 61 6e 73 69 (forge-refresh-buffer))..(transi
3ba60 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 ent-define-suffix.forge-notifica
3ba80 74 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 73 61 76 65 64 20 28 29 0a 20 20 22 4c 69 73 74 20 73 tions-display-saved.()..."List.s
3baa0 61 76 65 64 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 aved.notifications."...:descript
3bac0 69 6f 6e 20 22 73 61 76 65 64 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 28 23 23 65 71 20 66 6f ion."saved"...:inapt-if.(##eq.fo
3bae0 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 65 6c 65 63 74 69 6f 6e 20 27 73 61 76 rge-notifications-selection.'sav
3bb00 65 64 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d ed)...:inapt-face.'forge-suffix-
3bb20 61 63 74 69 76 65 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 active...(interactive)...(unless
3bb40 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 .(derived-mode-p.'forge-notifica
3bb60 74 69 6f 6e 73 2d 6d 6f 64 65 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 tions-mode).....(user-error."Not
3bb80 20 69 6e 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 62 75 66 66 65 72 22 29 29 0a 20 20 28 73 65 .in.notification.buffer"))...(se
3bba0 74 71 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 65 6c 65 63 74 69 6f 6e tq.forge-notifications-selection
3bbc0 20 27 73 61 76 65 64 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 .'saved)...(forge-refresh-buffer
3bbe0 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 ))..(transient-define-suffix.for
3bc00 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 64 6f 6e 65 20 28 29 ge-notifications-display-done.()
3bc20 0a 20 20 22 4c 69 73 74 20 64 6f 6e 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 22 0a 20 20 ..."List.done.notifications."...
3bc40 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 64 6f 6e 65 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 :description."done"...:inapt-if.
3bc60 28 23 23 65 71 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 65 6c 65 63 74 (##eq.forge-notifications-select
3bc80 69 6f 6e 20 27 64 6f 6e 65 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d ion.'done)...:inapt-face.'forge-
3bca0 73 75 66 66 69 78 2d 61 63 74 69 76 65 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 suffix-active...(interactive)...
3bcc0 28 75 6e 6c 65 73 73 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 6e (unless.(derived-mode-p.'forge-n
3bce0 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 otifications-mode).....(user-err
3bd00 6f 72 20 22 4e 6f 74 20 69 6e 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 62 75 66 66 65 72 22 29 or."Not.in.notification.buffer")
3bd20 29 0a 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 65 )...(setq.forge-notifications-se
3bd40 6c 65 63 74 69 6f 6e 20 27 64 6f 6e 65 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d lection.'done)...(forge-refresh-
3bd60 62 75 66 66 65 72 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 buffer))..(transient-define-suff
3bd80 69 78 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 61 ix.forge-notifications-display-a
3bda0 6c 6c 20 28 29 0a 20 20 22 4c 69 73 74 20 61 6c 6c 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e ll.()..."List.all.notifications.
3bdc0 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 61 6c 6c 22 0a 20 20 3a 69 6e 61 70 74 2d "...:description."all"...:inapt-
3bde0 69 66 20 28 23 23 65 71 75 61 6c 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d if.(##equal.forge-notifications-
3be00 73 65 6c 65 63 74 69 6f 6e 20 27 28 75 6e 72 65 61 64 20 70 65 6e 64 69 6e 67 20 64 6f 6e 65 29 selection.'(unread.pending.done)
3be20 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 )...:inapt-face.'forge-suffix-ac
3be40 74 69 76 65 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 tive...(interactive)...(unless.(
3be60 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 derived-mode-p.'forge-notificati
3be80 6f 6e 73 2d 6d 6f 64 65 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 20 69 ons-mode).....(user-error."Not.i
3bea0 6e 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 62 75 66 66 65 72 22 29 29 0a 20 20 28 73 65 74 71 n.notification.buffer"))...(setq
3bec0 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 65 6c 65 63 74 69 6f 6e 20 27 .forge-notifications-selection.'
3bee0 28 75 6e 72 65 61 64 20 70 65 6e 64 69 6e 67 20 64 6f 6e 65 29 29 0a 20 20 28 66 6f 72 67 65 2d (unread.pending.done))...(forge-
3bf00 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 refresh-buffer))..(transient-def
3bf20 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 ine-suffix.forge-notifications-s
3bf40 74 79 6c 65 2d 66 6c 61 74 20 28 29 0a 20 20 22 53 68 6f 77 20 61 20 66 6c 61 74 20 6e 6f 74 69 tyle-flat.()..."Show.a.flat.noti
3bf60 66 69 63 61 74 69 6f 6e 20 6c 69 73 74 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 fication.list."...:description."
3bf80 73 69 6e 67 6c 65 20 6c 69 73 74 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 28 23 23 65 71 20 66 single.list"...:inapt-if.(##eq.f
3bfa0 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 73 74 79 6c 65 orge-notifications-display-style
3bfc0 20 27 66 6c 61 74 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 .'flat)...:inapt-face.'forge-suf
3bfe0 66 69 78 2d 61 63 74 69 76 65 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e fix-active...(interactive)...(un
3c000 6c 65 73 73 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 6e 6f 74 69 less.(derived-mode-p.'forge-noti
3c020 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 fications-mode).....(user-error.
3c040 22 4e 6f 74 20 69 6e 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 62 75 66 66 65 72 22 29 29 0a 20 "Not.in.notification.buffer"))..
3c060 20 28 73 65 74 71 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 69 73 70 6c .(setq.forge-notifications-displ
3c080 61 79 2d 73 74 79 6c 65 20 27 66 6c 61 74 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 ay-style.'flat)...(forge-refresh
3c0a0 2d 62 75 66 66 65 72 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 -buffer))..(transient-define-suf
3c0c0 66 69 78 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 74 79 6c 65 2d 6e 65 fix.forge-notifications-style-ne
3c0e0 73 74 65 64 20 28 29 0a 20 20 22 47 72 6f 75 70 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 62 sted.()..."Group.notifications.b
3c100 79 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 67 y.repository."...:description."g
3c120 72 6f 75 70 20 62 79 20 72 65 70 6f 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 28 23 23 65 71 20 roup.by.repo"...:inapt-if.(##eq.
3c140 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 73 74 79 6c forge-notifications-display-styl
3c160 65 20 27 6e 65 73 74 65 64 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d e.'nested)...:inapt-face.'forge-
3c180 73 75 66 66 69 78 2d 61 63 74 69 76 65 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 suffix-active...(interactive)...
3c1a0 28 75 6e 6c 65 73 73 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 6e (unless.(derived-mode-p.'forge-n
3c1c0 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 otifications-mode).....(user-err
3c1e0 6f 72 20 22 4e 6f 74 20 69 6e 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 62 75 66 66 65 72 22 29 or."Not.in.notification.buffer")
3c200 29 0a 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 69 )...(setq.forge-notifications-di
3c220 73 70 6c 61 79 2d 73 74 79 6c 65 20 27 6e 65 73 74 65 64 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 splay-style.'nested)...(forge-re
3c240 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a 0a 3b 3b 3b 20 53 65 63 74 69 6f 6e 73 0a 0a 28 64 fresh-buffer))..;;;.Sections..(d
3c260 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 73 65 63 74 69 6f 6e efclass.forge-repository-section
3c280 20 28 6d 61 67 69 74 2d 73 65 63 74 69 6f 6e 29 0a 20 20 28 28 74 79 70 65 20 20 20 3a 69 6e 69 .(magit-section)...((type...:ini
3c2a0 74 66 6f 72 6d 20 27 66 6f 72 67 65 2d 72 65 70 6f 29 0a 20 20 20 28 6b 65 79 6d 61 70 20 3a 69 tform.'forge-repo)....(keymap.:i
3c2c0 6e 69 74 66 6f 72 6d 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 73 65 63 74 69 6f nitform.'forge-repository-sectio
3c2e0 6e 2d 6d 61 70 29 29 29 0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 76 61 72 69 61 n-map)))..(define-obsolete-varia
3c300 62 6c 65 2d 61 6c 69 61 73 20 27 66 6f 72 67 65 2d 66 6f 72 67 65 2d 72 65 70 6f 2d 73 65 63 74 ble-alias.'forge-forge-repo-sect
3c320 69 6f 6e 2d 6d 61 70 0a 20 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 73 65 63 74 ion-map...'forge-repository-sect
3c340 69 6f 6e 2d 6d 61 70 20 22 46 6f 72 67 65 20 30 2e 34 2e 30 22 29 0a 0a 28 64 65 66 76 61 72 2d ion-map."Forge.0.4.0")..(defvar-
3c360 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 73 65 63 74 69 6f 6e 2d keymap.forge-repository-section-
3c380 6d 61 70 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 69 74 2d 62 72 6f 77 73 65 2d 74 68 69 map..."<remap>.<magit-browse-thi
3c3a0 6e 67 3e 22 20 23 27 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 68 69 73 2d 72 65 70 6f 73 69 74 ng>".#'forge-browse-this-reposit
3c3c0 6f 72 79 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 69 74 2d 76 69 73 69 74 2d 74 68 69 6e ory..."<remap>.<magit-visit-thin
3c3e0 67 3e 22 20 20 23 27 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 72 65 70 6f 73 69 74 6f g>"..#'forge-visit-this-reposito
3c400 72 79 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 6e 6f 74 69 66 69 63 ry)..(defun.forge-insert-notific
3c420 61 74 69 6f 6e 73 20 28 29 0a 20 20 28 6c 65 74 20 28 28 6e 6f 74 69 66 73 20 28 66 6f 72 67 65 ations.()...(let.((notifs.(forge
3c440 2d 2d 6c 73 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 --ls-notifications.forge-notific
3c460 61 74 69 6f 6e 73 2d 73 65 6c 65 63 74 69 6f 6e 29 29 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 69 ations-selection))).....(magit-i
3c480 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 20 28 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 29 0a 20 20 nsert-section.(notifications)...
3c4a0 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 28 28 6e 6f 74 20 6e 6f 74 69 66 73 29 0a 20 ....(cond........((not.notifs)..
3c4c0 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 28 65 6d 70 74 79 29 5c 6e 22 29 29 0a 20 20 20 .......(insert."(empty)\n"))....
3c4e0 20 20 20 20 28 28 65 71 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 69 73 ....((eq.forge-notifications-dis
3c500 70 6c 61 79 2d 73 74 79 6c 65 20 27 66 6c 61 74 29 0a 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 play-style.'flat).........(magit
3c520 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 2d 62 6f 64 79 0a 20 20 20 20 20 20 20 20 20 20 28 -insert-section-body...........(
3c540 64 6f 6c 69 73 74 20 28 6e 6f 74 69 66 20 6e 6f 74 69 66 73 29 0a 20 20 20 20 20 20 20 20 20 20 dolist.(notif.notifs)...........
3c560 20 20 28 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 6e 6f 74 ..(forge-insert-notification.not
3c580 69 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 3f 5c 6e 29 29 29 0a 20 20 if))...........(insert.?\n)))...
3c5a0 20 20 20 20 20 28 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 5f 20 2e 20 2c 6e 6f 74 .....((pcase-dolist.(`(,_...,not
3c5c0 69 66 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 71 ifs)........................(seq
3c5e0 2d 67 72 6f 75 70 2d 62 79 20 28 23 23 6f 72 65 66 20 25 20 72 65 70 6f 73 69 74 6f 72 79 29 20 -group-by.(##oref.%.repository).
3c600 6e 6f 74 69 66 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 72 65 70 6f 20 28 notifs))...........(let.((repo.(
3c620 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 63 61 72 20 6e 6f 74 69 66 73 forge-get-repository.(car.notifs
3c640 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 )))).............(magit-insert-s
3c660 65 63 74 69 6f 6e 20 28 66 6f 72 67 65 2d 72 65 70 6f 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 ection.(forge-repo.repo)........
3c680 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 68 65 61 64 69 6e 67 0a 20 20 20 .......(magit-insert-heading....
3c6a0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 70 72 6f 70 65 72 74 69 7a 65 .............(concat.(propertize
3c6c0 20 28 6f 72 65 66 20 72 65 70 6f 20 73 6c 75 67 29 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 .(oref.repo.slug).'font-lock-fac
3c6e0 65 20 27 62 6f 6c 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e.'bold)........................
3c700 20 28 66 6f 72 6d 61 74 20 22 20 28 25 73 29 22 20 28 6c 65 6e 67 74 68 20 6e 6f 74 69 66 73 29 .(format.".(%s)".(length.notifs)
3c720 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d )))...............(magit-insert-
3c740 73 65 63 74 69 6f 6e 2d 62 6f 64 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f section-body.................(do
3c760 6c 69 73 74 20 28 6e 6f 74 69 66 20 6e 6f 74 69 66 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 list.(notif.notifs).............
3c780 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e ......(forge-insert-notification
3c7a0 20 6e 6f 74 69 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 .notif)).................(insert
3c7c0 20 3f 5c 6e 29 29 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 69 6e 73 .?\n))))))))))..(defun.forge-ins
3c7e0 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 28 6e 6f 74 69 66 29 0a 20 20 28 77 69 74 68 ert-notification.(notif)...(with
3c800 2d 73 6c 6f 74 73 20 28 74 79 70 65 20 74 69 74 6c 65 20 75 72 6c 29 20 6e 6f 74 69 66 0a 20 20 -slots.(type.title.url).notif...
3c820 20 20 28 70 63 61 73 65 20 74 79 70 65 0a 20 20 20 20 20 20 28 28 6f 72 20 27 64 69 73 63 75 73 ..(pcase.type.......((or.'discus
3c840 73 69 6f 6e 20 27 69 73 73 75 65 20 27 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 20 28 66 6f sion.'issue.'pullreq)........(fo
3c860 72 67 65 2d 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 rge--insert-topic.(forge-get-top
3c880 69 63 20 6e 6f 74 69 66 29 29 29 0a 20 20 20 20 20 20 28 27 63 6f 6d 6d 69 74 0a 20 20 20 20 20 ic.notif))).......('commit......
3c8a0 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 20 28 6e 63 6f 6d 6d 69 74 ..(magit-insert-section.(ncommit
3c8c0 20 6e 69 6c 29 20 3b 20 21 63 6f 6d 6d 69 74 0a 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 .nil).;.!commit..........(string
3c8e0 2d 6d 61 74 63 68 20 22 5b 5e 2f 5d 2a 5c 5c 27 22 20 75 72 6c 29 0a 20 20 20 20 20 20 20 20 20 -match."[^/]*\\'".url)..........
3c900 28 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 25 73 (insert...........(format."%s.%s
3c920 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a \n"...................(propertiz
3c940 65 20 28 73 75 62 73 74 72 69 6e 67 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 30 20 75 72 6c e.(substring.(match-string.0.url
3c960 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )...............................
3c980 20 20 20 20 20 20 20 20 20 20 20 30 20 28 6d 61 67 69 74 2d 61 62 62 72 65 76 2d 6c 65 6e 67 74 ...........0.(magit-abbrev-lengt
3c9a0 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 h)).............................
3c9c0 20 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 20 27 6d 61 67 69 74 2d 68 61 73 68 29 0a 20 ..'font-lock-face.'magit-hash)..
3c9e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 6c 6f 67 2d 2d 77 61 73 .................(magit-log--was
3ca00 68 2d 73 75 6d 6d 61 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 h-summary....................(pr
3ca20 6f 70 65 72 74 69 7a 65 20 74 69 74 6c 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 0a 20 opertize.title.'font-lock-face..
3ca40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 ..............................(i
3ca60 66 2d 6c 65 74 2a 20 28 28 74 6f 70 69 63 20 28 6f 72 65 66 20 6e 6f 74 69 66 20 74 6f 70 69 63 f-let*.((topic.(oref.notif.topic
3ca80 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ))..............................
3caa0 20 20 20 20 20 20 20 20 20 20 20 20 28 5f 28 65 71 20 28 6f 72 65 66 20 74 6f 70 69 63 20 73 74 ............(_(eq.(oref.topic.st
3cac0 61 74 75 73 29 20 27 75 6e 72 65 61 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 atus).'unread)))................
3cae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 ....................'forge-topic
3cb00 2d 75 6e 72 65 61 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -unread.........................
3cb20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6f 70 65 6e 29 29 29 29 29 29 .........'forge-topic-open))))))
3cb40 29 0a 20 20 20 20 20 20 28 5f 0a 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 64 6f 63 75 6d 65 6e ).......(_........;;.The.documen
3cb60 74 61 74 69 6f 6e 20 64 6f 65 73 20 6e 6f 74 20 6d 65 6e 74 69 6f 6e 20 77 68 61 74 20 22 74 79 tation.does.not.mention.what."ty
3cb80 70 65 73 22 0a 20 20 20 20 20 20 20 3b 3b 20 65 78 69 73 74 2e 20 20 4d 61 6b 65 20 69 74 20 6f pes"........;;.exist...Make.it.o
3cba0 62 76 69 6f 75 73 20 74 68 61 74 20 74 68 69 73 20 69 73 20 73 6f 6d 65 74 68 69 6e 67 0a 20 20 bvious.that.this.is.something...
3cbc0 20 20 20 20 20 3b 3b 20 77 65 20 64 6f 20 6e 6f 74 20 6b 6e 6f 77 20 68 6f 77 20 74 6f 20 68 61 .....;;.we.do.not.know.how.to.ha
3cbe0 6e 64 6c 65 20 70 72 6f 70 65 72 6c 79 20 79 65 74 2e 0a 20 20 20 20 20 20 20 28 6d 61 67 69 74 ndle.properly.yet.........(magit
3cc00 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 20 28 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 6e 6f -insert-section.(notification.no
3cc20 74 69 66 29 0a 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 70 72 6f 70 65 72 74 69 7a tif)..........(insert.(propertiz
3cc40 65 20 28 66 6f 72 6d 61 74 20 22 28 25 73 29 20 25 73 5c 6e 22 20 74 79 70 65 20 74 69 74 6c 65 e.(format."(%s).%s\n".type.title
3cc60 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 )..............................'
3cc80 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 20 27 65 72 72 6f 72 29 29 29 29 29 29 29 0a 0a 3b 3b font-lock-face.'error)))))))..;;
3cca0 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d ;._.;;.Local.Variables:.;;.read-
3ccc0 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 symbol-shorthands:.(.;;...("and$
3cce0 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b "............"cond-let--and$").;
3cd00 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 ;...("and-let"........."cond-let
3cd20 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 69 66 2d 6c 65 74 22 20 20 20 20 20 20 --and-let").;;...("if-let"......
3cd40 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 ...."cond-let--if-let").;;...("w
3cd60 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d hen-let"........"cond-let--when-
3cd80 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 70 61 72 74 69 61 6c 22 20 20 20 20 20 20 20 2e 20 22 6c let").;;...("partial"........."l
3cda0 6c 61 6d 61 2d 2d 6c 65 66 74 2d 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 22 29 29 0a 3b 3b lama--left-apply-partially")).;;
3cdc0 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 79 29 0a 3b 3b .End:.(provide.'forge-notify).;;
3cde0 3b 20 66 6f 72 67 65 2d 6e 6f 74 69 66 79 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 ;.forge-notify.el.ends.here.....
3ce00 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 70 6b 67 2e 65 6c forge-20250916.1119/forge-pkg.el
3ce20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3ce40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3ce60 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
3ce80 30 30 30 31 33 34 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 33 32 35 00 20 30 00 00 00 0001345.00000000000.014325..0...
3cea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3cec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3cee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3cf00 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
3cf20 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
3cf40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3cf60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3cf80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3cfa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3cfc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3cfe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d000 3b 3b 20 2d 2a 2d 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 3b 20 6c 65 78 69 63 ;;.-*-.no-byte-compile:.t;.lexic
3d020 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 6e 69 6c 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b al-binding:.nil.-*-.(define-pack
3d040 61 67 65 20 22 66 6f 72 67 65 22 20 22 32 30 32 35 30 39 31 36 2e 31 31 31 39 22 0a 20 20 22 41 age."forge"."20250916.1119"..."A
3d060 63 63 65 73 73 20 47 69 74 20 66 6f 72 67 65 73 20 66 72 6f 6d 20 4d 61 67 69 74 2e 22 0a 20 20 ccess.Git.forges.from.Magit."...
3d080 27 28 28 65 6d 61 63 73 20 20 20 20 20 20 20 20 20 22 32 39 2e 31 22 29 0a 20 20 20 20 28 63 6f '((emacs........."29.1").....(co
3d0a0 6d 70 61 74 20 20 20 20 20 20 20 20 22 33 30 2e 31 22 29 0a 20 20 20 20 28 63 6c 6f 73 71 6c 20 mpat........"30.1").....(closql.
3d0c0 20 20 20 20 20 20 20 22 32 2e 33 22 29 0a 20 20 20 20 28 63 6f 6e 64 2d 6c 65 74 20 20 20 20 20 ......."2.3").....(cond-let.....
3d0e0 20 22 30 2e 31 22 29 0a 20 20 20 20 28 65 6d 61 63 73 71 6c 20 20 20 20 20 20 20 22 34 2e 33 22 ."0.1").....(emacsql......."4.3"
3d100 29 0a 20 20 20 20 28 67 68 75 62 20 20 20 20 20 20 20 20 20 20 22 35 2e 30 22 29 0a 20 20 20 20 ).....(ghub.........."5.0").....
3d120 28 6c 6c 61 6d 61 20 20 20 20 20 20 20 20 20 22 31 2e 30 22 29 0a 20 20 20 20 28 6d 61 67 69 74 (llama........."1.0").....(magit
3d140 20 20 20 20 20 20 20 20 20 22 34 2e 34 22 29 0a 20 20 20 20 28 6d 61 72 6b 64 6f 77 6e 2d 6d 6f ........."4.4").....(markdown-mo
3d160 64 65 20 22 32 2e 37 22 29 0a 20 20 20 20 28 73 65 71 20 20 20 20 20 20 20 20 20 20 20 22 32 2e de."2.7").....(seq..........."2.
3d180 32 34 22 29 0a 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 20 20 20 20 20 22 30 2e 31 30 22 29 0a 24").....(transient....."0.10").
3d1a0 20 20 20 20 28 79 61 6d 6c 20 20 20 20 20 20 20 20 20 20 22 31 2e 32 22 29 29 0a 20 20 3a 75 72 ....(yaml.........."1.2"))...:ur
3d1c0 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6d 61 67 69 74 2f 66 6f 72 67 l."https://github.com/magit/forg
3d1e0 65 22 0a 20 20 3a 63 6f 6d 6d 69 74 20 22 38 30 34 34 37 62 63 31 31 61 37 66 34 62 30 61 39 39 e"...:commit."80447bc11a7f4b0a99
3d200 36 37 31 61 63 61 37 36 32 63 65 37 36 33 36 32 31 35 32 33 30 36 22 0a 20 20 3a 72 65 76 64 65 671aca762ce76362152306"...:revde
3d220 73 63 20 22 38 30 34 34 37 62 63 31 31 61 37 66 22 0a 20 20 3a 6b 65 79 77 6f 72 64 73 20 27 28 sc."80447bc11a7f"...:keywords.'(
3d240 22 67 69 74 22 20 22 74 6f 6f 6c 73 22 20 22 76 63 22 29 0a 20 20 3a 61 75 74 68 6f 72 73 20 27 "git"."tools"."vc")...:authors.'
3d260 28 28 22 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 22 20 2e 20 22 65 6d 61 63 73 2e 66 6f 72 (("Jonas.Bernoulli"..."emacs.for
3d280 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 22 29 29 0a 20 20 3a 6d 61 69 ge@jonas.bernoulli.dev"))...:mai
3d2a0 6e 74 61 69 6e 65 72 73 20 27 28 28 22 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 22 20 2e 20 ntainers.'(("Jonas.Bernoulli"...
3d2c0 22 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 "emacs.forge@jonas.bernoulli.dev
3d2e0 22 29 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ")))............................
3d300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d400 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 70 6f 73 74 2e 65 forge-20250916.1119/forge-post.e
3d420 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 l...............................
3d440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d460 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
3d480 30 30 33 37 36 37 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 35 30 00 20 30 00 00 00 0037675.00000000000.014550..0...
3d4a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d4c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d4e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d500 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
3d520 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
3d540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d5a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3d600 3b 3b 3b 20 66 6f 72 67 65 2d 70 6f 73 74 2e 65 6c 20 2d 2d 2d 20 50 6f 73 74 20 73 75 70 70 6f ;;;.forge-post.el.---.Post.suppo
3d620 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 2d 2a 2d 0a 0a 3b rt..-*-.lexical-binding:t.-*-..;
3d640 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f 6e 61 73 20 ;.Copyright.(C).2018-2025.Jonas.
3d660 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e Bernoulli..;;.Author:.Jonas.Bern
3d680 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c oulli.<emacs.forge@jonas.bernoul
3d6a0 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 li.dev>.;;.Maintainer:.Jonas.Ber
3d6c0 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 noulli.<emacs.forge@jonas.bernou
3d6e0 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 lli.dev>..;;.SPDX-License-Identi
3d700 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 68 69 73 20 fier:.GPL-3.0-or-later..;;.This.
3d720 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61 6e 20 72 file.is.free.software:.you.can.r
3d740 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 edistribute.it.and/or.modify.;;.
3d760 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 it.under.the.terms.of.the.GNU.Ge
3d780 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 neral.Public.License.as.publishe
3d7a0 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 d.;;.by.the.Free.Software.Founda
3d7c0 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 tion,.either.version.3.of.the.Li
3d7e0 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e cense,.;;.or.(at.your.option).an
3d800 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 y.later.version..;;.;;.This.file
3d820 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 .is.distributed.in.the.hope.that
3d840 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f .it.will.be.useful,.;;.but.WITHO
3d860 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 UT.ANY.WARRANTY;.without.even.th
3d880 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e e.implied.warranty.of.;;.MERCHAN
3d8a0 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 TABILITY.or.FITNESS.FOR.A.PARTIC
3d8c0 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 ULAR.PURPOSE...See.the.;;.GNU.Ge
3d8e0 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 neral.Public.License.for.more.de
3d900 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 tails..;;.;;.You.should.have.rec
3d920 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 eived.a.copy.of.the.GNU.General.
3d940 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 Public.License.;;.along.with.thi
3d960 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 s.file...If.not,.see.<https://ww
3d980 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a w.gnu.org/licenses/>...;;;.Code:
3d9a0 0a 0a 28 72 65 71 75 69 72 65 20 27 6d 61 72 6b 64 6f 77 6e 2d 6d 6f 64 65 29 0a 0a 28 72 65 71 ..(require.'markdown-mode)..(req
3d9c0 75 69 72 65 20 27 66 6f 72 67 65 29 0a 0a 3b 3b 3b 20 4f 70 74 69 6f 6e 73 0a 0a 28 64 65 66 63 uire.'forge)..;;;.Options..(defc
3d9e0 75 73 74 6f 6d 20 66 6f 72 67 65 2d 70 6f 73 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 0a 20 20 27 28 76 ustom.forge-post-mode-hook...'(v
3da00 69 73 75 61 6c 2d 6c 69 6e 65 2d 6d 6f 64 65 0a 20 20 20 20 74 75 72 6e 2d 6f 6e 2d 66 6c 79 73 isual-line-mode.....turn-on-flys
3da20 70 65 6c 6c 29 0a 20 20 22 48 6f 6f 6b 20 72 75 6e 20 61 66 74 65 72 20 65 6e 74 65 72 69 6e 67 pell)..."Hook.run.after.entering
3da40 20 46 6f 72 67 65 2d 50 6f 73 74 20 6d 6f 64 65 2e 0a 54 68 69 73 20 68 6f 6f 6b 20 69 73 20 72 .Forge-Post.mode..This.hook.is.r
3da60 75 6e 20 65 61 72 6c 79 20 6f 6e 20 77 68 69 6c 65 20 73 65 74 74 69 6e 67 20 75 70 20 61 20 62 un.early.on.while.setting.up.a.b
3da80 75 66 66 65 72 20 74 6f 20 65 64 69 74 20 61 20 70 6f 73 74 2e 0a 49 66 20 79 6f 75 20 77 61 6e uffer.to.edit.a.post..If.you.wan
3daa0 74 20 74 6f 20 6d 61 6b 65 20 63 68 61 6e 67 65 73 20 74 6f 20 74 68 65 20 61 6c 72 65 61 64 79 t.to.make.changes.to.the.already
3dac0 20 70 6f 70 75 6c 61 74 65 64 20 62 75 66 66 65 72 2c 20 69 6e 73 74 65 61 64 0a 75 73 65 20 60 .populated.buffer,.instead.use.`
3dae0 66 6f 72 67 65 2d 65 64 69 74 2d 70 6f 73 74 2d 68 6f 6f 6b 27 2e 22 0a 20 20 3a 70 61 63 6b 61 forge-edit-post-hook'."...:packa
3db00 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 32 2e 30 22 29 0a 20 20 ge-version.'(forge..."0.2.0")...
3db20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 68 6f 6f 6b 0a 20 20 3a 6f :group.'forge...:type.'hook...:o
3db40 70 74 69 6f 6e 73 20 27 28 76 69 73 75 61 6c 2d 6c 69 6e 65 2d 6d 6f 64 65 0a 20 20 20 20 20 20 ptions.'(visual-line-mode.......
3db60 20 20 20 20 20 20 20 74 75 72 6e 2d 6f 6e 2d 66 6c 79 73 70 65 6c 6c 29 29 0a 0a 28 64 65 66 63 .......turn-on-flyspell))..(defc
3db80 75 73 74 6f 6d 20 66 6f 72 67 65 2d 65 64 69 74 2d 70 6f 73 74 2d 68 6f 6f 6b 0a 20 20 27 28 66 ustom.forge-edit-post-hook...'(f
3dba0 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 69 6e 73 65 72 74 2d 73 69 6e 67 6c orge-create-pullreq-insert-singl
3dbc0 65 2d 63 6f 6d 6d 69 74 2d 6d 65 73 73 61 67 65 0a 20 20 20 20 66 6f 72 67 65 2d 63 72 65 61 74 e-commit-message.....forge-creat
3dbe0 65 2d 70 75 6c 6c 72 65 71 2d 73 68 6f 77 2d 64 69 66 66 29 0a 20 20 22 48 6f 6f 6b 20 72 75 6e e-pullreq-show-diff)..."Hook.run
3dc00 20 61 66 74 65 72 20 73 65 74 74 69 6e 67 20 75 70 20 61 20 62 75 66 66 65 72 20 74 6f 20 65 64 .after.setting.up.a.buffer.to.ed
3dc20 69 74 20 61 20 70 6f 73 74 2e 0a 43 6f 6e 73 75 6c 74 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 it.a.post..Consult.the.variable.
3dc40 60 66 6f 72 67 65 2d 65 64 69 74 2d 70 6f 73 74 2d 61 63 74 69 6f 6e 27 20 74 6f 20 64 65 74 65 `forge-edit-post-action'.to.dete
3dc60 72 6d 69 6e 65 20 74 68 65 20 61 63 74 69 6f 6e 3b 0a 6f 6e 65 20 6f 66 20 60 6e 65 77 2d 64 69 rmine.the.action;.one.of.`new-di
3dc80 73 63 75 73 73 69 6f 6e 27 2c 20 60 6e 65 77 2d 69 73 73 75 65 27 2c 20 60 6e 65 77 2d 70 75 6c scussion',.`new-issue',.`new-pul
3dca0 6c 72 65 71 27 2c 20 60 72 65 70 6c 79 27 20 61 6e 64 20 60 65 64 69 74 27 2e 22 0a 20 20 3a 70 lreq',.`reply'.and.`edit'."...:p
3dcc0 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 36 2e 30 22 ackage-version.'(forge..."0.6.0"
3dce0 29 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 68 6f 6f 6b 0a )...:group.'forge...:type.'hook.
3dd00 20 20 3a 6f 70 74 69 6f 6e 73 20 27 28 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 ..:options.'(forge-create-pullre
3dd20 71 2d 69 6e 73 65 72 74 2d 73 69 6e 67 6c 65 2d 63 6f 6d 6d 69 74 2d 6d 65 73 73 61 67 65 0a 20 q-insert-single-commit-message..
3dd40 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 ............forge-create-pullreq
3dd60 2d 69 6e 73 65 72 74 2d 62 72 61 6e 63 68 2d 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 20 20 -insert-branch-description......
3dd80 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 73 68 6f ........forge-create-pullreq-sho
3dda0 77 2d 64 69 66 66 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 70 6f 73 74 2d w-diff))..(defcustom.forge-post-
3ddc0 66 61 6c 6c 62 61 63 6b 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 28 6c 6f 63 61 74 65 2d 75 73 65 fallback-directory...(locate-use
3dde0 72 2d 65 6d 61 63 73 2d 66 69 6c 65 20 22 66 6f 72 67 65 2d 64 72 61 66 74 73 2f 22 29 0a 20 20 r-emacs-file."forge-drafts/")...
3de00 22 44 69 72 65 63 74 6f 72 79 20 75 73 65 64 20 74 6f 20 73 74 6f 72 65 20 70 6f 73 74 20 64 72 "Directory.used.to.store.post.dr
3de20 61 66 74 73 20 66 6f 72 20 6c 6f 63 61 6c 6c 79 20 75 6e 61 76 61 69 6c 61 62 6c 65 20 72 65 70 afts.for.locally.unavailable.rep
3de40 6f 73 69 74 6f 72 69 65 73 2e 0a 4e 6f 72 6d 61 6c 6c 79 20 64 72 61 66 74 73 20 61 72 65 20 73 ositories..Normally.drafts.are.s
3de60 74 6f 72 65 64 20 69 6e 73 69 64 65 20 74 68 65 20 47 69 74 20 64 69 72 65 63 74 6f 72 79 2e 20 tored.inside.the.Git.directory..
3de80 20 49 66 20 74 68 61 74 20 64 6f 65 73 20 6e 6f 74 0a 65 78 69 73 74 20 28 6f 72 20 69 74 73 20 .If.that.does.not.exist.(or.its.
3dea0 6c 6f 63 61 74 69 6f 6e 20 69 73 20 75 6e 6b 6e 6f 77 6e 29 2c 20 74 68 65 6e 20 74 68 69 73 20 location.is.unknown),.then.this.
3dec0 64 69 72 65 63 74 6f 72 79 20 69 73 20 75 73 65 64 20 69 6e 73 74 65 61 64 2e 22 0a 20 20 3a 70 directory.is.used.instead."...:p
3dee0 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 34 2e 37 22 ackage-version.'(forge..."0.4.7"
3df00 29 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 64 69 72 65 63 )...:group.'forge...:type.'direc
3df20 74 6f 72 79 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 tory)..;;;.Class..(defclass.forg
3df40 65 2d 70 6f 73 74 20 28 66 6f 72 67 65 2d 6f 62 6a 65 63 74 29 20 28 29 20 3a 61 62 73 74 72 61 e-post.(forge-object).().:abstra
3df60 63 74 20 74 29 0a 0a 3b 3b 3b 20 51 75 65 72 79 0a 3b 3b 3b 3b 20 47 65 74 0a 0a 28 63 6c 2d 64 ct.t)..;;;.Query.;;;;.Get..(cl-d
3df80 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 70 61 72 65 6e 74 20 28 28 70 6f 73 74 efmethod.forge-get-parent.((post
3dfa0 20 66 6f 72 67 65 2d 70 6f 73 74 29 29 0a 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 .forge-post))...(forge-get-topic
3dfc0 20 70 6f 73 74 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 .post))..(cl-defmethod.forge-get
3dfe0 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 70 6f 73 74 29 29 0a -repository.((post.forge-post)).
3e000 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 67 ..(forge-get-repository.(forge-g
3e020 65 74 2d 74 6f 70 69 63 20 70 6f 73 74 29 29 29 0a 0a 3b 3b 3b 3b 20 43 75 72 72 65 6e 74 0a 0a et-topic.post)))..;;;;.Current..
3e040 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 70 6f 73 74 2d 61 74 2d 70 6f 69 6e 74 20 28 26 6f 70 74 (defun.forge-post-at-point.(&opt
3e060 69 6f 6e 61 6c 20 61 73 73 65 72 74 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 70 6f 73 74 ional.assert)..."Return.the.post
3e080 20 61 74 20 70 6f 69 6e 74 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 20 70 .at.point..If.there.is.no.such.p
3e0a0 6f 73 74 20 61 6e 64 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 ost.and.DEMAND.is.non-nil,.then.
3e0c0 73 69 67 6e 61 6c 0a 61 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 28 6d 61 67 69 74 2d 73 signal.an.error."...(or.(magit-s
3e0e0 65 63 74 69 6f 6e 2d 76 61 6c 75 65 2d 69 66 20 27 28 69 73 73 75 65 20 70 75 6c 6c 72 65 71 20 ection-value-if.'(issue.pullreq.
3e100 70 6f 73 74 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 61 73 73 65 72 74 20 28 75 73 65 72 2d 65 post)).......(and.assert.(user-e
3e120 72 72 6f 72 20 22 54 68 65 72 65 20 69 73 20 6e 6f 20 70 6f 73 74 20 61 74 20 70 6f 69 6e 74 22 rror."There.is.no.post.at.point"
3e140 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 6f 6d 6d 65 6e 74 2d 61 74 2d 70 6f ))))..(defun.forge-comment-at-po
3e160 69 6e 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 73 73 65 72 74 29 0a 20 20 22 52 65 74 75 72 6e int.(&optional.assert)..."Return
3e180 20 74 68 65 20 63 6f 6d 6d 65 6e 74 20 61 74 20 70 6f 69 6e 74 2e 0a 49 66 20 74 68 65 72 65 20 .the.comment.at.point..If.there.
3e1a0 69 73 20 6e 6f 20 73 75 63 68 20 63 6f 6d 6d 65 6e 74 20 61 6e 64 20 44 45 4d 41 4e 44 20 69 73 is.no.such.comment.and.DEMAND.is
3e1c0 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 73 69 67 6e 61 6c 0a 61 6e 20 65 72 72 6f 72 2e 22 .non-nil,.then.signal.an.error."
3e1e0 0a 20 20 28 6f 72 20 28 61 6e 64 20 28 6d 61 67 69 74 2d 73 65 63 74 69 6f 6e 2d 76 61 6c 75 65 ...(or.(and.(magit-section-value
3e200 2d 69 66 20 27 28 70 6f 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 -if.'(post))............(let.((p
3e220 6f 73 74 20 28 6f 72 65 66 20 28 6d 61 67 69 74 2d 63 75 72 72 65 6e 74 2d 73 65 63 74 69 6f 6e ost.(oref.(magit-current-section
3e240 29 20 76 61 6c 75 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6f 72 ).value)))..............(and.(or
3e260 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 2d 70 20 70 6f 73 74 29 0a 20 20 20 .(forge-pullreq-post-p.post)....
3e280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d ...................(forge-issue-
3e2a0 70 6f 73 74 2d 70 20 70 6f 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 post-p.post))...................
3e2c0 70 6f 73 74 29 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 61 73 73 65 72 74 20 28 75 73 65 72 2d post))).......(and.assert.(user-
3e2e0 65 72 72 6f 72 20 22 54 68 65 72 65 20 69 73 20 6e 6f 20 63 6f 6d 6d 65 6e 74 20 61 74 20 70 6f error."There.is.no.comment.at.po
3e300 69 6e 74 22 29 29 29 29 0a 0a 3b 3b 3b 20 55 74 69 6c 69 74 69 65 73 0a 0a 28 63 6c 2d 64 65 66 int"))))..;;;.Utilities..(cl-def
3e320 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 28 28 70 6f 73 74 20 66 6f 72 67 method.forge--format.((post.forg
3e340 65 2d 70 6f 73 74 29 20 73 6c 6f 74 20 26 6f 70 74 69 6f 6e 61 6c 20 73 70 65 63 29 0a 20 20 28 e-post).slot.&optional.spec)...(
3e360 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 28 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 70 forge--format.(forge-get-topic.p
3e380 6f 73 74 29 20 73 6c 6f 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 2c 40 73 ost).slot..................`(,@s
3e3a0 70 65 63 20 28 3f 49 20 2e 20 2c 28 6f 72 65 66 20 70 6f 73 74 20 6e 75 6d 62 65 72 29 29 29 29 pec.(?I...,(oref.post.number))))
3e3c0 29 0a 0a 3b 3b 3b 20 4d 6f 64 65 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 )..;;;.Mode..(defvar-keymap.forg
3e3e0 65 2d 70 6f 73 74 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 e-post-mode-map..."<remap>.<forg
3e400 65 2d 2d 69 74 65 6d 2d 6d 65 6e 75 3e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 e--item-menu>".............#'for
3e420 67 65 2d 70 6f 73 74 2d 6d 65 6e 75 0a 20 20 22 43 2d 63 20 43 2d 65 22 20 20 20 20 20 20 20 20 ge-post-menu..."C-c.C-e"........
3e440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d ........................#'forge-
3e460 70 6f 73 74 2d 6d 65 6e 75 0a 20 20 22 43 2d 63 20 43 2d 63 22 20 20 20 20 20 20 20 20 20 20 20 post-menu..."C-c.C-c"...........
3e480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 70 6f 73 .....................#'forge-pos
3e4a0 74 2d 73 75 62 6d 69 74 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 65 76 69 6c 2d 73 61 76 65 2d 61 t-submit..."<remap>.<evil-save-a
3e4c0 6e 64 2d 63 6c 6f 73 65 3e 22 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 70 6f 73 74 nd-close>"..........#'forge-post
3e4e0 2d 73 75 62 6d 69 74 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 65 76 69 6c 2d 73 61 76 65 2d 6d 6f -submit..."<remap>.<evil-save-mo
3e500 64 69 66 69 65 64 2d 61 6e 64 2d 63 6c 6f 73 65 3e 22 20 23 27 66 6f 72 67 65 2d 70 6f 73 74 2d dified-and-close>".#'forge-post-
3e520 73 75 62 6d 69 74 0a 20 20 22 43 2d 63 20 43 2d 6b 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 submit..."C-c.C-k"..............
3e540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 70 6f 73 74 2d 63 ..................#'forge-post-c
3e560 61 6e 63 65 6c 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 6b 69 6c 6c 2d 62 75 66 66 65 72 3e 22 20 ancel..."<remap>.<kill-buffer>".
3e580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 70 6f 73 74 2d 63 61 .................#'forge-post-ca
3e5a0 6e 63 65 6c 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 69 64 6f 2d 6b 69 6c 6c 2d 62 75 66 66 65 72 ncel..."<remap>.<ido-kill-buffer
3e5c0 3e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 70 6f 73 74 2d 63 61 6e >"..............#'forge-post-can
3e5e0 63 65 6c 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 69 73 77 69 74 63 68 62 2d 6b 69 6c 6c 2d 62 75 cel..."<remap>.<iswitchb-kill-bu
3e600 66 66 65 72 3e 22 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 70 6f 73 74 2d 63 61 6e 63 ffer>".........#'forge-post-canc
3e620 65 6c 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 65 76 69 6c 2d 71 75 69 74 3e 22 20 20 20 20 20 20 el..."<remap>.<evil-quit>"......
3e640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 70 6f 73 74 2d 63 61 6e 63 65 ..............#'forge-post-cance
3e660 6c 29 0a 0a 28 64 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 66 6f 72 67 65 2d 70 l)..(define-derived-mode.forge-p
3e680 6f 73 74 2d 6d 6f 64 65 20 67 66 6d 2d 6d 6f 64 65 20 22 46 6f 72 67 65 2d 50 6f 73 74 22 0a 20 ost-mode.gfm-mode."Forge-Post"..
3e6a0 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 65 64 69 74 69 6e 67 20 74 6f 70 69 63 20 70 ."Major.mode.for.editing.topic.p
3e6c0 6f 73 74 73 2e 22 0a 20 20 3a 69 6e 74 65 72 61 63 74 69 76 65 20 6e 69 6c 29 0a 0a 28 64 65 66 osts."...:interactive.nil)..(def
3e6e0 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 2d 70 72 65 2d 70 6f 73 74 2d 62 75 66 66 65 72 var-local.forge--pre-post-buffer
3e700 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 2d 70 72 65 2d 70 .nil).(defvar-local.forge--pre-p
3e720 6f 73 74 2d 77 69 6e 63 6f 6e 66 20 6e 69 6c 29 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 ost-winconf.nil)..(defvar-local.
3e740 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 70 6f 73 74 2d 66 75 6e 63 74 69 6f 6e 20 6e 69 6c 29 forge--submit-post-function.nil)
3e760 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 65 64 69 74 2d 70 6f 73 74 2d ..(defvar-local.forge-edit-post-
3e780 61 63 74 69 6f 6e 20 6e 69 6c 0a 20 20 22 54 68 65 20 61 63 74 69 6f 6e 20 62 65 69 6e 67 20 63 action.nil..."The.action.being.c
3e7a0 61 72 72 69 65 64 20 6f 75 74 20 62 79 20 65 64 69 74 69 6e 67 20 74 68 69 73 20 70 6f 73 74 20 arried.out.by.editing.this.post.
3e7c0 62 75 66 66 65 72 2e 0a 4f 6e 65 20 6f 66 20 60 6e 65 77 2d 64 69 73 63 75 73 73 69 6f 6e 27 2c buffer..One.of.`new-discussion',
3e7e0 20 60 6e 65 77 2d 69 73 73 75 65 27 2c 20 60 6e 65 77 2d 70 75 6c 6c 72 65 71 27 2c 20 60 72 65 .`new-issue',.`new-pullreq',.`re
3e800 70 6c 79 27 20 61 6e 64 20 60 65 64 69 74 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 ply'.and.`edit'.")..(defvar-loca
3e820 6c 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 70 6f 73 74 2d 6f 62 6a 65 63 74 20 6e 69 6c 29 l.forge--buffer-post-object.nil)
3e840 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 65 6d .(defvar-local.forge--buffer-tem
3e860 70 6c 61 74 65 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 2d plate.nil).(defvar-local.forge--
3e880 62 75 66 66 65 72 2d 63 61 74 65 67 6f 72 79 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63 buffer-category.nil).(defvar-loc
3e8a0 61 6c 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6d 69 6c 65 73 74 6f 6e 65 20 6e 69 6c 29 0a al.forge--buffer-milestone.nil).
3e8c0 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 61 62 65 (defvar-local.forge--buffer-labe
3e8e0 6c 73 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 2d 62 75 66 ls.nil).(defvar-local.forge--buf
3e900 66 65 72 2d 61 73 73 69 67 6e 65 65 73 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c fer-assignees.nil).(defvar-local
3e920 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 62 61 73 65 2d 62 72 61 6e 63 68 20 6e 69 6c 29 0a .forge--buffer-base-branch.nil).
3e940 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 68 65 61 64 (defvar-local.forge--buffer-head
3e960 2d 62 72 61 6e 63 68 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 -branch.nil).(defvar-local.forge
3e980 2d 2d 62 75 66 66 65 72 2d 64 72 61 66 74 2d 70 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 66 6f --buffer-draft-p.nil)..(defun.fo
3e9a0 72 67 65 2d 2d 73 65 74 75 70 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 28 20 6f 62 6a 2d 6f 72 2d rge--setup-post-buffer.(.obj-or-
3e9c0 61 63 74 69 6f 6e 20 73 75 62 6d 69 74 20 66 69 6c 65 20 68 65 61 64 65 72 0a 20 20 20 20 20 20 action.submit.file.header.......
3e9e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70 74 ............................&opt
3ea00 69 6f 6e 61 6c 20 62 69 6e 64 69 6e 67 73 20 66 6e 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 ional.bindings.fn)...(declare.(i
3ea20 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 70 72 65 76 62 75 66 20 ndent.defun))...(let*.((prevbuf.
3ea40 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 77 69 6e 63 (current-buffer))..........(winc
3ea60 6f 6e 66 20 28 63 75 72 72 65 6e 74 2d 77 69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f onf.(current-window-configuratio
3ea80 6e 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 63 74 69 6f 6e 20 20 28 63 6f 6e 64 20 28 28 73 79 n))..........(action..(cond.((sy
3eaa0 6d 62 6f 6c 70 20 6f 62 6a 2d 6f 72 2d 61 63 74 69 6f 6e 29 20 20 20 20 20 20 20 20 20 20 20 20 mbolp.obj-or-action)............
3eac0 20 6f 62 6a 2d 6f 72 2d 61 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .obj-or-action).................
3eae0 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 2d 63 68 69 6c 64 70 20 6f 62 6a 2d 6f 72 2d 61 ........((forge--childp.obj-or-a
3eb00 63 74 69 6f 6e 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 20 27 72 65 70 6c 79 29 0a 20 20 20 20 ction.'forge-topic).'reply).....
3eb20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 2d 63 68 69 ....................((forge--chi
3eb40 6c 64 70 20 6f 62 6a 2d 6f 72 2d 61 63 74 69 6f 6e 20 27 66 6f 72 67 65 2d 70 6f 73 74 29 20 20 ldp.obj-or-action.'forge-post)..
3eb60 20 27 65 64 69 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6f 62 6a 20 20 20 20 20 28 69 66 20 .'edit)))..........(obj.....(if.
3eb80 28 73 79 6d 62 6f 6c 70 20 6f 62 6a 2d 6f 72 2d 61 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 (symbolp.obj-or-action).........
3eba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 ..............(forge-get-reposit
3ebc0 6f 72 79 20 3a 74 72 61 63 6b 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ory.:tracked)...................
3ebe0 20 20 6f 62 6a 2d 6f 72 2d 61 63 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 70 6f ..obj-or-action))..........(repo
3ec00 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 29 29 0a ....(forge-get-repository.obj)).
3ec20 20 20 20 20 20 20 20 20 20 28 68 65 61 64 65 72 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 .........(header..(forge--format
3ec40 20 6f 62 6a 20 68 65 61 64 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 20 20 20 .obj.header))..........(file....
3ec60 28 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 66 (forge--post-expand-file-name.(f
3ec80 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 6f 62 6a 20 66 69 6c 65 29 20 72 65 70 6f 29 29 0a 20 20 orge--format.obj.file).repo))...
3eca0 20 20 20 20 20 20 20 28 5f 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 64 69 72 65 63 74 6f 72 79 20 .......(_.......(make-directory.
3ecc0 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 29 20 74 29 29 0a 20 (file-name-directory.file).t))..
3ece0 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 20 20 28 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f 73 65 ........(buffer..(find-file-nose
3ed00 6c 65 63 74 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 73 75 6d 65 20 20 28 66 lect.file))..........(resume..(f
3ed20 6f 72 67 65 2d 2d 70 6f 73 74 2d 72 65 73 75 6d 65 2d 70 20 66 69 6c 65 20 62 75 66 66 65 72 29 orge--post-resume-p.file.buffer)
3ed40 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 )).....(with-current-buffer.buff
3ed60 65 72 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 6f 73 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 er.......(forge-post-mode)......
3ed80 20 28 6d 61 67 69 74 2d 73 65 74 2d 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 20 68 .(magit-set-header-line-format.h
3eda0 65 61 64 65 72 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 70 72 65 2d 70 6f eader).......(setq.forge--pre-po
3edc0 73 74 2d 62 75 66 66 65 72 20 70 72 65 76 62 75 66 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 st-buffer.prevbuf).......(setq.f
3ede0 6f 72 67 65 2d 2d 70 72 65 2d 70 6f 73 74 2d 77 69 6e 63 6f 6e 66 20 77 69 6e 63 6f 6e 66 29 0a orge--pre-post-winconf.winconf).
3ee00 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 65 74 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f ......(forge-set-buffer-reposito
3ee20 72 79 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 65 64 69 74 2d 70 6f 73 74 2d ry).......(setq.forge-edit-post-
3ee40 61 63 74 69 6f 6e 20 61 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 action.action).......(setq.forge
3ee60 2d 2d 62 75 66 66 65 72 2d 70 6f 73 74 2d 6f 62 6a 65 63 74 20 6f 62 6a 29 0a 20 20 20 20 20 20 --buffer-post-object.obj).......
3ee80 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 70 6f 73 74 2d 66 75 6e 63 74 69 6f (setq.forge--submit-post-functio
3eea0 6e 20 73 75 62 6d 69 74 29 0a 20 20 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 n.submit).......(pcase-dolist.(`
3eec0 28 2c 76 61 72 20 2c 76 61 6c 29 20 62 69 6e 64 69 6e 67 73 29 0a 20 20 20 20 20 20 20 20 28 73 (,var.,val).bindings).........(s
3eee0 65 74 20 28 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 76 61 72 29 20 76 61 6c et.(make-local-variable.var).val
3ef00 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 76 61 72 20 27 66 6f 72 67 65 2d 2d ).........(when.(eq.var.'forge--
3ef20 62 75 66 66 65 72 2d 74 65 6d 70 6c 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2d buffer-template)...........(let-
3ef40 61 6c 69 73 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 65 6d 70 6c 61 74 65 0a 20 20 20 alist.forge--buffer-template....
3ef60 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 61 73 73 .........(setq.forge--buffer-ass
3ef80 69 67 6e 65 65 73 20 2e 61 73 73 69 67 6e 65 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 ignees..assignees).............(
3efa0 73 65 74 71 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 61 62 65 6c 73 20 2e 6c 61 62 65 6c setq.forge--buffer-labels..label
3efc0 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 62 75 66 66 s).............(setq.forge--buff
3efe0 65 72 2d 64 72 61 66 74 2d 70 20 2e 64 72 61 66 74 29 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e er-draft-p..draft)))).......(con
3f000 64 2d 6c 65 74 0a 20 20 20 20 20 20 20 20 28 72 65 73 75 6d 65 29 0a 20 20 20 20 20 20 20 20 28 d-let.........(resume).........(
3f020 28 6e 6f 74 20 28 6d 65 6d 71 20 61 63 74 69 6f 6e 20 27 28 6e 65 77 2d 64 69 73 63 75 73 73 69 (not.(memq.action.'(new-discussi
3f040 6f 6e 20 6e 65 77 2d 69 73 73 75 65 20 6e 65 77 2d 70 75 6c 6c 72 65 71 29 29 29 29 0a 20 20 20 on.new-issue.new-pullreq))))....
3f060 20 20 20 20 20 28 5b 74 65 6d 70 6c 61 74 65 20 28 61 6c 69 73 74 2d 67 65 74 20 27 74 65 78 74 .....([template.(alist-get.'text
3f080 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 65 6d 70 6c 61 74 65 29 5d 0a 20 20 20 20 20 20 .forge--buffer-template)].......
3f0a0 20 20 20 28 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 23 20 22 ...(unless.(string-prefix-p."#."
3f0c0 20 74 65 6d 70 6c 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 23 .template)............(insert."#
3f0e0 20 5c 6e 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 74 65 6d 70 6c 61 .\n\n"))..........(insert.templa
3f100 74 65 29 0a 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 33 29 29 0a 20 20 20 20 te)..........(goto-char.3)).....
3f120 20 20 20 20 28 28 69 6e 73 65 72 74 20 22 23 20 22 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e ....((insert."#."))).......(when
3f140 20 66 6e 0a 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6e 29 29 29 0a 20 20 20 20 28 .fn.........(funcall.fn))).....(
3f160 72 75 6e 2d 68 6f 6f 6b 2d 77 72 61 70 70 65 64 20 27 66 6f 72 67 65 2d 65 64 69 74 2d 70 6f 73 run-hook-wrapped.'forge-edit-pos
3f180 74 2d 68 6f 6f 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 t-hook.......................(la
3f1a0 6d 62 64 61 20 28 66 6e 29 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 mbda.(fn).(with-current-buffer.b
3f1c0 75 66 66 65 72 20 28 66 75 6e 63 61 6c 6c 20 66 6e 29 29 20 6e 69 6c 29 29 0a 20 20 20 20 28 6d uffer.(funcall.fn)).nil)).....(m
3f1e0 65 73 73 61 67 65 20 28 73 75 62 73 74 69 74 75 74 65 2d 63 6f 6d 6d 61 6e 64 2d 6b 65 79 73 0a essage.(substitute-command-keys.
3f200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 55 73 65 20 5c 5c 5b 66 6f 72 67 65 2d 70 6f 73 74 .............."Use.\\[forge-post
3f220 2d 6d 65 6e 75 5d 20 74 6f 20 73 65 74 20 66 69 65 6c 64 73 20 61 6e 64 20 73 75 62 6d 69 74 20 -menu].to.set.fields.and.submit.
3f240 6f 72 20 61 62 6f 72 74 22 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 64 69 73 70 6c 61 79 2d or.abort")).....(forge--display-
3f260 70 6f 73 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f post-buffer.buffer)))..(defun.fo
3f280 72 67 65 2d 2d 64 69 73 70 6c 61 79 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 28 62 75 66 29 0a 20 rge--display-post-buffer.(buf)..
3f2a0 20 28 6d 61 67 69 74 2d 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 20 62 75 66 20 23 27 64 69 73 .(magit-display-buffer.buf.#'dis
3f2c0 70 6c 61 79 2d 62 75 66 66 65 72 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 70 6f 73 play-buffer))..(defun.forge--pos
3f2e0 74 2d 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 66 69 6c 65 20 72 65 70 6f 29 0a 20 t-expand-file-name.(file.repo)..
3f300 20 28 69 66 2d 6c 65 74 20 28 28 77 6f 72 6b 74 72 65 65 20 28 6f 72 65 66 20 72 65 70 6f 20 77 .(if-let.((worktree.(oref.repo.w
3f320 6f 72 6b 74 72 65 65 29 29 29 0a 20 20 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 orktree))).......(expand-file-na
3f340 6d 65 20 28 63 6f 6e 63 61 74 20 22 6d 61 67 69 74 2f 70 6f 73 74 73 2f 22 20 66 69 6c 65 29 20 me.(concat."magit/posts/".file).
3f360 28 6d 61 67 69 74 2d 67 69 74 64 69 72 20 77 6f 72 6b 74 72 65 65 29 29 0a 20 20 20 20 28 65 78 (magit-gitdir.worktree)).....(ex
3f380 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 67 69 74 68 pand-file-name.(with-slots.(gith
3f3a0 6f 73 74 20 6f 77 6e 65 72 20 6e 61 6d 65 29 20 72 65 70 6f 0a 20 20 20 20 20 20 20 20 20 20 20 ost.owner.name).repo............
3f3c0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 5f 25 73 2d 25 73 5f 25 .............(format."%s_%s-%s_%
3f3e0 73 22 20 67 69 74 68 6f 73 74 20 6f 77 6e 65 72 20 6e 61 6d 65 20 66 69 6c 65 29 29 0a 20 20 20 s".githost.owner.name.file))....
3f400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 70 6f 73 74 2d 66 61 ...................forge-post-fa
3f420 6c 6c 62 61 63 6b 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 llback-directory)))..(defun.forg
3f440 65 2d 2d 70 6f 73 74 2d 72 65 73 75 6d 65 2d 70 20 28 66 69 6c 65 20 62 75 66 66 65 72 29 0a 20 e--post-resume-p.(file.buffer)..
3f460 20 28 61 6e 64 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 66 69 6c 65 29 0a 20 20 20 20 20 .(and.(file-exists-p.file)......
3f480 20 20 28 3e 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 73 69 7a 65 20 28 66 69 6c 65 2d ..(>.(file-attribute-size.(file-
3f4a0 61 74 74 72 69 62 75 74 65 73 20 66 69 6c 65 29 29 20 30 29 0a 20 20 20 20 20 20 20 28 70 72 6f attributes.file)).0)........(pro
3f4c0 67 6e 20 28 66 6f 72 67 65 2d 2d 64 69 73 70 6c 61 79 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 62 gn.(forge--display-post-buffer.b
3f4e0 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 6d 61 67 69 74 2d uffer)...............(or.(magit-
3f500 72 65 61 64 2d 63 68 61 72 2d 63 61 73 65 20 22 22 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 read-char-case."".nil...........
3f520 20 20 20 20 20 20 20 20 20 20 28 3f 72 20 22 5b 72 5d 65 73 75 6d 65 20 65 64 69 74 69 6e 67 20 ..........(?r."[r]esume.editing.
3f540 74 68 69 73 20 64 72 61 66 74 22 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 this.draft".t)..................
3f560 20 20 20 28 3f 64 20 22 5b 64 5d 69 73 63 61 72 64 20 61 6e 64 20 73 74 61 72 74 20 6f 76 65 72 ...(?d."[d]iscard.and.start.over
3f580 3f 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 65 ?"))...................(progn.(e
3f5a0 72 61 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rase-buffer)....................
3f5c0 20 20 20 20 20 20 6e 69 6c 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 72 65 ......nil)))))..(defun.forge-cre
3f5e0 61 74 65 2d 70 75 6c 6c 72 65 71 2d 69 6e 73 65 72 74 2d 73 69 6e 67 6c 65 2d 63 6f 6d 6d 69 74 ate-pullreq-insert-single-commit
3f600 2d 6d 65 73 73 61 67 65 20 28 29 0a 20 20 22 57 68 65 6e 20 63 72 65 61 74 69 6e 67 20 61 20 70 -message.()..."When.creating.a.p
3f620 75 6c 6c 2d 72 65 71 75 65 73 74 20 66 72 6f 6d 20 61 20 73 69 6e 67 6c 65 20 63 6f 6d 6d 69 74 ull-request.from.a.single.commit
3f640 2c 20 69 6e 73 65 72 74 20 69 74 73 20 6d 65 73 73 61 67 65 2e 22 0a 20 20 28 77 68 65 6e 2d 6c ,.insert.its.message."...(when-l
3f660 65 74 2a 20 28 28 73 6f 75 72 63 65 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 68 65 61 64 2d et*.((source.forge--buffer-head-
3f680 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 61 72 67 65 74 20 66 6f branch)...............(target.fo
3f6a0 72 67 65 2d 2d 62 75 66 66 65 72 2d 62 61 73 65 2d 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 rge--buffer-base-branch)........
3f6c0 20 20 20 20 20 20 20 28 5f 28 3d 20 28 63 61 72 20 28 6d 61 67 69 74 2d 72 65 76 2d 64 69 66 66 .......(_(=.(car.(magit-rev-diff
3f6e0 2d 63 6f 75 6e 74 20 73 6f 75 72 63 65 20 74 61 72 67 65 74 29 29 20 31 29 29 29 0a 20 20 20 20 -count.source.target)).1))).....
3f700 28 77 68 65 6e 20 28 61 6c 69 73 74 2d 67 65 74 20 27 74 65 78 74 20 66 6f 72 67 65 2d 2d 62 75 (when.(alist-get.'text.forge--bu
3f720 66 66 65 72 2d 74 65 6d 70 6c 61 74 65 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 ffer-template).......(goto-char.
3f740 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 28 (point-max)).......(unless.(eq.(
3f760 63 68 61 72 2d 62 65 66 6f 72 65 29 20 3f 5c 6e 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 char-before).?\n).........(inser
3f780 74 20 3f 5c 6e 29 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 3c 21 2d 2d 20 4d 65 t.?\n)).......(insert."\n<!--.Me
3f7a0 73 73 61 67 65 20 6f 66 20 73 69 6e 67 6c 65 20 63 6f 6d 6d 69 74 3a 20 2d 2d 3e 5c 6e 5c 6e 22 ssage.of.single.commit:.-->\n\n"
3f7c0 29 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 72 65 76 2d 69 6e 73 65 72 74 2d 66 6f 72 6d 61 74 20 )).....(magit-rev-insert-format.
3f7e0 22 25 42 22 20 73 6f 75 72 63 65 29 0a 20 20 20 20 28 77 68 65 6e 20 28 3d 20 28 63 68 61 72 2d "%B".source).....(when.(=.(char-
3f800 62 65 66 6f 72 65 20 28 31 2d 20 28 70 6f 69 6e 74 29 29 29 20 3f 5c 6e 29 0a 20 20 20 20 20 20 before.(1-.(point))).?\n).......
3f820 28 64 65 6c 65 74 65 2d 63 68 61 72 20 2d 31 29 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 (delete-char.-1)).....(goto-char
3f840 20 33 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 .3)))..(defun.forge-create-pullr
3f860 65 71 2d 69 6e 73 65 72 74 2d 62 72 61 6e 63 68 2d 64 65 73 63 72 69 70 74 69 6f 6e 20 28 29 0a eq-insert-branch-description.().
3f880 20 20 22 57 68 65 6e 20 63 72 65 61 74 69 6e 67 20 61 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2c .."When.creating.a.pull-request,
3f8a0 20 69 6e 73 65 72 74 20 62 72 61 6e 63 68 20 64 65 73 63 72 69 70 74 69 6f 6e 2c 20 69 66 20 61 .insert.branch.description,.if.a
3f8c0 6e 79 2e 0a 49 6e 73 65 72 74 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 60 62 72 61 6e 63 68 2e ny..Insert.the.value.of.`branch.
3f8e0 42 52 41 4e 43 48 2e 64 65 73 63 72 69 70 74 69 6f 6e 27 20 6f 66 20 74 68 65 20 73 6f 75 72 63 BRANCH.description'.of.the.sourc
3f900 65 20 42 52 41 4e 43 48 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 73 6f 75 72 63 65 e.BRANCH."...(when-let*.((source
3f920 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 68 65 61 64 2d 62 72 61 6e 63 68 29 0a 20 20 20 20 .forge--buffer-head-branch).....
3f940 20 20 20 20 20 20 20 20 20 20 28 64 65 73 63 72 69 70 74 69 6f 6e 20 28 6d 61 67 69 74 2d 67 65 ..........(description.(magit-ge
3f960 74 20 22 62 72 61 6e 63 68 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t."branch"......................
3f980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 6d 61 67 69 74 2d 73 70 6c .................(cdr.(magit-spl
3f9a0 69 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 73 6f 75 72 63 65 29 29 0a 20 20 20 20 20 20 20 20 it-branch-name.source)).........
3f9c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 64 .............................."d
3f9e0 65 73 63 72 69 70 74 69 6f 6e 22 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 28 61 6c escription"))).....(when.(or.(al
3fa00 69 73 74 2d 67 65 74 20 27 74 65 78 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 65 6d 70 ist-get.'text.forge--buffer-temp
3fa20 6c 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3e 20 28 70 6f 69 6e 74 2d 6d 61 late)...............(>.(point-ma
3fa40 78 29 20 33 29 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d x).3)).......(goto-char.(point-m
3fa60 61 78 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 28 63 68 61 72 2d 62 65 66 ax)).......(unless.(eq.(char-bef
3fa80 6f 72 65 29 20 3f 5c 6e 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 3f 5c 6e 29 29 0a ore).?\n).........(insert.?\n)).
3faa0 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 3c 21 2d 2d 20 42 72 61 6e 63 68 20 64 65 73 ......(insert."\n<!--.Branch.des
3fac0 63 72 69 70 74 69 6f 6e 3a 20 2d 2d 3e 5c 6e 5c 6e 22 29 29 0a 20 20 20 20 28 69 6e 73 65 72 74 cription:.-->\n\n")).....(insert
3fae0 20 64 65 73 63 72 69 70 74 69 6f 6e 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 33 29 29 .description).....(goto-char.3))
3fb00 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 73 )..(defun.forge-create-pullreq-s
3fb20 68 6f 77 2d 64 69 66 66 20 28 29 0a 20 20 22 57 68 65 6e 20 63 72 65 61 74 69 6e 67 20 61 20 70 how-diff.()..."When.creating.a.p
3fb40 75 6c 6c 2d 72 65 71 75 65 73 74 2c 20 73 68 6f 77 20 64 69 66 66 20 66 6f 72 20 74 68 65 20 62 ull-request,.show.diff.for.the.b
3fb60 72 61 6e 63 68 27 73 20 63 68 61 6e 67 65 73 2e 22 0a 20 20 28 77 68 65 6e 20 28 65 71 20 66 6f ranch's.changes."...(when.(eq.fo
3fb80 72 67 65 2d 65 64 69 74 2d 70 6f 73 74 2d 61 63 74 69 6f 6e 20 27 6e 65 77 2d 70 75 6c 6c 72 65 rge-edit-post-action.'new-pullre
3fba0 71 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 64 69 66 66 2d 73 65 74 75 70 2d 62 75 66 66 65 72 0a q).....(magit-diff-setup-buffer.
3fbc0 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 2e 2e 2e 25 73 22 0a 20 20 20 20 20 20 20 20 20 .....(format."%s...%s"..........
3fbe0 20 20 20 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 62 61 73 65 2d 62 72 61 6e 63 68 0a 20 20 ....forge--buffer-base-branch...
3fc00 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 68 65 61 64 2d 62 72 ...........forge--buffer-head-br
3fc20 61 6e 63 68 29 0a 20 20 20 20 20 6e 69 6c 20 28 63 61 72 20 28 6d 61 67 69 74 2d 64 69 66 66 2d anch)......nil.(car.(magit-diff-
3fc40 61 72 67 75 6d 65 6e 74 73 29 29 20 6e 69 6c 20 27 63 6f 6d 6d 69 74 74 65 64 20 74 29 29 29 0a arguments)).nil.'committed.t))).
3fc60 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 62 75 66 66 65 72 2d 74 65 78 74 20 .(defun.forge--post-buffer-text.
3fc80 28 29 0a 20 20 28 73 61 76 65 2d 6d 61 74 63 68 2d 64 61 74 61 0a 20 20 20 20 28 73 61 76 65 2d ()...(save-match-data.....(save-
3fca0 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e excursion.......(goto-char.(poin
3fcc0 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 73 6b 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 61 72 t-min)).......(skip-chars-forwar
3fce0 64 20 22 5c 73 5c 74 5c 6e 22 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 74 69 74 6c 65 20 62 6f d."\s\t\n").......(let.(title.bo
3fd00 64 79 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5e dy).........(when.(looking-at."^
3fd20 23 2a 5b 5c 73 5c 74 5d 2a 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 #*[\s\t]*")...........(goto-char
3fd40 20 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 .(match-end.0))).........(setq.t
3fd60 69 74 6c 65 20 28 62 75 66 66 65 72 2d 73 74 72 20 28 70 6f 69 6e 74 29 20 28 6c 69 6e 65 2d 65 itle.(buffer-str.(point).(line-e
3fd80 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d nd-position))).........(forward-
3fda0 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 6f 64 79 20 28 62 75 66 66 65 72 line).........(setq.body.(buffer
3fdc0 2d 73 74 72 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 73 74 -str.(point))).........(cons.(st
3fde0 72 69 6e 67 2d 74 72 69 6d 20 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ring-trim.title)...............(
3fe00 73 74 72 69 6e 67 2d 74 72 69 6d 20 62 6f 64 79 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 string-trim.body))))))..(defun.f
3fe20 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 6b 20 28 26 6f 70 74 orge--post-submit-callback.(&opt
3fe40 69 6f 6e 61 6c 20 66 75 6c 6c 2d 70 75 6c 6c 29 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 65 20 ional.full-pull)...(let*.((file.
3fe60 20 20 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 28 77 ...buffer-file-name)..........(w
3fe80 69 6e 63 6f 6e 66 20 66 6f 72 67 65 2d 2d 70 72 65 2d 70 6f 73 74 2d 77 69 6e 63 6f 6e 66 29 0a inconf.forge--pre-post-winconf).
3fea0 20 20 20 20 20 20 20 20 20 28 65 64 69 74 62 75 66 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 .........(editbuf.(current-buffe
3fec0 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 65 76 62 75 66 20 66 6f 72 67 65 2d 2d 70 72 65 r))..........(prevbuf.forge--pre
3fee0 2d 70 6f 73 74 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 28 74 6f 70 69 63 20 20 20 -post-buffer)..........(topic...
3ff00 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 (ignore-errors.(forge-get-topic.
3ff20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 70 6f 73 74 2d 6f 62 6a 65 63 74 29 29 29 0a 20 20 20 forge--buffer-post-object)))....
3ff40 20 20 20 20 20 20 28 72 65 70 6f 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 ......(repo....(forge-get-reposi
3ff60 74 6f 72 79 20 28 6f 72 20 74 6f 70 69 63 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 70 6f 73 tory.(or.topic.forge--buffer-pos
3ff80 74 2d 6f 62 6a 65 63 74 29 29 29 29 0a 20 20 20 20 28 6c 61 6d 62 64 61 20 28 76 61 6c 75 65 20 t-object)))).....(lambda.(value.
3ffa0 26 6f 70 74 69 6f 6e 61 6c 20 68 65 61 64 65 72 73 20 73 74 61 74 75 73 20 72 65 71 29 0a 20 20 &optional.headers.status.req)...
3ffc0 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 2d 77 69 74 68 2d 61 72 67 73 20 27 66 6f 72 67 65 2d 70 ....(run-hook-with-args.'forge-p
3ffe0 6f 73 74 2d 73 75 62 6d 69 74 2d 63 61 6c 6c 62 61 63 6b 2d 68 6f 6f 6b 0a 20 20 20 20 20 20 20 ost-submit-callback-hook........
40000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 61 6c 75 65 20 68 65 61 64 65 72 73 ...................value.headers
40020 20 73 74 61 74 75 73 20 72 65 71 29 0a 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 .status.req).......(delete-file.
40040 66 69 6c 65 20 74 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 69 72 20 28 66 69 6c 65 2d 6e file.t).......(let.((dir.(file-n
40060 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 75 ame-directory.file))).........(u
40080 6e 6c 65 73 73 20 28 63 64 64 72 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 20 64 69 72 nless.(cddr.(directory-files.dir
400a0 20 6e 69 6c 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64 .nil.nil.t))...........(delete-d
400c0 69 72 65 63 74 6f 72 79 20 64 69 72 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 irectory.dir.nil.t))).......(whe
400e0 6e 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 65 64 69 74 62 75 66 29 0a 20 20 20 20 20 20 n.(buffer-live-p.editbuf).......
40100 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 65 64 69 74 62 75 66 0a 20 ..(with-current-buffer.editbuf..
40120 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 6d 6f 64 65 2d 62 75 72 79 2d 62 75 66 66 65 72 .........(magit-mode-bury-buffer
40140 20 27 6b 69 6c 6c 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 61 79 62 65 2d 72 65 .'kill))).......(forge--maybe-re
40160 73 74 6f 72 65 2d 77 69 6e 63 6f 6e 66 20 77 69 6e 63 6f 6e 66 29 0a 20 20 20 20 20 20 28 77 69 store-winconf.winconf).......(wi
40180 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 th-current-buffer...........(if.
401a0 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 70 72 65 76 62 75 66 29 20 70 72 65 76 62 75 66 20 (buffer-live-p.prevbuf).prevbuf.
401c0 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 6f (current-buffer)).........(if.(o
401e0 72 20 28 6e 6f 74 20 66 75 6c 6c 2d 70 75 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r.(not.full-pull)...............
40200 20 20 28 6f 72 65 66 20 72 65 70 6f 20 73 65 6c 65 63 74 69 76 65 2d 70 29 29 0a 20 20 20 20 20 ..(oref.repo.selective-p))......
40220 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 20 72 65 70 6f 20 74 .......(forge--pull-topic.repo.t
40240 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 20 72 65 70 opic)...........(forge--pull.rep
40260 6f 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 70 6f 73 74 2d 73 75 62 6d o))))))..(defun.forge--post-subm
40280 69 74 2d 65 72 72 6f 72 62 61 63 6b 20 28 29 0a 20 20 28 6c 61 6d 62 64 61 20 28 65 72 72 6f 72 it-errorback.()...(lambda.(error
402a0 20 26 72 65 73 74 20 5f 29 0a 20 20 20 20 28 65 72 72 6f 72 20 22 46 61 69 6c 65 64 20 74 6f 20 .&rest._).....(error."Failed.to.
402c0 73 75 62 6d 69 74 20 70 6f 73 74 3a 20 25 53 22 20 65 72 72 6f 72 29 29 29 0a 0a 28 64 65 66 75 submit.post:.%S".error)))..(defu
402e0 6e 20 66 6f 72 67 65 2d 2d 6d 61 79 62 65 2d 72 65 73 74 6f 72 65 2d 77 69 6e 63 6f 6e 66 20 28 n.forge--maybe-restore-winconf.(
40300 77 69 6e 63 6f 6e 66 29 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 77 69 6e 63 6f 6e 66 0a 20 20 winconf)...(when.(and.winconf...
40320 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 28 77 69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61 ...........(eq.(window-configura
40340 74 69 6f 6e 2d 66 72 61 6d 65 20 77 69 6e 63 6f 6e 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 tion-frame.winconf).............
40360 20 20 20 20 20 28 73 65 6c 65 63 74 65 64 2d 66 72 61 6d 65 29 29 29 0a 20 20 20 20 28 73 65 74 .....(selected-frame))).....(set
40380 2d 77 69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 77 69 6e 63 6f 6e 66 29 29 29 -window-configuration.winconf)))
403a0 0a 0a 3b 3b 3b 20 43 6f 6d 6d 61 6e 64 73 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e ..;;;.Commands..(transient-defin
403c0 65 2d 70 72 65 66 69 78 20 66 6f 72 67 65 2d 70 6f 73 74 2d 6d 65 6e 75 20 28 29 0a 20 20 22 44 e-prefix.forge-post-menu.()..."D
403e0 69 73 70 61 74 63 68 20 61 20 70 6f 73 74 20 63 72 65 61 74 69 6f 6e 20 63 6f 6d 6d 61 6e 64 2e ispatch.a.post.creation.command.
40400 22 0a 20 20 5b 5b 22 53 65 74 22 0a 20 20 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 "...[["Set".....:if.(lambda.()..
40420 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f .........(and.(forge-github-repo
40440 73 69 74 6f 72 79 2d 70 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a sitory-p.(forge-get-repository.:
40460 74 72 61 63 6b 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 tracked))................(string
40480 2d 70 72 65 66 69 78 2d 70 20 22 6e 65 77 2d 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -prefix-p."new-"................
404a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 .................(file-name-nond
404c0 69 72 65 63 74 6f 72 79 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 29 29 0a 20 20 irectory.buffer-file-name))))...
404e0 20 20 28 22 2d 6d 22 20 66 6f 72 67 65 2d 6e 65 77 2d 74 6f 70 69 63 2d 73 65 74 2d 6d 69 6c 65 ..("-m".forge-new-topic-set-mile
40500 73 74 6f 6e 65 29 0a 20 20 20 20 28 22 2d 6c 22 20 66 6f 72 67 65 2d 6e 65 77 2d 74 6f 70 69 63 stone).....("-l".forge-new-topic
40520 2d 73 65 74 2d 6c 61 62 65 6c 73 29 0a 20 20 20 20 28 22 2d 61 22 20 66 6f 72 67 65 2d 6e 65 77 -set-labels).....("-a".forge-new
40540 2d 74 6f 70 69 63 2d 73 65 74 2d 61 73 73 69 67 6e 65 65 73 29 0a 20 20 20 20 28 22 2d 64 22 20 -topic-set-assignees).....("-d".
40560 66 6f 72 67 65 2d 6e 65 77 2d 70 75 6c 6c 72 65 71 2d 74 6f 67 67 6c 65 2d 64 72 61 66 74 29 5d forge-new-pullreq-toggle-draft)]
40580 0a 20 20 20 5b 22 41 63 74 69 6f 6e 73 22 0a 20 20 20 20 28 22 43 2d 63 22 20 22 53 75 62 6d 69 ....["Actions".....("C-c"."Submi
405a0 74 22 20 66 6f 72 67 65 2d 70 6f 73 74 2d 73 75 62 6d 69 74 29 0a 20 20 20 20 28 22 43 2d 6b 22 t".forge-post-submit).....("C-k"
405c0 20 22 43 61 6e 63 65 6c 22 20 66 6f 72 67 65 2d 70 6f 73 74 2d 63 61 6e 63 65 6c 29 5d 5d 29 0a ."Cancel".forge-post-cancel)]]).
405e0 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 70 6f 73 74 2d 73 75 62 6d 69 74 20 28 29 0a 20 20 22 .(defun.forge-post-submit.()..."
40600 53 75 62 6d 69 74 20 74 68 65 20 70 6f 73 74 20 74 68 61 74 20 69 73 20 62 65 69 6e 67 20 65 64 Submit.the.post.that.is.being.ed
40620 69 74 65 64 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 22 0a 20 20 28 ited.in.the.current.buffer."...(
40640 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 73 61 76 65 2d 62 75 66 66 65 72 29 0a 20 20 28 interactive)...(save-buffer)...(
40660 66 75 6e 63 61 6c 6c 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 70 6f 73 74 2d 66 75 6e 63 74 funcall.forge--submit-post-funct
40680 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 ion............(forge-get-reposi
406a0 74 6f 72 79 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 70 6f 73 74 2d 6f 62 6a 65 63 74 29 0a tory.forge--buffer-post-object).
406c0 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 70 6f 73 74 2d 6f 62 ...........forge--buffer-post-ob
406e0 6a 65 63 74 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 70 6f 73 74 2d 63 61 6e 63 65 6c ject))..(defun.forge-post-cancel
40700 20 28 29 0a 20 20 22 43 61 6e 63 65 6c 20 74 68 65 20 70 6f 73 74 20 74 68 61 74 20 69 73 20 62 .()..."Cancel.the.post.that.is.b
40720 65 69 6e 67 20 65 64 69 74 65 64 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 eing.edited.in.the.current.buffe
40740 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 73 61 76 65 2d 62 75 66 66 r."...(interactive)...(save-buff
40760 65 72 29 0a 20 20 28 6c 65 74 20 28 28 77 69 6e 63 6f 6e 66 20 66 6f 72 67 65 2d 2d 70 72 65 2d er)...(let.((winconf.forge--pre-
40780 70 6f 73 74 2d 77 69 6e 63 6f 6e 66 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 79 65 73 2d 6f 72 post-winconf)).....(when.(yes-or
407a0 2d 6e 6f 2d 70 20 22 41 6c 73 6f 20 64 65 6c 65 74 65 20 64 72 61 66 74 3f 20 22 29 0a 20 20 20 -no-p."Also.delete.draft?.")....
407c0 20 20 20 28 64 69 72 65 64 2d 64 65 6c 65 74 65 2d 66 69 6c 65 20 62 75 66 66 65 72 2d 66 69 6c ...(dired-delete-file.buffer-fil
407e0 65 2d 6e 61 6d 65 20 6e 69 6c 20 6d 61 67 69 74 2d 64 65 6c 65 74 65 2d 62 79 2d 6d 6f 76 69 6e e-name.nil.magit-delete-by-movin
40800 67 2d 74 6f 2d 74 72 61 73 68 29 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 6d 6f 64 65 2d 62 75 72 g-to-trash)).....(magit-mode-bur
40820 79 2d 62 75 66 66 65 72 20 27 6b 69 6c 6c 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 61 79 62 y-buffer.'kill).....(forge--mayb
40840 65 2d 72 65 73 74 6f 72 65 2d 77 69 6e 63 6f 6e 66 20 77 69 6e 63 6f 6e 66 29 29 29 0a 0a 28 64 e-restore-winconf.winconf)))..(d
40860 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 2d 6e 65 77 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f efclass.forge--new-topic-set-slo
40880 74 2d 63 6f 6d 6d 61 6e 64 20 28 74 72 61 6e 73 69 65 6e 74 2d 6c 69 73 70 2d 76 61 72 69 61 62 t-command.(transient-lisp-variab
408a0 6c 65 29 0a 20 20 28 28 6e 61 6d 65 20 3a 69 6e 69 74 61 72 67 20 3a 6e 61 6d 65 29 0a 20 20 20 le)...((name.:initarg.:name)....
408c0 28 72 65 61 64 65 72 20 3a 69 6e 69 74 61 72 67 20 3a 72 65 61 64 65 72 29 0a 20 20 20 28 66 6f (reader.:initarg.:reader)....(fo
408e0 72 6d 61 74 74 65 72 20 3a 69 6e 69 74 61 72 67 20 3a 66 6f 72 6d 61 74 74 65 72 29 0a 20 20 20 rmatter.:initarg.:formatter)....
40900 28 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 20 25 6b 20 25 64 22 29 0a 20 20 20 28 (format.:initform.".%k.%d")....(
40920 64 65 73 63 72 69 70 74 69 6f 6e 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 6f description.:initform.(lambda.(o
40940 62 6a 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 bj).............................
40960 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 6e 61 6d 65 20 76 61 72 69 61 62 6c 65 20 66 6f 72 6d 61 (with-slots.(name.variable.forma
40980 74 74 65 72 29 20 6f 62 6a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tter).obj.......................
409a0 20 20 20 20 20 20 20 20 28 69 66 2d 6c 65 74 2a 20 28 28 76 61 6c 75 65 20 28 73 79 6d 62 6f 6c ........(if-let*.((value.(symbol
409c0 2d 76 61 6c 75 65 20 76 61 72 69 61 62 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -value.variable))...............
409e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 61 6c 75 65 ..........................(value
40a00 20 28 66 75 6e 63 61 6c 6c 20 66 6f 72 6d 61 74 74 65 72 20 76 61 6c 75 65 29 29 29 0a 20 20 20 .(funcall.formatter.value)))....
40a20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
40a40 66 6f 72 6d 61 74 20 22 25 73 20 25 73 22 20 6e 61 6d 65 20 76 61 6c 75 65 29 0a 20 20 20 20 20 format."%s.%s".name.value)......
40a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d ...........................(form
40a80 61 74 20 22 25 73 22 20 6e 61 6d 65 29 29 29 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d at."%s".name)))))))..(transient-
40aa0 64 65 66 69 6e 65 2d 69 6e 66 69 78 20 66 6f 72 67 65 2d 6e 65 77 2d 74 6f 70 69 63 2d 73 65 74 define-infix.forge-new-topic-set
40ac0 2d 6d 69 6c 65 73 74 6f 6e 65 20 28 29 0a 20 20 22 53 65 74 20 6d 69 6c 65 73 74 6f 6e 65 20 66 -milestone.()..."Set.milestone.f
40ae0 6f 72 20 74 68 65 20 74 6f 70 69 63 20 62 65 69 6e 67 20 63 72 65 61 74 65 64 2e 22 0a 20 20 3a or.the.topic.being.created."...:
40b00 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 6e 65 77 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 class.'forge--new-topic-set-slot
40b20 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 76 61 72 69 61 62 6c 65 20 27 66 6f 72 67 65 2d 2d 62 75 66 -command...:variable.'forge--buf
40b40 66 65 72 2d 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 3a 6e 61 6d 65 20 22 6d 69 6c 65 73 74 6f 6e 65 fer-milestone...:name."milestone
40b60 22 0a 20 20 3a 72 65 61 64 65 72 20 28 6c 61 6d 62 64 61 20 28 26 72 65 73 74 20 5f 29 20 28 66 "...:reader.(lambda.(&rest._).(f
40b80 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d 69 6c 65 73 74 6f 6e 65 29 29 0a 20 20 3a 66 orge-read-topic-milestone))...:f
40ba0 6f 72 6d 61 74 74 65 72 20 28 6c 61 6d 62 64 61 20 28 6d 69 6c 65 73 74 6f 6e 65 29 20 28 70 72 ormatter.(lambda.(milestone).(pr
40bc0 6f 70 65 72 74 69 7a 65 20 6d 69 6c 65 73 74 6f 6e 65 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d opertize.milestone.'face.'forge-
40be0 74 6f 70 69 63 2d 6c 61 62 65 6c 29 29 0a 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 topic-label))...:if.(lambda.().(
40c00 65 71 75 61 6c 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 62 75 equal.(file-name-nondirectory.bu
40c20 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 20 22 6e 65 77 2d 69 73 73 75 65 22 29 29 29 0a 0a ffer-file-name)."new-issue")))..
40c40 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 69 6e 66 69 78 20 66 6f 72 67 65 2d 6e 65 (transient-define-infix.forge-ne
40c60 77 2d 74 6f 70 69 63 2d 73 65 74 2d 6c 61 62 65 6c 73 20 28 29 0a 20 20 22 53 65 74 20 6c 61 62 w-topic-set-labels.()..."Set.lab
40c80 65 6c 73 20 66 6f 72 20 74 68 65 20 74 6f 70 69 63 20 62 65 69 6e 67 20 63 72 65 61 74 65 64 2e els.for.the.topic.being.created.
40ca0 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 6e 65 77 2d 74 6f 70 69 63 2d 73 65 74 "...:class.'forge--new-topic-set
40cc0 2d 73 6c 6f 74 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 76 61 72 69 61 62 6c 65 20 27 66 6f 72 67 65 -slot-command...:variable.'forge
40ce0 2d 2d 62 75 66 66 65 72 2d 6c 61 62 65 6c 73 0a 20 20 3a 6e 61 6d 65 20 22 6c 61 62 65 6c 73 22 --buffer-labels...:name."labels"
40d00 0a 20 20 3a 72 65 61 64 65 72 20 28 6c 61 6d 62 64 61 20 28 26 72 65 73 74 20 5f 29 20 28 66 6f ...:reader.(lambda.(&rest._).(fo
40d20 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 73 29 29 0a 20 20 3a 66 6f 72 6d 61 rge-read-topic-labels))...:forma
40d40 74 74 65 72 20 28 23 23 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 6c 61 62 65 6c 73 20 25 20 74 tter.(##forge--format-labels.%.t
40d60 29 0a 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 65 71 75 61 6c 20 28 66 69 6c 65 2d )...:if.(lambda.().(equal.(file-
40d80 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 name-nondirectory.buffer-file-na
40da0 6d 65 29 20 22 6e 65 77 2d 69 73 73 75 65 22 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 me)."new-issue")))..(transient-d
40dc0 65 66 69 6e 65 2d 69 6e 66 69 78 20 66 6f 72 67 65 2d 6e 65 77 2d 74 6f 70 69 63 2d 73 65 74 2d efine-infix.forge-new-topic-set-
40de0 61 73 73 69 67 6e 65 65 73 20 28 29 0a 20 20 22 53 65 74 20 61 73 73 69 67 6e 65 65 73 20 66 6f assignees.()..."Set.assignees.fo
40e00 72 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 65 69 6e 67 20 63 72 65 61 74 65 64 r.the.pull-request.being.created
40e20 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 6e 65 77 2d 74 6f 70 69 63 2d 73 65 ."...:class.'forge--new-topic-se
40e40 74 2d 73 6c 6f 74 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 76 61 72 69 61 62 6c 65 20 27 66 6f 72 67 t-slot-command...:variable.'forg
40e60 65 2d 2d 62 75 66 66 65 72 2d 61 73 73 69 67 6e 65 65 73 0a 20 20 3a 6e 61 6d 65 20 22 61 73 73 e--buffer-assignees...:name."ass
40e80 69 67 6e 65 65 73 22 0a 20 20 3a 72 65 61 64 65 72 20 28 6c 61 6d 62 64 61 20 28 26 72 65 73 74 ignees"...:reader.(lambda.(&rest
40ea0 20 5f 29 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 61 73 73 69 67 6e 65 65 73 29 ._).(forge-read-topic-assignees)
40ec0 29 0a 20 20 3a 66 6f 72 6d 61 74 74 65 72 20 23 27 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 )...:formatter.#'forge--format-t
40ee0 6f 70 69 63 2d 61 73 73 69 67 6e 65 65 73 0a 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 opic-assignees...:if.(lambda.().
40f00 28 65 71 75 61 6c 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 62 (equal.(file-name-nondirectory.b
40f20 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 20 22 6e 65 77 2d 69 73 73 75 65 22 29 29 29 0a uffer-file-name)."new-issue"))).
40f40 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 69 6e 66 69 78 20 66 6f 72 67 65 2d 6e .(transient-define-infix.forge-n
40f60 65 77 2d 70 75 6c 6c 72 65 71 2d 74 6f 67 67 6c 65 2d 64 72 61 66 74 20 28 29 0a 20 20 22 54 6f ew-pullreq-toggle-draft.()..."To
40f80 67 67 6c 65 20 77 68 65 74 68 65 72 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 65 ggle.whether.the.pull-request.be
40fa0 69 6e 67 20 63 72 65 61 74 65 64 20 69 73 20 61 20 64 72 61 66 74 2e 22 0a 20 20 3a 63 6c 61 73 ing.created.is.a.draft."...:clas
40fc0 73 20 27 66 6f 72 67 65 2d 2d 6e 65 77 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 2d 63 6f 6d s.'forge--new-topic-set-slot-com
40fe0 6d 61 6e 64 0a 20 20 3a 76 61 72 69 61 62 6c 65 20 27 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d mand...:variable.'forge--buffer-
41000 64 72 61 66 74 2d 70 0a 20 20 3a 6e 61 6d 65 20 22 64 72 61 66 74 22 0a 20 20 3a 72 65 61 64 65 draft-p...:name."draft"...:reade
41020 72 20 28 6c 61 6d 62 64 61 20 28 26 72 65 73 74 20 5f 29 20 28 6e 6f 74 20 66 6f 72 67 65 2d 2d r.(lambda.(&rest._).(not.forge--
41040 62 75 66 66 65 72 2d 64 72 61 66 74 2d 70 29 29 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 buffer-draft-p))...:description.
41060 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 (lambda.()..................(for
41080 6d 61 74 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 5b 25 73 5d 22 20 27 66 61 63 65 20 27 74 72 mat.(propertize."[%s]".'face.'tr
410a0 61 6e 73 69 65 6e 74 2d 64 65 6c 69 6d 69 74 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ansient-delimiter)..............
410c0 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 64 72 61 66 74 22 20 ............(propertize."draft".
410e0 27 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 'face...........................
41100 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 64 72 61 ...........(if.forge--buffer-dra
41120 66 74 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ft-p............................
41140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 74 72 61 6e 73 69 65 6e 74 2d 76 61 6c 75 65 0a 20 ..............'transient-value..
41160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
41180 20 20 20 20 20 20 27 74 72 61 6e 73 69 65 6e 74 2d 69 6e 61 63 74 69 76 65 2d 76 61 6c 75 65 29 ......'transient-inactive-value)
411a0 29 29 29 0a 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 65 71 75 61 6c 20 28 66 69 6c )))...:if.(lambda.().(equal.(fil
411c0 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 62 75 66 66 65 72 2d 66 69 6c 65 2d e-name-nondirectory.buffer-file-
411e0 6e 61 6d 65 29 20 22 6e 65 77 2d 70 75 6c 6c 72 65 71 22 29 29 29 0a 0a 3b 3b 3b 20 4e 6f 74 65 name)."new-pullreq")))..;;;.Note
41200 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 6e 6f 74 65 20 28 66 6f 72 67 65 2d 70 s..(defclass.forge-note.(forge-p
41220 6f 73 74 29 20 28 29 29 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 6e ost).())..(defvar-keymap.forge-n
41240 6f 74 65 2d 73 65 63 74 69 6f 6e 2d 6d 61 70 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 69 ote-section-map..."<remap>.<magi
41260 74 2d 65 64 69 74 2d 74 68 69 6e 67 3e 22 20 23 27 66 6f 72 67 65 2d 65 64 69 74 2d 74 6f 70 69 t-edit-thing>".#'forge-edit-topi
41280 63 2d 6e 6f 74 65 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 73 61 76 65 2d 6e 6f 74 65 c-note)..(defun.forge--save-note
412a0 20 28 5f 72 65 70 6f 20 74 6f 70 69 63 29 0a 20 20 28 6c 65 74 20 28 28 76 61 6c 75 65 20 28 73 .(_repo.topic)...(let.((value.(s
412c0 74 72 69 6e 67 2d 74 72 69 6d 20 28 62 75 66 66 65 72 2d 73 74 72 29 29 29 29 0a 20 20 20 20 28 tring-trim.(buffer-str)))).....(
412e0 6f 73 65 74 20 74 6f 70 69 63 20 6e 6f 74 65 20 28 69 66 20 28 65 71 75 61 6c 20 76 61 6c 75 65 oset.topic.note.(if.(equal.value
41300 20 22 22 29 20 6e 69 6c 20 76 61 6c 75 65 29 29 29 0a 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 ."").nil.value)))...(delete-file
41320 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 74 29 0a 20 20 28 6c 65 74 20 28 28 64 69 .buffer-file-name.t)...(let.((di
41340 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 62 75 66 66 65 72 2d 66 69 r.(file-name-directory.buffer-fi
41360 6c 65 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 63 64 64 72 20 28 64 69 le-name))).....(unless.(cddr.(di
41380 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 20 64 69 72 20 6e 69 6c 20 6e 69 6c 20 74 29 29 0a 20 20 rectory-files.dir.nil.nil.t))...
413a0 20 20 20 20 28 64 65 6c 65 74 65 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 29 29 29 0a 20 20 28 ....(delete-directory.dir)))...(
413c0 6c 65 74 20 28 28 70 72 65 76 62 75 66 20 66 6f 72 67 65 2d 2d 70 72 65 2d 70 6f 73 74 2d 62 75 let.((prevbuf.forge--pre-post-bu
413e0 66 66 65 72 29 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 6d 6f 64 65 2d 62 75 72 79 2d 62 75 66 66 ffer)).....(magit-mode-bury-buff
41400 65 72 20 27 6b 69 6c 6c 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 er.'kill).....(forge-refresh-buf
41420 66 65 72 20 70 72 65 76 62 75 66 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 fer.prevbuf)))..;;;._.;;.Local.V
41440 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 ariables:.;;.read-symbol-shortha
41460 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 nds:.(.;;...("and$"............"
41480 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 cond-let--and$").;;...("and-let"
414a0 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b ........."cond-let--and-let").;;
414c0 20 20 20 28 22 69 66 2d 6c 65 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d ...("if-let".........."cond-let-
414e0 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 -if-let").;;...("when-let"......
41500 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 62 .."cond-let--when-let").;;...("b
41520 75 66 66 65 72 2d 73 74 72 69 6e 67 22 20 2e 20 22 62 75 66 66 65 72 2d 73 74 72 69 6e 67 22 29 uffer-string"..."buffer-string")
41540 0a 3b 3b 20 20 20 28 22 62 75 66 66 65 72 2d 73 74 72 22 20 20 20 20 2e 20 22 66 6f 72 67 65 2d .;;...("buffer-str"......"forge-
41560 2d 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 22 -buffer-substring-no-properties"
41580 29 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 70 6f 73 74 29 )).;;.End:.(provide.'forge-post)
415a0 0a 3b 3b 3b 20 66 6f 72 67 65 2d 70 6f 73 74 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 .;;;.forge-post.el.ends.here....
415c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
415e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
41600 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 70 75 6c 6c 72 65 forge-20250916.1119/forge-pullre
41620 71 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 q.el............................
41640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
41660 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
41680 30 30 32 37 32 36 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 32 33 36 00 20 30 00 00 00 0027262.00000000000.015236..0...
416a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
416c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
416e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
41700 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
41720 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
41740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
41760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
41780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
417a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
417c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
417e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
41800 3b 3b 3b 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2e 65 6c 20 2d 2d 2d 20 50 75 6c 6c 72 65 71 ;;;.forge-pullreq.el.---.Pullreq
41820 20 73 75 70 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 .support..-*-.lexical-binding:t.
41840 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 -*-..;;.Copyright.(C).2018-2025.
41860 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 Jonas.Bernoulli..;;.Author:.Jona
41880 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 s.Bernoulli.<emacs.forge@jonas.b
418a0 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e ernoulli.dev>.;;.Maintainer:.Jon
418c0 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e as.Bernoulli.<emacs.forge@jonas.
418e0 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d bernoulli.dev>..;;.SPDX-License-
41900 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b Identifier:.GPL-3.0-or-later..;;
41920 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 .This.file.is.free.software:.you
41940 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 .can.redistribute.it.and/or.modi
41960 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 fy.;;.it.under.the.terms.of.the.
41980 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 GNU.General.Public.License.as.pu
419a0 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 blished.;;.by.the.Free.Software.
419c0 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 Foundation,.either.version.3.of.
419e0 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 the.License,.;;.or.(at.your.opti
41a00 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 on).any.later.version..;;.;;.Thi
41a20 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 s.file.is.distributed.in.the.hop
41a40 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 e.that.it.will.be.useful,.;;.but
41a60 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 .WITHOUT.ANY.WARRANTY;.without.e
41a80 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d ven.the.implied.warranty.of.;;.M
41aa0 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 ERCHANTABILITY.or.FITNESS.FOR.A.
41ac0 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 PARTICULAR.PURPOSE...See.the.;;.
41ae0 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d GNU.General.Public.License.for.m
41b00 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 ore.details..;;.;;.You.should.ha
41b20 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 ve.received.a.copy.of.the.GNU.Ge
41b40 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 neral.Public.License.;;.along.wi
41b60 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 th.this.file...If.not,.see.<http
41b80 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b s://www.gnu.org/licenses/>...;;;
41ba0 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 28 72 65 71 75 69 72 .Code:..(require.'forge).(requir
41bc0 65 20 27 66 6f 72 67 65 2d 70 6f 73 74 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 74 e.'forge-post).(require.'forge-t
41be0 6f 70 69 63 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 65 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f opic)..;;;.Classes..(defclass.fo
41c00 72 67 65 2d 70 75 6c 6c 72 65 71 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 28 28 63 6c rge-pullreq.(forge-topic)...((cl
41c20 6f 73 71 6c 2d 74 61 62 6c 65 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 70 75 osql-table.........:initform.'pu
41c40 6c 6c 72 65 71 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 70 72 69 6d 61 72 79 2d 6b 65 79 20 20 20 llreq)....(closql-primary-key...
41c60 3a 69 6e 69 74 66 6f 72 6d 20 27 69 64 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 6f 72 64 65 72 2d :initform.'id)....(closql-order-
41c80 62 79 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 5b 28 64 65 73 63 20 6e 75 6d 62 65 72 29 by......:initform.[(desc.number)
41ca0 5d 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 66 6f 72 65 69 67 6e 2d 6b 65 79 20 20 20 3a 69 6e 69 ])....(closql-foreign-key...:ini
41cc0 74 66 6f 72 6d 20 27 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 63 6c tform.'repository)....(closql-cl
41ce0 61 73 73 2d 70 72 65 66 69 78 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 66 6f 72 67 65 2d 22 29 0a ass-prefix..:initform."forge-").
41d00 20 20 20 28 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 ...(id...................:initar
41d20 67 20 3a 69 64 29 0a 20 20 20 28 72 65 70 6f 73 69 74 6f 72 79 20 20 20 20 20 20 20 20 20 20 20 g.:id)....(repository...........
41d40 3a 69 6e 69 74 61 72 67 20 3a 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 6e 75 6d 62 65 72 :initarg.:repository)....(number
41d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6e 75 6d 62 65 72 29 ...............:initarg.:number)
41d80 0a 20 20 20 28 73 74 61 74 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 ....(state................:inita
41da0 72 67 20 3a 73 74 61 74 65 29 0a 20 20 20 28 61 75 74 68 6f 72 20 20 20 20 20 20 20 20 20 20 20 rg.:state)....(author...........
41dc0 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 61 75 74 68 6f 72 29 0a 20 20 20 28 74 69 74 6c 65 20 ....:initarg.:author)....(title.
41de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 69 74 6c 65 29 0a ...............:initarg.:title).
41e00 20 20 20 28 63 72 65 61 74 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 ...(created..............:initar
41e20 67 20 3a 63 72 65 61 74 65 64 29 0a 20 20 20 28 75 70 64 61 74 65 64 20 20 20 20 20 20 20 20 20 g.:created)....(updated.........
41e40 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 75 70 64 61 74 65 64 20 3a 69 6e 69 74 66 6f 72 6d .....:initarg.:updated.:initform
41e60 20 6e 69 6c 29 0a 20 20 20 28 63 6c 6f 73 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a .nil)....(closed...............:
41e80 69 6e 69 74 61 72 67 20 3a 63 6c 6f 73 65 64 29 0a 20 20 20 28 6d 65 72 67 65 64 20 20 20 20 20 initarg.:closed)....(merged.....
41ea0 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6d 65 72 67 65 64 29 0a 20 20 20 28 ..........:initarg.:merged)....(
41ec0 73 74 61 74 75 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 73 status...............:initarg.:s
41ee0 74 61 74 75 73 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 6c 6f 63 6b 65 64 2d tatus.:initform.nil)....(locked-
41f00 70 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6c 6f 63 6b 65 64 2d 70 p.............:initarg.:locked-p
41f20 29 0a 20 20 20 28 65 64 69 74 61 62 6c 65 2d 70 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 )....(editable-p...........:init
41f40 61 72 67 20 3a 65 64 69 74 61 62 6c 65 2d 70 29 0a 20 20 20 28 63 72 6f 73 73 2d 72 65 70 6f 2d arg.:editable-p)....(cross-repo-
41f60 70 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 63 72 6f 73 73 2d 72 65 70 6f 2d 70 p.........:initarg.:cross-repo-p
41f80 29 0a 20 20 20 28 62 61 73 65 2d 72 65 66 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 )....(base-ref.............:init
41fa0 61 72 67 20 3a 62 61 73 65 2d 72 65 66 29 0a 20 20 20 28 62 61 73 65 2d 72 65 70 6f 20 20 20 20 arg.:base-ref)....(base-repo....
41fc0 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 62 61 73 65 2d 72 65 70 6f 29 0a 20 20 20 ........:initarg.:base-repo)....
41fe0 28 68 65 61 64 2d 72 65 66 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a (head-ref.............:initarg.:
42000 68 65 61 64 2d 72 65 66 29 0a 20 20 20 28 68 65 61 64 2d 75 73 65 72 20 20 20 20 20 20 20 20 20 head-ref)....(head-user.........
42020 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 68 65 61 64 2d 75 73 65 72 29 0a 20 20 20 28 68 65 61 64 ...:initarg.:head-user)....(head
42040 2d 72 65 70 6f 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 68 65 61 64 2d -repo............:initarg.:head-
42060 72 65 70 6f 29 0a 20 20 20 28 6d 69 6c 65 73 74 6f 6e 65 20 20 20 20 20 20 20 20 20 20 20 20 3a repo)....(milestone............:
42080 69 6e 69 74 61 72 67 20 3a 6d 69 6c 65 73 74 6f 6e 65 29 0a 20 20 20 28 62 6f 64 79 20 20 20 20 initarg.:milestone)....(body....
420a0 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 62 6f 64 79 29 0a 20 20 20 .............:initarg.:body)....
420c0 28 61 73 73 69 67 6e 65 65 73 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 (assignees............:closql-ta
420e0 62 6c 65 73 20 28 70 75 6c 6c 72 65 71 2d 61 73 73 69 67 6e 65 65 20 61 73 73 69 67 6e 65 65 29 bles.(pullreq-assignee.assignee)
42100 29 0a 20 20 20 28 70 72 6f 6a 65 63 74 2d 63 61 72 64 73 29 20 3b 20 70 72 6f 6a 65 63 74 73 43 )....(project-cards).;.projectsC
42120 61 72 64 73 0a 20 20 20 28 63 6f 6d 6d 69 74 73 29 0a 20 20 20 28 65 64 69 74 73 29 20 3b 20 75 ards....(commits)....(edits).;.u
42140 73 65 72 43 6f 6e 74 65 6e 74 45 64 69 74 73 0a 20 20 20 28 6c 61 62 65 6c 73 20 20 20 20 20 20 serContentEdits....(labels......
42160 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 73 20 28 70 75 6c 6c 72 65 71 .........:closql-tables.(pullreq
42180 2d 6c 61 62 65 6c 20 6c 61 62 65 6c 29 29 0a 20 20 20 28 70 61 72 74 69 63 69 70 61 6e 74 73 29 -label.label))....(participants)
421a0 0a 20 20 20 28 70 6f 73 74 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 ....(posts................:closq
421c0 6c 2d 63 6c 61 73 73 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 29 0a 20 20 20 28 l-class.forge-pullreq-post)....(
421e0 72 65 61 63 74 69 6f 6e 73 29 0a 20 20 20 28 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 20 20 reactions)....(review-requests..
42200 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 73 20 28 70 75 6c 6c 72 65 71 2d 72 65 76 69 ....:closql-tables.(pullreq-revi
42220 65 77 2d 72 65 71 75 65 73 74 20 61 73 73 69 67 6e 65 65 29 29 0a 20 20 20 28 72 65 76 69 65 77 ew-request.assignee))....(review
42240 73 29 0a 20 20 20 28 74 69 6d 65 6c 69 6e 65 29 0a 20 20 20 28 6d 61 72 6b 73 20 20 20 20 20 20 s)....(timeline)....(marks......
42260 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 73 20 28 70 75 6c 6c 72 65 ..........:closql-tables.(pullre
42280 71 2d 6d 61 72 6b 20 6d 61 72 6b 29 29 0a 20 20 20 28 6e 6f 74 65 20 20 20 20 20 20 20 20 20 20 q-mark.mark))....(note..........
422a0 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6e 6f 74 65 20 3a 69 6e 69 74 66 6f 72 6d 20 .......:initarg.:note.:initform.
422c0 6e 69 6c 29 0a 20 20 20 28 62 61 73 65 2d 72 65 76 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 nil)....(base-rev.............:i
422e0 6e 69 74 61 72 67 20 3a 62 61 73 65 2d 72 65 76 29 0a 20 20 20 28 68 65 61 64 2d 72 65 76 20 20 nitarg.:base-rev)....(head-rev..
42300 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 68 65 61 64 2d 72 65 76 29 0a 20 ...........:initarg.:head-rev)..
42320 20 20 28 64 72 61 66 74 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 ..(draft-p..............:initarg
42340 20 3a 64 72 61 66 74 2d 70 29 0a 20 20 20 28 74 68 65 69 72 2d 69 64 20 20 20 20 20 20 20 20 20 .:draft-p)....(their-id.........
42360 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 68 65 69 72 2d 69 64 29 0a 20 20 20 28 73 6c 75 67 ....:initarg.:their-id)....(slug
42380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 73 6c 75 67 29 .................:initarg.:slug)
423a0 0a 20 20 20 28 73 61 76 65 64 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 ....(saved-p..............:inita
423c0 72 67 20 3a 73 61 76 65 64 2d 70 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 29 29 rg.:saved-p.:initform.nil)....))
423e0 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 63 6c 6f 73 71 6c 2d 64 72 65 66 20 28 28 6f 62 ..(cl-defmethod.closql-dref.((ob
42400 6a 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 20 28 5f 28 65 71 6c 20 61 73 73 69 67 6e 65 65 j.forge-pullreq).(_(eql.assignee
42420 73 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 73 71 6c 2d 63 64 72 0a 20 20 20 5b 3a 73 65 6c 65 63 s)))...(forge-sql-cdr....[:selec
42440 74 20 61 73 73 69 67 6e 65 65 3a 2a 20 3a 66 72 6f 6d 20 61 73 73 69 67 6e 65 65 0a 20 20 20 20 t.assignee:*.:from.assignee.....
42460 3a 6a 6f 69 6e 20 70 75 6c 6c 72 65 71 2d 61 73 73 69 67 6e 65 65 20 3a 6f 6e 20 28 3d 20 70 75 :join.pullreq-assignee.:on.(=.pu
42480 6c 6c 72 65 71 2d 61 73 73 69 67 6e 65 65 3a 69 64 20 61 73 73 69 67 6e 65 65 3a 69 64 29 0a 20 llreq-assignee:id.assignee:id)..
424a0 20 20 20 3a 77 68 65 72 65 20 28 3d 20 70 75 6c 6c 72 65 71 2d 61 73 73 69 67 6e 65 65 3a 70 75 ...:where.(=.pullreq-assignee:pu
424c0 6c 6c 72 65 71 20 24 73 31 29 0a 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 61 73 63 20 6c llreq.$s1).....:order-by.[(asc.l
424e0 6f 67 69 6e 29 5d 5d 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 2d 6f 72 65 66 20 6f 62 6a 20 27 69 64 ogin)]]....(closql--oref.obj.'id
42500 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 63 6c 6f 73 71 6c 2d 64 72 65 66 20 28 )))..(cl-defmethod.closql-dref.(
42520 28 6f 62 6a 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 20 28 5f 28 65 71 6c 20 6c 61 62 65 6c (obj.forge-pullreq).(_(eql.label
42540 73 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 73 71 6c 2d 63 64 72 0a 20 20 20 5b 3a 73 65 6c 65 63 s)))...(forge-sql-cdr....[:selec
42560 74 20 6c 61 62 65 6c 3a 2a 20 3a 66 72 6f 6d 20 6c 61 62 65 6c 0a 20 20 20 20 3a 6a 6f 69 6e 20 t.label:*.:from.label.....:join.
42580 70 75 6c 6c 72 65 71 2d 6c 61 62 65 6c 20 3a 6f 6e 20 28 3d 20 70 75 6c 6c 72 65 71 2d 6c 61 62 pullreq-label.:on.(=.pullreq-lab
425a0 65 6c 3a 69 64 20 6c 61 62 65 6c 3a 69 64 29 0a 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 70 75 el:id.label:id).....:where.(=.pu
425c0 6c 6c 72 65 71 2d 6c 61 62 65 6c 3a 70 75 6c 6c 72 65 71 20 24 73 31 29 0a 20 20 20 20 3a 6f 72 llreq-label:pullreq.$s1).....:or
425e0 64 65 72 2d 62 79 20 5b 28 61 73 63 20 6e 61 6d 65 29 5d 5d 0a 20 20 20 28 63 6c 6f 73 71 6c 2d der-by.[(asc.name)]]....(closql-
42600 2d 6f 72 65 66 20 6f 62 6a 20 27 69 64 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 -oref.obj.'id)))..(cl-defmethod.
42620 63 6c 6f 73 71 6c 2d 64 72 65 66 20 28 28 6f 62 6a 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 closql-dref.((obj.forge-pullreq)
42640 20 28 5f 28 65 71 6c 20 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 29 29 29 0a 20 20 28 66 6f .(_(eql.review-requests)))...(fo
42660 72 67 65 2d 73 71 6c 2d 63 64 72 0a 20 20 20 5b 3a 73 65 6c 65 63 74 20 61 73 73 69 67 6e 65 65 rge-sql-cdr....[:select.assignee
42680 3a 2a 20 3a 66 72 6f 6d 20 61 73 73 69 67 6e 65 65 0a 20 20 20 20 3a 6a 6f 69 6e 20 70 75 6c 6c :*.:from.assignee.....:join.pull
426a0 72 65 71 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 20 3a 6f 6e 20 28 3d 20 70 75 6c 6c 72 65 req-review-request.:on.(=.pullre
426c0 71 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 3a 69 64 20 61 73 73 69 67 6e 65 65 3a 69 64 29 q-review-request:id.assignee:id)
426e0 0a 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 70 75 6c 6c 72 65 71 2d 72 65 76 69 65 77 2d 72 65 .....:where.(=.pullreq-review-re
42700 71 75 65 73 74 3a 70 75 6c 6c 72 65 71 20 24 73 31 29 0a 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 quest:pullreq.$s1).....:order-by
42720 20 5b 28 61 73 63 20 6c 6f 67 69 6e 29 5d 5d 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 2d 6f 72 65 66 .[(asc.login)]]....(closql--oref
42740 20 6f 62 6a 20 27 69 64 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 63 6c 6f 73 71 .obj.'id)))..(cl-defmethod.closq
42760 6c 2d 64 72 65 66 20 28 28 6f 62 6a 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 20 28 5f 28 65 l-dref.((obj.forge-pullreq).(_(e
42780 71 6c 20 6d 61 72 6b 73 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 73 71 6c 2d 63 64 72 0a 20 20 20 ql.marks)))...(forge-sql-cdr....
427a0 5b 3a 73 65 6c 65 63 74 20 6d 61 72 6b 3a 2a 20 3a 66 72 6f 6d 20 6d 61 72 6b 0a 20 20 20 20 3a [:select.mark:*.:from.mark.....:
427c0 6a 6f 69 6e 20 70 75 6c 6c 72 65 71 2d 6d 61 72 6b 20 3a 6f 6e 20 28 3d 20 70 75 6c 6c 72 65 71 join.pullreq-mark.:on.(=.pullreq
427e0 2d 6d 61 72 6b 3a 69 64 20 6d 61 72 6b 3a 69 64 29 0a 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 -mark:id.mark:id).....:where.(=.
42800 70 75 6c 6c 72 65 71 2d 6d 61 72 6b 3a 70 75 6c 6c 72 65 71 20 24 73 31 29 0a 20 20 20 20 3a 6f pullreq-mark:pullreq.$s1).....:o
42820 72 64 65 72 2d 62 79 20 5b 28 61 73 63 20 6e 61 6d 65 29 5d 5d 0a 20 20 20 28 63 6c 6f 73 71 6c rder-by.[(asc.name)]]....(closql
42840 2d 2d 6f 72 65 66 20 6f 62 6a 20 27 69 64 29 29 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 --oref.obj.'id)))..(defclass.for
42860 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 20 28 66 6f 72 67 65 2d 70 6f 73 74 29 0a 20 20 28 ge-pullreq-post.(forge-post)...(
42880 28 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 (closql-table.........:initform.
428a0 27 70 75 6c 6c 72 65 71 2d 70 6f 73 74 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 70 72 69 6d 61 72 'pullreq-post)....(closql-primar
428c0 79 2d 6b 65 79 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 69 64 29 0a 20 20 20 28 63 6c 6f 73 71 y-key...:initform.'id)....(closq
428e0 6c 2d 6f 72 64 65 72 2d 62 79 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 5b 28 61 73 63 20 l-order-by......:initform.[(asc.
42900 6e 75 6d 62 65 72 29 5d 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 66 6f 72 65 69 67 6e 2d 6b 65 79 number)])....(closql-foreign-key
42920 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 70 75 6c 6c 72 65 71 29 0a 20 20 20 28 63 6c 6f 73 71 ...:initform.'pullreq)....(closq
42940 6c 2d 63 6c 61 73 73 2d 70 72 65 66 69 78 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 66 6f 72 67 65 l-class-prefix..:initform."forge
42960 2d 70 75 6c 6c 72 65 71 2d 22 29 0a 20 20 20 28 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -pullreq-")....(id..............
42980 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 69 64 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 20 20 .....:initarg.:id)....(pullreq..
429a0 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 70 75 6c 6c 72 65 71 29 0a 20 ............:initarg.:pullreq)..
429c0 20 20 28 6e 75 6d 62 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 ..(number...............:initarg
429e0 20 3a 6e 75 6d 62 65 72 29 0a 20 20 20 28 61 75 74 68 6f 72 20 20 20 20 20 20 20 20 20 20 20 20 .:number)....(author............
42a00 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 61 75 74 68 6f 72 29 0a 20 20 20 28 63 72 65 61 74 65 64 ...:initarg.:author)....(created
42a20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 63 72 65 61 74 65 64 29 ..............:initarg.:created)
42a40 0a 20 20 20 28 75 70 64 61 74 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 ....(updated..............:inita
42a60 72 67 20 3a 75 70 64 61 74 65 64 29 0a 20 20 20 28 62 6f 64 79 20 20 20 20 20 20 20 20 20 20 20 rg.:updated)....(body...........
42a80 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 62 6f 64 79 29 0a 20 20 20 28 65 64 69 74 73 29 ......:initarg.:body)....(edits)
42aa0 0a 20 20 20 28 72 65 61 63 74 69 6f 6e 73 29 0a 20 20 20 29 29 0a 0a 3b 3b 3b 20 51 75 65 72 79 ....(reactions)....))..;;;.Query
42ac0 0a 3b 3b 3b 3b 20 47 65 74 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 .;;;;.Get..(cl-defmethod.forge-g
42ae0 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 70 75 6c 6c 72 et-repository.((post.forge-pullr
42b00 65 71 2d 70 6f 73 74 29 29 0a 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 eq-post))...(forge-get-repositor
42b20 79 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 70 6f 73 74 29 29 29 0a 0a 28 63 y.(forge-get-pullreq.post)))..(c
42b40 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 28 28 70 6f l-defmethod.forge-get-topic.((po
42b60 73 74 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 29 29 0a 20 20 28 66 6f 72 67 65 st.forge-pullreq-post))...(forge
42b80 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 70 6f 73 74 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 -get-pullreq.post))..(cl-defmeth
42ba0 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 28 28 70 75 6c 6c 72 65 71 20 66 od.forge-get-pullreq.((pullreq.f
42bc0 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 0a 20 20 70 75 6c 6c 72 65 71 29 0a 0a 28 63 6c 2d 64 orge-pullreq))...pullreq)..(cl-d
42be0 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 28 28 72 65 70 efmethod.forge-get-pullreq.((rep
42c00 6f 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 6e 75 6d 62 65 72 29 0a 20 20 28 63 o.forge-repository).number)...(c
42c20 6c 2d 61 73 73 65 72 74 20 28 6e 75 6d 62 65 72 70 20 6e 75 6d 62 65 72 29 20 74 29 0a 20 20 28 l-assert.(numberp.number).t)...(
42c40 63 6c 6f 73 71 6c 2d 67 65 74 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 closql-get.(forge-db)...........
42c60 20 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 27 66 6f 72 67 65 2d 70 75 6c ....(forge--object-id.'forge-pul
42c80 6c 72 65 71 20 72 65 70 6f 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lreq.repo.number)...............
42ca0 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 'forge-pullreq))..(cl-defmethod.
42cc0 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 28 28 6e 75 6d 62 65 72 20 69 6e 74 65 67 forge-get-pullreq.((number.integ
42ce0 65 72 29 29 0a 20 20 28 61 6e 64 24 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f er))...(and$.(forge-get-reposito
42d00 72 79 20 3a 74 72 61 63 6b 65 64 20 6e 69 6c 20 27 6e 6f 74 61 74 70 74 29 0a 20 20 20 20 20 20 ry.:tracked.nil.'notatpt).......
42d20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 24 20 6e 75 6d 62 65 72 29 29 29 ..(forge-get-pullreq.$.number)))
42d40 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 ..(cl-defmethod.forge-get-pullre
42d60 71 20 28 28 69 64 20 73 74 72 69 6e 67 29 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 67 65 74 20 28 66 q.((id.string))...(closql-get.(f
42d80 6f 72 67 65 2d 64 62 29 20 69 64 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 0a 0a 28 63 orge-db).id.'forge-pullreq))..(c
42da0 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 28 28 l-defmethod.forge-get-pullreq.((
42dc0 70 6f 73 74 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 29 29 0a 20 20 28 63 6c 6f post.forge-pullreq-post))...(clo
42de0 73 71 6c 2d 67 65 74 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 sql-get.(forge-db)..............
42e00 20 28 6f 72 65 66 20 70 6f 73 74 20 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 .(oref.post.pullreq)............
42e20 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 ...'forge-pullreq))..(cl-defmeth
42e40 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 28 28 5f 28 65 71 6c 20 3a 62 72 od.forge-get-pullreq.((_(eql.:br
42e60 61 6e 63 68 29 29 20 26 6f 70 74 69 6f 6e 61 6c 20 62 72 61 6e 63 68 29 0a 20 20 28 61 6e 64 2d anch)).&optional.branch)...(and-
42e80 6c 65 74 2a 20 28 28 62 72 61 6e 63 68 20 28 6f 72 20 62 72 61 6e 63 68 0a 20 20 20 20 20 20 20 let*.((branch.(or.branch........
42ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 65 63 74 69 6f 6e ..................(magit-section
42ec0 2d 63 61 73 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -case...........................
42ee0 20 28 62 72 61 6e 63 68 20 28 6f 72 65 66 20 69 74 20 76 61 6c 75 65 29 29 0a 20 20 20 20 20 20 .(branch.(oref.it.value)).......
42f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6d 6d 69 74 20 28 6d 61 .....................(commit.(ma
42f20 67 69 74 2d 2d 70 61 69 6e 74 65 64 2d 62 72 61 6e 63 68 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 git--painted-branch-at-point))))
42f40 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 72 61 6e 63 68 20 28 63 64 72 20 28 6d 61 67 )..............(branch.(cdr.(mag
42f60 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 62 72 61 6e 63 68 29 29 29 0a 20 it-split-branch-name.branch)))..
42f80 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 20 28 6d 61 67 69 74 2d 67 65 74 20 22 ............(number.(magit-get."
42fa0 62 72 61 6e 63 68 22 20 62 72 61 6e 63 68 20 22 70 75 6c 6c 52 65 71 75 65 73 74 22 29 29 29 0a branch".branch."pullRequest"))).
42fc0 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 28 73 74 72 69 6e 67 2d 74 ....(forge-get-pullreq.(string-t
42fe0 6f 2d 6e 75 6d 62 65 72 20 6e 75 6d 62 65 72 29 29 29 29 0a 0a 3b 3b 3b 3b 20 43 75 72 72 65 6e o-number.number))))..;;;;.Curren
43000 74 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 20 t..(defun.forge-current-pullreq.
43020 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 (&optional.demand)..."Return.the
43040 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 62 65 69 6e 67 20 .pull-request.at.point.or.being.
43060 76 69 73 69 74 65 64 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 20 70 75 6c visited..If.there.is.no.such.pul
43080 6c 2d 72 65 71 75 65 73 74 20 61 6e 64 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c l-request.and.DEMAND.is.non-nil,
430a0 20 74 68 65 6e 20 73 69 67 6e 61 6c 0a 61 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 28 66 .then.signal.an.error."...(or.(f
430c0 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 28 61 6e orge-pullreq-at-point).......(an
430e0 64 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d d.(forge-pullreq-p.forge-buffer-
43100 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 topic)............forge-buffer-t
43120 6f 70 69 63 29 0a 20 20 20 20 20 20 28 61 6e 64 20 64 65 6d 61 6e 64 20 28 75 73 65 72 2d 65 72 opic).......(and.demand.(user-er
43140 72 6f 72 20 22 4e 6f 20 63 75 72 72 65 6e 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 22 29 29 29 ror."No.current.pull-request")))
43160 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 61 74 2d 70 6f 69 6e 74 )..(defun.forge-pullreq-at-point
43180 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 .(&optional.demand)..."Return.th
431a0 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 61 74 20 70 6f 69 6e 74 2e 0a 49 66 20 74 68 65 72 e.pull-request.at.point..If.ther
431c0 65 20 69 73 20 6e 6f 20 73 75 63 68 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 61 6e 64 20 44 45 e.is.no.such.pull-request.and.DE
431e0 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 73 69 67 6e 61 6c 0a 61 6e 20 MAND.is.non-nil,.then.signal.an.
43200 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 27 66 error."...(or.(thing-at-point.'f
43220 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 65 63 74 69 orge-pullreq).......(magit-secti
43240 6f 6e 2d 76 61 6c 75 65 2d 69 66 20 27 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 28 66 6f 72 on-value-if.'pullreq).......(for
43260 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 3a 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 28 61 ge-get-pullreq.:branch).......(a
43280 6e 64 20 64 65 6d 61 6e 64 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 20 70 75 6c 6c 2d 72 nd.demand.(user-error."No.pull-r
432a0 65 71 75 65 73 74 20 61 74 20 70 6f 69 6e 74 22 29 29 29 29 0a 0a 28 70 75 74 20 27 66 6f 72 67 equest.at.point"))))..(put.'forg
432c0 65 2d 70 75 6c 6c 72 65 71 20 27 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 23 27 66 6f 72 67 e-pullreq.'thing-at-point.#'forg
432e0 65 2d 74 68 69 6e 67 61 74 70 74 2d 2d 70 75 6c 6c 72 65 71 29 0a 28 64 65 66 75 6e 20 66 6f 72 e-thingatpt--pullreq).(defun.for
43300 67 65 2d 74 68 69 6e 67 61 74 70 74 2d 2d 70 75 6c 6c 72 65 71 20 28 29 0a 20 20 28 61 6e 64 2d ge-thingatpt--pullreq.()...(and-
43320 6c 65 74 2a 20 28 28 5f 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 2d 6c 6f 6f 6b 69 6e 67 2d let*.((_(thing-at-point-looking-
43340 61 74 20 22 5c 5c 28 5b 23 21 5d 5c 5c 29 5c 5c 28 5b 30 2d 39 5d 2b 5c 5c 29 5c 5c 5f 3e 22 29 at."\\([#!]\\)\\([0-9]+\\)\\_>")
43360 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 65 66 69 78 20 28 6d 61 74 63 68 2d 73 74 )..............(prefix.(match-st
43380 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 ring-no-properties.1))..........
433a0 20 20 20 20 28 6e 75 6d 62 65 72 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 28 6d ....(number.(string-to-number.(m
433c0 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 32 29 29 29 0a 20 atch-string-no-properties.2)))..
433e0 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 2d 72 65 70 6f 2d 66 ............(repo.(forge--repo-f
43400 6f 72 2d 74 68 69 6e 67 61 74 70 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 5f 28 6f or-thingatpt))..............(_(o
43420 72 20 28 65 71 75 61 6c 20 70 72 65 66 69 78 20 22 23 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 r.(equal.prefix."#")............
43440 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 ........(forge-gitlab-repository
43460 2d 2d 65 69 65 69 6f 2d 63 68 69 6c 64 70 20 72 65 70 6f 29 29 29 29 0a 20 20 20 20 28 66 6f 72 --eieio-childp.repo)))).....(for
43480 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 72 65 70 6f 20 6e 75 6d 62 65 72 29 29 29 0a 0a 3b ge-get-pullreq.repo.number)))..;
434a0 3b 3b 20 52 65 61 64 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 70 75 6c 6c 72 ;;.Read..(defun.forge-read-pullr
434c0 65 71 20 28 70 72 6f 6d 70 74 29 0a 20 20 22 52 65 61 64 20 61 6e 20 61 63 74 69 76 65 20 70 75 eq.(prompt)..."Read.an.active.pu
434e0 6c 6c 2d 72 65 71 75 65 73 74 20 77 69 74 68 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 75 73 69 6e 67 ll-request.with.completion.using
43500 20 50 52 4f 4d 50 54 2e 0a 0a 4f 70 65 6e 2c 20 75 6e 72 65 61 64 20 61 6e 64 20 70 65 6e 64 69 .PROMPT...Open,.unread.and.pendi
43520 6e 67 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 ng.pull-requests.are.considered.
43540 61 63 74 69 76 65 2e 0a 44 65 66 61 75 6c 74 20 74 6f 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 active..Default.to.the.current.p
43560 75 6c 6c 2d 72 65 71 75 65 73 74 2c 20 65 76 65 6e 20 69 66 20 69 74 20 69 73 6e 27 74 20 61 63 ull-request,.even.if.it.isn't.ac
43580 74 69 76 65 2e 0a 0a 5c 5c 3c 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d 69 6e 69 62 tive...\\<forge-read-topic-minib
435a0 75 66 66 65 72 2d 6d 61 70 3e 57 68 69 6c 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 69 73 20 69 6e uffer-map>While.completion.is.in
435c0 20 5c 0a 70 72 6f 67 72 65 73 73 2c 20 5c 5c 5b 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 .\.progress,.\\[forge-read-topic
435e0 2d 6c 69 66 74 2d 6c 69 6d 69 74 5d 20 6c 69 66 74 73 20 74 68 65 20 6c 69 6d 69 74 2c 20 65 78 -lift-limit].lifts.the.limit,.ex
43600 74 65 6e 64 69 6e 67 0a 74 68 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 61 74 65 tending.the.completion.candidate
43620 73 20 74 6f 20 69 6e 63 6c 75 64 65 20 61 6c 6c 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e 0a s.to.include.all.pull-requests..
43640 0a 49 66 20 60 66 6f 72 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 63 65 73 27 20 .If.`forge-limit-topic-choices'.
43660 69 73 20 6e 69 6c 2c 20 74 68 65 6e 20 61 6c 6c 20 63 61 6e 64 69 64 61 74 65 73 0a 63 61 6e 20 is.nil,.then.all.candidates.can.
43680 62 65 20 73 65 6c 65 63 74 65 64 20 66 72 6f 6d 20 74 68 65 20 73 74 61 72 74 2e 22 0a 20 20 28 be.selected.from.the.start."...(
436a0 66 6f 72 67 65 2d 2d 72 65 61 64 2d 74 6f 70 69 63 20 70 72 6f 6d 70 74 0a 20 20 20 20 20 20 20 forge--read-topic.prompt........
436c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 ..............#'forge-current-pu
436e0 6c 6c 72 65 71 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 llreq......................(forg
43700 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 3a 74 79 70 65 20 27 70 75 6c 6c 72 65 71 20 3a 61 e--topics-spec.:type.'pullreq.:a
43720 63 74 69 76 65 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 ctive.t)......................(f
43740 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 3a 74 79 70 65 20 27 70 75 6c 6c 72 65 71 orge--topics-spec.:type.'pullreq
43760 20 3a 61 63 74 69 76 65 20 6e 69 6c 20 3a 73 74 61 74 65 20 6e 69 6c 29 29 29 0a 0a 3b 3b 3b 20 .:active.nil.:state.nil)))..;;;.
43780 55 74 69 6c 69 74 69 65 73 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 Utilities..(defun.forge--pullreq
437a0 2d 62 72 61 6e 63 68 2d 69 6e 74 65 72 6e 61 6c 20 28 70 75 6c 6c 72 65 71 29 0a 20 20 28 6c 65 -branch-internal.(pullreq)...(le
437c0 74 20 28 28 62 72 61 6e 63 68 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 68 65 61 64 2d 72 65 t.((branch.(oref.pullreq.head-re
437e0 66 29 29 29 0a 20 20 20 20 3b 3b 20 49 74 20 69 73 20 69 6e 76 61 6c 69 64 20 66 6f 72 20 61 20 f))).....;;.It.is.invalid.for.a.
43800 62 72 61 6e 63 68 20 6e 61 6d 65 20 74 6f 20 62 65 67 69 6e 20 77 69 74 68 20 61 20 63 6f 6c 6f branch.name.to.begin.with.a.colo
43820 6e 2c 20 79 65 74 0a 20 20 20 20 3b 3b 20 74 68 61 74 20 69 73 20 77 68 61 74 20 47 69 74 6c 61 n,.yet.....;;.that.is.what.Gitla
43840 62 20 75 73 65 73 20 77 68 65 6e 20 61 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 27 73 20 73 6f 75 b.uses.when.a.pull-request's.sou
43860 72 63 65 20 62 72 61 6e 63 68 0a 20 20 20 20 3b 3b 20 68 61 73 20 62 65 65 6e 20 64 65 6c 65 74 rce.branch.....;;.has.been.delet
43880 65 64 2e 20 20 4f 6e 20 47 69 74 68 75 62 20 74 68 69 73 20 69 73 20 73 69 6d 70 6c 79 20 6e 69 ed...On.Github.this.is.simply.ni
438a0 6c 20 69 6e 20 74 68 65 20 73 61 6d 65 0a 20 20 20 20 3b 3b 20 73 69 74 75 61 74 69 6f 6e 2e 0a l.in.the.same.....;;.situation..
438c0 20 20 20 20 28 61 6e 64 20 62 72 61 6e 63 68 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 70 72 65 ....(and.branch.(not.(string-pre
438e0 66 69 78 2d 70 20 22 3a 22 20 62 72 61 6e 63 68 29 29 20 62 72 61 6e 63 68 29 29 29 0a 0a 28 64 fix-p.":".branch)).branch)))..(d
43900 65 66 75 6e 20 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 62 72 61 6e 63 68 2d 61 63 74 69 76 efun.forge--pullreq-branch-activ
43920 65 20 28 70 75 6c 6c 72 65 71 29 0a 20 20 28 6c 65 74 2a 20 28 28 6e 75 6d 62 65 72 20 28 6e 75 e.(pullreq)...(let*.((number.(nu
43940 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 6e 75 6d mber-to-string.(oref.pullreq.num
43960 62 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 72 61 6e 63 68 2d 6e 20 28 66 6f 72 6d 61 ber)))..........(branch-n.(forma
43980 74 20 22 70 72 2d 25 73 22 20 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 72 61 t."pr-%s".number))..........(bra
439a0 6e 63 68 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 62 72 61 6e 63 68 2d 69 6e 74 65 72 nch.(forge--pullreq-branch-inter
439c0 6e 61 6c 20 70 75 6c 6c 72 65 71 29 29 29 0a 20 20 20 20 28 6f 72 20 28 61 6e 64 20 28 6d 61 67 nal.pullreq))).....(or.(and.(mag
439e0 69 74 2d 62 72 61 6e 63 68 2d 70 20 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 it-branch-p.branch).............
43a00 20 28 65 71 75 61 6c 20 28 6d 61 67 69 74 2d 67 65 74 20 22 62 72 61 6e 63 68 22 20 62 72 61 6e .(equal.(magit-get."branch".bran
43a20 63 68 20 22 70 75 6c 6c 52 65 71 75 65 73 74 22 29 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 ch."pullRequest").number).......
43a40 20 20 20 20 20 20 20 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6d 61 67 .......branch).........(and.(mag
43a60 69 74 2d 62 72 61 6e 63 68 2d 70 20 62 72 61 6e 63 68 2d 6e 29 0a 20 20 20 20 20 20 20 20 20 20 it-branch-p.branch-n)...........
43a80 20 20 20 28 65 71 75 61 6c 20 28 6d 61 67 69 74 2d 67 65 74 20 22 62 72 61 6e 63 68 22 20 62 72 ...(equal.(magit-get."branch".br
43aa0 61 6e 63 68 2d 6e 20 22 70 75 6c 6c 52 65 71 75 65 73 74 22 29 20 6e 75 6d 62 65 72 29 0a 20 20 anch-n."pullRequest").number)...
43ac0 20 20 20 20 20 20 20 20 20 20 20 62 72 61 6e 63 68 2d 6e 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 ...........branch-n))))..(defun.
43ae0 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 72 65 66 20 28 70 75 6c 6c 72 65 71 29 0a 20 20 28 forge--pullreq-ref.(pullreq)...(
43b00 6c 65 74 20 28 28 72 65 66 20 28 66 6f 72 6d 61 74 20 22 72 65 66 73 2f 70 75 6c 6c 72 65 71 73 let.((ref.(format."refs/pullreqs
43b20 2f 25 73 22 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 6e 75 6d 62 65 72 29 29 29 29 0a 20 20 /%s".(oref.pullreq.number))))...
43b40 20 20 28 61 6e 64 20 28 6d 61 67 69 74 2d 72 65 76 2d 76 65 72 69 66 79 20 72 65 66 29 20 72 65 ..(and.(magit-rev-verify.ref).re
43b60 66 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 72 61 6e 67 f)))..(defun.forge--pullreq-rang
43b80 65 20 28 70 75 6c 6c 72 65 71 20 26 6f 70 74 69 6f 6e 61 6c 20 65 6e 64 70 6f 69 6e 74 73 29 0a e.(pullreq.&optional.endpoints).
43ba0 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 68 65 61 64 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 ..(and-let.((head.(forge--pullre
43bc0 71 2d 72 65 66 20 70 75 6c 6c 72 65 71 29 29 29 0a 20 20 20 20 28 63 6f 6e 63 61 74 20 28 66 6f q-ref.pullreq))).....(concat.(fo
43be0 72 67 65 2d 2d 67 65 74 2d 72 65 6d 6f 74 65 29 20 22 2f 22 20 28 6f 72 65 66 20 70 75 6c 6c 72 rge--get-remote)."/".(oref.pullr
43c00 65 71 20 62 61 73 65 2d 72 65 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 65 6e 64 eq.base-ref).............(if.end
43c20 70 6f 69 6e 74 73 20 22 2e 2e 2e 22 20 22 2e 2e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 68 points."..."."..").............h
43c40 65 61 64 29 29 29 0a 0a 3b 3b 3b 20 49 6e 73 65 72 74 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d ead)))..;;;.Insert..(defvar-keym
43c60 61 70 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 73 2d 73 65 63 74 69 6f 6e 2d 6d 61 70 0a 20 20 ap.forge-pullreqs-section-map...
43c80 3a 70 61 72 65 6e 74 20 66 6f 72 67 65 2d 63 6f 6d 6d 6f 6e 2d 6d 61 70 0a 20 20 22 3c 72 65 6d :parent.forge-common-map..."<rem
43ca0 61 70 3e 20 3c 6d 61 67 69 74 2d 62 72 6f 77 73 65 2d 74 68 69 6e 67 3e 22 20 23 27 66 6f 72 67 ap>.<magit-browse-thing>".#'forg
43cc0 65 2d 62 72 6f 77 73 65 2d 70 75 6c 6c 72 65 71 73 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 e-browse-pullreqs..."<remap>.<ma
43ce0 67 69 74 2d 76 69 73 69 74 2d 74 68 69 6e 67 3e 22 20 20 23 27 66 6f 72 67 65 2d 6c 69 73 74 2d git-visit-thing>"..#'forge-list-
43d00 70 75 6c 6c 72 65 71 73 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 6c 69 73 74 pullreqs..."<remap>.<forge--list
43d20 2d 6d 65 6e 75 3e 22 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 0a 20 20 -menu>"...#'forge-topics-menu...
43d40 22 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 69 74 65 6d 2d 6d 65 6e 75 3e 22 20 20 20 23 "<remap>.<forge--item-menu>"...#
43d60 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 0a 20 20 22 43 2d 63 20 43 2d 6e 22 20 20 20 'forge-topic-menu..."C-c.C-n"...
43d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 63 72 65 61 74 ...................#'forge-creat
43da0 65 2d 70 75 6c 6c 72 65 71 29 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 e-pullreq)..(defvar-keymap.forge
43dc0 2d 70 75 6c 6c 72 65 71 2d 73 65 63 74 69 6f 6e 2d 6d 61 70 0a 20 20 3a 70 61 72 65 6e 74 20 66 -pullreq-section-map...:parent.f
43de0 6f 72 67 65 2d 63 6f 6d 6d 6f 6e 2d 6d 61 70 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 69 orge-common-map..."<remap>.<magi
43e00 74 2d 76 69 73 69 74 2d 74 68 69 6e 67 3e 22 20 20 23 27 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 t-visit-thing>"..#'forge-visit-t
43e20 68 69 73 2d 74 6f 70 69 63 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 6c 69 73 his-topic..."<remap>.<forge--lis
43e40 74 2d 6d 65 6e 75 3e 22 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 0a 20 t-menu>"...#'forge-topics-menu..
43e60 20 22 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 69 74 65 6d 2d 6d 65 6e 75 3e 22 20 20 20 ."<remap>.<forge--item-menu>"...
43e80 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 66 #'forge-topic-menu)..(cl-defun.f
43ea0 6f 72 67 65 2d 69 6e 73 65 72 74 2d 70 75 6c 6c 72 65 71 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 orge-insert-pullreqs.(&optional.
43ec0 28 73 70 65 63 20 6e 69 6c 20 73 73 70 65 63 29 20 68 65 61 64 69 6e 67 29 0a 20 20 22 49 6e 73 (spec.nil.sspec).heading)..."Ins
43ee0 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2c 20 61 63 63 ert.a.list.of.pull-requests,.acc
43f00 6f 72 64 69 6e 67 20 74 6f 20 60 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d ording.to.`forge--buffer-topics-
43f20 73 70 65 63 27 2e 0a 4f 70 74 69 6f 6e 61 6c 20 53 50 45 43 20 63 61 6e 20 62 65 20 75 73 65 64 spec'..Optional.SPEC.can.be.used
43f40 20 74 6f 20 6f 76 65 72 72 69 64 65 20 74 68 61 74 20 66 69 6c 74 65 72 69 6e 67 20 73 70 65 63 .to.override.that.filtering.spec
43f60 69 66 69 63 61 74 69 6f 6e 2c 0a 61 6e 64 20 6f 70 74 69 6f 6e 61 6c 20 48 45 41 44 49 4e 47 20 ification,.and.optional.HEADING.
43f80 74 6f 20 63 68 61 6e 67 65 20 74 68 65 20 73 65 63 74 69 6f 6e 20 68 65 61 64 69 6e 67 2e 22 0a to.change.the.section.heading.".
43fa0 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 5f 28 66 6f 72 67 65 2d 64 62 20 74 29 29 0a 20 20 ..(when-let*.((_(forge-db.t))...
43fc0 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 ............(repo.(forge-get-rep
43fe0 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ository.:tracked?)).............
44000 20 20 28 73 70 65 63 20 28 69 66 20 73 73 70 65 63 20 73 70 65 63 20 28 66 6f 72 67 65 2d 2d 63 ..(spec.(if.sspec.spec.(forge--c
44020 6c 6f 6e 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 29 29 29 0a 20 20 20 20 20 lone-buffer-topics-spec)))......
44040 20 20 20 20 20 20 20 20 20 28 5f 28 6d 65 6d 71 20 28 6f 72 65 66 20 73 70 65 63 20 74 79 70 65 .........(_(memq.(oref.spec.type
44060 29 20 27 28 74 6f 70 69 63 20 70 75 6c 6c 72 65 71 29 29 29 29 0a 20 20 20 20 28 6f 73 65 74 20 ).'(topic.pullreq)))).....(oset.
44080 73 70 65 63 20 74 79 70 65 20 27 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d spec.type.'pullreq).....(forge--
440a0 69 6e 73 65 72 74 2d 74 6f 70 69 63 73 20 27 70 75 6c 6c 72 65 71 73 0a 20 20 20 20 20 20 20 20 insert-topics.'pullreqs.........
440c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 68 65 61 64 69 6e 67 20 22 50 ..................(or.heading."P
440e0 75 6c 6c 20 72 65 71 75 65 73 74 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ull.requests")..................
44100 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 74 6f 70 69 63 73 20 73 70 65 .........(forge--list-topics.spe
44120 63 20 72 65 70 6f 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 c.repo))))..(defun.forge--insert
44140 2d 70 75 6c 6c 72 65 71 2d 63 6f 6d 6d 69 74 73 20 28 70 75 6c 6c 72 65 71 20 26 6f 70 74 69 6f -pullreq-commits.(pullreq.&optio
44160 6e 61 6c 20 61 6c 6c 29 0a 20 20 28 63 6c 2d 6c 65 74 66 20 28 28 28 73 79 6d 62 6f 6c 2d 66 75 nal.all)...(cl-letf.(((symbol-fu
44180 6e 63 74 69 6f 6e 20 23 27 6d 61 67 69 74 2d 63 61 6e 63 65 6c 2d 73 65 63 74 69 6f 6e 29 20 28 nction.#'magit-cancel-section).(
441a0 6c 61 6d 62 64 61 20 28 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 2d 6c 65 74 0a 20 20 20 20 20 lambda.()))).....(cond-let......
441c0 20 28 61 6c 6c 0a 20 20 20 20 20 20 20 3b 3b 20 4e 75 6d 65 72 69 63 20 70 72 20 72 65 66 2c 20 .(all........;;.Numeric.pr.ref,.
441e0 70 72 20 62 72 61 6e 63 68 20 28 69 66 20 69 74 20 65 78 69 73 74 73 29 20 61 6e 64 20 61 70 69 pr.branch.(if.it.exists).and.api
44200 0a 20 20 20 20 20 20 20 3b 3b 20 70 72 20 72 61 6e 67 65 20 6d 61 79 20 62 65 20 6f 75 74 20 6f ........;;.pr.range.may.be.out.o
44220 66 20 73 79 6e 63 2e 20 20 4a 75 73 74 20 73 68 6f 77 20 74 68 65 6d 20 61 6c 6c 2e 0a 20 20 20 f.sync...Just.show.them.all.....
44240 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 2d 62 6f 64 79 0a 20 ....(magit-insert-section-body..
44260 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 69 6e 73 65 72 74 2d 6c 6f 67 20 6e 69 6c 0a 20 ........(magit--insert-log.nil..
44280 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 71 20 6e 69 6c 20 28 6c 69 73 74 20 28 63 6f 6e 63 61 ..........(delq.nil.(list.(conca
442a0 74 20 22 5e 22 20 28 6f 72 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 62 61 73 65 2d 72 65 76 t."^".(or.(oref.pullreq.base-rev
442c0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )...............................
442e0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 66 6f 72 67 65 2d 2d 67 65 74 .............(concat.(forge--get
44300 2d 72 65 6d 6f 74 65 29 20 22 2f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -remote)."/"....................
44320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
44340 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 62 61 73 65 2d 72 65 66 29 29 29 29 0a 20 20 20 20 20 (oref.pullreq.base-ref))))......
44360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 ......................(forge--pu
44380 6c 6c 72 65 71 2d 72 65 66 20 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 llreq-ref.pullreq)..............
443a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 62 72 ..............(forge--pullreq-br
443c0 61 6e 63 68 2d 61 63 74 69 76 65 20 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 anch-active.pullreq)............
443e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 62 72 61 6e ................(and-let*.((bran
44400 63 68 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 68 65 61 64 2d 72 65 66 29 29 0a 20 20 20 20 ch.(oref.pullreq.head-ref)).....
44420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
44440 20 20 28 5f 28 6d 61 67 69 74 2d 6c 6f 63 61 6c 2d 62 72 61 6e 63 68 2d 70 20 62 72 61 6e 63 68 ..(_(magit-local-branch-p.branch
44460 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ))).............................
44480 20 62 72 61 6e 63 68 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 71 2d 75 6e 69 71 20 .branch)))............(seq-uniq.
444a0 28 63 6f 6e 73 20 22 2d 2d 67 72 61 70 68 22 20 6d 61 67 69 74 2d 62 75 66 66 65 72 2d 6c 6f 67 (cons."--graph".magit-buffer-log
444c0 2d 61 72 67 73 29 29 29 29 29 0a 20 20 20 20 20 20 28 5b 72 61 6e 67 65 20 28 66 6f 72 67 65 2d -args))))).......([range.(forge-
444e0 2d 70 75 6c 6c 72 65 71 2d 72 61 6e 67 65 20 70 75 6c 6c 72 65 71 29 5d 0a 20 20 20 20 20 20 20 -pullreq-range.pullreq)]........
44500 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 2d 62 6f 64 79 0a 20 20 20 20 20 (magit-insert-section-body......
44520 20 20 20 20 28 6d 61 67 69 74 2d 2d 69 6e 73 65 72 74 2d 6c 6f 67 20 6e 69 6c 20 72 61 6e 67 65 ....(magit--insert-log.nil.range
44540 20 6d 61 67 69 74 2d 62 75 66 66 65 72 2d 6c 6f 67 2d 61 72 67 73 29 0a 20 20 20 20 20 20 20 20 .magit-buffer-log-args).........
44560 20 28 6d 61 67 69 74 2d 6d 61 6b 65 2d 6d 61 72 67 69 6e 2d 6f 76 65 72 6c 61 79 20 6e 69 6c 20 .(magit-make-margin-overlay.nil.
44580 74 29 29 29 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 t))))))..;;;._.;;.Local.Variable
445a0 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a 20 28 0a s:.;;.read-symbol-shorthands:.(.
445c0 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 ;;...("and$"............"cond-le
445e0 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 20 20 20 t--and$").;;...("and-let".......
44600 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 69 66 .."cond-let--and-let").;;...("if
44620 2d 6c 65 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 -let".........."cond-let--if-let
44640 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 ").;;...("when-let"........"cond
44660 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f 76 69 -let--when-let")).;;.End:.(provi
44680 64 65 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 70 75 6c de.'forge-pullreq).;;;.forge-pul
446a0 6c 72 65 71 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 lreq.el.ends.here...............
446c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
446e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
44700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
44720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
44740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
44760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
44780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
447a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
447c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
447e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
44800 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 72 65 70 6f 2e 65 forge-20250916.1119/forge-repo.e
44820 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 l...............................
44840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
44860 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
44880 30 30 35 36 32 37 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 32 34 00 20 30 00 00 00 0056274.00000000000.014524..0...
448a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
448c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
448e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
44900 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
44920 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
44940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
44960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
44980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
449a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
449c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
449e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
44a00 3b 3b 3b 20 66 6f 72 67 65 2d 72 65 70 6f 2e 65 6c 20 2d 2d 2d 20 52 65 70 6f 73 69 74 6f 72 79 ;;;.forge-repo.el.---.Repository
44a20 20 73 75 70 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 .support..-*-.lexical-binding:t.
44a40 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 -*-..;;.Copyright.(C).2018-2025.
44a60 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 Jonas.Bernoulli..;;.Author:.Jona
44a80 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 s.Bernoulli.<emacs.forge@jonas.b
44aa0 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e ernoulli.dev>.;;.Maintainer:.Jon
44ac0 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e as.Bernoulli.<emacs.forge@jonas.
44ae0 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d bernoulli.dev>..;;.SPDX-License-
44b00 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b Identifier:.GPL-3.0-or-later..;;
44b20 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 .This.file.is.free.software:.you
44b40 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 .can.redistribute.it.and/or.modi
44b60 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 fy.;;.it.under.the.terms.of.the.
44b80 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 GNU.General.Public.License.as.pu
44ba0 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 blished.;;.by.the.Free.Software.
44bc0 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 Foundation,.either.version.3.of.
44be0 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 the.License,.;;.or.(at.your.opti
44c00 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 on).any.later.version..;;.;;.Thi
44c20 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 s.file.is.distributed.in.the.hop
44c40 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 e.that.it.will.be.useful,.;;.but
44c60 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 .WITHOUT.ANY.WARRANTY;.without.e
44c80 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d ven.the.implied.warranty.of.;;.M
44ca0 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 ERCHANTABILITY.or.FITNESS.FOR.A.
44cc0 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 PARTICULAR.PURPOSE...See.the.;;.
44ce0 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d GNU.General.Public.License.for.m
44d00 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 ore.details..;;.;;.You.should.ha
44d20 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 ve.received.a.copy.of.the.GNU.Ge
44d40 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 neral.Public.License.;;.along.wi
44d60 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 th.this.file...If.not,.see.<http
44d80 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b s://www.gnu.org/licenses/>...;;;
44da0 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 28 72 65 71 75 69 72 .Code:..(require.'forge).(requir
44dc0 65 20 27 65 69 65 69 6f 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 65 73 0a 0a 28 64 65 66 63 6c 61 73 e.'eieio)..;;;.Classes..(defclas
44de0 73 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 6f 62 6a 65 63 74 s.forge-repository.(forge-object
44e00 29 0a 20 20 28 28 63 6c 6f 73 71 6c 2d 63 6c 61 73 73 2d 70 72 65 66 69 78 20 20 20 20 20 20 20 )...((closql-class-prefix.......
44e20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 66 6f 72 67 65 2d 22 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d .:initform."forge-")....(closql-
44e40 63 6c 61 73 73 2d 73 75 66 66 69 78 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 2d class-suffix........:initform."-
44e60 72 65 70 6f 73 69 74 6f 72 79 22 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 20 20 repository")....(closql-table...
44e80 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 72 65 70 6f 73 69 74 6f 72 ............:initform.'repositor
44ea0 79 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 70 72 69 6d 61 72 79 2d 6b 65 79 20 20 20 20 20 20 20 y)....(closql-primary-key.......
44ec0 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 69 64 29 0a 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 73 ..:initform.'id)....(discussions
44ee0 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 -url-format.....:initform.nil.:a
44f00 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e llocation.:class)....(discussion
44f20 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a -url-format......:initform.nil.:
44f40 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 64 69 73 63 75 73 73 69 6f allocation.:class)....(discussio
44f60 6e 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 n-post-url-format.:initform.nil.
44f80 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 69 73 73 75 65 73 2d 75 :allocation.:class)....(issues-u
44fa0 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c rl-format..........:initform.nil
44fc0 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 69 73 73 75 65 2d 75 .:allocation.:class)....(issue-u
44fe0 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 rl-format...........:initform.ni
45000 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 69 73 73 75 65 2d l.:allocation.:class)....(issue-
45020 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e post-url-format......:initform.n
45040 69 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 70 75 6c 6c 72 il.:allocation.:class)....(pullr
45060 65 71 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 eqs-url-format........:initform.
45080 6e 69 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 70 75 6c 6c nil.:allocation.:class)....(pull
450a0 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d req-url-format.........:initform
450c0 20 6e 69 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 70 75 6c .nil.:allocation.:class)....(pul
450e0 6c 72 65 71 2d 70 6f 73 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 3a 69 6e 69 74 66 6f 72 lreq-post-url-format....:initfor
45100 6d 20 6e 69 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 63 6f m.nil.:allocation.:class)....(co
45120 6d 6d 69 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f mmit-url-format..........:initfo
45140 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 62 rm.nil.:allocation.:class)....(b
45160 72 61 6e 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 ranch-url-format..........:initf
45180 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 orm.nil.:allocation.:class)....(
451a0 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 remote-url-format..........:init
451c0 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 form.nil.:allocation.:class)....
451e0 28 62 6c 6f 62 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 (blob-url-format............:ini
45200 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 tform.nil.:allocation.:class)...
45220 20 28 63 72 65 61 74 65 2d 69 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 3a 69 6e .(create-issue-url-format....:in
45240 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 itform.nil.:allocation.:class)..
45260 20 20 28 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 3a 69 ..(create-pullreq-url-format..:i
45280 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a nitform.nil.:allocation.:class).
452a0 20 20 20 28 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 20 20 20 20 20 20 20 20 20 20 20 20 3a ...(pullreq-refspec............:
452c0 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 initform.nil.:allocation.:class)
452e0 0a 20 20 20 28 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(id.........................
45300 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 69 64 29 0a 20 20 20 28 :initform.nil.:initarg.:id)....(
45320 66 6f 72 67 65 2d 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 forge-id...................:init
45340 66 6f 72 6d 20 6e 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 66 6f 72 67 65 2d 69 64 29 0a 20 20 20 form.nil.:initarg.:forge-id)....
45360 28 66 6f 72 67 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 (forge......................:ini
45380 74 66 6f 72 6d 20 6e 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 66 6f 72 67 65 29 0a 20 20 20 28 6f tform.nil.:initarg.:forge)....(o
453a0 77 6e 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 wner......................:initf
453c0 6f 72 6d 20 6e 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 6f 77 6e 65 72 29 0a 20 20 20 28 6e 61 6d orm.nil.:initarg.:owner)....(nam
453e0 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 e.......................:initfor
45400 6d 20 6e 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 6e 61 6d 65 29 0a 20 20 20 28 61 70 69 68 6f 73 m.nil.:initarg.:name)....(apihos
45420 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e t....................:initform.n
45440 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 61 70 69 68 6f 73 74 29 0a 20 20 20 28 67 69 74 68 6f 73 il.:initarg.:apihost)....(githos
45460 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e t....................:initform.n
45480 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 67 69 74 68 6f 73 74 29 0a 20 20 20 28 72 65 6d 6f 74 65 il.:initarg.:githost)....(remote
454a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e .....................:initform.n
454c0 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 72 65 6d 6f 74 65 29 0a 20 20 20 28 63 6f 6e 64 69 74 69 il.:initarg.:remote)....(conditi
454e0 6f 6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 3a 73 on..................:initform.:s
45500 74 75 62 29 0a 20 20 20 28 63 72 65 61 74 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tub)....(created................
45520 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 75 70 64 61 74 65 64 20 20 ....:initform.nil)....(updated..
45540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 ..................:initform.nil)
45560 0a 20 20 20 28 70 75 73 68 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(pushed.....................
45580 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 70 61 72 65 6e 74 20 20 20 20 20 20 20 :initform.nil)....(parent.......
455a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 ..............:initform.nil)....
455c0 28 64 65 73 63 72 69 70 74 69 6f 6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 (description................:ini
455e0 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 68 6f 6d 65 70 61 67 65 20 20 20 20 20 20 20 20 20 tform.nil)....(homepage.........
45600 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 64 65 66 ..........:initform.nil)....(def
45620 61 75 6c 74 2d 62 72 61 6e 63 68 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 ault-branch.............:initfor
45640 6d 20 6e 69 6c 29 0a 20 20 20 28 61 72 63 68 69 76 65 64 2d 70 20 20 20 20 20 20 20 20 20 20 20 m.nil)....(archived-p...........
45660 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 66 6f 72 6b 2d 70 20 ......:initform.nil)....(fork-p.
45680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 ....................:initform.ni
456a0 6c 29 0a 20 20 20 28 6c 6f 63 6b 65 64 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l)....(locked-p.................
456c0 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 6d 69 72 72 6f 72 2d 70 20 20 20 ..:initform.nil)....(mirror-p...
456e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 ................:initform.nil)..
45700 20 20 28 70 72 69 76 61 74 65 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 ..(private-p..................:i
45720 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 69 73 73 75 65 73 2d 70 20 20 20 20 20 20 20 nitform.nil)....(issues-p.......
45740 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 74 29 0a 20 20 20 28 77 69 6b ............:initform.t)....(wik
45760 69 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 i-p.....................:initfor
45780 6d 20 6e 69 6c 29 0a 20 20 20 28 73 74 61 72 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 m.nil)....(stars................
457a0 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 77 61 74 63 68 65 72 ......:initform.nil)....(watcher
457c0 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 s...................:initform.ni
457e0 6c 29 0a 20 20 20 28 61 73 73 69 67 6e 65 65 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l)....(assignees................
45800 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 61 73 73 69 67 6e 65 65 29 0a 20 20 20 28 66 6f ..:closql-table.assignee)....(fo
45820 72 6b 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c rks......................:closql
45840 2d 74 61 62 6c 65 20 66 6f 72 6b 29 0a 20 20 20 28 69 73 73 75 65 73 20 20 20 20 20 20 20 20 20 -table.fork)....(issues.........
45860 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 63 6c 61 73 73 20 66 6f 72 67 65 2d ............:closql-class.forge-
45880 69 73 73 75 65 29 0a 20 20 20 28 6c 61 62 65 6c 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 issue)....(labels...............
458a0 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 6c 61 62 65 6c 29 0a 20 20 20 28 70 ......:closql-table.label)....(p
458c0 75 6c 6c 72 65 71 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 ullreqs...................:closq
458e0 6c 2d 63 6c 61 73 73 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 20 20 20 28 72 65 76 6e 6f l-class.forge-pullreq)....(revno
45900 74 65 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 63 6c tes...................:closql-cl
45920 61 73 73 20 66 6f 72 67 65 2d 72 65 76 6e 6f 74 65 29 0a 20 20 20 28 73 65 6c 65 63 74 69 76 65 ass.forge-revnote)....(selective
45940 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 -p................:initform.nil)
45960 0a 20 20 20 28 77 6f 72 6b 74 72 65 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(worktree...................
45980 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 6d 69 6c 65 73 74 6f 6e 65 73 20 20 20 :initform.nil)....(milestones...
459a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 6d 69 6c 65 ..............:closql-table.mile
459c0 73 74 6f 6e 65 29 0a 20 20 20 28 69 73 73 75 65 73 2d 75 6e 74 69 6c 20 20 20 20 20 20 20 20 20 stone)....(issues-until.........
459e0 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 ......:initform.nil)....(pullreq
45a00 73 2d 75 6e 74 69 6c 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 s-until.............:initform.ni
45a20 6c 29 0a 20 20 20 28 74 65 61 6d 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l)....(teams....................
45a40 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 2d ..:initform.nil)....(discussion-
45a60 63 61 74 65 67 6f 72 69 65 73 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 64 69 categories......:closql-table.di
45a80 73 63 75 73 73 69 6f 6e 2d 63 61 74 65 67 6f 72 79 29 0a 20 20 20 28 64 69 73 63 75 73 73 69 6f scussion-category)....(discussio
45aa0 6e 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 63 6c 61 73 73 20 ns................:closql-class.
45ac0 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e forge-discussion)....(discussion
45ae0 73 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a s-p..............:initform.nil).
45b00 20 20 20 28 64 69 73 63 75 73 73 69 6f 6e 73 2d 75 6e 74 69 6c 20 20 20 20 20 20 20 20 20 20 3a ...(discussions-until..........:
45b20 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 29 0a 20 20 3a 61 62 73 74 72 61 63 74 20 74 29 0a 0a 28 initform.nil))...:abstract.t)..(
45b40 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 75 6e 75 73 65 64 61 70 69 2d 72 65 70 6f 73 69 74 defclass.forge-unusedapi-reposit
45b60 6f 72 79 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 28 29 20 3a 61 62 73 74 72 ory.(forge-repository).().:abstr
45b80 61 63 74 20 74 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 6e 6f 61 70 69 2d 72 65 act.t)..(defclass.forge-noapi-re
45ba0 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 28 29 20 3a pository.(forge-repository).().:
45bc0 61 62 73 74 72 61 63 74 20 74 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 73 6c 6f 74 2d abstract.t)..(cl-defmethod.slot-
45be0 6d 69 73 73 69 6e 67 20 28 28 6f 62 6a 65 63 74 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 missing.((object.forge-repositor
45c00 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 y).............................s
45c20 6c 6f 74 2d 6e 61 6d 65 20 6f 70 65 72 61 74 69 6f 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 5f 6e 65 lot-name.operation.&optional._ne
45c40 77 2d 76 61 6c 75 65 29 0a 20 20 28 69 66 20 28 61 6e 64 20 28 65 71 20 6f 70 65 72 61 74 69 6f w-value)...(if.(and.(eq.operatio
45c60 6e 20 27 6f 72 65 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 73 6c 6f 74 2d 6e 61 6d n.'oref)............(eq.slot-nam
45c80 65 20 27 73 6c 75 67 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 6f 72 65 66 20 6f 62 e.'slug)).......(concat.(oref.ob
45ca0 6a 65 63 74 20 6f 77 6e 65 72 29 20 22 2f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f ject.owner)."/"...............(o
45cc0 72 65 66 20 6f 62 6a 65 63 74 20 6e 61 6d 65 29 29 0a 20 20 20 20 28 63 6c 2d 63 61 6c 6c 2d 6e ref.object.name)).....(cl-call-n
45ce0 65 78 74 2d 6d 65 74 68 6f 64 29 29 29 0a 0a 3b 3b 3b 20 51 75 65 72 79 0a 3b 3b 3b 3b 20 47 65 ext-method)))..;;;.Query.;;;;.Ge
45d00 74 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 72 65 t..(defvar-local.forge-buffer-re
45d20 70 6f 73 69 74 6f 72 79 20 6e 69 6c 29 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 62 75 66 66 65 72 pository.nil).(put.'forge-buffer
45d40 2d 72 65 70 6f 73 69 74 6f 72 79 20 27 70 65 72 6d 61 6e 65 6e 74 2d 6c 6f 63 61 6c 20 74 29 0a -repository.'permanent-local.t).
45d60 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 75 6e 61 73 .(defvar-local.forge-buffer-unas
45d80 73 6f 63 69 61 74 65 64 2d 70 20 6e 69 6c 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 66 6f 72 67 65 sociated-p.nil)..(defconst.forge
45da0 2d 2d 73 69 67 6e 61 6c 2d 6e 6f 2d 65 6e 74 72 79 20 27 28 3a 74 72 61 63 6b 65 64 20 3a 73 74 --signal-no-entry.'(:tracked.:st
45dc0 75 62 20 3a 69 6e 73 65 72 74 21 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 65 74 ub.:insert!))..(defun.forge--get
45de0 2d 72 65 6d 6f 74 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 77 61 72 6e 20 69 67 6e 6f 72 65 2d 76 -remote.(&optional.warn.ignore-v
45e00 61 72 69 61 62 6c 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 6d 6f 74 65 73 20 28 6d 61 67 69 ariable)...(let*.((remotes.(magi
45e20 74 2d 6c 69 73 74 2d 72 65 6d 6f 74 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e 66 69 t-list-remotes))..........(confi
45e40 67 20 28 61 6e 64 20 28 6e 6f 74 20 69 67 6e 6f 72 65 2d 76 61 72 69 61 62 6c 65 29 0a 20 20 20 g.(and.(not.ignore-variable)....
45e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 65 74 20 22 66 ...................(magit-get."f
45e80 6f 72 67 65 2e 72 65 6d 6f 74 65 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 74 65 orge.remote")))..........(remote
45ea0 20 28 69 66 20 28 63 64 72 20 72 65 6d 6f 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .(if.(cdr.remotes)..............
45ec0 20 20 20 20 20 20 20 20 28 6f 72 20 28 63 61 72 20 28 6d 65 6d 62 65 72 20 63 6f 6e 66 69 67 20 ........(or.(car.(member.config.
45ee0 72 65 6d 6f 74 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 remotes)).......................
45f00 20 20 20 28 63 61 72 20 28 6d 65 6d 62 65 72 20 22 75 70 73 74 72 65 61 6d 22 20 72 65 6d 6f 74 ...(car.(member."upstream".remot
45f20 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 es))..........................(c
45f40 61 72 20 28 6d 65 6d 62 65 72 20 22 6f 72 69 67 69 6e 22 20 72 65 6d 6f 74 65 73 29 29 29 0a 20 ar.(member."origin".remotes)))..
45f60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 72 20 72 65 6d 6f 74 65 73 29 29 ..................(car.remotes))
45f80 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 77 61 72 6e 20 63 6f 6e 66 69 67 20 72 65 )).....(when.(and.warn.config.re
45fa0 6d 6f 74 65 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 63 6f 6e 66 69 67 20 72 65 6d 6f 74 65 29 29 mote.(not.(equal.config.remote))
45fc0 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 49 67 6e 6f 72 65 64 20 66 6f 72 67 65 2e ).......(message."Ignored.forge.
45fe0 72 65 6d 6f 74 65 3d 25 73 3b 20 6e 6f 20 73 75 63 68 20 72 65 6d 6f 74 65 2e 5c 6e 53 65 65 20 remote=%s;.no.such.remote.\nSee.
46000 25 73 2e 22 20 63 6f 6e 66 69 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 68 74 74 70 %s.".config................"http
46020 73 3a 2f 2f 6d 61 67 69 74 2e 76 63 2f 6d 61 6e 75 61 6c 2f 66 6f 72 67 65 2f 48 6f 77 2d 46 6f s://magit.vc/manual/forge/How-Fo
46040 72 67 65 2d 44 65 74 65 63 74 69 6f 6e 2d 57 6f 72 6b 73 2e 68 74 6d 6c 22 29 29 0a 20 20 20 20 rge-Detection-Works.html")).....
46060 72 65 6d 6f 74 65 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 remote))..(cl-defmethod.forge-ge
46080 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 28 5f 28 65 71 6c 20 3a 69 64 29 29 20 69 64 29 0a 20 t-repository.((_(eql.:id)).id)..
460a0 20 28 63 6c 6f 73 71 6c 2d 67 65 74 20 28 66 6f 72 67 65 2d 64 62 29 20 28 73 75 62 73 74 72 69 .(closql-get.(forge-db).(substri
460c0 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 69 64 29 20 27 66 6f 72 67 65 2d 72 65 70 6f ng-no-properties.id).'forge-repo
460e0 73 69 74 6f 72 79 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 sitory))..(cl-defmethod.forge-ge
46100 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 28 5f 28 65 71 6c 20 3a 64 69 72 29 29 20 64 69 72 29 t-repository.((_(eql.:dir)).dir)
46120 0a 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 29 ...(let.((default-directory.dir)
46140 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 .........(forge-buffer-repositor
46160 79 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 y.nil).........(forge-buffer-top
46180 69 63 20 6e 69 6c 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f ic.nil)).....(forge-get-reposito
461a0 72 79 20 3a 73 74 75 62 3f 20 6e 69 6c 20 27 6e 6f 74 61 74 70 74 29 29 29 0a 0a 28 63 6c 2d 64 ry.:stub?.nil.'notatpt)))..(cl-d
461c0 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 28 efmethod.forge-get-repository.((
461e0 64 65 6d 61 6e 64 20 73 79 6d 62 6f 6c 29 20 26 6f 70 74 69 6f 6e 61 6c 20 72 65 6d 6f 74 65 20 demand.symbol).&optional.remote.
46200 6e 6f 74 61 74 70 74 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 notatpt)..."Return.the.current.f
46220 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a 46 69 72 73 74 20 63 68 65 63 6b 20 69 66 orge.repository...First.check.if
46240 20 60 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 27 2c 20 6f 72 20 69 .`forge-buffer-repository',.or.i
46260 66 20 74 68 61 74 20 69 73 20 6e 69 6c 2c 20 74 68 65 6e 0a 74 68 65 20 72 65 70 6f 73 69 74 6f f.that.is.nil,.then.the.reposito
46280 72 79 20 66 6f 72 20 60 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 27 2c 20 73 61 74 ry.for.`forge-buffer-topic',.sat
462a0 69 73 66 69 65 73 20 44 45 4d 41 4e 44 2e 20 20 49 66 20 73 6f 2c 0a 74 68 65 6e 20 72 65 74 75 isfies.DEMAND...If.so,.then.retu
462c0 72 6e 20 74 68 61 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a 4f 74 68 65 72 77 69 73 65 20 72 rn.that.repository...Otherwise.r
462e0 65 74 75 72 6e 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 66 6f 72 20 60 64 65 66 61 75 6c eturn.the.repository.for.`defaul
46300 74 2d 64 69 72 65 63 74 6f 72 79 27 2c 20 69 66 20 74 68 61 74 0a 65 78 69 73 74 73 20 61 6e 64 t-directory',.if.that.exists.and
46320 20 73 61 74 69 73 66 69 65 73 20 44 45 4d 41 4e 44 2e 20 20 49 66 20 74 68 61 74 20 66 61 69 6c .satisfies.DEMAND...If.that.fail
46340 73 20 74 6f 6f 2c 20 74 68 65 6e 20 72 65 74 75 72 6e 20 6e 69 6c 0a 6f 72 20 73 69 67 6e 61 6c s.too,.then.return.nil.or.signal
46360 20 61 6e 20 65 72 72 6f 72 2c 20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 44 45 4d 41 4e 44 2e 22 .an.error,.depending.on.DEMAND."
46380 0a 20 20 28 6f 72 20 28 61 6e 64 2d 6c 65 74 20 28 28 5f 28 6e 6f 74 20 6e 6f 74 61 74 70 74 29 ...(or.(and-let.((_(not.notatpt)
463a0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 72 ).................(repo.(forge-r
463c0 65 70 6f 73 69 74 6f 72 79 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 epository-at-point))).........(f
463e0 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 27 6e 6f 65 72 72 6f orge-get-repository.repo.'noerro
46400 72 20 64 65 6d 61 6e 64 29 29 0a 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 5f 28 6e 6f r.demand)).......(and-let.((_(no
46420 74 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f t.remote)).................(repo
46440 20 28 6f 72 20 28 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 .(or.(forge-buffer-repository)..
46460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 66 6f .........................(and.fo
46480 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rge-buffer-topic................
464a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 ................(forge-get-repos
464c0 69 74 6f 72 79 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 29 29 29 29 0a 20 20 itory.forge-buffer-topic)))))...
464e0 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f ......(forge-get-repository.repo
46500 20 27 6e 6f 65 72 72 6f 72 20 64 65 6d 61 6e 64 29 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d .'noerror.demand)).......(magit-
46520 2d 77 69 74 68 2d 72 65 66 72 65 73 68 2d 63 61 63 68 65 0a 20 20 20 20 20 20 20 20 20 20 28 6c -with-refresh-cache...........(l
46540 69 73 74 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 27 66 6f 72 67 65 2d 67 65 74 ist.default-directory.'forge-get
46560 2d 72 65 70 6f 73 69 74 6f 72 79 20 64 65 6d 61 6e 64 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e -repository.demand).........(con
46580 64 2d 6c 65 74 0a 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 6d 61 67 69 74 2d 67 69 74 d-let...........((not.(magit-git
465a0 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6d 65 6d 71 20 64 65 6d dir))............(when.(memq.dem
465c0 61 6e 64 20 66 6f 72 67 65 2d 2d 73 69 67 6e 61 6c 2d 6e 6f 2d 65 6e 74 72 79 29 0a 20 20 20 20 and.forge--signal-no-entry).....
465e0 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 43 .........(error..............."C
46600 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 46 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 annot.determine.Forge.repository
46620 20 6f 75 74 73 69 64 65 20 6f 66 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 22 29 29 29 0a 20 .outside.of.Git.repository")))..
46640 20 20 20 20 20 20 20 20 20 5b 5b 72 65 6d 6f 74 65 20 28 6f 72 20 72 65 6d 6f 74 65 20 28 66 6f .........[[remote.(or.remote.(fo
46660 72 67 65 2d 2d 67 65 74 2d 72 65 6d 6f 74 65 20 27 77 61 72 6e 29 29 5d 5d 0a 20 20 20 20 20 20 rge--get-remote.'warn))]].......
46680 20 20 20 20 28 5b 5f 20 72 65 6d 6f 74 65 5d 0a 20 20 20 20 20 20 20 20 20 20 20 5b 75 72 6c 20 ....([_.remote]............[url.
466a0 28 6d 61 67 69 74 2d 67 69 74 2d 73 74 72 69 6e 67 20 22 72 65 6d 6f 74 65 22 20 22 67 65 74 2d (magit-git-string."remote"."get-
466c0 75 72 6c 22 20 72 65 6d 6f 74 65 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 24 20 28 url".remote)]............(and$.(
466e0 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 75 72 6c 20 72 65 6d 6f 74 65 20 forge-get-repository.url.remote.
46700 64 65 6d 61 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 31 20 demand)..................(prog1.
46720 24 20 28 6f 73 65 74 20 24 20 77 6f 72 6b 74 72 65 65 20 28 6d 61 67 69 74 2d 74 6f 70 6c 65 76 $.(oset.$.worktree.(magit-toplev
46740 65 6c 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 6d 65 6d 71 20 64 65 6d 61 6e 64 20 el)))))...........((memq.demand.
46760 66 6f 72 67 65 2d 2d 73 69 67 6e 61 6c 2d 6e 6f 2d 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 forge--signal-no-entry).........
46780 20 20 20 28 65 72 72 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 43 61 6e 6e 6f 74 20 64 65 ...(error............."Cannot.de
467a0 74 65 72 6d 69 6e 65 20 66 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 25 73 5c 6e 53 termine.forge.repository...%s\nS
467c0 65 65 20 25 73 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 72 65 6d 6f 74 ee.%s.".............(cond.(remot
467e0 65 20 28 66 6f 72 6d 61 74 20 22 4e 6f 20 75 72 6c 20 63 6f 6e 66 69 67 75 72 65 64 20 66 6f 72 e.(format."No.url.configured.for
46800 20 25 53 2e 22 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .%S.".remote))..................
46820 20 28 28 61 6e 64 24 20 28 6d 61 67 69 74 2d 67 65 74 20 22 66 6f 72 67 65 2e 72 65 6d 6f 74 65 .((and$.(magit-get."forge.remote
46840 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 ")..........................(for
46860 6d 61 74 20 22 56 61 6c 75 65 20 6f 66 20 60 66 6f 72 67 65 2e 72 65 6d 6f 74 65 27 20 69 73 20 mat."Value.of.`forge.remote'.is.
46880 25 53 20 62 75 74 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 %S.but.%s"......................
468a0 20 20 20 20 20 20 20 20 20 20 20 20 24 20 22 74 68 61 74 20 72 65 6d 6f 74 65 20 64 6f 65 73 20 ............$."that.remote.does.
468c0 6e 6f 74 20 65 78 69 73 74 2e 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 not.exist.")))..................
468e0 20 28 28 6d 61 67 69 74 2d 6c 69 73 74 2d 72 65 6d 6f 74 65 73 29 20 22 43 61 6e 6e 6f 74 20 64 .((magit-list-remotes)."Cannot.d
46900 65 63 69 64 65 20 6f 6e 20 72 65 6d 6f 74 65 20 74 6f 20 75 73 65 2e 22 29 0a 20 20 20 20 20 20 ecide.on.remote.to.use.").......
46920 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 22 4e 6f 20 72 65 6d 6f 74 65 20 63 6f 6e 66 69 67 ............(t."No.remote.config
46940 75 72 65 64 2e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 68 74 74 70 73 3a 2f 2f 6d 61 ured."))............."https://ma
46960 67 69 74 2e 76 63 2f 6d 61 6e 75 61 6c 2f 66 6f 72 67 65 2f 48 6f 77 2d 46 6f 72 67 65 2d 44 65 git.vc/manual/forge/How-Forge-De
46980 74 65 63 74 69 6f 6e 2d 57 6f 72 6b 73 2e 68 74 6d 6c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 tection-Works.html".............
469a0 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d ))))))..(cl-defmethod.forge-get-
469c0 72 65 70 6f 73 69 74 6f 72 79 20 28 28 75 72 6c 20 73 74 72 69 6e 67 29 20 26 6f 70 74 69 6f 6e repository.((url.string).&option
469e0 61 6c 20 72 65 6d 6f 74 65 20 64 65 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 al.remote.demand)..."Return.the.
46a00 72 65 70 6f 73 69 74 6f 72 79 20 61 74 20 55 52 4c 2e 22 0a 20 20 28 63 6f 6e 64 2d 6c 65 74 0a repository.at.URL."...(cond-let.
46a20 20 20 20 20 28 5b 70 61 72 74 73 20 28 66 6f 72 67 65 2d 2d 73 70 6c 69 74 2d 66 6f 72 67 65 2d ....([parts.(forge--split-forge-
46a40 75 72 6c 20 75 72 6c 29 5d 0a 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 url.url)]......(forge-get-reposi
46a60 74 6f 72 79 20 70 61 72 74 73 20 72 65 6d 6f 74 65 20 28 6f 72 20 64 65 6d 61 6e 64 20 3a 6b 6e tory.parts.remote.(or.demand.:kn
46a80 6f 77 6e 3f 29 29 29 0a 20 20 20 20 28 28 6d 65 6d 71 20 64 65 6d 61 6e 64 20 66 6f 72 67 65 2d own?))).....((memq.demand.forge-
46aa0 2d 73 69 67 6e 61 6c 2d 6e 6f 2d 65 6e 74 72 79 29 0a 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 -signal-no-entry)......(error."C
46ac0 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 66 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 annot.determine.forge.repository
46ae0 2e 20 20 25 73 20 69 73 6e 27 74 20 61 20 66 6f 72 67 65 20 55 52 4c 2e 20 20 25 73 22 0a 20 20 ...%s.isn't.a.forge.URL...%s"...
46b00 20 20 20 20 20 20 20 20 20 20 75 72 6c 20 22 59 6f 75 20 6d 69 67 68 74 20 68 61 76 65 20 74 6f ..........url."You.might.have.to
46b20 20 63 75 73 74 6f 6d 69 7a 65 20 60 66 6f 72 67 65 2d 61 6c 69 73 74 27 2e 22 29 29 29 29 0a 0a .customize.`forge-alist'."))))..
46b40 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f (cl-defmethod.forge-get-reposito
46b60 72 79 20 28 28 28 68 6f 73 74 20 6f 77 6e 65 72 20 6e 61 6d 65 29 20 6c 69 73 74 29 0a 20 20 20 ry.(((host.owner.name).list)....
46b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
46ba0 20 26 6f 70 74 69 6f 6e 61 6c 20 72 65 6d 6f 74 65 20 64 65 6d 61 6e 64 29 0a 20 20 22 28 28 48 .&optional.remote.demand)..."((H
46bc0 4f 53 54 20 4f 57 4e 45 52 20 4e 41 4d 45 29 20 26 6f 70 74 69 6f 6e 61 6c 20 52 45 4d 4f 54 45 OST.OWNER.NAME).&optional.REMOTE
46be0 20 44 45 4d 41 4e 44 29 0a 0a 52 65 74 75 72 6e 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 .DEMAND)..Return.the.repository.
46c00 69 64 65 6e 74 69 66 69 65 64 20 62 79 20 48 4f 53 54 2c 20 4f 57 4e 45 52 20 61 6e 64 20 4e 41 identified.by.HOST,.OWNER.and.NA
46c20 4d 45 2e 0a 53 65 65 20 60 66 6f 72 67 65 2d 61 6c 69 73 74 27 20 66 6f 72 20 76 61 6c 69 64 20 ME..See.`forge-alist'.for.valid.
46c40 47 69 74 20 68 6f 73 74 73 2e 22 0a 20 20 28 73 65 74 71 20 68 6f 73 74 20 20 28 73 75 62 73 74 Git.hosts."...(setq.host..(subst
46c60 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 68 6f 73 74 29 29 0a 20 20 28 73 65 74 ring-no-properties.host))...(set
46c80 71 20 6f 77 6e 65 72 20 28 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 q.owner.(substring-no-properties
46ca0 20 6f 77 6e 65 72 29 29 0a 20 20 28 73 65 74 71 20 6e 61 6d 65 20 20 28 73 75 62 73 74 72 69 6e .owner))...(setq.name..(substrin
46cc0 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 6e 61 6d 65 29 29 0a 20 20 28 63 6f 6e 64 2d 6c g-no-properties.name))...(cond-l
46ce0 65 74 0a 20 20 20 20 28 28 6d 65 6d 71 20 64 65 6d 61 6e 64 20 27 28 3a 74 72 61 63 6b 65 64 20 et.....((memq.demand.'(:tracked.
46d00 3a 74 72 61 63 6b 65 64 3f 20 3a 6b 6e 6f 77 6e 3f 20 3a 69 6e 73 65 72 74 21 20 3a 76 61 6c 69 :tracked?.:known?.:insert!.:vali
46d20 64 3f 20 3a 73 74 75 62 20 3a 73 74 75 62 3f 29 29 29 0a 20 20 20 20 28 5b 63 6f 72 72 65 63 74 d?.:stub.:stub?))).....([correct
46d40 65 64 20 28 70 63 61 73 65 20 64 65 6d 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ed.(pcase.demand................
46d60 20 20 20 28 27 74 20 20 20 20 20 20 3a 74 72 61 63 6b 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 ...('t......:tracked)...........
46d80 20 20 20 20 20 20 20 20 28 27 66 75 6c 6c 20 20 20 3a 74 72 61 63 6b 65 64 3f 29 0a 20 20 20 20 ........('full...:tracked?).....
46da0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 6e 69 6c 20 20 20 20 3a 6b 6e 6f 77 6e 3f 29 0a ..............('nil....:known?).
46dc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 63 72 65 61 74 65 20 3a 69 6e 73 65 ..................('create.:inse
46de0 72 74 21 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 73 74 75 62 20 20 20 rt!)...................('stub...
46e00 3a 73 74 75 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 6d 61 79 62 65 :stub)...................('maybe
46e20 20 20 3a 73 74 75 62 3f 29 29 5d 0a 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 4f 62 73 6f 6c ..:stub?))]......(message."Obsol
46e40 65 74 65 20 76 61 6c 75 65 20 66 6f 72 20 60 25 73 27 73 20 44 45 4d 41 4e 44 3a 20 60 25 73 27 ete.value.for.`%s's.DEMAND:.`%s'
46e60 3b 20 75 73 65 20 60 25 73 27 20 69 6e 73 74 65 61 64 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 ;.use.`%s'.instead".............
46e80 20 20 27 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 64 65 6d 61 6e 64 20 63 ..'forge-get-repository.demand.c
46ea0 6f 72 72 65 63 74 65 64 29 0a 20 20 20 20 20 28 73 65 74 71 20 64 65 6d 61 6e 64 20 63 6f 72 72 orrected)......(setq.demand.corr
46ec0 65 63 74 65 64 29 29 0a 20 20 20 20 28 28 65 72 72 6f 72 20 22 55 6e 6b 6e 6f 77 6e 20 76 61 6c ected)).....((error."Unknown.val
46ee0 75 65 20 66 6f 72 20 60 25 73 27 73 20 44 45 4d 41 4e 44 3a 20 60 25 73 27 22 0a 20 20 20 20 20 ue.for.`%s's.DEMAND:.`%s'"......
46f00 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 64 65 6d .......'forge-get-repository.dem
46f20 61 6e 64 29 29 29 0a 20 20 28 63 6f 6e 64 2d 6c 65 74 0a 20 20 20 20 28 5b 73 70 65 63 20 28 66 and)))...(cond-let.....([spec.(f
46f40 6f 72 67 65 2d 2d 67 65 74 2d 66 6f 72 67 65 2d 68 6f 73 74 20 68 6f 73 74 20 74 29 5d 0a 20 20 orge--get-forge-host.host.t)]...
46f60 20 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 60 ...(pcase-let*..........;;.The.`
46f80 77 65 62 68 6f 73 74 27 20 69 73 20 75 73 65 64 20 74 6f 20 69 64 65 6e 74 69 66 79 20 74 68 65 webhost'.is.used.to.identify.the
46fa0 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 66 6f 72 67 65 2e 0a 20 20 20 20 20 20 20 20 20 3b .corresponding.forge...........;
46fc0 3b 20 46 6f 72 20 74 68 61 74 20 72 65 61 73 6f 6e 20 69 74 20 69 73 20 73 74 6f 72 65 64 20 69 ;.For.that.reason.it.is.stored.i
46fe0 6e 20 74 68 65 20 60 66 6f 72 67 65 27 20 73 6c 6f 74 2e 20 20 54 68 65 20 69 64 0a 20 20 20 20 n.the.`forge'.slot...The.id.....
47000 20 20 20 20 20 3b 3b 20 73 74 6f 72 65 64 20 69 6e 20 74 68 65 20 60 69 64 27 20 73 6c 6f 74 20 .....;;.stored.in.the.`id'.slot.
47020 61 6c 73 6f 20 64 65 72 69 76 65 73 20 66 72 6f 6d 20 74 68 61 74 20 76 61 6c 75 65 2e 0a 20 20 also.derives.from.that.value....
47040 20 20 20 20 20 20 20 28 28 60 28 2c 67 69 74 68 6f 73 74 20 2c 61 70 69 68 6f 73 74 20 2c 77 65 .......((`(,githost.,apihost.,we
47060 62 68 6f 73 74 20 2c 63 6c 61 73 73 29 20 73 70 65 63 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 bhost.,class).spec)...........(r
47080 6f 77 20 28 63 61 72 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 2a 20 3a 66 ow.(car.(forge-sql.[:select.*.:f
470a0 72 6f 6d 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rom.repository..................
470c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 66 6f ...............:where.(and.(=.fo
470e0 72 67 65 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rge.$s1)........................
47100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 6f 77 6e 65 72 20 24 73 .....................(=.owner.$s
47120 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2)..............................
47140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 6e 61 6d 65 20 20 24 73 33 29 29 5d 0a 20 ...............(=.name..$s3))]..
47160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 65 ..............................we
47180 62 68 6f 73 74 20 6f 77 6e 65 72 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6f bhost.owner.name)))...........(o
471a0 62 6a 20 28 61 6e 64 20 72 6f 77 20 28 63 6c 6f 73 71 6c 2d 2d 72 65 6d 61 6b 65 2d 69 6e 73 74 bj.(and.row.(closql--remake-inst
471c0 61 6e 63 65 20 63 6c 61 73 73 20 28 66 6f 72 67 65 2d 64 62 29 20 72 6f 77 29 29 29 29 0a 20 20 ance.class.(forge-db).row))))...
471e0 20 20 20 20 20 3b 3b 20 53 79 6e 63 68 72 6f 6e 69 7a 65 20 74 68 65 20 6f 62 6a 65 63 74 20 77 .....;;.Synchronize.the.object.w
47200 69 74 68 20 74 68 65 20 65 6e 74 72 79 20 66 72 6f 6d 20 60 66 6f 72 67 65 2d 61 6c 69 73 74 27 ith.the.entry.from.`forge-alist'
47220 2e 0a 20 20 20 20 20 20 20 3b 3b 20 54 68 69 73 20 6f 6e 6c 79 20 68 61 73 20 61 6e 20 65 66 66 .........;;.This.only.has.an.eff
47240 65 63 74 20 69 66 20 74 68 65 20 65 6e 74 72 79 20 77 61 73 20 6d 6f 64 69 66 69 65 64 2c 20 77 ect.if.the.entry.was.modified,.w
47260 68 69 63 68 0a 20 20 20 20 20 20 20 3b 3b 20 73 68 6f 75 6c 64 20 72 61 72 65 6c 79 2c 20 69 66 hich........;;.should.rarely,.if
47280 20 65 76 65 72 2c 20 68 61 70 70 65 6e 2e 20 20 41 76 6f 69 64 20 63 6f 6e 66 75 73 69 6f 6e 2c .ever,.happen...Avoid.confusion,
472a0 20 62 79 20 6e 6f 74 0a 20 20 20 20 20 20 20 3b 3b 20 6d 65 6e 74 69 6f 6e 69 6e 67 20 74 68 69 .by.not........;;.mentioning.thi
472c0 73 20 64 65 74 61 69 6c 20 69 6e 20 61 6e 79 20 64 6f 63 73 74 72 69 6e 67 2e 0a 20 20 20 20 20 s.detail.in.any.docstring.......
472e0 20 20 28 77 68 65 6e 20 6f 62 6a 0a 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 6f 62 6a 20 61 ..(when.obj..........(oset.obj.a
47300 70 69 68 6f 73 74 20 61 70 69 68 6f 73 74 29 0a 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 6f pihost.apihost)..........(oset.o
47320 62 6a 20 67 69 74 68 6f 73 74 20 67 69 74 68 6f 73 74 29 0a 20 20 20 20 20 20 20 20 20 28 6f 73 bj.githost.githost)..........(os
47340 65 74 20 6f 62 6a 20 72 65 6d 6f 74 65 20 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 28 et.obj.remote..remote))........(
47360 70 63 61 73 65 20 28 6c 69 73 74 20 64 65 6d 61 6e 64 20 28 61 6e 64 20 6f 62 6a 20 28 65 71 20 pcase.(list.demand.(and.obj.(eq.
47380 28 6f 72 65 66 20 6f 62 6a 20 63 6f 6e 64 69 74 69 6f 6e 29 20 3a 74 72 61 63 6b 65 64 29 29 29 (oref.obj.condition).:tracked)))
473a0 0a 20 20 20 20 20 20 20 20 20 28 60 28 3a 74 72 61 63 6b 65 64 3f 20 6e 69 6c 29 20 28 73 65 74 ..........(`(:tracked?.nil).(set
473c0 71 20 6f 62 6a 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 60 28 3a 74 72 61 63 6b 65 64 q.obj.nil))..........(`(:tracked
473e0 20 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 ..nil)...........(error."Cannot.
47400 75 73 65 20 60 25 73 27 20 69 6e 20 25 53 20 79 65 74 2e 5c 6e 25 73 22 0a 20 20 20 20 20 20 20 use.`%s'.in.%S.yet.\n%s"........
47420 20 20 20 20 20 20 20 20 20 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 28 6d 61 67 69 74 2d 74 6f ..........this-command.(magit-to
47440 70 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 55 73 65 20 60 4d plevel).................."Use.`M
47460 2d 78 20 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 27 20 62 65 66 6f 72 65 20 -x.forge-add-repository'.before.
47480 74 72 79 69 6e 67 20 61 67 61 69 6e 2e 22 29 29 29 0a 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 trying.again.")))........(when.(
474a0 61 6e 64 20 28 6d 65 6d 71 20 64 65 6d 61 6e 64 20 27 28 3a 69 6e 73 65 72 74 21 20 3a 76 61 6c and.(memq.demand.'(:insert!.:val
474c0 69 64 3f 20 3a 73 74 75 62 20 3a 73 74 75 62 3f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 id?.:stub.:stub?))..............
474e0 20 20 20 20 20 28 6e 6f 74 20 6f 62 6a 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d .....(not.obj))..........(pcase-
47500 6c 65 74 20 28 28 60 28 2c 69 64 20 2e 20 2c 66 6f 72 67 65 2d 69 64 29 0a 20 20 20 20 20 20 20 let.((`(,id...,forge-id)........
47520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 72 65 70 6f 73 69 74 6f 72 ...............(forge--repositor
47540 79 2d 69 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6c 61 y-ids........................cla
47560 73 73 20 77 65 62 68 6f 73 74 20 6f 77 6e 65 72 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 ss.webhost.owner.name...........
47580 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 64 65 6d 61 6e 64 20 27 28 3a 73 74 75 .............(memq.demand.'(:stu
475a0 62 20 3a 73 74 75 62 3f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 b.:stub?))......................
475c0 20 20 28 65 71 20 64 65 6d 61 6e 64 20 3a 76 61 6c 69 64 3f 29 29 29 29 0a 20 20 20 20 20 20 20 ..(eq.demand.:valid?))))........
475e0 20 20 20 20 28 69 66 20 28 6e 6f 74 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(if.(not.id)................
47600 3b 3b 20 60 3a 76 61 6c 69 64 3f 27 20 77 61 73 20 75 73 65 64 20 61 6e 64 20 69 74 20 74 75 72 ;;.`:valid?'.was.used.and.it.tur
47620 6e 65 64 20 6f 75 74 20 69 74 20 69 73 20 6e 6f 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ned.out.it.is.not...............
47640 20 20 28 73 65 74 71 20 6f 62 6a 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b ..(setq.obj.nil)..............;;
47660 20 54 68 65 20 72 65 70 6f 20 6d 69 67 68 74 20 68 61 76 65 20 62 65 65 6e 20 72 65 6e 61 6d 65 .The.repo.might.have.been.rename
47680 64 20 6f 6e 20 74 68 65 20 66 6f 72 67 65 2e 20 20 23 31 38 38 0a 20 20 20 20 20 20 20 20 20 20 d.on.the.forge...#188...........
476a0 20 20 20 28 75 6e 6c 65 73 73 20 28 73 65 74 71 20 6f 62 6a 20 28 66 6f 72 67 65 2d 67 65 74 2d ...(unless.(setq.obj.(forge-get-
476c0 72 65 70 6f 73 69 74 6f 72 79 20 3a 69 64 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 repository.:id.id)).............
476e0 20 20 20 28 73 65 74 71 20 6f 62 6a 20 28 66 75 6e 63 61 6c 6c 20 63 6c 61 73 73 0a 20 20 20 20 ...(setq.obj.(funcall.class.....
47700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 ..............................:i
47720 64 20 20 20 20 20 20 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d.......id......................
47740 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 6f 72 67 65 2d 69 64 20 66 6f 72 67 65 2d 69 64 0a .............:forge-id.forge-id.
47760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47780 20 20 3a 66 6f 72 67 65 20 20 20 20 77 65 62 68 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 ..:forge....webhost.............
477a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 77 6e 65 72 20 20 20 20 ......................:owner....
477c0 6f 77 6e 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 owner...........................
477e0 20 20 20 20 20 20 20 20 3a 6e 61 6d 65 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 ........:name.....name..........
47800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 70 69 68 6f 73 .........................:apihos
47820 74 20 20 61 70 69 68 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t..apihost......................
47840 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 67 69 74 68 6f 73 74 20 20 67 69 74 68 6f 73 74 0a 20 .............:githost..githost..
47860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47880 20 3a 72 65 6d 6f 74 65 20 20 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .:remote...remote)).............
478a0 20 20 20 28 77 68 65 6e 20 28 65 71 20 64 65 6d 61 6e 64 20 3a 69 6e 73 65 72 74 21 29 0a 20 20 ...(when.(eq.demand.:insert!)...
478c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 20 28 66 ...............(closql-insert.(f
478e0 6f 72 67 65 2d 64 62 29 20 6f 62 6a 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 orge-db).obj)..................(
47900 6f 73 65 74 20 6f 62 6a 20 63 6f 6e 64 69 74 69 6f 6e 20 3a 6b 6e 6f 77 6e 29 29 29 29 29 29 0a oset.obj.condition.:known)))))).
47920 20 20 20 20 20 20 20 6f 62 6a 29 29 0a 20 20 20 20 28 28 6d 65 6d 71 20 64 65 6d 61 6e 64 20 66 .......obj)).....((memq.demand.f
47940 6f 72 67 65 2d 2d 73 69 67 6e 61 6c 2d 6e 6f 2d 65 6e 74 72 79 29 0a 20 20 20 20 20 28 65 72 72 orge--signal-no-entry)......(err
47960 6f 72 20 22 43 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 66 6f 72 67 65 20 72 65 70 6f 73 or."Cannot.determine.forge.repos
47980 69 74 6f 72 79 2e 20 20 4e 6f 20 65 6e 74 72 79 20 66 6f 72 20 25 53 20 69 6e 20 25 73 22 0a 20 itory...No.entry.for.%S.in.%s"..
479a0 20 20 20 20 20 20 20 20 20 20 20 68 6f 73 74 20 27 66 6f 72 67 65 2d 61 6c 69 73 74 29 29 29 29 ...........host.'forge-alist))))
479c0 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 ..(cl-defmethod.forge-get-reposi
479e0 74 6f 72 79 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 tory.((repo.forge-repository)...
47a00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47a20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 6e 6f 65 72 72 6f 72 20 64 65 6d 61 6e 64 29 0a 20 20 28 73 ..&optional.noerror.demand)...(s
47a40 65 74 71 20 6e 6f 65 72 72 6f 72 20 28 61 6e 64 20 6e 6f 65 72 72 6f 72 20 74 29 29 0a 20 20 28 etq.noerror.(and.noerror.t))...(
47a60 77 69 74 68 2d 73 6c 6f 74 73 20 28 63 6f 6e 64 69 74 69 6f 6e 20 73 6c 75 67 29 20 72 65 70 6f with-slots.(condition.slug).repo
47a80 0a 20 20 20 20 28 63 6c 2d 73 79 6d 62 6f 6c 2d 6d 61 63 72 6f 6c 65 74 0a 20 20 20 20 20 20 20 .....(cl-symbol-macrolet........
47aa0 20 28 28 65 72 72 20 28 65 72 72 6f 72 20 22 52 65 71 75 65 73 74 65 64 20 25 73 20 66 6f 72 20 .((err.(error."Requested.%s.for.
47ac0 25 73 2c 20 62 75 74 20 69 73 20 25 73 22 20 64 65 6d 61 6e 64 20 73 6c 75 67 20 63 6f 6e 64 69 %s,.but.is.%s".demand.slug.condi
47ae0 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 28 6b 65 79 20 28 6c 69 73 74 20 28 6f 72 65 66 tion))..........(key.(list.(oref
47b00 20 72 65 70 6f 20 66 6f 72 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .repo.forge)....................
47b20 20 28 6f 72 65 66 20 72 65 70 6f 20 6f 77 6e 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .(oref.repo.owner)..............
47b40 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 .......(oref.repo.name))).......
47b60 20 20 20 28 69 6e 73 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 6b 65 ...(ins.(forge-get-repository.ke
47b80 79 20 6e 69 6c 20 3a 69 6e 73 65 72 74 21 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 20 28 y.nil.:insert!))..........(set.(
47ba0 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 6b 65 79 20 6e 69 6c 20 3a 76 61 forge-get-repository.key.nil.:va
47bc0 6c 69 64 3f 29 29 29 0a 20 20 20 20 20 20 28 70 63 61 73 65 2d 65 78 68 61 75 73 74 69 76 65 20 lid?))).......(pcase-exhaustive.
47be0 28 6c 69 73 74 20 64 65 6d 61 6e 64 20 63 6f 6e 64 69 74 69 6f 6e 20 6e 6f 65 72 72 6f 72 29 0a (list.demand.condition.noerror).
47c00 20 20 20 20 20 20 20 20 28 60 28 6e 69 6c 20 20 20 20 20 20 20 2c 5f 20 20 20 20 20 20 20 20 20 ........(`(nil.......,_.........
47c20 20 20 20 20 20 20 20 20 20 20 20 20 2c 5f 29 20 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 28 ............,_)..repo).........(
47c40 60 28 3a 74 72 61 63 6b 65 64 3f 20 3a 74 72 61 63 6b 65 64 20 20 20 20 20 20 20 20 20 20 20 20 `(:tracked?.:tracked............
47c60 20 20 20 2c 5f 29 20 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 28 60 28 3a 74 72 61 63 6b 65 ...,_)..repo).........(`(:tracke
47c80 64 3f 20 2c 5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 5f 29 20 20 20 d?.,_.....................,_)...
47ca0 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 28 60 28 3a 74 72 61 63 6b 65 64 20 20 3a 74 72 61 63 6b nil).........(`(:tracked..:track
47cc0 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 5f 29 20 20 72 65 70 6f 29 0a 20 20 20 20 ed...............,_)..repo).....
47ce0 20 20 20 20 28 60 28 3a 74 72 61 63 6b 65 64 20 20 2c 5f 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(`(:tracked..,_.............
47d00 20 20 20 20 20 20 20 20 20 74 29 20 20 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 28 60 28 3a 74 .........t)...nil).........(`(:t
47d20 72 61 63 6b 65 64 20 20 2c 5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 racked..,_....................ni
47d40 6c 29 20 20 20 65 72 72 29 0a 20 20 20 20 20 20 20 20 28 60 28 3a 6b 6e 6f 77 6e 3f 20 20 20 2c l)...err).........(`(:known?...,
47d60 28 6f 72 20 3a 74 72 61 63 6b 65 64 20 3a 6b 6e 6f 77 6e 29 20 20 2c 5f 29 20 20 72 65 70 6f 29 (or.:tracked.:known)..,_)..repo)
47d80 0a 20 20 20 20 20 20 20 20 28 60 28 3a 6b 6e 6f 77 6e 3f 20 20 20 2c 5f 20 20 20 20 20 20 20 20 .........(`(:known?...,_........
47da0 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 5f 29 20 20 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 .............,_)...nil).........
47dc0 28 60 28 3a 69 6e 73 65 72 74 21 20 20 2c 28 6f 72 20 3a 74 72 61 63 6b 65 64 20 3a 6b 6e 6f 77 (`(:insert!..,(or.:tracked.:know
47de0 6e 29 20 20 2c 5f 29 20 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 28 60 28 3a 69 6e 73 65 72 n)..,_)..repo).........(`(:inser
47e00 74 21 20 20 2c 5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 5f 29 20 20 t!..,_.....................,_)..
47e20 20 69 6e 73 29 0a 20 20 20 20 20 20 20 20 28 60 28 3a 76 61 6c 69 64 3f 20 20 20 2c 28 6f 72 20 .ins).........(`(:valid?...,(or.
47e40 3a 74 72 61 63 6b 65 64 20 3a 6b 6e 6f 77 6e 29 20 20 2c 5f 29 20 20 72 65 70 6f 29 0a 20 20 20 :tracked.:known)..,_)..repo)....
47e60 20 20 20 20 20 28 60 28 3a 76 61 6c 69 64 3f 20 20 20 2c 5f 20 20 20 20 20 20 20 20 20 20 20 20 .....(`(:valid?...,_............
47e80 20 20 20 20 20 20 20 20 20 2c 5f 29 20 20 20 73 65 74 29 0a 20 20 20 20 20 20 20 20 28 60 28 3a .........,_)...set).........(`(:
47ea0 73 74 75 62 3f 20 20 20 20 2c 5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 stub?....,_.....................
47ec0 2c 5f 29 20 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 28 60 28 3a 73 74 75 62 20 20 20 20 20 ,_)..repo).........(`(:stub.....
47ee0 2c 5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 5f 29 20 20 72 65 70 6f ,_.....................,_)..repo
47f00 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 72 )))))..(cl-defmethod.forge-get-r
47f20 65 70 6f 73 69 74 6f 72 79 20 28 28 5f 20 6e 75 6c 6c 29 20 26 6f 70 74 69 6f 6e 61 6c 20 6e 6f epository.((_.null).&optional.no
47f40 65 72 72 6f 72 20 64 65 6d 61 6e 64 29 0a 20 20 28 69 66 20 28 61 6e 64 20 28 6d 65 6d 71 20 64 error.demand)...(if.(and.(memq.d
47f60 65 6d 61 6e 64 20 27 28 3a 69 6e 73 65 72 74 21 20 3a 74 72 61 63 6b 65 64 20 3a 73 74 75 62 29 emand.'(:insert!.:tracked.:stub)
47f80 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 6e 6f 65 72 72 6f 72 29 29 0a 20 20 20 20 )............(not.noerror)).....
47fa0 20 20 28 65 72 72 6f 72 20 22 28 4d 61 79 62 65 20 72 65 70 6f 73 69 74 6f 72 79 29 20 69 73 20 ..(error."(Maybe.repository).is.
47fc0 6e 69 6c 3b 20 60 25 73 27 20 6e 6f 74 20 73 61 74 69 73 66 69 65 64 22 20 64 65 6d 61 6e 64 29 nil;.`%s'.not.satisfied".demand)
47fe0 0a 20 20 20 20 6e 69 6c 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 .....nil))..(defun.forge-reposit
48000 6f 72 79 2d 61 74 2d 70 6f 69 6e 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 6e 64 29 0a ory-at-point.(&optional.demand).
48020 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 61 74 20 70 6f 69 6e .."Return.the.repository.at.poin
48040 74 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 20 72 65 70 6f 73 69 74 6f 72 t..If.there.is.no.such.repositor
48060 79 20 61 6e 64 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 73 69 y.and.DEMAND.is.non-nil,.then.si
48080 67 6e 61 6c 0a 61 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 28 6d 61 67 69 74 2d 73 65 63 gnal.an.error."...(or.(magit-sec
480a0 74 69 6f 6e 2d 76 61 6c 75 65 2d 69 66 20 27 66 6f 72 67 65 2d 72 65 70 6f 29 0a 20 20 20 20 20 tion-value-if.'forge-repo)......
480c0 20 28 61 6e 64 2d 6c 65 74 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 61 .(and-let.((topic.(forge-topic-a
480e0 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 t-point))).........(forge-get-re
48100 70 6f 73 69 74 6f 72 79 20 74 6f 70 69 63 29 29 0a 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 20 pository.topic)).......(and-let.
48120 28 28 5f 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 ((_(derived-mode-p.'forge-reposi
48140 74 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tory-list-mode))................
48160 20 28 69 64 20 28 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 67 65 74 2d 69 64 29 29 29 0a 20 .(id.(tabulated-list-get-id)))..
48180 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 69 64 .......(forge-get-repository.:id
481a0 20 69 64 29 29 0a 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 5f 28 64 65 72 69 76 65 64 .id)).......(and-let.((_(derived
481c0 2d 6d 6f 64 65 2d 70 20 27 6d 61 67 69 74 2d 72 65 70 6f 6c 69 73 74 2d 6d 6f 64 65 29 29 0a 20 -mode-p.'magit-repolist-mode))..
481e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 20 28 74 61 62 75 6c 61 74 65 64 2d 6c ...............(dir.(tabulated-l
48200 69 73 74 2d 67 65 74 2d 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 ist-get-id))).........(forge-get
48220 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 64 69 72 20 64 69 72 29 29 0a 20 20 20 20 20 20 28 61 6e -repository.:dir.dir)).......(an
48240 64 20 64 65 6d 61 6e 64 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 20 72 65 70 6f 73 69 74 d.demand.(user-error."No.reposit
48260 6f 72 79 20 61 74 20 70 6f 69 6e 74 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d ory.at.point"))))..(defun.forge-
48280 2d 72 65 70 6f 2d 66 6f 72 2d 74 68 69 6e 67 61 74 70 74 20 28 29 0a 20 20 28 6f 72 20 28 6d 61 -repo-for-thingatpt.()...(or.(ma
482a0 67 69 74 2d 73 65 63 74 69 6f 6e 2d 76 61 6c 75 65 2d 69 66 20 27 66 6f 72 67 65 2d 72 65 70 6f git-section-value-if.'forge-repo
482c0 29 0a 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 74 6f 70 69 63 20 28 6d 61 67 69 74 2d ).......(and-let.((topic.(magit-
482e0 73 65 63 74 69 6f 6e 2d 76 61 6c 75 65 2d 69 66 20 27 28 69 73 73 75 65 20 70 75 6c 6c 72 65 71 section-value-if.'(issue.pullreq
48300 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f )))).........(forge-get-reposito
48320 72 79 20 74 6f 70 69 63 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 66 6f 72 67 65 ry.topic)).......(and.(not.forge
48340 2d 62 75 66 66 65 72 2d 75 6e 61 73 73 6f 63 69 61 74 65 64 2d 70 29 0a 20 20 20 20 20 20 20 20 -buffer-unassociated-p).........
48360 20 20 20 28 6f 72 20 28 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 29 ...(or.(forge-buffer-repository)
48380 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 ................(forge-get-repos
483a0 69 74 6f 72 79 20 3a 6b 6e 6f 77 6e 3f 20 6e 69 6c 20 27 6e 6f 74 61 74 70 74 29 29 29 29 29 0a itory.:known?.nil.'notatpt))))).
483c0 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 20 .(defun.forge-buffer-repository.
483e0 28 29 0a 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 69 64 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d ()...(and-let.((id.forge-buffer-
48400 72 65 70 6f 73 69 74 6f 72 79 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f repository)).....(forge-get-repo
48420 73 69 74 6f 72 79 20 3a 69 64 20 69 64 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 73 sitory.:id.id)))..(defun.forge-s
48440 65 74 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 29 0a 20 20 22 49 6e 69 74 69 et-buffer-repository.()..."Initi
48460 61 6c 69 7a 65 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 76 61 72 69 61 62 6c 65 20 60 66 6f 72 alize.the.value.of.variable.`for
48480 67 65 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 27 2e 22 0a 20 20 28 75 6e 6c 65 73 ge-buffer-repository'."...(unles
484a0 73 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 28 61 s.forge-buffer-repository.....(a
484c0 6e 64 24 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 6b 6e 6f 77 6e nd$.(forge-get-repository.:known
484e0 3f 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d ?)...........(setq.forge-buffer-
48500 72 65 70 6f 73 69 74 6f 72 79 20 28 6f 72 65 66 20 24 20 69 64 29 29 29 29 29 0a 0a 28 61 64 64 repository.(oref.$.id)))))..(add
48520 2d 68 6f 6f 6b 20 27 6d 61 67 69 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 23 27 66 6f 72 67 65 2d 73 -hook.'magit-mode-hook.#'forge-s
48540 65 74 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 0a 28 64 65 66 75 6e 20 66 6f et-buffer-repository)..(defun.fo
48560 72 67 65 2d 67 65 74 2d 77 6f 72 6b 74 72 65 65 20 28 72 65 70 6f 29 0a 20 20 22 56 61 6c 69 64 rge-get-worktree.(repo)..."Valid
48580 61 74 65 2c 20 72 65 6d 65 6d 62 65 72 20 61 6e 64 20 72 65 74 75 72 6e 20 61 20 77 6f 72 6b 74 ate,.remember.and.return.a.workt
485a0 72 65 65 20 66 6f 72 20 52 45 50 4f 2e 0a 49 66 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 ree.for.REPO..If.`default-direct
485c0 6f 72 79 27 20 69 73 20 77 69 74 68 69 6e 20 6f 6e 65 20 6f 66 20 52 45 50 4f 27 73 20 77 6f 72 ory'.is.within.one.of.REPO's.wor
485e0 6b 74 72 65 65 73 2c 20 72 65 63 6f 72 64 20 74 68 61 74 0a 6c 6f 63 61 74 69 6f 6e 20 69 6e 20 ktrees,.record.that.location.in.
48600 69 74 73 20 60 77 6f 72 6b 74 72 65 65 27 20 73 6c 6f 74 20 61 6e 64 20 72 65 74 75 72 6e 20 69 its.`worktree'.slot.and.return.i
48620 74 2e 20 20 4f 74 68 65 72 77 69 73 65 2c 20 69 66 20 61 20 77 6f 72 6b 74 72 65 65 0a 68 61 73 t...Otherwise,.if.a.worktree.has
48640 20 62 65 65 6e 20 72 65 63 6f 72 64 65 64 20 62 65 66 6f 72 65 2c 20 76 61 6c 69 64 61 74 65 20 .been.recorded.before,.validate.
48660 74 68 61 74 2e 20 20 49 66 20 69 74 20 73 74 69 6c 6c 20 69 73 20 61 20 77 6f 72 6b 74 72 65 65 that...If.it.still.is.a.worktree
48680 20 6f 66 0a 52 45 50 4f 2c 20 72 65 74 75 72 6e 20 69 74 2c 20 65 6c 73 65 20 73 65 74 20 74 68 .of.REPO,.return.it,.else.set.th
486a0 65 20 73 6c 6f 74 20 74 6f 20 6e 69 6c 20 61 6e 64 20 72 65 74 75 72 6e 20 6e 69 6c 2e 22 0a 20 e.slot.to.nil.and.return.nil."..
486c0 20 28 63 6f 6e 64 2d 6c 65 74 2a 0a 20 20 20 20 28 5b 5f 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 .(cond-let*.....([_(forge-reposi
486e0 74 6f 72 79 2d 65 71 75 61 6c 0a 20 20 20 20 20 20 20 20 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 tory-equal.........repo.(forge-g
48700 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 64 69 72 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 et-repository.:dir.default-direc
48720 74 6f 72 79 29 29 5d 0a 20 20 20 20 20 5b 63 75 72 72 65 6e 74 2d 74 72 65 65 20 28 6d 61 67 69 tory))]......[current-tree.(magi
48740 74 2d 74 6f 70 6c 65 76 65 6c 29 5d 0a 20 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 77 6f 72 t-toplevel)]......(oset.repo.wor
48760 6b 74 72 65 65 20 63 75 72 72 65 6e 74 2d 74 72 65 65 29 29 0a 20 20 20 20 28 5b 73 61 76 65 64 ktree.current-tree)).....([saved
48780 2d 74 72 65 65 20 28 6f 72 65 66 20 72 65 70 6f 20 77 6f 72 6b 74 72 65 65 29 5d 0a 20 20 20 20 -tree.(oref.repo.worktree)].....
487a0 20 5b 5f 28 66 69 6c 65 2d 61 63 63 65 73 73 69 62 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 .[_(file-accessible-directory-p.
487c0 73 61 76 65 64 2d 74 72 65 65 29 5d 0a 20 20 20 20 20 28 69 66 20 28 66 6f 72 67 65 2d 72 65 70 saved-tree)]......(if.(forge-rep
487e0 6f 73 69 74 6f 72 79 2d 65 71 75 61 6c 20 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 ository-equal.repo.(forge-get-re
48800 70 6f 73 69 74 6f 72 79 20 3a 64 69 72 20 73 61 76 65 64 2d 74 72 65 65 29 29 0a 20 20 20 20 20 pository.:dir.saved-tree))......
48820 20 20 20 20 73 61 76 65 64 2d 74 72 65 65 0a 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f ....saved-tree........(oset.repo
48840 20 77 6f 72 6b 74 72 65 65 20 6e 69 6c 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 4c 69 73 74 0a 0a 28 .worktree.nil)))))..;;;;.List..(
48860 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 72 65 70 6f 73 20 28 29 0a 20 20 28 6d 61 70 63 defun.forge--ls-repos.()...(mapc
48880 61 72 20 28 70 61 72 74 69 61 6c 20 23 27 63 6c 6f 73 71 6c 2d 2d 72 65 6d 61 6b 65 2d 69 6e 73 ar.(partial.#'closql--remake-ins
488a0 74 61 6e 63 65 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 64 tance.'forge-repository.(forge-d
488c0 62 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 b))...........(forge-sql.[:selec
488e0 74 20 2a 20 3a 66 72 6f 6d 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 t.*.:from.repository............
48900 20 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 61 73 63 20 6f 77 6e 65 72 ...........:order-by.[(asc.owner
48920 29 20 28 61 73 63 20 6e 61 6d 65 29 5d 5d 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d ).(asc.name)]])))..(defun.forge-
48940 2d 6c 73 2d 6f 77 6e 65 64 2d 72 65 70 6f 73 20 28 29 0a 20 20 28 6d 61 70 63 61 72 20 28 70 61 -ls-owned-repos.()...(mapcar.(pa
48960 72 74 69 61 6c 20 23 27 63 6c 6f 73 71 6c 2d 2d 72 65 6d 61 6b 65 2d 69 6e 73 74 61 6e 63 65 20 rtial.#'closql--remake-instance.
48980 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 64 62 29 29 0a 20 20 'forge-repository.(forge-db))...
489a0 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 2a 20 3a 66 ........(forge-sql.[:select.*.:f
489c0 72 6f 6d 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rom.repository..................
489e0 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 69 6e 20 6f 77 6e 65 72 20 24 76 31 29 0a .....:where.(and.(in.owner.$v1).
48a00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
48a20 20 20 28 6e 6f 74 20 28 69 6e 20 6e 61 6d 65 20 24 76 32 29 29 29 0a 20 20 20 20 20 20 20 20 20 ..(not.(in.name.$v2)))..........
48a40 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 61 73 63 20 6f 77 6e .............:order-by.[(asc.own
48a60 65 72 29 20 28 61 73 63 20 6e 61 6d 65 29 5d 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 er).(asc.name)]]................
48a80 20 20 20 20 20 20 28 76 63 6f 6e 63 61 74 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 66 6f 72 ......(vconcat.(mapcar.#'car.for
48aa0 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e 74 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ge-owned-accounts)).............
48ac0 20 20 20 20 20 20 20 20 20 28 76 63 6f 6e 63 61 74 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 69 67 .........(vconcat.forge-owned-ig
48ae0 6e 6f 72 65 64 29 29 29 29 0a 0a 3b 3b 3b 20 49 64 65 6e 74 69 74 79 0a 0a 28 64 65 66 75 6e 20 nored))))..;;;.Identity..(defun.
48b00 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 65 71 75 61 6c 20 28 72 65 70 6f 31 20 72 65 forge-repository-equal.(repo1.re
48b20 70 6f 32 29 0a 20 20 22 52 65 74 75 72 6e 20 74 20 69 66 20 52 45 50 4f 31 20 61 6e 64 20 52 45 po2)..."Return.t.if.REPO1.and.RE
48b40 50 4f 32 20 61 72 65 20 74 68 65 20 73 61 6d 65 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 52 45 50 PO2.are.the.same.repository..REP
48b60 4f 31 20 61 6e 64 2f 6f 72 20 52 45 50 4f 32 20 6d 61 79 20 61 6c 73 6f 20 62 65 20 6e 69 6c 2c O1.and/or.REPO2.may.also.be.nil,
48b80 20 69 6e 20 77 68 69 63 68 20 63 61 73 65 20 72 65 74 75 72 6e 20 6e 69 6c 2e 22 0a 20 20 28 61 .in.which.case.return.nil."...(a
48ba0 6e 64 20 72 65 70 6f 31 20 72 65 70 6f 32 0a 20 20 20 20 20 20 20 28 6f 72 20 28 65 71 75 61 6c nd.repo1.repo2........(or.(equal
48bc0 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 31 20 69 64 29 20 20 20 20 20 20 28 6f 72 65 66 ......(oref.repo1.id)......(oref
48be0 20 72 65 70 6f 32 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 75 .repo2.id))............(and.(equ
48c00 61 6c 20 28 6f 72 65 66 20 72 65 70 6f 31 20 67 69 74 68 6f 73 74 29 20 28 6f 72 65 66 20 72 65 al.(oref.repo1.githost).(oref.re
48c20 70 6f 32 20 67 69 74 68 6f 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 po2.githost)).................(e
48c40 71 75 61 6c 20 28 6f 72 65 66 20 72 65 70 6f 31 20 6f 77 6e 65 72 29 20 20 20 28 6f 72 65 66 20 qual.(oref.repo1.owner)...(oref.
48c60 72 65 70 6f 32 20 6f 77 6e 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 repo2.owner)).................(e
48c80 71 75 61 6c 20 28 6f 72 65 66 20 72 65 70 6f 31 20 6e 61 6d 65 29 20 20 20 20 28 6f 72 65 66 20 qual.(oref.repo1.name)....(oref.
48ca0 72 65 70 6f 32 20 6e 61 6d 65 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 repo2.name))))))..(cl-defmethod.
48cc0 66 6f 72 67 65 2d 2d 72 65 70 6f 73 69 74 6f 72 79 2d 69 64 73 20 28 28 63 6c 61 73 73 20 28 73 forge--repository-ids.((class.(s
48ce0 75 62 63 6c 61 73 73 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 0a 20 20 20 20 20 ubclass.forge-repository))......
48d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
48d20 68 6f 73 74 20 6f 77 6e 65 72 20 6e 61 6d 65 20 26 6f 70 74 69 6f 6e 61 6c 20 73 74 75 62 20 6e host.owner.name.&optional.stub.n
48d40 6f 65 72 72 6f 72 29 0a 20 20 22 52 65 74 75 72 6e 20 28 4f 55 52 2d 49 44 20 2e 20 54 48 45 49 oerror)..."Return.(OUR-ID...THEI
48d60 52 2d 49 44 29 20 6f 66 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 72 65 70 6f 73 69 74 6f 72 R-ID).of.the.specified.repositor
48d80 79 2e 0a 49 66 20 6f 70 74 69 6f 6e 61 6c 20 53 54 55 42 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 y..If.optional.STUB.is.non-nil,.
48da0 74 68 65 6e 20 74 68 65 20 49 44 73 20 61 72 65 20 6e 6f 74 20 67 75 61 72 61 6e 74 65 65 64 20 then.the.IDs.are.not.guaranteed.
48dc0 74 6f 0a 62 65 20 75 6e 69 71 75 65 2e 20 20 4f 74 68 65 72 77 69 73 65 20 74 68 69 73 20 6d 65 to.be.unique...Otherwise.this.me
48de0 74 68 6f 64 20 68 61 73 20 74 6f 20 6d 61 6b 65 20 61 6e 20 41 50 49 20 72 65 71 75 65 73 74 20 thod.has.to.make.an.API.request.
48e00 74 6f 0a 72 65 74 72 69 65 76 65 20 54 48 45 49 52 2d 49 44 2c 20 74 68 65 20 72 65 70 6f 73 69 to.retrieve.THEIR-ID,.the.reposi
48e20 74 6f 72 79 27 73 20 49 44 20 6f 6e 20 74 68 65 20 66 6f 72 67 65 2e 20 20 49 6e 20 74 68 61 74 tory's.ID.on.the.forge...In.that
48e40 0a 63 61 73 65 20 4f 55 52 2d 49 44 20 64 65 72 69 76 65 73 20 66 72 6f 6d 20 54 48 45 49 52 2d .case.OUR-ID.derives.from.THEIR-
48e60 49 44 20 61 6e 64 20 69 73 20 75 6e 69 71 75 65 20 61 63 72 6f 73 73 20 61 6c 6c 0a 66 6f 72 67 ID.and.is.unique.across.all.forg
48e80 65 73 20 61 6e 64 20 68 6f 73 74 73 2e 22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 60 es.and.hosts."...(pcase-let*.((`
48ea0 28 2c 5f 67 69 74 68 6f 73 74 20 2c 61 70 69 68 6f 73 74 20 2c 69 64 20 2c 5f 63 6c 61 73 73 29 (,_githost.,apihost.,id.,_class)
48ec0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 65 74 2d 66 6f 72 .................(forge--get-for
48ee0 67 65 2d 68 6f 73 74 20 68 6f 73 74 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ge-host.host.t))................
48f00 28 70 61 74 68 20 28 66 6f 72 6d 61 74 20 22 25 73 2f 25 73 22 20 6f 77 6e 65 72 20 6e 61 6d 65 (path.(format."%s/%s".owner.name
48f20 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 68 65 69 72 2d 69 64 20 28 61 6e 64 ))................(their-id.(and
48f40 20 28 6e 6f 74 20 73 74 75 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(not.stub).....................
48f60 20 20 20 20 20 20 20 20 20 20 28 67 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 69 64 0a 20 20 ..........(ghub-repository-id...
48f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 77 6e .............................own
48fa0 65 72 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 er.name.........................
48fc0 20 20 20 20 20 20 20 3a 68 6f 73 74 20 61 70 69 68 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 .......:host.apihost............
48fe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 75 74 68 20 27 66 6f 72 67 65 ....................:auth.'forge
49000 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49020 3a 66 6f 72 67 65 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 74 79 70 65 2d 73 79 6d 62 6f 6c 20 :forge.(forge--ghub-type-symbol.
49040 63 6c 61 73 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 class)..........................
49060 20 20 20 20 20 20 3a 6e 6f 65 72 72 6f 72 20 6e 6f 65 72 72 6f 72 29 29 29 29 0a 20 20 20 20 28 ......:noerror.noerror)))).....(
49080 61 6e 64 20 28 6f 72 20 73 74 75 62 20 74 68 65 69 72 2d 69 64 20 28 6e 6f 74 20 6e 6f 65 72 72 and.(or.stub.their-id.(not.noerr
490a0 6f 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 62 61 73 65 36 34 2d 65 6e 63 6f or))..........(cons.(base64-enco
490c0 64 65 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 de-string.................(forma
490e0 74 20 22 25 73 3a 25 73 22 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t."%s:%s".id....................
49100 20 20 20 20 20 28 63 6f 6e 64 20 28 73 74 75 62 20 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 .....(cond.(stub.path)..........
49120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 63 6c 61 73 73 20 .....................((eq.class.
49140 27 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 'forge-github-repository).......
49160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 69 73 .........................;;.This
49180 20 69 73 20 62 61 73 65 36 34 20 65 6e 63 6f 64 65 64 2c 20 61 63 63 6f 72 64 69 6e 67 20 74 6f .is.base64.encoded,.according.to
491a0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
491c0 3b 3b 20 68 74 74 70 73 3a 2f 2f 64 6f 63 73 2e 67 69 74 68 75 62 2e 63 6f 6d 2f 65 6e 2f 67 72 ;;.https://docs.github.com/en/gr
491e0 61 70 68 71 6c 2f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 aphql/..........................
49200 20 20 20 20 20 20 3b 3b 20 72 65 66 65 72 65 6e 63 65 2f 73 63 61 6c 61 72 73 23 69 64 2e 20 20 ......;;.reference/scalars#id...
49220 55 6e 66 6f 72 74 75 6e 61 74 65 6c 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Unfortunately...................
49240 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 61 74 20 69 73 20 6e 6f 74 20 61 6c 77 61 .............;;.that.is.not.alwa
49260 79 73 20 74 72 75 65 2e 20 20 45 2e 67 2e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ys.true...E.g.,.................
49280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 ...............;;.https://github
492a0 2e 63 6f 6d 2f 64 69 74 37 79 61 2f 72 6f 61 6d 65 78 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 .com/dit7ya/roamex..............
492c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 ...................(condition-ca
492e0 73 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 se.nil..........................
49300 20 20 20 20 20 20 20 20 20 20 28 62 61 73 65 36 34 2d 64 65 63 6f 64 65 2d 73 74 72 69 6e 67 20 ..........(base64-decode-string.
49320 74 68 65 69 72 2d 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 their-id).......................
49340 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 74 68 65 69 72 2d 69 64 29 29 29 0a 20 20 ...........(error.their-id)))...
49360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 74 ............................(t.t
49380 68 65 69 72 2d 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 29 0a 20 20 heir-id))).................t)...
493a0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 74 68 65 69 72 2d 69 64 20 70 61 74 68 29 29 .............(or.their-id.path))
493c0 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 72 65 70 6f 73 69 )))..(cl-defmethod.forge--reposi
493e0 74 6f 72 79 2d 69 64 73 20 28 28 5f 63 6c 61 73 73 20 28 73 75 62 63 6c 61 73 73 20 66 6f 72 67 tory-ids.((_class.(subclass.forg
49400 65 2d 6e 6f 61 70 69 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 e-noapi-repository))............
49420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 68 6f 73 74 20 6f ..........................host.o
49440 77 6e 65 72 20 6e 61 6d 65 20 26 6f 70 74 69 6f 6e 61 6c 20 5f 73 74 75 62 20 5f 6e 6f 65 72 72 wner.name.&optional._stub._noerr
49460 6f 72 29 0a 20 20 28 6c 65 74 20 28 28 74 68 65 69 72 2d 69 64 20 28 69 66 20 6f 77 6e 65 72 20 or)...(let.((their-id.(if.owner.
49480 28 63 6f 6e 63 61 74 20 6f 77 6e 65 72 20 22 2f 22 20 6e 61 6d 65 29 20 6e 61 6d 65 29 29 29 0a (concat.owner."/".name).name))).
494a0 20 20 20 20 28 63 6f 6e 73 20 28 62 61 73 65 36 34 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 0a ....(cons.(base64-encode-string.
494c0 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 3a 25 73 22 0a 20 20 20 20 20 ...........(format."%s:%s"......
494e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 33 20 28 66 6f 72 67 65 2d 2d 67 65 74 ..............(nth.3.(forge--get
49500 2d 66 6f 72 67 65 2d 68 6f 73 74 20 68 6f 73 74 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 -forge-host.host.t))............
49520 20 20 20 20 20 20 20 20 74 68 65 69 72 2d 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 74 29 0a ........their-id)............t).
49540 20 20 20 20 20 20 20 20 20 20 74 68 65 69 72 2d 69 64 29 29 29 0a 0a 3b 3b 3b 20 52 65 61 64 0a ..........their-id)))..;;;.Read.
49560 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 70 .(defun.forge-read-repository.(p
49580 72 6f 6d 70 74 29 0a 20 20 28 6c 65 74 20 28 28 63 68 6f 69 63 65 20 28 6d 61 67 69 74 2d 63 6f rompt)...(let.((choice.(magit-co
495a0 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 mpleting-read..................p
495c0 72 6f 6d 70 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 rompt..................(mapcar.(
495e0 70 63 61 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 68 6f 73 74 20 2c 6f 77 6e 65 72 20 2c 6e 61 pcase-lambda.(`(,host.,owner.,na
49600 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 me))............................
49620 28 66 6f 72 6d 61 74 20 22 25 73 2f 25 73 20 40 25 73 22 20 6f 77 6e 65 72 20 6e 61 6d 65 20 68 (format."%s/%s.@%s".owner.name.h
49640 6f 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ost))..........................(
49660 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 5b 67 69 74 68 6f 73 74 20 6f 77 6e 65 forge-sql.[:select.[githost.owne
49680 72 20 6e 61 6d 65 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r.name].........................
496a0 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 72 65 70 6f 73 69 74 6f 72 79 5d 29 29 .............:from.repository]))
496c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 74 20 6e 69 6c 20 6e 69 6c 0a ..................nil.t.nil.nil.
496e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 24 20 28 66 6f 72 67 65 2d 67 65 .................(and$.(forge-ge
49700 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 3f 29 0a 20 20 20 20 20 20 20 20 20 20 20 t-repository.:stub?)............
49720 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 2f 25 73 20 40 25 73 22 0a ............(format."%s/%s.@%s".
49740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
49760 6f 72 65 66 20 24 20 6f 77 6e 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 oref.$.owner)...................
49780 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 24 20 6e 61 6d 65 29 0a 20 20 20 20 20 .............(oref.$.name)......
497a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 ..........................(oref.
497c0 24 20 67 69 74 68 6f 73 74 29 29 29 29 29 29 0a 20 20 20 20 28 73 61 76 65 2d 6d 61 74 63 68 2d $.githost)))))).....(save-match-
497e0 64 61 74 61 0a 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 5c data.......(if.(string-match."\\
49800 60 5c 5c 28 2e 2b 5c 5c 29 2f 5c 5c 28 5b 5e 2f 5d 2b 5c 5c 29 20 40 5c 5c 28 2e 2b 5c 5c 29 5c `\\(.+\\)/\\([^/]+\\).@\\(.+\\)\
49820 5c 27 22 20 63 68 6f 69 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 \'".choice)...........(forge-get
49840 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 6c 69 73 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 -repository.(list.(match-string.
49860 33 20 63 68 6f 69 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3.choice).......................
49880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 ................(match-string.1.
498a0 63 68 6f 69 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 choice).........................
498c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 20 63 68 ..............(match-string.2.ch
498e0 6f 69 63 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 42 55 47 22 29 29 29 29 oice))).........(error."BUG"))))
49900 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 68 6f 73 74 20 28 70 72 6f 6d 70 )..(defun.forge-read-host.(promp
49920 74 20 26 6f 70 74 69 6f 6e 61 6c 20 63 6c 61 73 73 29 0a 20 20 28 6d 61 67 69 74 2d 63 6f 6d 70 t.&optional.class)...(magit-comp
49940 6c 65 74 69 6e 67 2d 72 65 61 64 0a 20 20 20 70 72 6f 6d 70 74 0a 20 20 20 28 69 66 20 63 6c 61 leting-read....prompt....(if.cla
49960 73 73 0a 20 20 20 20 20 20 20 28 73 65 71 2d 6b 65 65 70 20 28 70 63 61 73 65 2d 6c 61 6d 62 64 ss........(seq-keep.(pcase-lambd
49980 61 20 28 60 28 2c 67 69 74 68 6f 73 74 20 2c 5f 61 70 69 68 6f 73 74 20 2c 5f 77 65 62 68 6f 73 a.(`(,githost.,_apihost.,_webhos
499a0 74 20 2c 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 t.,c))....................(and.(
499c0 63 68 69 6c 64 2d 6f 66 2d 63 6c 61 73 73 2d 70 20 63 20 63 6c 61 73 73 29 20 67 69 74 68 6f 73 child-of-class-p.c.class).githos
499e0 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 61 6c 69 73 74 t))..................forge-alist
49a00 29 0a 20 20 20 20 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 66 6f 72 67 65 2d 61 6c 69 73 74 )......(mapcar.#'car.forge-alist
49a20 29 29 0a 20 20 20 6e 69 6c 20 74 29 29 0a 0a 3b 3b 3b 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 ))....nil.t))..;;;.Miscellaneous
49a40 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 61 73 2d 67 69 74 68 6f 73 74 20 28 68 6f 73 74 ..(defun.forge--as-githost.(host
49a60 29 0a 20 20 28 6f 72 20 28 63 61 72 20 28 63 61 72 20 28 63 6c 2d 6d 65 6d 62 65 72 20 68 6f 73 )...(or.(car.(car.(cl-member.hos
49a80 74 20 66 6f 72 67 65 2d 61 6c 69 73 74 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 20 3a 6b 65 79 t.forge-alist.:test.#'equal.:key
49aa0 20 23 27 63 61 72 29 29 29 0a 20 20 20 20 20 20 28 63 61 72 20 28 63 61 72 20 28 63 6c 2d 6d 65 .#'car))).......(car.(car.(cl-me
49ac0 6d 62 65 72 20 68 6f 73 74 20 66 6f 72 67 65 2d 61 6c 69 73 74 20 3a 74 65 73 74 20 23 27 65 71 mber.host.forge-alist.:test.#'eq
49ae0 75 61 6c 20 3a 6b 65 79 20 23 27 63 61 64 72 29 29 29 0a 20 20 20 20 20 20 28 63 61 72 20 28 63 ual.:key.#'cadr))).......(car.(c
49b00 61 72 20 28 63 6c 2d 6d 65 6d 62 65 72 20 68 6f 73 74 20 66 6f 72 67 65 2d 61 6c 69 73 74 20 3a ar.(cl-member.host.forge-alist.:
49b20 74 65 73 74 20 23 27 65 71 75 61 6c 20 3a 6b 65 79 20 23 27 63 61 64 64 72 29 29 29 0a 20 20 20 test.#'equal.:key.#'caddr)))....
49b40 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 ...(user-error."Cannot.determine
49b60 20 67 69 74 68 6f 73 74 20 66 6f 72 20 25 53 22 20 68 6f 73 74 29 29 29 0a 0a 28 64 65 66 75 6e .githost.for.%S".host)))..(defun
49b80 20 66 6f 72 67 65 2d 2d 61 73 2d 61 70 69 68 6f 73 74 20 28 68 6f 73 74 29 0a 20 20 28 6f 72 20 .forge--as-apihost.(host)...(or.
49ba0 28 63 61 64 72 20 28 63 61 72 20 28 63 6c 2d 6d 65 6d 62 65 72 20 68 6f 73 74 20 66 6f 72 67 65 (cadr.(car.(cl-member.host.forge
49bc0 2d 61 6c 69 73 74 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 20 3a 6b 65 79 20 23 27 63 61 64 72 -alist.:test.#'equal.:key.#'cadr
49be0 29 29 29 0a 20 20 20 20 20 20 28 63 61 64 72 20 28 63 61 72 20 28 63 6c 2d 6d 65 6d 62 65 72 20 ))).......(cadr.(car.(cl-member.
49c00 68 6f 73 74 20 66 6f 72 67 65 2d 61 6c 69 73 74 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 20 3a host.forge-alist.:test.#'equal.:
49c20 6b 65 79 20 23 27 63 61 72 29 29 29 0a 20 20 20 20 20 20 28 63 61 64 72 20 28 63 61 72 20 28 63 key.#'car))).......(cadr.(car.(c
49c40 6c 2d 6d 65 6d 62 65 72 20 68 6f 73 74 20 66 6f 72 67 65 2d 61 6c 69 73 74 20 3a 74 65 73 74 20 l-member.host.forge-alist.:test.
49c60 23 27 65 71 75 61 6c 20 3a 6b 65 79 20 23 27 63 61 64 64 72 29 29 29 0a 20 20 20 20 20 20 28 75 #'equal.:key.#'caddr))).......(u
49c80 73 65 72 2d 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 61 70 69 68 ser-error."Cannot.determine.apih
49ca0 6f 73 74 20 66 6f 72 20 25 53 22 20 68 6f 73 74 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 ost.for.%S".host)))..(cl-defmeth
49cc0 6f 64 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 72 65 od.forge--format.((repo.forge-re
49ce0 70 6f 73 69 74 6f 72 79 29 20 66 6f 72 6d 61 74 2d 6f 72 2d 73 6c 6f 74 20 26 6f 70 74 69 6f 6e pository).format-or-slot.&option
49d00 61 6c 20 73 70 65 63 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 28 65 69 65 69 6f 20 al.spec)...(pcase-let*.(((eieio.
49d20 28 66 6f 72 67 65 20 77 65 62 68 6f 73 74 29 20 6f 77 6e 65 72 20 6e 61 6d 65 29 20 72 65 70 6f (forge.webhost).owner.name).repo
49d40 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 74 68 20 28 69 66 20 6f 77 6e 65 72 )................(path.(if.owner
49d60 20 28 63 6f 6e 63 61 74 20 6f 77 6e 65 72 20 22 2f 22 20 6e 61 6d 65 29 20 6e 61 6d 65 29 29 29 .(concat.owner."/".name).name)))
49d80 0a 20 20 20 20 28 66 6f 72 6d 61 74 2d 73 70 65 63 0a 20 20 20 20 20 28 6c 65 74 20 28 28 66 6f .....(format-spec......(let.((fo
49da0 72 6d 61 74 20 28 69 66 20 28 73 79 6d 62 6f 6c 70 20 66 6f 72 6d 61 74 2d 6f 72 2d 73 6c 6f 74 rmat.(if.(symbolp.format-or-slot
49dc0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 69 65 69 6f 2d )........................(eieio-
49de0 6f 72 65 66 20 72 65 70 6f 20 66 6f 72 6d 61 74 2d 6f 72 2d 73 6c 6f 74 29 0a 20 20 20 20 20 20 oref.repo.format-or-slot).......
49e00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 6d 61 74 2d 6f 72 2d 73 6c 6f 74 29 29 29 ...............format-or-slot)))
49e20 0a 20 20 20 20 20 20 20 28 69 66 20 28 6d 65 6d 62 65 72 20 77 65 62 68 6f 73 74 20 67 68 75 62 ........(if.(member.webhost.ghub
49e40 2d 69 6e 73 65 63 75 72 65 2d 68 6f 73 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 -insecure-hosts)............(rep
49e60 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 5c 5c 60 68 74 74 70 73 3a lace-regexp-in-string."\\`https:
49e80 2f 2f 22 20 22 68 74 74 70 3a 2f 2f 22 20 66 6f 72 6d 61 74 20 74 20 74 29 0a 20 20 20 20 20 20 //"."http://".format.t.t).......
49ea0 20 20 20 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 60 28 2c 40 73 70 65 63 0a 20 20 20 20 20 20 ...format))......`(,@spec.......
49ec0 20 28 3f 68 20 2e 20 2c 77 65 62 68 6f 73 74 29 0a 20 20 20 20 20 20 20 28 3f 6f 20 2e 20 2c 6f .(?h...,webhost)........(?o...,o
49ee0 77 6e 65 72 29 0a 20 20 20 20 20 20 20 28 3f 6e 20 2e 20 2c 6e 61 6d 65 29 0a 20 20 20 20 20 20 wner)........(?n...,name).......
49f00 20 28 3f 70 20 2e 20 2c 70 61 74 68 29 0a 20 20 20 20 20 20 20 28 3f 50 20 2e 20 2c 28 73 74 72 .(?p...,path)........(?P...,(str
49f20 69 6e 67 2d 72 65 70 6c 61 63 65 20 22 2f 22 20 22 25 32 46 22 20 70 61 74 68 29 29 29 29 29 29 ing-replace."/"."%2F".path))))))
49f40 0a 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 62 75 66 66 65 ..(defvar.forge--mode-line-buffe
49f60 72 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6d 73 67 20 28 72 65 70 6f 20 r.nil)..(defun.forge--msg.(repo.
49f80 65 63 68 6f 20 64 6f 6e 65 20 66 6f 72 6d 61 74 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 28 echo.done.format.&rest.args)...(
49fa0 6c 65 74 20 28 28 6d 73 67 20 28 61 70 70 6c 79 20 23 27 66 6f 72 6d 61 74 20 66 6f 72 6d 61 74 let.((msg.(apply.#'format.format
49fc0 20 61 72 67 73 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 72 65 70 6f 0a 20 20 20 20 20 20 28 73 .args))).....(when.repo.......(s
49fe0 65 74 71 20 6d 73 67 20 28 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 0a 20 20 20 20 20 20 20 20 etq.msg.(string-replace.........
4a000 20 20 20 20 20 20 20 20 20 22 52 45 50 4f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ........."REPO".................
4a020 20 28 63 6f 6e 63 61 74 20 28 6f 72 65 66 20 72 65 70 6f 20 6f 77 6e 65 72 29 20 22 2f 22 20 28 .(concat.(oref.repo.owner)."/".(
4a040 6f 72 65 66 20 72 65 70 6f 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 oref.repo.name))................
4a060 20 20 6d 73 67 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 65 63 68 6f 20 6d 73 67 ..msg))).....(when.(and.echo.msg
4a080 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 25 73 22 20 6d 73 67 20 28 69 66 20 ).......(message."%s%s".msg.(if.
4a0a0 64 6f 6e 65 20 22 2e 2e 2e 64 6f 6e 65 22 20 22 2e 2e 2e 22 29 29 29 0a 20 20 20 20 28 77 68 65 done."...done"."..."))).....(whe
4a0c0 6e 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 66 6f 72 67 65 2d 2d 6d 6f 64 65 2d 6c 69 6e n.(buffer-live-p.forge--mode-lin
4a0e0 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 e-buffer).......(with-current-bu
4a100 66 66 65 72 20 66 6f 72 67 65 2d 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 62 75 66 66 65 72 0a 20 20 20 ffer.forge--mode-line-buffer....
4a120 20 20 20 20 20 28 73 65 74 71 20 6d 6f 64 65 2d 6c 69 6e 65 2d 70 72 6f 63 65 73 73 0a 20 20 20 .....(setq.mode-line-process....
4a140 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 64 6f 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 ...........(if.done.............
4a160 20 20 20 20 20 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 ......nil.................(conca
4a180 74 20 22 20 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 6d 73 67 20 27 66 6f 6e 74 2d 6c 6f 63 6b t.".".(propertize.msg.'font-lock
4a1a0 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -face...........................
4a1c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6d 61 67 69 74 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 70 ..............'magit-mode-line-p
4a1e0 72 6f 63 65 73 73 29 29 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 63 65 2d 6d 6f 64 65 2d 6c 69 rocess))))).......(force-mode-li
4a200 6e 65 2d 75 70 64 61 74 65 20 74 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 67 ne-update.t))))..(cl-defmethod.g
4a220 68 75 62 2d 2d 68 6f 73 74 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 hub--host.((repo.forge-repositor
4a240 79 29 29 0a 20 20 28 63 6c 2d 63 61 6c 6c 2d 6e 65 78 74 2d 6d 65 74 68 6f 64 20 28 66 6f 72 67 y))...(cl-call-next-method.(forg
4a260 65 2d 2d 67 68 75 62 2d 74 79 70 65 2d 73 79 6d 62 6f 6c 20 28 65 69 65 69 6f 2d 6f 62 6a 65 63 e--ghub-type-symbol.(eieio-objec
4a280 74 2d 63 6c 61 73 73 20 72 65 70 6f 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 t-class.repo))))..(cl-defmethod.
4a2a0 67 68 75 62 2d 2d 75 73 65 72 6e 61 6d 65 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 72 65 70 6f ghub--username.((repo.forge-repo
4a2c0 73 69 74 6f 72 79 29 29 0a 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 sitory))...(let.((default-direct
4a2e0 6f 72 79 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 28 75 6e 6c ory.default-directory)).....(unl
4a300 65 73 73 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 65 71 75 61 6c 20 28 66 6f 72 ess.(forge-repository-equal.(for
4a320 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 3f 29 20 72 65 70 6f 29 0a ge-get-repository.:stub?).repo).
4a340 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 77 6f 72 6b 74 72 65 65 20 28 66 6f 72 67 ......(when-let.((worktree.(forg
4a360 65 2d 67 65 74 2d 77 6f 72 6b 74 72 65 65 20 72 65 70 6f 29 29 29 0a 20 20 20 20 20 20 20 20 28 e-get-worktree.repo))).........(
4a380 73 65 74 71 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 77 6f 72 6b 74 72 65 65 29 setq.default-directory.worktree)
4a3a0 29 29 0a 20 20 20 20 28 63 6c 2d 63 61 6c 6c 2d 6e 65 78 74 2d 6d 65 74 68 6f 64 20 28 6f 72 65 )).....(cl-call-next-method.(ore
4a3c0 66 20 72 65 70 6f 20 61 70 69 68 6f 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 f.repo.apihost).................
4a3e0 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 74 79 70 65 2d 73 79 6d 62 6f .........(forge--ghub-type-symbo
4a400 6c 20 28 65 69 65 69 6f 2d 6f 62 6a 65 63 74 2d 63 6c 61 73 73 20 72 65 70 6f 29 29 29 29 29 0a l.(eieio-object-class.repo))))).
4a420 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 68 75 62 2d 74 79 70 65 2d 73 79 6d 62 6f 6c 20 .(defun.forge--ghub-type-symbol.
4a440 28 63 6c 61 73 73 29 0a 20 20 28 70 63 61 73 65 2d 65 78 68 61 75 73 74 69 76 65 20 63 6c 61 73 (class)...(pcase-exhaustive.clas
4a460 73 0a 20 20 20 20 28 27 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 20 s.....('forge-github-repository.
4a480 20 20 20 27 67 69 74 68 75 62 29 0a 20 20 20 20 28 27 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 ...'github).....('forge-gitlab-r
4a4a0 65 70 6f 73 69 74 6f 72 79 20 20 20 20 27 67 69 74 6c 61 62 29 0a 20 20 20 20 28 27 66 6f 72 67 epository....'gitlab).....('forg
4a4c0 65 2d 66 6f 72 67 65 6a 6f 2d 72 65 70 6f 73 69 74 6f 72 79 20 20 20 27 66 6f 72 67 65 6a 6f 29 e-forgejo-repository...'forgejo)
4a4e0 0a 20 20 20 20 28 27 66 6f 72 67 65 2d 67 69 74 65 61 2d 72 65 70 6f 73 69 74 6f 72 79 20 20 20 .....('forge-gitea-repository...
4a500 20 20 27 67 69 74 65 61 29 0a 20 20 20 20 28 27 66 6f 72 67 65 2d 67 6f 67 73 2d 72 65 70 6f 73 ..'gitea).....('forge-gogs-repos
4a520 69 74 6f 72 79 20 20 20 20 20 20 27 67 6f 67 73 29 0a 20 20 20 20 28 27 66 6f 72 67 65 2d 62 69 itory......'gogs).....('forge-bi
4a540 74 62 75 63 6b 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 27 62 69 74 62 75 63 6b 65 74 29 29 29 tbucket-repository.'bitbucket)))
4a560 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 72 ..;;;._.;;.Local.Variables:.;;.r
4a580 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 28 22 ead-symbol-shorthands:.(.;;...("
4a5a0 61 6e 64 24 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 24 and$"............"cond-let--and$
4a5c0 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 ").;;...("and-let"........."cond
4a5e0 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 69 66 2d 6c 65 74 22 20 20 -let--and-let").;;...("if-let"..
4a600 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b 20 20 ........"cond-let--if-let").;;..
4a620 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 .("when-let"........"cond-let--w
4a640 68 65 6e 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 70 61 72 74 69 61 6c 22 20 20 20 20 20 20 20 hen-let").;;...("partial".......
4a660 2e 20 22 6c 6c 61 6d 61 2d 2d 6c 65 66 74 2d 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 22 29 .."llama--left-apply-partially")
4a680 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 72 65 70 6f 29 0a ).;;.End:.(provide.'forge-repo).
4a6a0 3b 3b 3b 20 66 6f 72 67 65 2d 72 65 70 6f 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 ;;;.forge-repo.el.ends.here.....
4a6c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a6e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a7a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a7c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a7e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a800 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 72 65 70 6f 73 2e forge-20250916.1119/forge-repos.
4a820 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 el..............................
4a840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a860 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
4a880 30 30 31 36 34 35 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 37 30 30 00 20 30 00 00 00 0016451.00000000000.014700..0...
4a8a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a8c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a8e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a900 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
4a920 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
4a940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a9a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a9c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4a9e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4aa00 3b 3b 3b 20 66 6f 72 67 65 2d 72 65 70 6f 73 2e 65 6c 20 2d 2d 2d 20 4c 69 73 74 20 72 65 70 6f ;;;.forge-repos.el.---.List.repo
4aa20 73 69 74 6f 72 69 65 73 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 sitories..-*-.lexical-binding:t.
4aa40 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 -*-..;;.Copyright.(C).2018-2025.
4aa60 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 Jonas.Bernoulli..;;.Author:.Jona
4aa80 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 s.Bernoulli.<emacs.forge@jonas.b
4aaa0 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e ernoulli.dev>.;;.Maintainer:.Jon
4aac0 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e as.Bernoulli.<emacs.forge@jonas.
4aae0 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d bernoulli.dev>..;;.SPDX-License-
4ab00 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b Identifier:.GPL-3.0-or-later..;;
4ab20 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 .This.file.is.free.software:.you
4ab40 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 .can.redistribute.it.and/or.modi
4ab60 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 fy.;;.it.under.the.terms.of.the.
4ab80 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 GNU.General.Public.License.as.pu
4aba0 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 blished.;;.by.the.Free.Software.
4abc0 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 Foundation,.either.version.3.of.
4abe0 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 the.License,.;;.or.(at.your.opti
4ac00 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 on).any.later.version..;;.;;.Thi
4ac20 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 s.file.is.distributed.in.the.hop
4ac40 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 e.that.it.will.be.useful,.;;.but
4ac60 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 .WITHOUT.ANY.WARRANTY;.without.e
4ac80 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d ven.the.implied.warranty.of.;;.M
4aca0 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 ERCHANTABILITY.or.FITNESS.FOR.A.
4acc0 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 PARTICULAR.PURPOSE...See.the.;;.
4ace0 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d GNU.General.Public.License.for.m
4ad00 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 ore.details..;;.;;.You.should.ha
4ad20 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 ve.received.a.copy.of.the.GNU.Ge
4ad40 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 neral.Public.License.;;.along.wi
4ad60 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 th.this.file...If.not,.see.<http
4ad80 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b s://www.gnu.org/licenses/>...;;;
4ada0 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 68 6c 2d 6c 69 6e 65 29 0a 0a 28 72 65 71 .Code:..(require.'hl-line)..(req
4adc0 75 69 72 65 20 27 66 6f 72 67 65 2d 72 65 70 6f 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 uire.'forge-repo).(require.'forg
4ade0 65 2d 74 61 62 6c 69 73 74 29 0a 0a 28 64 65 66 76 61 72 20 78 2d 73 74 72 65 74 63 68 2d 63 75 e-tablist)..(defvar.x-stretch-cu
4ae00 72 73 6f 72 29 0a 0a 3b 3b 3b 20 4f 70 74 69 6f 6e 73 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 rsor)..;;;.Options..(defcustom.f
4ae20 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 27 orge-repository-list-mode-hook.'
4ae40 28 68 6c 2d 6c 69 6e 65 2d 6d 6f 64 65 29 0a 20 20 22 48 6f 6f 6b 20 72 75 6e 20 61 66 74 65 72 (hl-line-mode)..."Hook.run.after
4ae60 20 65 6e 74 65 72 69 6e 67 20 46 6f 72 67 65 2d 52 65 70 6f 73 69 74 6f 72 79 2d 4c 69 73 74 20 .entering.Forge-Repository-List.
4ae80 6d 6f 64 65 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 mode."...:package-version.'(forg
4aea0 65 20 2e 20 22 30 2e 34 2e 30 22 29 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a e..."0.4.0")...:group.'forge...:
4aec0 74 79 70 65 20 27 68 6f 6f 6b 0a 20 20 3a 6f 70 74 69 6f 6e 73 20 27 28 68 6c 2d 6c 69 6e 65 2d type.'hook...:options.'(hl-line-
4aee0 6d 6f 64 65 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 mode))..(defcustom.forge-reposit
4af00 6f 72 79 2d 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 0a 20 20 27 28 28 22 4f 77 6e 65 72 22 20 20 20 ory-list-columns...'(("Owner"...
4af20 20 6f 77 6e 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 30 20 .owner.......................20.
4af40 20 20 74 20 6e 69 6c 29 0a 20 20 20 20 28 22 4e 61 6d 65 22 20 20 20 20 20 6e 61 6d 65 20 20 20 ..t.nil).....("Name".....name...
4af60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 30 20 20 20 74 20 6e 69 6c 29 .....................20...t.nil)
4af80 0a 20 20 20 20 28 22 54 22 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 66 6f 72 6d 61 74 2d 72 65 .....("T"........forge-format-re
4afa0 70 6f 2d 63 6f 6e 64 69 74 69 6f 6e 20 20 31 20 20 20 74 20 6e 69 6c 29 0a 20 20 20 20 28 22 53 po-condition..1...t.nil).....("S
4afc0 22 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 66 6f 72 6d 61 74 2d 72 65 70 6f 2d 73 65 6c 65 63 "........forge-format-repo-selec
4afe0 74 69 76 65 20 20 31 20 20 20 74 20 6e 69 6c 29 0a 20 20 20 20 28 22 57 6f 72 6b 74 72 65 65 22 tive..1...t.nil).....("Worktree"
4b000 20 77 6f 72 6b 74 72 65 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 39 39 20 .worktree....................99.
4b020 20 20 74 20 6e 69 6c 29 29 0a 20 20 22 4c 69 73 74 20 6f 66 20 63 6f 6c 75 6d 6e 73 20 64 69 73 ..t.nil))..."List.of.columns.dis
4b040 70 6c 61 79 65 64 20 77 68 65 6e 20 6c 69 73 74 69 6e 67 20 72 65 70 6f 73 69 74 6f 72 69 65 73 played.when.listing.repositories
4b060 2e 0a 0a 45 61 63 68 20 65 6c 65 6d 65 6e 74 20 68 61 73 20 74 68 65 20 66 6f 72 6d 20 28 48 45 ...Each.element.has.the.form.(HE
4b080 41 44 45 52 20 53 4f 55 52 43 45 20 57 49 44 54 48 20 53 4f 52 54 20 50 52 4f 50 53 29 2e 0a 0a ADER.SOURCE.WIDTH.SORT.PROPS)...
4b0a0 48 45 41 44 45 52 20 69 73 20 74 68 65 20 73 74 72 69 6e 67 20 64 69 73 70 6c 61 79 65 64 20 69 HEADER.is.the.string.displayed.i
4b0c0 6e 20 74 68 65 20 68 65 61 64 65 72 2e 20 20 57 49 44 54 48 20 69 73 20 74 68 65 20 77 69 64 74 n.the.header...WIDTH.is.the.widt
4b0e0 68 0a 6f 66 20 74 68 65 20 63 6f 6c 75 6d 6e 2e 20 20 53 4f 55 52 43 45 20 69 73 20 75 73 65 64 h.of.the.column...SOURCE.is.used
4b100 20 74 6f 20 67 65 74 20 74 68 65 20 76 61 6c 75 65 2c 20 69 74 20 68 61 73 20 74 6f 20 62 65 20 .to.get.the.value,.it.has.to.be.
4b120 74 68 65 0a 6e 61 6d 65 20 6f 66 20 61 20 73 6c 6f 74 20 6f 66 20 60 66 6f 72 67 65 2d 72 65 70 the.name.of.a.slot.of.`forge-rep
4b140 6f 73 69 74 6f 72 79 27 20 6f 72 20 61 20 66 75 6e 63 74 69 6f 6e 20 74 68 61 74 20 74 61 6b 65 ository'.or.a.function.that.take
4b160 73 0a 73 75 63 68 20 61 6e 20 6f 62 6a 65 63 74 20 61 73 20 61 72 67 75 6d 65 6e 74 2e 20 20 53 s.such.an.object.as.argument...S
4b180 4f 52 54 20 69 73 20 61 20 62 6f 6f 6c 65 61 6e 20 6f 72 20 61 20 66 75 6e 63 74 69 6f 6e 20 75 ORT.is.a.boolean.or.a.function.u
4b1a0 73 65 64 0a 74 6f 20 73 6f 72 74 20 62 79 20 74 68 69 73 20 63 6f 6c 75 6d 6e 2e 20 20 53 75 70 sed.to.sort.by.this.column...Sup
4b1c0 70 6f 72 74 65 64 20 50 52 4f 50 53 20 69 6e 63 6c 75 64 65 20 60 3a 72 69 67 68 74 2d 61 6c 69 ported.PROPS.include.`:right-ali
4b1e0 67 6e 27 0a 61 6e 64 20 60 3a 70 61 64 2d 72 69 67 68 74 27 2e 22 0a 20 20 3a 70 61 63 6b 61 67 gn'.and.`:pad-right'."...:packag
4b200 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 34 2e 30 22 29 0a 20 20 3a e-version.'(forge..."0.4.0")...:
4b220 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 66 6f 72 67 65 2d 2d 74 61 62 6c group.'forge...:type.forge--tabl
4b240 69 73 74 2d 63 6f 6c 75 6d 6e 73 2d 74 79 70 65 29 0a 0a 3b 3b 3b 20 4d 6f 64 65 0a 0a 28 64 65 ist-columns-type)..;;;.Mode..(de
4b260 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 fvar-keymap.forge-repository-lis
4b280 74 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 3a 64 6f 63 20 22 4c 6f 63 61 6c 20 6b 65 79 6d 61 70 20 t-mode-map...:doc."Local.keymap.
4b2a0 66 6f 72 20 46 6f 72 67 65 2d 52 65 70 6f 73 69 74 6f 72 79 2d 4c 69 73 74 20 6d 6f 64 65 20 62 for.Forge-Repository-List.mode.b
4b2c0 75 66 66 65 72 73 2e 22 0a 20 20 3a 70 61 72 65 6e 74 20 28 6d 61 6b 65 2d 63 6f 6d 70 6f 73 65 uffers."...:parent.(make-compose
4b2e0 64 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 63 6f 6d 6d 6f 6e 2d 6d 61 70 20 74 61 62 75 6c 61 d-keymap.forge-common-map.tabula
4b300 74 65 64 2d 6c 69 73 74 2d 6d 6f 64 65 2d 6d 61 70 29 0a 20 20 22 6e 22 20 20 20 20 20 20 20 20 ted-list-mode-map)..."n"........
4b320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 64 69 73 70 61 74 ..................#'forge-dispat
4b340 63 68 0a 20 20 22 52 45 54 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ch..."RET"......................
4b360 20 20 23 27 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 72 65 70 6f 73 69 74 6f 72 79 0a ..#'forge-visit-this-repository.
4b380 20 20 22 3c 72 65 74 75 72 6e 3e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 .."<return>"...................#
4b3a0 27 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 22 'forge-visit-this-repository..."
4b3c0 6f 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f o"..........................#'fo
4b3e0 72 67 65 2d 62 72 6f 77 73 65 2d 74 68 69 73 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 22 3c 72 rge-browse-this-repository..."<r
4b400 65 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 6d 65 6e 75 3e 22 20 23 27 66 6f 72 67 emap>.<forge--list-menu>".#'forg
4b420 65 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e 75 29 0a 0a 28 64 65 66 76 61 72 2d 6c 6f e-repositories-menu)..(defvar-lo
4b440 63 61 6c 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 66 69 6c 74 65 72 20 6e 69 cal.forge--buffer-list-filter.ni
4b460 6c 29 0a 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 l)..(defvar.forge-repository-lis
4b480 74 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 22 2a 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 69 t-buffer-name."*forge-repositori
4b4a0 65 73 2a 22 0a 20 20 22 42 75 66 66 65 72 20 6e 61 6d 65 20 74 6f 20 75 73 65 20 66 6f 72 20 64 es*"..."Buffer.name.to.use.for.d
4b4c0 69 73 70 6c 61 79 69 6e 67 20 6c 69 73 74 73 20 6f 66 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2e isplaying.lists.of.repositories.
4b4e0 22 29 0a 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 ")..(defvar.forge-repository-lis
4b500 74 2d 6d 6f 64 65 2d 6e 61 6d 65 0a 20 20 27 28 28 3a 65 76 61 6c 20 28 63 61 70 69 74 61 6c 69 t-mode-name...'((:eval.(capitali
4b520 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 69 66 20 66 6f 72 67 65 ze.............(concat.(if.forge
4b540 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 66 69 6c 74 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 --buffer-list-filter............
4b560 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 22 20 66 6f 72 67 65 .............(format."%s.".forge
4b580 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 66 69 6c 74 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 --buffer-list-filter)...........
4b5a0 20 20 20 20 20 20 20 20 20 20 20 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ............"").................
4b5c0 20 20 20 20 22 72 65 70 6f 73 69 74 6f 72 69 65 73 22 29 29 29 29 0a 20 20 22 49 6e 66 6f 72 6d ...."repositories"))))..."Inform
4b5e0 61 74 69 6f 6e 20 73 68 6f 77 6e 20 69 6e 20 74 68 65 20 6d 6f 64 65 2d 6c 69 6e 65 20 66 6f 72 ation.shown.in.the.mode-line.for
4b600 20 60 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 27 2e 0a 4d .`forge-repository-list-mode'..M
4b620 75 73 74 20 62 65 20 73 65 74 20 62 65 66 6f 72 65 20 60 66 6f 72 67 65 2d 6c 69 73 74 27 20 69 ust.be.set.before.`forge-list'.i
4b640 73 20 6c 6f 61 64 65 64 2e 22 29 0a 0a 28 64 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 s.loaded.")..(define-derived-mod
4b660 65 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 20 74 61 62 e.forge-repository-list-mode.tab
4b680 75 6c 61 74 65 64 2d 6c 69 73 74 2d 6d 6f 64 65 0a 20 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 ulated-list-mode...forge-reposit
4b6a0 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 2d 6e 61 6d 65 0a 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 ory-list-mode-name..."Major.mode
4b6c0 20 66 6f 72 20 62 72 6f 77 73 69 6e 67 20 61 20 6c 69 73 74 20 6f 66 20 72 65 70 6f 73 69 74 6f .for.browsing.a.list.of.reposito
4b6e0 72 69 65 73 2e 22 0a 20 20 3a 69 6e 74 65 72 61 63 74 69 76 65 20 6e 69 6c 0a 20 20 28 73 65 74 ries."...:interactive.nil...(set
4b700 71 2d 6c 6f 63 61 6c 20 78 2d 73 74 72 65 74 63 68 2d 63 75 72 73 6f 72 20 6e 69 6c 29 0a 20 20 q-local.x-stretch-cursor.nil)...
4b720 28 73 65 74 71 20 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 70 61 64 64 69 6e 67 20 30 29 0a (setq.tabulated-list-padding.0).
4b740 20 20 28 73 65 74 71 20 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 73 6f 72 74 2d 6b 65 79 20 ..(setq.tabulated-list-sort-key.
4b760 28 63 6f 6e 73 20 22 4f 77 6e 65 72 22 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 (cons."Owner".nil)))..(defun.for
4b780 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 73 65 74 75 70 20 28 66 69 6c 74 65 72 ge-repository-list-setup.(filter
4b7a0 20 66 6e 29 0a 20 20 28 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 67 65 74 2d 62 75 66 66 65 72 .fn)...(let.((buffer.(get-buffer
4b7c0 2d 63 72 65 61 74 65 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 62 75 -create.forge-repository-list-bu
4b7e0 66 66 65 72 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 ffer-name))).....(with-current-b
4b800 75 66 66 65 72 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 65 66 61 75 6c 74 uffer.buffer.......(setq.default
4b820 2d 64 69 72 65 63 74 6f 72 79 20 22 2f 22 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 -directory."/").......(setq.forg
4b840 65 2d 2d 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 20 66 6f 72 67 65 2d e--tabulated-list-columns.forge-
4b860 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 29 0a 20 20 20 20 20 20 28 repository-list-columns).......(
4b880 73 65 74 71 20 66 6f 72 67 65 2d 2d 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 71 75 65 72 79 setq.forge--tabulated-list-query
4b8a0 20 66 6e 29 0a 20 20 20 20 20 20 28 63 6c 2d 6c 65 74 66 20 28 28 28 73 79 6d 62 6f 6c 2d 66 75 .fn).......(cl-letf.(((symbol-fu
4b8c0 6e 63 74 69 6f 6e 20 23 27 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 72 65 76 65 72 74 29 20 nction.#'tabulated-list-revert).
4b8e0 23 27 69 67 6e 6f 72 65 29 29 20 3b 20 73 65 65 20 23 32 32 39 0a 20 20 20 20 20 20 20 20 28 66 #'ignore)).;.see.#229.........(f
4b900 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 29 29 0a 20 20 20 20 orge-repository-list-mode)).....
4b920 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 66 69 6c 74 65 ..(setq.forge--buffer-list-filte
4b940 72 20 66 69 6c 74 65 72 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 61 62 6c 69 73 74 2d r.filter).......(forge--tablist-
4b960 72 65 66 72 65 73 68 29 0a 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 74 61 62 75 6c 61 refresh).......(add-hook.'tabula
4b980 74 65 64 2d 6c 69 73 74 2d 72 65 76 65 72 74 2d 68 6f 6f 6b 20 23 27 66 6f 72 67 65 2d 2d 74 61 ted-list-revert-hook.#'forge--ta
4b9a0 62 6c 69 73 74 2d 72 65 66 72 65 73 68 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 28 74 61 62 75 blist-refresh.nil.t).......(tabu
4b9c0 6c 61 74 65 64 2d 6c 69 73 74 2d 70 72 69 6e 74 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 68 6c lated-list-print).......(when.hl
4b9e0 2d 6c 69 6e 65 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 28 68 6c 2d 6c 69 6e 65 2d 68 69 67 68 -line-mode.........(hl-line-high
4ba00 6c 69 67 68 74 29 29 29 0a 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 light))).....(switch-to-buffer.b
4ba20 75 66 66 65 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 66 6f 72 6d 61 74 2d 72 65 uffer)))..(defun.forge-format-re
4ba40 70 6f 2d 63 6f 6e 64 69 74 69 6f 6e 20 28 72 65 70 6f 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 po-condition.(repo)..."Return.a.
4ba60 63 68 61 72 61 63 74 65 72 20 72 65 70 72 65 73 65 6e 74 69 6e 67 20 74 68 65 20 76 61 6c 75 65 character.representing.the.value
4ba80 20 6f 66 20 52 45 50 4f 27 73 20 60 63 6f 6e 64 69 74 69 6f 6e 27 20 73 6c 6f 74 2e 22 0a 20 20 .of.REPO's.`condition'.slot."...
4baa0 28 70 63 61 73 65 2d 65 78 68 61 75 73 74 69 76 65 20 28 6f 72 65 66 20 72 65 70 6f 20 63 6f 6e (pcase-exhaustive.(oref.repo.con
4bac0 64 69 74 69 6f 6e 29 0a 20 20 20 20 28 3a 74 72 61 63 6b 65 64 20 22 2a 22 29 0a 20 20 20 20 28 dition).....(:tracked."*").....(
4bae0 3a 6b 6e 6f 77 6e 20 22 20 22 29 0a 20 20 20 20 28 3a 73 74 75 62 20 28 70 72 6f 70 65 72 74 69 :known.".").....(:stub.(properti
4bb00 7a 65 20 22 73 22 20 27 66 61 63 65 20 27 77 61 72 6e 69 6e 67 29 29 29 29 0a 0a 28 64 65 66 75 ze."s".'face.'warning))))..(defu
4bb20 6e 20 66 6f 72 67 65 2d 66 6f 72 6d 61 74 2d 72 65 70 6f 2d 73 65 6c 65 63 74 69 76 65 20 28 72 n.forge-format-repo-selective.(r
4bb40 65 70 6f 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 63 68 61 72 61 63 74 65 72 20 72 65 70 72 65 epo)..."Return.a.character.repre
4bb60 73 65 6e 74 69 6e 67 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 52 45 50 4f 27 73 20 60 73 65 6c senting.the.value.of.REPO's.`sel
4bb80 65 63 74 69 76 65 2d 70 27 20 73 6c 6f 74 2e 22 0a 20 20 28 70 63 61 73 65 2d 65 78 68 61 75 73 ective-p'.slot."...(pcase-exhaus
4bba0 74 69 76 65 20 28 6f 72 65 66 20 72 65 70 6f 20 73 65 6c 65 63 74 69 76 65 2d 70 29 0a 20 20 20 tive.(oref.repo.selective-p)....
4bbc0 20 28 27 74 20 20 20 22 2a 22 29 0a 20 20 20 20 28 27 6e 69 6c 20 22 20 22 29 29 29 0a 0a 3b 3b .('t..."*").....('nil.".")))..;;
4bbe0 3b 20 43 6f 6d 6d 61 6e 64 73 0a 3b 3b 3b 3b 20 4d 65 6e 75 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f ;.Commands.;;;;.Menu..;;;###auto
4bc00 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 69 65 load(autoload.'forge-repositorie
4bc20 73 2d 6d 65 6e 75 20 22 66 6f 72 67 65 2d 72 65 70 6f 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 s-menu."forge-repos".nil.t).(tra
4bc40 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 66 6f 72 67 65 2d 72 65 70 6f 73 nsient-define-prefix.forge-repos
4bc60 69 74 6f 72 69 65 73 2d 6d 65 6e 75 20 28 29 0a 20 20 22 43 6f 6e 74 72 6f 6c 20 6c 69 73 74 20 itories-menu.()..."Control.list.
4bc80 6f 66 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 64 69 73 70 6c 61 79 65 64 20 69 6e 20 74 68 65 of.repositories.displayed.in.the
4bca0 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 22 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 2d 73 .current.buffer."...:transient-s
4bcc0 75 66 66 69 78 20 74 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 2d 6e 6f 6e 2d 73 75 66 66 69 78 20 uffix.t...:transient-non-suffix.
4bce0 23 27 74 72 61 6e 73 69 65 6e 74 2d 2d 64 6f 2d 63 61 6c 6c 0a 20 20 3a 74 72 61 6e 73 69 65 6e #'transient--do-call...:transien
4bd00 74 2d 73 77 69 74 63 68 2d 66 72 61 6d 65 20 6e 69 6c 0a 20 20 3a 72 65 66 72 65 73 68 2d 73 75 t-switch-frame.nil...:refresh-su
4bd20 66 66 69 78 65 73 20 74 0a 20 20 3a 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 23 27 66 6f 72 67 65 2d ffixes.t...:environment.#'forge-
4bd40 2d 6d 65 6e 75 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 0a 20 20 3a 63 6f 6c 75 6d 6e 2d 77 69 64 74 -menu-environment...:column-widt
4bd60 68 73 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6d 65 6e 75 73 2d 63 6f 6c 75 6d 6e 2d 77 69 64 hs.forge--topic-menus-column-wid
4bd80 74 68 73 0a 20 20 5b 3a 68 69 64 65 20 61 6c 77 61 79 73 20 28 22 71 22 20 66 6f 72 67 65 2d 6d ths...[:hide.always.("q".forge-m
4bda0 65 6e 75 2d 71 75 69 74 2d 6c 69 73 74 29 5d 0a 20 20 5b 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d enu-quit-list)]...[forge--topic-
4bdc0 6d 65 6e 75 73 2d 67 72 6f 75 70 0a 20 20 20 66 6f 72 67 65 2d 2d 6c 69 73 74 73 2d 67 72 6f 75 menus-group....forge--lists-grou
4bde0 70 0a 20 20 20 5b 22 46 69 6c 74 65 72 22 0a 20 20 20 20 28 22 6f 22 20 22 6f 77 6e 65 64 22 20 p....["Filter".....("o"."owned".
4be00 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 0a 20 20 forge-list-owned-repositories...
4be20 20 20 20 3a 69 66 2d 6e 69 6c 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 66 69 ...:if-nil.forge--buffer-list-fi
4be40 6c 74 65 72 29 0a 20 20 20 20 28 22 6f 22 20 22 6f 77 6e 65 64 22 20 66 6f 72 67 65 2d 6c 69 73 lter).....("o"."owned".forge-lis
4be60 74 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 0a 20 20 20 20 20 3a 66 61 63 65 20 66 6f 72 67 65 2d t-repositories......:face.forge-
4be80 73 75 66 66 69 78 2d 61 63 74 69 76 65 0a 20 20 20 20 20 3a 69 66 2d 6e 6f 6e 2d 6e 69 6c 20 66 suffix-active......:if-non-nil.f
4bea0 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 66 69 6c 74 65 72 0a 20 20 20 20 20 3a 69 orge--buffer-list-filter......:i
4bec0 6e 61 70 74 2d 69 66 2d 6d 6f 64 65 20 6e 69 6c 29 5d 5d 0a 20 20 28 69 6e 74 65 72 61 63 74 69 napt-if-mode.nil)]]...(interacti
4bee0 76 65 29 0a 20 20 28 63 6f 6e 64 2d 6c 65 74 0a 20 20 20 20 28 28 64 65 72 69 76 65 64 2d 6d 6f ve)...(cond-let.....((derived-mo
4bf00 64 65 2d 70 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 de-p.'forge-repository-list-mode
4bf20 29 29 0a 20 20 20 20 28 5b 62 75 66 66 65 72 20 28 67 65 74 2d 62 75 66 66 65 72 20 66 6f 72 67 )).....([buffer.(get-buffer.forg
4bf40 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 62 75 66 66 65 72 2d 6e 61 6d 65 29 5d 0a e-repository-list-buffer-name)].
4bf60 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 29 29 0a .....(switch-to-buffer.buffer)).
4bf80 20 20 20 20 28 28 66 6f 72 67 65 2d 6c 69 73 74 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 29 29 29 ....((forge-list-repositories)))
4bfa0 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 ...(transient-setup.'forge-repos
4bfc0 69 74 6f 72 69 65 73 2d 6d 65 6e 75 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 61 75 67 6d 65 itories-menu))..(transient-augme
4bfe0 6e 74 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e nt-suffix.forge-repositories-men
4c000 75 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 20 23 27 74 72 61 6e 73 69 65 6e 74 2d 2d 64 6f 2d 72 u...:transient.#'transient--do-r
4c020 65 70 6c 61 63 65 0a 20 20 3a 69 66 2d 6d 6f 64 65 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 eplace...:if-mode.'forge-reposit
4c040 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 28 23 23 65 71 20 ory-list-mode...:inapt-if.(##eq.
4c060 28 6f 72 65 66 20 74 72 61 6e 73 69 65 6e 74 2d 2d 70 72 65 66 69 78 20 63 6f 6d 6d 61 6e 64 29 (oref.transient--prefix.command)
4c080 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e 75 29 0a 20 20 3a 69 6e .'forge-repositories-menu)...:in
4c0a0 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 29 0a 0a apt-face.'forge-suffix-active)..
4c0c0 3b 3b 3b 3b 20 4c 69 73 74 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 2d 72 65 70 6f ;;;;.List..(defclass.forge--repo
4c0e0 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 29 -list-command.(transient-suffix)
4c100 0a 20 20 28 28 74 79 70 65 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 79 70 65 20 20 ...((type.......:initarg.:type..
4c120 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 66 69 6c 74 65 72 20 20 20 20 20 3a .:initform.nil)....(filter.....:
4c140 69 6e 69 74 61 72 67 20 3a 66 69 6c 74 65 72 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 initarg.:filter.:initform.nil)..
4c160 20 20 28 67 6c 6f 62 61 6c 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 67 6c 6f 62 61 6c 20 3a ..(global.....:initarg.:global.:
4c180 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 initform.nil)))..;;;###autoload(
4c1a0 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 72 65 70 6f 73 69 74 6f 72 69 65 autoload.'forge-list-repositorie
4c1c0 73 20 22 66 6f 72 67 65 2d 72 65 70 6f 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e s."forge-repos".nil.t).(transien
4c1e0 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 72 65 70 6f 73 t-define-suffix.forge-list-repos
4c200 69 74 6f 72 69 65 73 20 28 29 0a 20 20 22 4c 69 73 74 20 6b 6e 6f 77 6e 20 72 65 70 6f 73 69 74 itories.()..."List.known.reposit
4c220 6f 72 69 65 73 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 2e 0a 48 65 72 65 ories.in.a.separate.buffer..Here
4c240 20 5c 22 6b 6e 6f 77 6e 5c 22 20 6d 65 61 6e 73 20 74 68 61 74 20 61 6e 20 65 6e 74 72 79 20 65 .\"known\".means.that.an.entry.e
4c260 78 69 73 74 73 20 69 6e 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 2e 22 0a 20 20 xists.in.the.local.database."...
4c280 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 72 65 70 6f 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 :class.'forge--repo-list-command
4c2a0 20 3a 74 79 70 65 20 27 72 65 70 6f 20 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 3a 69 6e 61 70 74 2d .:type.'repo.:global.t...:inapt-
4c2c0 69 66 2d 6d 6f 64 65 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 6d if-mode.'forge-repository-list-m
4c2e0 6f 64 65 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d ode...:inapt-face.'forge-suffix-
4c300 61 63 74 69 76 65 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 74 65 72 61 63 74 69 76 65 2d 6f active...(declare.(interactive-o
4c320 6e 6c 79 20 6e 69 6c 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 nly.nil))...(interactive)...(for
4c340 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 73 65 74 75 70 20 6e 69 6c 20 23 27 66 ge-repository-list-setup.nil.#'f
4c360 6f 72 67 65 2d 2d 6c 73 2d 72 65 70 6f 73 29 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 orge--ls-repos)...(transient-set
4c380 75 70 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e 75 29 29 0a 0a 3b up.'forge-repositories-menu))..;
4c3a0 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 ;;###autoload(autoload.'forge-li
4c3c0 73 74 2d 6f 77 6e 65 64 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 20 22 66 6f 72 67 65 2d 72 65 70 st-owned-repositories."forge-rep
4c3e0 6f 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 os".nil.t).(transient-define-suf
4c400 66 69 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 72 65 70 6f 73 69 74 6f 72 69 65 fix.forge-list-owned-repositorie
4c420 73 20 28 29 0a 20 20 22 4c 69 73 74 20 79 6f 75 72 20 6f 77 6e 20 6b 6e 6f 77 6e 20 72 65 70 6f s.()..."List.your.own.known.repo
4c440 73 69 74 6f 72 69 65 73 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 2e 0a 48 sitories.in.a.separate.buffer..H
4c460 65 72 65 20 5c 22 6b 6e 6f 77 6e 5c 22 20 6d 65 61 6e 73 20 74 68 61 74 20 61 6e 20 65 6e 74 72 ere.\"known\".means.that.an.entr
4c480 79 20 65 78 69 73 74 73 20 69 6e 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 0a 61 y.exists.in.the.local.database.a
4c4a0 6e 64 20 6f 70 74 69 6f 6e 73 20 60 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e 74 73 nd.options.`forge-owned-accounts
4c4c0 27 20 61 6e 64 20 60 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 69 67 6e 6f 72 65 64 27 0a 63 6f 6e 74 '.and.`forge-owned-ignored'.cont
4c4e0 72 6f 6c 73 20 77 68 69 63 68 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 63 6f 6e 73 rols.which.repositories.are.cons
4c500 69 64 65 72 65 64 20 74 6f 20 62 65 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 2e 0a 4f 6e 6c 79 20 idered.to.be.owned.by.you..Only.
4c520 47 69 74 68 75 62 20 69 73 20 73 75 70 70 6f 72 74 65 64 20 66 6f 72 20 6e 6f 77 2e 22 0a 20 20 Github.is.supported.for.now."...
4c540 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 72 65 70 6f 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 :class.'forge--repo-list-command
4c560 20 3a 74 79 70 65 20 27 72 65 70 6f 20 3a 66 69 6c 74 65 72 20 27 6f 77 6e 65 64 20 3a 67 6c 6f .:type.'repo.:filter.'owned.:glo
4c580 62 61 6c 20 74 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 72 bal.t...(interactive)...(forge-r
4c5a0 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 73 65 74 75 70 20 27 6f 77 6e 65 64 20 23 27 66 6f epository-list-setup.'owned.#'fo
4c5c0 72 67 65 2d 2d 6c 73 2d 6f 77 6e 65 64 2d 72 65 70 6f 73 29 0a 20 20 28 74 72 61 6e 73 69 65 6e rge--ls-owned-repos)...(transien
4c5e0 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e 75 t-setup.'forge-repositories-menu
4c600 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b ))..;;;._.;;.Local.Variables:.;;
4c620 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 .read-symbol-shorthands:.(.;;...
4c640 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e ("and$"............"cond-let--an
4c660 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 20 20 20 2e 20 22 63 6f d$").;;...("and-let"........."co
4c680 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 69 66 2d 6c 65 74 22 nd-let--and-let").;;...("if-let"
4c6a0 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b .........."cond-let--if-let").;;
4c6c0 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d ...("when-let"........"cond-let-
4c6e0 2d 77 68 65 6e 2d 6c 65 74 22 29 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 -when-let")).;;.End:.(provide.'f
4c700 6f 72 67 65 2d 72 65 70 6f 73 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 72 65 70 6f 73 2e 65 6c 20 65 orge-repos).;;;.forge-repos.el.e
4c720 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 nds.here........................
4c740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c7a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c7c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c7e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c800 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 72 65 76 6e 6f 74 forge-20250916.1119/forge-revnot
4c820 65 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 e.el............................
4c840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c860 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
4c880 30 30 30 33 35 32 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 32 32 37 00 20 30 00 00 00 0003524.00000000000.015227..0...
4c8a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c8c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c8e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c900 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
4c920 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
4c940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c9a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c9c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c9e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4ca00 3b 3b 3b 20 66 6f 72 67 65 2d 72 65 76 6e 6f 74 65 2e 65 6c 20 2d 2d 2d 20 52 65 76 6e 6f 74 65 ;;;.forge-revnote.el.---.Revnote
4ca20 20 73 75 70 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 .support..-*-.lexical-binding:t.
4ca40 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 -*-..;;.Copyright.(C).2018-2025.
4ca60 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 Jonas.Bernoulli..;;.Author:.Jona
4ca80 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 s.Bernoulli.<emacs.forge@jonas.b
4caa0 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e ernoulli.dev>.;;.Maintainer:.Jon
4cac0 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e as.Bernoulli.<emacs.forge@jonas.
4cae0 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d bernoulli.dev>..;;.SPDX-License-
4cb00 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b Identifier:.GPL-3.0-or-later..;;
4cb20 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 .This.file.is.free.software:.you
4cb40 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 .can.redistribute.it.and/or.modi
4cb60 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 fy.;;.it.under.the.terms.of.the.
4cb80 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 GNU.General.Public.License.as.pu
4cba0 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 blished.;;.by.the.Free.Software.
4cbc0 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 Foundation,.either.version.3.of.
4cbe0 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 the.License,.;;.or.(at.your.opti
4cc00 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 on).any.later.version..;;.;;.Thi
4cc20 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 s.file.is.distributed.in.the.hop
4cc40 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 e.that.it.will.be.useful,.;;.but
4cc60 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 .WITHOUT.ANY.WARRANTY;.without.e
4cc80 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d ven.the.implied.warranty.of.;;.M
4cca0 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 ERCHANTABILITY.or.FITNESS.FOR.A.
4ccc0 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 PARTICULAR.PURPOSE...See.the.;;.
4cce0 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d GNU.General.Public.License.for.m
4cd00 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 ore.details..;;.;;.You.should.ha
4cd20 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 ve.received.a.copy.of.the.GNU.Ge
4cd40 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 neral.Public.License.;;.along.wi
4cd60 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 th.this.file...If.not,.see.<http
4cd80 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b s://www.gnu.org/licenses/>...;;;
4cda0 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 28 72 65 71 75 69 72 .Code:..(require.'forge).(requir
4cdc0 65 20 27 66 6f 72 67 65 2d 70 6f 73 74 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 74 e.'forge-post).(require.'forge-t
4cde0 6f 70 69 63 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 opic)..;;;.Class..(defclass.forg
4ce00 65 2d 72 65 76 6e 6f 74 65 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 28 28 63 6c 6f 73 e-revnote.(forge-topic)...((clos
4ce20 71 6c 2d 74 61 62 6c 65 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 72 65 76 6e ql-table.........:initform.'revn
4ce40 6f 74 65 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 70 72 69 6d 61 72 79 2d 6b 65 79 20 20 20 3a 69 ote)....(closql-primary-key...:i
4ce60 6e 69 74 66 6f 72 6d 20 27 69 64 29 0a 20 20 20 3b 3b 20 28 63 6c 6f 73 71 6c 2d 6f 72 64 65 72 nitform.'id)....;;.(closql-order
4ce80 2d 62 79 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 5b 28 64 65 73 63 20 6e 75 6d 62 65 72 -by......:initform.[(desc.number
4cea0 29 5d 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 66 6f 72 65 69 67 6e 2d 6b 65 79 20 20 20 3a 69 6e )])....(closql-foreign-key...:in
4cec0 69 74 66 6f 72 6d 20 27 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 63 6c 6f 73 71 6c 2d 63 itform.'repository)....(closql-c
4cee0 6c 61 73 73 2d 70 72 65 66 69 78 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 66 6f 72 67 65 2d 22 29 lass-prefix..:initform."forge-")
4cf00 0a 20 20 20 28 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 ....(id...................:inita
4cf20 72 67 20 3a 69 64 29 0a 20 20 20 28 72 65 70 6f 73 69 74 6f 72 79 20 20 20 20 20 20 20 20 20 20 rg.:id)....(repository..........
4cf40 20 3a 69 6e 69 74 61 72 67 20 3a 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 28 63 6f 6d 6d 69 .:initarg.:repository)....(commi
4cf60 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 63 6f 6d 6d 69 74 t...............:initarg.:commit
4cf80 29 0a 20 20 20 28 66 69 6c 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 )....(file.................:init
4cfa0 61 72 67 20 3a 66 69 6c 65 29 0a 20 20 20 28 6c 69 6e 65 20 20 20 20 20 20 20 20 20 20 20 20 20 arg.:file)....(line.............
4cfc0 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6c 69 6e 65 29 0a 20 20 20 28 61 75 74 68 6f 72 20 20 ....:initarg.:line)....(author..
4cfe0 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 61 75 74 68 6f 72 29 0a 20 .............:initarg.:author)..
4d000 20 20 28 62 6f 64 79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 ..(body.................:initarg
4d020 20 3a 62 6f 64 79 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 .:body)))..;;;._.;;.Local.Variab
4d040 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a 20 les:.;;.read-symbol-shorthands:.
4d060 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d (.;;...("and$"............"cond-
4d080 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 20 let--and$").;;...("and-let".....
4d0a0 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 ...."cond-let--and-let").;;...("
4d0c0 69 66 2d 6c 65 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d 6c if-let".........."cond-let--if-l
4d0e0 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 6f et").;;...("when-let"........"co
4d100 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 29 0a 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f nd-let--when-let")).;;.End:.(pro
4d120 76 69 64 65 20 27 66 6f 72 67 65 2d 72 65 76 6e 6f 74 65 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 72 vide.'forge-revnote).;;;.forge-r
4d140 65 76 6e 6f 74 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 evnote.el.ends.here.............
4d160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d1a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d1c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d1e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d200 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 73 65 6d 69 2e 65 forge-20250916.1119/forge-semi.e
4d220 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 l...............................
4d240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d260 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
4d280 30 30 31 30 36 34 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 30 33 00 20 30 00 00 00 0010644.00000000000.014503..0...
4d2a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d2c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d2e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d300 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
4d320 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
4d340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d400 3b 3b 3b 20 66 6f 72 67 65 2d 73 65 6d 69 2e 65 6c 20 2d 2d 2d 20 53 75 70 70 6f 72 74 20 66 6f ;;;.forge-semi.el.---.Support.fo
4d420 72 20 73 65 6d 69 2d 66 6f 72 67 65 73 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 r.semi-forges..-*-.lexical-bindi
4d440 6e 67 3a 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d ng:t.-*-..;;.Copyright.(C).2018-
4d460 32 30 32 35 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 2025.Jonas.Bernoulli..;;.Author:
4d480 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f .Jonas.Bernoulli.<emacs.forge@jo
4d4a0 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 nas.bernoulli.dev>.;;.Maintainer
4d4c0 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a :.Jonas.Bernoulli.<emacs.forge@j
4d4e0 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 onas.bernoulli.dev>..;;.SPDX-Lic
4d500 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 ense-Identifier:.GPL-3.0-or-late
4d520 72 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 r..;;.This.file.is.free.software
4d540 3a 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 :.you.can.redistribute.it.and/or
4d560 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 .modify.;;.it.under.the.terms.of
4d580 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 .the.GNU.General.Public.License.
4d5a0 61 73 20 70 75 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 as.published.;;.by.the.Free.Soft
4d5c0 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 ware.Foundation,.either.version.
4d5e0 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 3.of.the.License,.;;.or.(at.your
4d600 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b .option).any.later.version..;;.;
4d620 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 ;.This.file.is.distributed.in.th
4d640 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b e.hope.that.it.will.be.useful,.;
4d660 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 ;.but.WITHOUT.ANY.WARRANTY;.with
4d680 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 out.even.the.implied.warranty.of
4d6a0 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 .;;.MERCHANTABILITY.or.FITNESS.F
4d6c0 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 OR.A.PARTICULAR.PURPOSE...See.th
4d6e0 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 e.;;.GNU.General.Public.License.
4d700 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 for.more.details..;;.;;.You.shou
4d720 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 ld.have.received.a.copy.of.the.G
4d740 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f NU.General.Public.License.;;.alo
4d760 6e 67 20 77 69 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 ng.with.this.file...If.not,.see.
4d780 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e <https://www.gnu.org/licenses/>.
4d7a0 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 0a 3b ..;;;.Code:..(require.'forge)..;
4d7c0 3b 3b 20 43 6c 61 73 73 65 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 67 69 74 77 ;;.Classes..(defclass.forge-gitw
4d7e0 65 62 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 6e 6f 61 70 69 2d 72 65 70 6f 73 eb-repository.(forge-noapi-repos
4d800 69 74 6f 72 79 29 0a 20 20 28 28 63 6f 6d 6d 69 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e itory)...((commit-url-format.:in
4d820 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 67 69 74 77 65 62 2f 3f 70 3d 25 50 2e itform."https://%h/gitweb/?p=%P.
4d840 67 69 74 3b 61 3d 63 6f 6d 6d 69 74 64 69 66 66 3b 68 3d 25 72 22 29 0a 20 20 20 28 62 72 61 6e git;a=commitdiff;h=%r")....(bran
4d860 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f ch-url-format.:initform."https:/
4d880 2f 25 68 2f 67 69 74 77 65 62 2f 3f 70 3d 25 50 2e 67 69 74 3b 61 3d 6c 6f 67 3b 68 3d 72 65 66 /%h/gitweb/?p=%P.git;a=log;h=ref
4d8a0 73 2f 68 65 61 64 73 2f 25 72 22 29 0a 20 20 20 28 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f 72 6d s/heads/%r")....(remote-url-form
4d8c0 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 67 69 74 77 65 62 2f at.:initform."https://%h/gitweb/
4d8e0 3f 70 3d 25 50 2e 67 69 74 3b 61 3d 73 75 6d 6d 61 72 79 22 29 0a 20 20 20 3b 3b 20 57 65 20 6d ?p=%P.git;a=summary")....;;.We.m
4d900 75 73 74 20 75 73 65 20 22 68 62 3d 42 52 41 4e 43 48 22 20 62 65 63 61 75 73 65 20 22 68 3d 72 ust.use."hb=BRANCH".because."h=r
4d920 65 66 73 2f 68 65 61 64 73 2f 42 52 41 4e 43 48 22 20 64 6f 65 73 20 6e 6f 74 20 77 6f 72 6b 0a efs/heads/BRANCH".does.not.work.
4d940 20 20 20 3b 3b 20 68 65 72 65 2e 20 20 53 6f 20 22 25 72 22 20 73 74 61 6e 64 73 20 66 6f 72 20 ...;;.here...So."%r".stands.for.
4d960 65 69 74 68 65 72 20 22 68 62 3d 42 52 41 4e 43 48 22 20 6f 72 20 22 68 3d 48 41 53 48 22 20 61 either."hb=BRANCH".or."h=HASH".a
4d980 6e 64 20 77 68 69 63 68 0a 20 20 20 3b 3b 20 69 74 20 69 73 2c 20 68 61 73 20 74 6f 20 62 65 20 nd.which....;;.it.is,.has.to.be.
4d9a0 68 61 6e 64 6c 65 64 20 61 73 20 61 20 73 70 65 63 69 61 6c 20 63 61 73 65 20 69 6e 20 60 66 6f handled.as.a.special.case.in.`fo
4d9c0 72 67 65 2d 67 65 74 2d 75 72 6c 28 3a 62 6c 6f 62 29 27 2e 0a 20 20 20 28 62 6c 6f 62 2d 75 72 rge-get-url(:blob)'.....(blob-ur
4d9e0 6c 2d 66 6f 72 6d 61 74 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 l-format...:initform."https://%h
4da00 2f 67 69 74 77 65 62 2f 3f 70 3d 25 50 2e 67 69 74 3b 61 3d 62 6c 6f 62 3b 66 3d 25 73 3b 25 72 /gitweb/?p=%P.git;a=blob;f=%s;%r
4da20 22 29 29 0a 20 20 22 47 69 74 77 65 62 20 66 72 6f 6d 20 68 74 74 70 73 3a 2f 2f 67 69 74 2d 73 "))..."Gitweb.from.https://git-s
4da40 63 6d 2e 63 6f 6d 2f 64 6f 63 73 2f 67 69 74 77 65 62 2e 22 29 0a 0a 28 64 65 66 63 6c 61 73 73 cm.com/docs/gitweb.")..(defclass
4da60 20 66 6f 72 67 65 2d 63 67 69 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 6e 6f .forge-cgit-repository.(forge-no
4da80 61 70 69 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 28 28 63 6f 6d 6d 69 74 2d 75 72 6c 2d 66 api-repository)...((commit-url-f
4daa0 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 70 2e 67 ormat.:initform."https://%h/%p.g
4dac0 69 74 2f 63 6f 6d 6d 69 74 2f 3f 69 64 3d 25 72 22 29 0a 20 20 20 28 62 72 61 6e 63 68 2d 75 72 it/commit/?id=%r")....(branch-ur
4dae0 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 l-format.:initform."https://%h/%
4db00 70 2e 67 69 74 2f 6c 6f 67 2f 3f 68 3d 25 72 22 29 0a 20 20 20 28 72 65 6d 6f 74 65 2d 75 72 6c p.git/log/?h=%r")....(remote-url
4db20 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 70 -format.:initform."https://%h/%p
4db40 2e 67 69 74 2f 61 62 6f 75 74 22 29 0a 20 20 20 28 62 6c 6f 62 2d 75 72 6c 2d 66 6f 72 6d 61 74 .git/about")....(blob-url-format
4db60 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 70 2e 67 69 74 2f ...:initform."https://%h/%p.git/
4db80 74 72 65 65 2f 25 66 3f 69 64 3d 25 72 22 29 29 0a 20 20 22 43 67 69 74 20 66 72 6f 6d 20 68 74 tree/%f?id=%r"))..."Cgit.from.ht
4dba0 74 70 73 3a 2f 2f 67 69 74 2e 7a 78 32 63 34 2e 63 6f 6d 2f 63 67 69 74 2f 61 62 6f 75 74 2e 0a tps://git.zx2c4.com/cgit/about..
4dbc0 44 69 66 66 65 72 65 6e 74 20 68 6f 73 74 73 20 75 73 65 20 64 69 66 66 65 72 65 6e 74 20 75 72 Different.hosts.use.different.ur
4dbe0 6c 20 73 63 68 65 6d 61 74 61 2c 20 73 6f 20 77 65 20 6e 65 65 64 20 6d 75 6c 74 69 70 6c 65 0a l.schemata,.so.we.need.multiple.
4dc00 63 6c 61 73 73 65 73 2e 20 20 53 65 65 20 74 68 65 69 72 20 64 65 66 69 6e 69 74 69 6f 6e 73 20 classes...See.their.definitions.
4dc20 69 6e 20 5c 22 66 6f 72 67 65 2d 73 65 6d 69 2e 65 6c 5c 22 2e 22 29 0a 0a 28 64 65 66 63 6c 61 in.\"forge-semi.el\".")..(defcla
4dc40 73 73 20 66 6f 72 67 65 2d 63 67 69 74 2a 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 ss.forge-cgit*-repository.(forge
4dc60 2d 63 67 69 74 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 28 28 63 6f 6d 6d 69 74 2d 75 72 6c -cgit-repository)...((commit-url
4dc80 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 63 67 -format.:initform."https://%h/cg
4dca0 69 74 2f 25 70 2e 67 69 74 2f 63 6f 6d 6d 69 74 2f 3f 69 64 3d 25 72 22 29 0a 20 20 20 28 62 72 it/%p.git/commit/?id=%r")....(br
4dcc0 61 6e 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 anch-url-format.:initform."https
4dce0 3a 2f 2f 25 68 2f 63 67 69 74 2f 25 70 2e 67 69 74 2f 6c 6f 67 2f 3f 68 3d 25 72 22 29 0a 20 20 ://%h/cgit/%p.git/log/?h=%r")...
4dd00 20 28 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 .(remote-url-format.:initform."h
4dd20 74 74 70 73 3a 2f 2f 25 68 2f 63 67 69 74 2f 25 70 2e 67 69 74 2f 61 62 6f 75 74 22 29 0a 20 20 ttps://%h/cgit/%p.git/about")...
4dd40 20 28 62 6c 6f 62 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 .(blob-url-format...:initform."h
4dd60 74 74 70 73 3a 2f 2f 25 68 2f 63 67 69 74 2f 25 70 2e 67 69 74 2f 74 72 65 65 2f 25 66 3f 69 64 ttps://%h/cgit/%p.git/tree/%f?id
4dd80 3d 25 72 22 29 29 0a 20 20 22 43 67 69 74 20 66 72 6f 6d 20 68 74 74 70 73 3a 2f 2f 67 69 74 2e =%r"))..."Cgit.from.https://git.
4dda0 7a 78 32 63 34 2e 63 6f 6d 2f 63 67 69 74 2f 61 62 6f 75 74 2e 0a 44 69 66 66 65 72 65 6e 74 20 zx2c4.com/cgit/about..Different.
4ddc0 68 6f 73 74 73 20 75 73 65 20 64 69 66 66 65 72 65 6e 74 20 75 72 6c 20 73 63 68 65 6d 61 74 61 hosts.use.different.url.schemata
4dde0 2c 20 73 6f 20 77 65 20 6e 65 65 64 20 6d 75 6c 74 69 70 6c 65 0a 63 6c 61 73 73 65 73 2e 20 20 ,.so.we.need.multiple.classes...
4de00 53 65 65 20 74 68 65 69 72 20 64 65 66 69 6e 69 74 69 6f 6e 73 20 69 6e 20 5c 22 66 6f 72 67 65 See.their.definitions.in.\"forge
4de20 2d 73 65 6d 69 2e 65 6c 5c 22 2e 22 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 63 -semi.el\".")..(defclass.forge-c
4de40 67 69 74 2a 2a 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 63 67 69 74 2d 72 65 70 git**-repository.(forge-cgit-rep
4de60 6f 73 69 74 6f 72 79 29 0a 20 20 28 28 63 6f 6d 6d 69 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a ository)...((commit-url-format.:
4de80 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 63 67 69 74 2f 25 6e 2e 67 69 74 initform."https://%h/cgit/%n.git
4dea0 2f 63 6f 6d 6d 69 74 2f 3f 69 64 3d 25 72 22 29 0a 20 20 20 28 62 72 61 6e 63 68 2d 75 72 6c 2d /commit/?id=%r")....(branch-url-
4dec0 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 63 67 69 format.:initform."https://%h/cgi
4dee0 74 2f 25 6e 2e 67 69 74 2f 6c 6f 67 2f 3f 68 3d 25 72 22 29 0a 20 20 20 28 72 65 6d 6f 74 65 2d t/%n.git/log/?h=%r")....(remote-
4df00 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 url-format.:initform."https://%h
4df20 2f 63 67 69 74 2f 25 6e 2e 67 69 74 2f 61 62 6f 75 74 22 29 0a 20 20 20 28 62 6c 6f 62 2d 75 72 /cgit/%n.git/about")....(blob-ur
4df40 6c 2d 66 6f 72 6d 61 74 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 l-format...:initform."https://%h
4df60 2f 63 67 69 74 2f 25 6e 2e 67 69 74 2f 74 72 65 65 2f 25 66 3f 69 64 3d 25 72 22 29 29 0a 20 20 /cgit/%n.git/tree/%f?id=%r"))...
4df80 22 43 67 69 74 20 66 72 6f 6d 20 68 74 74 70 73 3a 2f 2f 67 69 74 2e 7a 78 32 63 34 2e 63 6f 6d "Cgit.from.https://git.zx2c4.com
4dfa0 2f 63 67 69 74 2f 61 62 6f 75 74 2e 0a 44 69 66 66 65 72 65 6e 74 20 68 6f 73 74 73 20 75 73 65 /cgit/about..Different.hosts.use
4dfc0 20 64 69 66 66 65 72 65 6e 74 20 75 72 6c 20 73 63 68 65 6d 61 74 61 2c 20 73 6f 20 77 65 20 6e .different.url.schemata,.so.we.n
4dfe0 65 65 64 20 6d 75 6c 74 69 70 6c 65 0a 63 6c 61 73 73 65 73 2e 20 20 53 65 65 20 74 68 65 69 72 eed.multiple.classes...See.their
4e000 20 64 65 66 69 6e 69 74 69 6f 6e 73 20 69 6e 20 5c 22 66 6f 72 67 65 2d 73 65 6d 69 2e 65 6c 5c .definitions.in.\"forge-semi.el\
4e020 22 2e 22 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 72 65 70 6f 6f 72 63 7a 2d 72 ".")..(defclass.forge-repoorcz-r
4e040 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 63 67 69 74 2d 72 65 70 6f 73 69 74 6f 72 79 epository.(forge-cgit-repository
4e060 29 0a 20 20 28 28 63 6f 6d 6d 69 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 )...((commit-url-format.:initfor
4e080 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 70 2e 67 69 74 2f 63 6f 6d 6d 69 74 2f 25 72 22 29 m."https://%h/%p.git/commit/%r")
4e0a0 0a 20 20 20 28 62 72 61 6e 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d ....(branch-url-format.:initform
4e0c0 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 70 2e 67 69 74 2f 6c 6f 67 2f 25 72 22 29 0a 20 20 20 ."https://%h/%p.git/log/%r")....
4e0e0 28 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 (remote-url-format.:initform."ht
4e100 74 70 73 3a 2f 2f 25 68 2f 25 70 2e 67 69 74 22 29 0a 20 20 20 28 62 6c 6f 62 2d 75 72 6c 2d 66 tps://%h/%p.git")....(blob-url-f
4e120 6f 72 6d 61 74 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 70 ormat...:initform."https://%h/%p
4e140 2e 67 69 74 2f 62 6c 6f 62 2f 25 72 3a 2f 25 66 22 29 29 0a 20 20 22 43 67 69 74 20 66 6f 72 6b .git/blob/%r:/%f"))..."Cgit.fork
4e160 20 75 73 65 64 20 6f 6e 20 68 74 74 70 73 3a 2f 2f 72 65 70 6f 2e 6f 72 2e 63 7a 2f 63 67 69 74 .used.on.https://repo.or.cz/cgit
4e180 2e 67 69 74 2e 0a 44 69 66 66 65 72 65 6e 74 20 68 6f 73 74 73 20 75 73 65 20 64 69 66 66 65 72 .git..Different.hosts.use.differ
4e1a0 65 6e 74 20 75 72 6c 20 73 63 68 65 6d 61 74 61 2c 20 73 6f 20 77 65 20 6e 65 65 64 20 6d 75 6c ent.url.schemata,.so.we.need.mul
4e1c0 74 69 70 6c 65 0a 63 6c 61 73 73 65 73 2e 20 20 53 65 65 20 74 68 65 69 72 20 64 65 66 69 6e 69 tiple.classes...See.their.defini
4e1e0 74 69 6f 6e 73 20 69 6e 20 5c 22 66 6f 72 67 65 2d 73 65 6d 69 2e 65 6c 5c 22 2e 22 29 0a 0a 28 tions.in.\"forge-semi.el\".")..(
4e200 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 73 74 61 67 69 74 2d 72 65 70 6f 73 69 74 6f 72 79 defclass.forge-stagit-repository
4e220 20 28 66 6f 72 67 65 2d 6e 6f 61 70 69 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 28 28 63 6f .(forge-noapi-repository)...((co
4e240 6d 6d 69 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 mmit-url-format.:initform."https
4e260 3a 2f 2f 25 68 2f 25 6e 2f 63 6f 6d 6d 69 74 2f 25 72 2e 68 74 6d 6c 22 29 0a 20 20 20 28 62 72 ://%h/%n/commit/%r.html")....(br
4e280 61 6e 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 anch-url-format.:initform."https
4e2a0 3a 2f 2f 25 68 2f 25 6e 2f 72 65 66 73 2e 68 74 6d 6c 22 29 0a 20 20 20 28 72 65 6d 6f 74 65 2d ://%h/%n/refs.html")....(remote-
4e2c0 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 url-format.:initform."https://%h
4e2e0 2f 25 6e 2f 66 69 6c 65 2f 52 45 41 44 4d 45 2e 68 74 6d 6c 22 29 0a 20 20 20 3b 3b 20 43 61 6e /%n/file/README.html")....;;.Can
4e300 20 6f 6e 6c 79 20 6c 69 6e 6b 20 74 6f 20 74 68 65 20 74 69 70 20 6f 66 20 74 68 65 20 6d 61 69 .only.link.to.the.tip.of.the.mai
4e320 6e 20 62 72 61 6e 63 68 2e 0a 20 20 20 28 62 6c 6f 62 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 n.branch.....(blob-url-format...
4e340 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6e 2f 22 29 29 0a 20 20 22 :initform."https://%h/%n/"))..."
4e360 53 74 61 67 69 74 20 66 72 6f 6d 20 68 74 74 70 73 3a 2f 2f 63 6f 64 65 6d 61 64 6e 65 73 73 2e Stagit.from.https://codemadness.
4e380 6f 72 67 2f 67 69 74 2f 73 74 61 67 69 74 2f 66 69 6c 65 2f 52 45 41 44 4d 45 2e 68 74 6d 6c 2e org/git/stagit/file/README.html.
4e3a0 0a 4f 6e 6c 79 20 74 68 65 20 68 69 73 74 6f 72 79 20 6f 66 20 5c 22 6d 61 73 74 65 72 5c 22 20 .Only.the.history.of.\"master\".
4e3c0 63 61 6e 20 62 65 20 73 68 6f 77 6e 2c 20 73 6f 20 74 68 69 73 20 6c 69 6e 6b 73 20 74 6f 20 74 can.be.shown,.so.this.links.to.t
4e3e0 68 65 0a 6c 69 73 74 20 6f 66 20 72 65 66 73 20 69 6e 73 74 65 61 64 20 6f 66 20 74 68 65 20 6c he.list.of.refs.instead.of.the.l
4e400 6f 67 20 6f 66 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 62 72 61 6e 63 68 2e 22 29 0a 0a 28 og.of.the.specified.branch.")..(
4e420 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 73 72 68 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 defclass.forge-srht-repository.(
4e440 66 6f 72 67 65 2d 6e 6f 61 70 69 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 28 28 63 6f 6d 6d forge-noapi-repository)...((comm
4e460 69 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f it-url-format.:initform."https:/
4e480 2f 25 68 2f 7e 25 6f 2f 25 6e 2f 63 6f 6d 6d 69 74 2f 25 72 22 29 0a 20 20 20 28 62 72 61 6e 63 /%h/~%o/%n/commit/%r")....(branc
4e4a0 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f h-url-format.:initform."https://
4e4c0 25 68 2f 7e 25 6f 2f 25 6e 2f 6c 6f 67 2f 25 72 22 29 0a 20 20 20 28 72 65 6d 6f 74 65 2d 75 72 %h/~%o/%n/log/%r")....(remote-ur
4e4e0 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 7e l-format.:initform."https://%h/~
4e500 25 6f 2f 25 6e 22 29 0a 20 20 20 28 62 6c 6f 62 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 3a 69 %o/%n")....(blob-url-format...:i
4e520 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 7e 25 6f 2f 25 6e 2f 74 72 65 65 2f nitform."https://%h/~%o/%n/tree/
4e540 25 72 2f 69 74 65 6d 2f 25 66 22 29 29 0a 20 20 22 53 65 65 20 68 74 74 70 73 3a 2f 2f 6d 65 74 %r/item/%f"))..."See.https://met
4e560 61 2e 73 72 2e 68 74 2e 22 29 0a 0a 3b 3b 3b 20 5f 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 a.sr.ht.")..;;;._.(provide.'forg
4e580 65 2d 73 65 6d 69 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 73 65 6d 69 2e 65 6c 20 65 6e 64 73 20 68 e-semi).;;;.forge-semi.el.ends.h
4e5a0 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ere.............................
4e5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e600 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 74 61 62 6c 69 73 forge-20250916.1119/forge-tablis
4e620 74 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 t.el............................
4e640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e660 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
4e680 30 30 30 36 35 37 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 32 31 35 00 20 30 00 00 00 0006572.00000000000.015215..0...
4e6a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e6c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e6e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e700 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
4e720 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
4e740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e7a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e7c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e7e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e800 3b 3b 3b 20 66 6f 72 67 65 2d 74 61 62 6c 69 73 74 2e 65 6c 20 2d 2d 2d 20 54 61 62 75 6c 61 74 ;;;.forge-tablist.el.---.Tabulat
4e820 65 64 2d 6c 69 73 74 20 69 6e 74 65 72 66 61 63 65 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 ed-list.interface..-*-.lexical-b
4e840 69 6e 64 69 6e 67 3a 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 inding:t.-*-..;;.Copyright.(C).2
4e860 30 31 38 2d 32 30 32 35 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 018-2025.Jonas.Bernoulli..;;.Aut
4e880 68 6f 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 hor:.Jonas.Bernoulli.<emacs.forg
4e8a0 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 e@jonas.bernoulli.dev>.;;.Mainta
4e8c0 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 iner:.Jonas.Bernoulli.<emacs.for
4e8e0 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 ge@jonas.bernoulli.dev>..;;.SPDX
4e900 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d -License-Identifier:.GPL-3.0-or-
4e920 6c 61 74 65 72 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 later..;;.This.file.is.free.soft
4e940 77 61 72 65 3a 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e ware:.you.can.redistribute.it.an
4e960 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d d/or.modify.;;.it.under.the.term
4e980 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 s.of.the.GNU.General.Public.Lice
4e9a0 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 nse.as.published.;;.by.the.Free.
4e9c0 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 Software.Foundation,.either.vers
4e9e0 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 ion.3.of.the.License,.;;.or.(at.
4ea00 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a your.option).any.later.version..
4ea20 3b 3b 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 ;;.;;.This.file.is.distributed.i
4ea40 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 n.the.hope.that.it.will.be.usefu
4ea60 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 l,.;;.but.WITHOUT.ANY.WARRANTY;.
4ea80 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 without.even.the.implied.warrant
4eaa0 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 y.of.;;.MERCHANTABILITY.or.FITNE
4eac0 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 SS.FOR.A.PARTICULAR.PURPOSE...Se
4eae0 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 e.the.;;.GNU.General.Public.Lice
4eb00 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 nse.for.more.details..;;.;;.You.
4eb20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 should.have.received.a.copy.of.t
4eb40 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b he.GNU.General.Public.License.;;
4eb60 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 .along.with.this.file...If.not,.
4eb80 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 see.<https://www.gnu.org/license
4eba0 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 74 61 62 75 6c s/>...;;;.Code:..(require.'tabul
4ebc0 61 74 65 64 2d 6c 69 73 74 29 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 0a 28 64 ated-list)..(require.'forge)..(d
4ebe0 65 66 63 6f 6e 73 74 20 66 6f 72 67 65 2d 2d 74 61 62 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 2d 74 efconst.forge--tablist-columns-t
4ec00 79 70 65 0a 20 20 27 28 72 65 70 65 61 74 0a 20 20 20 20 28 6c 69 73 74 20 3a 74 61 67 20 22 43 ype...'(repeat.....(list.:tag."C
4ec20 6f 6c 75 6d 6e 22 0a 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 20 20 3a 74 61 67 20 22 olumn"...........(string..:tag."
4ec40 48 65 61 64 65 72 20 4c 61 62 65 6c 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 Header.Label")...........(choice
4ec60 20 20 3a 74 61 67 20 22 56 61 6c 75 65 20 73 6f 75 72 63 65 22 0a 20 20 20 20 20 20 20 20 20 20 ..:tag."Value.source"...........
4ec80 20 20 20 20 20 20 20 20 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .........function...............
4eca0 20 20 20 20 20 28 73 79 6d 62 6f 6c 20 3a 74 61 67 20 22 4f 62 6a 65 63 74 20 73 6c 6f 74 22 29 .....(symbol.:tag."Object.slot")
4ecc0 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 67 65 72 20 3a 74 61 67 20 22 43 6f 6c 75 6d )...........(integer.:tag."Colum
4ece0 6e 20 57 69 64 74 68 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 20 20 3a 74 61 n.Width")...........(choice..:ta
4ed00 67 20 22 53 6f 72 74 20 70 72 65 64 69 63 61 74 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 g."Sort.predicate"..............
4ed20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 44 6f 6e 27 74 20 73 6f 72 74 22 20 6e ......(const.:tag."Don't.sort".n
4ed40 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 il)....................(const.:t
4ed60 61 67 20 22 44 65 66 61 75 6c 74 22 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ag."Default".t).................
4ed80 20 20 20 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 20 20 20 ...function)...........(plist...
4eda0 3a 74 61 67 20 22 50 72 6f 70 65 72 74 69 65 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :tag."Properties"...............
4edc0 20 20 20 20 20 3a 6b 65 79 2d 74 79 70 65 20 28 63 68 6f 69 63 65 20 3a 74 61 67 20 22 50 72 6f .....:key-type.(choice.:tag."Pro
4ede0 70 65 72 74 79 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 perty"..........................
4ee00 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 72 69 67 68 74 2d 61 6c 69 67 6e 29 ............(const.:right-align)
4ee20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4ee40 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 70 61 64 2d 72 69 67 68 74 29 0a 20 20 20 20 20 20 20 ......(const.:pad-right)........
4ee60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 79 ..............................sy
4ee80 6d 62 6f 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 76 61 6c 75 65 2d mbol)....................:value-
4eea0 74 79 70 65 20 28 73 65 78 70 20 3a 74 61 67 20 22 56 61 6c 75 65 22 29 29 29 29 29 0a 0a 28 64 type.(sexp.:tag."Value")))))..(d
4eec0 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 2d 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 efvar-local.forge--tabulated-lis
4eee0 74 2d 63 6f 6c 75 6d 6e 73 20 6e 69 6c 29 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 2d 74 61 62 75 t-columns.nil).(put.'forge--tabu
4ef00 6c 61 74 65 64 2d 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 20 27 70 65 72 6d 61 6e 65 6e 74 2d 6c 6f lated-list-columns.'permanent-lo
4ef20 63 61 6c 20 74 29 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 2d 74 61 62 cal.t)..(defvar-local.forge--tab
4ef40 75 6c 61 74 65 64 2d 6c 69 73 74 2d 71 75 65 72 79 20 6e 69 6c 29 0a 28 70 75 74 20 27 66 6f 72 ulated-list-query.nil).(put.'for
4ef60 67 65 2d 2d 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 71 75 65 72 79 20 27 70 65 72 6d 61 6e ge--tabulated-list-query.'perman
4ef80 65 6e 74 2d 6c 6f 63 61 6c 20 74 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 74 61 62 6c ent-local.t)..(defun.forge--tabl
4efa0 69 73 74 2d 72 65 66 72 65 73 68 20 28 29 0a 20 20 28 73 65 74 71 20 74 61 62 75 6c 61 74 65 64 ist-refresh.()...(setq.tabulated
4efc0 2d 6c 69 73 74 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 28 76 63 6f 6e 63 61 74 20 28 6d -list-format.........(vconcat.(m
4efe0 61 70 63 61 72 20 28 70 63 61 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 6e 61 6d 65 20 2c 5f 67 apcar.(pcase-lambda.(`(,name.,_g
4f000 65 74 20 2c 77 69 64 74 68 20 2c 73 6f 72 74 20 2c 70 72 6f 70 73 29 29 0a 20 20 20 20 20 20 20 et.,width.,sort.,props))........
4f020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 2c 6e 61 6d 65 20 2c 77 69 64 ....................`(,name.,wid
4f040 74 68 20 2c 73 6f 72 74 20 2e 20 2c 70 72 6f 70 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 th.,sort...,props)).............
4f060 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 2d 74 61 62 75 6c 61 74 65 64 2d 6c 69 .............forge--tabulated-li
4f080 73 74 2d 63 6f 6c 75 6d 6e 73 29 29 29 0a 20 20 28 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d st-columns)))...(tabulated-list-
4f0a0 69 6e 69 74 2d 68 65 61 64 65 72 29 0a 20 20 28 73 65 74 71 20 74 61 62 75 6c 61 74 65 64 2d 6c init-header)...(setq.tabulated-l
4f0c0 69 73 74 2d 65 6e 74 72 69 65 73 0a 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 0a 20 20 20 20 ist-entries.........(mapcar.....
4f0e0 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 6f 62 6a 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c .....(lambda.(obj)............(l
4f100 69 73 74 20 28 6f 72 65 66 20 6f 62 6a 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ist.(oref.obj.id)...............
4f120 20 20 20 28 76 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d ...(vconcat...................(m
4f140 61 70 63 61 72 20 28 70 63 61 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 5f 6e 61 6d 65 20 2c 67 apcar.(pcase-lambda.(`(,_name.,g
4f160 65 74 20 2c 5f 77 69 64 74 68 20 2c 5f 73 6f 72 74 20 2c 5f 70 72 6f 70 73 29 29 0a 20 20 20 20 et.,_width.,_sort.,_props)).....
4f180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 76 ........................(let.((v
4f1a0 61 6c 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 al.(cond........................
4f1c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 75 6e 63 74 69 6f 6e 70 20 67 65 74 .................((functionp.get
4f1e0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )...............................
4f200 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 67 65 74 20 6f 62 6a 29 29 0a 20 20 ...........(funcall.get.obj))...
4f220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4f240 20 20 20 20 20 20 28 28 65 71 20 28 63 61 72 2d 73 61 66 65 20 67 65 74 29 20 27 72 65 70 6f 73 ......((eq.(car-safe.get).'repos
4f260 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 itory)..........................
4f280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 69 65 69 6f 2d 6f 72 65 66 20 28 66 6f 72 ................(eieio-oref.(for
4f2a0 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 29 0a 20 20 20 20 20 20 20 20 20 ge-get-repository.obj)..........
4f2c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4f2e0 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 64 72 20 67 65 74 29 29 29 0a 20 20 20 20 20 20 20 ............(cadr.get)))........
4f300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4f320 20 28 28 65 69 65 69 6f 2d 6f 72 65 66 20 6f 62 6a 20 67 65 74 29 29 29 29 29 0a 20 20 20 20 20 .((eieio-oref.obj.get)))))......
4f340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 .........................(cond.(
4f360 28 73 74 72 69 6e 67 70 20 76 61 6c 29 20 76 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 (stringp.val).val)..............
4f380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 75 6c 6c 20 76 61 .......................((null.va
4f3a0 6c 29 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l)."")..........................
4f3c0 20 20 20 20 20 20 20 20 20 20 20 28 28 66 6f 72 6d 61 74 20 22 25 73 22 20 76 61 6c 29 29 29 29 ...........((format."%s".val))))
4f3e0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 )...........................forg
4f400 65 2d 2d 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 29 29 29 29 0a 20 20 e--tabulated-list-columns))))...
4f420 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6f 72 67 65 2d 2d 74 61 62 75 6c 61 74 65 64 .......(funcall.forge--tabulated
4f440 2d 6c 69 73 74 2d 71 75 65 72 79 29 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 -list-query))))..;;;._.;;.Local.
4f460 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 Variables:.;;.read-symbol-shorth
4f480 61 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 20 20 20 2e 20 ands:.(.;;...("and$"............
4f4a0 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 "cond-let--and$").;;...("and-let
4f4c0 22 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b "........."cond-let--and-let").;
4f4e0 3b 20 20 20 28 22 69 66 2d 6c 65 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 ;...("if-let".........."cond-let
4f500 2d 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 --if-let").;;...("when-let".....
4f520 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 29 0a 3b 3b 20 45 6e 64 ..."cond-let--when-let")).;;.End
4f540 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 74 61 62 6c 69 73 74 29 0a 3b 3b 3b 20 66 :.(provide.'forge-tablist).;;;.f
4f560 6f 72 67 65 2d 74 61 62 6c 69 73 74 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 orge-tablist.el.ends.here.......
4f580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f5a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f600 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 74 6f 70 69 63 2e forge-20250916.1119/forge-topic.
4f620 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 el..............................
4f640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f660 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
4f680 30 32 34 35 32 33 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 36 37 31 00 20 30 00 00 00 0245234.00000000000.014671..0...
4f6a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f6c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f6e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f700 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
4f720 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
4f740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f7a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f7c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f7e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f800 3b 3b 3b 20 66 6f 72 67 65 2d 74 6f 70 69 63 2e 65 6c 20 2d 2d 2d 20 54 6f 70 69 63 73 20 73 75 ;;;.forge-topic.el.---.Topics.su
4f820 70 70 6f 72 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 2d 2a 2d pport..-*-.lexical-binding:t.-*-
4f840 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f 6e ..;;.Copyright.(C).2018-2025.Jon
4f860 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 73 20 42 as.Bernoulli..;;.Author:.Jonas.B
4f880 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e ernoulli.<emacs.forge@jonas.bern
4f8a0 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 oulli.dev>.;;.Maintainer:.Jonas.
4f8c0 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 Bernoulli.<emacs.forge@jonas.ber
4f8e0 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 noulli.dev>..;;.SPDX-License-Ide
4f900 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 68 ntifier:.GPL-3.0-or-later..;;.Th
4f920 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61 is.file.is.free.software:.you.ca
4f940 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a n.redistribute.it.and/or.modify.
4f960 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 ;;.it.under.the.terms.of.the.GNU
4f980 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 .General.Public.License.as.publi
4f9a0 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 shed.;;.by.the.Free.Software.Fou
4f9c0 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 ndation,.either.version.3.of.the
4f9e0 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 .License,.;;.or.(at.your.option)
4fa00 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 66 .any.later.version..;;.;;.This.f
4fa20 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 ile.is.distributed.in.the.hope.t
4fa40 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 hat.it.will.be.useful,.;;.but.WI
4fa60 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e THOUT.ANY.WARRANTY;.without.even
4fa80 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 .the.implied.warranty.of.;;.MERC
4faa0 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 HANTABILITY.or.FITNESS.FOR.A.PAR
4fac0 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 TICULAR.PURPOSE...See.the.;;.GNU
4fae0 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 .General.Public.License.for.more
4fb00 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 .details..;;.;;.You.should.have.
4fb20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 received.a.copy.of.the.GNU.Gener
4fb40 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 al.Public.License.;;.along.with.
4fb60 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f this.file...If.not,.see.<https:/
4fb80 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f /www.gnu.org/licenses/>...;;;.Co
4fba0 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 62 6f 6f 6b 6d 61 72 6b 29 0a 28 72 65 71 75 69 72 de:..(require.'bookmark).(requir
4fbc0 65 20 27 62 75 67 2d 72 65 66 65 72 65 6e 63 65 29 0a 28 72 65 71 75 69 72 65 20 27 65 69 65 69 e.'bug-reference).(require.'eiei
4fbe0 6f 2d 63 75 73 74 6f 6d 29 0a 28 72 65 71 75 69 72 65 20 27 6d 61 72 6b 64 6f 77 6e 2d 6d 6f 64 o-custom).(require.'markdown-mod
4fc00 65 29 0a 28 72 65 71 75 69 72 65 20 27 70 61 72 73 65 2d 74 69 6d 65 29 0a 28 72 65 71 75 69 72 e).(require.'parse-time).(requir
4fc20 65 20 27 79 61 6d 6c 29 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 0a 28 72 65 71 75 e.'yaml)..(require.'forge).(requ
4fc40 69 72 65 20 27 66 6f 72 67 65 2d 70 6f 73 74 29 0a 0a 28 64 65 66 76 61 72 20 62 75 67 2d 72 65 ire.'forge-post)..(defvar.bug-re
4fc60 66 65 72 65 6e 63 65 2d 61 75 74 6f 2d 73 65 74 75 70 2d 66 75 6e 63 74 69 6f 6e 73 29 0a 0a 28 ference-auto-setup-functions)..(
4fc80 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66 61 63 65 2d 61 6c 69 61 73 20 27 66 6f 72 67 define-obsolete-face-alias.'forg
4fca0 65 2d 74 6f 70 69 63 2d 73 6c 75 67 2d 63 6f 6d 70 6c 65 74 65 64 0a 20 20 20 20 20 20 20 20 20 e-topic-slug-completed..........
4fcc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d ...................'forge-topic-
4fce0 73 6c 75 67 2d 72 65 61 6c 69 7a 65 64 20 22 46 6f 72 67 65 20 30 2e 35 2e 30 22 29 0a 0a 28 64 slug-realized."Forge.0.5.0")..(d
4fd00 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66 61 63 65 2d 61 6c 69 61 73 20 27 66 6f 72 67 65 efine-obsolete-face-alias.'forge
4fd20 2d 74 6f 70 69 63 2d 73 6c 75 67 2d 75 6e 70 6c 61 6e 6e 65 64 0a 20 20 20 20 20 20 20 20 20 20 -topic-slug-unplanned...........
4fd40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 ..................'forge-topic-s
4fd60 6c 75 67 2d 65 78 70 75 6e 67 65 64 20 22 46 6f 72 67 65 20 30 2e 35 2e 30 22 29 0a 0a 28 64 65 lug-expunged."Forge.0.5.0")..(de
4fd80 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66 61 63 65 2d 61 6c 69 61 73 20 27 66 6f 72 67 65 2d fine-obsolete-face-alias.'forge-
4fda0 69 73 73 75 65 2d 75 6e 70 6c 61 6e 6e 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 issue-unplanned.................
4fdc0 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 65 78 70 75 6e 67 65 ............'forge-issue-expunge
4fde0 64 20 22 46 6f 72 67 65 20 30 2e 35 2e 30 22 29 0a 0a 3b 3b 3b 20 4f 70 74 69 6f 6e 73 0a 0a 28 d."Forge.0.5.0")..;;;.Options..(
4fe00 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 defcustom.forge-limit-topic-choi
4fe20 63 65 73 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 69 6e 69 74 69 61 6c 6c 79 20 6c 69 ces.t..."Whether.to.initially.li
4fe40 6d 69 74 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 61 74 65 73 20 74 6f 20 61 63 74 mit.completion.candidates.to.act
4fe60 69 76 65 20 74 6f 70 69 63 73 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 ive.topics."...:package-version.
4fe80 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 34 2e 30 22 29 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 '(forge..."0.4.0")...:group.'for
4fea0 67 65 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d ge...:type.'boolean)..(defcustom
4fec0 20 66 6f 72 67 65 2d 70 6f 73 74 2d 68 65 61 64 69 6e 67 2d 66 6f 72 6d 61 74 20 22 25 61 20 25 .forge-post-heading-format."%a.%
4fee0 43 5c 6e 22 0a 20 20 22 46 6f 72 6d 61 74 20 66 6f 72 20 70 6f 73 74 20 68 65 61 64 69 6e 67 73 C\n"..."Format.for.post.headings
4ff00 20 69 6e 20 74 6f 70 69 63 20 76 69 65 77 2e 0a 0a 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 25 .in.topic.view...The.following.%
4ff20 2d 73 65 71 75 65 6e 63 65 73 20 61 72 65 20 73 75 70 70 6f 72 74 65 64 3a 0a 0a 60 25 61 27 20 -sequences.are.supported:..`%a'.
4ff40 54 68 65 20 66 6f 72 67 65 20 6e 69 63 6b 6e 61 6d 65 20 6f 66 20 74 68 65 20 61 75 74 68 6f 72 The.forge.nickname.of.the.author
4ff60 2e 0a 60 25 63 27 20 54 68 65 20 61 62 73 6f 6c 75 74 65 20 63 72 65 61 74 69 6f 6e 20 64 61 74 ..`%c'.The.absolute.creation.dat
4ff80 65 2e 0a 60 25 43 27 20 54 68 65 20 72 65 6c 61 74 69 76 65 20 63 72 65 61 74 69 6f 6e 20 64 61 e..`%C'.The.relative.creation.da
4ffa0 74 65 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 te."...:package-version.'(forge.
4ffc0 2e 20 22 30 2e 31 2e 30 22 29 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 .."0.1.0")...:group.'forge...:ty
4ffe0 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 70 6f pe.'string)..(defcustom.forge-po
50000 73 74 2d 66 69 6c 6c 2d 72 65 67 69 6f 6e 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 63 st-fill-region.t..."Whether.to.c
50020 61 6c 6c 20 60 66 69 6c 6c 2d 72 65 67 69 6f 6e 27 20 62 65 66 6f 72 65 20 64 69 73 70 6c 61 79 all.`fill-region'.before.display
50040 69 6e 67 20 66 6f 72 67 65 20 70 6f 73 74 73 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 ing.forge.posts."...:package-ver
50060 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 31 2e 30 22 29 0a 20 20 3a 67 72 6f 75 70 sion.'(forge..."0.1.0")...:group
50080 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 .'forge...:type.'boolean)..(defc
500a0 75 73 74 6f 6d 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 77 61 73 68 2d 74 69 74 6c 65 2d 68 6f 6f ustom.forge-topic-wash-title-hoo
500c0 6b 0a 20 20 28 6c 69 73 74 20 23 27 6d 61 67 69 74 2d 68 69 67 68 6c 69 67 68 74 2d 62 72 61 63 k...(list.#'magit-highlight-brac
500e0 6b 65 74 2d 6b 65 79 77 6f 72 64 73 29 0a 20 20 22 46 75 6e 63 74 69 6f 6e 73 20 75 73 65 64 20 ket-keywords)..."Functions.used.
50100 74 6f 20 68 69 67 68 6c 69 67 68 74 20 70 61 72 74 73 20 6f 66 20 65 61 63 68 20 69 6e 64 69 76 to.highlight.parts.of.each.indiv
50120 69 64 75 61 6c 20 74 6f 70 69 63 20 74 69 74 6c 65 2e 0a 0a 54 68 65 73 65 20 66 75 6e 63 74 69 idual.topic.title...These.functi
50140 6f 6e 73 20 61 72 65 20 63 61 6c 6c 65 64 20 69 6e 20 6f 72 64 65 72 2c 20 69 6e 20 61 20 62 75 ons.are.called.in.order,.in.a.bu
50160 66 66 65 72 20 74 68 61 74 20 63 6f 6e 74 61 69 6e 69 6e 67 20 74 68 65 0a 74 6f 70 69 63 20 74 ffer.that.containing.the.topic.t
50180 69 74 6c 65 2e 20 20 54 68 65 79 20 73 68 6f 75 6c 64 20 73 65 74 20 74 65 78 74 20 70 72 6f 70 itle...They.should.set.text.prop
501a0 65 72 74 69 65 73 20 61 73 20 74 68 65 79 20 73 65 65 20 66 69 74 2c 20 75 73 75 61 6c 6c 79 0a erties.as.they.see.fit,.usually.
501c0 6a 75 73 74 20 60 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 27 2e 20 20 42 65 66 6f 72 65 20 65 just.`font-lock-face'...Before.e
501e0 61 63 68 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 63 61 6c 6c 65 64 2c 20 70 6f 69 6e 74 20 69 73 ach.function.is.called,.point.is
50200 20 61 74 20 74 68 65 0a 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 2e .at.the.beginning.of.the.buffer.
50220 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 "...:package-version.'(forge..."
50240 30 2e 34 2e 37 22 29 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 0.4.7")...:group.'forge...:type.
50260 27 68 6f 6f 6b 0a 20 20 3a 6f 70 74 69 6f 6e 73 20 28 6c 69 73 74 20 23 27 6d 61 67 69 74 2d 68 'hook...:options.(list.#'magit-h
50280 69 67 68 6c 69 67 68 74 2d 62 72 61 63 6b 65 74 2d 6b 65 79 77 6f 72 64 73 29 29 0a 0a 28 64 65 ighlight-bracket-keywords))..(de
502a0 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 72 65 70 6f 73 69 74 6f 72 79 2d 73 fcustom.forge-topic-repository-s
502c0 6c 75 67 2d 77 69 64 74 68 20 32 38 0a 20 20 22 57 69 64 74 68 20 6f 66 20 72 65 70 6f 73 69 74 lug-width.28..."Width.of.reposit
502e0 6f 72 79 20 73 6c 75 67 73 20 28 69 2e 65 2e 2c 20 5c 22 4f 57 4e 45 52 2f 4e 41 4d 45 5c 22 29 ory.slugs.(i.e.,.\"OWNER/NAME\")
50300 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 ."...:package-version.'(forge...
50320 22 30 2e 34 2e 30 22 29 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 "0.4.0")...:group.'forge...:type
50340 20 27 6e 61 74 6e 75 6d 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 62 75 67 2d .'natnum)..(defcustom.forge-bug-
50360 72 65 66 65 72 65 6e 63 65 2d 68 6f 6f 6b 73 0a 20 20 27 28 66 69 6e 64 2d 66 69 6c 65 2d 68 6f reference-hooks...'(find-file-ho
50380 6f 6b 0a 20 20 20 20 66 6f 72 67 65 2d 70 6f 73 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 0a 20 20 20 20 ok.....forge-post-mode-hook.....
503a0 67 69 74 2d 63 6f 6d 6d 69 74 2d 73 65 74 75 70 2d 68 6f 6f 6b 0a 20 20 20 20 6d 61 67 69 74 2d git-commit-setup-hook.....magit-
503c0 6d 6f 64 65 2d 68 6f 6f 6b 29 0a 20 20 22 48 6f 6f 6b 73 20 74 6f 20 77 68 69 63 68 20 60 66 6f mode-hook)..."Hooks.to.which.`fo
503e0 72 67 65 2d 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 73 65 74 75 70 27 20 69 73 20 61 64 64 65 rge-bug-reference-setup'.is.adde
50400 64 2e 0a 54 68 69 73 20 76 61 72 69 61 62 6c 65 20 68 61 73 20 74 6f 20 62 65 20 63 75 73 74 6f d..This.variable.has.to.be.custo
50420 6d 69 7a 65 64 20 62 65 66 6f 72 65 20 60 66 6f 72 67 65 27 20 69 73 20 6c 6f 61 64 65 64 2e 22 mized.before.`forge'.is.loaded."
50440 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 ...:package-version.'(forge..."0
50460 2e 32 2e 30 22 29 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 6f 70 74 69 6f 6e .2.0")...:group.'forge...:option
50480 73 20 27 28 66 69 6e 64 2d 66 69 6c 65 2d 68 6f 6f 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 s.'(find-file-hook..............
504a0 66 6f 72 67 65 2d 70 6f 73 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 0a 20 20 20 20 20 20 20 20 20 20 20 forge-post-mode-hook............
504c0 20 20 67 69 74 2d 63 6f 6d 6d 69 74 2d 73 65 74 75 70 2d 68 6f 6f 6b 0a 20 20 20 20 20 20 20 20 ..git-commit-setup-hook.........
504e0 20 20 20 20 20 6d 61 67 69 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 29 0a 20 20 3a 74 79 70 65 20 27 28 .....magit-mode-hook)...:type.'(
50500 6c 69 73 74 20 3a 63 6f 6e 76 65 72 74 2d 77 69 64 67 65 74 20 63 75 73 74 6f 6d 2d 68 6f 6f 6b list.:convert-widget.custom-hook
50520 2d 63 6f 6e 76 65 72 74 2d 77 69 64 67 65 74 29 29 0a 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 -convert-widget))..(defvar.forge
50540 2d 66 6f 72 6d 61 74 2d 61 76 61 74 61 72 2d 66 75 6e 63 74 69 6f 6e 20 6e 69 6c 0a 20 20 22 46 -format-avatar-function.nil..."F
50560 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 6f 20 69 6e 73 65 72 74 20 61 76 61 74 61 72 73 20 69 unction.used.to.insert.avatars.i
50580 6e 20 63 65 72 74 61 69 6e 20 6c 6f 63 61 74 69 6f 6e 73 2e 0a 54 68 69 73 20 69 73 20 65 78 70 n.certain.locations..This.is.exp
505a0 65 72 69 6d 65 6e 74 61 6c 20 61 6e 64 20 69 6e 74 65 6e 64 65 64 20 66 6f 72 20 75 73 65 72 73 erimental.and.intended.for.users
505c0 20 77 68 6f 20 77 69 73 68 20 74 6f 0a 69 6d 70 6c 65 6d 65 6e 74 20 73 75 63 68 20 61 20 66 75 .who.wish.to.implement.such.a.fu
505e0 6e 63 74 69 6f 6e 20 74 68 65 6d 73 65 6c 76 65 73 2e 20 20 53 65 65 20 23 34 34 37 2e 22 29 0a nction.themselves...See.#447.").
50600 0a 3b 3b 3b 20 46 61 63 65 73 0a 3b 3b 3b 3b 20 43 6f 6d 6d 6f 6e 0a 0a 28 64 65 66 66 61 63 65 .;;;.Faces.;;;;.Common..(defface
50620 20 66 6f 72 67 65 2d 64 69 6d 6d 65 64 20 27 28 28 74 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 .forge-dimmed.'((t.:foreground."
50640 23 39 33 61 31 61 31 22 29 29 0a 20 20 22 50 61 72 65 6e 74 20 66 61 63 65 20 6f 72 20 66 61 63 #93a1a1"))..."Parent.face.or.fac
50660 65 73 20 75 73 65 64 20 66 6f 72 20 74 65 78 74 20 74 68 61 74 20 73 68 6f 75 6c 64 6e 27 74 20 es.used.for.text.that.shouldn't.
50680 73 74 61 6e 64 20 6f 75 74 2e 0a 0a 54 68 69 73 20 66 61 63 65 20 69 73 20 6e 6f 74 20 64 69 72 stand.out...This.face.is.not.dir
506a0 65 63 74 6c 79 2c 20 69 6e 73 74 65 61 64 20 73 65 76 65 72 61 6c 20 66 61 63 65 73 20 69 6e 68 ectly,.instead.several.faces.inh
506c0 65 72 69 74 20 66 72 6f 6d 20 69 74 0a 65 69 74 68 65 72 20 64 69 72 65 63 74 6c 79 20 6f 72 20 erit.from.it.either.directly.or.
506e0 76 69 61 20 61 6e 20 69 6e 74 65 72 6d 65 64 69 61 74 65 20 66 61 63 65 2e 20 20 54 68 69 73 20 via.an.intermediate.face...This.
50700 66 61 63 65 20 73 68 6f 75 6c 64 0a 6f 6e 6c 79 20 73 70 65 63 69 66 79 20 74 68 65 20 60 3a 66 face.should.only.specify.the.`:f
50720 6f 72 65 67 72 6f 75 6e 64 27 20 61 74 74 72 69 62 75 74 65 2c 20 77 68 69 63 68 20 69 73 20 77 oreground'.attribute,.which.is.w
50740 68 79 20 74 68 69 73 20 66 61 63 65 0a 64 6f 65 73 20 6e 6f 74 20 69 6e 68 65 72 69 74 20 66 72 hy.this.face.does.not.inherit.fr
50760 6f 6d 20 60 6d 61 67 69 74 2d 64 69 6d 6d 65 64 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f om.`magit-dimmed'."...:group.'fo
50780 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 rge-faces)..(defface.forge-topic
507a0 2d 68 65 61 64 65 72 2d 6c 69 6e 65 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 6d 61 67 -header-line...'((t.:inherit.mag
507c0 69 74 2d 68 65 61 64 65 72 2d 6c 69 6e 65 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 72 65 73 65 74 it-header-line.:foreground.reset
507e0 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 74 68 65 20 60 68 65 61 64 65 72 2d 6c 69 6e 65 27 ))..."Face.for.the.`header-line'
50800 20 69 6e 20 60 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 27 20 62 75 66 66 65 72 73 2e 22 .in.`forge-topic-mode'.buffers."
50820 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 ...:group.'forge-faces)..(deffac
50840 65 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 61 6e 73 77 65 72 2d 68 65 61 64 69 6e e.forge-discussion-answer-headin
50860 67 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 6d 61 67 69 74 2d 64 69 66 66 2d 61 64 64 g...'((t.:inherit.magit-diff-add
50880 65 64 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 68 65 61 64 69 6e 67 73 20 6f 66 20 64 69 73 ed))..."Face.for.headings.of.dis
508a0 63 75 73 73 69 6f 6e 20 72 65 70 6c 69 65 73 20 6d 61 72 6b 65 64 20 61 73 20 74 68 65 20 61 6e cussion.replies.marked.as.the.an
508c0 73 77 65 72 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 6d 61 67 69 74 2d 66 61 63 65 73 29 0a 0a 3b swer."...:group.'magit-faces)..;
508e0 3b 3b 3b 20 54 6f 70 69 63 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 20 53 6c 75 67 73 ;;;.Topic.and.Notification.Slugs
50900 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 67 2d 6f 70 65 6e ..(defface.forge-topic-slug-open
50920 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f 72 67 65 2d 64 69 6d 6d 65 64 29 29 0a ...'((t.:inherit.forge-dimmed)).
50940 20 20 22 46 61 63 65 20 75 73 65 73 20 66 6f 72 20 73 6c 75 67 73 20 6f 66 20 6f 70 65 6e 20 74 .."Face.uses.for.slugs.of.open.t
50960 6f 70 69 63 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a opics."...:group.'forge-faces)..
50980 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 67 2d 72 65 61 6c 69 7a (defface.forge-topic-slug-realiz
509a0 65 64 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f 72 67 65 2d 64 69 6d 6d 65 64 29 ed...'((t.:inherit.forge-dimmed)
509c0 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 6c 75 67 73 20 6f 66 20 72 65 61 6c )..."Face.used.for.slugs.of.real
509e0 69 7a 65 64 20 74 6f 70 69 63 73 2e 0a 52 65 61 6c 69 7a 65 64 20 74 6f 70 69 63 73 20 69 6e 63 ized.topics..Realized.topics.inc
50a00 6c 75 64 65 3a 0a 2d 20 63 6f 6d 70 6c 65 74 65 64 20 69 73 73 75 65 73 20 61 6e 64 0a 2d 20 6d lude:.-.completed.issues.and.-.m
50a20 65 72 67 65 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 erged.pull-requests."...:group.'
50a40 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 74 6f 70 forge-faces)..(defface.forge-top
50a60 69 63 2d 73 6c 75 67 2d 65 78 70 75 6e 67 65 64 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 ic-slug-expunged...'((t.:inherit
50a80 20 66 6f 72 67 65 2d 64 69 6d 6d 65 64 20 3a 73 74 72 69 6b 65 2d 74 68 72 6f 75 67 68 20 74 29 .forge-dimmed.:strike-through.t)
50aa0 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 6c 75 67 73 20 6f 66 20 65 78 70 75 )..."Face.used.for.slugs.of.expu
50ac0 6e 67 65 64 20 74 6f 70 69 63 73 2e 0a 45 78 70 75 6e 67 65 64 20 74 6f 70 69 63 73 20 69 6e 63 nged.topics..Expunged.topics.inc
50ae0 6c 75 64 65 3a 0a 2d 20 69 73 73 75 65 73 20 63 6c 6f 73 65 73 20 61 73 20 75 6e 70 6c 61 6e 6e lude:.-.issues.closes.as.unplann
50b00 65 64 2c 0a 2d 20 69 73 73 75 65 73 20 63 6c 6f 73 65 64 20 61 73 20 64 75 70 6c 69 63 61 74 65 ed,.-.issues.closed.as.duplicate
50b20 73 2c 20 61 6e 64 0a 2d 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 63 6c 6f 73 65 64 20 77 69 s,.and.-.pull-requests.closed.wi
50b40 74 68 6f 75 74 20 6d 65 72 67 69 6e 67 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d thout.merging."...:group.'forge-
50b60 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 faces)..(defface.forge-topic-slu
50b80 67 2d 73 61 76 65 64 0a 20 20 27 28 28 74 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 6f 72 61 6e g-saved...'((t.:foreground."oran
50ba0 67 65 22 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 6c 75 67 73 20 6f 66 20 ge"))..."Face.used.for.slugs.of.
50bc0 74 6f 70 69 63 73 20 77 69 74 68 20 73 61 76 65 64 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e topics.with.saved.notifications.
50be0 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 "...:group.'forge-faces)..(deffa
50c00 63 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 67 2d 75 6e 72 65 61 64 0a 20 20 27 28 28 ce.forge-topic-slug-unread...'((
50c20 74 20 3a 77 65 69 67 68 74 20 62 6f 6c 64 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f t.:weight.bold))..."Face.used.fo
50c40 72 20 73 6c 75 67 73 20 6f 66 20 74 6f 70 69 63 73 20 77 69 74 68 20 75 6e 72 65 61 64 20 6e 6f r.slugs.of.topics.with.unread.no
50c60 74 69 66 69 63 61 74 69 6f 6e 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 tifications."...:group.'forge-fa
50c80 63 65 73 29 0a 0a 3b 3b 3b 3b 20 54 6f 70 69 63 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f ces)..;;;;.Topic.and.Notificatio
50ca0 6e 20 53 75 6d 6d 61 72 69 65 73 0a 3b 3b 3b 3b 3b 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 0a n.Summaries.;;;;;.Notifications.
50cc0 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 75 6e 72 65 61 64 0a 20 20 27 .(defface.forge-topic-unread...'
50ce0 28 28 74 20 3a 77 65 69 67 68 74 20 62 6f 6c 64 0a 20 20 20 20 20 20 20 3a 62 6f 78 20 28 3a 6c ((t.:weight.bold........:box.(:l
50d00 69 6e 65 2d 77 69 64 74 68 20 28 2d 31 20 2e 20 2d 31 29 20 3a 73 74 79 6c 65 20 6e 69 6c 29 29 ine-width.(-1...-1).:style.nil))
50d20 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 75 6d 6d 61 72 69 65 73 20 6f 66 20 )..."Face.used.for.summaries.of.
50d40 65 6e 74 69 74 69 65 73 20 77 69 74 68 20 75 6e 72 65 61 64 20 6e 6f 74 69 66 69 63 61 74 69 6f entities.with.unread.notificatio
50d60 6e 73 2e 0a 54 68 69 73 20 66 61 63 65 20 69 73 20 61 6c 77 61 79 73 20 75 73 65 64 20 74 6f 67 ns..This.face.is.always.used.tog
50d80 65 74 68 65 72 20 77 69 74 68 2c 20 61 6e 64 20 74 61 6b 65 73 20 70 72 65 66 65 72 65 6e 63 65 ether.with,.and.takes.preference
50da0 20 6f 76 65 72 2c 0a 61 20 60 66 6f 72 67 65 2d 7b 69 73 73 75 65 2c 70 75 6c 6c 72 65 71 7d 2d .over,.a.`forge-{issue,pullreq}-
50dc0 53 54 41 54 45 27 20 66 61 63 65 20 61 6e 64 20 73 68 6f 75 6c 64 20 6e 6f 74 20 73 70 65 63 69 STATE'.face.and.should.not.speci
50de0 66 79 20 61 6e 79 0a 61 74 74 72 69 62 75 74 65 20 74 68 61 74 20 69 73 20 73 70 65 63 69 66 69 fy.any.attribute.that.is.specifi
50e00 65 64 20 62 79 20 61 6e 79 20 6f 66 20 74 68 6f 73 65 20 66 61 63 65 73 2e 20 20 4c 69 6b 65 77 ed.by.any.of.those.faces...Likew
50e20 69 73 65 20 74 68 6f 73 65 0a 66 61 63 65 73 20 73 68 6f 75 6c 64 20 6e 6f 74 20 73 65 74 20 60 ise.those.faces.should.not.set.`
50e40 3a 77 65 69 67 68 74 27 20 6f 72 20 60 3a 73 6c 61 6e 74 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 :weight'.or.`:slant'."...:group.
50e60 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 74 6f 'forge-faces)..(defface.forge-to
50e80 70 69 63 2d 70 65 6e 64 69 6e 67 0a 20 20 27 28 28 74 20 3a 77 65 69 67 68 74 20 62 6f 6c 64 29 pic-pending...'((t.:weight.bold)
50ea0 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 75 6d 6d 61 72 69 65 73 20 6f 66 20 )..."Face.used.for.summaries.of.
50ec0 65 6e 74 69 74 69 65 73 20 77 69 74 68 20 6f 70 65 6e 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 entities.with.open.notifications
50ee0 2e 0a 54 68 69 73 20 66 61 63 65 20 69 73 20 61 6c 77 61 79 73 20 75 73 65 64 20 74 6f 67 65 74 ..This.face.is.always.used.toget
50f00 68 65 72 20 77 69 74 68 2c 20 61 6e 64 20 74 61 6b 65 73 20 70 72 65 66 65 72 65 6e 63 65 20 6f her.with,.and.takes.preference.o
50f20 76 65 72 2c 0a 61 20 60 66 6f 72 67 65 2d 7b 69 73 73 75 65 2c 70 75 6c 6c 72 65 71 7d 2d 53 54 ver,.a.`forge-{issue,pullreq}-ST
50f40 41 54 45 27 20 66 61 63 65 20 61 6e 64 20 73 68 6f 75 6c 64 20 6e 6f 74 20 73 70 65 63 69 66 79 ATE'.face.and.should.not.specify
50f60 20 61 6e 79 0a 61 74 74 72 69 62 75 74 65 20 74 68 61 74 20 69 73 20 73 70 65 63 69 66 69 65 64 .any.attribute.that.is.specified
50f80 20 62 79 20 61 6e 79 20 6f 66 20 74 68 6f 73 65 20 66 61 63 65 73 2e 20 20 4c 69 6b 65 77 69 73 .by.any.of.those.faces...Likewis
50fa0 65 20 74 68 6f 73 65 0a 66 61 63 65 73 20 73 68 6f 75 6c 64 20 6e 6f 74 20 73 65 74 20 60 3a 77 e.those.faces.should.not.set.`:w
50fc0 65 69 67 68 74 27 20 6f 72 20 60 3a 73 6c 61 6e 74 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 eight'.or.`:slant'."...:group.'f
50fe0 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 74 6f 70 69 orge-faces)..(defface.forge-topi
51000 63 2d 64 6f 6e 65 0a 20 20 27 28 28 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 c-done...'((t))..."Face.used.for
51020 20 73 75 6d 6d 61 72 69 65 73 20 6f 66 20 65 6e 74 69 74 69 65 73 20 77 69 74 68 20 6e 6f 20 75 .summaries.of.entities.with.no.u
51040 6e 72 65 61 64 20 6f 72 20 6f 70 65 6e 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 2e 0a 54 68 69 73 nread.or.open.notification..This
51060 20 66 61 63 65 20 69 73 20 61 6c 77 61 79 73 20 75 73 65 64 20 74 6f 67 65 74 68 65 72 20 77 69 .face.is.always.used.together.wi
51080 74 68 2c 20 61 6e 64 20 74 61 6b 65 73 20 70 72 65 66 65 72 65 6e 63 65 20 6f 76 65 72 2c 0a 61 th,.and.takes.preference.over,.a
510a0 20 60 66 6f 72 67 65 2d 7b 69 73 73 75 65 2c 70 75 6c 6c 72 65 71 7d 2d 53 54 41 54 45 27 20 66 .`forge-{issue,pullreq}-STATE'.f
510c0 61 63 65 20 61 6e 64 20 73 68 6f 75 6c 64 20 6e 6f 74 20 73 70 65 63 69 66 79 20 61 6e 79 0a 61 ace.and.should.not.specify.any.a
510e0 74 74 72 69 62 75 74 65 20 74 68 61 74 20 69 73 20 73 70 65 63 69 66 69 65 64 20 62 79 20 61 6e ttribute.that.is.specified.by.an
51100 79 20 6f 66 20 74 68 6f 73 65 20 66 61 63 65 73 2e 20 20 4c 69 6b 65 77 69 73 65 20 74 68 6f 73 y.of.those.faces...Likewise.thos
51120 65 0a 66 61 63 65 73 20 73 68 6f 75 6c 64 20 6e 6f 74 20 73 65 74 20 60 3a 77 65 69 67 68 74 27 e.faces.should.not.set.`:weight'
51140 20 6f 72 20 60 3a 73 6c 61 6e 74 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 .or.`:slant'."...:group.'forge-f
51160 61 63 65 73 29 0a 0a 3b 3b 3b 3b 3b 20 44 69 73 63 75 73 73 69 6f 6e 73 0a 0a 28 64 65 66 66 61 aces)..;;;;;.Discussions..(deffa
51180 63 65 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 6f 70 65 6e 0a 20 20 27 28 28 74 20 ce.forge-discussion-open...'((t.
511a0 3a 73 6c 61 6e 74 20 69 74 61 6c 69 63 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 :slant.italic))..."Face.used.for
511c0 20 73 75 6d 6d 61 72 69 65 73 20 6f 66 20 6f 70 65 6e 20 64 69 73 63 75 73 73 69 6f 6e 73 2e 22 .summaries.of.open.discussions."
511e0 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 ...:group.'forge-faces)..(deffac
51200 65 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 63 6f 6d 70 6c 65 74 65 64 0a 20 20 27 e.forge-discussion-completed...'
51220 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f 72 67 65 2d 64 69 6d 6d 65 64 20 3a 73 6c 61 6e 74 ((t.:inherit.forge-dimmed.:slant
51240 20 69 74 61 6c 69 63 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 75 6d 6d 61 .italic))..."Face.used.for.summa
51260 72 69 65 73 20 6f 66 20 64 69 73 63 75 73 73 69 6f 6e 73 20 63 6c 6f 73 65 64 20 61 73 20 63 6f ries.of.discussions.closed.as.co
51280 6d 70 6c 65 74 65 64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 mpleted."...:group.'forge-faces)
512a0 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 65 78 70 75 ..(defface.forge-discussion-expu
512c0 6e 67 65 64 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f 72 67 65 2d 64 69 6d 6d 65 nged...'((t.:inherit.forge-dimme
512e0 64 20 3a 73 6c 61 6e 74 20 69 74 61 6c 69 63 20 3a 73 74 72 69 6b 65 2d 74 68 72 6f 75 67 68 20 d.:slant.italic.:strike-through.
51300 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 75 6d 6d 61 72 69 65 73 20 6f t))..."Face.used.for.summaries.o
51320 66 20 65 78 70 75 6e 67 65 64 20 64 69 73 63 75 73 73 69 6f 6e 73 2e 0a 45 78 70 75 6e 67 65 64 f.expunged.discussions..Expunged
51340 20 64 69 73 63 75 73 73 69 6f 6e 73 20 69 6e 63 6c 75 64 65 3a 0a 2d 20 64 69 73 63 75 73 73 69 .discussions.include:.-.discussi
51360 6f 6e 73 20 63 6c 6f 73 65 73 20 61 73 20 75 6e 70 6c 61 6e 6e 65 64 2c 20 61 6e 64 0a 2d 20 64 ons.closes.as.unplanned,.and.-.d
51380 69 73 63 75 73 73 69 6f 6e 73 20 63 6c 6f 73 65 64 20 61 73 20 64 75 70 6c 69 63 61 74 65 73 2e iscussions.closed.as.duplicates.
513a0 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 3b 3b 3b 3b 3b 20 "...:group.'forge-faces)..;;;;;.
513c0 49 73 73 75 65 73 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 6f 70 65 Issues..(defface.forge-issue-ope
513e0 6e 0a 20 20 27 28 28 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 75 6d 6d n...'((t))..."Face.used.for.summ
51400 61 72 69 65 73 20 6f 66 20 6f 70 65 6e 20 69 73 73 75 65 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 aries.of.open.issues."...:group.
51420 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 69 73 'forge-faces)..(defface.forge-is
51440 73 75 65 2d 63 6f 6d 70 6c 65 74 65 64 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f sue-completed...'((t.:inherit.fo
51460 72 67 65 2d 64 69 6d 6d 65 64 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 75 rge-dimmed))..."Face.used.for.su
51480 6d 6d 61 72 69 65 73 20 6f 66 20 69 73 73 75 65 73 20 63 6c 6f 73 65 64 20 61 73 20 63 6f 6d 70 mmaries.of.issues.closed.as.comp
514a0 6c 65 74 65 64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a leted."...:group.'forge-faces)..
514c0 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 65 78 70 75 6e 67 65 64 0a 20 20 (defface.forge-issue-expunged...
514e0 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f 72 67 65 2d 64 69 6d 6d 65 64 20 3a 73 74 72 69 '((t.:inherit.forge-dimmed.:stri
51500 6b 65 2d 74 68 72 6f 75 67 68 20 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 ke-through.t))..."Face.used.for.
51520 73 75 6d 6d 61 72 69 65 73 20 6f 66 20 65 78 70 75 6e 67 65 64 20 69 73 73 75 65 73 2e 0a 45 78 summaries.of.expunged.issues..Ex
51540 70 75 6e 67 65 64 20 69 73 73 75 65 73 20 69 6e 63 6c 75 64 65 3a 0a 2d 20 69 73 73 75 65 73 20 punged.issues.include:.-.issues.
51560 63 6c 6f 73 65 73 20 61 73 20 75 6e 70 6c 61 6e 6e 65 64 2c 20 61 6e 64 0a 2d 20 69 73 73 75 65 closes.as.unplanned,.and.-.issue
51580 73 20 63 6c 6f 73 65 64 20 61 73 20 64 75 70 6c 69 63 61 74 65 73 2e 22 0a 20 20 3a 67 72 6f 75 s.closed.as.duplicates."...:grou
515a0 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 3b 3b 3b 3b 3b 20 50 75 6c 6c 2d 52 65 71 75 p.'forge-faces)..;;;;;.Pull-Requ
515c0 65 73 74 73 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 6f 70 65 ests..(defface.forge-pullreq-ope
515e0 6e 0a 20 20 27 28 28 74 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 4c 69 6d 65 47 72 65 65 6e 22 n...'((t.:foreground."LimeGreen"
51600 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 75 6d 6d 61 72 69 65 73 20 6f 66 ))..."Face.used.for.summaries.of
51620 20 6f 70 65 6e 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 .open.pull-requests."...:group.'
51640 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 70 75 6c forge-faces)..(defface.forge-pul
51660 6c 72 65 71 2d 6d 65 72 67 65 64 0a 20 20 27 28 28 74 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 lreq-merged...'((t.:foreground."
51680 4d 65 64 69 75 6d 50 75 72 70 6c 65 22 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 MediumPurple"))..."Face.used.for
516a0 20 73 75 6d 6d 61 72 69 65 73 20 6f 66 20 6d 65 72 67 65 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 .summaries.of.merged.pull-reques
516c0 74 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 ts."...:group.'forge-faces)..(de
516e0 66 66 61 63 65 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 72 65 6a 65 63 74 65 64 0a 20 20 27 fface.forge-pullreq-rejected...'
51700 28 28 74 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 4d 65 64 69 75 6d 50 75 72 70 6c 65 22 20 3a ((t.:foreground."MediumPurple".:
51720 73 74 72 69 6b 65 2d 74 68 72 6f 75 67 68 20 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 strike-through.t))..."Face.used.
51740 66 6f 72 20 73 75 6d 6d 61 72 69 65 73 20 6f 66 20 63 6c 6f 73 65 64 20 70 75 6c 6c 2d 72 65 71 for.summaries.of.closed.pull-req
51760 75 65 73 74 73 2c 20 74 68 61 74 20 77 65 72 65 6e 27 74 20 6d 65 72 67 65 64 2e 22 0a 20 20 3a uests,.that.weren't.merged."...:
51780 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 66 6f group.'forge-faces)..(defface.fo
517a0 72 67 65 2d 70 75 6c 6c 72 65 71 2d 64 72 61 66 74 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 rge-pullreq-draft...'((t.:inheri
517c0 74 20 68 69 67 68 6c 69 67 68 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 t.highlight))..."Face.used.for.s
517e0 75 6d 6d 61 72 69 65 73 20 6f 66 20 64 72 61 66 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e ummaries.of.draft.pull-requests.
51800 0a 41 20 66 61 63 65 20 61 74 74 72 69 62 75 74 65 20 73 68 6f 75 6c 64 20 62 65 20 75 73 65 64 .A.face.attribute.should.be.used
51820 20 74 68 61 74 20 69 73 20 6e 6f 74 20 61 6c 72 65 61 64 79 20 75 73 65 64 20 62 79 20 61 6e 79 .that.is.not.already.used.by.any
51840 0a 60 66 6f 72 67 65 2d 74 6f 70 69 63 2d 53 54 41 54 55 53 27 20 6f 72 20 60 66 6f 72 67 65 2d .`forge-topic-STATUS'.or.`forge-
51860 7b 69 73 73 75 65 2c 70 75 6c 6c 72 65 71 7d 2d 53 54 41 54 45 27 20 66 61 63 65 2e 22 0a 20 20 {issue,pullreq}-STATE'.face."...
51880 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 3b 3b 3b 3b 20 4c 61 62 65 6c :group.'forge-faces)..;;;;.Label
518a0 73 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 0a 20 20 s..(defface.forge-topic-label...
518c0 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 73 65 63 6f 6e 64 61 72 79 2d 73 65 6c 65 63 74 69 6f '((t.:inherit.secondary-selectio
518e0 6e 0a 20 20 20 20 20 20 20 3a 62 6f 78 20 28 3a 6c 69 6e 65 2d 77 69 64 74 68 20 28 2d 31 20 2e n........:box.(:line-width.(-1..
51900 20 2d 31 29 20 3a 73 74 79 6c 65 20 72 65 6c 65 61 73 65 64 2d 62 75 74 74 6f 6e 29 29 29 0a 20 .-1).:style.released-button)))..
51920 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 74 6f 70 69 63 20 6c 61 62 65 6c 73 2c 20 6d 61 ."Face.used.for.topic.labels,.ma
51940 72 6b 73 20 61 6e 64 20 6d 69 6c 65 73 74 6f 6e 65 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 rks.and.milestones."...:group.'f
51960 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 3b 3b 3b 3b 20 50 6f 73 74 20 44 65 74 61 69 6c 73 0a 0a orge-faces)..;;;;.Post.Details..
51980 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 70 6f 73 74 2d 61 75 74 68 6f 72 0a 20 20 27 28 28 (defface.forge-post-author...'((
519a0 74 20 3a 69 6e 68 65 72 69 74 20 62 6f 6c 64 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 t.:inherit.bold))..."Face.used.f
519c0 6f 72 20 70 6f 73 74 20 61 75 74 68 6f 72 20 69 6e 20 74 6f 70 69 63 20 76 69 65 77 2e 22 0a 20 or.post.author.in.topic.view."..
519e0 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 .:group.'forge-faces)..(defface.
51a00 66 6f 72 67 65 2d 70 6f 73 74 2d 64 61 74 65 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 forge-post-date...'((t.:inherit.
51a20 69 74 61 6c 69 63 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 70 6f 73 74 20 64 italic))..."Face.used.for.post.d
51a40 61 74 65 20 69 6e 20 74 6f 70 69 63 20 76 69 65 77 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f ate.in.topic.view."...:group.'fo
51a60 72 67 65 2d 66 61 63 65 73 29 0a 0a 3b 3b 3b 20 43 6c 61 73 73 0a 0a 28 64 65 66 63 6c 61 73 73 rge-faces)..;;;.Class..(defclass
51a80 20 66 6f 72 67 65 2d 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 70 6f 73 74 29 20 28 29 20 3a 61 62 .forge-topic.(forge-post).().:ab
51aa0 73 74 72 61 63 74 20 74 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d stract.t)..(cl-defmethod.forge--
51ac0 6f 62 6a 65 63 74 2d 69 64 20 28 28 63 6c 61 73 73 20 28 73 75 62 63 6c 61 73 73 20 66 6f 72 67 object-id.((class.(subclass.forg
51ae0 65 2d 74 6f 70 69 63 29 29 20 72 65 70 6f 20 6e 75 6d 62 65 72 29 0a 20 20 22 52 65 74 75 72 6e e-topic)).repo.number)..."Return
51b00 20 74 68 65 20 69 64 20 66 6f 72 20 61 20 43 4c 41 53 53 20 6f 62 6a 65 63 74 20 69 6e 20 52 45 .the.id.for.a.CLASS.object.in.RE
51b20 50 4f 20 69 64 65 6e 74 69 66 69 65 64 20 62 79 20 69 64 20 4e 55 4d 42 45 52 2e 22 0a 20 20 28 PO.identified.by.id.NUMBER."...(
51b40 62 61 73 65 36 34 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 0a 20 20 20 28 65 6e 63 6f 64 65 2d base64-encode-string....(encode-
51b60 63 6f 64 69 6e 67 2d 73 74 72 69 6e 67 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 3a 25 73 coding-string.....(format."%s:%s
51b80 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 62 61 73 65 36 34 2d 64 65 63 6f 64 65 2d 73 %s".............(base64-decode-s
51ba0 74 72 69 6e 67 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 tring.(oref.repo.id))...........
51bc0 20 20 28 73 75 62 73 74 72 69 6e 67 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 63 6c 61 73 73 29 ..(substring.(symbol-name.class)
51be0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 6e 67 74 68 20 ........................(length.
51c00 28 6f 72 65 66 2d 64 65 66 61 75 6c 74 20 63 6c 61 73 73 20 63 6c 6f 73 71 6c 2d 63 6c 61 73 73 (oref-default.class.closql-class
51c20 2d 70 72 65 66 69 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 6e 75 6d 62 65 72 29 0a 20 -prefix))).............number)..
51c40 20 20 20 27 75 74 66 2d 38 29 0a 20 20 20 74 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 ...'utf-8)....t))..(cl-defmethod
51c60 20 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 28 28 70 72 65 66 69 78 20 73 74 72 69 6e .forge--object-id.((prefix.strin
51c80 67 29 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 0a 20 20 28 61 6e 64 20 6e 75 6d 62 65 72 2d 6f g).number-or-id)...(and.number-o
51ca0 72 2d 69 64 0a 20 20 20 20 20 20 20 28 62 61 73 65 36 34 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e r-id........(base64-encode-strin
51cc0 67 0a 20 20 20 20 20 20 20 20 28 65 6e 63 6f 64 65 2d 63 6f 64 69 6e 67 2d 73 74 72 69 6e 67 0a g.........(encode-coding-string.
51ce0 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 3a 25 73 22 0a 20 20 20 20 20 20 20 .........(format."%s:%s"........
51d00 20 20 20 20 20 20 20 20 20 20 28 62 61 73 65 36 34 2d 64 65 63 6f 64 65 2d 73 74 72 69 6e 67 20 ..........(base64-decode-string.
51d20 70 72 65 66 69 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6e 75 prefix)..................(if.(nu
51d40 6d 62 65 72 70 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 mberp.number-or-id).............
51d60 20 20 20 20 20 20 20 20 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 0a 20 20 20 20 20 20 20 20 20 20 .........number-or-id...........
51d80 20 20 20 20 20 20 20 20 20 3b 3b 20 43 75 72 72 65 6e 74 6c 79 20 65 76 65 72 79 20 49 44 20 69 .........;;.Currently.every.ID.i
51da0 73 20 62 61 73 65 36 34 20 65 6e 63 6f 64 65 64 2e 20 20 55 6e 66 6f 72 74 75 6e 61 74 65 6c 79 s.base64.encoded...Unfortunately
51dc0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 65 20 63 61 6e 6e 6f 74 ....................;;.we.cannot
51de0 20 75 73 65 20 74 68 65 20 49 44 73 20 6f 66 20 47 69 74 6c 61 62 20 6c 61 62 65 6c 73 20 28 73 .use.the.IDs.of.Gitlab.labels.(s
51e00 65 65 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b ee.comment....................;;
51e20 20 69 6e 20 74 68 65 20 72 65 73 70 65 63 74 69 76 65 20 60 66 6f 72 67 65 2d 2d 75 70 64 61 74 .in.the.respective.`forge--updat
51e40 65 2d 6c 61 62 65 6c 73 27 20 6d 65 74 68 6f 64 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 e-labels'.method),..............
51e60 20 20 20 20 20 20 3b 3b 20 61 6e 64 20 68 61 76 65 20 74 6f 20 75 73 65 20 74 68 65 69 72 20 6e ......;;.and.have.to.use.their.n
51e80 61 6d 65 73 2c 20 77 68 69 63 68 20 61 72 65 20 6e 6f 74 20 65 6e 63 6f 64 65 64 2e 0a 20 20 20 ames,.which.are.not.encoded.....
51ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f ................(or.(ignore-erro
51ec0 72 73 20 28 62 61 73 65 36 34 2d 64 65 63 6f 64 65 2d 73 74 72 69 6e 67 20 6e 75 6d 62 65 72 2d rs.(base64-decode-string.number-
51ee0 6f 72 2d 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e or-id))........................n
51f00 75 6d 62 65 72 2d 6f 72 2d 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 27 75 74 66 2d 38 29 0a umber-or-id)))..........'utf-8).
51f20 20 20 20 20 20 20 20 20 74 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 ........t)))..(cl-defmethod.forg
51f40 65 2d 74 6f 70 69 63 2d 6d 61 72 6b 2d 72 65 61 64 20 28 28 74 6f 70 69 63 20 66 6f 72 67 65 2d e-topic-mark-read.((topic.forge-
51f60 74 6f 70 69 63 29 29 0a 20 20 28 77 68 65 6e 20 28 65 71 20 28 6f 72 65 66 20 74 6f 70 69 63 20 topic))...(when.(eq.(oref.topic.
51f80 73 74 61 74 75 73 29 20 27 75 6e 72 65 61 64 29 0a 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 63 status).'unread).....(oset.topic
51fa0 20 73 74 61 74 75 73 20 27 70 65 6e 64 69 6e 67 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 .status.'pending)))..(cl-defmeth
51fc0 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 6d 61 72 6b 73 20 28 28 5f 72 65 70 od.forge--set-topic-marks.((_rep
51fe0 6f 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 20 6d 61 72 6b 73 29 o.forge-repository).topic.marks)
52000 0a 20 20 28 6f 73 65 74 20 74 6f 70 69 63 20 6d 61 72 6b 73 0a 20 20 20 20 20 20 20 20 28 66 6f ...(oset.topic.marks.........(fo
52020 72 67 65 2d 73 71 6c 2d 63 61 72 20 5b 3a 73 65 6c 65 63 74 20 69 64 20 3a 66 72 6f 6d 20 6d 61 rge-sql-car.[:select.id.:from.ma
52040 72 6b 20 3a 77 68 65 72 65 20 28 69 6e 20 6e 61 6d 65 20 24 76 31 29 5d 0a 20 20 20 20 20 20 20 rk.:where.(in.name.$v1)]........
52060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 63 6f 6e 63 61 74 20 6d 61 72 6b 73 29 29 ................(vconcat.marks))
52080 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a 0a 3b 3b 3b )...(forge-refresh-buffer))..;;;
520a0 20 51 75 65 72 79 0a 3b 3b 3b 3b 20 47 65 74 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 .Query.;;;;.Get..(cl-defmethod.f
520c0 6f 72 67 65 2d 67 65 74 2d 70 61 72 65 6e 74 20 28 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 74 6f orge-get-parent.((topic.forge-to
520e0 70 69 63 29 29 0a 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 74 6f pic))...(forge-get-repository.to
52100 70 69 63 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 72 pic))..(cl-defmethod.forge-get-r
52120 65 70 6f 73 69 74 6f 72 79 20 28 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 29 0a epository.((topic.forge-topic)).
52140 20 20 28 63 6c 6f 73 71 6c 2d 67 65 74 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 ..(closql-get.(forge-db)........
52160 20 20 20 20 20 20 20 28 6f 72 65 66 20 74 6f 70 69 63 20 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 .......(oref.topic.repository)..
52180 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 .............'forge-repository))
521a0 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 ..(cl-defmethod.forge-get-topic.
521c0 28 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 29 0a 20 20 74 6f 70 69 63 29 0a 0a ((topic.forge-topic))...topic)..
521e0 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 28 28 (cl-defmethod.forge-get-topic.((
52200 72 65 70 6f 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 6e 75 6d 62 65 72 2d 6f 72 repo.forge-repository).number-or
52220 2d 69 64 29 0a 20 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 70 20 6e 75 6d 62 65 72 2d 6f 72 -id)...(cond.((stringp.number-or
52240 2d 69 64 29 0a 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 66 6f 72 67 65 2d 67 65 74 2d 64 69 73 -id)..........(or.(forge-get-dis
52260 63 75 73 73 69 6f 6e 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 cussion.number-or-id)...........
52280 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 20 20 20 20 20 6e 75 6d 62 65 72 2d ...(forge-get-issue......number-
522a0 6f 72 2d 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 or-id)..............(forge-get-p
522c0 75 6c 6c 72 65 71 20 20 20 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 29 29 0a 20 20 20 20 20 20 ullreq....number-or-id))).......
522e0 20 20 28 28 3c 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 20 30 29 0a 20 20 20 20 20 20 20 20 20 28 ..((<.number-or-id.0)..........(
52300 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 72 65 70 6f 20 28 61 62 73 20 6e 75 6d 62 forge-get-pullreq.repo.(abs.numb
52320 65 72 2d 6f 72 2d 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 67 65 74 2d er-or-id))).........((forge-get-
52340 64 69 73 63 75 73 73 69 6f 6e 20 72 65 70 6f 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 29 0a 20 discussion.repo.number-or-id))..
52360 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 20 20 20 20 20 72 65 .......((forge-get-issue......re
52380 70 6f 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 po.number-or-id)).........((forg
523a0 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 20 20 20 72 65 70 6f 20 6e 75 6d 62 65 72 2d 6f 72 2d e-get-pullreq....repo.number-or-
523c0 69 64 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 2d id))))..(cl-defmethod.forge-get-
523e0 74 6f 70 69 63 20 28 28 6e 75 6d 62 65 72 20 69 6e 74 65 67 65 72 29 29 0a 20 20 28 69 66 20 28 topic.((number.integer))...(if.(
52400 3c 20 6e 75 6d 62 65 72 20 30 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c <.number.0).......(forge-get-pul
52420 6c 72 65 71 20 28 61 62 73 20 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 28 6f 72 20 28 66 6f 72 67 lreq.(abs.number)).....(or.(forg
52440 65 2d 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 e-get-discussion.number)........
52460 20 28 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 20 20 20 20 20 6e 75 6d 62 65 72 29 0a 20 .(forge-get-issue......number)..
52480 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 20 20 20 6e 75 6d .......(forge-get-pullreq....num
524a0 62 65 72 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 67 65 74 ber))))..(cl-defmethod.forge-get
524c0 2d 74 6f 70 69 63 20 28 28 69 64 20 73 74 72 69 6e 67 29 29 0a 20 20 28 6f 72 20 28 66 6f 72 67 -topic.((id.string))...(or.(forg
524e0 65 2d 67 65 74 2d 64 69 73 63 75 73 73 69 6f 6e 20 69 64 29 0a 20 20 20 20 20 20 28 66 6f 72 67 e-get-discussion.id).......(forg
52500 65 2d 67 65 74 2d 69 73 73 75 65 20 20 20 20 20 20 69 64 29 0a 20 20 20 20 20 20 28 66 6f 72 67 e-get-issue......id).......(forg
52520 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 20 20 20 69 64 29 29 29 0a 0a 3b 3b 3b 3b 20 43 75 72 e-get-pullreq....id)))..;;;;.Cur
52540 72 65 6e 74 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 rent..(defun.forge-current-topic
52560 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 .(&optional.demand)..."Return.th
52580 65 20 74 6f 70 69 63 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 62 65 69 6e 67 20 76 69 73 69 74 65 e.topic.at.point.or.being.visite
525a0 64 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 20 74 6f 70 69 63 20 61 6e 64 d..If.there.is.no.such.topic.and
525c0 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 73 69 67 6e 61 6c 0a .DEMAND.is.non-nil,.then.signal.
525e0 61 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 61 74 an.error."...(or.(forge-topic-at
52600 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 -point).......forge-buffer-topic
52620 0a 20 20 20 20 20 20 28 61 6e 64 20 64 65 6d 61 6e 64 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 .......(and.demand.(user-error."
52640 4e 6f 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f No.current.topic"))))..(defun.fo
52660 72 67 65 2d 74 6f 70 69 63 2d 61 74 2d 70 6f 69 6e 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 rge-topic-at-point.(&optional.de
52680 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 74 6f 70 69 63 20 61 74 20 70 6f 69 mand)..."Return.the.topic.at.poi
526a0 6e 74 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 20 74 6f 70 69 63 20 61 6e nt..If.there.is.no.such.topic.an
526c0 64 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 73 69 67 6e 61 6c d.DEMAND.is.non-nil,.then.signal
526e0 0a 61 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e .an.error."...(or.(thing-at-poin
52700 74 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 65 63 t.'forge-topic).......(magit-sec
52720 74 69 6f 6e 2d 76 61 6c 75 65 2d 69 66 20 27 28 64 69 73 63 75 73 73 69 6f 6e 20 69 73 73 75 65 tion-value-if.'(discussion.issue
52740 20 70 75 6c 6c 72 65 71 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c .pullreq)).......(forge-get-pull
52760 72 65 71 20 3a 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 28 61 6e 64 20 64 65 6d 61 6e 64 20 28 req.:branch).......(and.demand.(
52780 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 20 74 6f 70 69 63 20 61 74 20 70 6f 69 6e 74 22 29 29 user-error."No.topic.at.point"))
527a0 29 29 0a 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 20 27 74 68 69 6e 67 2d 61 74 2d ))..(put.'forge-topic.'thing-at-
527c0 70 6f 69 6e 74 20 23 27 66 6f 72 67 65 2d 74 68 69 6e 67 61 74 70 74 2d 2d 74 6f 70 69 63 29 0a point.#'forge-thingatpt--topic).
527e0 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 74 68 69 6e 67 61 74 70 74 2d 2d 74 6f 70 69 63 20 28 29 (defun.forge-thingatpt--topic.()
52800 0a 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 5f 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 2d 6c ...(and-let.((_(thing-at-point-l
52820 6f 6f 6b 69 6e 67 2d 61 74 20 22 5c 5c 28 5b 23 21 5d 5c 5c 29 5c 5c 28 5b 30 2d 39 5d 2b 5c 5c ooking-at."\\([#!]\\)\\([0-9]+\\
52840 29 5c 5c 5f 3e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 65 66 69 78 20 28 6d 61 )\\_>")).............(prefix.(ma
52860 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 29 29 0a 20 20 20 tch-string-no-properties.1))....
52880 20 20 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 .........(number.(string-to-numb
528a0 65 72 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 32 er.(match-string-no-properties.2
528c0 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 2d 72 65 ))).............(repo.(forge--re
528e0 70 6f 2d 66 6f 72 2d 74 68 69 6e 67 61 74 70 74 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 po-for-thingatpt))).....(cond.((
52900 65 71 75 61 6c 20 70 72 65 66 69 78 20 22 23 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 6f equal.prefix."#")............(fo
52920 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 72 65 70 6f 20 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 rge-get-topic.repo.number)).....
52940 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d ......((forge-gitlab-repository-
52960 2d 65 69 65 69 6f 2d 63 68 69 6c 64 70 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 -eieio-childp.repo)............(
52980 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 72 65 70 6f 20 6e 75 6d 62 65 72 29 29 29 forge-get-pullreq.repo.number)))
529a0 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 67 69 6f 6e 2d 74 6f 70 69 63 73 20 28 ))..(defun.forge-region-topics.(
529c0 29 0a 20 20 28 6d 61 67 69 74 2d 72 65 67 69 6f 6e 2d 76 61 6c 75 65 73 20 27 28 64 69 73 63 75 )...(magit-region-values.'(discu
529e0 73 73 69 6f 6e 20 69 73 73 75 65 20 70 75 6c 6c 72 65 71 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 ssion.issue.pullreq)))..(defun.f
52a00 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 2d 74 79 70 65 20 28 29 0a 20 20 28 6d 61 orge-current-topic-type.()...(ma
52a20 67 69 74 2d 73 65 63 74 69 6f 6e 2d 63 61 73 65 0a 20 20 20 20 28 5b 2a 20 64 69 73 63 75 73 73 git-section-case.....([*.discuss
52a40 69 6f 6e 73 5d 20 27 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 28 5b 2a 20 69 73 73 75 65 ions].'discussion).....([*.issue
52a60 73 5d 20 20 20 20 20 20 27 69 73 73 75 65 29 0a 20 20 20 20 28 5b 2a 20 70 75 6c 6c 72 65 71 73 s]......'issue).....([*.pullreqs
52a80 5d 20 20 20 20 27 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 28 74 20 28 6f 72 20 28 61 6e 64 20 66 ]....'pullreq).....(t.(or.(and.f
52aa0 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 0a 20 20 20 20 20 20 20 orge--buffer-topics-spec........
52ac0 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 .........(oref.forge--buffer-top
52ae0 69 63 73 2d 73 70 65 63 20 74 79 70 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 27 74 6f 70 69 ics-spec.type))............'topi
52b00 63 29 29 29 29 0a 0a 3b 3b 3b 3b 20 4c 69 73 74 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 c))))..;;;;.List..(defvar-local.
52b20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 6e 69 6c 29 0a 28 forge--buffer-topics-spec.nil).(
52b40 70 75 74 20 27 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 27 put.'forge--buffer-topics-spec.'
52b60 70 65 72 6d 61 6e 65 6e 74 2d 6c 6f 63 61 6c 20 74 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 permanent-local.t)..(defun.forge
52b80 2d 2d 69 6e 69 74 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 28 29 0a 20 20 28 --init-buffer-topics-spec.()...(
52ba0 75 6e 6c 65 73 73 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 unless.forge--buffer-topics-spec
52bc0 0a 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d .....(setq.forge--buffer-topics-
52be0 73 70 65 63 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 6e 65 20 66 6f 72 67 65 2d 73 74 61 74 spec...........(clone.forge-stat
52c00 75 73 2d 62 75 66 66 65 72 2d 64 65 66 61 75 6c 74 2d 74 6f 70 69 63 2d 66 69 6c 74 65 72 73 29 us-buffer-default-topic-filters)
52c20 29 29 29 0a 28 61 64 64 2d 68 6f 6f 6b 20 27 6d 61 67 69 74 2d 73 74 61 74 75 73 2d 6d 6f 64 65 ))).(add-hook.'magit-status-mode
52c40 2d 68 6f 6f 6b 20 23 27 66 6f 72 67 65 2d 2d 69 6e 69 74 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 -hook.#'forge--init-buffer-topic
52c60 73 2d 73 70 65 63 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 63 6c 6f 6e 65 2d 62 75 66 s-spec)..(defun.forge--clone-buf
52c80 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 28 29 0a 20 20 28 66 6f 72 67 65 2d 2d 69 6e 69 fer-topics-spec.()...(forge--ini
52ca0 74 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 29 0a 20 20 28 63 6c 6f 6e 65 20 66 t-buffer-topics-spec)...(clone.f
52cc0 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 29 29 0a 0a 28 64 65 66 orge--buffer-topics-spec))..(def
52ce0 63 6c 61 73 73 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 28 29 0a 20 20 28 28 class.forge--topics-spec.()...((
52d00 74 79 70 65 20 20 20 20 20 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 5c 0a 4c 69 type........:documentation."\.Li
52d20 6d 69 74 20 6c 69 73 74 20 62 61 73 65 64 20 6f 6e 20 74 6f 70 69 63 20 74 79 70 65 2e 22 0a 20 mit.list.based.on.topic.type."..
52d40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 79 70 65 0a 20 20 ...............:initarg.:type...
52d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 74 6f 70 69 63 0a 20 ..............:initform.'topic..
52d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 28 6d 65 6d 62 65 72 20 74 6f 70 ...............:type.(member.top
52da0 69 63 20 64 69 73 63 75 73 73 69 6f 6e 20 69 73 73 75 65 20 70 75 6c 6c 72 65 71 20 6e 69 6c 29 ic.discussion.issue.pullreq.nil)
52dc0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 75 73 74 6f 6d 20 28 63 68 6f 69 63 65 .................:custom.(choice
52de0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 ..........................(const
52e00 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .topic).........................
52e20 20 28 63 6f 6e 73 74 20 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .(const.discussion).............
52e40 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 69 73 73 75 65 29 0a 20 20 20 20 20 .............(const.issue)......
52e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 70 75 6c 6c 72 ....................(const.pullr
52e80 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f eq)..........................(co
52ea0 6e 73 74 20 3a 74 61 67 20 22 64 69 73 61 62 6c 65 20 74 6f 70 69 63 20 73 65 63 74 69 6f 6e 73 nst.:tag."disable.topic.sections
52ec0 20 28 6e 69 6c 29 22 20 6e 69 6c 29 29 29 0a 20 20 20 28 61 63 74 69 76 65 20 20 20 20 20 20 3a .(nil)".nil)))....(active......:
52ee0 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 5c 0a 4c 69 6d 69 74 20 6c 69 73 74 20 74 6f 20 61 documentation."\.Limit.list.to.a
52f00 63 74 69 76 65 20 74 6f 70 69 63 73 2e 0a 0a 41 20 74 6f 70 69 63 20 69 73 20 5c 22 61 63 74 69 ctive.topics...A.topic.is.\"acti
52f20 76 65 5c 22 20 69 66 20 69 74 73 20 73 74 61 74 65 20 28 70 75 62 6c 69 63 20 63 6f 6e 64 69 74 ve\".if.its.state.(public.condit
52f40 69 6f 6e 29 20 69 73 20 6f 70 65 6e 20 61 6e 64 2f 6f 72 0a 69 74 73 20 73 74 61 74 75 73 20 28 ion).is.open.and/or.its.status.(
52f60 70 72 69 76 61 74 65 20 63 6f 6e 64 69 74 69 6f 6e 29 20 69 73 20 75 6e 72 65 61 64 20 6f 72 20 private.condition).is.unread.or.
52f80 70 65 6e 64 69 6e 67 2e 0a 0a 57 68 65 6e 20 74 68 69 73 20 69 73 20 74 2c 20 74 68 65 6e 20 74 pending...When.this.is.t,.then.t
52fa0 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20 60 73 74 61 74 65 27 20 61 6e 64 20 60 73 74 61 he.value.of.the.`state'.and.`sta
52fc0 74 75 73 27 20 73 6c 6f 74 73 20 61 72 65 0a 69 67 6e 6f 72 65 64 2e 22 0a 20 20 20 20 20 20 20 tus'.slots.are.ignored."........
52fe0 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 61 63 74 69 76 65 0a 20 20 20 20 20 20 .........:initarg.:active.......
53000 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 74 0a 20 20 20 20 20 20 20 20 20 20 ..........:initform.t...........
53020 20 20 20 20 20 20 3a 74 79 70 65 20 62 6f 6f 6c 65 61 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 ......:type.boolean.............
53040 20 20 20 20 3a 63 75 73 74 6f 6d 20 62 6f 6f 6c 65 61 6e 29 0a 20 20 20 28 73 74 61 74 65 20 20 ....:custom.boolean)....(state..
53060 20 20 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 5c 0a 4c 69 6d 69 74 20 6c 69 73 .....:documentation."\.Limit.lis
53080 74 20 62 61 73 65 64 20 6f 6e 20 74 6f 70 69 63 20 28 70 75 62 6c 69 63 29 20 73 74 61 74 65 2e t.based.on.topic.(public).state.
530a0 0a 0a 53 74 61 74 65 20 69 73 20 74 68 65 20 5c 22 70 75 62 6c 69 63 20 63 6f 6e 64 69 74 69 6f ..State.is.the.\"public.conditio
530c0 6e 5c 22 2e 20 20 49 2e 65 2e 2c 20 69 73 20 74 68 65 20 74 6f 70 69 63 20 73 74 69 6c 6c 20 6f n\"...I.e.,.is.the.topic.still.o
530e0 70 65 6e 3f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a pen?".................:initarg.:
53100 73 74 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 state.................:initform.
53120 27 6f 70 65 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 28 73 61 74 'open.................:type.(sat
53140 69 73 66 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c isfies........................(l
53160 61 6d 62 64 61 20 28 76 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ambda.(val).....................
53180 20 20 20 20 20 28 6d 65 6d 62 65 72 20 76 61 6c 20 27 28 6f 70 65 6e 0a 20 20 20 20 20 20 20 20 .....(member.val.'(open.........
531a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 ...............................c
531c0 6c 6f 73 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 losed...........................
531e0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6d 70 6c 65 74 65 64 20 6d 65 72 67 65 64 29 0a .............(completed.merged).
53200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
53220 20 20 20 20 20 20 20 63 6f 6d 70 6c 65 74 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .......completed................
53240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 65 72 67 65 64 0a 20 ........................merged..
53260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
53280 20 20 20 20 20 20 28 75 6e 70 6c 61 6e 6e 65 64 20 64 75 70 6c 69 63 61 74 65 20 6f 75 74 64 61 ......(unplanned.duplicate.outda
532a0 74 65 64 20 72 65 6a 65 63 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ted.rejected)...................
532c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 6e 70 6c 61 6e 6e 65 64 0a 20 .....................unplanned..
532e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
53300 20 20 20 20 20 20 64 75 70 6c 69 63 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ......duplicate.................
53320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 75 74 64 61 74 65 64 0a .......................outdated.
53340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
53360 20 20 20 20 20 20 20 72 65 6a 65 63 74 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .......rejected.................
53380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 29 29 29 29 0a 20 .......................nil))))..
533a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 75 73 74 6f 6d 20 28 63 68 6f 69 63 65 0a 20 ...............:custom.(choice..
533c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 6f ........................(const.o
533e0 70 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 pen)..........................(c
53400 6f 6e 73 74 20 63 6c 6f 73 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 onst.closed)....................
53420 20 20 20 20 20 20 28 63 6f 6e 73 74 20 28 63 6f 6d 70 6c 65 74 65 64 20 6d 65 72 67 65 64 29 29 ......(const.(completed.merged))
53440 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 ..........................(const
53460 20 63 6f 6d 70 6c 65 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .completed).....................
53480 20 20 20 20 20 28 63 6f 6e 73 74 20 6d 65 72 67 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .....(const.merged).............
534a0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 28 75 6e 70 6c 61 6e 6e 65 64 20 64 .............(const.(unplanned.d
534c0 75 70 6c 69 63 61 74 65 20 6f 75 74 64 61 74 65 64 20 72 65 6a 65 63 74 65 64 29 29 0a 20 20 20 uplicate.outdated.rejected))....
534e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 75 6e 70 ......................(const.unp
53500 6c 61 6e 6e 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lanned).........................
53520 20 28 63 6f 6e 73 74 20 64 75 70 6c 69 63 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .(const.duplicate)..............
53540 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 6f 75 74 64 61 74 65 64 29 0a 20 20 20 ............(const.outdated)....
53560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 72 65 6a ......................(const.rej
53580 65 63 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ected)..........................
535a0 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 61 6c 6c 20 28 6e 69 6c 29 22 20 6e 69 6c 29 29 29 0a 20 (const.:tag."all.(nil)".nil)))..
535c0 20 20 28 73 74 61 74 75 73 20 20 20 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 5c ..(status......:documentation."\
535e0 0a 4c 69 6d 69 74 20 6c 69 73 74 20 62 61 73 65 64 20 6f 6e 20 74 6f 70 69 63 20 28 70 72 69 76 .Limit.list.based.on.topic.(priv
53600 61 74 65 29 20 73 74 61 74 75 73 2e 0a 0a 53 74 61 74 75 73 20 69 73 20 74 68 65 20 5c 22 70 72 ate).status...Status.is.the.\"pr
53620 69 76 61 74 65 20 63 6f 6e 64 69 74 69 6f 6e 5c 22 2e 20 20 49 2e 65 2e 2c 20 68 61 76 65 20 79 ivate.condition\"...I.e.,.have.y
53640 6f 75 20 64 65 63 69 64 65 64 20 79 65 74 0a 74 68 61 74 20 2a 79 6f 75 2a 20 61 72 65 20 64 6f ou.decided.yet.that.*you*.are.do
53660 6e 65 20 77 69 74 68 20 74 68 65 20 74 6f 70 69 63 2c 20 61 6e 64 20 68 61 76 65 20 6f 74 68 65 ne.with.the.topic,.and.have.othe
53680 72 73 20 6d 61 64 65 20 63 68 61 6e 67 65 73 2c 0a 77 68 69 63 68 20 2a 79 6f 75 2a 20 68 61 76 rs.made.changes,.which.*you*.hav
536a0 65 20 6e 6f 74 20 73 65 65 6e 20 79 65 74 3f 0a 0a 60 69 6e 62 6f 78 27 20 6d 65 61 6e 73 20 5c e.not.seen.yet?..`inbox'.means.\
536c0 22 60 75 6e 72 65 61 64 27 20 6f 72 20 60 70 65 6e 64 69 6e 67 27 5c 22 2e 22 0a 20 20 20 20 20 "`unread'.or.`pending'\"."......
536e0 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 73 74 61 74 75 73 0a 20 20 20 20 ...........:initarg.:status.....
53700 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 0a 20 20 20 20 20 20 ............:initform.nil.......
53720 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 28 6d 65 6d 62 65 72 20 69 6e 62 6f 78 20 75 6e ..........:type.(member.inbox.un
53740 72 65 61 64 20 70 65 6e 64 69 6e 67 20 64 6f 6e 65 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 read.pending.done.nil)..........
53760 20 20 20 20 20 20 20 3a 63 75 73 74 6f 6d 20 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 .......:custom.(choice..........
53780 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 69 6e 62 6f 78 29 0a 20 20 ................(const.inbox)...
537a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 75 6e .......................(const.un
537c0 72 65 61 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 read)..........................(
537e0 63 6f 6e 73 74 20 70 65 6e 64 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 const.pending)..................
53800 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 64 6f 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 ........(const.done)............
53820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 61 6c 6c 20 28 ..............(const.:tag."all.(
53840 6e 69 6c 29 22 20 6e 69 6c 29 29 29 0a 20 20 20 28 75 70 64 61 74 65 64 20 20 20 20 20 3a 64 6f nil)".nil)))....(updated.....:do
53860 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 5c 0a 44 61 74 65 20 77 68 65 6e 20 74 6f 70 69 63 20 77 cumentation."\.Date.when.topic.w
53880 61 73 20 6c 61 73 74 20 75 70 64 61 74 65 64 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 as.last.updated."...............
538a0 20 20 3a 69 6e 69 74 61 72 67 20 3a 75 70 64 61 74 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 ..:initarg.:updated.............
538c0 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....:initform.nil...............
538e0 20 20 3a 74 79 70 65 20 28 6f 72 20 73 74 72 69 6e 67 20 6e 75 6c 6c 29 29 0a 20 20 20 28 63 61 ..:type.(or.string.null))....(ca
53900 74 65 67 6f 72 79 20 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 5c 0a 4c 69 6d 69 tegory....:documentation."\.Limi
53920 74 20 6c 69 73 74 20 74 6f 20 64 69 73 63 75 73 73 69 6f 6e 73 20 6f 66 20 67 69 76 65 6e 20 63 t.list.to.discussions.of.given.c
53940 61 74 65 67 6f 72 79 2e 0a 49 73 73 75 65 73 20 61 6e 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 ategory..Issues.and.pull-request
53960 73 20 61 72 65 20 75 6e 61 66 66 65 63 74 65 64 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 s.are.unaffected."..............
53980 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 63 61 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 ...:initarg.:category...........
539a0 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 ......:initform.nil.............
539c0 20 20 20 20 3a 74 79 70 65 20 28 6f 72 20 73 74 72 69 6e 67 20 6e 75 6c 6c 29 0a 20 20 20 20 20 ....:type.(or.string.null)......
539e0 20 20 20 20 20 20 20 20 20 20 20 3a 63 75 73 74 6f 6d 20 28 63 68 6f 69 63 65 0a 20 20 20 20 20 ...........:custom.(choice......
53a00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 20 3a 74 61 67 ....................(string.:tag
53a20 20 22 6e 61 6d 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ."name")........................
53a40 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 61 6c 6c 20 28 6e 69 6c 29 22 20 6e 69 6c 29 29 29 ..(const.:tag."all.(nil)".nil)))
53a60 0a 20 20 20 28 6d 69 6c 65 73 74 6f 6e 65 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 ....(milestone...:documentation.
53a80 22 5c 0a 4c 69 6d 69 74 20 6c 69 73 74 20 74 6f 20 69 73 73 75 65 73 20 61 6e 64 20 70 75 6c 6c "\.Limit.list.to.issues.and.pull
53aa0 2d 72 65 71 75 65 73 74 73 20 61 73 73 69 67 6e 65 64 20 74 6f 20 67 69 76 65 6e 20 6d 69 6c 65 -requests.assigned.to.given.mile
53ac0 73 74 6f 6e 65 2e 0a 44 69 73 63 75 73 73 69 6f 6e 73 20 61 72 65 20 75 6e 61 66 66 65 63 74 65 stone..Discussions.are.unaffecte
53ae0 64 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6d 69 d.".................:initarg.:mi
53b00 6c 65 73 74 6f 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 lestone.................:initfor
53b20 6d 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 28 6f 72 20 m.nil.................:type.(or.
53b40 73 74 72 69 6e 67 20 6e 75 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 75 string.null).................:cu
53b60 73 74 6f 6d 20 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 stom.(choice....................
53b80 20 20 20 20 20 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 6e 61 6d 65 22 29 0a 20 20 20 20 20 ......(string.:tag."name")......
53ba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 ....................(const.:tag.
53bc0 22 61 6c 6c 20 28 6e 69 6c 29 22 20 6e 69 6c 29 29 29 0a 20 20 20 28 6c 61 62 65 6c 73 20 20 20 "all.(nil)".nil)))....(labels...
53be0 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 5c 0a 4c 69 6d 69 74 20 6c 69 73 74 20 ...:documentation."\.Limit.list.
53c00 74 6f 20 74 6f 70 69 63 73 20 77 69 74 68 20 61 74 20 6c 65 61 73 74 20 6f 6e 65 20 6f 66 20 74 to.topics.with.at.least.one.of.t
53c20 68 65 20 67 69 76 65 6e 20 6c 61 62 65 6c 73 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 he.given.labels."...............
53c40 20 20 3a 69 6e 69 74 61 72 67 20 3a 6c 61 62 65 6c 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ..:initarg.:labels..............
53c60 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...:initform.nil................
53c80 20 3a 74 79 70 65 20 28 6c 69 73 74 2d 6f 66 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 .:type.(list-of.string).........
53ca0 20 20 20 20 20 20 20 20 3a 63 75 73 74 6f 6d 20 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 29 ........:custom.(repeat.string))
53cc0 0a 20 20 20 28 6d 61 72 6b 73 20 20 20 20 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 ....(marks.......:documentation.
53ce0 22 5c 0a 4c 69 6d 69 74 20 6c 69 73 74 20 74 6f 20 74 6f 70 69 63 73 20 77 69 74 68 20 61 74 20 "\.Limit.list.to.topics.with.at.
53d00 6c 65 61 73 74 20 6f 6e 65 20 6f 66 20 74 68 65 20 67 69 76 65 6e 20 6d 61 72 6b 73 2e 0a 4d 61 least.one.of.the.given.marks..Ma
53d20 72 6b 73 20 61 72 65 20 6c 69 6b 65 20 6c 61 62 65 6c 73 2c 20 62 75 74 20 74 68 65 79 20 61 72 rks.are.like.labels,.but.they.ar
53d40 65 20 70 72 69 76 61 74 65 20 61 6e 64 20 6c 6f 63 61 6c 20 74 6f 20 74 68 65 0a 63 75 72 72 65 e.private.and.local.to.the.curre
53d60 6e 74 20 46 6f 72 67 65 20 64 61 74 61 62 61 73 65 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 nt.Forge.database.".............
53d80 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6d 61 72 6b 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 ....:initarg.:marks.............
53da0 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....:initform.nil...............
53dc0 20 20 3a 74 79 70 65 20 28 6c 69 73 74 2d 6f 66 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 ..:type.(list-of.string)........
53de0 20 20 20 20 20 20 20 20 20 3a 63 75 73 74 6f 6d 20 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 .........:custom.(repeat.string)
53e00 29 0a 20 20 20 28 73 61 76 65 64 20 20 20 20 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e )....(saved.......:documentation
53e20 20 22 4c 69 6d 69 74 20 6c 69 73 74 20 74 6f 20 73 61 76 65 64 20 74 6f 70 69 63 73 2e 22 0a 20 ."Limit.list.to.saved.topics."..
53e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 73 61 76 65 64 0a 20 ...............:initarg.:saved..
53e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 0a 20 20 20 ...............:initform.nil....
53e80 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 62 6f 6f 6c 65 61 6e 0a 20 20 20 20 20 .............:type.boolean......
53ea0 20 20 20 20 20 20 20 20 20 20 20 3a 63 75 73 74 6f 6d 20 62 6f 6f 6c 65 61 6e 29 0a 20 20 20 28 ...........:custom.boolean)....(
53ec0 61 75 74 68 6f 72 20 20 20 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 5c 0a 4c 69 author......:documentation."\.Li
53ee0 6d 69 74 20 6c 69 73 74 20 74 6f 20 74 6f 70 69 63 73 20 63 72 65 61 74 65 64 20 62 79 20 67 69 mit.list.to.topics.created.by.gi
53f00 76 65 6e 20 75 73 65 72 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 ven.user.".................:init
53f20 61 72 67 20 3a 61 75 74 68 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 arg.:author.................:ini
53f40 74 66 6f 72 6d 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 61 62 65 6c tform.nil.................:label
53f60 20 22 41 75 74 68 6f 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 ."Author".................:type.
53f80 28 6f 72 20 73 74 72 69 6e 67 20 6e 75 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (or.string.null)................
53fa0 20 3a 63 75 73 74 6f 6d 20 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .:custom.(choice................
53fc0 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 75 73 65 72 6e 61 6d 65 ..........(string.:tag."username
53fe0 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e ")..........................(con
54000 73 74 20 3a 74 61 67 20 22 6e 6f 20 66 69 6c 74 65 72 20 28 6e 69 6c 29 22 20 6e 69 6c 29 29 29 st.:tag."no.filter.(nil)".nil)))
54020 0a 20 20 20 28 61 73 73 69 67 6e 65 65 20 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 ....(assignee....:documentation.
54040 22 5c 0a 4c 69 6d 69 74 20 6c 69 73 74 20 74 6f 20 74 6f 70 69 63 73 20 61 73 73 69 67 6e 65 64 "\.Limit.list.to.topics.assigned
54060 20 74 6f 20 67 69 76 65 6e 20 75 73 65 72 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .to.given.user."................
54080 20 3a 69 6e 69 74 61 72 67 20 3a 61 73 73 69 67 6e 65 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 .:initarg.:assignee.............
540a0 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....:initform.nil...............
540c0 20 20 3a 6c 61 62 65 6c 20 22 41 73 73 69 67 6e 65 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 ..:label."Assignee".............
540e0 20 20 20 20 3a 74 79 70 65 20 28 6f 72 20 73 74 72 69 6e 67 20 6e 75 6c 6c 29 0a 20 20 20 20 20 ....:type.(or.string.null)......
54100 20 20 20 20 20 20 20 20 20 20 20 3a 63 75 73 74 6f 6d 20 28 63 68 6f 69 63 65 0a 20 20 20 20 20 ...........:custom.(choice......
54120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 20 3a 74 61 67 ....................(string.:tag
54140 20 22 75 73 65 72 6e 61 6d 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ."username")....................
54160 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 6e 6f 20 66 69 6c 74 65 72 20 28 6e 69 ......(const.:tag."no.filter.(ni
54180 6c 29 22 20 6e 69 6c 29 29 29 0a 20 20 20 28 72 65 76 69 65 77 65 72 20 20 20 20 3a 64 6f 63 75 l)".nil)))....(reviewer....:docu
541a0 6d 65 6e 74 61 74 69 6f 6e 20 22 5c 0a 4c 69 6d 69 74 20 6c 69 73 74 20 74 6f 20 74 6f 70 69 63 mentation."\.Limit.list.to.topic
541c0 73 20 66 6f 72 20 77 68 69 63 68 20 61 20 72 65 76 69 65 77 20 62 79 20 74 68 65 20 67 69 76 65 s.for.which.a.review.by.the.give
541e0 6e 20 75 73 65 72 20 77 61 73 20 72 65 71 75 65 73 74 65 64 2e 22 0a 20 20 20 20 20 20 20 20 20 n.user.was.requested."..........
54200 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 72 65 76 69 65 77 65 72 0a 20 20 20 20 20 20 .......:initarg.:reviewer.......
54220 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 ..........:initform.nil.........
54240 20 20 20 20 20 20 20 20 3a 6c 61 62 65 6c 20 22 52 65 76 69 65 77 65 72 22 0a 20 20 20 20 20 20 ........:label."Reviewer".......
54260 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 28 6f 72 20 73 74 72 69 6e 67 20 6e 75 6c 6c 29 ..........:type.(or.string.null)
54280 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 75 73 74 6f 6d 20 28 63 68 6f 69 63 65 .................:custom.(choice
542a0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e ..........................(strin
542c0 67 20 3a 74 61 67 20 22 75 73 65 72 6e 61 6d 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 g.:tag."username")..............
542e0 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 6e 6f 20 66 69 6c 74 ............(const.:tag."no.filt
54300 65 72 20 28 6e 69 6c 29 22 20 6e 69 6c 29 29 29 0a 20 20 20 28 67 6c 6f 62 61 6c 20 20 20 20 20 er.(nil)".nil)))....(global.....
54320 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 57 68 65 74 68 65 72 20 74 6f 20 6c 69 73 74 .:documentation."Whether.to.list
54340 20 74 6f 70 69 63 73 20 66 6f 72 20 61 6c 6c 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 22 0a 20 .topics.for.all.repositories."..
54360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 67 6c 6f 62 61 6c 0a ...............:initarg.:global.
54380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 0a 20 20 ................:initform.nil...
543a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 62 6f 6f 6c 65 61 6e 29 0a 20 20 20 ..............:type.boolean)....
543c0 28 6f 72 64 65 72 20 20 20 20 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 4f 72 64 (order.......:documentation."Ord
543e0 65 72 20 69 6e 20 77 68 69 63 68 20 74 6f 70 69 63 73 20 61 72 65 20 6c 69 73 74 65 64 2e 22 0a er.in.which.topics.are.listed.".
54400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6f 72 64 65 72 0a ................:initarg.:order.
54420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 6e 65 77 65 73 ................:initform.'newes
54440 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 28 6d 65 6d 62 65 72 20 t.................:type.(member.
54460 6e 65 77 65 73 74 20 6f 6c 64 65 73 74 20 72 65 63 65 6e 74 6c 79 2d 75 70 64 61 74 65 64 20 61 newest.oldest.recently-updated.a
54480 6e 63 69 65 6e 74 6c 79 2d 75 70 64 61 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nciently-updated)...............
544a0 20 20 3a 63 75 73 74 6f 6d 20 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 6e 65 77 65 73 74 29 ..:custom.(choice.(const.newest)
544c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
544e0 20 28 63 6f 6e 73 74 20 6f 6c 64 65 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(const.oldest).................
54500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 72 65 63 65 6e 74 6c 79 2d ................(const.recently-
54520 75 70 64 61 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 updated)........................
54540 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 61 6e 63 69 65 6e 74 6c 79 2d 75 70 64 61 74 65 .........(const.anciently-update
54560 64 29 29 29 0a 20 20 20 28 6c 69 6d 69 74 20 20 20 20 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 d)))....(limit.......:documentat
54580 69 6f 6e 20 22 4e 75 6d 62 65 72 20 6f 66 20 74 6f 70 69 63 73 20 74 6f 20 6c 69 73 74 20 61 74 ion."Number.of.topics.to.list.at
545a0 20 6d 6f 73 74 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 .most.".................:initarg
545c0 20 3a 6c 69 6d 69 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 .:limit.................:initfor
545e0 6d 20 32 30 30 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 28 6f 72 20 m.200.................:type.(or.
54600 69 6e 74 65 67 65 72 20 6e 75 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 integer.null).................:c
54620 75 73 74 6f 6d 20 28 63 68 6f 69 63 65 20 6e 61 74 6e 75 6d 20 28 63 6f 6e 73 74 20 3a 74 61 67 ustom.(choice.natnum.(const.:tag
54640 20 22 6e 6f 20 6c 69 6d 69 74 22 20 6e 69 6c 29 29 29 0a 20 20 20 28 67 72 6f 75 70 65 64 20 20 ."no.limit".nil)))....(grouped..
54660 20 20 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 57 68 65 74 68 65 72 20 74 6f 20 67 72 ...:documentation."Whether.to.gr
54680 6f 75 70 20 74 6f 70 69 63 73 20 62 79 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20 20 20 20 oup.topics.by.repository."......
546a0 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 67 72 6f 75 70 65 64 0a 20 20 20 ...........:initarg.:grouped....
546c0 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 0a 20 20 20 20 20 .............:initform.nil......
546e0 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 62 6f 6f 6c 65 61 6e 0a 20 20 20 20 20 20 20 ...........:type.boolean........
54700 20 20 20 20 20 20 20 20 20 3a 63 75 73 74 6f 6d 20 62 6f 6f 6c 65 61 6e 29 29 29 0a 0a 28 64 65 .........:custom.boolean)))..(de
54720 66 75 6e 20 66 6f 72 67 65 2d 2d 63 61 73 74 2d 74 6f 70 69 63 73 2d 73 70 65 63 2d 73 74 61 74 fun.forge--cast-topics-spec-stat
54740 65 20 28 73 70 65 63 29 0a 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 63 61 73 74 20 28 70 63 61 e.(spec)...(when-let.((cast.(pca
54760 73 65 20 28 6c 69 73 74 20 28 6f 72 65 66 20 73 70 65 63 20 74 79 70 65 29 20 28 6f 72 65 66 20 se.(list.(oref.spec.type).(oref.
54780 73 70 65 63 20 73 74 61 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 spec.state))....................
547a0 20 20 28 60 28 74 6f 70 69 63 20 2c 28 6f 72 20 27 75 6e 70 6c 61 6e 6e 65 64 20 27 64 75 70 6c ..(`(topic.,(or.'unplanned.'dupl
547c0 69 63 61 74 65 20 27 72 65 6a 65 63 74 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 icate.'rejected))...............
547e0 20 20 20 20 20 20 20 20 27 28 75 6e 70 6c 61 6e 6e 65 64 20 64 75 70 6c 69 63 61 74 65 20 72 65 ........'(unplanned.duplicate.re
54800 6a 65 63 74 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 jected))......................('
54820 28 69 73 73 75 65 20 72 65 6a 65 63 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (issue.rejected)................
54840 20 20 20 20 20 20 20 27 28 75 6e 70 6c 61 6e 6e 65 64 20 64 75 70 6c 69 63 61 74 65 20 72 65 6a .......'(unplanned.duplicate.rej
54860 65 63 74 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 ected))......................(`(
54880 70 75 6c 6c 72 65 71 20 2c 28 6f 72 20 27 75 6e 70 6c 61 6e 6e 65 64 20 27 64 75 70 6c 69 63 61 pullreq.,(or.'unplanned.'duplica
548a0 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 75 6e 70 te)).......................'(unp
548c0 6c 61 6e 6e 65 64 20 64 75 70 6c 69 63 61 74 65 20 72 65 6a 65 63 74 65 64 29 29 0a 20 20 20 20 lanned.duplicate.rejected)).....
548e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 74 6f 70 69 63 20 2c 28 6f 72 20 27 .................(`(topic.,(or.'
54900 63 6f 6d 70 6c 65 74 65 64 20 27 6d 65 72 67 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 completed.'merged)).............
54920 20 20 20 20 20 20 20 20 20 20 27 28 63 6f 6d 70 6c 65 74 65 64 20 6d 65 72 67 65 64 29 29 0a 20 ..........'(completed.merged))..
54940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 28 69 73 73 75 65 20 6d 65 72 ....................('(issue.mer
54960 67 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 63 6f 6d ged).......................'(com
54980 70 6c 65 74 65 64 20 6d 65 72 67 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pleted.merged)).................
549a0 20 20 20 20 20 28 27 28 70 75 6c 6c 72 65 71 20 63 6f 6d 70 6c 65 74 65 64 29 0a 20 20 20 20 20 .....('(pullreq.completed)......
549c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 63 6f 6d 70 6c 65 74 65 64 20 6d 65 72 .................'(completed.mer
549e0 67 65 64 29 29 29 29 29 0a 20 20 20 20 28 6f 73 65 74 20 73 70 65 63 20 73 74 61 74 65 20 63 61 ged))))).....(oset.spec.state.ca
54a00 73 74 29 29 29 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 74 6f 70 st)))..(cl-defun.forge--list-top
54a20 69 63 73 0a 20 20 20 20 28 26 6f 70 74 69 6f 6e 61 6c 20 28 73 70 65 63 20 66 6f 72 67 65 2d 2d ics.....(&optional.(spec.forge--
54a40 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 buffer-topics-spec).............
54a60 20 20 20 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a ...(repo.(forge-get-repository.:
54a80 74 72 61 63 6b 65 64 3f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 79 70 65 20 tracked?))................(type.
54aa0 28 6f 72 65 66 20 73 70 65 63 20 74 79 70 65 29 29 29 0a 20 20 28 77 68 65 6e 20 28 6f 72 65 66 (oref.spec.type)))...(when.(oref
54ac0 20 73 70 65 63 20 72 65 76 69 65 77 65 72 29 0a 20 20 20 20 28 73 65 74 71 20 74 79 70 65 20 27 .spec.reviewer).....(setq.type.'
54ae0 70 75 6c 6c 72 65 71 29 29 0a 20 20 28 69 66 20 28 65 71 20 74 79 70 65 20 27 74 6f 70 69 63 29 pullreq))...(if.(eq.type.'topic)
54b00 0a 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 70 72 65 64 20 2c 73 6c 6f .......(pcase-let.((`(,pred.,slo
54b20 74 29 20 28 70 63 61 73 65 20 28 6f 72 65 66 20 73 70 65 63 20 6f 72 64 65 72 29 0a 20 20 20 20 t).(pcase.(oref.spec.order).....
54b40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
54b60 28 27 6e 65 77 65 73 74 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 3e 20 6e 75 6d 62 65 72 29 ('newest.............'(>.number)
54b80 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )...............................
54ba0 20 20 20 20 20 20 28 27 6f 6c 64 65 73 74 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 3c 20 6e ......('oldest.............'(<.n
54bc0 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 umber)).........................
54be0 20 20 20 20 20 20 20 20 20 20 20 20 28 27 72 65 63 65 6e 74 6c 79 2d 75 70 64 61 74 65 64 20 20 ............('recently-updated..
54c00 20 27 28 73 74 72 69 6e 67 3e 20 75 70 64 61 74 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 .'(string>.updated))............
54c20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 61 6e 63 69 65 .........................('ancie
54c40 6e 74 6c 79 2d 75 70 64 61 74 65 64 20 20 27 28 73 74 72 69 6e 67 3c 20 75 70 64 61 74 65 64 29 ntly-updated..'(string<.updated)
54c60 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 6c 2d 73 6f 72 74 20 28 6e 63 6f 6e 63 20 28 66 6f )))).........(cl-sort.(nconc.(fo
54c80 72 67 65 2d 2d 6c 69 73 74 2d 74 6f 70 69 63 73 2d 31 20 73 70 65 63 20 72 65 70 6f 20 27 64 69 rge--list-topics-1.spec.repo.'di
54ca0 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 scussion).......................
54cc0 20 20 28 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 74 6f 70 69 63 73 2d 31 20 73 70 65 63 20 72 65 70 ..(forge--list-topics-1.spec.rep
54ce0 6f 20 27 69 73 73 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 o.'issue).......................
54d00 20 20 28 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 74 6f 70 69 63 73 2d 31 20 73 70 65 63 20 72 65 70 ..(forge--list-topics-1.spec.rep
54d20 6f 20 27 70 75 6c 6c 72 65 71 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 o.'pullreq))..................pr
54d40 65 64 20 3a 6b 65 79 20 28 23 23 65 69 65 69 6f 2d 6f 72 65 66 20 25 20 73 6c 6f 74 29 29 29 0a ed.:key.(##eieio-oref.%.slot))).
54d60 20 20 20 20 28 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 74 6f 70 69 63 73 2d 31 20 73 70 65 63 20 72 ....(forge--list-topics-1.spec.r
54d80 65 70 6f 20 74 79 70 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 69 73 74 2d epo.type)))..(defun.forge--list-
54da0 74 6f 70 69 63 73 2d 31 20 28 73 70 65 63 20 72 65 70 6f 20 74 79 70 65 29 0a 20 20 28 6d 61 70 topics-1.(spec.repo.type)...(map
54dc0 63 61 72 20 28 70 61 72 74 69 61 6c 20 23 27 63 6c 6f 73 71 6c 2d 2d 72 65 6d 61 6b 65 2d 69 6e car.(partial.#'closql--remake-in
54de0 73 74 61 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 stance....................(pcase
54e00 20 74 79 70 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 64 69 73 .type......................('dis
54e20 63 75 73 73 69 6f 6e 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 20 20 20 20 20 cussion.'forge-discussion)......
54e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 69 73 73 75 65 20 20 20 20 20 20 27 66 6f ................('issue......'fo
54e60 72 67 65 2d 69 73 73 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rge-issue)......................
54e80 28 27 70 75 6c 6c 72 65 71 20 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 0a 20 20 ('pullreq....'forge-pullreq))...
54ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 62 29 29 0a 20 20 20 .................(forge-db))....
54ec0 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 20 28 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 74 .......(forge-sql.(forge--list-t
54ee0 6f 70 69 63 73 2d 32 20 73 70 65 63 20 72 65 70 6f 20 74 79 70 65 29 29 29 29 0a 0a 28 64 65 66 opics-2.spec.repo.type))))..(def
54f00 75 6e 20 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 74 6f 70 69 63 73 2d 32 20 28 73 70 65 63 20 72 65 un.forge--list-topics-2.(spec.re
54f20 70 6f 20 74 79 70 65 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 28 65 69 65 69 6f 20 61 po.type)...(pcase-let.(((eieio.a
54f40 63 74 69 76 65 20 73 74 61 74 65 20 73 74 61 74 75 73 20 63 61 74 65 67 6f 72 79 20 6d 69 6c 65 ctive.state.status.category.mile
54f60 73 74 6f 6e 65 20 6c 61 62 65 6c 73 20 6d 61 72 6b 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 stone.labels.marks..............
54f80 20 20 20 20 20 20 20 20 20 73 61 76 65 64 20 61 75 74 68 6f 72 20 61 73 73 69 67 6e 65 65 20 72 .........saved.author.assignee.r
54fa0 65 76 69 65 77 65 72 20 67 6c 6f 62 61 6c 20 6f 72 64 65 72 20 6c 69 6d 69 74 29 0a 20 20 20 20 eviewer.global.order.limit).....
54fc0 20 20 20 20 20 20 20 20 20 20 20 73 70 65 63 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 61 63 74 ...........spec)).....(cond.(act
54fe0 69 76 65 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 74 61 74 65 20 27 6f 70 65 6e ive............(setq.state.'open
55000 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 74 61 74 75 73 20 27 28 75 6e 72 65 )............(setq.status.'(unre
55020 61 64 20 70 65 6e 64 69 6e 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 73 74 61 ad.pending)))...........((eq.sta
55040 74 75 73 20 27 69 6e 62 6f 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 74 61 tus.'inbox)............(setq.sta
55060 74 75 73 20 27 28 75 6e 72 65 61 64 20 70 65 6e 64 69 6e 67 29 29 29 29 0a 20 20 20 20 28 77 68 tus.'(unread.pending)))).....(wh
55080 65 6e 20 28 65 71 20 73 74 61 74 65 20 27 63 6c 6f 73 65 64 29 0a 20 20 20 20 20 20 28 73 65 74 en.(eq.state.'closed).......(set
550a0 71 20 73 74 61 74 65 20 27 28 20 63 6f 6d 70 6c 65 74 65 64 20 6d 65 72 67 65 64 20 75 6e 70 6c q.state.'(.completed.merged.unpl
550c0 61 6e 6e 65 64 20 64 75 70 6c 69 63 61 74 65 20 6f 75 74 64 61 74 65 64 20 72 65 6a 65 63 74 65 anned.duplicate.outdated.rejecte
550e0 64 29 29 29 0a 20 20 20 20 60 5b 3a 73 65 6c 65 63 74 20 3a 64 69 73 74 69 6e 63 74 20 74 6f 70 d))).....`[:select.:distinct.top
55100 69 63 3a 2a 0a 20 20 20 20 20 20 3a 66 72 6f 6d 20 5b 28 61 73 20 2c 74 79 70 65 20 74 6f 70 69 ic:*.......:from.[(as.,type.topi
55120 63 29 5d 0a 20 20 20 20 20 20 2c 40 28 70 63 61 73 65 20 74 79 70 65 0a 20 20 20 20 20 20 20 20 c)].......,@(pcase.type.........
55140 20 20 28 28 61 6e 64 20 27 64 69 73 63 75 73 73 69 6f 6e 20 28 67 75 61 72 64 20 63 61 74 65 67 ..((and.'discussion.(guard.categ
55160 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 60 5b 3a 6a 6f 69 6e 20 64 69 73 63 75 73 73 ory))............`[:join.discuss
55180 69 6f 6e 2d 63 61 74 65 67 6f 72 79 20 3a 6f 6e 20 28 3d 20 64 69 73 63 75 73 73 69 6f 6e 2d 63 ion-category.:on.(=.discussion-c
551a0 61 74 65 67 6f 72 79 3a 6e 61 6d 65 20 2c 63 61 74 65 67 6f 72 79 29 5d 29 0a 20 20 20 20 20 20 ategory:name.,category)]).......
551c0 20 20 20 20 28 28 61 6e 64 20 28 6f 72 20 27 69 73 73 75 65 20 27 70 75 6c 6c 72 65 71 29 20 28 ....((and.(or.'issue.'pullreq).(
551e0 67 75 61 72 64 20 6d 69 6c 65 73 74 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 60 5b 3a guard.milestone))............`[:
55200 6a 6f 69 6e 20 6d 69 6c 65 73 74 6f 6e 65 20 3a 6f 6e 20 28 3d 20 6d 69 6c 65 73 74 6f 6e 65 3a join.milestone.:on.(=.milestone:
55220 74 69 74 6c 65 20 2c 6d 69 6c 65 73 74 6f 6e 65 29 5d 29 29 0a 20 20 20 20 20 20 2c 40 28 70 63 title.,milestone)])).......,@(pc
55240 61 73 65 20 28 61 6e 64 20 6c 61 62 65 6c 73 20 74 79 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 ase.(and.labels.type)...........
55260 28 27 64 69 73 63 75 73 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 5b 3a 6a 6f 69 6e 20 64 ('discussion............[:join.d
55280 69 73 63 75 73 73 69 6f 6e 2d 6c 61 62 65 6c 20 3a 6f 6e 20 28 3d 20 64 69 73 63 75 73 73 69 6f iscussion-label.:on.(=.discussio
552a0 6e 2d 6c 61 62 65 6c 3a 64 69 73 63 75 73 73 69 6f 6e 20 20 74 6f 70 69 63 3a 69 64 29 0a 20 20 n-label:discussion..topic:id)...
552c0 20 20 20 20 20 20 20 20 20 20 3a 6a 6f 69 6e 20 20 20 20 20 20 20 20 20 20 20 20 6c 61 62 65 6c ..........:join............label
552e0 20 3a 6f 6e 20 28 3d 20 6c 61 62 65 6c 3a 69 64 20 20 20 20 20 20 20 20 20 20 64 69 73 63 75 73 .:on.(=.label:id..........discus
55300 73 69 6f 6e 2d 6c 61 62 65 6c 3a 69 64 29 5d 29 0a 20 20 20 20 20 20 20 20 20 20 28 27 69 73 73 sion-label:id)])...........('iss
55320 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 5b 3a 6a 6f 69 6e 20 20 20 20 20 20 69 73 73 75 65 2d ue............[:join......issue-
55340 6c 61 62 65 6c 20 3a 6f 6e 20 28 3d 20 69 73 73 75 65 2d 6c 61 62 65 6c 3a 69 73 73 75 65 20 20 label.:on.(=.issue-label:issue..
55360 20 20 20 20 20 20 20 20 20 20 74 6f 70 69 63 3a 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ..........topic:id).............
55380 3a 6a 6f 69 6e 20 20 20 20 20 20 20 20 20 20 20 20 6c 61 62 65 6c 20 3a 6f 6e 20 28 3d 20 6c 61 :join............label.:on.(=.la
553a0 62 65 6c 3a 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 73 73 75 65 2d 6c 61 62 65 6c bel:id...............issue-label
553c0 3a 69 64 29 5d 29 0a 20 20 20 20 20 20 20 20 20 20 28 27 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 :id)])...........('pullreq......
553e0 20 20 20 20 20 20 5b 3a 6a 6f 69 6e 20 20 20 20 70 75 6c 6c 72 65 71 2d 6c 61 62 65 6c 20 3a 6f ......[:join....pullreq-label.:o
55400 6e 20 28 3d 20 70 75 6c 6c 72 65 71 2d 6c 61 62 65 6c 3a 70 75 6c 6c 72 65 71 20 20 20 20 20 20 n.(=.pullreq-label:pullreq......
55420 20 20 74 6f 70 69 63 3a 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 6a 6f 69 6e 20 20 20 ..topic:id).............:join...
55440 20 20 20 20 20 20 20 20 20 6c 61 62 65 6c 20 3a 6f 6e 20 28 3d 20 6c 61 62 65 6c 3a 69 64 20 20 .........label.:on.(=.label:id..
55460 20 20 20 20 20 20 20 20 20 20 20 70 75 6c 6c 72 65 71 2d 6c 61 62 65 6c 3a 69 64 29 5d 29 29 0a ...........pullreq-label:id)])).
55480 20 20 20 20 20 20 2c 40 28 70 63 61 73 65 20 28 61 6e 64 20 6d 61 72 6b 73 20 74 79 70 65 29 0a ......,@(pcase.(and.marks.type).
554a0 20 20 20 20 20 20 20 20 20 20 28 27 64 69 73 63 75 73 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 ..........('discussion..........
554c0 20 20 5b 3a 6a 6f 69 6e 20 64 69 73 63 75 73 73 69 6f 6e 2d 6d 61 72 6b 20 3a 6f 6e 20 28 3d 20 ..[:join.discussion-mark.:on.(=.
554e0 64 69 73 63 75 73 73 69 6f 6e 2d 6d 61 72 6b 3a 64 69 73 63 75 73 73 69 6f 6e 20 20 74 6f 70 69 discussion-mark:discussion..topi
55500 63 3a 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 6a 6f 69 6e 20 20 20 20 20 20 20 20 20 c:id).............:join.........
55520 20 20 20 6d 61 72 6b 20 3a 6f 6e 20 28 3d 20 6d 61 72 6b 3a 69 64 20 20 20 20 20 20 20 20 20 20 ...mark.:on.(=.mark:id..........
55540 20 64 69 73 63 75 73 73 69 6f 6e 2d 6d 61 72 6b 3a 69 64 29 5d 29 0a 20 20 20 20 20 20 20 20 20 .discussion-mark:id)])..........
55560 20 28 27 69 73 73 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 5b 3a 6a 6f 69 6e 20 20 20 20 20 20 .('issue............[:join......
55580 69 73 73 75 65 2d 6d 61 72 6b 20 3a 6f 6e 20 28 3d 20 69 73 73 75 65 2d 6d 61 72 6b 3a 69 73 73 issue-mark.:on.(=.issue-mark:iss
555a0 75 65 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 70 69 63 3a 69 64 29 0a 20 20 20 20 20 20 20 20 ue............topic:id).........
555c0 20 20 20 20 3a 6a 6f 69 6e 20 20 20 20 20 20 20 20 20 20 20 20 6d 61 72 6b 20 3a 6f 6e 20 28 3d ....:join............mark.:on.(=
555e0 20 6d 61 72 6b 3a 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 73 73 75 65 2d 6d 61 .mark:id................issue-ma
55600 72 6b 3a 69 64 29 5d 29 0a 20 20 20 20 20 20 20 20 20 20 28 27 70 75 6c 6c 72 65 71 0a 20 20 20 rk:id)])...........('pullreq....
55620 20 20 20 20 20 20 20 20 5b 3a 6a 6f 69 6e 20 20 20 20 70 75 6c 6c 72 65 71 2d 6d 61 72 6b 20 3a ........[:join....pullreq-mark.:
55640 6f 6e 20 28 3d 20 70 75 6c 6c 72 65 71 2d 6d 61 72 6b 3a 70 75 6c 6c 72 65 71 20 20 20 20 20 20 on.(=.pullreq-mark:pullreq......
55660 20 20 74 6f 70 69 63 3a 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 6a 6f 69 6e 20 20 20 ..topic:id).............:join...
55680 20 20 20 20 20 20 20 20 20 6d 61 72 6b 20 3a 6f 6e 20 28 3d 20 6d 61 72 6b 3a 69 64 20 20 20 20 .........mark.:on.(=.mark:id....
556a0 20 20 20 20 20 20 20 20 20 20 70 75 6c 6c 72 65 71 2d 6d 61 72 6b 3a 69 64 29 5d 29 29 0a 20 20 ..........pullreq-mark:id)]))...
556c0 20 20 20 20 2c 40 28 70 63 61 73 65 20 28 61 6e 64 20 61 73 73 69 67 6e 65 65 20 74 79 70 65 29 ....,@(pcase.(and.assignee.type)
556e0 0a 20 20 20 20 20 20 20 20 20 20 28 27 69 73 73 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 5b 3a ...........('issue............[:
55700 6a 6f 69 6e 20 20 20 20 20 20 69 73 73 75 65 2d 61 73 73 69 67 6e 65 65 20 3a 6f 6e 20 28 3d 20 join......issue-assignee.:on.(=.
55720 69 73 73 75 65 2d 61 73 73 69 67 6e 65 65 3a 69 73 73 75 65 20 20 20 20 20 20 20 20 20 20 20 20 issue-assignee:issue............
55740 74 6f 70 69 63 3a 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 6a 6f 69 6e 20 20 20 20 20 topic:id).............:join.....
55760 20 20 20 20 20 20 20 61 73 73 69 67 6e 65 65 20 3a 6f 6e 20 28 3d 20 61 73 73 69 67 6e 65 65 3a .......assignee.:on.(=.assignee:
55780 69 64 20 20 20 20 20 20 20 20 20 20 20 20 69 73 73 75 65 2d 61 73 73 69 67 6e 65 65 3a 69 64 29 id............issue-assignee:id)
557a0 5d 29 0a 20 20 20 20 20 20 20 20 20 20 28 27 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 20 20 20 20 ])...........('pullreq..........
557c0 20 20 5b 3a 6a 6f 69 6e 20 20 20 20 70 75 6c 6c 72 65 71 2d 61 73 73 69 67 6e 65 65 20 3a 6f 6e ..[:join....pullreq-assignee.:on
557e0 20 28 3d 20 70 75 6c 6c 72 65 71 2d 61 73 73 69 67 6e 65 65 3a 70 75 6c 6c 72 65 71 20 20 20 20 .(=.pullreq-assignee:pullreq....
55800 20 20 20 20 74 6f 70 69 63 3a 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 6a 6f 69 6e 20 ....topic:id).............:join.
55820 20 20 20 20 20 20 20 20 20 20 20 61 73 73 69 67 6e 65 65 20 3a 6f 6e 20 28 3d 20 61 73 73 69 67 ...........assignee.:on.(=.assig
55840 6e 65 65 3a 69 64 20 20 20 20 20 20 20 20 20 20 70 75 6c 6c 72 65 71 2d 61 73 73 69 67 6e 65 65 nee:id..........pullreq-assignee
55860 3a 69 64 29 5d 29 29 0a 20 20 20 20 20 20 2c 40 28 61 6e 64 20 72 65 76 69 65 77 65 72 0a 20 20 :id)])).......,@(and.reviewer...
55880 20 20 20 20 20 20 20 20 20 20 20 5b 3a 6a 6f 69 6e 20 28 61 73 20 70 75 6c 6c 72 65 71 2d 72 65 ...........[:join.(as.pullreq-re
558a0 76 69 65 77 2d 72 65 71 75 65 73 74 20 72 29 20 3a 6f 6e 20 28 3d 20 72 3a 70 75 6c 6c 72 65 71 view-request.r).:on.(=.r:pullreq
558c0 20 20 74 6f 70 69 63 3a 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6a 6f 69 6e 20 ..topic:id)...............:join.
558e0 61 73 73 69 67 6e 65 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f assignee......................:o
55900 6e 20 28 3d 20 61 73 73 69 67 6e 65 65 3a 69 64 20 20 20 20 72 3a 69 64 29 5d 29 0a 20 20 20 20 n.(=.assignee:id....r:id)]).....
55920 20 20 3a 77 68 65 72 65 0a 20 20 20 20 20 20 28 61 6e 64 0a 20 20 20 20 20 20 20 2c 40 28 61 6e ..:where.......(and........,@(an
55940 64 20 28 6e 6f 74 20 67 6c 6f 62 61 6c 29 20 72 65 70 6f 20 60 28 28 3d 20 74 6f 70 69 63 3a 72 d.(not.global).repo.`((=.topic:r
55960 65 70 6f 73 69 74 6f 72 79 20 2c 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 29 29 29 0a 20 20 20 epository.,(oref.repo.id))))....
55980 20 20 20 20 2c 40 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 61 63 74 69 ....,@(cond...........((and.acti
559a0 76 65 20 73 74 61 74 65 20 73 74 61 74 75 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 60 28 28 6f ve.state.status)............`((o
559c0 72 20 28 69 6e 20 74 6f 70 69 63 3a 73 74 61 74 65 20 20 2c 28 76 63 6f 6e 63 61 74 20 28 65 6e r.(in.topic:state..,(vconcat.(en
559e0 73 75 72 65 2d 6c 69 73 74 20 73 74 61 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 sure-list.state)))..............
55a00 20 20 20 20 28 69 6e 20 74 6f 70 69 63 3a 73 74 61 74 75 73 20 2c 28 76 63 6f 6e 63 61 74 20 28 ....(in.topic:status.,(vconcat.(
55a20 65 6e 73 75 72 65 2d 6c 69 73 74 20 73 74 61 74 75 73 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 ensure-list.status))))))........
55a40 20 20 20 28 60 28 2c 40 28 61 6e 64 20 73 74 61 74 65 20 20 60 28 28 69 6e 20 74 6f 70 69 63 3a ...(`(,@(and.state..`((in.topic:
55a60 73 74 61 74 65 20 20 2c 28 76 63 6f 6e 63 61 74 20 28 65 6e 73 75 72 65 2d 6c 69 73 74 20 73 74 state..,(vconcat.(ensure-list.st
55a80 61 74 65 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 73 74 61 ate)))))..............,@(and.sta
55aa0 74 75 73 20 60 28 28 69 6e 20 74 6f 70 69 63 3a 73 74 61 74 75 73 20 2c 28 76 63 6f 6e 63 61 74 tus.`((in.topic:status.,(vconcat
55ac0 20 28 65 6e 73 75 72 65 2d 6c 69 73 74 20 73 74 61 74 75 73 29 29 29 29 29 29 29 29 0a 20 20 20 .(ensure-list.status))))))))....
55ae0 20 20 20 20 2c 40 28 70 63 61 73 65 20 74 79 70 65 0a 20 20 20 20 20 20 20 20 20 20 28 28 61 6e ....,@(pcase.type...........((an
55b00 64 20 27 64 69 73 63 75 73 73 69 6f 6e 20 28 67 75 61 72 64 20 63 61 74 65 67 6f 72 79 29 29 0a d.'discussion.(guard.category)).
55b20 20 20 20 20 20 20 20 20 20 20 20 27 28 28 3d 20 74 6f 70 69 63 3a 63 61 74 65 67 6f 72 79 20 64 ...........'((=.topic:category.d
55b40 69 73 63 75 73 73 69 6f 6e 2d 63 61 74 65 67 6f 72 79 3a 69 64 29 29 29 0a 20 20 20 20 20 20 20 iscussion-category:id)))........
55b60 20 20 20 28 28 61 6e 64 20 28 6f 72 20 27 69 73 73 75 65 20 27 70 75 6c 6c 72 65 71 29 20 28 67 ...((and.(or.'issue.'pullreq).(g
55b80 75 61 72 64 20 6d 69 6c 65 73 74 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 27 28 28 3d uard.milestone))............'((=
55ba0 20 74 6f 70 69 63 3a 6d 69 6c 65 73 74 6f 6e 65 20 6d 69 6c 65 73 74 6f 6e 65 3a 69 64 29 29 29 .topic:milestone.milestone:id)))
55bc0 29 0a 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 6c 61 62 65 6c 73 20 20 20 20 60 28 28 6f 72 20 )........,@(and.labels....`((or.
55be0 2c 40 28 6d 61 70 63 61 72 20 28 23 23 60 28 3d 20 6c 61 62 65 6c 3a 6e 61 6d 65 20 2c 25 29 29 ,@(mapcar.(##`(=.label:name.,%))
55c00 20 6c 61 62 65 6c 73 29 29 29 29 0a 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 6d 61 72 6b 73 20 .labels))))........,@(and.marks.
55c20 20 20 20 20 60 28 28 6f 72 20 2c 40 28 6d 61 70 63 61 72 20 28 23 23 60 28 3d 20 20 6d 61 72 6b ....`((or.,@(mapcar.(##`(=..mark
55c40 3a 6e 61 6d 65 20 2c 25 29 29 20 20 6d 61 72 6b 73 29 29 29 29 0a 20 20 20 20 20 20 20 2c 40 28 :name.,%))..marks))))........,@(
55c60 61 6e 64 20 73 61 76 65 64 20 20 20 20 20 27 28 28 3d 20 74 6f 70 69 63 3a 73 61 76 65 64 2d 70 and.saved.....'((=.topic:saved-p
55c80 20 20 27 74 29 29 29 0a 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 61 75 74 68 6f 72 20 20 20 20 ..'t)))........,@(and.author....
55ca0 60 28 28 3d 20 74 6f 70 69 63 3a 61 75 74 68 6f 72 20 20 20 2c 61 75 74 68 6f 72 29 29 29 0a 20 `((=.topic:author...,author)))..
55cc0 20 20 20 20 20 20 2c 40 28 61 6e 64 20 61 73 73 69 67 6e 65 65 20 28 6d 65 6d 71 20 74 79 70 65 ......,@(and.assignee.(memq.type
55ce0 20 27 28 69 73 73 75 65 20 70 75 6c 6c 72 65 71 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .'(issue.pullreq))..............
55d00 20 60 28 28 3d 20 61 73 73 69 67 6e 65 65 3a 6c 6f 67 69 6e 20 2c 61 73 73 69 67 6e 65 65 29 29 .`((=.assignee:login.,assignee))
55d20 29 0a 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 72 65 76 69 65 77 65 72 20 28 65 71 20 74 79 70 )........,@(and.reviewer.(eq.typ
55d40 65 20 27 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 3d 20 61 e.'pullreq)...............`((=.a
55d60 73 73 69 67 6e 65 65 3a 6c 6f 67 69 6e 20 2c 72 65 76 69 65 77 65 72 29 29 29 29 0a 20 20 20 20 ssignee:login.,reviewer)))).....
55d80 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 2c 28 70 63 61 73 65 20 6f 72 64 65 72 0a 20 20 20 20 20 ..:order-by.[,(pcase.order......
55da0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 6e 65 77 65 73 74 20 20 20 20 20 20 20 20 20 ...............('newest.........
55dc0 20 20 20 27 28 64 65 73 63 20 74 6f 70 69 63 3a 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 ...'(desc.topic:number))........
55de0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 6f 6c 64 65 73 74 20 20 20 20 20 20 20 20 20 20 20 .............('oldest...........
55e00 20 27 28 61 73 63 20 20 74 6f 70 69 63 3a 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 .'(asc..topic:number))..........
55e20 20 20 20 20 20 20 20 20 20 20 20 28 27 72 65 63 65 6e 74 6c 79 2d 75 70 64 61 74 65 64 20 20 27 ...........('recently-updated..'
55e40 28 64 65 73 63 20 74 6f 70 69 63 3a 75 70 64 61 74 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 (desc.topic:updated))...........
55e60 20 20 20 20 20 20 20 20 20 20 28 27 61 6e 63 69 65 6e 74 6c 79 2d 75 70 64 61 74 65 64 20 27 28 ..........('anciently-updated.'(
55e80 61 73 63 20 20 74 6f 70 69 63 3a 75 70 64 61 74 65 64 29 29 29 5d 0a 20 20 20 20 20 20 2c 40 28 asc..topic:updated)))].......,@(
55ea0 61 6e 64 20 6c 69 6d 69 74 20 60 28 3a 6c 69 6d 69 74 20 2c 6c 69 6d 69 74 29 29 5d 29 29 0a 0a and.limit.`(:limit.,limit))]))..
55ec0 3b 3b 3b 20 52 65 61 64 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 ;;;.Read..(defun.forge-read-topi
55ee0 63 20 28 70 72 6f 6d 70 74 29 0a 20 20 22 52 65 61 64 20 61 6e 20 61 63 74 69 76 65 20 74 6f 70 c.(prompt)..."Read.an.active.top
55f00 69 63 20 77 69 74 68 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 75 73 69 6e 67 20 50 52 4f 4d 50 54 2e ic.with.completion.using.PROMPT.
55f20 0a 0a 4f 70 65 6e 2c 20 75 6e 72 65 61 64 20 61 6e 64 20 70 65 6e 64 69 6e 67 20 74 6f 70 69 63 ..Open,.unread.and.pending.topic
55f40 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 61 63 74 69 76 65 2e 0a 44 65 66 61 75 6c 74 s.are.considered.active..Default
55f60 20 74 6f 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 2c 20 65 76 65 6e 20 69 66 20 69 .to.the.current.topic,.even.if.i
55f80 74 20 69 73 6e 27 74 20 61 63 74 69 76 65 2e 0a 0a 5c 5c 3c 66 6f 72 67 65 2d 72 65 61 64 2d 74 t.isn't.active...\\<forge-read-t
55fa0 6f 70 69 63 2d 6d 69 6e 69 62 75 66 66 65 72 2d 6d 61 70 3e 57 68 69 6c 65 20 63 6f 6d 70 6c 65 opic-minibuffer-map>While.comple
55fc0 74 69 6f 6e 20 69 73 20 69 6e 20 5c 0a 70 72 6f 67 72 65 73 73 2c 20 5c 5c 5b 66 6f 72 67 65 2d tion.is.in.\.progress,.\\[forge-
55fe0 72 65 61 64 2d 74 6f 70 69 63 2d 6c 69 66 74 2d 6c 69 6d 69 74 5d 20 6c 69 66 74 73 20 74 68 65 read-topic-lift-limit].lifts.the
56000 20 6c 69 6d 69 74 2c 20 65 78 74 65 6e 64 69 6e 67 0a 74 68 65 20 63 6f 6d 70 6c 65 74 69 6f 6e .limit,.extending.the.completion
56020 20 63 61 6e 64 69 64 61 74 65 73 20 74 6f 20 69 6e 63 6c 75 64 65 20 61 6c 6c 20 74 6f 70 69 63 .candidates.to.include.all.topic
56040 73 2e 0a 0a 49 66 20 60 66 6f 72 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 63 65 s...If.`forge-limit-topic-choice
56060 73 27 20 69 73 20 6e 69 6c 2c 20 74 68 65 6e 20 61 6c 6c 20 63 61 6e 64 69 64 61 74 65 73 0a 63 s'.is.nil,.then.all.candidates.c
56080 61 6e 20 62 65 20 73 65 6c 65 63 74 65 64 20 66 72 6f 6d 20 74 68 65 20 73 74 61 72 74 2e 22 0a an.be.selected.from.the.start.".
560a0 20 20 28 66 6f 72 67 65 2d 2d 72 65 61 64 2d 74 6f 70 69 63 20 70 72 6f 6d 70 74 0a 20 20 20 20 ..(forge--read-topic.prompt.....
560c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 .................#'forge-current
560e0 2d 74 6f 70 69 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 -topic......................(for
56100 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 3a 74 79 70 65 20 27 74 6f 70 69 63 20 3a 61 63 ge--topics-spec.:type.'topic.:ac
56120 74 69 76 65 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f tive.t)......................(fo
56140 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 3a 74 79 70 65 20 27 74 6f 70 69 63 20 3a 61 rge--topics-spec.:type.'topic.:a
56160 63 74 69 76 65 20 6e 69 6c 20 3a 73 74 61 74 65 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 ctive.nil.:state.nil)))..(defun.
56180 66 6f 72 67 65 2d 2d 72 65 61 64 2d 74 6f 70 69 63 20 28 70 72 6f 6d 70 74 20 63 75 72 72 65 6e forge--read-topic.(prompt.curren
561a0 74 20 61 63 74 69 76 65 20 61 6c 6c 29 0a 20 20 28 6c 65 74 2a 20 28 28 63 75 72 72 65 6e 74 20 t.active.all)...(let*.((current.
561c0 28 66 75 6e 63 61 6c 6c 20 63 75 72 72 65 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 70 (funcall.current))..........(rep
561e0 6f 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 6f 72 20 63 o....(forge-get-repository.(or.c
56200 75 72 72 65 6e 74 20 3a 74 72 61 63 6b 65 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 urrent.:tracked)))..........(def
56220 61 75 6c 74 20 28 61 6e 64 20 63 75 72 72 65 6e 74 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 ault.(and.current.(forge--format
56240 2d 74 6f 70 69 63 2d 6c 69 6e 65 20 63 75 72 72 65 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 -topic-line.current)))..........
56260 28 61 6c 69 73 74 20 20 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 63 6f 6c 6c 65 63 74 69 6f (alist...(forge--topic-collectio
56280 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6c 69 73 n....................(forge--lis
562a0 74 2d 74 6f 70 69 63 73 20 28 69 66 20 66 6f 72 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 t-topics.(if.forge-limit-topic-c
562c0 68 6f 69 63 65 73 20 61 63 74 69 76 65 20 61 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 hoices.active.all)..............
562e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 70 6f 29 29 ..........................repo))
56300 29 0a 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 73 20 28 6d 61 70 63 61 72 20 23 27 63 61 )..........(choices.(mapcar.#'ca
56320 72 20 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 73 20 28 63 6f 6e r.alist))..........(choices.(con
56340 64 20 28 28 61 6e 64 20 66 6f 72 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 63 65 d.((and.forge-limit-topic-choice
56360 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s...............................
56380 64 65 66 61 75 6c 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 default.........................
563a0 20 20 20 20 20 20 28 6e 6f 74 20 28 6d 65 6d 62 65 72 20 64 65 66 61 75 6c 74 20 63 68 6f 69 63 ......(not.(member.default.choic
563c0 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 es)))..........................(
563e0 70 75 73 68 20 28 63 6f 6e 73 20 64 65 66 61 75 6c 74 20 28 6f 72 65 66 20 63 75 72 72 65 6e 74 push.(cons.default.(oref.current
56400 20 69 64 29 29 20 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .id)).alist)....................
56420 20 20 20 20 20 20 28 63 6f 6e 73 20 64 65 66 61 75 6c 74 20 63 68 6f 69 63 65 73 29 29 0a 20 20 ......(cons.default.choices))...
56440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 73 29 29 ......................(choices))
56460 29 0a 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 )..........(choice...........(if
56480 20 66 6f 72 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 63 65 73 0a 20 20 20 20 20 .forge-limit-topic-choices......
564a0 20 20 20 20 20 20 20 20 20 28 6d 69 6e 69 62 75 66 66 65 72 2d 77 69 74 68 2d 73 65 74 75 70 2d .........(minibuffer-with-setup-
564c0 68 6f 6f 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 hook...................(lambda.(
564e0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 2d 6c 6f 63 61 6c ).....................(use-local
56500 2d 6d 61 70 20 28 6d 61 6b 65 2d 63 6f 6d 70 6f 73 65 64 2d 6b 65 79 6d 61 70 0a 20 20 20 20 20 -map.(make-composed-keymap......
56520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 ...............................f
56540 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d 69 6e 69 62 75 66 66 65 72 2d 6d 61 70 0a 20 orge-read-topic-minibuffer-map..
56560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
56580 20 20 20 28 63 75 72 72 65 6e 74 2d 6c 6f 63 61 6c 2d 6d 61 70 29 29 29 29 0a 20 20 20 20 20 20 ...(current-local-map)))).......
565a0 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 ..........(magit-completing-read
565c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 69 74 75 74 65 2d 63 6f ..................(substitute-co
565e0 6d 6d 61 6e 64 2d 6b 65 79 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f mmand-keys...................(fo
56600 72 6d 61 74 20 22 25 73 20 5c 5c 3c 25 73 3e 20 28 5c 5c 5b 25 73 5d 20 66 6f 72 20 61 6c 6c 29 rmat."%s.\\<%s>.(\\[%s].for.all)
56620 22 20 70 72 6f 6d 70 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ".prompt........................
56640 20 20 20 27 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d 69 6e 69 62 75 66 66 65 72 2d ...'forge-read-topic-minibuffer-
56660 6d 61 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 map...........................'f
56680 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6c 69 66 74 2d 6c 69 6d 69 74 29 29 0a 20 20 20 orge-read-topic-lift-limit))....
566a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6d 70 6c 65 74 69 6f 6e 2d 74 61 62 6c 65 2d ..............(completion-table-
566c0 64 79 6e 61 6d 69 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 dynamic...................(let.(
566e0 61 6c 6c 2d 63 68 6f 69 63 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 all-choices)....................
56700 20 28 6c 61 6d 62 64 61 20 28 5f 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .(lambda.(_string)..............
56720 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .........(cond..................
56740 20 20 20 20 20 20 28 61 6c 6c 2d 63 68 6f 69 63 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ......(all-choices).............
56760 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 68 ...........(forge-limit-topic-ch
56780 6f 69 63 65 73 20 63 68 6f 69 63 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 oices.choices)..................
567a0 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ......(t........................
567c0 20 28 66 6f 72 67 65 2d 2d 72 65 70 6c 61 63 65 2d 6d 69 6e 69 62 75 66 66 65 72 2d 70 72 6f 6d .(forge--replace-minibuffer-prom
567e0 70 74 20 28 63 6f 6e 63 61 74 20 70 72 6f 6d 70 74 20 22 3a 20 22 29 29 0a 20 20 20 20 20 20 20 pt.(concat.prompt.":."))........
56800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 61 6c 69 73 74 20 28 66 6f .................(setq.alist.(fo
56820 72 67 65 2d 2d 74 6f 70 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 rge--topic-collection...........
56840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 ...........................(forg
56860 65 2d 2d 6c 69 73 74 2d 74 6f 70 69 63 73 20 61 6c 6c 20 72 65 70 6f 29 29 29 0a 20 20 20 20 20 e--list-topics.all.repo)))......
56880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 61 6c 6c 2d 63 68 6f ...................(setq.all-cho
568a0 69 63 65 73 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 61 6c 69 73 74 29 29 29 29 29 29 29 0a ices.(mapcar.#'car.alist))))))).
568c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 74 20 6e 69 6c 20 6e 69 6c 20 64 .................nil.t.nil.nil.d
568e0 65 66 61 75 6c 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 63 6f 6d 70 efault)).............(magit-comp
56900 6c 65 74 69 6e 67 2d 72 65 61 64 20 70 72 6f 6d 70 74 20 63 68 6f 69 63 65 73 20 6e 69 6c 20 74 leting-read.prompt.choices.nil.t
56920 20 6e 69 6c 20 6e 69 6c 20 64 65 66 61 75 6c 74 29 29 29 29 0a 20 20 20 20 28 63 64 72 20 28 61 .nil.nil.default)))).....(cdr.(a
56940 73 73 6f 63 20 63 68 6f 69 63 65 20 61 6c 69 73 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f ssoc.choice.alist))))..(defun.fo
56960 72 67 65 2d 2d 74 6f 70 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 28 74 6f 70 69 63 73 29 0a 20 rge--topic-collection.(topics)..
56980 20 28 6d 61 70 63 61 72 20 28 23 23 63 6f 6e 73 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d .(mapcar.(##cons.(forge--format-
569a0 74 6f 70 69 63 2d 6c 69 6e 65 20 25 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 topic-line.%)...................
569c0 28 6f 72 65 66 20 25 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 74 6f 70 69 63 73 29 29 0a (oref.%.id))...........topics)).
569e0 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 .(defvar-keymap.forge-read-topic
56a00 2d 6d 69 6e 69 62 75 66 66 65 72 2d 6d 61 70 0a 20 20 22 2b 22 20 23 27 66 6f 72 67 65 2d 72 65 -minibuffer-map..."+".#'forge-re
56a20 61 64 2d 74 6f 70 69 63 2d 6c 69 66 74 2d 6c 69 6d 69 74 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 ad-topic-lift-limit)..(defun.for
56a40 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6c 69 66 74 2d 6c 69 6d 69 74 20 28 29 0a 20 20 22 4e ge-read-topic-lift-limit.()..."N
56a60 6f 20 6c 6f 6e 67 65 72 20 6c 69 6d 69 74 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 o.longer.limit.completion.candid
56a80 61 74 65 73 20 74 6f 20 61 63 74 69 76 65 20 74 6f 70 69 63 73 2e 22 0a 20 20 28 69 6e 74 65 72 ates.to.active.topics."...(inter
56aa0 61 63 74 69 76 65 29 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6d 69 6e 69 62 75 66 66 65 72 active)...(when.(and.(minibuffer
56ac0 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 p)..............forge-limit-topi
56ae0 63 2d 63 68 6f 69 63 65 73 29 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 c-choices).....(setq-local.forge
56b00 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 63 65 73 20 6e 69 6c 29 0a 20 20 20 20 28 77 -limit-topic-choices.nil).....(w
56b20 68 65 6e 20 28 61 6e 64 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 76 65 72 74 69 hen.(and.(bound-and-true-p.verti
56b40 63 6f 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 75 6e 64 70 20 co-mode)................(boundp.
56b60 27 76 65 72 74 69 63 6f 2d 2d 69 6e 70 75 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 'vertico--input)................
56b80 28 66 62 6f 75 6e 64 70 20 27 76 65 72 74 69 63 6f 2d 2d 65 78 68 69 62 69 74 29 29 0a 20 20 20 (fboundp.'vertico--exhibit))....
56ba0 20 20 20 28 73 65 74 71 20 76 65 72 74 69 63 6f 2d 2d 69 6e 70 75 74 20 74 29 0a 20 20 20 20 20 ...(setq.vertico--input.t)......
56bc0 20 28 76 65 72 74 69 63 6f 2d 2d 65 78 68 69 62 69 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 .(vertico--exhibit))))..(defun.f
56be0 6f 72 67 65 2d 2d 72 65 70 6c 61 63 65 2d 6d 69 6e 69 62 75 66 66 65 72 2d 70 72 6f 6d 70 74 20 orge--replace-minibuffer-prompt.
56c00 28 70 72 6f 6d 70 74 29 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 (prompt)...(save-excursion.....(
56c20 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 28 6c 65 74 20 goto-char.(point-min)).....(let.
56c40 28 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 0a 20 20 20 20 20 20 20 20 20 ((inhibit-read-only.t)..........
56c60 20 28 65 6e 64 20 28 6c 65 6e 67 74 68 20 70 72 6f 6d 70 74 29 29 29 0a 20 20 20 20 20 20 3b 3b .(end.(length.prompt))).......;;
56c80 20 28 69 6e 73 65 72 74 2d 61 6e 64 2d 69 6e 68 65 72 69 74 20 70 72 6f 6d 70 74 29 20 77 6f 75 .(insert-and-inherit.prompt).wou
56ca0 6c 64 20 64 69 73 63 61 72 64 20 61 6c 6c 20 66 61 63 65 73 20 61 6c 72 65 61 64 79 0a 20 20 20 ld.discard.all.faces.already....
56cc0 20 20 20 3b 3b 20 70 72 65 73 65 6e 74 20 69 6e 20 50 52 4f 4d 50 54 2c 20 73 6f 20 69 6e 73 74 ...;;.present.in.PROMPT,.so.inst
56ce0 65 61 64 20 77 65 20 64 6f 20 69 74 20 6c 69 6b 65 20 60 72 65 61 64 5f 6d 69 6e 69 62 75 66 27 ead.we.do.it.like.`read_minibuf'
56d00 2e 0a 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 65 6e 64 ........(put-text-property.0.end
56d20 20 27 66 72 6f 6e 74 2d 73 74 69 63 6b 79 20 74 20 70 72 6f 6d 70 74 29 0a 20 20 20 20 20 20 28 .'front-sticky.t.prompt).......(
56d40 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 65 6e 64 20 27 72 65 61 72 2d 6e 6f put-text-property.0.end.'rear-no
56d60 6e 73 74 69 63 6b 79 20 74 20 70 72 6f 6d 70 74 29 0a 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 nsticky.t.prompt).......(put-tex
56d80 74 2d 70 72 6f 70 65 72 74 79 20 30 20 65 6e 64 20 27 66 69 65 6c 64 20 74 20 70 72 6f 6d 70 74 t-property.0.end.'field.t.prompt
56da0 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 72 6f 70 73 20 6d 69 6e 69 62 75 66 66 65 72 2d ).......(let.((props.minibuffer-
56dc0 70 72 6f 6d 70 74 2d 70 72 6f 70 65 72 74 69 65 73 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 69 prompt-properties)).........(whi
56de0 6c 65 20 70 72 6f 70 73 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6b 65 79 20 28 70 le.props...........(let.((key.(p
56e00 6f 70 20 70 72 6f 70 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 61 6c 20 op.props)).................(val.
56e20 28 70 6f 70 20 70 72 6f 70 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 (pop.props))).............(if.(e
56e40 71 20 6b 65 79 20 27 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 64 q.key.'face).................(ad
56e60 64 2d 66 61 63 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 65 6e 64 20 76 61 6c 20 74 d-face-text-property.0.end.val.t
56e80 20 70 72 6f 6d 70 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 .prompt)...............(put-text
56ea0 2d 70 72 6f 70 65 72 74 79 20 30 20 65 6e 64 20 6b 65 79 20 76 61 6c 20 70 72 6f 6d 70 74 29 29 -property.0.end.key.val.prompt))
56ec0 29 29 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 70 72 6f 6d 70 74 29 0a 20 20 20 20 20 20 ))).......(insert.prompt).......
56ee0 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 29 20 28 6d 69 6e 69 62 75 66 66 (delete-region.(point).(minibuff
56f00 65 72 2d 70 72 6f 6d 70 74 2d 65 6e 64 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 er-prompt-end)))))..(defun.forge
56f20 2d 74 6f 70 69 63 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 61 74 2d 70 6f 69 6e 74 20 28 29 0a 20 20 -topic-completion-at-point.()...
56f40 28 6c 65 74 20 28 28 62 6f 6c 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 (let.((bol.(line-beginning-posit
56f60 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 72 65 70 6f 29 0a 20 20 20 20 28 61 6e 64 20 28 6c 6f ion)).........repo).....(and.(lo
56f80 6f 6b 69 6e 67 2d 62 61 63 6b 20 22 5b 21 23 5d 5b 30 2d 39 5d 2a 22 20 62 6f 6c 29 0a 20 20 20 oking-back."[!#][0-9]*".bol)....
56fa0 20 20 20 20 20 20 28 6f 72 20 28 6e 6f 74 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 70 72 6f ......(or.(not.bug-reference-pro
56fc0 67 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 38 20 28 73 79 6e g-mode)..............(nth.8.(syn
56fe0 74 61 78 2d 70 70 73 73 29 29 29 20 3b 20 69 6e 73 69 64 65 20 63 6f 6d 6d 65 6e 74 20 6f 72 20 tax-ppss))).;.inside.comment.or.
57000 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 72 65 70 6f 20 28 66 6f 72 67 string..........(setq.repo.(forg
57020 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 29 29 0a 20 20 20 20 e-get-repository.:tracked)).....
57040 20 20 20 20 20 28 6c 6f 6f 6b 69 6e 67 2d 62 61 63 6b 20 28 69 66 20 28 66 6f 72 67 65 2d 2d 63 .....(looking-back.(if.(forge--c
57060 68 69 6c 64 70 20 72 65 70 6f 20 27 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 hildp.repo.'forge-gitlab-reposit
57080 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ory)............................
570a0 22 5c 5c 28 3f 33 3a 5b 21 23 5d 5c 5c 29 5c 5c 28 3f 32 3a 5b 30 2d 39 5d 2a 5c 5c 29 22 0a 20 "\\(?3:[!#]\\)\\(?2:[0-9]*\\)"..
570c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 23 5c 5c 28 3f 32 3a ........................"#\\(?2:
570e0 5b 30 2d 39 5d 2a 5c 5c 29 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 [0-9]*\\)").....................
57100 20 20 20 62 6f 6c 29 0a 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 6d 61 74 63 68 2d 62 65 ...bol)..........(list.(match-be
57120 67 69 6e 6e 69 6e 67 20 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 ginning.2)................(match
57140 2d 65 6e 64 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 -end.0)................(mapcar.(
57160 6c 61 6d 62 64 61 20 28 72 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lambda.(row)....................
57180 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 ......(propertize.(number-to-str
571a0 69 6e 67 20 28 63 61 72 20 72 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ing.(car.row))..................
571c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 69 74 6c 65 20 28 66 6f 72 6d ....................:title.(form
571e0 61 74 20 22 20 25 73 22 20 28 63 61 64 72 20 72 6f 77 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 at.".%s".(cadr.row))))..........
57200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 6f 72 67 65 2d 2d 63 68 69 6c 64 70 ..............(if.(forge--childp
57220 20 72 65 70 6f 20 27 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a .repo.'forge-gitlab-repository).
57240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 ...........................(forg
57260 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 5b 6e 75 6d 62 65 72 20 74 69 74 6c 65 5d 0a 20 20 e-sql.[:select.[number.title]...
57280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
572a0 20 20 20 20 20 3a 66 72 6f 6d 20 24 69 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....:from.$i1..................
572c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 ......................:where.(=.
572e0 72 65 70 6f 73 69 74 6f 72 79 20 24 73 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 repository.$s2).................
57300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 .......................:order-by
57320 20 5b 28 64 65 73 63 20 75 70 64 61 74 65 64 29 5d 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .[(desc.updated)]]..............
57340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 .........................(if.(eq
57360 75 61 6c 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 33 29 20 22 23 22 29 0a 20 20 20 20 20 20 ual.(match-string.3)."#").......
57380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
573a0 20 20 20 20 27 69 73 73 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....'issue......................
573c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 70 75 6c 6c 72 65 71 29 0a 20 20 20 ...................'pullreq)....
573e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
57400 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ...(oref.repo.id))..............
57420 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 ............(forge-sql.[:select.
57440 5b 6e 75 6d 62 65 72 20 74 69 74 6c 65 20 75 70 64 61 74 65 64 5d 0a 20 20 20 20 20 20 20 20 20 [number.title.updated]..........
57460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f ............................:fro
57480 6d 20 64 69 73 63 75 73 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 m.discussion....................
574a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 72 65 70 6f ..................:where.(=.repo
574c0 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sitory.$s1).....................
574e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 6e 69 6f 6e 0a 20 20 20 20 20 20 20 20 .................:union.........
57500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 .............................:se
57520 6c 65 63 74 20 5b 6e 75 6d 62 65 72 20 74 69 74 6c 65 20 75 70 64 61 74 65 64 5d 0a 20 20 20 20 lect.[number.title.updated].....
57540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
57560 20 3a 66 72 6f 6d 20 69 73 73 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .:from.issue....................
57580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 72 65 70 6f ..................:where.(=.repo
575a0 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sitory.$s1).....................
575c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 6e 69 6f 6e 0a 20 20 20 20 20 20 20 20 .................:union.........
575e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 .............................:se
57600 6c 65 63 74 20 5b 6e 75 6d 62 65 72 20 74 69 74 6c 65 20 75 70 64 61 74 65 64 5d 0a 20 20 20 20 lect.[number.title.updated].....
57620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
57640 20 3a 66 72 6f 6d 20 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .:from.pullreq..................
57660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 72 65 ....................:where.(=.re
57680 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pository.$s1)...................
576a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 64 ...................:order-by.[(d
576c0 65 73 63 20 75 70 64 61 74 65 64 29 5d 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 esc.updated)]]..................
576e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 ...................(oref.repo.id
57700 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 6e 6e 6f 74 61 74 69 6f 6e 2d ))))................:annotation-
57720 66 75 6e 63 74 69 6f 6e 20 28 23 23 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 function.(##get-text-property.0.
57740 3a 74 69 74 6c 65 20 25 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 :title.%)))))..(defun.forge-read
57760 2d 74 6f 70 69 63 2d 74 69 74 6c 65 20 28 74 6f 70 69 63 29 0a 20 20 28 72 65 61 64 2d 73 74 72 -topic-title.(topic)...(read-str
57780 69 6e 67 20 22 54 69 74 6c 65 3a 20 22 20 28 6f 72 65 66 20 74 6f 70 69 63 20 74 69 74 6c 65 29 ing."Title:.".(oref.topic.title)
577a0 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d 69 6c 65 ))..(defun.forge-read-topic-mile
577c0 73 74 6f 6e 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 74 6f 70 69 63 29 0a 20 20 28 6d 61 67 69 74 stone.(&optional.topic)...(magit
577e0 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 0a 20 20 20 22 4d 69 6c 65 73 74 6f 6e 65 22 0a -completing-read...."Milestone".
57800 20 20 20 28 63 6f 6e 73 20 22 22 0a 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 23 27 63 ...(cons.""..........(mapcar.#'c
57820 61 64 64 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 28 66 6f 72 addr..................(oref.(for
57840 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 6f 72 20 74 6f 70 69 63 20 3a 74 72 61 ge-get-repository.(or.topic.:tra
57860 63 6b 65 64 29 29 20 6d 69 6c 65 73 74 6f 6e 65 73 29 29 29 0a 20 20 20 6e 69 6c 20 74 0a 20 20 cked)).milestones)))....nil.t...
57880 20 28 61 6e 64 20 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 .(and.topic.(forge--format-topic
578a0 2d 6d 69 6c 65 73 74 6f 6e 65 20 74 6f 70 69 63 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 -milestone.topic))))..(defun.for
578c0 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 ge-read-topic-labels.(&optional.
578e0 6f 62 6a 29 0a 20 20 28 6c 65 74 20 28 28 63 72 6d 2d 73 65 70 61 72 61 74 6f 72 20 22 2c 22 29 obj)...(let.((crm-separator.",")
57900 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 2d 6d 75 6c ).....(magit-completing-read-mul
57920 74 69 70 6c 65 0a 20 20 20 20 20 22 4c 61 62 65 6c 73 3a 20 22 0a 20 20 20 20 20 28 66 6f 72 67 tiple......"Labels:."......(forg
57940 65 2d 2d 66 6f 72 6d 61 74 2d 6c 61 62 65 6c 73 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f e--format-labels.(forge-get-repo
57960 73 69 74 6f 72 79 20 28 6f 72 20 6f 62 6a 20 3a 74 72 61 63 6b 65 64 29 29 29 0a 20 20 20 20 20 sitory.(or.obj.:tracked)))......
57980 6e 69 6c 20 74 0a 20 20 20 20 20 28 61 6e 64 20 28 63 6c 2d 74 79 70 65 70 20 6f 62 6a 20 27 66 nil.t......(and.(cl-typep.obj.'f
579a0 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f orge-topic)...........(forge--fo
579c0 72 6d 61 74 2d 6c 61 62 65 6c 73 20 6f 62 6a 20 63 72 6d 2d 73 65 70 61 72 61 74 6f 72 29 29 29 rmat-labels.obj.crm-separator)))
579e0 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6d 61 72 6b ))..(defun.forge-read-topic-mark
57a00 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6f 62 6a 29 0a 20 20 28 6c 65 74 20 28 28 63 72 6d 2d 73 s.(&optional.obj)...(let.((crm-s
57a20 65 70 61 72 61 74 6f 72 20 22 2c 22 29 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 eparator.",")).....(magit-comple
57a40 74 69 6e 67 2d 72 65 61 64 2d 6d 75 6c 74 69 70 6c 65 0a 20 20 20 20 20 22 4d 61 72 6b 73 3a 20 ting-read-multiple......"Marks:.
57a60 22 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 6d 61 72 6b 73 29 20 6e 69 6c 20 74 0a 20 20 ".(forge--format-marks).nil.t...
57a80 20 20 20 28 61 6e 64 20 28 63 6c 2d 74 79 70 65 70 20 6f 62 6a 20 27 66 6f 72 67 65 2d 74 6f 70 ...(and.(cl-typep.obj.'forge-top
57aa0 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 6d 61 72 ic)...........(forge--format-mar
57ac0 6b 73 20 6f 62 6a 20 63 72 6d 2d 73 65 70 61 72 61 74 6f 72 29 29 29 29 29 0a 0a 28 64 65 66 75 ks.obj.crm-separator)))))..(defu
57ae0 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 61 73 73 69 67 6e 65 65 73 20 28 26 6f n.forge-read-topic-assignees.(&o
57b00 70 74 69 6f 6e 61 6c 20 74 6f 70 69 63 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 70 6f 20 28 66 ptional.topic)...(let*.((repo.(f
57b20 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 6f 72 20 74 6f 70 69 63 20 3a 74 orge-get-repository.(or.topic.:t
57b40 72 61 63 6b 65 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 76 61 6c 75 65 20 28 61 6e 64 20 74 racked)))..........(value.(and.t
57b60 6f 70 69 63 20 28 6f 72 65 66 20 74 6f 70 69 63 20 61 73 73 69 67 6e 65 65 73 29 29 29 0a 20 20 opic.(oref.topic.assignees)))...
57b80 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 73 20 28 6d 61 70 63 61 72 20 23 27 63 61 64 72 20 28 .......(choices.(mapcar.#'cadr.(
57ba0 6f 72 65 66 20 72 65 70 6f 20 61 73 73 69 67 6e 65 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 oref.repo.assignees)))..........
57bc0 28 63 72 6d 2d 73 65 70 61 72 61 74 6f 72 20 22 2c 22 29 29 0a 20 20 20 20 28 6d 61 67 69 74 2d (crm-separator.",")).....(magit-
57be0 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 2d 6d 75 6c 74 69 70 6c 65 0a 20 20 20 20 20 22 41 completing-read-multiple......"A
57c00 73 73 69 67 6e 65 65 73 3a 20 22 20 63 68 6f 69 63 65 73 20 6e 69 6c 0a 20 20 20 20 20 28 69 66 ssignees:.".choices.nil......(if
57c20 20 28 66 6f 72 67 65 2d 2d 63 68 69 6c 64 70 20 72 65 70 6f 20 27 66 6f 72 67 65 2d 67 69 74 6c .(forge--childp.repo.'forge-gitl
57c40 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 74 20 3b 20 53 65 6c 65 ab-repository)..........t.;.Sele
57c60 63 74 69 6e 67 20 73 6f 6d 65 74 68 69 6e 67 20 65 6c 73 65 20 77 6f 75 6c 64 20 66 61 69 6c 20 cting.something.else.would.fail.
57c80 6c 61 74 65 72 20 6f 6e 2e 0a 20 20 20 20 20 20 20 27 63 6f 6e 66 69 72 6d 29 0a 20 20 20 20 20 later.on.........'confirm)......
57ca0 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 63 61 64 72 20 76 61 6c 75 65 20 22 2c 22 29 29 29 29 0a (mapconcat.#'cadr.value.",")))).
57cc0 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 72 65 76 69 65 77 2d .(defun.forge-read-topic-review-
57ce0 72 65 71 75 65 73 74 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 74 6f 70 69 63 29 0a 20 20 28 6c 65 requests.(&optional.topic)...(le
57d00 74 2a 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 t*.((repo.(forge-get-repository.
57d20 28 6f 72 20 74 6f 70 69 63 20 3a 74 72 61 63 6b 65 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 (or.topic.:tracked)))..........(
57d40 76 61 6c 75 65 20 28 61 6e 64 20 74 6f 70 69 63 20 28 6f 72 65 66 20 74 6f 70 69 63 20 72 65 76 value.(and.topic.(oref.topic.rev
57d60 69 65 77 2d 72 65 71 75 65 73 74 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 iew-requests)))..........(choice
57d80 73 20 28 6e 63 6f 6e 63 20 28 6d 61 70 63 61 72 20 23 27 63 61 64 72 20 28 6f 72 65 66 20 72 65 s.(nconc.(mapcar.#'cadr.(oref.re
57da0 70 6f 20 61 73 73 69 67 6e 65 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 po.assignees))..................
57dc0 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 74 65 61 6d 73 29 29 29 0a 20 20 20 20 ........(oref.repo.teams))).....
57de0 20 20 20 20 20 28 63 72 6d 2d 73 65 70 61 72 61 74 6f 72 20 22 2c 22 29 29 0a 20 20 20 20 28 6d .....(crm-separator.",")).....(m
57e00 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 2d 6d 75 6c 74 69 70 6c 65 0a 20 20 agit-completing-read-multiple...
57e20 20 20 20 22 52 65 71 75 65 73 74 20 72 65 76 69 65 77 20 66 72 6f 6d 3a 20 22 20 63 68 6f 69 63 ..."Request.review.from:.".choic
57e40 65 73 20 6e 69 6c 0a 20 20 20 20 20 27 63 6f 6e 66 69 72 6d 0a 20 20 20 20 20 28 6d 61 70 63 6f es.nil......'confirm......(mapco
57e60 6e 63 61 74 20 23 27 63 61 64 72 20 76 61 6c 75 65 20 22 2c 22 29 29 29 29 0a 0a 3b 3b 3b 20 46 ncat.#'cadr.value.","))))..;;;.F
57e80 6f 72 6d 61 74 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 6f 72 6d ormat..(cl-defmethod.forge--form
57ea0 61 74 20 28 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 20 73 6c 6f 74 20 26 6f 70 at.((topic.forge-topic).slot.&op
57ec0 74 69 6f 6e 61 6c 20 73 70 65 63 29 0a 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 28 66 tional.spec)...(forge--format.(f
57ee0 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 70 69 63 29 20 73 6c 6f 74 0a orge-get-repository.topic).slot.
57f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 2c 40 73 70 65 63 20 28 3f 69 20 2e 20 .................`(,@spec.(?i...
57f20 2c 28 6f 72 65 66 20 74 6f 70 69 63 20 6e 75 6d 62 65 72 29 29 29 29 29 0a 0a 28 64 65 66 75 6e ,(oref.topic.number)))))..(defun
57f40 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 6c 69 6e 65 20 28 74 6f 70 69 63 .forge--format-topic-line.(topic
57f60 20 26 6f 70 74 69 6f 6e 61 6c 20 77 69 64 74 68 29 0a 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 28 .&optional.width)...(concat....(
57f80 61 6e 64 20 28 6f 72 20 28 61 6e 64 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f and.(or.(and.(derived-mode-p.'fo
57fa0 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 rge-notifications-mode).........
57fc0 20 20 20 20 20 20 20 20 20 28 65 71 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 .........(eq.forge-notifications
57fe0 2d 64 69 73 70 6c 61 79 2d 73 74 79 6c 65 20 27 66 6c 61 74 29 29 0a 20 20 20 20 20 20 20 20 20 -display-style.'flat))..........
58000 20 20 20 28 61 6e 64 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 74 ...(and.(derived-mode-p.'forge-t
58020 6f 70 69 63 73 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 opics-mode)..................(or
58040 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 67 6c 6f ef.forge--buffer-topics-spec.glo
58060 62 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 6f 72 65 66 bal)..................(not.(oref
58080 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 67 72 6f 75 70 .forge--buffer-topics-spec.group
580a0 65 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 74 72 75 6e 63 61 74 65 ed)))).........(concat.(truncate
580c0 2d 73 74 72 69 6e 67 2d 74 6f 2d 77 69 64 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -string-to-width................
580e0 20 20 28 6f 72 65 66 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 74 6f ..(oref.(forge-get-repository.to
58100 70 69 63 29 20 73 6c 75 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 pic).slug)..................forg
58120 65 2d 74 6f 70 69 63 2d 72 65 70 6f 73 69 74 6f 72 79 2d 73 6c 75 67 2d 77 69 64 74 68 0a 20 20 e-topic-repository-slug-width...
58140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 3f 5c 73 20 74 29 0a 20 20 20 20 20 20 ...............nil.?\s.t).......
58160 20 20 20 20 20 20 20 20 20 20 22 20 22 29 29 0a 20 20 20 28 73 74 72 69 6e 67 2d 70 61 64 20 28 .........."."))....(string-pad.(
58180 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 73 6c 75 67 20 74 6f 70 69 63 29 20 forge--format-topic-slug.topic).
581a0 28 6f 72 20 77 69 64 74 68 20 35 29 29 0a 20 20 20 22 20 22 0a 20 20 20 28 66 6f 72 67 65 2d 2d (or.width.5))...."."....(forge--
581c0 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 74 69 74 6c 65 20 74 6f 70 69 63 29 29 29 0a 0a 28 64 65 format-topic-title.topic)))..(de
581e0 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 73 6c 75 67 20 28 74 6f fun.forge--format-topic-slug.(to
58200 70 69 63 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 73 6c 75 67 20 73 74 61 74 65 20 73 pic)...(with-slots.(slug.state.s
58220 74 61 74 75 73 20 73 61 76 65 64 2d 70 29 20 74 6f 70 69 63 0a 20 20 20 20 28 6d 61 67 69 74 2d tatus.saved-p).topic.....(magit-
58240 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 0a 20 20 20 20 20 73 6c 75 67 0a 20 20 20 20 20 -propertize-face......slug......
58260 60 28 2c 40 28 61 6e 64 20 73 61 76 65 64 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 `(,@(and.saved-p...............'
58280 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 67 2d 73 61 76 65 64 29 29 0a 20 20 20 20 20 20 (forge-topic-slug-saved)).......
582a0 20 2c 40 28 61 6e 64 20 28 65 71 20 73 74 61 74 75 73 20 27 75 6e 72 65 61 64 29 20 20 20 27 28 .,@(and.(eq.status.'unread)...'(
582c0 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 67 2d 75 6e 72 65 61 64 29 29 0a 20 20 20 20 20 20 forge-topic-slug-unread)).......
582e0 20 2c 28 70 63 61 73 65 20 73 74 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 28 27 6f 70 65 6e 20 .,(pcase.state...........('open.
58300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d ...................'forge-topic-
58320 73 6c 75 67 2d 6f 70 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 6f 72 20 27 63 6f 6d 70 6c slug-open)...........((or.'compl
58340 65 74 65 64 20 27 6d 65 72 67 65 64 29 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 67 eted.'merged)..'forge-topic-slug
58360 2d 63 6f 6d 70 6c 65 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 6f 72 20 27 75 6e 70 6c -completed)...........((or.'unpl
58380 61 6e 6e 65 64 20 27 6f 75 74 64 61 74 65 64 20 27 64 75 70 6c 69 63 61 74 65 20 27 72 65 6a 65 anned.'outdated.'duplicate.'reje
583a0 63 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c cted)............'forge-topic-sl
583c0 75 67 2d 65 78 70 75 6e 67 65 64 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d ug-expunged))))))..(defun.forge-
583e0 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 72 65 66 73 20 28 74 6f 70 69 63 29 0a 20 20 28 70 63 -format-topic-refs.(topic)...(pc
58400 61 73 65 2d 6c 65 74 0a 20 20 20 20 20 20 28 28 28 65 69 65 69 6f 20 63 72 6f 73 73 2d 72 65 70 ase-let.......(((eieio.cross-rep
58420 6f 2d 70 20 62 61 73 65 2d 72 65 70 6f 20 62 61 73 65 2d 72 65 66 20 68 65 61 64 2d 72 65 70 6f o-p.base-repo.base-ref.head-repo
58440 20 68 65 61 64 2d 72 65 66 29 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 28 73 65 70 61 72 61 .head-ref).topic)........(separa
58460 74 6f 72 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 20 22 3a 22 20 tor.(magit--propertize-face.":".
58480 27 6d 61 67 69 74 2d 64 69 6d 6d 65 64 29 29 0a 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 64 20 'magit-dimmed))........(deleted.
584a0 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 20 22 28 64 65 6c 65 74 65 (magit--propertize-face."(delete
584c0 64 29 22 20 27 6d 61 67 69 74 2d 64 69 6d 6d 65 64 29 29 29 0a 20 20 20 20 28 63 6f 6e 63 61 74 d)".'magit-dimmed))).....(concat
584e0 20 28 69 66 20 63 72 6f 73 73 2d 72 65 70 6f 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(if.cross-repo-p...............
58500 20 20 28 63 6f 6e 63 61 74 20 62 61 73 65 2d 72 65 70 6f 20 73 65 70 61 72 61 74 6f 72 20 62 61 ..(concat.base-repo.separator.ba
58520 73 65 2d 72 65 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 61 73 65 2d 72 65 66 29 0a se-ref)...............base-ref).
58540 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 ............(magit--propertize-f
58560 61 63 65 20 22 2e 2e 2e 22 20 27 6d 61 67 69 74 2d 64 69 6d 6d 65 64 29 0a 20 20 20 20 20 20 20 ace."...".'magit-dimmed)........
58580 20 20 20 20 20 28 69 66 20 63 72 6f 73 73 2d 72 65 70 6f 2d 70 0a 20 20 20 20 20 20 20 20 20 20 .....(if.cross-repo-p...........
585a0 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 68 65 61 64 2d 72 65 70 6f 20 68 65 61 64 2d 72 65 ......(if.(and.head-repo.head-re
585c0 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 68 f).....................(concat.h
585e0 65 61 64 2d 72 65 70 6f 20 73 65 70 61 72 61 74 6f 72 20 68 65 61 64 2d 72 65 66 29 0a 20 20 20 ead-repo.separator.head-ref)....
58600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 65 6c 65 74 65 64 29 0a 20 20 20 20 20 20 20 20 ...............deleted).........
58620 20 20 20 20 20 20 28 6f 72 20 68 65 61 64 2d 72 65 66 20 64 65 6c 65 74 65 64 29 29 29 29 29 0a ......(or.head-ref.deleted))))).
58640 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 64 72 61 66 .(defun.forge--format-topic-draf
58660 74 20 28 74 6f 70 69 63 29 0a 20 20 28 69 66 20 28 6f 72 65 66 20 74 6f 70 69 63 20 64 72 61 66 t.(topic)...(if.(oref.topic.draf
58680 74 2d 70 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 t-p).......(magit--propertize-fa
586a0 63 65 20 22 79 65 73 22 20 27 62 6f 6c 64 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 ce."yes".'bold).....(magit--prop
586c0 65 72 74 69 7a 65 2d 66 61 63 65 20 22 6e 6f 22 20 27 6d 61 67 69 74 2d 64 69 6d 6d 65 64 29 29 ertize-face."no".'magit-dimmed))
586e0 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 73 61 )..(defun.forge--format-topic-sa
58700 76 65 64 20 28 74 6f 70 69 63 29 0a 20 20 28 69 66 20 28 6f 72 65 66 20 74 6f 70 69 63 20 73 61 ved.(topic)...(if.(oref.topic.sa
58720 76 65 64 2d 70 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d ved-p).......(magit--propertize-
58740 66 61 63 65 20 22 79 65 73 22 20 27 62 6f 6c 64 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 face."yes".'bold).....(magit--pr
58760 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 20 22 6e 6f 22 20 27 6d 61 67 69 74 2d 64 69 6d 6d 65 64 opertize-face."no".'magit-dimmed
58780 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d )))..(defun.forge--format-topic-
587a0 74 69 74 6c 65 20 28 74 6f 70 69 63 29 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 title.(topic)...(with-temp-buffe
587c0 72 0a 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 28 77 69 74 r.....(save-excursion.......(wit
587e0 68 2d 73 6c 6f 74 73 20 28 74 69 74 6c 65 20 73 74 61 74 75 73 20 73 74 61 74 65 29 20 74 6f 70 h-slots.(title.status.state).top
58800 69 63 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 20 20 28 6d 61 67 ic.........(insert..........(mag
58820 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 74 69 it--propertize-face...........ti
58840 74 6c 65 0a 20 20 20 20 20 20 20 20 20 20 60 28 2c 40 28 61 6e 64 20 28 66 6f 72 67 65 2d 70 75 tle...........`(,@(and.(forge-pu
58860 6c 6c 72 65 71 2d 70 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 llreq-p.topic)..................
58880 20 20 28 6f 72 65 66 20 74 6f 70 69 63 20 64 72 61 66 74 2d 70 29 0a 20 20 20 20 20 20 20 20 20 ..(oref.topic.draft-p)..........
588a0 20 20 20 20 20 20 20 20 20 20 27 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 64 72 61 66 74 29 ..........'(forge-pullreq-draft)
588c0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 70 63 61 73 65 20 73 74 61 74 75 73 0a 20 20 20 ).............,(pcase.status....
588e0 20 20 20 20 20 20 20 20 20 20 20 20 28 27 75 6e 72 65 61 64 20 20 27 66 6f 72 67 65 2d 74 6f 70 ............('unread..'forge-top
58900 69 63 2d 75 6e 72 65 61 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 70 65 6e 64 ic-unread)................('pend
58920 69 6e 67 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 70 65 6e 64 69 6e 67 29 0a 20 20 20 20 20 20 ing.'forge-topic-pending).......
58940 20 20 20 20 20 20 20 20 20 28 27 64 6f 6e 65 20 20 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d .........('done....'forge-topic-
58960 64 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 70 63 61 73 65 20 28 6c 69 73 74 done)).............,(pcase.(list
58980 20 28 65 69 65 69 6f 2d 6f 62 6a 65 63 74 2d 63 6c 61 73 73 20 74 6f 70 69 63 29 20 73 74 61 74 .(eieio-object-class.topic).stat
589a0 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 66 6f 72 67 65 2d 64 69 73 63 75 e)................(`(forge-discu
589c0 73 73 69 6f 6e 20 20 6f 70 65 6e 29 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 ssion..open).......'forge-discus
589e0 73 69 6f 6e 2d 6f 70 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 66 6f 72 sion-open)................(`(for
58a00 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 20 63 6f 6d 70 6c 65 74 65 64 29 20 20 27 66 6f 72 67 ge-discussion..completed)..'forg
58a20 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 63 6f 6d 70 6c 65 74 65 64 29 0a 20 20 20 20 20 20 20 20 e-discussion-completed).........
58a40 20 20 20 20 20 20 20 28 60 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 20 6f 75 74 64 .......(`(forge-discussion..outd
58a60 61 74 65 64 29 20 20 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 65 78 70 75 6e 67 ated)...'forge-discussion-expung
58a80 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 66 6f 72 67 65 2d 64 69 73 63 ed)................(`(forge-disc
58aa0 75 73 73 69 6f 6e 20 20 64 75 70 6c 69 63 61 74 65 29 20 20 27 66 6f 72 67 65 2d 64 69 73 63 75 ussion..duplicate)..'forge-discu
58ac0 73 73 69 6f 6e 2d 65 78 70 75 6e 67 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ssion-expunged)................(
58ae0 60 28 66 6f 72 67 65 2d 69 73 73 75 65 20 20 20 20 20 20 20 6f 70 65 6e 29 20 20 20 20 20 20 20 `(forge-issue.......open).......
58b00 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 6f 70 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 'forge-issue-open)..............
58b20 20 20 28 60 28 66 6f 72 67 65 2d 69 73 73 75 65 20 20 20 20 20 20 20 63 6f 6d 70 6c 65 74 65 64 ..(`(forge-issue.......completed
58b40 29 20 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 63 6f 6d 70 6c 65 74 65 64 29 0a 20 20 20 20 20 )..'forge-issue-completed)......
58b60 20 20 20 20 20 20 20 20 20 20 28 60 28 66 6f 72 67 65 2d 69 73 73 75 65 20 20 20 20 20 20 20 75 ..........(`(forge-issue.......u
58b80 6e 70 6c 61 6e 6e 65 64 29 20 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 65 78 70 75 6e 67 65 64 nplanned)..'forge-issue-expunged
58ba0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 66 6f 72 67 65 2d 69 73 73 75 65 20 )................(`(forge-issue.
58bc0 20 20 20 20 20 20 64 75 70 6c 69 63 61 74 65 29 20 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 65 ......duplicate)..'forge-issue-e
58be0 78 70 75 6e 67 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 66 6f 72 67 65 xpunged)................(`(forge
58c00 2d 70 75 6c 6c 72 65 71 20 20 20 20 20 6f 70 65 6e 29 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d -pullreq.....open).......'forge-
58c20 70 75 6c 6c 72 65 71 2d 6f 70 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 pullreq-open)................(`(
58c40 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 20 20 20 20 6d 65 72 67 65 64 29 20 20 20 20 20 27 66 forge-pullreq.....merged).....'f
58c60 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 6d 65 72 67 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 orge-pullreq-merged)............
58c80 20 20 20 20 28 60 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 20 20 20 20 72 65 6a 65 63 74 65 ....(`(forge-pullreq.....rejecte
58ca0 64 29 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 72 65 6a 65 63 74 65 64 29 29 29 29 d)...'forge-pullreq-rejected))))
58cc0 29 29 29 0a 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 2d 77 72 61 70 70 65 64 20 27 66 6f 72 67 65 ))).....(run-hook-wrapped.'forge
58ce0 2d 74 6f 70 69 63 2d 77 61 73 68 2d 74 69 74 6c 65 2d 68 6f 6f 6b 0a 20 20 20 20 20 20 20 20 20 -topic-wash-title-hook..........
58d00 20 20 20 20 20 20 20 20 20 20 20 20 20 28 23 23 70 72 6f 67 31 20 6e 69 6c 20 28 73 61 76 65 2d .............(##prog1.nil.(save-
58d20 65 78 63 75 72 73 69 6f 6e 20 28 66 75 6e 63 61 6c 6c 20 25 29 29 29 29 0a 20 20 20 20 28 62 75 excursion.(funcall.%)))).....(bu
58d40 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f ffer-string)))..(defun.forge--fo
58d60 72 6d 61 74 2d 74 6f 70 69 63 2d 63 61 74 65 67 6f 72 79 20 28 74 6f 70 69 63 29 0a 20 20 28 61 rmat-topic-category.(topic)...(a
58d80 6e 64 2d 6c 65 74 2a 20 28 28 69 64 20 28 6f 72 65 66 20 74 6f 70 69 63 20 63 61 74 65 67 6f 72 nd-let*.((id.(oref.topic.categor
58da0 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 20 28 66 6f 72 67 65 2d 73 71 6c y))..............(str.(forge-sql
58dc0 31 20 5b 3a 73 65 6c 65 63 74 20 5b 6e 61 6d 65 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1.[:select.[name]...............
58de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 64 69 73 63 75 73 73 69 6f .................:from.discussio
58e00 6e 2d 63 61 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n-category......................
58e20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 69 64 20 24 73 31 29 5d 0a 20 20 20 ..........:where.(=.id.$s1)]....
58e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 29 ...........................id)))
58e60 0a 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 20 73 74 72 .....(magit--propertize-face.str
58e80 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 .'forge-topic-label)))..(defun.f
58ea0 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 6d 69 6c 65 73 74 6f 6e 65 20 28 74 6f orge--format-topic-milestone.(to
58ec0 70 69 63 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 69 64 20 28 6f 72 65 66 20 74 6f 70 69 pic)...(and-let*.((id.(oref.topi
58ee0 63 20 6d 69 6c 65 73 74 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 20 c.milestone))..............(str.
58f00 28 66 6f 72 67 65 2d 73 71 6c 31 20 5b 3a 73 65 6c 65 63 74 20 5b 74 69 74 6c 65 5d 0a 20 20 20 (forge-sql1.[:select.[title]....
58f20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f ............................:fro
58f40 6d 20 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 m.milestone.....................
58f60 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 69 64 20 24 73 31 29 5d 0a 20 20 ...........:where.(=.id.$s1)]...
58f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 ............................id))
58fa0 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 20 73 74 ).....(magit--propertize-face.st
58fc0 72 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 r.'forge-topic-label)))..(defun.
58fe0 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 6c 61 62 65 6c 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 forge--format-labels.(&optional.
59000 61 72 67 20 63 6f 6e 63 61 74 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 0a 20 20 20 20 20 20 28 28 arg.concat)...(and-let*.......((
59020 6c 6f 63 61 6c 20 74 29 0a 20 20 20 20 20 20 20 28 6c 61 62 65 6c 73 20 28 63 6f 6e 64 0a 20 20 local.t)........(labels.(cond...
59040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 69 65 69 6f 2d 6f 62 6a 65 63 74 2d 70 20 61 ..............((eieio-object-p.a
59060 72 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 61 72 67 20 6c rg)..................(oref.arg.l
59080 61 62 65 6c 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d abels)).................((forge-
590a0 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 buffer-repository)..............
590c0 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 2d 63 64 72 20 60 5b 3a 73 65 6c 65 63 74 20 6c 61 62 ....(forge-sql-cdr.`[:select.lab
590e0 65 6c 3a 2a 20 3a 66 72 6f 6d 20 6c 61 62 65 6c 20 3a 77 68 65 72 65 0a 20 20 20 20 20 20 20 20 el:*.:from.label.:where.........
59100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 69 66 20 61 ..........................,(if.a
59120 72 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rg..............................
59140 20 20 20 20 20 20 20 20 20 20 27 28 61 6e 64 20 28 3d 20 72 65 70 6f 73 69 74 6f 72 79 20 24 73 ..........'(and.(=.repository.$s
59160 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1)..............................
59180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 20 6e 61 6d 65 20 24 76 32 29 29 0a 20 ................(in.name.$v2))..
591a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
591c0 20 20 20 20 27 28 3d 20 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 29 0a 20 20 20 20 20 20 20 ....'(=.repository.$s1))........
591e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 ...........................:orde
59200 72 2d 62 79 20 5b 28 61 73 63 20 6e 61 6d 65 29 5d 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 r-by.[(asc.name)]]..............
59220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d ...................forge-buffer-
59240 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 repository......................
59260 20 20 20 20 20 20 20 20 20 20 20 28 76 63 6f 6e 63 61 74 20 61 72 67 29 29 29 0a 20 20 20 20 20 ...........(vconcat.arg)))......
59280 20 20 20 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...........(t..................(
592a0 73 65 74 71 20 6c 6f 63 61 6c 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 setq.local.nil).................
592c0 20 28 66 6f 72 67 65 2d 73 71 6c 20 60 5b 3a 73 65 6c 65 63 74 20 3a 64 69 73 74 69 6e 63 74 20 .(forge-sql.`[:select.:distinct.
592e0 6e 61 6d 65 20 3a 66 72 6f 6d 20 6c 61 62 65 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 name.:from.label................
59300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 61 72 67 20 27 28 3a 77 68 65 72 ..............,@(and.arg.'(:wher
59320 65 20 28 69 6e 20 6e 61 6d 65 20 24 76 31 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e.(in.name.$v1)))...............
59340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 61 73 63 20 ................:order-by.[(asc.
59360 6e 61 6d 65 29 5d 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 name)]].........................
59380 20 20 20 20 28 76 63 6f 6e 63 61 74 20 61 72 67 29 29 29 29 29 0a 20 20 20 20 20 20 20 28 66 6f ....(vconcat.arg)))))........(fo
593a0 72 6d 61 74 20 28 69 66 20 6c 6f 63 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rmat.(if.local..................
593c0 20 20 28 70 63 61 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 5f 69 64 20 2c 6e 61 6d 65 20 2c 63 ..(pcase-lambda.(`(,_id.,name.,c
593e0 6f 6c 6f 72 20 2c 5f 64 65 73 63 72 69 70 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 olor.,_description))............
59400 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 62 61 63 6b 67 72 6f 75 6e 64 20 28 66 6f ..........(let*.((background.(fo
59420 72 67 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 63 6f 6c 6f 72 20 63 6f 6c 6f 72 29 29 0a 20 20 20 20 rge--sanitize-color.color)).....
59440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 65 67 72 6f ........................(foregro
59460 75 6e 64 20 28 72 65 61 64 61 62 6c 65 2d 66 6f 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 62 und.(readable-foreground-color.b
59480 61 63 6b 67 72 6f 75 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ackground)))....................
594a0 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 0a 20 20 20 20 ....(magit--propertize-face.....
594c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 60 28 28 20 3a 62 61 ....................name.`((.:ba
594e0 63 6b 67 72 6f 75 6e 64 20 2c 62 61 63 6b 67 72 6f 75 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 ckground.,background............
59500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e ......................:foregroun
59520 64 20 2c 66 6f 72 65 67 72 6f 75 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d.,foreground)..................
59540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 29 ..............forge-topic-label)
59560 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 61 6d 62 )))..................(pcase-lamb
59580 64 61 20 28 60 28 2c 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 da.(`(,name))...................
595a0 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 20 6e 61 6d 65 20 27 66 .(magit--propertize-face.name.'f
595c0 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 63 6f orge-topic-label))))).....(if.co
595e0 6e 63 61 74 0a 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 66 6f 72 6d 61 74 20 6c ncat.........(mapconcat.format.l
59600 61 62 65 6c 73 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 63 6f 6e 63 61 74 29 20 63 6f 6e 63 61 abels.(if.(stringp.concat).conca
59620 74 20 22 20 22 29 29 0a 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 66 6f 72 6d 61 74 20 6c 61 62 t.".")).......(mapcar.format.lab
59640 65 6c 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 6d 61 els))))..(defun.forge--format-ma
59660 72 6b 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 20 63 6f 6e 63 61 74 29 0a 20 20 28 61 6e rks.(&optional.arg.concat)...(an
59680 64 2d 6c 65 74 20 28 28 6d 61 72 6b 73 20 28 69 66 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 2d d-let.((marks.(if.(forge-topic--
596a0 65 69 65 69 6f 2d 63 68 69 6c 64 70 20 61 72 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eieio-childp.arg)...............
596c0 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 61 72 67 20 6d 61 72 6b 73 29 0a 20 20 20 20 20 20 .........(oref.arg.marks).......
596e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 55 6e 6c 69 6b 65 20 6c 61 62 65 6c 73 2c ...............;;.Unlike.labels,
59700 20 6d 61 72 6b 73 20 61 72 65 20 6e 6f 74 20 72 65 70 6f 2d 73 70 65 63 69 66 69 63 2e 0a 20 20 .marks.are.not.repo-specific....
59720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 6f 72 67 65 2d ...................(when.(forge-
59740 72 65 70 6f 73 69 74 6f 72 79 2d 70 20 61 72 67 29 20 28 73 65 74 71 20 61 72 67 20 6e 69 6c 29 repository-p.arg).(setq.arg.nil)
59760 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 71 )......................(forge-sq
59780 6c 2d 63 64 72 20 60 5b 3a 73 65 6c 65 63 74 20 2a 20 3a 66 72 6f 6d 20 6d 61 72 6b 0a 20 20 20 l-cdr.`[:select.*.:from.mark....
597a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
597c0 20 20 20 2c 40 28 61 6e 64 20 61 72 67 20 27 28 3a 77 68 65 72 65 20 28 69 6e 20 6e 61 6d 65 20 ...,@(and.arg.'(:where.(in.name.
597e0 24 76 31 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $v1)))..........................
59800 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 61 73 63 20 6e 61 6d .............:order-by.[(asc.nam
59820 65 29 5d 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e)]]............................
59840 20 20 20 20 20 20 20 20 20 28 76 63 6f 6e 63 61 74 20 61 72 67 29 29 29 29 0a 20 20 20 20 20 20 .........(vconcat.arg)))).......
59860 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 28 70 63 61 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c ......(format.(pcase-lambda.(`(,
59880 5f 69 64 20 2c 6e 61 6d 65 20 2c 66 61 63 65 20 2c 5f 64 65 73 63 72 69 70 74 69 6f 6e 29 29 0a _id.,name.,face.,_description)).
598a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 ......................(magit--pr
598c0 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 opertize-face...................
598e0 20 20 20 20 20 6e 61 6d 65 20 28 6c 69 73 74 20 66 61 63 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 .....name.(list.face.'forge-topi
59900 63 2d 6c 61 62 65 6c 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 63 6f 6e 63 61 74 0a 20 20 20 20 c-label))))).....(if.concat.....
59920 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 66 6f 72 6d 61 74 20 6d 61 72 6b 73 20 28 69 66 20 ....(mapconcat.format.marks.(if.
59940 28 73 74 72 69 6e 67 70 20 63 6f 6e 63 61 74 29 20 63 6f 6e 63 61 74 20 22 20 22 29 29 0a 20 20 (stringp.concat).concat."."))...
59960 20 20 20 20 28 6d 61 70 63 61 72 20 66 6f 72 6d 61 74 20 6d 61 72 6b 73 29 29 29 29 0a 0a 28 64 ....(mapcar.format.marks))))..(d
59980 65 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 73 74 61 74 65 20 28 efun.forge--format-topic-state.(
599a0 74 6f 70 69 63 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 73 74 61 74 65 29 20 74 6f 70 topic)...(with-slots.(state).top
599c0 69 63 0a 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 0a 20 ic.....(magit--propertize-face..
599e0 20 20 20 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 73 74 61 74 65 29 0a 20 20 20 20 20 28 70 63 ....(symbol-name.state)......(pc
59a00 61 73 65 20 28 6c 69 73 74 20 28 69 66 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 20 74 6f 70 ase.(list.(if.(forge-issue-p.top
59a20 69 63 29 20 27 69 73 73 75 65 20 27 70 75 6c 6c 72 65 71 29 20 73 74 61 74 65 29 0a 20 20 20 20 ic).'issue.'pullreq).state).....
59a40 20 20 20 28 27 28 64 69 73 63 75 73 73 69 6f 6e 20 20 6f 70 65 6e 29 20 20 20 20 20 20 20 27 66 ...('(discussion..open).......'f
59a60 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 6f 70 65 6e 29 0a 20 20 20 20 20 20 20 28 27 28 orge-discussion-open)........('(
59a80 64 69 73 63 75 73 73 69 6f 6e 20 20 63 6f 6d 70 6c 65 74 65 64 29 20 20 27 66 6f 72 67 65 2d 64 discussion..completed)..'forge-d
59aa0 69 73 63 75 73 73 69 6f 6e 2d 63 6f 6d 70 6c 65 74 65 64 29 0a 20 20 20 20 20 20 20 28 27 28 64 iscussion-completed)........('(d
59ac0 69 73 63 75 73 73 69 6f 6e 20 20 6f 75 74 64 61 74 65 64 29 20 20 20 27 66 6f 72 67 65 2d 64 69 iscussion..outdated)...'forge-di
59ae0 73 63 75 73 73 69 6f 6e 2d 65 78 70 75 6e 67 65 64 29 0a 20 20 20 20 20 20 20 28 27 28 64 69 73 scussion-expunged)........('(dis
59b00 63 75 73 73 69 6f 6e 20 20 64 75 70 6c 69 63 61 74 65 29 20 20 27 66 6f 72 67 65 2d 64 69 73 63 cussion..duplicate)..'forge-disc
59b20 75 73 73 69 6f 6e 2d 65 78 70 75 6e 67 65 64 29 0a 20 20 20 20 20 20 20 28 27 28 69 73 73 75 65 ussion-expunged)........('(issue
59b40 20 20 20 20 20 20 20 6f 70 65 6e 29 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d .......open).......'forge-issue-
59b60 6f 70 65 6e 29 0a 20 20 20 20 20 20 20 28 27 28 69 73 73 75 65 20 20 20 20 20 20 20 63 6f 6d 70 open)........('(issue.......comp
59b80 6c 65 74 65 64 29 20 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 63 6f 6d 70 6c 65 74 65 64 29 0a leted)..'forge-issue-completed).
59ba0 20 20 20 20 20 20 20 28 27 28 69 73 73 75 65 20 20 20 20 20 20 20 75 6e 70 6c 61 6e 6e 65 64 29 .......('(issue.......unplanned)
59bc0 20 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 65 78 70 75 6e 67 65 64 29 0a 20 20 20 20 20 20 20 ..'forge-issue-expunged)........
59be0 28 27 28 69 73 73 75 65 20 20 20 20 20 20 20 64 75 70 6c 69 63 61 74 65 29 20 20 27 66 6f 72 67 ('(issue.......duplicate)..'forg
59c00 65 2d 69 73 73 75 65 2d 65 78 70 75 6e 67 65 64 29 0a 20 20 20 20 20 20 20 28 27 28 70 75 6c 6c e-issue-expunged)........('(pull
59c20 72 65 71 20 20 20 20 20 6f 70 65 6e 29 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 req.....open).......'forge-pullr
59c40 65 71 2d 6f 70 65 6e 29 0a 20 20 20 20 20 20 20 28 27 28 70 75 6c 6c 72 65 71 20 20 20 20 20 6d eq-open)........('(pullreq.....m
59c60 65 72 67 65 64 29 20 20 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 6d 65 72 67 65 64 erged).....'forge-pullreq-merged
59c80 29 0a 20 20 20 20 20 20 20 28 27 28 70 75 6c 6c 72 65 71 20 20 20 20 20 63 6c 6f 73 65 64 29 20 )........('(pullreq.....closed).
59ca0 20 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 72 65 6a 65 63 74 65 64 29 29 29 29 29 ....'forge-pullreq-rejected)))))
59cc0 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 73 74 61 ..(defun.forge--format-topic-sta
59ce0 74 75 73 20 28 74 6f 70 69 63 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 73 74 61 74 75 tus.(topic)...(with-slots.(statu
59d00 73 29 20 74 6f 70 69 63 0a 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d s).topic.....(magit--propertize-
59d20 66 61 63 65 0a 20 20 20 20 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 73 74 61 74 75 73 29 0a 20 face......(symbol-name.status)..
59d40 20 20 20 20 28 70 63 61 73 65 20 73 74 61 74 75 73 0a 20 20 20 20 20 20 20 28 27 75 6e 72 65 61 ....(pcase.status........('unrea
59d60 64 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 75 6e 72 65 61 64 29 0a 20 20 20 20 20 20 20 28 d..'forge-topic-unread)........(
59d80 27 70 65 6e 64 69 6e 67 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 70 65 6e 64 69 6e 67 29 0a 20 'pending.'forge-topic-pending)..
59da0 20 20 20 20 20 20 28 27 64 6f 6e 65 20 20 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 64 6f 6e ......('done....'forge-topic-don
59dc0 65 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 e)))))..(defun.forge--format-top
59de0 69 63 2d 61 73 73 69 67 6e 65 65 73 20 28 61 72 67 29 0a 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 ic-assignees.(arg)...(and-let.((
59e00 61 73 73 69 67 6e 65 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 65 assignees..............(cond.((e
59e20 69 65 69 6f 2d 6f 62 6a 65 63 74 2d 70 20 61 72 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ieio-object-p.arg)..............
59e40 20 20 20 20 20 20 20 28 6f 72 65 66 20 61 72 67 20 61 73 73 69 67 6e 65 65 73 29 29 0a 20 20 20 .......(oref.arg.assignees))....
59e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 72 ................((forge-buffer-r
59e80 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 epository).....................(
59ea0 66 6f 72 67 65 2d 73 71 6c 2d 63 64 72 20 5b 3a 73 65 6c 65 63 74 20 2a 20 3a 66 72 6f 6d 20 61 forge-sql-cdr.[:select.*.:from.a
59ec0 73 73 69 67 6e 65 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ssignee.........................
59ee0 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ............:where..............
59f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 3d 20 72 .......................(and.(=.r
59f20 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 epository.$s1)..................
59f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 20 6c 6f 67 69 ........................(in.logi
59f60 6e 20 24 76 32 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n.$v2)).........................
59f80 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 61 73 63 20 6c 6f 67 69 ............:order-by.[(asc.logi
59fa0 6e 29 5d 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n)]]............................
59fc0 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 0a ........forge-buffer-repository.
59fe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5a000 20 20 20 28 76 63 6f 6e 63 61 74 20 61 72 67 29 29 29 29 29 29 0a 20 20 20 20 28 6d 61 70 63 6f ...(vconcat.arg)))))).....(mapco
5a020 6e 63 61 74 20 23 27 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 70 65 72 73 6f 6e 20 61 73 73 69 ncat.#'forge--format-person.assi
5a040 67 6e 65 65 73 20 22 2c 20 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f 72 gnees.",.")))..(defun.forge--for
5a060 6d 61 74 2d 74 6f 70 69 63 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 20 28 74 6f 70 69 63 mat-topic-review-requests.(topic
5a080 29 0a 20 20 28 61 6e 64 24 20 28 6f 72 65 66 20 74 6f 70 69 63 20 72 65 76 69 65 77 2d 72 65 71 )...(and$.(oref.topic.review-req
5a0a0 75 65 73 74 73 29 0a 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 66 6f 72 67 uests).........(mapconcat.#'forg
5a0c0 65 2d 2d 66 6f 72 6d 61 74 2d 70 65 72 73 6f 6e 20 24 20 22 2c 20 22 29 29 29 0a 0a 28 64 65 66 e--format-person.$.",.")))..(def
5a0e0 75 6e 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 70 65 72 73 6f 6e 20 28 70 65 72 73 6f 6e 29 un.forge--format-person.(person)
5a100 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 60 28 2c 5f 69 64 20 2c 6c 6f 67 69 6e 20 2c ...(pcase-let*.((`(,_id.,login.,
5a120 6e 61 6d 65 29 20 70 65 72 73 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 76 name).person)................(av
5a140 61 74 61 72 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 61 76 61 74 61 72 20 6c 6f 67 69 6e atar.(forge--format-avatar.login
5a160 29 29 29 0a 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 69 66 20 6e 61 6d 65 0a 20 20 20 ))).....(propertize.(if.name....
5a180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 20 28 .................(format."%s%s.(
5a1a0 40 25 73 29 22 20 61 76 61 74 61 72 20 6e 61 6d 65 20 6c 6f 67 69 6e 29 0a 20 20 20 20 20 20 20 @%s)".avatar.name.login)........
5a1c0 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 40 25 73 22 20 61 76 61 74 61 ...........(format."%s@%s".avata
5a1e0 72 20 6c 6f 67 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 r.login)).................'face.
5a200 27 74 72 61 6e 73 69 65 6e 74 2d 76 61 6c 75 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 'transient-value)))..(defun.forg
5a220 65 2d 2d 66 6f 72 6d 61 74 2d 61 76 61 74 61 72 20 28 70 65 72 73 6f 6e 29 0a 20 20 28 69 66 20 e--format-avatar.(person)...(if.
5a240 66 6f 72 67 65 2d 66 6f 72 6d 61 74 2d 61 76 61 74 61 72 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 forge-format-avatar-function....
5a260 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6f 72 67 65 2d 66 6f 72 6d 61 74 2d 61 76 61 74 61 72 2d ...(funcall.forge-format-avatar-
5a280 66 75 6e 63 74 69 6f 6e 20 70 65 72 73 6f 6e 29 0a 20 20 20 20 22 22 29 29 0a 0a 28 64 65 66 75 function.person).....""))..(defu
5a2a0 6e 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 62 6f 6f 6c 65 61 6e 20 28 73 6c 6f 74 20 6e 61 n.forge--format-boolean.(slot.na
5a2c0 6d 65 20 26 6f 70 74 69 6f 6e 61 6c 20 6f 62 6a 29 0a 20 20 3b 3b 20 42 6f 6f 6c 65 61 6e 73 20 me.&optional.obj)...;;.Booleans.
5a2e0 61 72 65 20 66 6f 72 6d 61 74 74 65 64 20 64 69 66 66 65 72 65 6e 74 6c 79 20 69 6e 20 74 72 61 are.formatted.differently.in.tra
5a300 6e 73 69 65 6e 74 73 20 61 6e 64 20 68 65 61 64 65 72 73 2e 0a 20 20 3b 3b 20 55 73 65 20 74 68 nsients.and.headers....;;.Use.th
5a320 69 73 20 74 6f 20 66 6f 72 6d 61 74 20 74 68 65 20 28 63 6f 6d 70 6c 65 74 65 29 20 64 65 73 63 is.to.format.the.(complete).desc
5a340 72 69 70 74 69 6f 6e 20 6f 66 20 73 75 66 66 69 78 20 63 6f 6d 6d 61 6e 64 73 2e 0a 20 20 28 6c ription.of.suffix.commands....(l
5a360 65 74 20 28 28 6f 62 6a 20 28 6f 72 20 6f 62 6a 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d et.((obj.(or.obj.(forge-current-
5a380 74 6f 70 69 63 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 61 6e 64 20 6f 62 6a 20 28 73 6c 6f 74 topic)))).....(if.(and.obj.(slot
5a3a0 2d 65 78 69 73 74 73 2d 70 20 6f 62 6a 20 73 6c 6f 74 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f -exists-p.obj.slot)).........(fo
5a3c0 72 6d 61 74 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 5b 25 73 5d 22 20 27 66 61 63 65 20 27 74 rmat.(propertize."[%s]".'face.'t
5a3e0 72 61 6e 73 69 65 6e 74 2d 64 65 6c 69 6d 69 74 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ransient-delimiter).............
5a400 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 6e 61 6d 65 20 27 66 61 63 65 0a 20 20 20 20 20 ....(propertize.name.'face......
5a420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 69 65 69 .......................(if.(eiei
5a440 6f 2d 6f 72 65 66 20 6f 62 6a 20 73 6c 6f 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 o-oref.obj.slot)................
5a460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 74 72 61 6e 73 69 65 6e 74 2d 76 61 6c 75 .................'transient-valu
5a480 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e...............................
5a4a0 27 74 72 61 6e 73 69 65 6e 74 2d 69 6e 61 63 74 69 76 65 2d 76 61 6c 75 65 29 29 29 0a 20 20 20 'transient-inactive-value)))....
5a4c0 20 20 20 28 66 6f 72 6d 61 74 20 22 5b 25 73 5d 22 20 6e 61 6d 65 29 29 29 29 0a 0a 3b 3b 3b 20 ...(format."[%s]".name))))..;;;.
5a4e0 49 6e 73 65 72 74 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 Insert..(defun.forge-insert-topi
5a500 63 73 20 28 74 79 70 65 20 68 65 61 64 69 6e 67 20 70 72 65 70 61 72 65 29 0a 20 20 22 49 6e 73 cs.(type.heading.prepare)..."Ins
5a520 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 74 6f 70 69 63 73 2c 20 61 63 63 6f 72 64 69 6e 67 20 ert.a.list.of.topics,.according.
5a540 74 6f 20 50 52 45 50 41 52 45 2e 0a 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 6e 6f to.PREPARE...This.function.is.no
5a560 74 20 69 6e 74 65 6e 64 65 64 20 74 6f 20 62 65 20 61 64 64 65 64 20 74 6f 20 73 65 63 74 69 6f t.intended.to.be.added.to.sectio
5a580 6e 20 68 6f 6f 6b 73 20 64 69 72 65 63 74 6c 79 2e 0a 49 6e 73 74 65 61 64 20 63 72 65 61 74 65 n.hooks.directly..Instead.create
5a5a0 20 61 20 66 75 6e 63 74 69 6f 6e 2c 20 77 68 69 63 68 20 63 61 6c 6c 73 20 74 68 69 73 20 66 75 .a.function,.which.calls.this.fu
5a5c0 6e 63 74 69 6f 6e 2c 20 61 6e 64 20 61 64 64 20 74 68 61 74 0a 77 72 61 70 70 65 72 20 74 6f 20 nction,.and.add.that.wrapper.to.
5a5e0 74 68 65 20 6d 6f 64 65 27 73 20 73 65 63 74 69 6f 6e 20 68 6f 6f 6b 2e 0a 0a 50 52 45 50 41 52 the.mode's.section.hook...PREPAR
5a600 45 20 69 73 20 61 20 66 75 6e 63 74 69 6f 6e 20 77 68 69 63 68 20 74 61 6b 65 73 20 6f 6e 65 20 E.is.a.function.which.takes.one.
5a620 61 72 67 75 6d 65 6e 74 73 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 65 63 74 2c arguments.the.repository.object,
5a640 0a 61 6e 64 20 6d 75 73 74 20 72 65 74 75 72 6e 20 61 20 66 69 6c 74 65 72 20 6f 62 6a 65 63 74 .and.must.return.a.filter.object
5a660 20 6f 66 20 74 79 70 65 20 60 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 27 20 6f 72 .of.type.`forge--topics-spec'.or
5a680 20 6e 69 6c 2e 0a 49 6e 73 65 72 74 20 6e 6f 20 74 6f 70 69 63 73 20 69 66 20 50 52 45 50 41 52 .nil..Insert.no.topics.if.PREPAR
5a6a0 45 20 72 65 74 75 72 6e 73 20 6e 69 6c 2c 20 6f 72 20 69 66 20 74 68 65 20 63 75 72 72 65 6e 74 E.returns.nil,.or.if.the.current
5a6c0 20 72 65 70 6f 73 69 74 6f 72 79 0a 69 73 6e 27 74 20 74 72 61 63 6b 65 64 20 6f 72 20 46 6f 72 .repository.isn't.tracked.or.For
5a6e0 67 65 20 68 61 73 6e 27 74 20 62 65 65 6e 20 66 75 6c 6c 79 20 73 65 74 75 70 20 79 65 74 20 28 ge.hasn't.been.fully.setup.yet.(
5a700 69 6e 20 74 68 65 20 6c 61 74 74 65 72 20 74 77 6f 0a 63 61 73 65 73 20 64 6f 6e 27 74 20 65 76 in.the.latter.two.cases.don't.ev
5a720 65 6e 20 63 61 6c 6c 20 50 52 45 50 41 52 45 29 2e 0a 0a 54 68 65 20 66 69 6c 74 65 72 20 6f 62 en.call.PREPARE)...The.filter.ob
5a740 6a 65 63 74 20 63 61 6e 20 62 65 20 63 72 65 61 74 65 64 20 65 69 74 68 65 72 20 75 73 69 6e 67 ject.can.be.created.either.using
5a760 20 60 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 27 20 6f 72 0a 62 79 20 60 63 6c 6f .`forge--topics-spec'.or.by.`clo
5a780 6e 65 27 69 6e 67 20 74 68 65 20 6f 62 6a 65 63 74 20 72 65 74 75 72 6e 65 64 20 62 79 20 60 66 ne'ing.the.object.returned.by.`f
5a7a0 6f 72 67 65 2d 2d 69 6e 69 74 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 27 2c 0a orge--init-buffer-topics-spec',.
5a7c0 74 6f 20 73 68 61 72 65 20 73 6f 6d 65 20 73 65 74 74 69 6e 67 73 20 77 69 74 68 20 6f 74 68 65 to.share.some.settings.with.othe
5a7e0 72 20 74 6f 70 69 63 20 6c 69 73 74 73 20 69 6e 20 74 68 65 20 73 61 6d 65 20 62 75 66 66 65 72 r.topic.lists.in.the.same.buffer
5a800 2e 0a 53 65 65 20 60 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 27 20 66 6f 72 20 74 ..See.`forge--topics-spec'.for.t
5a820 68 65 20 76 61 6c 69 64 20 73 6c 6f 74 73 20 61 6e 64 20 74 68 65 69 72 20 76 61 6c 75 65 73 2e he.valid.slots.and.their.values.
5a840 0a 0a 48 45 41 44 49 4e 47 20 69 73 20 75 73 65 64 20 61 73 20 74 68 65 20 68 65 61 64 69 6e 67 ..HEADING.is.used.as.the.heading
5a860 20 6f 66 20 74 68 65 20 6c 69 73 74 20 73 65 63 74 69 6f 6e 20 61 6e 64 20 54 59 50 45 20 69 73 .of.the.list.section.and.TYPE.is
5a880 20 75 73 65 64 20 61 73 0a 69 74 73 20 74 79 70 65 2e 20 20 54 59 50 45 20 73 68 6f 75 6c 64 20 .used.as.its.type...TYPE.should.
5a8a0 62 65 20 61 20 73 79 6d 62 6f 6c 20 6f 66 20 74 68 65 20 66 6f 72 6d 20 60 53 55 42 53 45 54 2d be.a.symbol.of.the.form.`SUBSET-
5a8c0 4b 49 4e 44 27 2c 20 77 68 65 72 65 20 4b 49 4e 44 0a 69 73 20 6f 6e 65 20 6f 66 20 60 74 6f 70 KIND',.where.KIND.is.one.of.`top
5a8e0 69 63 73 27 2c 20 60 69 73 73 75 65 73 27 20 6f 72 20 60 70 75 6c 6c 72 65 71 73 27 2c 20 61 6e ics',.`issues'.or.`pullreqs',.an
5a900 64 20 53 55 42 53 45 54 20 73 68 6f 75 6c 64 20 64 65 73 63 72 69 62 65 0a 77 68 61 74 20 73 75 d.SUBSET.should.describe.what.su
5a920 62 73 65 74 20 6f 66 20 4b 49 4e 44 20 69 73 20 62 65 69 6e 67 20 6c 69 73 74 65 64 2e 0a 0a 46 bset.of.KIND.is.being.listed...F
5a940 6f 72 20 65 78 61 6d 70 6c 65 2c 20 74 6f 20 69 6e 73 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 or.example,.to.insert.a.list.of.
5a960 69 73 73 75 65 73 20 61 73 73 69 67 6e 65 64 20 74 6f 20 79 6f 75 20 75 73 65 20 73 6f 6d 65 74 issues.assigned.to.you.use.somet
5a980 68 69 6e 67 0a 6c 69 6b 65 3a 0a 0a 20 20 28 64 65 66 75 6e 20 6d 79 2d 66 6f 72 67 65 2d 69 6e hing.like:....(defun.my-forge-in
5a9a0 73 65 72 74 2d 61 73 73 69 67 6e 65 64 2d 69 73 73 75 65 73 20 28 29 0a 20 20 20 20 5c 22 49 6e sert-assigned-issues.().....\"In
5a9c0 73 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 69 73 73 75 65 73 20 74 68 61 74 20 61 72 65 20 61 sert.a.list.of.issues.that.are.a
5a9e0 73 73 69 67 6e 65 64 20 74 6f 20 6d 65 2e 5c 22 0a 20 20 20 20 28 66 6f 72 67 65 2d 69 6e 73 65 ssigned.to.me.\".....(forge-inse
5aa00 72 74 2d 74 6f 70 69 63 73 20 5c 5c 3d 27 61 73 73 69 67 6e 65 64 2d 69 73 73 75 65 73 20 5c 22 rt-topics.\\='assigned-issues.\"
5aa20 41 73 73 69 67 6e 65 64 20 69 73 73 75 65 73 5c 22 0a 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 Assigned.issues\".......(lambda.
5aa40 28 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 6d 65 20 28 67 (repo).........(and-let*.((me.(g
5aa60 68 75 62 2d 2d 75 73 65 72 6e 61 6d 65 20 72 65 70 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 hub--username.repo)))...........
5aa80 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 3a 74 79 70 65 20 5c 5c 3d 27 69 73 (forge--topics-spec.:type.\\='is
5aaa0 73 75 65 20 3a 61 63 74 69 76 65 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sue.:active.t...................
5aac0 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 73 73 69 67 6e 65 65 20 6d 65 29 29 29 29 29 0a 0a 20 ............:assignee.me)))))...
5aae0 20 28 6d 61 67 69 74 2d 61 64 64 2d 73 65 63 74 69 6f 6e 2d 68 6f 6f 6b 20 5c 5c 3d 27 6d 61 67 .(magit-add-section-hook.\\='mag
5ab00 69 74 2d 73 74 61 74 75 73 2d 73 65 63 74 69 6f 6e 73 2d 68 6f 6f 6b 0a 20 20 20 20 20 20 20 20 it-status-sections-hook.........
5ab20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 5c 5c 3d 27 6d 79 2d 66 6f 72 67 65 2d ..................#\\='my-forge-
5ab40 69 6e 73 65 72 74 2d 61 73 73 69 67 6e 65 64 2d 69 73 73 75 65 73 0a 20 20 20 20 20 20 20 20 20 insert-assigned-issues..........
5ab60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 5c 5c 3d 27 66 6f 72 67 65 2d 69 6e 73 65 .................#\\='forge-inse
5ab80 72 74 2d 69 73 73 75 65 73 29 0a 0a 47 72 65 70 20 46 6f 72 67 65 20 66 6f 72 20 6d 6f 72 65 20 rt-issues)..Grep.Forge.for.more.
5aba0 65 78 61 6d 70 6c 65 73 2e 0a 0a 41 6c 74 65 72 6e 61 74 69 76 65 6c 79 20 79 6f 75 20 63 61 6e examples...Alternatively.you.can
5abc0 20 75 73 65 20 60 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 73 65 74 75 70 2d 62 75 66 66 65 72 27 .use.`forge-topics-setup-buffer'
5abe0 20 74 6f 20 6c 69 73 74 20 61 20 73 65 74 0a 6f 66 20 74 6f 70 69 63 73 20 69 6e 20 61 20 64 65 .to.list.a.set.of.topics.in.a.de
5ac00 64 69 63 61 74 65 64 20 62 75 66 66 65 72 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 dicated.buffer."...(declare.(ind
5ac20 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 5f 28 66 6f 72 ent.defun))...(when-let*.((_(for
5ac40 67 65 2d 64 62 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 66 ge-db.t))...............(repo.(f
5ac60 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 29 0a orge-get-repository.:tracked?)).
5ac80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 70 65 63 20 28 66 75 6e 63 61 6c 6c 20 70 72 65 ..............(spec.(funcall.pre
5aca0 70 61 72 65 20 72 65 70 6f 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d pare.repo))).....(forge--insert-
5acc0 74 6f 70 69 63 73 20 74 79 70 65 20 68 65 61 64 69 6e 67 20 28 66 6f 72 67 65 2d 2d 6c 69 73 74 topics.type.heading.(forge--list
5ace0 2d 74 6f 70 69 63 73 20 73 70 65 63 20 72 65 70 6f 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f -topics.spec.repo))))..(defun.fo
5ad00 72 67 65 2d 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 73 20 28 74 79 70 65 20 68 65 61 64 69 6e 67 rge--insert-topics.(type.heading
5ad20 20 74 6f 70 69 63 73 29 0a 20 20 28 77 68 65 6e 20 74 6f 70 69 63 73 0a 20 20 20 20 28 6c 65 74 .topics)...(when.topics.....(let
5ad40 20 28 28 77 69 64 74 68 20 28 61 70 70 6c 79 20 23 27 6d 61 78 20 28 6d 61 70 63 61 72 20 28 23 .((width.(apply.#'max.(mapcar.(#
5ad60 23 6c 65 6e 67 74 68 20 28 6f 72 65 66 20 25 20 73 6c 75 67 29 29 20 74 6f 70 69 63 73 29 29 29 #length.(oref.%.slug)).topics)))
5ad80 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 20 28 28 ).......(magit-insert-section.((
5ada0 65 76 61 6c 20 74 79 70 65 29 20 68 65 61 64 69 6e 67 20 74 29 0a 20 20 20 20 20 20 20 20 28 6d eval.type).heading.t).........(m
5adc0 61 67 69 74 2d 69 6e 73 65 72 74 2d 68 65 61 64 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 28 63 agit-insert-heading...........(c
5ade0 6f 6e 63 61 74 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 20 28 63 oncat.(magit--propertize-face.(c
5ae00 6f 6e 63 61 74 20 68 65 61 64 69 6e 67 20 22 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 oncat.heading.".")..............
5ae20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6d 61 .............................'ma
5ae40 67 69 74 2d 73 65 63 74 69 6f 6e 2d 68 65 61 64 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 git-section-heading)............
5ae60 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 20 28 .......(magit--propertize-face.(
5ae80 66 6f 72 6d 61 74 20 22 28 25 73 29 22 20 28 6c 65 6e 67 74 68 20 74 6f 70 69 63 73 29 29 0a 20 format."(%s)".(length.topics))..
5aea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5aec0 20 20 20 20 20 20 20 20 20 27 6d 61 67 69 74 2d 73 65 63 74 69 6f 6e 2d 63 68 69 6c 64 2d 63 6f .........'magit-section-child-co
5aee0 75 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 unt))).........(magit-insert-sec
5af00 74 69 6f 6e 2d 62 6f 64 79 0a 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 74 6f 70 tion-body...........(dolist.(top
5af20 69 63 20 74 6f 70 69 63 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 69 ic.topics).............(forge--i
5af40 6e 73 65 72 74 2d 74 6f 70 69 63 20 74 6f 70 69 63 20 77 69 64 74 68 29 29 0a 20 20 20 20 20 20 nsert-topic.topic.width)).......
5af60 20 20 20 20 28 69 6e 73 65 72 74 20 3f 5c 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 ....(insert.?\n)...........(magi
5af80 74 2d 6d 61 6b 65 2d 6d 61 72 67 69 6e 2d 6f 76 65 72 6c 61 79 20 6e 69 6c 20 74 29 29 29 29 29 t-make-margin-overlay.nil.t)))))
5afa0 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 20 28 74 )..(defun.forge--insert-topic.(t
5afc0 6f 70 69 63 20 26 6f 70 74 69 6f 6e 61 6c 20 77 69 64 74 68 29 0a 20 20 28 6d 61 67 69 74 2d 69 opic.&optional.width)...(magit-i
5afe0 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 20 28 28 65 76 61 6c 20 28 6f 72 65 66 20 74 6f 70 69 63 nsert-section.((eval.(oref.topic
5b000 20 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 29 29 20 74 6f 70 69 63 20 74 29 0a 20 20 20 20 28 69 6e .closql-table)).topic.t).....(in
5b020 73 65 72 74 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 6c 69 6e 65 20 74 sert.(forge--format-topic-line.t
5b040 6f 70 69 63 20 28 6f 72 20 77 69 64 74 68 20 35 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d opic.(or.width.5))).....(forge--
5b060 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 6d 61 72 6b 73 20 74 6f 70 69 63 20 74 29 0a 20 20 20 20 insert-topic-marks.topic.t).....
5b080 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 73 20 74 6f 70 69 (forge--insert-topic-labels.topi
5b0a0 63 20 74 29 0a 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 22 29 0a 20 20 20 20 28 6d 61 67 69 c.t).....(insert."\n").....(magi
5b0c0 74 2d 6c 6f 67 2d 66 6f 72 6d 61 74 2d 61 75 74 68 6f 72 2d 6d 61 72 67 69 6e 0a 20 20 20 20 20 t-log-format-author-margin......
5b0e0 28 6f 72 65 66 20 74 6f 70 69 63 20 61 75 74 68 6f 72 29 0a 20 20 20 20 20 28 66 6f 72 6d 61 74 (oref.topic.author)......(format
5b100 2d 74 69 6d 65 2d 73 74 72 69 6e 67 20 22 25 73 22 20 28 70 61 72 73 65 2d 69 73 6f 38 36 30 31 -time-string."%s".(parse-iso8601
5b120 2d 74 69 6d 65 2d 73 74 72 69 6e 67 20 28 6f 72 65 66 20 74 6f 70 69 63 20 63 72 65 61 74 65 64 -time-string.(oref.topic.created
5b140 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 73 6c 6f 74 2d 65 78 69 73 74 73 )))).....(when.(and.(slot-exists
5b160 2d 70 20 74 6f 70 69 63 20 27 6d 65 72 67 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -p.topic.'merged)...............
5b180 20 28 6e 6f 74 20 28 6f 72 65 66 20 74 6f 70 69 63 20 6d 65 72 67 65 64 29 29 29 0a 20 20 20 20 .(not.(oref.topic.merged))).....
5b1a0 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 68 65 61 64 69 6e 67 29 0a 20 20 20 20 20 20 28 ..(magit-insert-heading).......(
5b1c0 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 2d 62 6f 64 79 0a 20 20 20 20 20 20 magit-insert-section-body.......
5b1e0 20 20 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 70 75 6c 6c 72 65 71 2d 63 6f 6d 6d 69 74 73 ..(forge--insert-pullreq-commits
5b200 20 74 6f 70 69 63 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 69 6e 73 65 72 .topic)))))..(defun.forge--inser
5b220 74 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 73 20 28 74 6f 70 69 63 20 26 6f 70 74 69 6f 6e 61 6c 20 t-topic-labels.(topic.&optional.
5b240 73 65 70 61 72 61 74 65 29 0a 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 6c 61 62 65 6c 73 20 28 6f separate)...(and-let.((labels.(o
5b260 72 65 66 20 74 6f 70 69 63 20 6c 61 62 65 6c 73 29 29 29 0a 20 20 20 20 28 70 72 6f 67 31 20 74 ref.topic.labels))).....(prog1.t
5b280 0a 20 20 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 5f 69 64 20 2c 6e 61 .......(pcase-dolist.(`(,_id.,na
5b2a0 6d 65 20 2c 63 6f 6c 6f 72 20 2c 64 65 73 63 72 69 70 74 69 6f 6e 29 20 6c 61 62 65 6c 73 29 0a me.,color.,description).labels).
5b2c0 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 62 61 63 6b 67 72 6f 75 6e 64 20 28 66 6f 72 67 ........(let*.((background.(forg
5b2e0 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 63 6f 6c 6f 72 20 63 6f 6c 6f 72 29 29 0a 20 20 20 20 20 20 e--sanitize-color.color)).......
5b300 20 20 20 20 20 20 20 20 20 28 66 6f 72 65 67 72 6f 75 6e 64 20 28 72 65 61 64 61 62 6c 65 2d 66 .........(foreground.(readable-f
5b320 6f 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 62 61 63 6b 67 72 6f 75 6e 64 29 29 29 0a 20 20 oreground-color.background)))...
5b340 20 20 20 20 20 20 20 20 28 69 66 20 73 65 70 61 72 61 74 65 20 28 69 6e 73 65 72 74 20 22 20 22 ........(if.separate.(insert."."
5b360 29 20 28 73 65 74 71 20 73 65 70 61 72 61 74 65 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 ).(setq.separate.t))...........(
5b380 69 6e 73 65 72 74 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6f 20 insert.name)...........(let.((o.
5b3a0 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 28 2d 20 28 70 6f 69 6e 74 29 20 28 6c 65 6e 67 74 68 (make-overlay.(-.(point).(length
5b3c0 20 6e 61 6d 65 29 29 20 28 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 .name)).(point)))).............(
5b3e0 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 20 27 70 72 69 6f 72 69 74 79 20 32 29 0a 20 20 20 20 20 overlay-put.o.'priority.2)......
5b400 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 20 27 65 76 61 70 6f 72 61 74 65 .......(overlay-put.o.'evaporate
5b420 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 20 27 .t).............(overlay-put.o.'
5b440 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 font-lock-face..................
5b460 20 20 20 20 20 20 20 20 60 28 28 20 3a 62 61 63 6b 67 72 6f 75 6e 64 20 2c 62 61 63 6b 67 72 6f ........`((.:background.,backgro
5b480 75 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 und.............................
5b4a0 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 2c 66 6f 72 65 67 72 6f 75 6e 64 29 0a 20 20 20 20 20 20 .:foreground.,foreground).......
5b4c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 74 6f 70 69 63 .....................forge-topic
5b4e0 2d 6c 61 62 65 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 64 65 73 63 72 -label)).............(when.descr
5b500 69 70 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 iption...............(overlay-pu
5b520 74 20 6f 20 27 68 65 6c 70 2d 65 63 68 6f 20 64 65 73 63 72 69 70 74 69 6f 6e 29 29 29 29 29 29 t.o.'help-echo.description))))))
5b540 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 6d ))..(defun.forge--insert-topic-m
5b560 61 72 6b 73 20 28 74 6f 70 69 63 20 26 6f 70 74 69 6f 6e 61 6c 20 73 65 70 61 72 61 74 65 29 0a arks.(topic.&optional.separate).
5b580 20 20 28 61 6e 64 2d 6c 65 74 20 28 28 6d 61 72 6b 73 20 28 6f 72 65 66 20 74 6f 70 69 63 20 6d ..(and-let.((marks.(oref.topic.m
5b5a0 61 72 6b 73 29 29 29 0a 20 20 20 20 28 70 72 6f 67 31 20 74 0a 20 20 20 20 20 20 28 70 63 61 73 arks))).....(prog1.t.......(pcas
5b5c0 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 5f 69 64 20 2c 6e 61 6d 65 20 2c 66 61 63 65 20 2c 64 65 e-dolist.(`(,_id.,name.,face.,de
5b5e0 73 63 72 69 70 74 69 6f 6e 29 20 6d 61 72 6b 73 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 73 65 scription).marks).........(if.se
5b600 70 61 72 61 74 65 20 28 69 6e 73 65 72 74 20 22 20 22 29 20 28 73 65 74 71 20 73 65 70 61 72 61 parate.(insert.".").(setq.separa
5b620 74 65 20 74 29 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 6e 61 6d 65 29 0a 20 20 20 te.t)).........(insert.name)....
5b640 20 20 20 20 20 28 6c 65 74 20 28 28 6f 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 28 2d 20 28 .....(let.((o.(make-overlay.(-.(
5b660 70 6f 69 6e 74 29 20 28 6c 65 6e 67 74 68 20 6e 61 6d 65 29 29 20 28 70 6f 69 6e 74 29 29 29 29 point).(length.name)).(point))))
5b680 0a 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 20 27 70 72 69 6f 72 ...........(overlay-put.o.'prior
5b6a0 69 74 79 20 32 29 0a 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 20 ity.2)...........(overlay-put.o.
5b6c0 27 65 76 61 70 6f 72 61 74 65 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 'evaporate.t)...........(overlay
5b6e0 2d 70 75 74 20 6f 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 20 28 6c 69 73 74 20 66 61 63 -put.o.'font-lock-face.(list.fac
5b700 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 29 29 0a 20 20 20 20 20 20 20 20 20 e.'forge-topic-label))..........
5b720 20 28 77 68 65 6e 20 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 .(when.description.............(
5b740 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 20 27 68 65 6c 70 2d 65 63 68 6f 20 64 65 73 63 72 69 70 overlay-put.o.'help-echo.descrip
5b760 74 69 6f 6e 29 29 29 29 29 29 29 0a 0a 3b 3b 3b 20 4d 6f 64 65 73 0a 0a 28 64 65 66 76 61 72 2d tion)))))))..;;;.Modes..(defvar-
5b780 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 63 6f 6d 6d 6f 6e 2d 6d 61 70 0a 20 20 3a 64 6f 63 20 22 keymap.forge-common-map...:doc."
5b7a0 50 61 72 65 6e 74 20 6b 65 79 6d 61 70 20 6f 66 20 6d 61 6e 79 20 6f 66 20 46 6f 72 67 65 27 73 Parent.keymap.of.many.of.Forge's
5b7c0 20 6b 65 79 6d 61 70 73 2e 0a 4b 65 79 6d 61 70 73 20 74 68 61 74 20 75 73 65 20 74 68 69 73 20 .keymaps..Keymaps.that.use.this.
5b7e0 6b 65 79 6d 61 70 20 61 73 20 74 68 65 2f 61 20 70 61 72 65 6e 74 20 6b 65 79 6d 61 70 2c 20 72 keymap.as.the/a.parent.keymap,.r
5b800 65 6d 61 70 20 74 68 65 0a 70 6c 61 63 65 2d 68 6f 6c 64 65 72 20 63 6f 6d 6d 61 6e 64 73 20 60 emap.the.place-holder.commands.`
5b820 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 6d 65 6e 75 27 20 61 6e 64 2f 6f 72 20 60 66 6f 72 67 65 2d forge--list-menu'.and/or.`forge-
5b840 2d 69 74 65 6d 2d 6d 65 6e 75 27 0a 74 6f 20 74 68 65 20 61 70 70 72 6f 70 72 69 61 74 65 20 6d -item-menu'.to.the.appropriate.m
5b860 65 6e 75 20 63 6f 6d 6d 61 6e 64 2e 20 20 54 6f 20 63 68 61 6e 67 65 20 74 68 65 20 6b 65 79 73 enu.command...To.change.the.keys
5b880 20 62 6f 75 6e 64 20 74 6f 20 6d 65 6e 75 0a 63 6f 6d 6d 61 6e 64 73 20 69 6e 20 61 6c 6c 20 46 .bound.to.menu.commands.in.all.F
5b8a0 6f 72 67 65 20 6b 65 79 6d 61 70 73 2c 20 6f 6e 65 20 6f 6e 6c 79 20 68 61 73 20 74 6f 20 63 68 orge.keymaps,.one.only.has.to.ch
5b8c0 61 6e 67 65 20 74 68 65 6d 20 68 65 72 65 2e 22 0a 20 20 22 43 2d 63 20 43 2d 63 22 20 20 20 20 ange.them.here."..."C-c.C-c"....
5b8e0 23 27 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 6d 65 6e 75 0a 20 20 22 43 2d 63 20 52 45 54 22 20 20 #'forge--list-menu..."C-c.RET"..
5b900 20 20 23 27 66 6f 72 67 65 2d 2d 69 74 65 6d 2d 6d 65 6e 75 0a 20 20 22 43 2d 3c 72 65 74 75 72 ..#'forge--item-menu..."C-<retur
5b920 6e 3e 22 20 23 27 66 6f 72 67 65 2d 2d 69 74 65 6d 2d 6d 65 6e 75 29 0a 0a 28 64 65 66 75 6e 20 n>".#'forge--item-menu)..(defun.
5b940 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 6d 65 6e 75 20 28 29 0a 20 20 22 50 6c 61 63 65 2d 68 6f 6c forge--list-menu.()..."Place-hol
5b960 64 65 72 20 6d 65 6e 75 20 63 6f 6d 6d 61 6e 64 2e 20 20 53 65 65 20 60 66 6f 72 67 65 2d 63 6f der.menu.command...See.`forge-co
5b980 6d 6d 6f 6e 2d 6d 61 70 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6d mmon-map'."...(interactive)...(m
5b9a0 65 73 73 61 67 65 20 22 4e 6f 20 6c 69 73 74 20 6d 65 6e 75 20 61 76 61 69 6c 61 62 6c 65 20 68 essage."No.list.menu.available.h
5b9c0 65 72 65 22 29 29 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 6d 65 6e 75 20 27 63 ere")).(put.'forge--list-menu.'c
5b9e0 6f 6d 70 6c 65 74 69 6f 6e 2d 70 72 65 64 69 63 61 74 65 20 23 27 69 67 6e 6f 72 65 29 0a 0a 28 ompletion-predicate.#'ignore)..(
5ba00 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 69 74 65 6d 2d 6d 65 6e 75 20 28 29 0a 20 20 22 50 6c 61 defun.forge--item-menu.()..."Pla
5ba20 63 65 2d 68 6f 6c 64 65 72 20 6d 65 6e 75 20 63 6f 6d 6d 61 6e 64 2e 20 20 53 65 65 20 60 66 6f ce-holder.menu.command...See.`fo
5ba40 72 67 65 2d 63 6f 6d 6d 6f 6e 2d 6d 61 70 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 rge-common-map'."...(interactive
5ba60 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 4e 6f 20 69 74 65 6d 20 6d 65 6e 75 20 61 76 61 69 6c )...(message."No.item.menu.avail
5ba80 61 62 6c 65 20 68 65 72 65 22 29 29 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 2d 69 74 65 6d 2d 6d able.here")).(put.'forge--item-m
5baa0 65 6e 75 20 27 63 6f 6d 70 6c 65 74 69 6f 6e 2d 70 72 65 64 69 63 61 74 65 20 23 27 69 67 6e 6f enu.'completion-predicate.#'igno
5bac0 72 65 29 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 70 6f 73 74 2d 73 re)..(defvar-keymap.forge-post-s
5bae0 65 63 74 69 6f 6e 2d 6d 61 70 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 69 74 2d 65 64 69 ection-map..."<remap>.<magit-edi
5bb00 74 2d 74 68 69 6e 67 3e 22 20 20 20 23 27 66 6f 72 67 65 2d 65 64 69 74 2d 70 6f 73 74 0a 20 20 t-thing>"...#'forge-edit-post...
5bb20 22 43 2d 63 20 43 2d 6b 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 "C-c.C-k"......................#
5bb40 27 66 6f 72 67 65 2d 64 65 6c 65 74 65 2d 63 6f 6d 6d 65 6e 74 29 0a 0a 28 64 65 66 76 61 72 2d 'forge-delete-comment)..(defvar-
5bb60 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 3a 70 keymap.forge-topic-mode-map...:p
5bb80 61 72 65 6e 74 20 28 6d 61 6b 65 2d 63 6f 6d 70 6f 73 65 64 2d 6b 65 79 6d 61 70 20 66 6f 72 67 arent.(make-composed-keymap.forg
5bba0 65 2d 63 6f 6d 6d 6f 6e 2d 6d 61 70 20 6d 61 67 69 74 2d 6d 6f 64 65 2d 6d 61 70 29 0a 20 20 22 e-common-map.magit-mode-map)..."
5bbc0 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 69 74 2d 76 69 73 69 74 2d 74 68 69 6e 67 3e 22 20 20 23 27 <remap>.<magit-visit-thing>"..#'
5bbe0 6d 61 72 6b 64 6f 77 6e 2d 66 6f 6c 6c 6f 77 2d 6c 69 6e 6b 2d 61 74 2d 70 6f 69 6e 74 0a 20 20 markdown-follow-link-at-point...
5bc00 22 3c 6d 6f 75 73 65 2d 32 3e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 "<mouse-2>"....................#
5bc20 27 6d 61 72 6b 64 6f 77 6e 2d 66 6f 6c 6c 6f 77 2d 6c 69 6e 6b 2d 61 74 2d 70 6f 69 6e 74 0a 20 'markdown-follow-link-at-point..
5bc40 20 22 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 69 74 65 6d 2d 6d 65 6e 75 3e 22 20 20 20 ."<remap>.<forge--item-menu>"...
5bc60 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 66 #'forge-topic-menu..."<remap>.<f
5bc80 6f 72 67 65 2d 2d 6c 69 73 74 2d 6d 65 6e 75 3e 22 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 orge--list-menu>"...#'forge-topi
5bca0 63 2d 6d 65 6e 75 0a 20 20 22 43 2d 63 20 43 2d 6e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c-menu..."C-c.C-n"..............
5bcc0 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 6f 73 74 0a 20 20 22 43 ........#'forge-create-post..."C
5bce0 2d 63 20 43 2d 72 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 -c.C-r"......................#'f
5bd00 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 6f 73 74 29 0a 0a 28 64 65 66 69 6e 65 2d 64 65 72 69 76 orge-create-post)..(define-deriv
5bd20 65 64 2d 6d 6f 64 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 20 6d 61 67 69 74 2d 6d ed-mode.forge-topic-mode.magit-m
5bd40 6f 64 65 20 22 54 6f 70 69 63 22 0a 20 20 22 50 61 72 65 6e 74 20 6d 61 6a 6f 72 20 6d 6f 64 65 ode."Topic"..."Parent.major.mode
5bd60 20 6f 66 20 60 66 6f 72 67 65 2d 7b 69 73 73 75 65 2c 70 75 6c 6c 72 65 71 7d 2d 6d 6f 64 65 27 .of.`forge-{issue,pullreq}-mode'
5bd80 2e 0a 54 68 69 73 20 6d 6f 64 65 20 69 74 73 65 6c 66 20 69 73 20 6e 65 76 65 72 20 75 73 65 64 ..This.mode.itself.is.never.used
5bda0 20 64 69 72 65 63 74 6c 79 2e 22 0a 20 20 3a 69 6e 74 65 72 61 63 74 69 76 65 20 6e 69 6c 0a 20 .directly."...:interactive.nil..
5bdc0 20 28 66 61 63 65 2d 72 65 6d 61 70 2d 61 64 64 2d 72 65 6c 61 74 69 76 65 20 27 68 65 61 64 65 .(face-remap-add-relative.'heade
5bde0 72 2d 6c 69 6e 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 68 65 61 64 65 72 2d 6c 69 6e 65 29 r-line.'forge-topic-header-line)
5be00 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 6d 61 72 6b 64 6f 77 6e 2d 74 72 61 6e 73 6c 61 74 ...(setq-local.markdown-translat
5be20 65 2d 66 69 6c 65 6e 61 6d 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 e-filename-function.............
5be40 20 20 23 27 66 6f 72 67 65 2d 2d 6d 61 72 6b 64 6f 77 6e 2d 74 72 61 6e 73 6c 61 74 65 2d 66 69 ..#'forge--markdown-translate-fi
5be60 6c 65 6e 61 6d 65 2d 66 75 6e 63 74 69 6f 6e 29 29 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 lename-function))..(defvar-keyma
5be80 70 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 6d 6f 64 65 2d 6d 61 70 20 3a 70 61 72 p.forge-discussion-mode-map.:par
5bea0 65 6e 74 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 2d 6d 61 70 29 0a 28 64 65 66 69 6e ent.forge-topic-mode-map).(defin
5bec0 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d e-derived-mode.forge-discussion-
5bee0 6d 6f 64 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 20 22 44 69 73 63 75 73 73 69 6f mode.forge-topic-mode."Discussio
5bf00 6e 22 0a 20 20 22 4d 6f 64 65 20 66 6f 72 20 6c 6f 6f 6b 69 6e 67 20 61 74 20 61 20 46 6f 72 67 n"..."Mode.for.looking.at.a.Forg
5bf20 65 20 64 69 73 63 75 73 73 69 6f 6e 2e 22 29 0a 28 64 65 66 61 6c 69 61 73 20 27 66 6f 72 67 65 e.discussion.").(defalias.'forge
5bf40 2d 64 69 73 63 75 73 73 69 6f 6e 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 20 20 23 27 66 6f 72 -discussion-setup-buffer...#'for
5bf60 67 65 2d 74 6f 70 69 63 2d 73 65 74 75 70 2d 62 75 66 66 65 72 29 0a 28 64 65 66 61 6c 69 61 73 ge-topic-setup-buffer).(defalias
5bf80 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 .'forge-discussion-refresh-buffe
5bfa0 72 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 0a r.#'forge-topic-refresh-buffer).
5bfc0 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 68 65 61 64 65 72 73 (defvar.forge-discussion-headers
5bfe0 2d 68 6f 6f 6b 0a 20 20 27 28 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 73 74 61 -hook...'(forge-insert-topic-sta
5c000 74 65 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 73 74 61 74 75 73 te.....forge-insert-topic-status
5c020 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 63 61 74 65 67 6f 72 79 .....forge-insert-topic-category
5c040 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 73 0a 20 .....forge-insert-topic-labels..
5c060 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 6d 61 72 6b 73 29 29 0a 0a 28 ...forge-insert-topic-marks))..(
5c080 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 6d 6f 64 65 2d 6d defvar-keymap.forge-issue-mode-m
5c0a0 61 70 20 3a 70 61 72 65 6e 74 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 2d 6d 61 70 29 ap.:parent.forge-topic-mode-map)
5c0c0 0a 28 64 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 66 6f 72 67 65 2d 69 73 73 75 .(define-derived-mode.forge-issu
5c0e0 65 2d 6d 6f 64 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 20 22 49 73 73 75 65 22 0a e-mode.forge-topic-mode."Issue".
5c100 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 6c 6f 6f 6b 69 6e 67 20 61 74 20 61 20 46 .."Major.mode.for.looking.at.a.F
5c120 6f 72 67 65 20 69 73 73 75 65 2e 22 0a 20 20 3a 69 6e 74 65 72 61 63 74 69 76 65 20 6e 69 6c 29 orge.issue."...:interactive.nil)
5c140 0a 28 64 65 66 61 6c 69 61 73 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 73 65 74 75 70 2d 62 75 .(defalias.'forge-issue-setup-bu
5c160 66 66 65 72 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 75 70 2d 62 75 66 66 65 ffer...#'forge-topic-setup-buffe
5c180 72 29 0a 28 64 65 66 61 6c 69 61 73 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 72 65 66 72 65 73 r).(defalias.'forge-issue-refres
5c1a0 68 2d 62 75 66 66 65 72 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 72 65 66 72 65 73 68 2d 62 h-buffer.#'forge-topic-refresh-b
5c1c0 75 66 66 65 72 29 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 68 65 61 64 65 uffer).(defvar.forge-issue-heade
5c1e0 72 73 2d 68 6f 6f 6b 0a 20 20 27 28 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 73 rs-hook...'(forge-insert-topic-s
5c200 74 61 74 65 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 73 74 61 74 tate.....forge-insert-topic-stat
5c220 75 73 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 6d 69 6c 65 73 74 us.....forge-insert-topic-milest
5c240 6f 6e 65 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 6c 61 62 65 6c one.....forge-insert-topic-label
5c260 73 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 6d 61 72 6b 73 0a 20 s.....forge-insert-topic-marks..
5c280 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 61 73 73 69 67 6e 65 65 73 29 ...forge-insert-topic-assignees)
5c2a0 29 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d )..(defvar-keymap.forge-pullreq-
5c2c0 6d 6f 64 65 2d 6d 61 70 20 3a 70 61 72 65 6e 74 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 mode-map.:parent.forge-topic-mod
5c2e0 65 2d 6d 61 70 29 0a 28 64 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 66 6f 72 67 e-map).(define-derived-mode.forg
5c300 65 2d 70 75 6c 6c 72 65 71 2d 6d 6f 64 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 20 e-pullreq-mode.forge-topic-mode.
5c320 22 50 75 6c 6c 2d 72 65 71 75 65 73 74 22 0a 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 "Pull-request"..."Major.mode.for
5c340 20 6c 6f 6f 6b 69 6e 67 20 61 74 20 61 20 46 6f 72 67 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 .looking.at.a.Forge.pull-request
5c360 2e 22 0a 20 20 3a 69 6e 74 65 72 61 63 74 69 76 65 20 6e 69 6c 29 0a 28 64 65 66 61 6c 69 61 73 ."...:interactive.nil).(defalias
5c380 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 20 20 23 .'forge-pullreq-setup-buffer...#
5c3a0 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 75 70 2d 62 75 66 66 65 72 29 0a 28 64 65 66 61 'forge-topic-setup-buffer).(defa
5c3c0 6c 69 61 73 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 72 65 66 72 65 73 68 2d 62 75 66 66 lias.'forge-pullreq-refresh-buff
5c3e0 65 72 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 er.#'forge-topic-refresh-buffer)
5c400 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 68 65 61 64 65 72 73 2d 68 .(defvar.forge-pullreq-headers-h
5c420 6f 6f 6b 0a 20 20 27 28 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 73 74 61 74 65 ook...'(forge-insert-topic-state
5c440 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 64 72 61 66 74 0a 20 20 .....forge-insert-topic-draft...
5c460 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 73 74 61 74 75 73 0a 20 20 20 20 ..forge-insert-topic-status.....
5c480 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 73 61 76 65 64 0a 20 20 20 20 66 6f 72 forge-insert-topic-saved.....for
5c4a0 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 72 65 66 73 0a 20 20 20 20 66 6f 72 67 65 2d 69 ge-insert-topic-refs.....forge-i
5c4c0 6e 73 65 72 74 2d 74 6f 70 69 63 2d 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 20 20 66 6f 72 67 65 2d nsert-topic-milestone.....forge-
5c4e0 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 73 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e insert-topic-labels.....forge-in
5c500 73 65 72 74 2d 74 6f 70 69 63 2d 6d 61 72 6b 73 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 sert-topic-marks.....forge-inser
5c520 74 2d 74 6f 70 69 63 2d 61 73 73 69 67 6e 65 65 73 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 t-topic-assignees.....forge-inse
5c540 72 74 2d 74 6f 70 69 63 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 29 29 0a 0a 28 64 65 66 rt-topic-review-requests))..(def
5c560 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 20 6e 69 6c var-local.forge-buffer-topic.nil
5c580 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 75 70 2d 62 75 66 66 )..(defun.forge-topic-setup-buff
5c5a0 65 72 20 28 74 6f 70 69 63 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 er.(topic)...(let*.((repo.(forge
5c5c0 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 70 69 63 29 29 0a 20 20 20 20 20 20 20 20 -get-repository.topic)).........
5c5e0 20 28 6e 61 6d 65 20 28 66 6f 72 6d 61 74 20 22 2a 66 6f 72 67 65 3a 20 25 73 20 25 73 2a 22 20 .(name.(format."*forge:.%s.%s*".
5c600 28 6f 72 65 66 20 72 65 70 6f 20 73 6c 75 67 29 20 28 6f 72 65 66 20 74 6f 70 69 63 20 73 6c 75 (oref.repo.slug).(oref.topic.slu
5c620 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 65 6e 65 72 61 74 65 2d 62 75 g)))..........(magit-generate-bu
5c640 66 66 65 72 2d 6e 61 6d 65 2d 66 75 6e 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 5f 6d 6f 64 ffer-name-function.(lambda.(_mod
5c660 65 20 5f 76 61 6c 75 65 29 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 6f 64 65 20 e._value).name))..........(mode.
5c680 28 70 63 61 73 65 2d 65 78 68 61 75 73 74 69 76 65 20 28 65 69 65 69 6f 2d 6f 62 6a 65 63 74 2d (pcase-exhaustive.(eieio-object-
5c6a0 63 6c 61 73 73 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 class.topic)..................('
5c6c0 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 20 23 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 forge-discussion.#'forge-discuss
5c6e0 69 6f 6e 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 66 6f 72 ion-mode)..................('for
5c700 67 65 2d 69 73 73 75 65 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 6d 6f 64 65 ge-issue......#'forge-issue-mode
5c720 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 66 6f 72 67 65 2d 70 75 6c 6c 72 )..................('forge-pullr
5c740 65 71 20 20 20 20 23 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 6d 6f 64 65 29 29 29 0a 20 20 eq....#'forge-pullreq-mode)))...
5c760 20 20 20 20 20 20 20 28 62 75 66 66 65 72 20 28 6d 61 67 69 74 2d 73 65 74 75 70 2d 62 75 66 66 .......(buffer.(magit-setup-buff
5c780 65 72 20 6d 6f 64 65 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 75 er.mode.t....................:bu
5c7a0 66 66 65 72 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 69 ffer.name....................:di
5c7c0 72 65 63 74 6f 72 79 20 28 6f 72 20 28 66 6f 72 67 65 2d 67 65 74 2d 77 6f 72 6b 74 72 65 65 20 rectory.(or.(forge-get-worktree.
5c7e0 72 65 70 6f 29 20 22 2f 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 repo)."/")....................(f
5c800 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 20 74 6f 70 69 63 29 29 29 29 0a 20 20 20 20 orge-buffer-topic.topic)))).....
5c820 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 61 72 6b 2d 72 65 61 64 20 74 6f 70 69 63 29 0a 20 20 (forge-topic-mark-read.topic)...
5c840 20 20 62 75 66 66 65 72 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 72 ..buffer))..(defun.forge-topic-r
5c860 65 66 72 65 73 68 2d 62 75 66 66 65 72 20 28 29 0a 20 20 28 6c 65 74 20 28 28 74 6f 70 69 63 20 efresh-buffer.()...(let.((topic.
5c880 28 63 6c 6f 73 71 6c 2d 72 65 6c 6f 61 64 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 (closql-reload.forge-buffer-topi
5c8a0 63 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 c))).....(setq.forge-buffer-topi
5c8c0 63 20 74 6f 70 69 63 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 73 65 74 2d 68 65 61 64 65 72 2d 6c c.topic).....(magit-set-header-l
5c8e0 69 6e 65 2d 66 6f 72 6d 61 74 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d ine-format.(forge--format-topic-
5c900 6c 69 6e 65 20 74 6f 70 69 63 29 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 line.topic)).....(magit-insert-s
5c920 65 63 74 69 6f 6e 20 28 74 6f 70 69 63 62 75 66 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 ection.(topicbuf).......(magit-i
5c940 6e 73 65 72 74 2d 68 65 61 64 65 72 73 0a 20 20 20 20 20 20 20 28 70 63 61 73 65 20 6d 61 6a 6f nsert-headers........(pcase.majo
5c960 72 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 28 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 r-mode..........('forge-discussi
5c980 6f 6e 2d 6d 6f 64 65 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 68 65 61 64 65 72 on-mode.'forge-discussion-header
5c9a0 73 2d 68 6f 6f 6b 29 0a 20 20 20 20 20 20 20 20 20 28 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 6d s-hook)..........('forge-issue-m
5c9c0 6f 64 65 20 20 20 20 20 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 68 65 61 64 65 72 73 2d 68 6f ode......'forge-issue-headers-ho
5c9e0 6f 6b 29 0a 20 20 20 20 20 20 20 20 20 28 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 6d 6f 64 ok)..........('forge-pullreq-mod
5ca00 65 20 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 68 65 61 64 65 72 73 2d 68 6f 6f 6b e....'forge-pullreq-headers-hook
5ca20 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 ))).......(when.(forge-pullreq-p
5ca40 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 .topic).........(magit-insert-se
5ca60 63 74 69 6f 6e 20 28 70 75 6c 6c 72 65 71 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 ction.(pullreq.topic)...........
5ca80 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 68 65 61 64 69 6e 67 20 22 43 6f 6d 6d 69 74 73 22 29 (magit-insert-heading."Commits")
5caa0 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 70 75 6c 6c 72 65 ...........(forge--insert-pullre
5cac0 71 2d 63 6f 6d 6d 69 74 73 20 74 6f 70 69 63 20 74 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e q-commits.topic.t))).......(when
5cae0 2d 6c 65 74 20 28 28 6e 6f 74 65 20 28 6f 72 65 66 20 74 6f 70 69 63 20 6e 6f 74 65 29 29 29 0a -let.((note.(oref.topic.note))).
5cb00 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 20 28 6e ........(magit-insert-section.(n
5cb20 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 68 65 61 ote)...........(magit-insert-hea
5cb40 64 69 6e 67 20 22 4e 6f 74 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 ding."Note")...........(insert.(
5cb60 66 6f 72 67 65 2d 2d 66 6f 6e 74 69 66 79 2d 6d 61 72 6b 64 6f 77 6e 20 6e 6f 74 65 29 20 22 5c forge--fontify-markdown.note)."\
5cb80 6e 5c 6e 22 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 70 6f 73 74 n\n"))).......(forge-insert-post
5cba0 20 74 6f 70 69 63 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 70 6f 73 74 20 .topic.nil).......(dolist.(post.
5cbc0 28 6f 72 65 66 20 74 6f 70 69 63 20 70 6f 73 74 73 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 (oref.topic.posts)).........(for
5cbe0 67 65 2d 69 6e 73 65 72 74 2d 70 6f 73 74 20 70 6f 73 74 20 74 6f 70 69 63 29 29 0a 20 20 20 20 ge-insert-post.post.topic)).....
5cc00 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 64 69 73 70 6c 61 79 2d 69 6d 61 67 65 73 2d 70 29 0a ..(when.(and.(display-images-p).
5cc20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 62 6f 75 6e 64 70 20 27 6d 61 72 6b 64 .................(fboundp.'markd
5cc40 6f 77 6e 2d 64 69 73 70 6c 61 79 2d 69 6e 6c 69 6e 65 2d 69 6d 61 67 65 73 29 29 0a 20 20 20 20 own-display-inline-images)).....
5cc60 20 20 20 20 28 6c 65 74 20 28 28 6d 61 72 6b 64 6f 77 6e 2d 64 69 73 70 6c 61 79 2d 72 65 6d 6f ....(let.((markdown-display-remo
5cc80 74 65 2d 69 6d 61 67 65 73 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 72 6b 64 6f 77 te-images.t))...........(markdow
5cca0 6e 2d 64 69 73 70 6c 61 79 2d 69 6e 6c 69 6e 65 2d 69 6d 61 67 65 73 29 29 29 29 29 29 0a 0a 28 n-display-inline-images))))))..(
5ccc0 64 65 66 75 6e 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 70 6f 73 74 20 28 70 6f 73 74 20 74 6f defun.forge-insert-post.(post.to
5cce0 70 69 63 29 0a 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 20 28 70 6f pic)...(magit-insert-section.(po
5cd00 73 74 20 70 6f 73 74 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 70 6f 73 74 2d st.post).....(forge-insert-post-
5cd20 68 65 61 64 69 6e 67 20 70 6f 73 74 20 74 6f 70 69 63 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 69 heading.post.topic).....(forge-i
5cd40 6e 73 65 72 74 2d 70 6f 73 74 2d 63 6f 6e 74 65 6e 74 20 70 6f 73 74 29 0a 20 20 20 20 28 77 68 nsert-post-content.post).....(wh
5cd60 65 6e 20 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 70 20 74 6f 70 69 63 29 0a 20 20 en.(forge-discussion-p.topic)...
5cd80 20 20 20 20 28 64 6f 6c 69 73 74 20 28 72 65 70 6c 79 20 28 6f 72 65 66 20 70 6f 73 74 20 72 65 ....(dolist.(reply.(oref.post.re
5cda0 70 6c 69 65 73 29 29 0a 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 plies)).........(magit-insert-se
5cdc0 63 74 69 6f 6e 20 28 70 6f 73 74 20 72 65 70 6c 79 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f ction.(post.reply)...........(fo
5cde0 72 67 65 2d 69 6e 73 65 72 74 2d 70 6f 73 74 2d 68 65 61 64 69 6e 67 20 72 65 70 6c 79 20 74 6f rge-insert-post-heading.reply.to
5ce00 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 70 6f 73 pic)...........(forge-insert-pos
5ce20 74 2d 63 6f 6e 74 65 6e 74 20 72 65 70 6c 79 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f t-content.reply))))))..(defun.fo
5ce40 72 67 65 2d 69 6e 73 65 72 74 2d 70 6f 73 74 2d 68 65 61 64 69 6e 67 20 28 70 6f 73 74 20 74 6f rge-insert-post-heading.(post.to
5ce60 70 69 63 29 0a 20 20 28 6f 73 65 74 20 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f pic)...(oset.magit-insert-sectio
5ce80 6e 2d 2d 63 75 72 72 65 6e 74 0a 20 20 20 20 20 20 20 20 68 65 61 64 69 6e 67 2d 68 69 67 68 6c n--current.........heading-highl
5cea0 69 67 68 74 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 27 6d 61 67 69 74 2d 64 69 66 66 2d 68 75 ight-face.........'magit-diff-hu
5cec0 6e 6b 2d 68 65 61 64 69 6e 67 2d 68 69 67 68 6c 69 67 68 74 29 0a 20 20 28 6c 65 74 2a 20 28 28 nk-heading-highlight)...(let*.((
5cee0 61 75 74 68 6f 72 20 20 28 6f 72 65 66 20 70 6f 73 74 20 61 75 74 68 6f 72 29 29 0a 20 20 20 20 author..(oref.post.author)).....
5cf00 20 20 20 20 20 28 63 72 65 61 74 65 64 20 28 6f 72 65 66 20 70 6f 73 74 20 63 72 65 61 74 65 64 .....(created.(oref.post.created
5cf20 29 29 0a 20 20 20 20 20 20 20 20 20 28 68 65 61 64 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 28 ))..........(heading...........(
5cf40 66 6f 72 6d 61 74 2d 73 70 65 63 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 70 6f 73 format-spec............forge-pos
5cf60 74 2d 68 65 61 64 69 6e 67 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 60 28 28 3f t-heading-format............`((?
5cf80 61 20 2e 20 2c 28 70 72 6f 70 65 72 74 69 7a 65 20 28 63 6f 6e 63 61 74 20 28 66 6f 72 67 65 2d a...,(propertize.(concat.(forge-
5cfa0 2d 66 6f 72 6d 61 74 2d 61 76 61 74 61 72 20 61 75 74 68 6f 72 29 0a 20 20 20 20 20 20 20 20 20 -format-avatar.author)..........
5cfc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
5cfe0 6f 72 20 61 75 74 68 6f 72 20 22 28 67 68 6f 73 74 29 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 or.author."(ghost)"))...........
5d000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 6e 74 2d 6c 6f 63 6b ......................'font-lock
5d020 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 70 6f 73 74 2d 61 75 74 68 6f 72 29 29 0a 20 20 20 20 20 -face.'forge-post-author))......
5d040 20 20 20 20 20 20 20 20 28 3f 63 20 2e 20 2c 28 70 72 6f 70 65 72 74 69 7a 65 20 63 72 65 61 74 ........(?c...,(propertize.creat
5d060 65 64 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 70 6f 73 74 2d 64 ed.'font-lock-face.'forge-post-d
5d080 61 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 43 20 2e 20 2c 28 70 72 6f 70 65 ate))..............(?C...,(prope
5d0a0 72 74 69 7a 65 20 28 61 70 70 6c 79 20 23 27 66 6f 72 6d 61 74 20 22 25 73 20 25 73 20 61 67 6f rtize.(apply.#'format."%s.%s.ago
5d0c0 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 "...............................
5d0e0 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 .........(magit--age............
5d100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6c .............................(fl
5d120 6f 61 74 2d 74 69 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 oat-time........................
5d140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 61 74 65 2d 74 6f 2d 74 69 6d 65 20 ..................(date-to-time.
5d160 63 72 65 61 74 65 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 created)))).....................
5d180 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 20 27 66 6f 72 ............'font-lock-face.'for
5d1a0 67 65 2d 70 6f 73 74 2d 64 61 74 65 29 29 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 66 6f ge-post-date)))))).....(when.(fo
5d1c0 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 72 65 70 6c 79 2d 70 20 70 6f 73 74 29 0a 20 20 20 rge-discussion-reply-p.post)....
5d1e0 20 20 20 28 73 65 74 71 20 68 65 61 64 69 6e 67 20 28 63 6f 6e 63 61 74 20 22 20 20 20 20 22 20 ...(setq.heading.(concat."....".
5d200 68 65 61 64 69 6e 67 29 29 29 0a 20 20 20 20 28 66 6f 6e 74 2d 6c 6f 63 6b 2d 61 70 70 65 6e 64 heading))).....(font-lock-append
5d220 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 0a 20 20 20 20 20 30 20 28 6c 65 6e 67 74 68 20 68 65 -text-property......0.(length.he
5d240 61 64 69 6e 67 29 0a 20 20 20 20 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 20 28 63 6f 6e ading)......'font-lock-face.(con
5d260 64 2d 6c 65 74 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 5b d-let*........................([
5d280 5f 28 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 70 20 74 6f 70 69 63 29 5d 0a 20 20 20 _(forge-discussion-p.topic)]....
5d2a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5b 61 6e 73 77 65 72 20 28 6f 72 .....................[answer.(or
5d2c0 65 66 20 74 6f 70 69 63 20 61 6e 73 77 65 72 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ef.topic.answer)]...............
5d2e0 20 20 20 20 20 20 20 20 20 20 5b 5f 28 65 71 75 61 6c 20 28 6f 72 65 66 20 70 6f 73 74 20 74 68 ..........[_(equal.(oref.post.th
5d300 65 69 72 2d 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eir-id).........................
5d320 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 68 65 69 72 2d 69 64 20 61 6e 73 77 65 72 .........(forge--their-id.answer
5d340 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 ))].........................'for
5d360 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 61 6e 73 77 65 72 2d 68 65 61 64 69 6e 67 29 0a 20 20 ge-discussion-answer-heading)...
5d380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 64 69 73 .....................((forge-dis
5d3a0 63 75 73 73 69 6f 6e 2d 72 65 70 6c 79 2d 70 20 70 6f 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 cussion-reply-p.post)...........
5d3c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 6d 61 67 69 74 2d 64 69 6d 6d 65 64 20 6d 61 67 ..............'(magit-dimmed.mag
5d3e0 69 74 2d 64 69 66 66 2d 68 75 6e 6b 2d 68 65 61 64 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 it-diff-hunk-heading))..........
5d400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 6d 61 67 69 74 2d 64 69 66 66 2d 68 75 6e 6b 2d ..............('magit-diff-hunk-
5d420 68 65 61 64 69 6e 67 29 29 0a 20 20 20 20 20 68 65 61 64 69 6e 67 29 0a 20 20 20 20 28 6d 61 67 heading))......heading).....(mag
5d440 69 74 2d 69 6e 73 65 72 74 2d 68 65 61 64 69 6e 67 20 68 65 61 64 69 6e 67 29 29 29 0a 0a 28 64 it-insert-heading.heading)))..(d
5d460 65 66 75 6e 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 70 6f 73 74 2d 63 6f 6e 74 65 6e 74 20 28 efun.forge-insert-post-content.(
5d480 70 6f 73 74 29 0a 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 67 65 2d 2d 66 6f 6e 74 69 66 79 2d post)...(insert.(forge--fontify-
5d4a0 6d 61 72 6b 64 6f 77 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 70 6f 73 74 20 62 markdown............(oref.post.b
5d4c0 6f 64 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 66 6f 72 67 65 2d 64 69 73 63 ody)............(and.(forge-disc
5d4e0 75 73 73 69 6f 6e 2d 72 65 70 6c 79 2d 70 20 70 6f 73 74 29 20 34 29 29 29 0a 20 20 28 69 6e 73 ussion-reply-p.post).4)))...(ins
5d500 65 72 74 20 22 5c 6e 5c 6e 22 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 6d 61 67 69 ert."\n\n"))..(cl-defmethod.magi
5d520 74 2d 62 75 66 66 65 72 2d 76 61 6c 75 65 20 28 26 63 6f 6e 74 65 78 74 20 28 6d 61 6a 6f 72 2d t-buffer-value.(&context.(major-
5d540 6d 6f 64 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 29 29 0a 20 20 28 6f 72 65 66 20 mode.forge-topic-mode))...(oref.
5d560 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 20 73 6c 75 67 29 29 0a 0a 3b 3b 3b 20 42 forge-buffer-topic.slug))..;;;.B
5d580 6f 6f 6b 6d 61 72 6b 73 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 6d 61 67 69 74 2d 62 6f ookmarks..(cl-defmethod.magit-bo
5d5a0 6f 6b 6d 61 72 6b 2d 6e 61 6d 65 0a 20 20 28 26 63 6f 6e 74 65 78 74 20 28 6d 61 6a 6f 72 2d 6d okmark-name...(&context.(major-m
5d5c0 6f 64 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 29 29 0a 20 20 28 63 6f 6e 63 61 74 ode.forge-topic-mode))...(concat
5d5e0 20 28 6f 72 65 66 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 66 6f 72 .(oref.(forge-get-repository.for
5d600 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 20 73 6c 75 67 29 0a 20 20 20 20 20 20 20 20 20 ge-buffer-topic).slug)..........
5d620 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 20 73 6c 75 67 29 29 .(oref.forge-buffer-topic.slug))
5d640 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 6d 61 67 69 74 2d 62 6f 6f 6b 6d 61 72 6b 2d )..(cl-defmethod.magit-bookmark-
5d660 67 65 74 2d 76 61 6c 75 65 0a 20 20 28 62 6f 6f 6b 6d 61 72 6b 20 26 63 6f 6e 74 65 78 74 20 28 get-value...(bookmark.&context.(
5d680 6d 61 6a 6f 72 2d 6d 6f 64 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 29 29 0a 20 20 major-mode.forge-topic-mode))...
5d6a0 28 62 6f 6f 6b 6d 61 72 6b 2d 70 72 6f 70 2d 73 65 74 20 62 6f 6f 6b 6d 61 72 6b 20 27 66 6f 72 (bookmark-prop-set.bookmark.'for
5d6c0 67 65 2d 74 6f 70 69 63 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 ge-topic.(oref.forge-buffer-topi
5d6e0 63 20 69 64 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 6d 61 67 69 74 2d 62 6f 6f c.id)))..(cl-defmethod.magit-boo
5d700 6b 6d 61 72 6b 2d 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 0a 20 20 28 62 6f 6f 6b 6d kmark-get-buffer-create...(bookm
5d720 61 72 6b 20 28 5f 6d 6f 64 65 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 66 6f 72 67 65 2d 74 ark.(_mode.(derived-mode.forge-t
5d740 6f 70 69 63 2d 6d 6f 64 65 29 29 29 0a 20 20 28 6c 65 74 20 28 28 6d 61 67 69 74 2d 64 69 73 70 opic-mode)))...(let.((magit-disp
5d760 6c 61 79 2d 62 75 66 66 65 72 2d 66 75 6e 63 74 69 6f 6e 20 23 27 69 64 65 6e 74 69 74 79 29 0a lay-buffer-function.#'identity).
5d780 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 2d 6e 6f ........(magit-display-buffer-no
5d7a0 73 65 6c 65 63 74 20 74 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 75 select.t)).....(forge-topic-setu
5d7c0 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 28 p-buffer......(forge-get-topic.(
5d7e0 62 6f 6f 6b 6d 61 72 6b 2d 70 72 6f 70 2d 67 65 74 20 62 6f 6f 6b 6d 61 72 6b 20 27 66 6f 72 67 bookmark-prop-get.bookmark.'forg
5d800 65 2d 74 6f 70 69 63 29 29 29 29 29 0a 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 e-topic)))))..(put.'forge-discus
5d820 73 69 6f 6e 2d 6d 6f 64 65 20 27 6d 61 67 69 74 2d 62 6f 6f 6b 6d 61 72 6b 2d 76 61 72 69 61 62 sion-mode.'magit-bookmark-variab
5d840 6c 65 73 20 74 29 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 6d 6f 64 65 20 20 20 les.t).(put.'forge-issue-mode...
5d860 20 20 20 27 6d 61 67 69 74 2d 62 6f 6f 6b 6d 61 72 6b 2d 76 61 72 69 61 62 6c 65 73 20 74 29 0a ...'magit-bookmark-variables.t).
5d880 28 70 75 74 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 6d 6f 64 65 20 20 20 20 27 6d 61 67 (put.'forge-pullreq-mode....'mag
5d8a0 69 74 2d 62 6f 6f 6b 6d 61 72 6b 2d 76 61 72 69 61 62 6c 65 73 20 74 29 0a 0a 3b 3b 3b 20 48 65 it-bookmark-variables.t)..;;;.He
5d8c0 61 64 65 72 73 0a 0a 28 63 6c 2d 64 65 66 6d 61 63 72 6f 20 66 6f 72 67 65 2d 2d 64 65 66 69 6e aders..(cl-defmacro.forge--defin
5d8e0 65 2d 74 6f 70 69 63 2d 68 65 61 64 65 72 0a 20 20 20 20 28 6e 61 6d 65 20 26 6b 65 79 20 69 6e e-topic-header.....(name.&key.in
5d900 73 65 72 74 20 66 6f 72 6d 61 74 20 28 63 6f 6d 6d 61 6e 64 20 6e 69 6c 20 63 6f 6d 6d 61 6e 64 sert.format.(command.nil.command
5d920 3f 29 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 ?))...(declare.(indent.defun))..
5d940 20 28 6c 65 74 20 28 28 66 75 6e 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 66 6f 72 .(let.((fun.(intern.(format."for
5d960 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 25 73 22 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 ge-insert-topic-%s".name))).....
5d980 20 20 20 20 28 6d 61 70 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 66 6f 72 67 65 2d ....(map.(intern.(format."forge-
5d9a0 74 6f 70 69 63 2d 25 73 2d 73 65 63 74 69 6f 6e 2d 6d 61 70 22 20 6e 61 6d 65 29 29 29 0a 20 20 topic-%s-section-map".name)))...
5d9c0 20 20 20 20 20 20 28 63 6d 64 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 66 6f 72 67 ......(cmd.(intern.(format."forg
5d9e0 65 2d 74 6f 70 69 63 2d 73 65 74 2d 25 73 22 20 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 60 28 70 e-topic-set-%s".name)))).....`(p
5da00 72 6f 67 6e 0a 20 20 20 20 20 20 20 28 63 6c 2d 64 65 66 75 6e 20 2c 66 75 6e 20 28 26 6f 70 74 rogn........(cl-defun.,fun.(&opt
5da20 69 6f 6e 61 6c 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 ional.(topic.forge-buffer-topic)
5da40 29 0a 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e )..........(magit-insert-section
5da60 20 28 2c 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 74 6f 70 69 63 2d 25 73 22 20 6e 61 .(,(intern.(format."topic-%s".na
5da80 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 2c 28 63 61 70 69 74 me)))............(insert.,(capit
5daa0 61 6c 69 7a 65 20 28 73 74 72 69 6e 67 2d 70 61 64 20 28 66 6f 72 6d 61 74 20 22 25 73 3a 20 22 alize.(string-pad.(format."%s:."
5dac0 20 6e 61 6d 65 29 20 31 31 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 2c 28 63 6f 6e 64 0a 20 .name).11)))............,(cond..
5dae0 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 ............(insert.............
5db00 20 20 60 28 75 6e 6c 65 73 73 20 28 66 75 6e 63 61 6c 6c 20 2c 69 6e 73 65 72 74 20 74 6f 70 69 ..`(unless.(funcall.,insert.topi
5db20 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 6d 61 67 c)..................(insert.(mag
5db40 69 74 2d 2d 70 72 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 20 22 6e 6f 6e 65 22 20 27 6d 61 67 69 it--propertize-face."none".'magi
5db60 74 2d 64 69 6d 6d 65 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 t-dimmed))))..............(forma
5db80 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 69 6e 73 65 72 74 20 28 6f 72 20 28 66 75 t...............`(insert.(or.(fu
5dba0 6e 63 61 6c 6c 20 2c 66 6f 72 6d 61 74 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 ncall.,format.topic)............
5dbc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 65 72 74 69 ................(magit--properti
5dbe0 7a 65 2d 66 61 63 65 20 22 6e 6f 6e 65 22 20 27 6d 61 67 69 74 2d 64 69 6d 6d 65 64 29 29 29 29 ze-face."none".'magit-dimmed))))
5dc00 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 3f 5c 6e 29 29 29 0a 20 20 20 20 )............(insert.?\n))).....
5dc20 20 20 20 2c 40 28 61 6e 64 20 28 69 66 20 63 6f 6d 6d 61 6e 64 3f 20 63 6f 6d 6d 61 6e 64 20 74 ...,@(and.(if.command?.command.t
5dc40 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 )...............`((defvar-keymap
5dc60 20 2c 6d 61 70 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 69 74 2d 65 64 69 74 2d 74 68 69 6e 67 .,map."<remap>.<magit-edit-thing
5dc80 3e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 >"..............................
5dca0 20 20 2c 28 6f 72 20 63 6f 6d 6d 61 6e 64 20 60 28 66 75 6e 63 74 69 6f 6e 20 2c 63 6d 64 29 29 ..,(or.command.`(function.,cmd))
5dcc0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 74 20 27 2c 6d 61 70 20 27 64 65 ).................(put.',map.'de
5dce0 66 69 6e 69 74 69 6f 6e 2d 6e 61 6d 65 20 27 2c 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 28 finition-name.',name)))........(
5dd00 70 75 74 20 27 2c 66 75 6e 20 27 64 65 66 69 6e 69 74 69 6f 6e 2d 6e 61 6d 65 20 27 2c 6e 61 6d put.',fun.'definition-name.',nam
5dd20 65 29 29 29 29 0a 0a 28 66 6f 72 67 65 2d 2d 64 65 66 69 6e 65 2d 74 6f 70 69 63 2d 68 65 61 64 e))))..(forge--define-topic-head
5dd40 65 72 20 72 65 66 73 0a 20 20 3a 63 6f 6d 6d 61 6e 64 20 6e 69 6c 0a 20 20 3a 66 6f 72 6d 61 74 er.refs...:command.nil...:format
5dd60 20 23 27 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 72 65 66 73 29 0a 0a 28 66 .#'forge--format-topic-refs)..(f
5dd80 6f 72 67 65 2d 2d 64 65 66 69 6e 65 2d 74 6f 70 69 63 2d 68 65 61 64 65 72 20 64 72 61 66 74 0a orge--define-topic-header.draft.
5dda0 20 20 3a 63 6f 6d 6d 61 6e 64 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 74 6f 67 67 6c 65 2d ..:command.#'forge-topic-toggle-
5ddc0 64 72 61 66 74 0a 20 20 3a 66 6f 72 6d 61 74 20 23 27 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d draft...:format.#'forge--format-
5dde0 74 6f 70 69 63 2d 64 72 61 66 74 29 0a 0a 28 66 6f 72 67 65 2d 2d 64 65 66 69 6e 65 2d 74 6f 70 topic-draft)..(forge--define-top
5de00 69 63 2d 68 65 61 64 65 72 20 73 61 76 65 64 0a 20 20 3a 63 6f 6d 6d 61 6e 64 20 23 27 66 6f 72 ic-header.saved...:command.#'for
5de20 67 65 2d 74 6f 70 69 63 2d 74 6f 67 67 6c 65 2d 73 61 76 65 64 0a 20 20 3a 66 6f 72 6d 61 74 20 ge-topic-toggle-saved...:format.
5de40 23 27 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 73 61 76 65 64 29 0a 0a 28 66 #'forge--format-topic-saved)..(f
5de60 6f 72 67 65 2d 2d 64 65 66 69 6e 65 2d 74 6f 70 69 63 2d 68 65 61 64 65 72 20 73 74 61 74 65 0a orge--define-topic-header.state.
5de80 20 20 3a 63 6f 6d 6d 61 6e 64 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 65 2d 6d ..:command.#'forge-topic-state-m
5dea0 65 6e 75 0a 20 20 3a 66 6f 72 6d 61 74 20 23 27 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f enu...:format.#'forge--format-to
5dec0 70 69 63 2d 73 74 61 74 65 29 0a 0a 28 66 6f 72 67 65 2d 2d 64 65 66 69 6e 65 2d 74 6f 70 69 63 pic-state)..(forge--define-topic
5dee0 2d 68 65 61 64 65 72 20 73 74 61 74 75 73 0a 20 20 3a 63 6f 6d 6d 61 6e 64 20 23 27 66 6f 72 67 -header.status...:command.#'forg
5df00 65 2d 74 6f 70 69 63 2d 73 74 61 74 75 73 2d 6d 65 6e 75 0a 20 20 3a 66 6f 72 6d 61 74 20 23 27 e-topic-status-menu...:format.#'
5df20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 73 74 61 74 75 73 29 0a 0a 28 66 6f forge--format-topic-status)..(fo
5df40 72 67 65 2d 2d 64 65 66 69 6e 65 2d 74 6f 70 69 63 2d 68 65 61 64 65 72 20 63 61 74 65 67 6f 72 rge--define-topic-header.categor
5df60 79 0a 20 20 3a 66 6f 72 6d 61 74 20 23 27 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 y...:format.#'forge--format-topi
5df80 63 2d 63 61 74 65 67 6f 72 79 29 0a 0a 28 66 6f 72 67 65 2d 2d 64 65 66 69 6e 65 2d 74 6f 70 69 c-category)..(forge--define-topi
5dfa0 63 2d 68 65 61 64 65 72 20 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 3a 66 6f 72 6d 61 74 20 23 27 66 c-header.milestone...:format.#'f
5dfc0 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 6d 69 6c 65 73 74 6f 6e 65 29 0a 0a 28 orge--format-topic-milestone)..(
5dfe0 66 6f 72 67 65 2d 2d 64 65 66 69 6e 65 2d 74 6f 70 69 63 2d 68 65 61 64 65 72 20 6c 61 62 65 6c forge--define-topic-header.label
5e000 73 0a 20 20 3a 69 6e 73 65 72 74 20 23 27 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 74 6f 70 69 s...:insert.#'forge--insert-topi
5e020 63 2d 6c 61 62 65 6c 73 29 0a 0a 28 66 6f 72 67 65 2d 2d 64 65 66 69 6e 65 2d 74 6f 70 69 63 2d c-labels)..(forge--define-topic-
5e040 68 65 61 64 65 72 20 6d 61 72 6b 73 0a 20 20 3a 69 6e 73 65 72 74 20 23 27 66 6f 72 67 65 2d 2d header.marks...:insert.#'forge--
5e060 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 6d 61 72 6b 73 29 0a 0a 28 66 6f 72 67 65 2d 2d 64 65 66 insert-topic-marks)..(forge--def
5e080 69 6e 65 2d 74 6f 70 69 63 2d 68 65 61 64 65 72 20 61 73 73 69 67 6e 65 65 73 0a 20 20 3a 66 6f ine-topic-header.assignees...:fo
5e0a0 72 6d 61 74 20 23 27 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 61 73 73 69 67 rmat.#'forge--format-topic-assig
5e0c0 6e 65 65 73 29 0a 0a 28 66 6f 72 67 65 2d 2d 64 65 66 69 6e 65 2d 74 6f 70 69 63 2d 68 65 61 64 nees)..(forge--define-topic-head
5e0e0 65 72 20 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 0a 20 20 3a 66 6f 72 6d 61 74 20 23 27 66 er.review-requests...:format.#'f
5e100 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 orge--format-topic-review-reques
5e120 74 73 29 0a 0a 3b 3b 3b 20 43 6f 6d 6d 61 6e 64 73 0a 3b 3b 3b 3b 20 47 72 6f 75 70 73 0a 0a 28 ts)..;;;.Commands.;;;;.Groups..(
5e140 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 67 72 6f 75 70 20 66 6f 72 67 65 2d 2d 6c 69 transient-define-group.forge--li
5e160 73 74 73 2d 67 72 6f 75 70 0a 20 20 5b 22 4c 69 73 74 22 0a 20 20 20 28 22 6c 20 72 22 20 22 72 sts-group...["List"....("l.r"."r
5e180 65 70 6f 73 69 74 6f 72 69 65 73 22 20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 72 65 70 6f 73 69 74 epositories"..forge-list-reposit
5e1a0 6f 72 69 65 73 29 0a 20 20 20 28 22 6c 20 6e 22 20 22 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 ories)....("l.n"."notifications"
5e1c0 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 29 0a 20 20 20 28 22 .forge-list-notifications)....("
5e1e0 6c 20 67 22 20 22 67 6c 6f 62 61 6c 20 74 6f 70 69 63 73 22 20 66 6f 72 67 65 2d 6c 69 73 74 2d l.g"."global.topics".forge-list-
5e200 67 6c 6f 62 61 6c 2d 74 6f 70 69 63 73 29 0a 20 20 20 28 22 6c 20 74 22 20 22 74 6f 70 69 63 73 global-topics)....("l.t"."topics
5e220 22 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 74 6f 70 69 63 73 29 0a 20 20 20 22 "........forge-list-topics)...."
5e240 22 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 67 72 6f 75 70 20 66 6f 72 "])..(transient-define-group.for
5e260 67 65 2d 2d 74 6f 70 69 63 2d 6d 65 6e 75 73 2d 67 72 6f 75 70 0a 20 20 5b 22 4d 65 6e 75 22 0a ge--topic-menus-group...["Menu".
5e280 20 20 20 28 22 6d 20 73 22 20 22 65 64 69 74 22 20 20 20 20 20 20 66 6f 72 67 65 2d 74 6f 70 69 ...("m.s"."edit"......forge-topi
5e2a0 63 2d 6d 65 6e 75 29 0a 20 20 20 28 22 6d 20 66 22 20 22 66 69 6c 74 65 72 22 20 20 20 20 66 6f c-menu)....("m.f"."filter"....fo
5e2c0 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 29 0a 20 20 20 28 22 6d 20 66 22 20 22 66 69 6c 74 rge-topics-menu)....("m.f"."filt
5e2e0 65 72 22 20 20 20 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 65 6e 75 29 er"....forge-notifications-menu)
5e300 0a 20 20 20 28 22 6d 20 66 22 20 22 66 69 6c 74 65 72 22 20 20 20 20 66 6f 72 67 65 2d 72 65 70 ....("m.f"."filter"....forge-rep
5e320 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e 75 29 0a 20 20 20 28 22 6d 20 64 22 20 22 64 69 73 70 61 ositories-menu)....("m.d"."dispa
5e340 74 63 68 22 20 20 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 28 22 6d 20 63 22 20 tch"..forge-dispatch)....("m.c".
5e360 22 63 6f 6e 66 69 67 75 72 65 22 20 66 6f 72 67 65 2d 63 6f 6e 66 69 67 75 72 65 29 0a 20 20 20 "configure".forge-configure)....
5e380 22 22 22 22 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 67 72 6f 75 70 20 """"])..(transient-define-group.
5e3a0 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 65 2d 67 72 6f 75 70 0a 20 20 5b forge--topic-set-state-group...[
5e3c0 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 28 23 23 69 66 20 66 6f 72 67 65 2d 2d 73 68 6f 77 2d 74 :description.(##if.forge--show-t
5e3e0 6f 70 69 63 2d 6c 65 67 65 6e 64 20 22 53 65 74 20 70 75 62 6c 69 63 20 73 74 61 74 65 22 20 22 opic-legend."Set.public.state"."
5e400 53 65 74 20 73 74 61 74 65 22 29 0a 20 20 20 28 22 6f 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d Set.state")....("o".forge-topic-
5e420 73 74 61 74 65 2d 73 65 74 2d 6f 70 65 6e 29 0a 20 20 20 28 22 63 22 20 66 6f 72 67 65 2d 63 68 state-set-open)....("c".forge-ch
5e440 61 74 74 65 72 2d 73 74 61 74 65 2d 73 65 74 2d 63 6f 6d 70 6c 65 74 65 64 29 0a 20 20 20 28 22 atter-state-set-completed)....("
5e460 55 22 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 73 74 61 74 65 2d 73 65 74 2d 75 6e 70 6c 61 6e 6e U".forge-issue-state-set-unplann
5e480 65 64 29 0a 20 20 20 28 22 4f 22 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 73 74 61 ed)....("O".forge-discussion-sta
5e4a0 74 65 2d 73 65 74 2d 6f 75 74 64 61 74 65 64 29 0a 20 20 20 28 22 44 22 20 66 6f 72 67 65 2d 63 te-set-outdated)....("D".forge-c
5e4c0 68 61 74 74 65 72 2d 73 74 61 74 65 2d 73 65 74 2d 64 75 70 6c 69 63 61 74 65 29 0a 20 20 20 28 hatter-state-set-duplicate)....(
5e4e0 22 4d 22 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 73 74 61 74 65 2d 73 65 74 2d 6d 65 72 67 "M".forge-pullreq-state-set-merg
5e500 65 64 29 0a 20 20 20 28 22 52 22 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 73 74 61 74 65 2d ed)....("R".forge-pullreq-state-
5e520 73 65 74 2d 72 65 6a 65 63 74 65 64 29 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 set-rejected)])..(transient-defi
5e540 6e 65 2d 67 72 6f 75 70 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 75 73 ne-group.forge--topic-set-status
5e560 2d 67 72 6f 75 70 0a 20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 28 23 23 69 66 20 66 6f 72 -group...[:description.(##if.for
5e580 67 65 2d 2d 73 68 6f 77 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 20 22 53 65 74 20 70 72 69 76 61 ge--show-topic-legend."Set.priva
5e5a0 74 65 20 73 74 61 74 75 73 22 20 22 53 65 74 20 73 74 61 74 75 73 22 29 0a 20 20 20 28 22 75 22 te.status"."Set.status")....("u"
5e5c0 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 75 73 2d 73 65 74 2d 75 6e 72 65 61 64 29 0a .forge-topic-status-set-unread).
5e5e0 20 20 20 28 22 70 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 75 73 2d 73 65 74 2d 70 ...("p".forge-topic-status-set-p
5e600 65 6e 64 69 6e 67 29 0a 20 20 20 28 22 64 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 ending)....("d".forge-topic-stat
5e620 75 73 2d 73 65 74 2d 64 6f 6e 65 29 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e us-set-done)])..(transient-defin
5e640 65 2d 67 72 6f 75 70 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 2d 67 72 6f 75 e-group.forge--topic-legend-grou
5e660 70 0a 20 20 5b 22 4c 65 67 65 6e 64 22 20 3a 69 66 2d 6e 6f 6e 2d 6e 69 6c 20 66 6f 72 67 65 2d p...["Legend".:if-non-nil.forge-
5e680 2d 73 68 6f 77 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 0a 20 20 20 28 3a 69 6e 66 6f 2a 20 28 23 -show-topic-legend....(:info*.(#
5e6a0 23 70 72 6f 70 65 72 74 69 7a 65 20 22 6f 70 65 6e 20 64 69 73 63 75 73 73 69 6f 6e 22 20 20 20 #propertize."open.discussion"...
5e6c0 20 20 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 6f 70 65 6e 29 ...'face.'forge-discussion-open)
5e6e0 29 0a 20 20 20 28 3a 69 6e 66 6f 2a 20 28 23 23 70 72 6f 70 65 72 74 69 7a 65 20 22 63 6f 6d 70 )....(:info*.(##propertize."comp
5e700 6c 65 74 65 64 20 64 69 73 63 75 73 73 69 6f 6e 22 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 64 leted.discussion".'face.'forge-d
5e720 69 73 63 75 73 73 69 6f 6e 2d 63 6f 6d 70 6c 65 74 65 64 29 29 0a 20 20 20 28 3a 69 6e 66 6f 2a iscussion-completed))....(:info*
5e740 20 28 23 23 70 72 6f 70 65 72 74 69 7a 65 20 22 65 78 70 75 6e 67 65 64 20 64 69 73 63 75 73 73 .(##propertize."expunged.discuss
5e760 69 6f 6e 22 20 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 65 78 ion"..'face.'forge-discussion-ex
5e780 70 75 6e 67 65 64 29 29 5d 0a 20 20 5b 22 22 20 3a 69 66 2d 6e 6f 6e 2d 6e 69 6c 20 66 6f 72 67 punged))]...["".:if-non-nil.forg
5e7a0 65 2d 2d 73 68 6f 77 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 0a 20 20 20 28 3a 69 6e 66 6f 2a 20 e--show-topic-legend....(:info*.
5e7c0 28 23 23 70 72 6f 70 65 72 74 69 7a 65 20 22 6f 70 65 6e 20 69 73 73 75 65 22 20 20 20 20 20 20 (##propertize."open.issue"......
5e7e0 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 6f 70 65 6e 29 29 0a 20 20 20 28 3a .'face.'forge-issue-open))....(:
5e800 69 6e 66 6f 2a 20 28 23 23 70 72 6f 70 65 72 74 69 7a 65 20 22 63 6f 6d 70 6c 65 74 65 64 20 69 info*.(##propertize."completed.i
5e820 73 73 75 65 22 20 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 63 6f 6d 70 6c 65 ssue"..'face.'forge-issue-comple
5e840 74 65 64 29 29 0a 20 20 20 28 3a 69 6e 66 6f 2a 20 28 23 23 70 72 6f 70 65 72 74 69 7a 65 20 22 ted))....(:info*.(##propertize."
5e860 65 78 70 75 6e 67 65 64 20 69 73 73 75 65 22 20 20 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 69 expunged.issue"...'face.'forge-i
5e880 73 73 75 65 2d 65 78 70 75 6e 67 65 64 29 29 5d 0a 20 20 5b 22 22 20 3a 69 66 2d 6e 6f 6e 2d 6e ssue-expunged))]...["".:if-non-n
5e8a0 69 6c 20 66 6f 72 67 65 2d 2d 73 68 6f 77 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 0a 20 20 20 28 il.forge--show-topic-legend....(
5e8c0 3a 69 6e 66 6f 2a 20 28 23 23 70 72 6f 70 65 72 74 69 7a 65 20 22 6f 70 65 6e 20 70 75 6c 6c 72 :info*.(##propertize."open.pullr
5e8e0 65 71 22 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 6f 70 65 eq".....'face.'forge-pullreq-ope
5e900 6e 29 29 0a 20 20 20 28 3a 69 6e 66 6f 2a 20 28 23 23 70 72 6f 70 65 72 74 69 7a 65 20 22 6d 65 n))....(:info*.(##propertize."me
5e920 72 67 65 64 20 70 75 6c 6c 72 65 71 22 20 20 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 70 75 6c rged.pullreq"...'face.'forge-pul
5e940 6c 72 65 71 2d 6d 65 72 67 65 64 29 29 0a 20 20 20 28 3a 69 6e 66 6f 2a 20 28 23 23 70 72 6f 70 lreq-merged))....(:info*.(##prop
5e960 65 72 74 69 7a 65 20 22 72 65 6a 65 63 74 65 64 20 70 75 6c 6c 72 65 71 22 20 27 66 61 63 65 20 ertize."rejected.pullreq".'face.
5e980 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 72 65 6a 65 63 74 65 64 29 29 5d 0a 20 20 5b 22 22 'forge-pullreq-rejected))]...[""
5e9a0 20 3a 69 66 2d 6e 6f 6e 2d 6e 69 6c 20 66 6f 72 67 65 2d 2d 73 68 6f 77 2d 74 6f 70 69 63 2d 6c .:if-non-nil.forge--show-topic-l
5e9c0 65 67 65 6e 64 0a 20 20 20 28 3a 69 6e 66 6f 2a 20 28 23 23 70 72 6f 70 65 72 74 69 7a 65 20 22 egend....(:info*.(##propertize."
5e9e0 75 6e 72 65 61 64 22 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 74 unread"...........'face.'forge-t
5ea00 6f 70 69 63 2d 75 6e 72 65 61 64 29 29 0a 20 20 20 28 3a 69 6e 66 6f 2a 20 28 23 23 70 72 6f 70 opic-unread))....(:info*.(##prop
5ea20 65 72 74 69 7a 65 20 22 70 65 6e 64 69 6e 67 22 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 ertize."pending"..........'face.
5ea40 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 70 65 6e 64 69 6e 67 29 29 0a 20 20 20 28 3a 69 6e 66 6f 'forge-topic-pending))....(:info
5ea60 2a 20 28 23 23 70 72 6f 70 65 72 74 69 7a 65 20 22 64 6f 6e 65 22 20 20 20 20 20 20 20 20 20 20 *.(##propertize."done"..........
5ea80 20 20 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 64 6f 6e 65 29 29 5d 0a 20 20 ...'face.'forge-topic-done))]...
5eaa0 5b 22 22 20 3a 69 66 2d 6e 6f 6e 2d 6e 69 6c 20 66 6f 72 67 65 2d 2d 73 68 6f 77 2d 74 6f 70 69 ["".:if-non-nil.forge--show-topi
5eac0 63 2d 6c 65 67 65 6e 64 0a 20 20 20 28 3a 69 6e 66 6f 2a 20 28 23 23 70 72 6f 70 65 72 74 69 7a c-legend....(:info*.(##propertiz
5eae0 65 20 22 64 72 61 66 74 22 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 72 67 e."draft"............'face.'forg
5eb00 65 2d 70 75 6c 6c 72 65 71 2d 64 72 61 66 74 29 29 5d 29 0a 0a 28 64 65 66 76 61 72 20 66 6f 72 e-pullreq-draft))])..(defvar.for
5eb20 67 65 2d 2d 73 68 6f 77 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 20 74 29 0a 0a 28 74 72 61 6e 73 ge--show-topic-legend.t)..(trans
5eb40 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d ient-define-suffix.forge-toggle-
5eb60 74 6f 70 69 63 2d 6c 65 67 65 6e 64 20 28 29 0a 20 20 22 54 6f 67 67 6c 65 20 77 68 65 74 68 65 topic-legend.()..."Toggle.whethe
5eb80 72 20 74 6f 20 73 68 6f 77 20 6c 65 67 65 6e 64 20 66 6f 72 20 66 61 63 65 73 20 75 73 65 64 20 r.to.show.legend.for.faces.used.
5eba0 69 6e 20 74 6f 70 69 63 20 6d 65 6e 75 73 20 61 6e 64 20 6c 69 73 74 73 2e 22 0a 20 20 3a 64 65 in.topic.menus.and.lists."...:de
5ebc0 73 63 72 69 70 74 69 6f 6e 20 28 23 23 69 66 20 66 6f 72 67 65 2d 2d 73 68 6f 77 2d 74 6f 70 69 scription.(##if.forge--show-topi
5ebe0 63 2d 6c 65 67 65 6e 64 20 22 68 69 64 65 20 6c 65 67 65 6e 64 22 20 22 73 68 6f 77 20 6c 65 67 c-legend."hide.legend"."show.leg
5ec00 65 6e 64 22 29 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 0a 20 20 28 69 6e 74 65 72 61 63 74 end")...:transient.t...(interact
5ec20 69 76 65 29 0a 20 20 28 63 75 73 74 6f 6d 69 7a 65 2d 73 65 74 2d 76 61 72 69 61 62 6c 65 20 27 ive)...(customize-set-variable.'
5ec40 66 6f 72 67 65 2d 2d 73 68 6f 77 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 0a 20 20 20 20 20 20 20 forge--show-topic-legend........
5ec60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 66 6f 72 67 65 2d 2d 73 ...................(not.forge--s
5ec80 68 6f 77 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 29 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 66 how-topic-legend)))..(defconst.f
5eca0 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6d 65 6e 75 73 2d 63 6f 6c 75 6d 6e 2d 77 69 64 74 68 73 20 orge--topic-menus-column-widths.
5ecc0 27 28 32 31 20 32 31 20 32 31 20 32 31 29 29 0a 0a 3b 3b 3b 3b 20 4d 65 6e 75 73 0a 0a 3b 3b 3b '(21.21.21.21))..;;;;.Menus..;;;
5ece0 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 74 6f 70 69 ###autoload(autoload.'forge-topi
5ed00 63 2d 6d 65 6e 75 20 22 66 6f 72 67 65 2d 74 6f 70 69 63 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 c-menu."forge-topic".nil.t).(tra
5ed20 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 nsient-define-prefix.forge-topic
5ed40 2d 6d 65 6e 75 20 28 29 0a 20 20 22 45 64 69 74 20 74 68 65 20 74 6f 70 69 63 20 61 74 20 70 6f -menu.()..."Edit.the.topic.at.po
5ed60 69 6e 74 2e 22 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 20 74 0a 20 20 3a 74 int."...:transient-suffix.t...:t
5ed80 72 61 6e 73 69 65 6e 74 2d 6e 6f 6e 2d 73 75 66 66 69 78 20 23 27 74 72 61 6e 73 69 65 6e 74 2d ransient-non-suffix.#'transient-
5eda0 2d 64 6f 2d 63 61 6c 6c 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 2d 73 77 69 74 63 68 2d 66 72 61 -do-call...:transient-switch-fra
5edc0 6d 65 20 6e 69 6c 0a 20 20 3a 72 65 66 72 65 73 68 2d 73 75 66 66 69 78 65 73 20 74 0a 20 20 3a me.nil...:refresh-suffixes.t...:
5ede0 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 23 27 66 6f 72 67 65 2d 2d 6d 65 6e 75 2d 65 6e 76 69 72 6f environment.#'forge--menu-enviro
5ee00 6e 6d 65 6e 74 0a 20 20 3a 63 6f 6c 75 6d 6e 2d 77 69 64 74 68 73 20 66 6f 72 67 65 2d 2d 74 6f nment...:column-widths.forge--to
5ee20 70 69 63 2d 6d 65 6e 75 73 2d 63 6f 6c 75 6d 6e 2d 77 69 64 74 68 73 0a 20 20 5b 3a 68 69 64 65 pic-menus-column-widths...[:hide
5ee40 20 61 6c 77 61 79 73 20 28 22 71 22 20 66 6f 72 67 65 2d 6d 65 6e 75 2d 71 75 69 74 2d 6c 69 73 .always.("q".forge-menu-quit-lis
5ee60 74 29 5d 0a 20 20 5b 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6d 65 6e 75 73 2d 67 72 6f 75 70 0a t)]...[forge--topic-menus-group.
5ee80 20 20 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 65 2d 67 72 6f 75 70 0a ...forge--topic-set-state-group.
5eea0 20 20 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 75 73 2d 67 72 6f 75 70 ...forge--topic-set-status-group
5eec0 0a 20 20 20 5b 22 41 63 74 69 6f 6e 73 22 0a 20 20 20 20 28 22 2f 66 22 20 66 6f 72 67 65 2d 70 ....["Actions".....("/f".forge-p
5eee0 75 6c 6c 2d 74 68 69 73 2d 74 6f 70 69 63 29 0a 20 20 20 20 28 22 2f 62 22 20 66 6f 72 67 65 2d ull-this-topic).....("/b".forge-
5ef00 62 72 6f 77 73 65 2d 74 68 69 73 2d 74 6f 70 69 63 29 0a 20 20 20 20 28 22 2f 72 22 20 22 72 65 browse-this-topic).....("/r"."re
5ef20 73 70 6f 6e 64 22 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 6f 73 74 29 0a 20 20 20 20 28 22 spond".forge-create-post).....("
5ef40 2f 63 22 20 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 74 68 69 73 2d 70 75 6c 6c 72 65 71 29 /c".forge-checkout-this-pullreq)
5ef60 0a 20 20 20 20 28 22 2f 41 22 20 66 6f 72 67 65 2d 61 70 70 72 6f 76 65 2d 70 75 6c 6c 72 65 71 .....("/A".forge-approve-pullreq
5ef80 29 0a 20 20 20 20 28 22 2f 52 22 20 66 6f 72 67 65 2d 72 65 71 75 65 73 74 2d 63 68 61 6e 67 65 ).....("/R".forge-request-change
5efa0 73 29 5d 5d 0a 20 20 5b 66 6f 72 67 65 2d 2d 6c 69 73 74 73 2d 67 72 6f 75 70 0a 20 20 20 5b 22 s)]]...[forge--lists-group....["
5efc0 53 65 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Set.............................
5efe0 20 20 20 20 20 20 20 20 20 20 20 20 22 0a 20 20 20 20 28 22 2d 63 22 20 66 6f 72 67 65 2d 74 6f ............".....("-c".forge-to
5f000 70 69 63 2d 73 65 74 2d 63 61 74 65 67 6f 72 79 29 0a 20 20 20 20 28 22 2d 6d 22 20 66 6f 72 67 pic-set-category).....("-m".forg
5f020 65 2d 74 6f 70 69 63 2d 73 65 74 2d 6d 69 6c 65 73 74 6f 6e 65 29 0a 20 20 20 20 28 22 2d 6c 22 e-topic-set-milestone).....("-l"
5f040 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 2d 6c 61 62 65 6c 73 29 0a 20 20 20 20 28 22 2d .forge-topic-set-labels).....("-
5f060 78 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 2d 6d 61 72 6b 73 29 0a 20 20 20 20 28 22 x".forge-topic-set-marks).....("
5f080 2d 61 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 2d 61 73 73 69 67 6e 65 65 73 29 0a 20 -a".forge-topic-set-assignees)..
5f0a0 20 20 20 28 22 2d 72 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 2d 72 65 76 69 65 77 2d ...("-r".forge-topic-set-review-
5f0c0 72 65 71 75 65 73 74 73 29 0a 20 20 20 20 28 22 2d 6e 22 20 66 6f 72 67 65 2d 65 64 69 74 2d 74 requests).....("-n".forge-edit-t
5f0e0 6f 70 69 63 2d 6e 6f 74 65 29 0a 20 20 20 20 28 22 2d 74 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 opic-note).....("-t".forge-topic
5f100 2d 73 65 74 2d 74 69 74 6c 65 29 5d 0a 20 20 20 5b 22 53 65 74 22 0a 20 20 20 20 28 22 2d 73 22 -set-title)]....["Set".....("-s"
5f120 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 74 6f 67 67 6c 65 2d 73 61 76 65 64 29 0a 20 20 20 20 28 .forge-topic-toggle-saved).....(
5f140 22 2d 64 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 74 6f 67 67 6c 65 2d 64 72 61 66 74 29 0a 20 "-d".forge-topic-toggle-draft)..
5f160 20 20 20 28 22 2d 41 22 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 73 65 74 2d 61 6e ...("-A".forge-discussion-set-an
5f180 73 77 65 72 29 0a 20 20 20 20 22 22 22 44 69 73 70 6c 61 79 22 0a 20 20 20 20 28 22 2d 48 22 20 swer)....."""Display".....("-H".
5f1a0 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 29 5d 5d 0a 20 20 5b forge-toggle-topic-legend)]]...[
5f1c0 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 2d 67 72 6f 75 70 5d 29 0a 0a 28 74 72 forge--topic-legend-group])..(tr
5f1e0 61 6e 73 69 65 6e 74 2d 61 75 67 6d 65 6e 74 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 ansient-augment-suffix.forge-top
5f200 69 63 2d 6d 65 6e 75 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 20 23 27 74 72 61 6e 73 69 65 6e 74 ic-menu...:transient.#'transient
5f220 2d 2d 64 6f 2d 72 65 70 6c 61 63 65 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 28 6c 61 6d 62 64 61 --do-replace...:inapt-if.(lambda
5f240 20 28 29 20 28 6f 72 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 72 .().(or.(derived-mode-p.'forge-r
5f260 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 epository-list-mode)............
5f280 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 28 6f 72 65 66 20 74 72 61 6e 73 69 65 6e 74 2d 2d ...........(eq.(oref.transient--
5f2a0 70 72 65 66 69 78 20 63 6f 6d 6d 61 6e 64 29 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e prefix.command).'forge-topic-men
5f2c0 75 29 29 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 28 6c 61 6d 62 64 61 20 28 29 20 28 69 u)))...:inapt-face.(lambda.().(i
5f2e0 66 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 f.(derived-mode-p.'forge-reposit
5f300 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ory-list-mode)..................
5f320 20 20 20 20 20 20 20 27 74 72 61 6e 73 69 65 6e 74 2d 69 6e 61 70 74 2d 73 75 66 66 69 78 0a 20 .......'transient-inapt-suffix..
5f340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 73 75 66 66 .....................'forge-suff
5f360 69 78 2d 61 63 74 69 76 65 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 ix-active)))..;;;###autoload(aut
5f380 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 65 2d 6d 65 6e 75 20 22 66 oload.'forge-topic-state-menu."f
5f3a0 6f 72 67 65 2d 74 6f 70 69 63 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 orge-topic".nil.t).(transient-de
5f3c0 66 69 6e 65 2d 70 72 65 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 65 2d 6d 65 fine-prefix.forge-topic-state-me
5f3e0 6e 75 20 28 29 0a 20 20 22 53 65 74 20 73 74 61 74 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e nu.()..."Set.state.of.the.curren
5f400 74 20 74 6f 70 69 63 2e 22 0a 20 20 3a 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 23 27 66 6f 72 67 65 t.topic."...:environment.#'forge
5f420 2d 2d 6d 65 6e 75 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 0a 20 20 5b 66 6f 72 67 65 2d 2d 74 6f 70 --menu-environment...[forge--top
5f440 69 63 2d 73 65 74 2d 73 74 61 74 65 2d 67 72 6f 75 70 5d 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f ic-set-state-group])..;;;###auto
5f460 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 75 load(autoload.'forge-topic-statu
5f480 73 2d 6d 65 6e 75 20 22 66 6f 72 67 65 2d 74 6f 70 69 63 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 s-menu."forge-topic".nil.t).(tra
5f4a0 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 nsient-define-prefix.forge-topic
5f4c0 2d 73 74 61 74 75 73 2d 6d 65 6e 75 20 28 29 0a 20 20 22 53 65 74 20 73 74 61 74 75 73 20 6f 66 -status-menu.()..."Set.status.of
5f4e0 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 2e 22 0a 20 20 3a 65 6e 76 69 72 6f 6e 6d .the.current.topic."...:environm
5f500 65 6e 74 20 23 27 66 6f 72 67 65 2d 2d 6d 65 6e 75 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 0a 20 20 ent.#'forge--menu-environment...
5f520 5b 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 75 73 2d 67 72 6f 75 70 5d 29 [forge--topic-set-status-group])
5f540 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6d 65 6e 75 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 ..(defun.forge--menu-environment
5f560 20 28 66 6e 29 0a 20 20 28 6c 65 74 20 28 28 6d 61 67 69 74 2d 2d 72 65 66 72 65 73 68 2d 63 61 .(fn)...(let.((magit--refresh-ca
5f580 63 68 65 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 30 20 30 29 29 29 29 0a 20 20 20 20 28 66 75 6e che.(list.(cons.0.0)))).....(fun
5f5a0 63 61 6c 6c 20 66 6e 29 29 29 0a 0a 3b 3b 3b 3b 20 53 74 61 74 65 0a 0a 28 64 65 66 63 6c 61 73 call.fn)))..;;;;.State..(defclas
5f5c0 73 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 s.forge--topic-set-state-command
5f5e0 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 29 0a 20 20 28 28 73 74 61 74 65 20 3a 69 .(transient-suffix)...((state.:i
5f600 6e 69 74 61 72 67 20 3a 73 74 61 74 65 29 0a 20 20 20 28 67 65 74 74 65 72 20 3a 69 6e 69 74 61 nitarg.:state)....(getter.:inita
5f620 72 67 20 3a 67 65 74 74 65 72 29 0a 20 20 20 28 64 65 66 69 6e 69 74 69 6f 6e 0a 20 20 20 20 3a rg.:getter)....(definition.....:
5f640 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 initform.(lambda.().............
5f660 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(interactive)...............
5f680 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 67 65 74 74 65 72 20 73 74 61 74 65 29 20 28 74 72 ..(with-slots.(getter.state).(tr
5f6a0 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 2d 6f 62 6a 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 ansient-suffix-object)..........
5f6c0 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 74 6f 70 69 63 20 28 66 75 6e 63 61 6c 6c 20 67 .........(let.((topic.(funcall.g
5f6e0 65 74 74 65 72 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 etter.t))).....................(
5f700 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 73 74 61 74 65 20 28 66 6f 72 67 65 2d 67 65 forge--set-topic-state.(forge-ge
5f720 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 t-repository.topic).............
5f740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5f760 74 6f 70 69 63 20 73 74 61 74 65 29 29 29 29 29 0a 20 20 20 28 64 65 73 63 72 69 70 74 69 6f 6e topic.state)))))....(description
5f780 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 6f 62 6a 29 0a 20 20 20 .....:initform.(lambda.(obj)....
5f7a0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 6f 72 65 66 20 .............(symbol-name.(oref.
5f7c0 6f 62 6a 20 73 74 61 74 65 29 29 29 29 0a 20 20 20 28 69 6e 61 70 74 2d 69 66 0a 20 20 20 20 3a obj.state))))....(inapt-if.....:
5f7e0 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 initform.(lambda.().............
5f800 20 20 20 20 28 6f 72 20 28 66 6f 72 67 65 2d 72 65 67 69 6f 6e 2d 74 6f 70 69 63 73 29 0a 20 20 ....(or.(forge-region-topics)...
5f820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 67 ..................(with-slots.(g
5f840 65 74 74 65 72 20 73 74 61 74 65 29 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 2d 6f etter.state).(transient-suffix-o
5f860 62 6a 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 bject).......................(if
5f880 2d 6c 65 74 20 28 28 74 6f 70 69 63 20 28 66 75 6e 63 61 6c 6c 20 67 65 74 74 65 72 29 29 29 0a -let.((topic.(funcall.getter))).
5f8a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4f 6e 63 ..........................;;.Onc
5f8c0 65 20 61 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 69 73 20 6d 65 72 67 65 64 2c 0a 20 20 20 20 e.a.pull-request.is.merged,.....
5f8e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 69 74 73 20 73 74 61 ......................;;.its.sta
5f900 74 65 20 63 61 6e 6e 6f 74 20 62 65 20 63 68 61 6e 67 65 64 20 61 6e 79 6d 6f 72 65 2e 0a 20 20 te.cannot.be.changed.anymore....
5f920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 28 6f ........................(memq.(o
5f940 72 65 66 20 74 6f 70 69 63 20 73 74 61 74 65 29 20 28 6c 69 73 74 20 73 74 61 74 65 20 27 6d 65 ref.topic.state).(list.state.'me
5f960 72 67 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 rged)).........................t
5f980 29 29 29 29 29 0a 20 20 20 28 69 6e 61 70 74 2d 66 61 63 65 0a 20 20 20 20 3a 69 6e 69 74 66 6f )))))....(inapt-face.....:initfo
5f9a0 72 6d 20 28 6c 61 6d 62 64 61 20 28 6f 62 6a 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rm.(lambda.(obj)................
5f9c0 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 67 65 74 74 65 72 20 73 74 61 74 65 29 20 28 74 72 61 .(with-slots.(getter.state).(tra
5f9e0 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 2d 6f 62 6a 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 nsient-suffix-object)...........
5fa00 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 2d 6c 65 74 20 28 28 5f 28 6e 6f 74 20 28 66 6f ........(if.(and-let.((_(not.(fo
5fa20 72 67 65 2d 72 65 67 69 6f 6e 2d 74 6f 70 69 63 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 rge-region-topics)))............
5fa40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 6f 70 69 63 20 28 66 75 6e .....................(topic.(fun
5fa60 63 61 6c 6c 20 67 65 74 74 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 call.getter)))..................
5fa80 20 20 20 20 20 20 20 28 65 71 20 28 6f 72 65 66 20 74 6f 70 69 63 20 73 74 61 74 65 29 20 73 74 .......(eq.(oref.topic.state).st
5faa0 61 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 ate)).......................'for
5fac0 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ge-suffix-active................
5fae0 20 20 20 20 20 27 74 72 61 6e 73 69 65 6e 74 2d 69 6e 61 70 74 2d 73 75 66 66 69 78 29 29 29 29 .....'transient-inapt-suffix))))
5fb00 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 ))..(transient-define-suffix.for
5fb20 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 65 2d 73 65 74 2d 6f 70 65 6e 20 28 29 0a 20 20 22 53 65 ge-topic-state-set-open.()..."Se
5fb40 74 20 74 68 65 20 73 74 61 74 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 t.the.state.of.the.current.topic
5fb60 20 74 6f 20 60 6f 70 65 6e 27 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f .to.`open'."...:class.'forge--to
5fb80 70 69 63 2d 73 65 74 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 74 61 74 65 20 27 pic-set-state-command...:state.'
5fba0 6f 70 65 6e 0a 20 20 3a 67 65 74 74 65 72 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 open...:getter.#'forge-current-t
5fbc0 6f 70 69 63 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 opic)..(transient-define-suffix.
5fbe0 66 6f 72 67 65 2d 63 68 61 74 74 65 72 2d 73 74 61 74 65 2d 73 65 74 2d 63 6f 6d 70 6c 65 74 65 forge-chatter-state-set-complete
5fc00 64 20 28 29 0a 20 20 22 53 65 74 20 74 68 65 20 73 74 61 74 65 20 6f 66 20 74 68 65 20 63 75 72 d.()..."Set.the.state.of.the.cur
5fc20 72 65 6e 74 20 64 69 73 63 75 73 73 69 6f 6e 20 6f 72 20 69 73 73 75 65 20 74 6f 20 60 63 6f 6d rent.discussion.or.issue.to.`com
5fc40 70 6c 65 74 65 64 27 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 pleted'."...:class.'forge--topic
5fc60 2d 73 65 74 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 74 61 74 65 20 27 63 6f 6d -set-state-command...:state.'com
5fc80 70 6c 65 74 65 64 0a 20 20 3a 67 65 74 74 65 72 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 pleted...:getter.#'forge-current
5fca0 2d 63 68 61 74 74 65 72 0a 20 20 3a 69 66 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 63 -chatter...:if.#'forge-current-c
5fcc0 68 61 74 74 65 72 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 hatter)..(transient-define-suffi
5fce0 78 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 73 74 61 74 65 2d 73 65 74 2d 75 6e 70 6c 61 6e 6e 65 x.forge-issue-state-set-unplanne
5fd00 64 20 28 29 0a 20 20 22 53 65 74 20 74 68 65 20 73 74 61 74 65 20 6f 66 20 74 68 65 20 63 75 72 d.()..."Set.the.state.of.the.cur
5fd20 72 65 6e 74 20 69 73 73 75 65 20 74 6f 20 60 75 6e 70 6c 61 6e 6e 65 64 27 2e 22 0a 20 20 3a 63 rent.issue.to.`unplanned'."...:c
5fd40 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 65 2d 63 6f 6d lass.'forge--topic-set-state-com
5fd60 6d 61 6e 64 0a 20 20 3a 73 74 61 74 65 20 27 75 6e 70 6c 61 6e 6e 65 64 0a 20 20 3a 67 65 74 74 mand...:state.'unplanned...:gett
5fd80 65 72 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 69 73 73 75 65 0a 20 20 3a 69 66 20 23 er.#'forge-current-issue...:if.#
5fda0 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 69 73 73 75 65 29 0a 0a 28 74 72 61 6e 73 69 65 6e 'forge-current-issue)..(transien
5fdc0 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 63 68 61 74 74 65 72 2d 73 74 t-define-suffix.forge-chatter-st
5fde0 61 74 65 2d 73 65 74 2d 64 75 70 6c 69 63 61 74 65 20 28 29 0a 20 20 22 53 65 74 20 74 68 65 20 ate-set-duplicate.()..."Set.the.
5fe00 73 74 61 74 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 73 63 75 73 73 69 6f 6e 20 state.of.the.current.discussion.
5fe20 6f 72 20 69 73 73 75 65 20 74 6f 20 60 64 75 70 6c 69 63 61 74 65 27 2e 22 0a 20 20 3a 63 6c 61 or.issue.to.`duplicate'."...:cla
5fe40 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 ss.'forge--topic-set-state-comma
5fe60 6e 64 0a 20 20 3a 73 74 61 74 65 20 27 64 75 70 6c 69 63 61 74 65 0a 20 20 3a 67 65 74 74 65 72 nd...:state.'duplicate...:getter
5fe80 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 63 68 61 74 74 65 72 0a 20 20 3a 69 66 20 23 .#'forge-current-chatter...:if.#
5fea0 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 63 68 61 74 74 65 72 0a 20 20 28 69 6e 74 65 72 61 'forge-current-chatter...(intera
5fec0 63 74 69 76 65 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 67 65 74 74 65 72 20 73 74 61 ctive)...(with-slots.(getter.sta
5fee0 74 65 29 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 2d 6f 62 6a 65 63 74 29 0a 20 20 te).(transient-suffix-object)...
5ff00 20 20 28 6c 65 74 20 28 28 74 6f 70 69 63 20 28 66 75 6e 63 61 6c 6c 20 67 65 74 74 65 72 20 74 ..(let.((topic.(funcall.getter.t
5ff20 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 20 74 6f 70 ))).......(if.(forge-issue-p.top
5ff40 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 0a 20 20 20 20 20 20 20 20 20 ic)...........(message..........
5ff60 20 20 22 54 68 65 20 41 50 49 20 64 6f 65 73 20 6e 6f 74 20 79 65 74 20 73 75 70 70 6f 72 74 20 .."The.API.does.not.yet.support.
5ff80 63 6c 6f 73 69 6e 67 20 61 6e 20 69 73 73 75 65 20 61 73 20 61 20 64 75 70 6c 69 63 61 74 65 22 closing.an.issue.as.a.duplicate"
5ffa0 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 73 74 61 74 ).........(forge--set-topic-stat
5ffc0 65 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 70 69 63 29 0a 20 e.(forge-get-repository.topic)..
5ffe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 ...............................t
60000 6f 70 69 63 20 73 74 61 74 65 29 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 opic.state)))))..(transient-defi
60020 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 2d 73 74 61 74 65 ne-suffix.forge-discussion-state
60040 2d 73 65 74 2d 6f 75 74 64 61 74 65 64 20 28 29 0a 20 20 22 53 65 74 20 74 68 65 20 73 74 61 74 -set-outdated.()..."Set.the.stat
60060 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 73 63 75 73 73 69 6f 6e 20 74 6f 20 60 e.of.the.current.discussion.to.`
60080 6f 75 74 64 61 74 65 64 27 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 outdated'."...:class.'forge--top
600a0 69 63 2d 73 65 74 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 74 61 74 65 20 27 6f ic-set-state-command...:state.'o
600c0 75 74 64 61 74 65 64 0a 20 20 3a 67 65 74 74 65 72 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e utdated...:getter.#'forge-curren
600e0 74 2d 64 69 73 63 75 73 73 69 6f 6e 0a 20 20 3a 69 66 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 t-discussion...:if.#'forge-curre
60100 6e 74 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e nt-discussion)..(transient-defin
60120 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 73 74 61 74 65 2d 73 65 74 e-suffix.forge-pullreq-state-set
60140 2d 6d 65 72 67 65 64 20 28 29 0a 20 20 22 4d 65 72 67 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 -merged.()..."Merge.the.current.
60160 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 69 6e 74 6f 20 69 74 73 20 74 61 72 67 65 74 2e 0a 50 72 pull-request.into.its.target..Pr
60180 6f 6d 70 74 20 74 68 65 20 75 73 65 72 20 74 6f 20 65 69 74 68 65 72 20 75 73 65 20 74 68 65 20 ompt.the.user.to.either.use.the.
601a0 41 50 49 20 74 6f 20 70 65 72 66 6f 72 6d 20 74 68 65 20 6d 65 72 67 65 20 6f 72 20 75 73 65 20 API.to.perform.the.merge.or.use.
601c0 47 69 74 2e 0a 49 20 72 65 63 6f 6d 6d 65 6e 64 20 79 6f 75 20 6f 6e 6c 79 20 75 73 65 20 74 68 Git..I.recommend.you.only.use.th
601e0 65 20 41 50 49 20 69 66 20 79 6f 75 72 20 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 20 65 6e 66 6f 72 e.API.if.your.organization.enfor
60200 63 65 73 20 74 68 61 74 0a 69 6e 66 65 72 69 6f 72 20 70 72 6f 63 65 73 73 2e 22 0a 20 20 3a 63 ces.that.inferior.process."...:c
60220 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 65 2d 63 6f 6d lass.'forge--topic-set-state-com
60240 6d 61 6e 64 0a 20 20 3a 73 74 61 74 65 20 27 6d 65 72 67 65 64 0a 20 20 3a 67 65 74 74 65 72 20 mand...:state.'merged...:getter.
60260 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 0a 20 20 3a 69 66 20 23 27 #'forge-current-pullreq...:if.#'
60280 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 0a 20 20 3a 74 72 61 6e 73 69 65 forge-current-pullreq...:transie
602a0 6e 74 20 6e 69 6c 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 nt.nil...(interactive)...(let.((
602c0 70 75 6c 6c 72 65 71 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 29 29 pullreq.(forge-current-pullreq))
602e0 29 0a 20 20 20 20 28 69 66 20 28 6d 61 67 69 74 2d 72 65 61 64 2d 63 68 61 72 2d 63 61 73 65 20 ).....(if.(magit-read-char-case.
60300 28 66 6f 72 6d 61 74 20 22 4d 65 72 67 65 20 23 25 73 20 22 20 28 6f 72 65 66 20 70 75 6c 6c 72 (format."Merge.#%s.".(oref.pullr
60320 65 71 20 6e 75 6d 62 65 72 29 29 20 74 0a 20 20 20 20 20 20 20 20 20 20 28 3f 67 20 22 75 73 69 eq.number)).t...........(?g."usi
60340 6e 67 20 5b 67 5d 69 74 20 28 72 65 63 6f 6d 6d 65 6e 64 65 64 29 22 20 74 29 0a 20 20 20 20 20 ng.[g]it.(recommended)".t)......
60360 20 20 20 20 20 28 3f 61 20 22 75 73 69 6e 67 20 5b 61 5d 70 69 22 20 6e 69 6c 29 29 0a 20 20 20 .....(?a."using.[a]pi".nil))....
60380 20 20 20 20 20 28 6c 65 74 20 28 28 62 72 61 6e 63 68 20 28 6f 72 20 28 66 6f 72 67 65 2d 2d 70 .....(let.((branch.(or.(forge--p
603a0 75 6c 6c 72 65 71 2d 62 72 61 6e 63 68 2d 61 63 74 69 76 65 20 70 75 6c 6c 72 65 71 29 0a 20 20 ullreq-branch-active.pullreq)...
603c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d ........................(forge--
603e0 62 72 61 6e 63 68 2d 70 75 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 29 29 29 29 0a 20 20 20 20 20 branch-pullreq.pullreq))))......
60400 20 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 75 70 73 74 72 65 61 6d 20 28 6d 61 67 69 74 2d 67 .....(if-let.((upstream.(magit-g
60420 65 74 2d 6c 6f 63 61 6c 2d 75 70 73 74 72 65 61 6d 2d 62 72 61 6e 63 68 20 62 72 61 6e 63 68 29 et-local-upstream-branch.branch)
60440 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 7a 65 72 6f 70 20 28 6d 61 67 ))...............(if.(zerop.(mag
60460 69 74 2d 63 61 6c 6c 2d 67 69 74 20 22 63 68 65 63 6b 6f 75 74 22 20 75 70 73 74 72 65 61 6d 29 it-call-git."checkout".upstream)
60480 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 6d 65 72 67 )...................(magit--merg
604a0 65 2d 61 62 73 6f 72 62 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 72 61 6e e-absorb....................bran
604c0 63 68 20 28 6d 61 67 69 74 2d 6d 65 72 67 65 2d 61 72 67 75 6d 65 6e 74 73 29 0a 20 20 20 20 20 ch.(magit-merge-arguments)......
604e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 55 73 65 72 73 20 6d 69 67 68 74 20 62 65 20 ..............;;.Users.might.be.
60500 73 75 72 70 72 69 73 65 64 20 74 68 61 74 20 77 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 surprised.that.we...............
60520 20 20 20 20 20 3b 3b 20 61 72 65 6e 27 74 20 64 6f 6e 65 20 79 65 74 2c 20 73 6f 20 64 72 6f 70 .....;;.aren't.done.yet,.so.drop
60540 20 61 20 68 69 6e 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 49 6e 73 .a.hint....................."Ins
60560 70 65 63 74 20 74 68 65 20 72 65 73 75 6c 74 2c 20 61 6e 64 20 69 66 20 73 61 74 69 73 66 69 65 pect.the.result,.and.if.satisfie
60580 64 20 70 75 73 68 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 d.push").................(user-e
605a0 72 72 6f 72 20 22 43 6f 75 6c 64 20 6e 6f 74 20 63 68 65 63 6b 6f 75 74 20 25 53 22 20 75 70 73 rror."Could.not.checkout.%S".ups
605c0 74 72 65 61 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 tream)).............(user-error.
605e0 22 4e 6f 20 75 70 73 74 72 65 61 6d 20 63 6f 6e 66 69 67 75 72 65 64 20 66 6f 72 20 25 53 22 20 "No.upstream.configured.for.%S".
60600 62 72 61 6e 63 68 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 6d 65 72 67 65 20 70 75 6c branch))).......(forge-merge.pul
60620 6c 72 65 71 20 28 66 6f 72 67 65 2d 73 65 6c 65 63 74 2d 6d 65 72 67 65 2d 6d 65 74 68 6f 64 29 lreq.(forge-select-merge-method)
60640 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 ))))..(transient-define-suffix.f
60660 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 73 74 61 74 65 2d 73 65 74 2d 72 65 6a 65 63 74 65 64 20 orge-pullreq-state-set-rejected.
60680 28 29 0a 20 20 22 53 65 74 20 74 68 65 20 73 74 61 74 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 ()..."Set.the.state.of.the.curre
606a0 6e 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 74 6f 20 60 72 65 6a 65 63 74 65 64 27 2e 22 0a nt.pull-request.to.`rejected'.".
606c0 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 65 ..:class.'forge--topic-set-state
606e0 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 74 61 74 65 20 27 72 65 6a 65 63 74 65 64 0a 20 20 3a 67 -command...:state.'rejected...:g
60700 65 74 74 65 72 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 0a 20 20 etter.#'forge-current-pullreq...
60720 3a 69 66 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 29 0a 0a 3b 3b :if.#'forge-current-pullreq)..;;
60740 3b 3b 20 53 74 61 74 75 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 2d 74 6f 70 69 ;;.Status..(defclass.forge--topi
60760 63 2d 73 65 74 2d 73 74 61 74 75 73 2d 63 6f 6d 6d 61 6e 64 20 28 74 72 61 6e 73 69 65 6e 74 2d c-set-status-command.(transient-
60780 73 75 66 66 69 78 29 0a 20 20 28 28 73 74 61 74 75 73 20 3a 69 6e 69 74 61 72 67 20 3a 73 74 61 suffix)...((status.:initarg.:sta
607a0 74 75 73 29 0a 20 20 20 28 64 65 66 69 6e 69 74 69 6f 6e 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 tus)....(definition.....:initfor
607c0 6d 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e m.(lambda.().................(in
607e0 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 teractive).................(with
60800 2d 73 6c 6f 74 73 20 28 73 74 61 74 75 73 29 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 -slots.(status).(transient-suffi
60820 78 2d 6f 62 6a 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 2d x-object)...................(if-
60840 6c 65 74 20 28 28 74 6f 70 69 63 73 20 28 66 6f 72 67 65 2d 72 65 67 69 6f 6e 2d 74 6f 70 69 63 let.((topics.(forge-region-topic
60860 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 s))).......................(doli
60880 73 74 20 28 74 6f 70 69 63 20 74 6f 70 69 63 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 st.(topic.topics)...............
608a0 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 63 20 73 74 61 74 75 73 20 73 74 61 ..........(oset.topic.status.sta
608c0 74 75 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 tus)).....................(oset.
608e0 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 20 74 29 20 73 74 61 74 75 73 20 73 (forge-current-topic.t).status.s
60900 74 61 74 75 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d tatus))).................(forge-
60920 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 28 64 65 73 63 72 69 70 74 69 6f refresh-buffer)))....(descriptio
60940 6e 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 6f 62 6a 29 0a 20 20 n.....:initform.(lambda.(obj)...
60960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 6f 72 65 66 ..............(symbol-name.(oref
60980 20 6f 62 6a 20 73 74 61 74 75 73 29 29 29 29 0a 20 20 20 28 69 6e 61 70 74 2d 69 66 0a 20 20 20 .obj.status))))....(inapt-if....
609a0 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 .:initform.(lambda.()...........
609c0 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 66 6f 72 67 65 2d 72 65 67 69 6f 6e 2d 74 6f ......(and.(not.(forge-region-to
609e0 70 69 63 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 2d pics))......................(if-
60a00 6c 65 74 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 let.((topic.(forge-current-topic
60a20 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 )))..........................(eq
60a40 20 28 6f 72 65 66 20 74 6f 70 69 63 20 73 74 61 74 75 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 .(oref.topic.status)............
60a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 28 74 72 61 6e 73 69 65 ..................(oref.(transie
60a80 6e 74 2d 73 75 66 66 69 78 2d 6f 62 6a 65 63 74 29 20 73 74 61 74 75 73 29 29 0a 20 20 20 20 20 nt-suffix-object).status))......
60aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 29 29 29 29 0a 20 20 20 28 69 6e 61 70 ..................t))))....(inap
60ac0 74 2d 66 61 63 65 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 29 0a t-face.....:initform.(lambda.().
60ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 6f 72 67 65 2d 63 75 72 72 65 ................(if.(forge-curre
60b00 6e 74 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 nt-topic).....................'f
60b20 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 orge-suffix-active..............
60b40 20 20 20 20 20 27 74 72 61 6e 73 69 65 6e 74 2d 69 6e 61 70 74 2d 73 75 66 66 69 78 29 29 29 29 .....'transient-inapt-suffix))))
60b60 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 )..(transient-define-suffix.forg
60b80 65 2d 74 6f 70 69 63 2d 73 74 61 74 75 73 2d 73 65 74 2d 75 6e 72 65 61 64 20 28 29 0a 20 20 22 e-topic-status-set-unread.()..."
60ba0 53 65 74 20 74 68 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 73 74 61 74 75 73 20 6f 66 20 74 Set.the.notification.status.of.t
60bc0 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 20 74 6f 20 60 75 6e 72 65 61 64 27 2e 22 0a 20 he.current.topic.to.`unread'."..
60be0 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 75 73 .:class.'forge--topic-set-status
60c00 2d 63 6f 6d 6d 61 6e 64 20 3a 73 74 61 74 75 73 20 27 75 6e 72 65 61 64 29 0a 0a 28 74 72 61 6e -command.:status.'unread)..(tran
60c20 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d sient-define-suffix.forge-topic-
60c40 73 74 61 74 75 73 2d 73 65 74 2d 70 65 6e 64 69 6e 67 20 28 29 0a 20 20 22 53 65 74 20 74 68 65 status-set-pending.()..."Set.the
60c60 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 73 74 61 74 75 73 20 6f 66 20 74 68 65 20 63 75 72 72 .notification.status.of.the.curr
60c80 65 6e 74 20 74 6f 70 69 63 20 74 6f 20 60 70 65 6e 64 69 6e 67 27 2e 22 0a 20 20 3a 63 6c 61 73 ent.topic.to.`pending'."...:clas
60ca0 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 75 73 2d 63 6f 6d 6d 61 s.'forge--topic-set-status-comma
60cc0 6e 64 20 3a 73 74 61 74 75 73 20 27 70 65 6e 64 69 6e 67 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 nd.:status.'pending)..(transient
60ce0 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 75 -define-suffix.forge-topic-statu
60d00 73 2d 73 65 74 2d 64 6f 6e 65 20 28 29 0a 20 20 22 53 65 74 20 74 68 65 20 6e 6f 74 69 66 69 63 s-set-done.()..."Set.the.notific
60d20 61 74 69 6f 6e 20 73 74 61 74 75 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 ation.status.of.the.current.topi
60d40 63 20 74 6f 20 60 64 6f 6e 65 27 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 c.to.`done'."...:class.'forge--t
60d60 6f 70 69 63 2d 73 65 74 2d 73 74 61 74 75 73 2d 63 6f 6d 6d 61 6e 64 20 3a 73 74 61 74 75 73 20 opic-set-status-command.:status.
60d80 27 64 6f 6e 65 29 0a 0a 3b 3b 3b 3b 20 53 65 74 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 'done)..;;;;.Set..(defclass.forg
60da0 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 2d 63 6f 6d 6d 61 6e 64 20 28 74 72 61 6e 73 e--topic-set-slot-command.(trans
60dc0 69 65 6e 74 2d 73 75 66 66 69 78 29 0a 20 20 28 28 73 6c 6f 74 20 3a 69 6e 69 74 61 72 67 20 3a ient-suffix)...((slot.:initarg.:
60de0 73 6c 6f 74 29 0a 20 20 20 28 73 65 74 74 65 72 29 0a 20 20 20 28 72 65 61 64 65 72 20 3a 69 6e slot)....(setter)....(reader.:in
60e00 69 74 61 72 67 20 3a 72 65 61 64 65 72 29 0a 20 20 20 28 66 6f 72 6d 61 74 74 65 72 20 3a 69 6e itarg.:reader)....(formatter.:in
60e20 69 74 61 72 67 20 3a 66 6f 72 6d 61 74 74 65 72 29 0a 20 20 20 28 64 65 66 69 6e 69 74 69 6f 6e itarg.:formatter)....(definition
60e40 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 76 61 6c 75 65 29 0a 20 .....:initform.(lambda.(value)..
60e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 20 ...............(interactive.....
60e80 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 66 75 6e 63 61 6c 6c 20 28 6f 72 65 .............(list.(funcall.(ore
60ea0 66 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 2d 6f 62 6a 65 63 74 29 20 72 65 61 64 f.(transient-suffix-object).read
60ec0 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 er).............................
60ee0 20 20 20 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 20 74 29 29 29 29 0a 20 ....(forge-current-topic.t))))..
60f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 74 6f 70 69 63 20 28 66 6f 72 ...............(let.((topic.(for
60f20 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 ge-current-topic.t)))...........
60f40 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 6f 72 65 66 20 28 74 72 61 6e 73 69 65 6e ........(funcall.(oref.(transien
60f60 74 2d 73 75 66 66 69 78 2d 6f 62 6a 65 63 74 29 20 73 65 74 74 65 72 29 0a 20 20 20 20 20 20 20 t-suffix-object).setter)........
60f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 ....................(forge-get-r
60fa0 65 70 6f 73 69 74 6f 72 79 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 epository.topic)................
60fc0 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 70 69 63 20 76 61 6c 75 65 29 29 29 29 0a 20 20 20 28 ............topic.value))))....(
60fe0 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 description.....:initform.(lambd
61000 61 20 28 6f 62 6a 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c a.(obj).................(with-sl
61020 6f 74 73 20 28 73 6c 6f 74 20 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 29 20 6f 62 6a 0a 20 20 20 20 ots.(slot.inapt-if-not).obj.....
61040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 2d 6c 65 74 2a 20 28 28 74 6f 70 69 63 20 28 ..............(if-let*.((topic.(
61060 69 66 20 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 if.inapt-if-not.................
61080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 .......................(funcall.
610a0 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 inapt-if-not)...................
610c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e ...................(forge-curren
610e0 74 2d 74 6f 70 69 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t-topic)))......................
61100 20 20 20 20 20 20 20 28 76 61 6c 75 65 20 28 66 75 6e 63 61 6c 6c 20 28 6f 72 65 66 20 6f 62 6a .......(value.(funcall.(oref.obj
61120 20 66 6f 72 6d 61 74 74 65 72 29 20 74 6f 70 69 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 .formatter).topic)))............
61140 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 25 73 22 20 73 6c 6f 74 20 ...........(format."%s.%s".slot.
61160 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d value).....................(form
61180 61 74 20 22 25 73 22 20 73 6c 6f 74 29 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 at."%s".slot)))))))..(cl-defmeth
611a0 6f 64 20 69 6e 69 74 69 61 6c 69 7a 65 2d 69 6e 73 74 61 6e 63 65 20 3a 61 66 74 65 72 0a 20 20 od.initialize-instance.:after...
611c0 28 28 6f 62 6a 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 2d 63 6f 6d 6d ((obj.forge--topic-set-slot-comm
611e0 61 6e 64 29 20 26 6f 70 74 69 6f 6e 61 6c 20 5f 73 6c 6f 74 73 29 0a 20 20 28 77 69 74 68 2d 73 and).&optional._slots)...(with-s
61200 6c 6f 74 73 20 28 73 6c 6f 74 29 20 6f 62 6a 0a 20 20 20 20 28 6c 65 74 20 28 28 6e 61 6d 65 20 lots.(slot).obj.....(let.((name.
61220 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 73 6c 6f 74 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 (symbol-name.slot))).......(cond
61240 20 28 28 73 6c 6f 74 2d 62 6f 75 6e 64 70 20 6f 62 6a 20 27 72 65 61 64 65 72 29 29 0a 20 20 20 .((slot-boundp.obj.'reader))....
61260 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 73 75 66 66 69 78 2d 70 20 22 2d 70 22 20 .........((string-suffix-p."-p".
61280 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6e 61 6d 65 20 28 73 name)..............(setq.name.(s
612a0 75 62 73 74 72 69 6e 67 20 6e 61 6d 65 20 30 20 2d 32 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 ubstring.name.0.-2))............
612c0 20 20 28 6f 73 65 74 20 6f 62 6a 20 72 65 61 64 65 72 20 28 23 23 6e 6f 74 20 28 65 69 65 69 6f ..(oset.obj.reader.(##not.(eieio
612e0 2d 6f 72 65 66 20 25 20 73 6c 6f 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6f -oref.%.slot)))).............((o
61300 73 65 74 20 6f 62 6a 20 72 65 61 64 65 72 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 set.obj.reader.(intern.(format."
61320 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 25 73 22 20 6e 61 6d 65 29 29 29 29 29 0a 20 forge-read-topic-%s".name)))))..
61340 20 20 20 20 20 28 6f 73 65 74 20 6f 62 6a 20 73 65 74 74 65 72 20 28 69 6e 74 65 72 6e 20 28 66 .....(oset.obj.setter.(intern.(f
61360 6f 72 6d 61 74 20 22 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 25 73 22 20 6e 61 6d 65 ormat."forge--set-topic-%s".name
61380 29 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 6c 6f 74 2d 62 6f 75 6e 64 70 20 6f ))).......(unless.(slot-boundp.o
613a0 62 6a 20 27 66 6f 72 6d 61 74 74 65 72 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 6f 62 6a bj.'formatter).........(oset.obj
613c0 20 66 6f 72 6d 61 74 74 65 72 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 66 6f 72 67 .formatter.(intern.(format."forg
613e0 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 25 73 22 20 6e 61 6d 65 29 29 29 29 29 29 29 0a e--format-topic-%s".name))))))).
61400 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d .(transient-define-suffix.forge-
61420 74 6f 70 69 63 2d 73 65 74 2d 74 69 74 6c 65 20 28 74 69 74 6c 65 29 0a 20 20 22 45 64 69 74 20 topic-set-title.(title)..."Edit.
61440 74 68 65 20 54 49 54 4c 45 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 2e 22 the.TITLE.of.the.current.topic."
61460 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 ...:class.'forge--topic-set-slot
61480 2d 63 6f 6d 6d 61 6e 64 20 3a 73 6c 6f 74 20 27 74 69 74 6c 65 0a 20 20 3a 69 6e 61 70 74 2d 69 -command.:slot.'title...:inapt-i
614a0 66 2d 6e 6f 74 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 0a 20 20 3a 66 f-not.#'forge-current-topic...:f
614c0 6f 72 6d 61 74 74 65 72 20 28 6c 61 6d 62 64 61 20 28 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 ormatter.(lambda.(topic)........
614e0 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 74 72 75 6e 63 61 74 65 2d 73 74 ........(propertize.(truncate-st
61500 72 69 6e 67 2d 74 6f 2d 77 69 64 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ring-to-width...................
61520 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 74 ..........(forge--format-topic-t
61540 69 74 6c 65 20 74 6f 70 69 63 29 20 33 34 20 6e 69 6c 20 3f 5c 73 20 74 29 0a 20 20 20 20 20 20 itle.topic).34.nil.?\s.t).......
61560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 .....................'face.'font
61580 2d 6c 6f 63 6b 2d 73 74 72 69 6e 67 2d 66 61 63 65 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 -lock-string-face)))..(transient
615a0 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 2d 63 -define-suffix.forge-topic-set-c
615c0 61 74 65 67 6f 72 79 20 28 63 61 74 65 67 6f 72 79 29 0a 20 20 22 45 64 69 74 20 74 68 65 20 43 ategory.(category)..."Edit.the.C
615e0 41 54 45 47 4f 52 59 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 73 63 75 73 73 69 6f ATEGORY.of.the.current.discussio
61600 6e 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 n."...:class.'forge--topic-set-s
61620 6c 6f 74 2d 63 6f 6d 6d 61 6e 64 20 3a 73 6c 6f 74 20 27 63 61 74 65 67 6f 72 79 0a 20 20 3a 69 lot-command.:slot.'category...:i
61640 6e 61 70 74 2d 69 66 2d 6e 6f 74 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 64 69 73 63 napt-if-not.#'forge-current-disc
61660 75 73 73 69 6f 6e 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 ussion)..(transient-define-suffi
61680 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 2d 6d 69 6c 65 73 74 6f 6e 65 20 28 6d 69 6c x.forge-topic-set-milestone.(mil
616a0 65 73 74 6f 6e 65 29 0a 20 20 22 45 64 69 74 20 77 68 61 74 20 4d 49 4c 45 53 54 4f 4e 45 20 74 estone)..."Edit.what.MILESTONE.t
616c0 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 20 62 65 6c 6f 6e 67 73 20 74 6f 2e 22 0a 20 20 he.current.topic.belongs.to."...
616e0 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 2d 63 6f :class.'forge--topic-set-slot-co
61700 6d 6d 61 6e 64 20 3a 73 6c 6f 74 20 27 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 3a 69 6e 61 70 74 2d mmand.:slot.'milestone...:inapt-
61720 69 66 2d 6e 6f 74 20 28 23 23 6f 72 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 69 73 73 75 if-not.(##or.(forge-current-issu
61740 65 29 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 29 29 29 0a 0a 28 74 e).(forge-current-pullreq)))..(t
61760 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 ransient-define-suffix.forge-top
61780 69 63 2d 73 65 74 2d 6c 61 62 65 6c 73 20 28 6c 61 62 65 6c 73 29 0a 20 20 22 45 64 69 74 20 74 ic-set-labels.(labels)..."Edit.t
617a0 68 65 20 4c 41 42 45 4c 53 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 2e 22 he.LABELS.of.the.current.topic."
617c0 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 ...:class.'forge--topic-set-slot
617e0 2d 63 6f 6d 6d 61 6e 64 20 3a 73 6c 6f 74 20 27 6c 61 62 65 6c 73 0a 20 20 3a 69 6e 61 70 74 2d -command.:slot.'labels...:inapt-
61800 69 66 2d 6e 6f 74 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 0a 20 20 3a if-not.#'forge-current-topic...:
61820 66 6f 72 6d 61 74 74 65 72 20 28 23 23 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 6c 61 62 65 6c formatter.(##forge--format-label
61840 73 20 25 20 74 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 s.%.t))..(transient-define-suffi
61860 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 2d 6d 61 72 6b 73 20 28 6d 61 72 6b 73 29 0a x.forge-topic-set-marks.(marks).
61880 20 20 22 45 64 69 74 20 74 68 65 20 4d 41 52 4b 53 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 .."Edit.the.MARKS.of.the.current
618a0 20 74 6f 70 69 63 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d .topic."...:class.'forge--topic-
618c0 73 65 74 2d 73 6c 6f 74 2d 63 6f 6d 6d 61 6e 64 20 3a 73 6c 6f 74 20 27 6d 61 72 6b 73 0a 20 20 set-slot-command.:slot.'marks...
618e0 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f :inapt-if-not.#'forge-current-to
61900 70 69 63 0a 20 20 3a 66 6f 72 6d 61 74 74 65 72 20 28 23 23 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 pic...:formatter.(##forge--forma
61920 74 2d 6d 61 72 6b 73 20 25 20 74 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 t-marks.%.t))..(transient-define
61940 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 2d 61 73 73 69 67 6e 65 65 -suffix.forge-topic-set-assignee
61960 73 20 28 61 73 73 69 67 6e 65 65 73 29 0a 20 20 22 45 64 69 74 20 74 68 65 20 41 53 53 49 47 4e s.(assignees)..."Edit.the.ASSIGN
61980 45 45 53 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 2e 22 0a 20 20 3a 63 6c EES.of.the.current.topic."...:cl
619a0 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 2d 63 6f 6d 6d 61 ass.'forge--topic-set-slot-comma
619c0 6e 64 20 3a 73 6c 6f 74 20 27 61 73 73 69 67 6e 65 65 73 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d nd.:slot.'assignees...:inapt-if-
619e0 6e 6f 74 20 28 23 23 6f 72 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 69 73 73 75 65 29 20 not.(##or.(forge-current-issue).
61a00 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 29 29 29 0a 0a 28 74 72 61 6e (forge-current-pullreq)))..(tran
61a20 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d sient-define-suffix.forge-topic-
61a40 73 65 74 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 20 28 72 65 76 69 65 77 2d 72 65 71 75 set-review-requests.(review-requ
61a60 65 73 74 73 29 0a 20 20 22 45 64 69 74 20 74 68 65 20 52 45 56 49 45 57 2d 52 45 51 55 45 53 54 ests)..."Edit.the.REVIEW-REQUEST
61a80 53 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 22 0a S.of.the.current.pull-request.".
61aa0 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 2d ..:class.'forge--topic-set-slot-
61ac0 63 6f 6d 6d 61 6e 64 20 3a 73 6c 6f 74 20 27 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 0a 20 command.:slot.'review-requests..
61ae0 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 .:inapt-if-not.#'forge-current-p
61b00 75 6c 6c 72 65 71 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 ullreq)..(transient-define-suffi
61b20 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 74 6f 67 67 6c 65 2d 64 72 61 66 74 20 28 64 72 61 66 x.forge-topic-toggle-draft.(draf
61b40 74 29 0a 20 20 22 54 6f 67 67 6c 65 20 77 68 65 74 68 65 72 20 74 68 65 20 63 75 72 72 65 6e 74 t)..."Toggle.whether.the.current
61b60 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 69 73 20 61 20 64 72 61 66 74 2e 22 0a 20 20 3a 63 6c .pull-request.is.a.draft."...:cl
61b80 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 2d 63 6f 6d 6d 61 ass.'forge--topic-set-slot-comma
61ba0 6e 64 20 3a 73 6c 6f 74 20 27 64 72 61 66 74 2d 70 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f nd.:slot.'draft-p...:inapt-if-no
61bc0 74 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 0a 20 20 3a 64 65 73 t.#'forge-current-pullreq...:des
61be0 63 72 69 70 74 69 6f 6e 20 28 23 23 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 62 6f 6f 6c 65 61 cription.(##forge--format-boolea
61c00 6e 20 27 64 72 61 66 74 2d 70 20 22 64 72 61 66 74 22 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 n.'draft-p."draft"))..(transient
61c20 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 74 6f 67 67 6c -define-suffix.forge-topic-toggl
61c40 65 2d 73 61 76 65 64 20 28 29 0a 20 20 22 54 6f 67 67 6c 65 20 77 68 65 74 68 65 72 20 74 68 69 e-saved.()..."Toggle.whether.thi
61c60 73 20 74 6f 70 69 63 20 69 73 20 6d 61 72 6b 65 64 20 61 73 20 73 61 76 65 64 2e 22 0a 20 20 3a s.topic.is.marked.as.saved."...:
61c80 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 2d 63 6f 6d class.'forge--topic-set-slot-com
61ca0 6d 61 6e 64 20 3a 73 6c 6f 74 20 27 73 61 76 65 64 2d 70 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d mand.:slot.'saved-p...:inapt-if-
61cc0 6e 6f 74 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 0a 20 20 3a 64 65 73 not.#'forge-current-topic...:des
61ce0 63 72 69 70 74 69 6f 6e 20 28 23 23 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 62 6f 6f 6c 65 61 cription.(##forge--format-boolea
61d00 6e 20 27 73 61 76 65 64 2d 70 20 22 73 61 76 65 64 22 29 0a 20 20 3b 3b 20 53 65 74 20 6f 6e 6c n.'saved-p."saved")...;;.Set.onl
61d20 79 20 6c 6f 63 61 6c 6c 79 20 62 65 63 61 75 73 65 20 47 69 74 68 75 62 27 73 20 41 50 49 20 64 y.locally.because.Github's.API.d
61d40 6f 65 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 20 74 68 69 73 2e 0a 20 20 28 69 6e 74 65 72 61 63 oes.not.support.this....(interac
61d60 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 63 75 72 72 tive)...(let.((topic.(forge-curr
61d80 65 6e 74 2d 74 6f 70 69 63 20 74 29 29 29 0a 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 63 20 73 ent-topic.t))).....(oset.topic.s
61da0 61 76 65 64 2d 70 20 28 6e 6f 74 20 28 6f 72 65 66 20 74 6f 70 69 63 20 73 61 76 65 64 2d 70 29 aved-p.(not.(oref.topic.saved-p)
61dc0 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a 0a 28 )))...(forge-refresh-buffer))..(
61de0 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 64 69 transient-define-suffix.forge-di
61e00 73 63 75 73 73 69 6f 6e 2d 73 65 74 2d 61 6e 73 77 65 72 20 28 70 6f 73 74 29 0a 20 20 22 4d 61 scussion-set-answer.(post)..."Ma
61e20 72 6b 20 74 68 65 20 70 6f 73 74 20 61 74 20 70 6f 69 6e 74 20 61 73 20 74 68 65 20 61 6e 73 77 rk.the.post.at.point.as.the.answ
61e40 65 72 20 74 6f 20 74 68 65 20 63 75 72 72 65 6e 74 20 71 75 65 73 74 69 6f 6e 2e 0a 57 68 65 6e er.to.the.current.question..When
61e60 20 70 6f 69 6e 74 20 69 73 20 6f 6e 20 74 68 65 20 61 6e 73 77 65 72 2c 20 74 68 65 6e 20 75 6e .point.is.on.the.answer,.then.un
61e80 6d 61 72 6b 20 69 74 20 61 6e 64 20 6d 61 72 6b 20 6e 6f 20 6f 74 68 65 72 2e 22 0a 20 20 3a 63 mark.it.and.mark.no.other."...:c
61ea0 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 2d 63 6f 6d 6d lass.'forge--topic-set-slot-comm
61ec0 61 6e 64 20 3a 73 6c 6f 74 20 27 61 6e 73 77 65 72 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f and.:slot.'answer...:inapt-if-no
61ee0 74 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 t.(lambda.()...................(
61f00 61 6e 64 2d 6c 65 74 2a 20 28 28 64 69 73 63 75 73 73 69 6f 6e 20 28 66 6f 72 67 65 2d 63 75 72 and-let*.((discussion.(forge-cur
61f20 72 65 6e 74 2d 64 69 73 63 75 73 73 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rent-discussion))...............
61f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 74 65 67 6f 72 79 20 28 6f 72 65 66 20 64 ...............(category.(oref.d
61f60 69 73 63 75 73 73 69 6f 6e 20 63 61 74 65 67 6f 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 iscussion.category)))...........
61f80 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 31 20 5b 3a 73 65 6c 65 63 74 20 61 ..........(forge-sql1.[:select.a
61fa0 6e 73 77 65 72 61 62 6c 65 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nswerable-p.....................
61fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 64 69 73 63 75 73 73 69 6f 6e 2d 63 61 .............:from.discussion-ca
61fe0 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tegory..........................
62000 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 69 64 20 24 73 31 29 5d 0a 20 20 20 20 20 ........:where.(=.id.$s1)]......
62020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 74 65 67 ...........................categ
62040 6f 72 79 29 29 29 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 28 23 23 66 6f 72 67 65 2d 2d ory)))...:description.(##forge--
62060 66 6f 72 6d 61 74 2d 62 6f 6f 6c 65 61 6e 20 27 61 6e 73 77 65 72 20 22 61 6e 73 77 65 72 65 64 format-boolean.'answer."answered
62080 22 29 0a 20 20 3a 72 65 61 64 65 72 20 23 27 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 64 69 73 ")...:reader.#'forge--select-dis
620a0 63 75 73 73 69 6f 6e 2d 61 6e 73 77 65 72 29 0a 0a 3b 3b 3b 20 43 6f 6c 6f 72 20 55 74 69 6c 69 cussion-answer)..;;;.Color.Utili
620c0 74 69 65 73 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 63 6f 6c ties..(defun.forge--sanitize-col
620e0 6f 72 20 28 63 6f 6c 6f 72 29 0a 20 20 28 63 6f 6e 64 20 28 28 63 6f 6c 6f 72 2d 76 61 6c 75 65 or.(color)...(cond.((color-value
62100 73 20 63 6f 6c 6f 72 29 20 63 6f 6c 6f 72 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 44 69 73 63 61 s.color).color).........;;.Disca
62120 72 64 20 61 6c 70 68 61 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 0a 20 20 20 20 20 20 20 20 28 28 rd.alpha.information..........((
62140 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 60 23 2e 5c 5c 7b 34 5c 5c 7d 5c 5c 27 22 string-match-p."\\`#.\\{4\\}\\'"
62160 20 63 6f 6c 6f 72 29 20 28 73 75 62 73 74 72 69 6e 67 20 63 6f 6c 6f 72 20 30 20 33 29 29 0a 20 .color).(substring.color.0.3))..
62180 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 60 23 2e 5c 5c .......((string-match-p."\\`#.\\
621a0 7b 38 5c 5c 7d 5c 5c 27 22 20 63 6f 6c 6f 72 29 20 28 73 75 62 73 74 72 69 6e 67 20 63 6f 6c 6f {8\\}\\'".color).(substring.colo
621c0 72 20 30 20 36 29 29 0a 20 20 20 20 20 20 20 20 28 74 20 22 23 30 30 30 30 30 30 22 29 29 29 20 r.0.6)).........(t."#000000"))).
621e0 3b 20 55 73 65 20 66 61 6c 6c 62 61 63 6b 20 69 6e 73 74 65 61 64 20 6f 66 20 69 6e 76 61 6c 69 ;.Use.fallback.instead.of.invali
62200 64 20 63 6f 6c 6f 72 2e 0a 0a 3b 3b 3b 20 4d 61 72 6b 64 6f 77 6e 20 55 74 69 6c 69 74 69 65 73 d.color...;;;.Markdown.Utilities
62220 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f 6e 74 69 66 79 2d 6d 61 72 6b 64 6f 77 6e ..(defun.forge--fontify-markdown
62240 20 28 74 65 78 74 20 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 64 65 6e 74 29 0a 20 20 28 77 69 74 68 .(text.&optional.indent)...(with
62260 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 64 65 6c 61 79 2d 6d 6f 64 65 2d 68 6f 6f -temp-buffer.....(delay-mode-hoo
62280 6b 73 0a 20 20 20 20 20 20 28 67 66 6d 2d 6d 6f 64 65 29 29 0a 20 20 20 20 28 69 6e 73 65 72 74 ks.......(gfm-mode)).....(insert
622a0 20 74 65 78 74 29 0a 20 20 20 20 28 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 6e 73 75 72 65 29 0a 20 20 .text).....(font-lock-ensure)...
622c0 20 20 28 77 68 65 6e 20 66 6f 72 67 65 2d 70 6f 73 74 2d 66 69 6c 6c 2d 72 65 67 69 6f 6e 0a 20 ..(when.forge-post-fill-region..
622e0 20 20 20 20 20 28 77 68 65 6e 20 69 6e 64 65 6e 74 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 .....(when.indent.........(setq.
62300 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 28 2d 20 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 69 6e 64 65 6e fill-column.(-.fill-column.inden
62320 74 29 29 29 0a 20 20 20 20 20 20 28 66 69 6c 6c 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d t))).......(fill-region.(point-m
62340 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 69 6e 64 65 in).(point-max))).....(when.inde
62360 6e 74 0a 20 20 20 20 20 20 28 69 6e 64 65 6e 74 2d 72 69 67 69 64 6c 79 20 28 70 6f 69 6e 74 2d nt.......(indent-rigidly.(point-
62380 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 69 6e 64 65 6e 74 29 29 0a 20 20 20 20 28 6c min).(point-max).indent)).....(l
623a0 65 74 2a 20 28 28 73 74 72 69 6e 67 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 0a 20 20 et*.((string.(buffer-string))...
623c0 20 20 20 20 20 20 20 20 20 28 62 65 67 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 64 .........(beg.0)............(end
623e0 20 28 6c 65 6e 67 74 68 20 73 74 72 69 6e 67 29 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 .(length.string))).......(while.
62400 28 3c 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 6f 73 20 28 (<.beg.end).........(let.((pos.(
62420 6e 65 78 74 2d 73 69 6e 67 6c 65 2d 70 72 6f 70 65 72 74 79 2d 63 68 61 6e 67 65 20 62 65 67 20 next-single-property-change.beg.
62440 27 66 61 63 65 20 73 74 72 69 6e 67 20 65 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 'face.string.end))..............
62460 20 28 76 61 6c 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 62 65 67 20 27 66 61 .(val.(get-text-property.beg.'fa
62480 63 65 20 73 74 72 69 6e 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 ce.string)))...........(put-text
624a0 2d 70 72 6f 70 65 72 74 79 20 62 65 67 20 70 6f 73 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 -property.beg.pos.'font-lock-fac
624c0 65 20 76 61 6c 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 76 65 2d e.val.string)...........(remove-
624e0 6c 69 73 74 2d 6f 66 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 62 65 67 20 70 6f 73 20 list-of-text-properties.beg.pos.
62500 27 28 66 61 63 65 29 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 '(face).string)...........(setq.
62520 62 65 67 20 70 6f 73 29 29 29 0a 20 20 20 20 20 20 73 74 72 69 6e 67 29 29 29 0a 0a 28 64 65 66 beg.pos))).......string)))..(def
62540 75 6e 20 66 6f 72 67 65 2d 2d 6d 61 72 6b 64 6f 77 6e 2d 74 72 61 6e 73 6c 61 74 65 2d 66 69 6c un.forge--markdown-translate-fil
62560 65 6e 61 6d 65 2d 66 75 6e 63 74 69 6f 6e 20 28 66 69 6c 65 29 0a 20 20 28 69 66 20 28 73 74 72 ename-function.(file)...(if.(str
62580 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 60 68 74 74 70 73 3f 3a 2f 2f 22 20 66 69 6c 65 29 ing-match-p."\\`https?://".file)
625a0 0a 20 20 20 20 20 20 66 69 6c 65 0a 20 20 20 20 28 6c 65 74 20 28 28 68 6f 73 74 20 28 6f 72 65 .......file.....(let.((host.(ore
625c0 66 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 f.(forge-get-repository.:tracked
625e0 29 20 66 6f 72 67 65 29 29 29 20 3b 61 6b 61 20 77 65 62 68 6f 73 74 0a 20 20 20 20 20 20 28 63 ).forge))).;aka.webhost.......(c
62600 6f 6e 63 61 74 20 28 69 66 20 28 6d 65 6d 62 65 72 20 68 6f 73 74 20 67 68 75 62 2d 69 6e 73 65 oncat.(if.(member.host.ghub-inse
62620 63 75 72 65 2d 68 6f 73 74 73 29 20 22 68 74 74 70 3a 2f 2f 22 20 22 68 74 74 70 73 3a 2f 2f 22 cure-hosts)."http://"."https://"
62640 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 68 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 )...............host............
62660 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 2f ...(and.(not.(string-prefix-p."/
62680 22 20 66 69 6c 65 29 29 20 22 2f 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 ".file))."/")...............file
626a0 29 29 29 29 0a 0a 3b 3b 3b 20 54 65 6d 70 6c 61 74 65 73 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 ))))..;;;.Templates..(defun.forg
626c0 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 20 28 72 65 70 6f 20 63 6c 61 73 73 29 0a 20 e--topic-template.(repo.class)..
626e0 20 28 75 6e 6c 65 73 73 20 72 65 70 6f 0a 20 20 20 20 28 73 65 74 71 20 72 65 70 6f 20 28 66 6f .(unless.repo.....(setq.repo.(fo
62700 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 29 29 29 0a 20 rge-get-repository.:tracked)))..
62720 20 28 6c 65 74 2a 20 28 28 74 65 6d 70 6c 61 74 65 73 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 .(let*.((templates.(forge--topic
62740 2d 74 65 6d 70 6c 61 74 65 73 20 72 65 70 6f 20 63 6c 61 73 73 29 29 0a 20 20 20 20 20 20 20 20 -templates.repo.class)).........
62760 20 28 74 65 6d 70 6c 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 63 64 72 20 74 65 .(template...........(if.(cdr.te
62780 6d 70 6c 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 20 mplates)...............(let.((c.
627a0 28 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 0a 20 20 20 20 20 20 20 20 20 (magit-completing-read..........
627c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 20 63 6c 61 73 73 0a 20 20 20 20 ...............(pcase.class.....
627e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 66 6f 72 67 65 2d 69 73 ......................('forge-is
62800 73 75 65 20 20 20 22 53 65 6c 65 63 74 20 69 73 73 75 65 20 74 65 6d 70 6c 61 74 65 22 29 0a 20 sue..."Select.issue.template")..
62820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 66 6f 72 67 65 .........................('forge
62840 2d 70 75 6c 6c 72 65 71 20 22 53 65 6c 65 63 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 74 65 -pullreq."Select.pull-request.te
62860 6d 70 6c 61 74 65 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 mplate")).......................
62880 20 20 28 6d 61 70 63 61 72 20 28 23 23 61 6c 69 73 74 2d 67 65 74 20 27 70 72 6f 6d 70 74 20 25 ..(mapcar.(##alist-get.'prompt.%
628a0 29 20 74 65 6d 70 6c 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ).templates)....................
628c0 20 20 20 20 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 .....nil.t))).................(s
628e0 65 71 2d 66 69 6e 64 20 28 23 23 65 71 75 61 6c 20 28 61 6c 69 73 74 2d 67 65 74 20 27 70 72 6f eq-find.(##equal.(alist-get.'pro
62900 6d 70 74 20 25 29 20 63 29 20 74 65 6d 70 6c 61 74 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 mpt.%).c).templates))...........
62920 20 20 28 63 61 72 20 74 65 6d 70 6c 61 74 65 73 29 29 29 29 0a 20 20 20 20 28 69 66 2d 6c 65 74 ..(car.templates)))).....(if-let
62940 20 28 28 75 72 6c 20 28 61 6c 69 73 74 2d 67 65 74 20 27 75 72 6c 20 74 65 6d 70 6c 61 74 65 29 .((url.(alist-get.'url.template)
62960 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 28 66 6f )).........(if.(string-match.(fo
62980 72 67 65 2d 2d 66 6f 72 6d 61 74 20 72 65 70 6f 20 22 5c 0a 5c 5c 60 68 74 74 70 73 3a 2f 2f 25 rge--format.repo."\.\\`https://%
629a0 68 2f 5b 5e 2f 5d 2b 2f 5b 5e 2f 5d 2b 2f 64 69 73 63 75 73 73 69 6f 6e 73 5c 5c 28 3f 3a 2f 63 h/[^/]+/[^/]+/discussions\\(?:/c
629c0 61 74 65 67 6f 72 69 65 73 2f 5c 5c 28 2e 2b 5c 5c 29 5c 5c 29 3f 22 29 0a 20 20 20 20 20 20 20 ategories/\\(.+\\)\\)?")........
629e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 72 6c 29 0a 20 20 20 20 20 20 20 20 ...................url).........
62a00 20 20 20 20 60 28 28 74 79 70 65 20 2e 20 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a ....`((type...forge-discussion).
62a20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 74 65 67 6f 72 79 20 2e 20 2c 28 6f 72 20 28 ..............(category...,(or.(
62a40 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 75 72 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 match-string.1.url).............
62a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 74 ...................(forge-read-t
62a80 6f 70 69 63 2d 63 61 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 opic-category...................
62aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 22 43 61 74 65 67 6f 72 79 20 66 6f 72 20 ..............nil."Category.for.
62ac0 6e 65 77 20 64 69 73 63 75 73 73 69 6f 6e 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 60 28 new.discussion"))))...........`(
62ae0 28 74 79 70 65 20 2e 20 72 65 64 69 72 65 63 74 29 20 2c 40 74 65 6d 70 6c 61 74 65 29 29 0a 20 (type...redirect).,@template))..
62b00 20 20 20 20 20 60 28 28 74 79 70 65 20 2e 20 2c 63 6c 61 73 73 29 20 2c 40 74 65 6d 70 6c 61 74 .....`((type...,class).,@templat
62b20 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c e))))..(defun.forge--topic-templ
62b40 61 74 65 73 20 28 72 65 70 6f 20 63 6c 61 73 73 29 0a 20 20 28 6d 61 70 63 61 6e 20 28 6c 61 6d ates.(repo.class)...(mapcan.(lam
62b60 62 64 61 20 28 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d bda.(file).............(with-tem
62b80 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 69 p-buffer...............(magit-gi
62ba0 74 2d 69 6e 73 65 72 74 20 22 63 61 74 2d 66 69 6c 65 22 20 22 2d 70 22 20 66 69 6c 65 29 0a 20 t-insert."cat-file"."-p".file)..
62bc0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 75 61 6c 20 28 66 69 6c 65 2d 6e 61 .............(if.(equal.(file-na
62be0 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 29 20 22 63 6f 6e 66 69 67 2e 79 6d me-nondirectory.file)."config.ym
62c00 6c 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 6f l")...................(forge--to
62c20 70 69 63 2d 70 61 72 73 65 2d 74 65 6d 70 6c 61 74 65 2d 63 6f 6e 66 69 67 29 0a 20 20 20 20 20 pic-parse-template-config)......
62c40 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 70 ...........(list.(forge--topic-p
62c60 61 72 73 65 2d 74 65 6d 70 6c 61 74 65 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 62 61 73 65 20 66 69 arse-template.(file-name-base.fi
62c80 6c 65 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 le))))))...........(forge--topic
62ca0 2d 74 65 6d 70 6c 61 74 65 2d 66 69 6c 65 73 20 72 65 70 6f 20 63 6c 61 73 73 29 29 29 0a 0a 28 -template-files.repo.class)))..(
62cc0 63 6c 2d 64 65 66 67 65 6e 65 72 69 63 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c cl-defgeneric.forge--topic-templ
62ce0 61 74 65 2d 66 69 6c 65 73 20 28 72 65 70 6f 20 63 6c 61 73 73 29 29 0a 0a 28 64 65 66 75 6e 20 ate-files.(repo.class))..(defun.
62d00 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 2d 66 69 6c 65 73 2d 31 20 28 72 forge--topic-template-files-1.(r
62d20 65 70 6f 20 73 75 66 66 69 78 20 26 72 65 73 74 20 70 61 74 68 73 29 0a 20 20 28 73 65 74 71 20 epo.suffix.&rest.paths)...(setq.
62d40 73 75 66 66 69 78 20 28 65 6e 73 75 72 65 2d 6c 69 73 74 20 73 75 66 66 69 78 29 29 0a 20 20 28 suffix.(ensure-list.suffix))...(
62d60 6c 65 74 20 28 28 62 72 61 6e 63 68 20 28 6f 72 65 66 20 72 65 70 6f 20 64 65 66 61 75 6c 74 2d let.((branch.(oref.repo.default-
62d80 62 72 61 6e 63 68 29 29 29 0a 20 20 20 20 28 73 65 71 2d 6b 65 65 70 20 28 69 66 20 73 75 66 66 branch))).....(seq-keep.(if.suff
62da0 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 23 23 61 6e 64 20 28 6d 65 6d ix...................(##and.(mem
62dc0 62 65 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 25 29 20 73 75 66 66 ber.(file-name-extension.%).suff
62de0 69 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f ix)..........................(co
62e00 6e 63 61 74 20 62 72 61 6e 63 68 20 22 3a 22 20 25 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ncat.branch.":".%)).............
62e20 20 20 20 20 28 23 23 63 6f 6e 63 61 74 20 62 72 61 6e 63 68 20 22 3a 22 20 25 29 29 0a 20 20 20 ....(##concat.branch.":".%))....
62e40 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 2d 69 74 65 6d 73 20 22 6c 73 2d ...........(magit-git-items."ls-
62e60 74 72 65 65 22 20 22 2d 7a 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tree"."-z"......................
62e80 20 20 20 20 20 20 20 20 20 20 22 2d 2d 66 75 6c 6c 2d 74 72 65 65 22 20 22 2d 2d 6e 61 6d 65 2d .........."--full-tree"."--name-
62ea0 6f 6e 6c 79 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 only"...........................
62ec0 20 20 20 20 20 28 61 6e 64 20 73 75 66 66 69 78 20 22 2d 72 22 29 0a 20 20 20 20 20 20 20 20 20 .....(and.suffix."-r")..........
62ee0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 72 61 6e 63 68 20 22 2d 2d ......................branch."--
62f00 22 20 70 61 74 68 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 ".paths))))..(defun.forge--topic
62f20 2d 70 61 72 73 65 2d 74 65 6d 70 6c 61 74 65 2d 63 6f 6e 66 69 67 20 28 29 0a 20 20 28 6c 65 74 -parse-template-config.()...(let
62f40 2d 61 6c 69 73 74 20 28 79 61 6d 6c 2d 70 61 72 73 65 2d 73 74 72 69 6e 67 20 28 62 75 66 66 65 -alist.(yaml-parse-string.(buffe
62f60 72 2d 73 74 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r-str)..........................
62f80 20 20 20 20 20 20 20 3a 6f 62 6a 65 63 74 2d 74 79 70 65 20 27 61 6c 69 73 74 0a 20 20 20 20 20 .......:object-type.'alist......
62fa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 71 75 ...........................:sequ
62fc0 65 6e 63 65 2d 74 79 70 65 20 27 6c 69 73 74 29 0a 20 20 20 20 28 6e 63 6f 6e 63 0a 20 20 20 20 ence-type.'list).....(nconc.....
62fe0 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 20 2e 62 6c 61 6e 6b 5f 69 73 73 75 65 73 5f 65 6e 61 .(and.(not.(eq..blank_issues_ena
63000 62 6c 65 64 20 3a 66 61 6c 73 65 29 29 20 3b 75 6e 73 65 74 20 6d 65 61 6e 73 20 74 72 75 65 0a bled.:false)).;unset.means.true.
63020 20 20 20 20 20 20 20 20 20 20 60 28 28 28 70 72 6f 6d 70 74 20 2e 20 2c 28 63 6f 6e 63 61 74 20 ..........`(((prompt...,(concat.
63040 28 70 72 6f 70 65 72 74 69 7a 65 20 22 42 6c 61 6e 6b 20 69 73 73 75 65 22 20 27 66 61 63 65 20 (propertize."Blank.issue".'face.
63060 27 62 6f 6c 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 'bold)..........................
63080 20 20 20 20 20 20 20 22 20 e2 80 94 20 43 72 65 61 74 65 20 61 20 6e 65 77 20 69 73 73 75 65 20 .......".....Create.a.new.issue.
630a0 66 72 6f 6d 20 73 63 72 61 74 63 68 22 29 29 29 29 29 0a 20 20 20 20 20 28 6d 61 70 63 61 72 20 from.scratch")))))......(mapcar.
630c0 28 6c 61 6d 62 64 61 20 28 6c 69 6e 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 (lambda.(link)................`(
630e0 2c 40 6c 69 6e 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 6d 70 74 20 ,@link..................(prompt.
63100 2e 20 2c 28 6c 65 74 2d 61 6c 69 73 74 20 6c 69 6e 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ..,(let-alist.link..............
63120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 70 72 6f 70 65 72 .................(concat.(proper
63140 74 69 7a 65 20 2e 6e 61 6d 65 20 27 66 61 63 65 20 27 62 6f 6c 64 29 0a 20 20 20 20 20 20 20 20 tize..name.'face.'bold).........
63160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 ..............................".
63180 e2 80 94 20 22 20 2e 61 62 6f 75 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 2e ...."..about)))))...............
631a0 63 6f 6e 74 61 63 74 5f 6c 69 6e 6b 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d contact_links))))..(defun.forge-
631c0 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 74 65 6d 70 6c 61 74 65 20 28 6e 61 6d 65 29 0a 20 20 28 -topic-parse-template.(name)...(
631e0 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 28 73 6b 69 70 2d 63 goto-char.(point-min))...(skip-c
63200 68 61 72 73 2d 66 6f 72 77 61 72 64 20 22 5c 73 5c 74 5c 6e 5c 72 22 29 0a 20 20 28 69 66 2d 6c hars-forward."\s\t\n\r")...(if-l
63220 65 74 20 28 28 62 65 67 20 28 61 6e 64 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5e 2d 2d 2d 5b et.((beg.(and.(looking-at."^---[
63240 5c 73 5c 74 5d 2a 24 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 \s\t]*$")......................(
63260 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 64 20 28 61 6e 64 20 28 7a point)))............(end.(and.(z
63280 65 72 6f 70 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 erop.(forward-line))............
632a0 20 20 20 20 20 20 20 20 20 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 2d ..........(re-search-forward."^-
632c0 2d 2d 5b 5c 73 5c 74 5d 2a 24 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 --[\s\t]*$".nil.t)..............
632e0 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 29 0a 20 20 ........(match-beginning.0)))...
63300 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 69 64 20 28 6f 72 65 66 20 28 66 6f 72 67 65 2d 67 65 .........(repoid.(oref.(forge-ge
63320 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 29 20 69 64 29 29 29 0a 20 20 20 t-repository.:tracked).id)))....
63340 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 28 79 61 6d 6c 2d 70 61 72 73 65 2d 73 74 72 69 6e 67 ...(let-alist.(yaml-parse-string
63360 20 28 62 75 66 66 65 72 2d 73 74 72 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 .(buffer-str.beg.end)...........
63380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 62 6a 65 63 ..........................:objec
633a0 74 2d 74 79 70 65 20 27 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t-type.'alist...................
633c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 71 75 65 6e 63 65 2d 74 79 70 65 ..................:sequence-type
633e0 20 27 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .'list..........................
63400 20 20 20 20 20 20 20 20 20 20 20 3a 6e 75 6c 6c 2d 6f 62 6a 65 63 74 20 6e 69 6c 0a 20 20 20 20 ...........:null-object.nil.....
63420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
63440 3a 66 61 6c 73 65 2d 6f 62 6a 65 63 74 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e :false-object.nil).........(when
63460 20 28 73 74 72 69 6e 67 70 20 2e 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 .(stringp..name)...........(setq
63480 20 6e 61 6d 65 20 2e 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6e 61 6d 65 .name..name)).........(setq.name
634a0 20 28 70 72 6f 70 65 72 74 69 7a 65 20 2e 6e 61 6d 65 20 27 66 61 63 65 20 27 62 6f 6c 64 29 29 .(propertize..name.'face.'bold))
634c0 0a 20 20 20 20 20 20 20 20 60 28 28 70 72 6f 6d 70 74 20 20 20 20 2e 20 2c 28 69 66 20 2e 61 62 .........`((prompt......,(if..ab
634e0 6f 75 74 20 28 66 6f 72 6d 61 74 20 22 25 73 20 e2 80 94 20 25 73 22 20 6e 61 6d 65 20 2e 61 62 out.(format."%s.....%s".name..ab
63500 6f 75 74 29 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 20 20 20 out).name))...........(title....
63520 20 2e 20 2c 28 61 6e 64 20 2e 74 69 74 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...,(and..title.................
63540 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 70 20 2e 74 69 74 6c 65 29 0a 20 20 .............(stringp..title)...
63560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 ...........................(stri
63580 6e 67 2d 74 72 69 6d 20 2e 74 69 74 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 65 78 ng-trim..title)))...........(tex
635a0 74 20 20 20 20 20 20 2e 20 2c 28 73 74 72 69 6e 67 2d 74 72 69 6d 20 28 62 75 66 66 65 72 2d 73 t........,(string-trim.(buffer-s
635c0 74 72 20 28 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 50 72 65 76 65 tr.(point))))...........;;.Preve
635e0 6e 74 20 61 64 20 68 6f 63 6b 20 63 72 65 61 74 69 6f 6e 20 6f 72 20 70 72 65 76 69 6f 75 73 6c nt.ad.hock.creation.or.previousl
63600 79 20 75 6e 6b 6e 6f 77 6e 20 6c 61 62 65 6c 73 2e 0a 20 20 20 20 20 20 20 20 20 20 28 6c 61 62 y.unknown.labels............(lab
63620 65 6c 73 20 20 20 20 2e 20 2c 28 63 6c 2d 69 6e 74 65 72 73 65 63 74 69 6f 6e 0a 20 20 20 20 20 els......,(cl-intersection......
63640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 73 75 72 65 2d 6c 69 73 74 ....................(ensure-list
63660 20 2e 6c 61 62 65 6c 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..labels).......................
63680 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 2d 63 61 72 20 5b 3a 73 65 6c 65 63 74 20 6e 61 6d 65 20 ...(forge-sql-car.[:select.name.
636a0 3a 66 72 6f 6d 20 6c 61 62 65 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :from.label.....................
636c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 72 .....................:where.(=.r
636e0 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 epository.$s1)].................
63700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 70 6f 69 64 29 0a ........................repoid).
63720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 65 73 74 20 23 .........................:test.#
63740 27 65 71 75 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 65 72 76 65 72 20 65 72 72 'equal))...........;;.Server.err
63760 6f 72 73 20 6f 6e 20 69 6e 76 61 6c 69 64 20 61 73 73 69 67 6e 65 65 73 2e 0a 20 20 20 20 20 20 ors.on.invalid.assignees........
63780 20 20 20 20 28 61 73 73 69 67 6e 65 65 73 20 2e 20 2c 28 63 6c 2d 69 6e 74 65 72 73 65 63 74 69 ....(assignees...,(cl-intersecti
637a0 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 73 on..........................(ens
637c0 75 72 65 2d 6c 69 73 74 20 2e 61 73 73 69 67 6e 65 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 ure-list..assignees)............
637e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 71 6c 2d 63 61 72 20 5b 3a 73 ..............(forge-sql-car.[:s
63800 65 6c 65 63 74 20 6c 6f 67 69 6e 20 3a 66 72 6f 6d 20 61 73 73 69 67 6e 65 65 0a 20 20 20 20 20 elect.login.:from.assignee......
63820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
63840 20 20 20 20 3a 77 68 65 72 65 20 28 3d 20 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 5d 0a 20 ....:where.(=.repository.$s1)]..
63860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
63880 20 20 20 20 20 20 20 72 65 70 6f 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .......repoid)..................
638a0 20 20 20 20 20 20 20 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 29 29 0a 20 20 20 20 20 20 20 20 ........:test.#'equal)).........
638c0 20 20 28 64 72 61 66 74 20 20 20 20 20 2e 20 2c 28 61 6e 64 20 28 62 6f 6f 6c 65 61 6e 70 20 2e ..(draft.......,(and.(booleanp..
638e0 64 72 61 66 74 29 20 2e 64 72 61 66 74 29 29 29 29 0a 20 20 20 20 60 28 28 70 72 6f 6d 70 74 20 draft)..draft)))).....`((prompt.
63900 2e 20 2c 28 70 72 6f 70 65 72 74 69 7a 65 20 6e 61 6d 65 20 27 66 61 63 65 20 27 62 6f 6c 64 29 ..,(propertize.name.'face.'bold)
63920 29 0a 20 20 20 20 20 20 28 74 65 78 74 20 20 20 2e 20 2c 28 73 74 72 69 6e 67 2d 74 72 69 6d 20 ).......(text.....,(string-trim.
63940 28 62 75 66 66 65 72 2d 73 74 72 29 29 29 29 29 29 0a 0a 3b 3b 3b 20 42 75 67 2d 52 65 66 65 72 (buffer-str))))))..;;;.Bug-Refer
63960 65 6e 63 65 0a 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 62 75 67 2d 72 65 66 65 72 65 6e 63 ence..(defvar.forge-bug-referenc
63980 65 2d 72 65 6d 6f 74 65 2d 66 69 6c 65 73 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 66 6f 72 67 e-remote-files.t..."Whether.forg
639a0 65 20 6d 61 79 20 65 6e 61 62 6c 65 20 60 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 6d 6f 64 65 e.may.enable.`bug-reference-mode
639c0 27 20 69 6e 20 72 65 6d 6f 74 65 20 66 69 6c 65 73 2e 0a 53 65 65 20 61 6c 73 6f 20 60 66 6f 72 '.in.remote.files..See.also.`for
639e0 67 65 2d 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 73 65 74 75 70 27 2e 22 29 0a 0a 28 64 65 66 ge-bug-reference-setup'.")..(def
63a00 75 6e 20 66 6f 72 67 65 2d 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 73 65 74 75 70 20 28 29 0a un.forge-bug-reference-setup.().
63a20 20 20 22 53 65 74 75 70 20 60 62 75 67 2d 72 65 66 65 72 65 6e 63 65 27 20 69 6e 20 74 68 65 20 .."Setup.`bug-reference'.in.the.
63a40 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 49 66 20 66 6f 72 67 65 20 64 61 74 61 20 68 61 current.buffer..If.forge.data.ha
63a60 73 20 62 65 65 6e 20 66 65 74 63 68 65 64 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 s.been.fetched.for.the.current.r
63a80 65 70 6f 73 69 74 6f 72 79 2c 20 74 68 65 6e 0a 65 6e 61 62 6c 65 20 60 62 75 67 2d 72 65 66 65 epository,.then.enable.`bug-refe
63aa0 72 65 6e 63 65 2d 6d 6f 64 65 27 20 6f 72 20 60 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 70 72 rence-mode'.or.`bug-reference-pr
63ac0 6f 67 2d 6d 6f 64 65 27 20 61 6e 64 0a 6d 6f 64 69 66 79 20 60 62 75 67 2d 72 65 66 65 72 65 6e og-mode'.and.modify.`bug-referen
63ae0 63 65 2d 62 75 67 2d 72 65 67 65 78 70 27 20 69 66 20 61 70 70 72 6f 70 72 69 61 74 65 2e 22 0a ce-bug-regexp'.if.appropriate.".
63b00 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 75 72 6c 2d ..(unless.(or.bug-reference-url-
63b20 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 66 6f 72 67 65 format...............(not.(forge
63b40 2d 64 62 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 62 75 66 66 65 -db.t))...............(and.buffe
63b60 72 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 r-file-name....................(
63b80 6e 6f 74 20 66 6f 72 67 65 2d 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 72 65 6d 6f 74 65 2d 66 not.forge-bug-reference-remote-f
63ba0 69 6c 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 72 iles)....................(file-r
63bc0 65 6d 6f 74 65 2d 70 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 0a 20 20 20 20 20 emote-p.buffer-file-name))......
63be0 20 20 20 20 20 20 20 20 20 3b 3b 20 54 4f 44 4f 20 41 6c 6c 6f 77 20 75 73 65 20 69 6e 20 74 68 .........;;.TODO.Allow.use.in.th
63c00 65 73 65 20 6d 6f 64 65 73 20 61 67 61 69 6e 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ese.modes.again................(
63c20 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 6f 64 derived-mode-p.'forge-topics-mod
63c40 65 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 29 29 0a 20 20 e.'forge-notifications-mode))...
63c60 20 20 28 6d 61 67 69 74 2d 2d 77 69 74 68 2d 73 61 66 65 2d 64 65 66 61 75 6c 74 2d 64 69 72 65 ..(magit--with-safe-default-dire
63c80 63 74 6f 72 79 20 6e 69 6c 0a 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 72 65 70 6f ctory.nil.......(when-let.((repo
63ca0 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f .(forge-get-repository.:tracked?
63cc0 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d ))).........(when.(derived-mode-
63ce0 70 20 27 6d 61 67 69 74 2d 73 74 61 74 75 73 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 p.'magit-status-mode............
63d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 ...................'forge-notifi
63d20 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 2d 6c 6f cations-mode)...........(setq-lo
63d40 63 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 61 75 74 cal............bug-reference-aut
63d60 6f 2d 73 65 74 75 70 2d 66 75 6e 63 74 69 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 o-setup-functions............(le
63d80 74 20 28 28 68 6f 6f 6b 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 61 75 74 6f 2d 73 65 74 75 t.((hook.bug-reference-auto-setu
63da0 70 2d 66 75 6e 63 74 69 6f 6e 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 p-functions))..............(list
63dc0 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(lambda.().....................
63de0 20 3b 3b 20 48 4f 4f 4b 20 69 73 20 6e 6f 74 20 61 6c 6c 6f 77 65 64 20 74 6f 20 62 65 20 61 20 .;;.HOOK.is.not.allowed.to.be.a.
63e00 6c 65 78 69 63 61 6c 20 76 61 72 3a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lexical.var:....................
63e20 20 20 3b 3b 20 28 72 75 6e 2d 68 6f 6f 6b 2d 77 69 74 68 2d 61 72 67 73 2d 75 6e 74 69 6c 2d 73 ..;;.(run-hook-with-args-until-s
63e40 75 63 63 65 73 73 20 27 68 6f 6f 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 uccess.'hook)...................
63e60 20 20 20 28 63 61 74 63 68 20 27 73 75 63 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ...(catch.'success..............
63e80 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 66 20 68 6f 6f 6b 29 0a 20 20 20 20 20 ..........(dolist.(f.hook)......
63ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 75 6e 63 61 ....................(when.(funca
63ec0 6c 6c 20 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ll.f)...........................
63ee0 20 28 73 65 74 71 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 62 75 67 2d 72 65 67 65 78 70 0a .(setq.bug-reference-bug-regexp.
63f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
63f20 20 28 63 6f 6e 63 61 74 20 22 2e 22 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 62 75 67 2d 72 .(concat.".".bug-reference-bug-r
63f40 65 67 65 78 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 egexp)).........................
63f60 20 20 20 28 74 68 72 6f 77 20 27 73 75 63 63 65 73 73 20 74 29 29 29 29 29 29 29 29 29 0a 20 20 ...(throw.'success.t)))))))))...
63f80 20 20 20 20 20 20 28 69 66 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 70 72 6f 67 2d ......(if.(derived-mode-p.'prog-
63fa0 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 67 2d 72 65 66 65 72 65 6e 63 65 mode).............(bug-reference
63fc0 2d 70 72 6f 67 2d 6d 6f 64 65 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 28 62 75 67 2d 72 65 66 -prog-mode.1)...........(bug-ref
63fe0 65 72 65 6e 63 65 2d 6d 6f 64 65 20 31 29 29 0a 20 20 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f erence-mode.1)).........(add-hoo
64000 6b 20 27 63 6f 6d 70 6c 65 74 69 6f 6e 2d 61 74 2d 70 6f 69 6e 74 2d 66 75 6e 63 74 69 6f 6e 73 k.'completion-at-point-functions
64020 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 ...................#'forge-topic
64040 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 61 74 2d 70 6f 69 6e 74 20 6e 69 6c 20 74 29 29 29 29 29 0a -completion-at-point.nil.t))))).
64060 0a 28 75 6e 6c 65 73 73 20 6e 6f 6e 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 28 64 6f 6c 69 73 .(unless.noninteractive...(dolis
64080 74 20 28 68 6f 6f 6b 20 66 6f 72 67 65 2d 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 68 6f 6f 6b t.(hook.forge-bug-reference-hook
640a0 73 29 0a 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 68 6f 6f 6b 20 23 27 66 6f 72 67 65 2d 62 75 s).....(add-hook.hook.#'forge-bu
640c0 67 2d 72 65 66 65 72 65 6e 63 65 2d 73 65 74 75 70 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c g-reference-setup)))..;;;._.;;.L
640e0 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 ocal.Variables:.;;.read-symbol-s
64100 68 6f 72 74 68 61 6e 64 73 3a 20 28 0a 3b 3b 20 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 horthands:.(.;;...("and$".......
64120 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e ....."cond-let--and$").;;...("an
64140 64 2d 6c 65 74 22 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 d-let"........."cond-let--and-le
64160 74 22 29 0a 3b 3b 20 20 20 28 22 69 66 2d 6c 65 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e t").;;...("if-let".........."con
64180 64 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 d-let--if-let").;;...("when-let"
641a0 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 0a 3b 3b ........"cond-let--when-let").;;
641c0 20 20 20 28 22 62 75 66 66 65 72 2d 73 74 72 69 6e 67 22 20 2e 20 22 62 75 66 66 65 72 2d 73 74 ...("buffer-string"..."buffer-st
641e0 72 69 6e 67 22 29 0a 3b 3b 20 20 20 28 22 62 75 66 66 65 72 2d 73 74 72 22 20 20 20 20 2e 20 22 ring").;;...("buffer-str"......"
64200 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 forge--buffer-substring-no-prope
64220 72 74 69 65 73 22 29 0a 3b 3b 20 20 20 28 22 70 61 72 74 69 61 6c 22 20 20 20 20 20 20 20 2e 20 rties").;;...("partial".........
64240 22 6c 6c 61 6d 61 2d 2d 6c 65 66 74 2d 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 22 29 29 0a "llama--left-apply-partially")).
64260 3b 3b 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 3b ;;.End:.(provide.'forge-topic).;
64280 3b 3b 20 66 6f 72 67 65 2d 74 6f 70 69 63 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 ;;.forge-topic.el.ends.here.....
642a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
642c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
642e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
643a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
643c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
643e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64400 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2d 74 6f 70 69 63 73 forge-20250916.1119/forge-topics
64420 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .el.............................
64440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64460 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
64480 30 30 37 30 37 33 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 35 35 00 20 30 00 00 00 0070734.00000000000.015055..0...
644a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
644c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
644e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64500 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
64520 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
64540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
645a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
645c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
645e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64600 3b 3b 3b 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2e 65 6c 20 2d 2d 2d 20 4c 69 73 74 20 74 6f 70 ;;;.forge-topics.el.---.List.top
64620 69 63 73 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 20 2d 2a 2d 0a 0a ics..-*-.lexical-binding:t.-*-..
64640 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f 6e 61 73 ;;.Copyright.(C).2018-2025.Jonas
64660 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61 73 20 42 65 72 .Bernoulli..;;.Author:.Jonas.Ber
64680 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 noulli.<emacs.forge@jonas.bernou
646a0 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 lli.dev>.;;.Maintainer:.Jonas.Be
646c0 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f rnoulli.<emacs.forge@jonas.berno
646e0 75 6c 6c 69 2e 64 65 76 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 ulli.dev>..;;.SPDX-License-Ident
64700 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 68 69 73 ifier:.GPL-3.0-or-later..;;.This
64720 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61 6e 20 .file.is.free.software:.you.can.
64740 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b redistribute.it.and/or.modify.;;
64760 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 .it.under.the.terms.of.the.GNU.G
64780 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 eneral.Public.License.as.publish
647a0 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 ed.;;.by.the.Free.Software.Found
647c0 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c ation,.either.version.3.of.the.L
647e0 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 icense,.;;.or.(at.your.option).a
64800 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 66 69 6c ny.later.version..;;.;;.This.fil
64820 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 e.is.distributed.in.the.hope.tha
64840 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 t.it.will.be.useful,.;;.but.WITH
64860 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 OUT.ANY.WARRANTY;.without.even.t
64880 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 he.implied.warranty.of.;;.MERCHA
648a0 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 NTABILITY.or.FITNESS.FOR.A.PARTI
648c0 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 CULAR.PURPOSE...See.the.;;.GNU.G
648e0 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 eneral.Public.License.for.more.d
64900 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 etails..;;.;;.You.should.have.re
64920 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c ceived.a.copy.of.the.GNU.General
64940 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 .Public.License.;;.along.with.th
64960 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 is.file...If.not,.see.<https://w
64980 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 ww.gnu.org/licenses/>...;;;.Code
649a0 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 0a 3b 3b 3b 20 4f :..(require.'forge-topic)..;;;.O
649c0 70 74 69 6f 6e 73 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 6c 69 73 74 2d 62 75 ptions..(defcustom.forge-list-bu
649e0 66 66 65 72 2d 64 65 66 61 75 6c 74 2d 74 6f 70 69 63 2d 66 69 6c 74 65 72 73 0a 20 20 28 66 6f ffer-default-topic-filters...(fo
64a00 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 3a 74 79 70 65 20 27 74 6f 70 69 63 20 3a 61 rge--topics-spec.:type.'topic.:a
64a20 63 74 69 76 65 20 74 20 3a 73 74 61 74 65 20 27 6f 70 65 6e 20 3a 6f 72 64 65 72 20 27 6e 65 77 ctive.t.:state.'open.:order.'new
64a40 65 73 74 29 0a 20 20 22 46 69 6c 74 65 72 73 20 69 6e 69 74 69 61 6c 6c 79 20 75 73 65 64 20 74 est)..."Filters.initially.used.t
64a60 6f 20 6c 69 6d 69 74 20 74 6f 70 69 63 73 20 6c 69 73 74 65 64 20 69 6e 20 6c 69 73 74 20 62 75 o.limit.topics.listed.in.list.bu
64a80 66 66 65 72 73 2e 0a 0a 54 68 69 73 20 6f 70 74 69 6f 6e 20 63 6f 6e 74 72 6f 6c 73 20 77 68 69 ffers...This.option.controls.whi
64aa0 63 68 20 74 6f 70 69 63 73 20 61 72 65 20 6c 69 73 74 65 64 20 77 68 65 6e 20 69 6e 69 74 69 61 ch.topics.are.listed.when.initia
64ac0 6c 6c 79 20 63 72 65 61 74 69 6e 67 0a 61 20 60 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 6f 64 lly.creating.a.`forge-topics-mod
64ae0 65 27 20 62 75 66 66 65 72 2e 20 20 54 6f 20 74 65 6d 70 6f 72 61 72 69 6c 79 20 63 68 61 6e 67 e'.buffer...To.temporarily.chang
64b00 65 20 77 68 69 63 68 20 74 6f 70 69 63 73 20 61 72 65 0a 6c 69 73 74 65 64 20 69 6e 20 61 20 67 e.which.topics.are.listed.in.a.g
64b20 69 76 65 6e 20 62 75 66 66 65 72 2c 20 69 6e 73 74 65 61 64 20 75 73 65 20 5c 5c 60 4e 20 6d 27 iven.buffer,.instead.use.\\`N.m'
64b40 20 28 60 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 27 29 2e 22 0a 20 20 3a 70 61 63 6b .(`forge-topics-menu')."...:pack
64b60 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 34 2e 30 22 29 0a 20 age-version.'(forge..."0.4.0")..
64b80 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 6f 62 6a 65 63 74 29 0a .:group.'forge...:type.'object).
64ba0 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 73 74 61 74 75 73 2d 62 75 66 66 65 72 2d .(defcustom.forge-status-buffer-
64bc0 64 65 66 61 75 6c 74 2d 74 6f 70 69 63 2d 66 69 6c 74 65 72 73 0a 20 20 28 66 6f 72 67 65 2d 2d default-topic-filters...(forge--
64be0 74 6f 70 69 63 73 2d 73 70 65 63 20 3a 74 79 70 65 20 27 74 6f 70 69 63 20 3a 61 63 74 69 76 65 topics-spec.:type.'topic.:active
64c00 20 74 20 3a 73 74 61 74 65 20 27 6f 70 65 6e 20 3a 6f 72 64 65 72 20 27 6e 65 77 65 73 74 29 0a .t.:state.'open.:order.'newest).
64c20 20 20 22 46 69 6c 74 65 72 73 20 69 6e 69 74 69 61 6c 6c 79 20 75 73 65 64 20 74 6f 20 6c 69 6d .."Filters.initially.used.to.lim
64c40 69 74 20 74 6f 70 69 63 73 20 6c 69 73 74 65 64 20 69 6e 20 73 74 61 74 75 73 20 62 75 66 66 65 it.topics.listed.in.status.buffe
64c60 72 73 2e 0a 0a 54 68 69 73 20 6f 70 74 69 6f 6e 20 63 6f 6e 74 72 6f 6c 73 20 77 68 69 63 68 20 rs...This.option.controls.which.
64c80 74 6f 70 69 63 73 20 61 72 65 20 6c 69 73 74 65 64 20 77 68 65 6e 20 69 6e 69 74 69 61 6c 6c 79 topics.are.listed.when.initially
64ca0 20 63 72 65 61 74 69 6e 67 0a 61 20 60 6d 61 67 69 74 2d 73 74 61 74 75 73 2d 6d 6f 64 65 27 20 .creating.a.`magit-status-mode'.
64cc0 62 75 66 66 65 72 2e 20 20 54 6f 20 74 65 6d 70 6f 72 61 72 69 6c 79 20 63 68 61 6e 67 65 20 77 buffer...To.temporarily.change.w
64ce0 68 69 63 68 20 74 6f 70 69 63 73 20 61 72 65 0a 6c 69 73 74 65 64 20 69 6e 20 61 20 67 69 76 65 hich.topics.are.listed.in.a.give
64d00 6e 20 62 75 66 66 65 72 2c 20 69 6e 73 74 65 61 64 20 75 73 65 20 5c 5c 3c 66 6f 72 67 65 2d 74 n.buffer,.instead.use.\\<forge-t
64d20 6f 70 69 63 73 2d 6d 6f 64 65 2d 6d 61 70 3e 20 5c 0a 5c 5c 5b 66 6f 72 67 65 2d 74 6f 70 69 63 opics-mode-map>.\.\\[forge-topic
64d40 73 2d 6d 65 6e 75 5d 20 28 60 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 27 29 2e 0a 0a s-menu].(`forge-topics-menu')...
64d60 54 6f 20 69 6e 69 74 69 61 6c 6c 79 20 6c 69 73 74 20 6e 6f 20 74 6f 70 69 63 73 2c 20 73 65 74 To.initially.list.no.topics,.set
64d80 20 74 68 65 20 60 74 79 70 65 27 20 73 6c 6f 74 20 74 6f 20 6e 69 6c 2e 22 0a 20 20 3a 70 61 63 .the.`type'.slot.to.nil."...:pac
64da0 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 34 2e 30 22 29 0a kage-version.'(forge..."0.4.0").
64dc0 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 6f 62 6a 65 63 74 29 ..:group.'forge...:type.'object)
64de0 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e 74 ..(defcustom.forge-owned-account
64e00 73 20 6e 69 6c 0a 20 20 22 41 6e 20 61 6c 69 73 74 20 6f 66 20 61 63 63 6f 75 6e 74 73 20 74 68 s.nil..."An.alist.of.accounts.th
64e20 61 74 20 61 72 65 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 2e 0a 54 68 69 73 20 73 68 6f 75 6c 64 at.are.owned.by.you..This.should
64e40 20 69 6e 63 6c 75 64 65 20 79 6f 75 72 20 75 73 65 72 6e 61 6d 65 20 61 73 20 77 65 6c 6c 20 61 .include.your.username.as.well.a
64e60 73 20 61 6e 79 20 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 0a 74 68 61 74 20 79 6f 75 20 6f 77 6e 2e s.any.organization.that.you.own.
64e80 20 20 55 73 65 64 20 62 79 20 74 68 65 20 63 6f 6d 6d 61 6e 64 73 20 60 66 6f 72 67 65 2d 6c 69 ..Used.by.the.commands.`forge-li
64ea0 73 74 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 27 2c 0a 60 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 st-owned-issues',.`forge-list-ow
64ec0 6e 65 64 2d 70 75 6c 6c 72 65 71 73 27 20 61 6e 64 20 60 66 6f 72 67 65 2d 66 6f 72 6b 27 2e 0a ned-pullreqs'.and.`forge-fork'..
64ee0 0a 45 61 63 68 20 65 6c 65 6d 65 6e 74 20 68 61 73 20 74 68 65 20 66 6f 72 6d 20 28 41 43 43 4f .Each.element.has.the.form.(ACCO
64f00 55 4e 54 20 2e 20 50 4c 49 53 54 29 2e 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 70 72 6f UNT...PLIST)...The.following.pro
64f20 70 65 72 74 69 65 73 20 61 72 65 20 63 75 72 72 65 6e 74 6c 79 20 62 65 69 6e 67 20 75 73 65 64 perties.are.currently.being.used
64f40 3a 0a 0a 60 72 65 6d 6f 74 65 2d 6e 61 6d 65 27 20 54 68 65 20 64 65 66 61 75 6c 74 20 6e 61 6d :..`remote-name'.The.default.nam
64f60 65 20 73 75 67 67 65 73 74 65 64 20 62 79 20 60 66 6f 72 67 65 2d 66 6f 72 6b 27 20 66 6f 72 20 e.suggested.by.`forge-fork'.for.
64f80 61 0a 20 20 66 6f 72 6b 20 63 72 65 61 74 65 64 20 77 69 74 68 69 6e 20 74 68 69 73 20 61 63 63 a...fork.created.within.this.acc
64fa0 6f 75 6e 74 2e 20 20 49 66 20 75 6e 73 70 65 63 69 66 69 65 64 2c 20 74 68 65 6e 20 74 68 65 0a ount...If.unspecified,.then.the.
64fc0 20 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 61 63 63 6f 75 6e 74 20 69 73 20 75 73 65 64 2e 22 0a ..name.of.the.account.is.used.".
64fe0 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e ..:package-version.'(forge..."0.
65000 32 2e 30 22 29 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 28 2.0")...:group.'forge...:type.'(
65020 72 65 70 65 61 74 20 28 63 6f 6e 73 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 41 63 63 6f 75 repeat.(cons.(string.:tag."Accou
65040 6e 74 22 29 20 70 6c 69 73 74 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d nt").plist)))..(defcustom.forge-
65060 6f 77 6e 65 64 2d 69 67 6e 6f 72 65 64 20 6e 69 6c 0a 20 20 22 41 20 6c 69 73 74 20 6f 66 20 72 owned-ignored.nil..."A.list.of.r
65080 65 70 6f 73 69 74 6f 72 69 65 73 20 74 68 61 74 20 61 72 65 20 69 67 6e 6f 72 65 64 20 77 68 65 epositories.that.are.ignored.whe
650a0 6e 20 6c 69 73 74 69 6e 67 20 74 68 6f 73 65 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 2e 0a 54 68 n.listing.those.owned.by.you..Th
650c0 69 73 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 70 61 63 6b 61 67 65 20 6e 61 6d 65 73 2e 20 20 is.is.a.list.of.package.names...
650e0 55 73 65 64 20 62 79 20 74 68 65 20 63 6f 6d 6d 61 6e 64 73 0a 60 66 6f 72 67 65 2d 6c 69 73 74 Used.by.the.commands.`forge-list
65100 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 27 20 61 6e 64 20 60 66 6f 72 67 65 2d 6c 69 73 74 2d 6f -owned-issues'.and.`forge-list-o
65120 77 6e 65 64 2d 70 75 6c 6c 72 65 71 73 27 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 wned-pullreqs'."...:package-vers
65140 69 6f 6e 20 27 28 66 6f 72 67 65 20 2e 20 22 30 2e 32 2e 30 22 29 0a 20 20 3a 67 72 6f 75 70 20 ion.'(forge..."0.2.0")...:group.
65160 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74 20 28 73 74 72 69 6e 67 20 'forge...:type.'(repeat.(string.
65180 3a 74 61 67 20 22 4e 61 6d 65 22 29 29 29 0a 0a 3b 3b 3b 20 46 61 63 65 73 0a 0a 28 64 65 66 66 :tag."Name")))..;;;.Faces..(deff
651a0 61 63 65 20 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 0a 20 20 27 28 28 74 20 3a ace.forge-suffix-active...'((t.:
651c0 69 6e 68 65 72 69 74 20 74 72 61 6e 73 69 65 6e 74 2d 76 61 6c 75 65 20 3a 77 65 69 67 68 74 20 inherit.transient-value.:weight.
651e0 62 6f 6c 64 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 75 66 66 69 78 65 73 bold))..."Face.used.for.suffixes
65200 20 77 68 6f 73 65 20 65 66 66 65 63 74 73 20 69 73 20 63 75 72 72 65 6e 74 6c 79 20 61 63 74 69 .whose.effects.is.currently.acti
65220 76 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 ve."...:group.'forge-faces)..(de
65240 66 66 61 63 65 20 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 2d 61 6e 64 2d 69 6d fface.forge-suffix-active-and-im
65260 70 6c 69 65 64 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 74 72 61 6e 73 69 65 6e 74 2d plied...'((t.:inherit.transient-
65280 76 61 6c 75 65 20 3a 77 65 69 67 68 74 20 73 65 6d 69 62 6f 6c 64 29 29 0a 20 20 22 46 61 63 65 value.:weight.semibold))..."Face
652a0 20 75 73 65 64 20 66 6f 72 20 73 75 66 66 69 78 65 73 20 77 68 6f 73 65 20 65 66 66 65 63 74 73 .used.for.suffixes.whose.effects
652c0 20 69 73 20 63 75 72 72 65 6e 74 6c 79 20 61 63 74 69 76 65 20 61 6e 64 20 69 6d 70 6c 69 65 64 .is.currently.active.and.implied
652e0 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 ."...:group.'forge-faces)..(deff
65300 61 63 65 20 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 69 6d 70 6c 69 65 64 0a 20 20 27 28 28 74 20 ace.forge-suffix-implied...'((t.
65320 3a 69 6e 68 65 72 69 74 20 74 72 61 6e 73 69 65 6e 74 2d 76 61 6c 75 65 20 3a 77 65 69 67 68 74 :inherit.transient-value.:weight
65340 20 6e 6f 72 6d 61 6c 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 75 66 66 69 .normal))..."Face.used.for.suffi
65360 78 65 73 20 77 68 6f 73 65 20 65 66 66 65 63 74 73 20 69 73 20 63 75 72 72 65 6e 74 6c 79 20 69 xes.whose.effects.is.currently.i
65380 6d 70 6c 69 65 64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 63 65 73 29 0a mplied."...:group.'forge-faces).
653a0 0a 3b 3b 3b 20 4d 6f 64 65 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d .;;;.Mode..(defvar-keymap.forge-
653c0 74 6f 70 69 63 73 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 3a 64 6f 63 20 22 4c 6f 63 61 6c 20 6b 65 topics-mode-map...:doc."Local.ke
653e0 79 6d 61 70 20 66 6f 72 20 46 6f 72 67 65 2d 54 6f 70 69 63 2d 4c 69 73 74 20 6d 6f 64 65 20 62 ymap.for.Forge-Topic-List.mode.b
65400 75 66 66 65 72 73 2e 22 0a 20 20 3a 70 61 72 65 6e 74 20 28 6d 61 6b 65 2d 63 6f 6d 70 6f 73 65 uffers."...:parent.(make-compose
65420 64 2d 6b 65 79 6d 61 70 20 66 6f 72 67 65 2d 63 6f 6d 6d 6f 6e 2d 6d 61 70 20 6d 61 67 69 74 2d d-keymap.forge-common-map.magit-
65440 6d 6f 64 65 2d 6d 61 70 29 0a 20 20 22 52 45 54 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 mode-map)..."RET"...............
65460 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 74 6f 70 69 .........#'forge-visit-this-topi
65480 63 0a 20 20 22 3c 72 65 74 75 72 6e 3e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c..."<return>"..................
654a0 20 23 27 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 74 6f 70 69 63 0a 20 20 22 6f 22 20 .#'forge-visit-this-topic..."o".
654c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 .........................#'forge
654e0 2d 62 72 6f 77 73 65 2d 74 68 69 73 2d 74 6f 70 69 63 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 66 -browse-this-topic..."<remap>.<f
65500 6f 72 67 65 2d 2d 6c 69 73 74 2d 6d 65 6e 75 3e 22 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 orge--list-menu>".#'forge-topics
65520 2d 6d 65 6e 75 0a 20 20 22 3c 72 65 6d 61 70 3e 20 3c 66 6f 72 67 65 2d 2d 69 74 65 6d 2d 6d 65 -menu..."<remap>.<forge--item-me
65540 6e 75 3e 22 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 0a 20 20 22 3c 72 65 6d 61 nu>".#'forge-topic-menu..."<rema
65560 70 3e 20 3c 6d 61 67 69 74 2d 72 65 66 72 65 73 68 3e 22 20 20 20 20 23 27 66 6f 72 67 65 2d 72 p>.<magit-refresh>"....#'forge-r
65580 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 0a 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 74 6f efresh-buffer)..(defvar.forge-to
655a0 70 69 63 73 2d 6d 6f 64 65 2d 6e 61 6d 65 20 27 28 28 3a 65 76 61 6c 20 28 66 6f 72 67 65 2d 74 pics-mode-name.'((:eval.(forge-t
655c0 6f 70 69 63 73 2d 62 75 66 66 65 72 2d 64 65 73 63 29 29 29 0a 20 20 22 49 6e 66 6f 72 6d 61 74 opics-buffer-desc)))..."Informat
655e0 69 6f 6e 20 73 68 6f 77 6e 20 69 6e 20 74 68 65 20 6d 6f 64 65 2d 6c 69 6e 65 20 66 6f 72 20 60 ion.shown.in.the.mode-line.for.`
65600 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 6f 64 65 27 2e 0a 4d 75 73 74 20 62 65 20 73 65 74 20 forge-topics-mode'..Must.be.set.
65620 62 65 66 6f 72 65 20 60 66 6f 72 67 65 2d 74 6f 70 69 63 73 27 20 69 73 20 6c 6f 61 64 65 64 2e before.`forge-topics'.is.loaded.
65640 22 29 0a 0a 28 64 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 66 6f 72 67 65 2d 74 ")..(define-derived-mode.forge-t
65660 6f 70 69 63 73 2d 6d 6f 64 65 20 6d 61 67 69 74 2d 6d 6f 64 65 20 66 6f 72 67 65 2d 74 6f 70 69 opics-mode.magit-mode.forge-topi
65680 63 73 2d 6d 6f 64 65 2d 6e 61 6d 65 0a 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 62 cs-mode-name..."Major.mode.for.b
656a0 72 6f 77 73 69 6e 67 20 61 20 6c 69 73 74 20 6f 66 20 74 6f 70 69 63 73 2e 22 0a 20 20 3a 69 6e rowsing.a.list.of.topics."...:in
656c0 74 65 72 61 63 74 69 76 65 20 6e 69 6c 0a 20 20 28 6d 61 67 69 74 2d 68 61 63 6b 2d 64 69 72 2d teractive.nil...(magit-hack-dir-
656e0 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d local-variables))..(defun.forge-
65700 74 6f 70 69 63 73 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 topics-setup-buffer.(&optional.r
65720 65 70 6f 20 73 70 65 63 20 26 72 65 73 74 20 70 61 72 61 6d 73 29 0a 20 20 22 4c 69 73 74 20 61 epo.spec.&rest.params)..."List.a
65740 20 73 65 74 20 6f 66 20 74 6f 70 69 63 73 20 69 6e 20 61 20 62 75 66 66 65 72 2e 0a 0a 54 68 65 .set.of.topics.in.a.buffer...The
65760 20 62 75 66 66 65 72 20 69 73 20 64 65 74 65 72 6d 69 6e 65 64 20 75 73 69 6e 67 20 60 66 6f 72 .buffer.is.determined.using.`for
65780 67 65 2d 74 6f 70 69 63 73 2d 62 75 66 66 65 72 2d 6e 61 6d 65 27 2c 20 77 68 69 63 68 20 75 73 ge-topics-buffer-name',.which.us
657a0 65 73 0a 74 68 65 20 73 61 6d 65 20 62 75 66 66 65 72 20 66 6f 72 20 61 6c 6c 20 67 6c 6f 62 61 es.the.same.buffer.for.all.globa
657c0 6c 20 6c 69 73 74 73 2c 20 61 6e 64 20 6c 69 6b 65 77 69 73 65 20 6a 75 73 74 20 6f 6e 65 20 62 l.lists,.and.likewise.just.one.b
657e0 75 66 66 65 72 20 70 65 72 0a 72 65 70 6f 73 69 74 6f 72 79 20 66 6f 72 20 72 65 70 6f 73 69 74 uffer.per.repository.for.reposit
65800 6f 72 79 2d 6c 6f 63 61 6c 20 6c 69 73 74 73 2e 20 20 59 6f 75 20 63 6f 75 6c 64 20 75 73 65 20 ory-local.lists...You.could.use.
65820 60 63 6c 2d 6c 65 74 66 27 20 74 6f 20 75 73 65 0a 61 20 64 69 66 66 65 72 65 6e 74 20 62 75 66 `cl-letf'.to.use.a.different.buf
65840 66 65 72 20 66 6f 72 20 63 65 72 74 61 69 6e 20 73 65 74 73 2e 0a 0a 49 66 20 6f 70 74 69 6f 6e fer.for.certain.sets...If.option
65860 61 6c 20 52 45 50 4f 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 74 20 6d 75 73 74 20 62 65 20 61 al.REPO.is.non-nil,.it.must.be.a
65880 20 60 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 27 20 6f 62 6a 65 63 74 2e 0a 49 74 20 69 .`forge-repository'.object..It.i
658a0 73 20 6f 6e 6c 79 20 72 65 6c 65 76 61 6e 74 20 77 68 65 6e 20 6e 6f 74 20 73 68 6f 77 69 6e 67 s.only.relevant.when.not.showing
658c0 20 61 20 67 6c 6f 62 61 6c 20 74 6f 70 69 63 20 6c 69 73 74 2c 20 61 73 20 64 65 74 65 72 6d 69 .a.global.topic.list,.as.determi
658e0 6e 65 64 0a 62 79 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 60 3a 67 6c 6f 62 61 6c 27 20 69 6e ned.by.the.value.of.`:global'.in
65900 20 50 41 52 41 4d 53 2e 20 20 45 76 65 6e 20 77 68 65 6e 20 73 68 6f 77 69 6e 67 20 61 20 6c 6f .PARAMS...Even.when.showing.a.lo
65920 63 61 6c 20 6c 69 73 74 2c 0a 52 45 50 4f 20 6d 61 79 20 62 65 20 6e 69 6c 2c 20 69 6e 20 74 68 cal.list,.REPO.may.be.nil,.in.th
65940 61 74 20 63 61 73 65 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 69 73 20 64 65 74 65 72 6d at.case.the.repository.is.determ
65960 69 6e 65 64 20 66 72 6f 6d 20 63 6f 6e 74 65 78 74 2e 0a 0a 49 66 20 6f 70 74 69 6f 6e 61 6c 20 ined.from.context...If.optional.
65980 53 50 45 43 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 74 20 6d 75 73 74 20 62 65 20 61 20 60 66 SPEC.is.non-nil,.it.must.be.a.`f
659a0 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 70 65 63 27 20 6f 62 6a 65 63 74 2e 0a 49 66 20 6e 69 orge--topics-spec'.object..If.ni
659c0 6c 2c 20 61 20 63 6c 6f 6e 65 20 6f 66 20 74 68 65 20 65 78 69 73 74 69 6e 67 20 66 69 6c 74 65 l,.a.clone.of.the.existing.filte
659e0 72 20 73 70 65 63 20 66 72 6f 6d 20 74 68 65 20 62 75 66 66 65 72 20 64 65 74 65 72 6d 69 6e 65 r.spec.from.the.buffer.determine
65a00 64 0a 61 62 6f 76 65 20 69 73 20 75 73 65 64 2c 20 70 72 6f 76 69 64 65 64 20 74 68 61 74 20 62 d.above.is.used,.provided.that.b
65a20 75 66 66 65 72 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 20 61 6e 64 20 68 61 73 20 61 20 6c uffer.already.exists.and.has.a.l
65a40 6f 63 61 6c 0a 66 69 6c 74 65 72 20 73 70 65 63 2e 20 20 41 20 63 6c 6f 6e 65 20 6f 66 20 60 66 ocal.filter.spec...A.clone.of.`f
65a60 6f 72 67 65 2d 6c 69 73 74 2d 62 75 66 66 65 72 2d 64 65 66 61 75 6c 74 2d 74 6f 70 69 63 2d 66 orge-list-buffer-default-topic-f
65a80 69 6c 74 65 72 73 27 20 69 73 0a 75 73 65 64 20 6f 74 68 65 72 77 69 73 65 2e 0a 0a 4f 70 74 69 ilters'.is.used.otherwise...Opti
65aa0 6f 6e 61 6c 20 50 41 52 41 4d 53 20 63 61 6e 20 62 65 20 75 73 65 64 20 74 6f 20 73 65 74 20 73 onal.PARAMS.can.be.used.to.set.s
65ac0 6c 6f 74 73 20 6f 66 20 53 50 45 43 2e 20 20 50 41 52 41 4d 53 20 69 73 20 61 20 70 6c 69 73 74 lots.of.SPEC...PARAMS.is.a.plist
65ae0 0a 77 68 65 72 65 20 65 61 63 68 20 6b 65 79 20 69 73 20 61 6e 20 69 6e 69 74 61 72 67 20 66 6f .where.each.key.is.an.initarg.fo
65b00 72 20 61 20 73 6c 6f 74 20 6f 66 20 74 68 65 20 60 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 73 r.a.slot.of.the.`forge--topics-s
65b20 70 65 63 27 0a 63 6c 61 73 73 2e 0a 0a 55 73 75 61 6c 6c 79 20 79 6f 75 20 77 6f 75 6c 64 20 75 pec'.class...Usually.you.would.u
65b40 73 65 20 6e 69 6c 20 66 6f 72 20 53 50 45 43 2c 20 73 6f 20 74 68 61 74 20 61 20 63 6c 6f 6e 65 se.nil.for.SPEC,.so.that.a.clone
65b60 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 6c 79 0a 65 66 66 65 63 74 69 76 65 20 66 69 6c 74 .of.the.currently.effective.filt
65b80 65 72 20 73 70 65 63 20 69 73 20 75 73 65 64 2c 20 61 6e 64 20 74 68 65 6e 20 79 6f 75 20 77 6f er.spec.is.used,.and.then.you.wo
65ba0 75 6c 64 20 73 65 74 20 6f 6e 6c 79 20 73 6f 6d 65 20 6f 66 0a 74 68 65 20 61 76 61 69 6c 61 62 uld.set.only.some.of.the.availab
65bc0 6c 65 20 66 69 6c 74 65 72 73 20 75 73 69 6e 67 20 50 41 52 41 4d 53 2e 0a 0a 20 20 28 74 72 61 le.filters.using.PARAMS.....(tra
65be0 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 6d 79 2d 66 6f 72 67 65 2d 6c 69 nsient-define-suffix.my-forge-li
65c00 73 74 2d 61 73 73 69 67 6e 65 64 2d 69 73 73 75 65 73 20 28 29 0a 20 20 20 20 5c 22 4c 69 73 74 st-assigned-issues.().....\"List
65c20 20 69 73 73 75 65 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 .issues.of.the.current.repositor
65c40 79 20 74 68 61 74 20 61 72 65 20 61 73 73 69 67 6e 65 64 20 74 6f 20 6d 65 2e 5c 22 0a 20 20 20 y.that.are.assigned.to.me.\"....
65c60 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 5c 22 69 73 73 75 65 73 5c 22 0a 20 20 20 20 28 64 65 .:description.\"issues\".....(de
65c80 63 6c 61 72 65 20 28 69 6e 74 65 72 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 6c 29 29 0a 20 20 clare.(interactive-only.nil))...
65ca0 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 ..(interactive).....(when-let*.(
65cc0 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 (repo.(forge-get-repository.:tra
65ce0 63 6b 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 20 28 67 68 75 62 cked)).................(me.(ghub
65d00 2d 2d 75 73 65 72 6e 61 6d 65 20 72 65 70 6f 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d --username.repo))).......(forge-
65d20 74 6f 70 69 63 73 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 72 65 70 6f 20 6e 69 6c 20 3a 74 79 topics-setup-buffer.repo.nil.:ty
65d40 70 65 20 5c 5c 3d 27 69 73 73 75 65 20 3a 61 73 73 69 67 6e 65 65 20 6d 65 29 0a 20 20 20 20 20 pe.\\='issue.:assignee.me)......
65d60 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 5c 5c 3d 27 66 6f 72 67 65 2d 74 6f 70 69 .(transient-setup.\\='forge-topi
65d80 63 73 2d 6d 65 6e 75 29 29 29 0a 0a 47 72 65 70 20 46 6f 72 67 65 20 66 6f 72 20 6d 6f 72 65 20 cs-menu)))..Grep.Forge.for.more.
65da0 65 78 61 6d 70 6c 65 73 2e 0a 0a 41 6c 74 65 72 6e 61 74 69 76 65 6c 79 20 79 6f 75 20 63 61 6e examples...Alternatively.you.can
65dc0 20 75 73 65 20 60 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 73 27 20 6c 69 73 74 20 .use.`forge-insert-topics'.list.
65de0 74 6f 70 69 63 73 20 69 6e 2c 20 65 2e 67 2e 2c 0a 74 68 65 20 4d 61 67 69 74 20 73 74 61 74 75 topics.in,.e.g.,.the.Magit.statu
65e00 73 20 62 75 66 66 65 72 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 67 6c 6f 62 61 6c 20 28 6f 72 20 s.buffer."...(let*.((global.(or.
65e20 28 70 6c 69 73 74 2d 67 65 74 20 70 61 72 61 6d 73 20 3a 67 6c 6f 62 61 6c 29 0a 20 20 20 20 20 (plist-get.params.:global)......
65e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 73 70 65 63 20 28 6f 72 65 66 20 ................(and.spec.(oref.
65e60 73 70 65 63 20 67 6c 6f 62 61 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 spec.global))))..........(repo.(
65e80 6f 72 20 72 65 70 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 or.repo....................(and.
65ea0 28 6e 6f 74 20 67 6c 6f 62 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (not.global)....................
65ec0 20 20 20 20 20 28 69 66 2d 6c 65 74 2a 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 74 6f 70 .....(if-let*.((topic.(forge-top
65ee0 69 63 2d 61 74 2d 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ic-at-point))...................
65f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 ................(repo.(forge-get
65f20 2d 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 70 69 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 -repository.topic)))............
65f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 70 6f 0a 20 20 20 20 20 20 20 20 20 20 .................repo...........
65f60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 ................(forge-get-repos
65f80 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 itory.:tracked?)))))..........(d
65fa0 69 72 20 28 6f 72 20 28 61 6e 64 20 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 77 6f 72 6b ir.(or.(and.repo.(forge-get-work
65fc0 74 72 65 65 20 72 65 70 6f 29 29 20 22 2f 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 20 tree.repo))."/"))..........(buf.
65fe0 28 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 72 65 70 6f 29 29 (forge-topics-buffer-name.repo))
66000 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 20 28 6f 72 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 ..........(buf.(or.(get-buffer.b
66020 75 66 29 20 62 75 66 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 70 65 63 20 28 63 6f 6e 64 20 28 uf).buf))..........(spec.(cond.(
66040 73 70 65 63 20 28 63 6c 6f 6e 65 20 73 70 65 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 spec.(clone.spec))..............
66060 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 28 62 75 66 66 65 72 70 20 62 75 66 29 0a 20 20 20 20 ........((and.(bufferp.buf).....
66080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 6c .......................(buffer-l
660a0 6f 63 61 6c 2d 76 61 6c 75 65 20 27 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 ocal-value.'forge--buffer-topics
660c0 2d 73 70 65 63 20 62 75 66 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -spec.buf)))....................
660e0 20 20 28 28 63 6c 6f 6e 65 20 66 6f 72 67 65 2d 6c 69 73 74 2d 62 75 66 66 65 72 2d 64 65 66 61 ..((clone.forge-list-buffer-defa
66100 75 6c 74 2d 74 6f 70 69 63 2d 66 69 6c 74 65 72 73 29 29 29 29 29 0a 20 20 20 20 28 77 68 69 6c ult-topic-filters))))).....(whil
66120 65 2d 6c 65 74 20 28 28 6b 65 79 20 28 70 6f 70 20 70 61 72 61 6d 73 29 29 29 0a 20 20 20 20 20 e-let.((key.(pop.params)))......
66140 20 28 65 69 65 69 6f 2d 6f 73 65 74 20 73 70 65 63 20 28 69 6e 74 65 72 6e 20 28 73 75 62 73 74 .(eieio-oset.spec.(intern.(subst
66160 72 69 6e 67 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 6b 65 79 29 20 31 29 29 20 28 70 6f 70 20 ring.(symbol-name.key).1)).(pop.
66180 70 61 72 61 6d 73 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 65 66 20 73 70 65 63 params))).....(unless.(oref.spec
661a0 20 74 79 70 65 29 0a 20 20 20 20 20 20 28 6f 73 65 74 20 73 70 65 63 20 74 79 70 65 20 27 74 6f .type).......(oset.spec.type.'to
661c0 70 69 63 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 63 61 73 74 2d 74 6f 70 69 63 73 2d 73 70 pic)).....(forge--cast-topics-sp
661e0 65 63 2d 73 74 61 74 65 20 73 70 65 63 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 72 ec-state.spec).....(unless.(or.r
66200 65 70 6f 20 67 6c 6f 62 61 6c 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 epo.global).......(error."Cannot
66220 20 64 65 74 65 72 6d 69 6e 65 20 72 65 70 6f 73 69 74 6f 72 79 22 29 29 0a 20 20 20 20 28 6d 61 .determine.repository")).....(ma
66240 67 69 74 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d git-setup-buffer.#'forge-topics-
66260 6d 6f 64 65 20 6e 69 6c 0a 20 20 20 20 20 20 3a 62 75 66 66 65 72 20 20 20 20 28 67 65 74 2d 62 mode.nil.......:buffer....(get-b
66280 75 66 66 65 72 2d 63 72 65 61 74 65 20 62 75 66 29 0a 20 20 20 20 20 20 3a 64 69 72 65 63 74 6f uffer-create.buf).......:directo
662a0 72 79 20 64 69 72 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 ry.dir.......(forge-buffer-repos
662c0 69 74 6f 72 79 20 20 20 20 20 28 61 6e 64 20 72 65 70 6f 20 28 6f 72 65 66 20 72 65 70 6f 20 69 itory.....(and.repo.(oref.repo.i
662e0 64 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 d))).......(forge--buffer-topics
66300 2d 73 70 65 63 20 20 20 73 70 65 63 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 62 75 66 66 65 -spec...spec).......(forge-buffe
66320 72 2d 75 6e 61 73 73 6f 63 69 61 74 65 64 2d 70 20 67 6c 6f 62 61 6c 29 29 29 29 0a 0a 28 64 65 r-unassociated-p.global))))..(de
66340 66 75 6e 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 20 fun.forge-topics-refresh-buffer.
66360 28 29 0a 20 20 28 6d 61 67 69 74 2d 73 65 74 2d 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6f 72 6d ()...(magit-set-header-line-form
66380 61 74 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 62 75 66 66 65 72 2d 64 65 73 63 29 29 0a 20 at.(forge-topics-buffer-desc))..
663a0 20 28 6c 65 74 20 28 28 74 6f 70 69 63 73 20 28 66 6f 72 67 65 2d 2d 6c 69 73 74 2d 74 6f 70 69 .(let.((topics.(forge--list-topi
663c0 63 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 cs..................forge--buffe
663e0 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 r-topics-spec..................(
66400 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 29 forge-get-repository.:tracked?))
66420 29 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 20 28 74 6f )).....(magit-insert-section.(to
66440 70 69 63 62 75 66 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 28 28 6e 6f 74 picbuf).......(cond........((not
66460 20 74 6f 70 69 63 73 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 4e 6f 20 6d 61 74 .topics).........(insert."No.mat
66480 63 68 69 6e 67 20 74 6f 70 69 63 73 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 ching.topics\n"))........((not.(
664a0 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 67 oref.forge--buffer-topics-spec.g
664c0 72 6f 75 70 65 64 29 29 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 74 6f 70 69 63 20 rouped)).........(dolist.(topic.
664e0 74 6f 70 69 63 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 topics)...........(forge--insert
66500 2d 74 6f 70 69 63 20 74 6f 70 69 63 20 35 29 29 29 0a 20 20 20 20 20 20 20 28 28 70 63 61 73 65 -topic.topic.5)))........((pcase
66520 2d 64 6f 6c 69 73 74 20 28 60 28 2c 5f 20 2e 20 2c 74 6f 70 69 63 73 29 0a 20 20 20 20 20 20 20 -dolist.(`(,_...,topics)........
66540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 71 2d 67 72 6f 75 70 2d 62 79 20 28 23 ................(seq-group-by.(#
66560 23 6f 72 65 66 20 25 20 72 65 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 73 29 29 0a 20 20 20 #oref.%.repository).topics))....
66580 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 .......(let.((repo.(forge-get-re
665a0 70 6f 73 69 74 6f 72 79 20 28 63 61 72 20 74 6f 70 69 63 73 29 29 29 29 0a 20 20 20 20 20 20 20 pository.(car.topics))))........
665c0 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 20 28 66 6f 72 67 .....(magit-insert-section.(forg
665e0 65 2d 72 65 70 6f 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 e-repo.repo)...............(magi
66600 74 2d 69 6e 73 65 72 74 2d 68 65 61 64 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t-insert-heading................
66620 20 28 63 6f 6e 63 61 74 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 6f 72 65 66 20 72 65 70 6f 20 .(concat.(propertize.(oref.repo.
66640 73 6c 75 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 slug)...........................
66660 20 20 20 20 20 20 20 20 20 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 20 27 62 6f 6c 64 29 ..........'font-lock-face.'bold)
66680 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 .........................(format
666a0 20 22 20 28 25 73 29 22 20 28 6c 65 6e 67 74 68 20 74 6f 70 69 63 73 29 29 29 29 0a 20 20 20 20 .".(%s)".(length.topics)))).....
666c0 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 74 6f 70 69 63 20 74 6f 70 69 63 73 29 ..........(dolist.(topic.topics)
666e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d .................(forge--insert-
66700 74 6f 70 69 63 20 74 6f 70 69 63 20 35 29 29 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 topic.topic.5))))))))))..(defun.
66720 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 62 75 66 66 65 72 2d 64 65 73 63 20 28 29 0a 20 20 28 63 forge-topics-buffer-desc.()...(c
66740 61 70 69 74 61 6c 69 7a 65 20 28 63 6f 6e 63 61 74 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 apitalize.(concat.(symbol-name.(
66760 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 74 oref.forge--buffer-topics-spec.t
66780 79 70 65 29 29 20 22 73 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 74 6f 70 69 63 ype))."s")))..(defun.forge-topic
667a0 73 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f 29 0a 20 s-buffer-name.(&optional.repo)..
667c0 20 28 69 66 20 72 65 70 6f 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 2a 66 6f 72 67 65 2d .(if.repo.......(format."*forge-
667e0 74 6f 70 69 63 73 3a 20 25 73 2a 22 20 28 6f 72 65 66 20 72 65 70 6f 20 73 6c 75 67 29 29 0a 20 topics:.%s*".(oref.repo.slug))..
66800 20 20 20 22 2a 66 6f 72 67 65 2d 74 6f 70 69 63 73 2a 22 29 29 0a 0a 3b 3b 3b 20 43 6f 6d 6d 61 ..."*forge-topics*"))..;;;.Comma
66820 6e 64 73 0a 3b 3b 3b 3b 20 4d 65 6e 75 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 nds.;;;;.Menu..;;;###autoload(au
66840 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 20 22 66 6f 72 67 65 toload.'forge-topics-menu."forge
66860 2d 74 6f 70 69 63 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e -topics".nil.t).(transient-defin
66880 65 2d 70 72 65 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 20 28 29 0a 20 20 e-prefix.forge-topics-menu.()...
668a0 22 43 6f 6e 74 72 6f 6c 20 6c 69 73 74 20 6f 66 20 74 6f 70 69 63 73 20 64 69 73 70 6c 61 79 65 "Control.list.of.topics.displaye
668c0 64 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 22 0a 20 20 3a 74 72 61 d.in.the.current.buffer."...:tra
668e0 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 20 74 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 2d 6e 6f 6e nsient-suffix.t...:transient-non
66900 2d 73 75 66 66 69 78 20 23 27 74 72 61 6e 73 69 65 6e 74 2d 2d 64 6f 2d 63 61 6c 6c 0a 20 20 3a -suffix.#'transient--do-call...:
66920 74 72 61 6e 73 69 65 6e 74 2d 73 77 69 74 63 68 2d 66 72 61 6d 65 20 6e 69 6c 0a 20 20 3a 72 65 transient-switch-frame.nil...:re
66940 66 72 65 73 68 2d 73 75 66 66 69 78 65 73 20 74 0a 20 20 3a 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 fresh-suffixes.t...:environment.
66960 23 27 66 6f 72 67 65 2d 2d 6d 65 6e 75 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 0a 20 20 3a 63 6f 6c #'forge--menu-environment...:col
66980 75 6d 6e 2d 77 69 64 74 68 73 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6d 65 6e 75 73 2d 63 6f umn-widths.forge--topic-menus-co
669a0 6c 75 6d 6e 2d 77 69 64 74 68 73 0a 20 20 5b 3a 68 69 64 65 20 61 6c 77 61 79 73 20 28 22 71 22 lumn-widths...[:hide.always.("q"
669c0 20 66 6f 72 67 65 2d 6d 65 6e 75 2d 71 75 69 74 2d 6c 69 73 74 29 5d 0a 20 20 5b 66 6f 72 67 65 .forge-menu-quit-list)]...[forge
669e0 2d 2d 74 6f 70 69 63 2d 6d 65 6e 75 73 2d 67 72 6f 75 70 0a 20 20 20 5b 22 53 74 61 74 65 22 0a --topic-menus-group....["State".
66a00 20 20 20 20 28 22 61 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 61 63 74 ....("a".forge-topics-filter-act
66a20 69 76 65 29 0a 20 20 20 20 28 22 6f 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 ive).....("o".forge-topics-filte
66a40 72 2d 73 74 61 74 65 2d 6f 70 65 6e 29 0a 20 20 20 20 28 22 72 22 20 66 6f 72 67 65 2d 74 6f 70 r-state-open).....("r".forge-top
66a60 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 72 65 61 6c 69 7a 65 64 29 0a 20 20 20 20 28 ics-filter-state-realized).....(
66a80 22 65 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 65 78 "e".forge-topics-filter-state-ex
66aa0 70 75 6e 67 65 64 29 0a 20 20 20 20 28 22 55 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 punged).....("U".forge-topics-fi
66ac0 6c 74 65 72 2d 73 74 61 74 65 2d 75 6e 70 6c 61 6e 6e 65 64 29 0a 20 20 20 20 28 22 4f 22 20 66 lter-state-unplanned).....("O".f
66ae0 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 6f 75 74 64 61 74 65 orge-topics-filter-state-outdate
66b00 64 29 0a 20 20 20 20 28 22 44 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d d).....("D".forge-topics-filter-
66b20 73 74 61 74 65 2d 64 75 70 6c 69 63 61 74 65 29 5d 0a 20 20 20 5b 22 53 74 61 74 75 73 22 0a 20 state-duplicate)]....["Status"..
66b40 20 20 20 28 22 69 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 ...("i".forge-topics-filter-stat
66b60 75 73 2d 69 6e 62 6f 78 29 0a 20 20 20 20 28 22 75 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d us-inbox).....("u".forge-topics-
66b80 66 69 6c 74 65 72 2d 73 74 61 74 75 73 2d 75 6e 72 65 61 64 29 0a 20 20 20 20 28 22 70 22 20 66 filter-status-unread).....("p".f
66ba0 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 75 73 2d 70 65 6e 64 69 6e orge-topics-filter-status-pendin
66bc0 67 29 0a 20 20 20 20 28 22 64 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d g).....("d".forge-topics-filter-
66be0 73 74 61 74 75 73 2d 64 6f 6e 65 29 5d 0a 20 20 20 5b 22 54 79 70 65 22 0a 20 20 20 20 28 22 74 status-done)]....["Type".....("t
66c00 20 74 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 61 6c 6c 2d 74 79 70 65 73 29 0a 20 20 20 20 .t".forge-topics-all-types).....
66c20 28 22 74 20 64 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 64 69 73 63 75 ("t.d".forge-topics-filter-discu
66c40 73 73 69 6f 6e 73 29 0a 20 20 20 20 28 22 74 20 69 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d ssions).....("t.i".forge-topics-
66c60 66 69 6c 74 65 72 2d 69 73 73 75 65 73 29 0a 20 20 20 20 28 22 74 20 70 22 20 66 6f 72 67 65 2d filter-issues).....("t.p".forge-
66c80 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 70 75 6c 6c 72 65 71 73 29 5d 5d 0a 20 20 5b 66 6f 72 topics-filter-pullreqs)]]...[for
66ca0 67 65 2d 2d 6c 69 73 74 73 2d 67 72 6f 75 70 0a 20 20 20 5b 22 46 69 6c 74 65 72 20 20 20 20 20 ge--lists-group....["Filter.....
66cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
66ce0 20 22 0a 20 20 20 20 28 22 2d 63 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 .".....("-c".forge-topics-filter
66d00 2d 63 61 74 65 67 6f 72 79 29 0a 20 20 20 20 28 22 2d 6d 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 -category).....("-m".forge-topic
66d20 73 2d 66 69 6c 74 65 72 2d 6d 69 6c 65 73 74 6f 6e 65 29 0a 20 20 20 20 28 22 2d 6c 22 20 66 6f s-filter-milestone).....("-l".fo
66d40 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 6c 61 62 65 6c 73 29 0a 20 20 20 20 28 22 rge-topics-filter-labels).....("
66d60 2d 78 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 6d 61 72 6b 73 29 0a 20 -x".forge-topics-filter-marks)..
66d80 20 20 20 28 22 2d 41 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 61 75 74 ...("-A".forge-topics-filter-aut
66da0 68 6f 72 29 0a 20 20 20 20 28 22 2d 61 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 hor).....("-a".forge-topics-filt
66dc0 65 72 2d 61 73 73 69 67 6e 65 65 29 0a 20 20 20 20 28 22 2d 72 22 20 66 6f 72 67 65 2d 74 6f 70 er-assignee).....("-r".forge-top
66de0 69 63 73 2d 66 69 6c 74 65 72 2d 72 65 76 69 65 77 65 72 29 0a 20 20 20 20 28 22 2d 73 22 20 66 ics-filter-reviewer).....("-s".f
66e00 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 61 76 65 64 29 5d 0a 20 20 20 5b 22 orge-topics-filter-saved)]....["
66e20 44 69 73 70 6c 61 79 22 0a 20 20 20 20 28 22 2d 4f 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d Display".....("-O".forge-topics-
66e40 73 65 74 2d 6f 72 64 65 72 29 0a 20 20 20 20 28 22 2d 4c 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 set-order).....("-L".forge-topic
66e60 73 2d 73 65 74 2d 6c 69 6d 69 74 29 0a 20 20 20 20 28 22 2d 46 22 20 66 6f 72 67 65 2d 74 6f 70 s-set-limit).....("-F".forge-top
66e80 69 63 73 2d 75 6e 67 72 6f 75 70 29 0a 20 20 20 20 28 22 2d 47 22 20 66 6f 72 67 65 2d 74 6f 70 ics-ungroup).....("-G".forge-top
66ea0 69 63 73 2d 67 72 6f 75 70 29 0a 20 20 20 20 28 22 2d 53 22 20 66 6f 72 67 65 2d 74 6f 67 67 6c ics-group).....("-S".forge-toggl
66ec0 65 2d 64 69 73 70 6c 61 79 2d 69 6e 2d 73 74 61 74 75 73 2d 62 75 66 66 65 72 29 0a 20 20 20 20 e-display-in-status-buffer).....
66ee0 28 22 2d 48 22 20 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 29 ("-H".forge-toggle-topic-legend)
66f00 5d 5d 0a 20 20 5b 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 2d 67 72 6f 75 70 5d ]]...[forge--topic-legend-group]
66f20 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 6f 6e 64 20 28 28 64 65 72 69 76 ...(interactive)...(cond.((deriv
66f40 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 6f 64 65 20 27 6d 61 ed-mode-p.'forge-topics-mode.'ma
66f60 67 69 74 2d 73 74 61 74 75 73 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 28 74 72 61 6e 73 git-status-mode)..........(trans
66f80 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 29 29 0a ient-setup.'forge-topics-menu)).
66fa0 20 20 20 20 20 20 20 20 28 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d ........((derived-mode-p.'forge-
66fc0 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 notifications-mode)..........(se
66fe0 74 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 tq.this-command.'forge-notificat
67000 69 6f 6e 73 2d 6d 65 6e 75 29 0a 20 20 20 20 20 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 ions-menu)..........(transient-s
67020 65 74 75 70 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 65 6e 75 29 29 etup.'forge-notifications-menu))
67040 0a 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 6c 69 73 74 2d 74 6f 70 69 63 73 29 29 29 29 .........((forge-list-topics))))
67060 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 61 75 67 6d 65 6e 74 2d 73 75 66 66 69 78 20 66 6f 72 67 ..(transient-augment-suffix.forg
67080 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 20 23 27 74 72 61 e-topics-menu...:transient.#'tra
670a0 6e 73 69 65 6e 74 2d 2d 64 6f 2d 72 65 70 6c 61 63 65 0a 20 20 3a 69 66 2d 6e 6f 74 2d 64 65 72 nsient--do-replace...:if-not-der
670c0 69 76 65 64 20 27 28 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 20 ived.'(forge-notifications-mode.
670e0 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 29 0a 20 20 3a 69 forge-repository-list-mode)...:i
67100 6e 61 70 74 2d 69 66 20 28 23 23 65 71 20 28 6f 72 65 66 20 74 72 61 6e 73 69 65 6e 74 2d 2d 70 napt-if.(##eq.(oref.transient--p
67120 72 65 66 69 78 20 63 6f 6d 6d 61 6e 64 29 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e refix.command).'forge-topics-men
67140 75 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 u)...:inapt-face.'forge-suffix-a
67160 63 74 69 76 65 29 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 2d 71 75 69 ctive)..(defvar-local.forge--qui
67180 74 2d 6b 65 65 70 2d 74 6f 70 69 63 2d 6d 65 6e 75 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 66 t-keep-topic-menu.nil)..(defun.f
671a0 6f 72 67 65 2d 6d 65 6e 75 2d 71 75 69 74 2d 6c 69 73 74 20 28 29 0a 20 20 22 46 72 6f 6d 20 61 orge-menu-quit-list.()..."From.a
671c0 20 74 72 61 6e 73 69 65 6e 74 20 6d 65 6e 75 2c 20 71 75 69 74 20 74 68 65 20 6c 69 73 74 20 62 .transient.menu,.quit.the.list.b
671e0 75 66 66 65 72 20 61 6e 64 20 74 68 65 20 6d 65 6e 75 2e 0a 0a 49 66 20 71 75 69 74 74 69 6e 67 uffer.and.the.menu...If.quitting
67200 20 74 68 65 20 6c 69 73 74 20 62 75 66 66 65 72 20 63 61 75 73 65 73 20 61 6e 6f 74 68 65 72 20 .the.list.buffer.causes.another.
67220 74 6f 70 69 63 2c 20 72 65 70 6f 73 69 74 6f 72 79 20 6c 69 73 74 20 6f 72 0a 6e 6f 74 69 66 69 topic,.repository.list.or.notifi
67240 63 61 74 69 6f 6e 20 6c 69 73 74 20 62 75 66 66 65 72 20 74 6f 20 62 65 63 6f 6d 65 20 63 75 72 cation.list.buffer.to.become.cur
67260 72 65 6e 74 20 69 6e 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 77 69 6e 64 6f 77 2c 0a 74 68 65 rent.in.the.selected.window,.the
67280 6e 20 64 69 73 70 6c 61 79 20 74 68 65 20 72 65 73 70 65 63 74 69 76 65 20 6d 65 6e 75 2c 20 6f n.display.the.respective.menu,.o
672a0 74 68 65 72 77 69 73 65 20 64 69 73 70 6c 61 79 20 6e 6f 20 6d 65 6e 75 2e 22 0a 20 20 28 69 6e therwise.display.no.menu."...(in
672c0 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 6b 65 65 70 2d 74 6f 70 69 63 2d 6d teractive)...(let.((keep-topic-m
672e0 65 6e 75 20 66 6f 72 67 65 2d 2d 71 75 69 74 2d 6b 65 65 70 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 enu.forge--quit-keep-topic-menu)
67300 29 0a 20 20 20 20 28 77 68 65 6e 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 ).....(when.(derived-mode-p.'for
67320 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ge-topic-mode...................
67340 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 6f 64 65 0a 20 20 20 20 20 ........'forge-topics-mode......
67360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 72 65 70 6f .....................'forge-repo
67380 73 69 74 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sitory-list-mode................
673a0 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d ...........'forge-notifications-
673c0 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 6b 69 6c 6c 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 mode).......(kill-local-variable
673e0 20 27 66 6f 72 67 65 2d 2d 71 75 69 74 2d 6b 65 65 70 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 0a 20 .'forge--quit-keep-topic-menu)..
67400 20 20 20 20 20 28 71 75 69 74 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 .....(quit-window)).....(cond.((
67420 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 derived-mode-p.'forge-topic-mode
67440 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 72 61 6e 73 69 65 6e 74 2d 2d 65 78 )............(setq.transient--ex
67460 69 74 70 20 27 72 65 70 6c 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 72 61 6e 73 69 itp.'replace)............(transi
67480 65 6e 74 2d 73 65 74 75 70 20 28 73 65 74 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 66 6f ent-setup.(setq.this-command.'fo
674a0 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 64 65 rge-topic-menu)))...........((de
674c0 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 6f 64 65 29 rived-mode-p.'forge-topics-mode)
674e0 0a 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 6b 65 65 70 2d 74 6f 70 69 63 2d 6d ............(unless.keep-topic-m
67500 65 6e 75 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 72 61 6e 73 69 65 6e 74 enu..............(setq.transient
67520 2d 2d 65 78 69 74 70 20 27 72 65 70 6c 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 --exitp.'replace)..............(
67540 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 28 73 65 74 71 20 74 68 69 73 2d 63 6f 6d 6d 61 transient-setup.(setq.this-comma
67560 6e 64 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 29 29 29 29 0a 20 20 20 20 20 20 nd.'forge-topics-menu)))).......
67580 20 20 20 20 28 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 6f 72 67 65 2d 72 65 70 6f ....((derived-mode-p.'forge-repo
675a0 73 69 74 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 sitory-list-mode)............(se
675c0 74 71 20 74 72 61 6e 73 69 65 6e 74 2d 2d 65 78 69 74 70 20 27 72 65 70 6c 61 63 65 29 0a 20 20 tq.transient--exitp.'replace)...
675e0 20 20 20 20 20 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 28 73 65 74 71 20 .........(transient-setup.(setq.
67600 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 this-command.'forge-repositories
67620 2d 6d 65 6e 75 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 64 65 72 69 76 65 64 2d 6d 6f 64 -menu)))...........((derived-mod
67640 65 2d 70 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 29 0a 20 e-p.'forge-notifications-mode)..
67660 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 72 61 6e 73 69 65 6e 74 2d 2d 65 78 69 74 70 ..........(setq.transient--exitp
67680 20 27 72 65 70 6c 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 .'replace)............(transient
676a0 2d 73 65 74 75 70 20 28 73 65 74 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 66 6f 72 67 65 -setup.(setq.this-command.'forge
676c0 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 65 6e 75 29 29 29 0a 20 20 20 20 20 20 20 20 20 -notifications-menu)))..........
676e0 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 72 61 6e 73 69 65 6e 74 2d 2d .(t............(setq.transient--
67700 65 78 69 74 70 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 2d exitp.t)............(transient--
67720 70 72 65 2d 65 78 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d pre-exit)............(transient-
67740 2d 73 74 61 63 6b 2d 7a 61 70 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 4c 69 73 74 0a 0a 3b 3b 3b 23 -stack-zap)))))..;;;;.List..;;;#
67760 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d ##autoload(autoload.'forge-list-
67780 74 6f 70 69 63 73 20 22 66 6f 72 67 65 2d 74 6f 70 69 63 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 topics."forge-topics".nil.t).(tr
677a0 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 6c 69 73 74 ansient-define-suffix.forge-list
677c0 2d 74 6f 70 69 63 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f 29 0a 20 20 22 4c 69 73 74 -topics.(&optional.repo)..."List
677e0 20 74 6f 70 69 63 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 .topics.of.the.current.repositor
67800 79 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 74 6f 70 69 63 73 22 0a 20 20 3a 69 y."...:description."topics"...:i
67820 6e 61 70 74 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 6f 72 20 28 6e 6f 74 20 28 66 6f 72 napt-if.(lambda.().(or.(not.(for
67840 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 29 0a 20 20 ge-get-repository.:tracked?))...
67860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 20 6d 61 6a ....................(and.(eq.maj
67880 6f 72 2d 6d 6f 64 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 6f 64 65 29 0a 20 20 20 20 or-mode.'forge-topics-mode).....
678a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 6f 72 65 .......................(not.(ore
678c0 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 67 6c 6f 62 f.forge--buffer-topics-spec.glob
678e0 61 6c 29 29 29 29 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 28 6c 61 6d 62 64 61 20 28 29 al)))))...:inapt-face.(lambda.()
67900 20 28 69 66 20 28 6e 6f 74 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 .(if.(not.(forge-get-repository.
67920 3a 74 72 61 63 6b 65 64 3f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :tracked?)).....................
67940 20 20 20 20 27 74 72 61 6e 73 69 65 6e 74 2d 69 6e 61 70 74 2d 73 75 66 66 69 78 0a 20 20 20 20 ....'transient-inapt-suffix.....
67960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d ..................'forge-suffix-
67980 61 63 74 69 76 65 29 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 74 65 72 61 63 74 69 76 65 active))...(declare.(interactive
679a0 2d 6f 6e 6c 79 20 6e 69 6c 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 -only.nil))...(interactive)...(f
679c0 6f 72 67 65 2d 74 6f 70 69 63 73 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 72 65 70 6f 29 0a 20 orge-topics-setup-buffer.repo)..
679e0 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d .(transient-setup.'forge-topics-
67a00 6d 65 6e 75 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 menu))..;;;###autoload(autoload.
67a20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 64 69 73 63 75 73 73 69 6f 6e 73 20 22 66 6f 72 67 65 2d 74 'forge-list-discussions."forge-t
67a40 6f 70 69 63 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d opics".nil.t).(transient-define-
67a60 73 75 66 66 69 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 64 69 73 63 75 73 73 69 6f 6e 73 20 28 26 suffix.forge-list-discussions.(&
67a80 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f 29 0a 20 20 22 4c 69 73 74 20 64 69 73 63 75 73 73 69 6f optional.repo)..."List.discussio
67aa0 6e 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 ns.of.the.current.repository."..
67ac0 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 64 69 73 63 75 73 73 69 6f 6e 73 22 0a 20 20 28 64 .:description."discussions"...(d
67ae0 65 63 6c 61 72 65 20 28 69 6e 74 65 72 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 6c 29 29 0a 20 eclare.(interactive-only.nil))..
67b00 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 73 .(interactive)...(forge-topics-s
67b20 65 74 75 70 2d 62 75 66 66 65 72 20 72 65 70 6f 20 6e 69 6c 20 3a 74 79 70 65 20 27 64 69 73 63 etup-buffer.repo.nil.:type.'disc
67b40 75 73 73 69 6f 6e 29 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 ussion)...(transient-setup.'forg
67b60 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 e-topics-menu))..;;;###autoload(
67b80 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 69 73 73 75 65 73 20 22 66 6f 72 autoload.'forge-list-issues."for
67ba0 67 65 2d 74 6f 70 69 63 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 ge-topics".nil.t).(transient-def
67bc0 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 69 73 73 75 65 73 20 28 26 6f ine-suffix.forge-list-issues.(&o
67be0 70 74 69 6f 6e 61 6c 20 72 65 70 6f 29 0a 20 20 22 4c 69 73 74 20 69 73 73 75 65 73 20 6f 66 20 ptional.repo)..."List.issues.of.
67c00 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20 3a 64 65 73 63 the.current.repository."...:desc
67c20 72 69 70 74 69 6f 6e 20 22 69 73 73 75 65 73 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 74 ription."issues"...(declare.(int
67c40 65 72 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 6c 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 eractive-only.nil))...(interacti
67c60 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 73 65 74 75 70 2d 62 75 66 66 65 72 ve)...(forge-topics-setup-buffer
67c80 20 72 65 70 6f 20 6e 69 6c 20 3a 74 79 70 65 20 27 69 73 73 75 65 29 0a 20 20 28 74 72 61 6e 73 .repo.nil.:type.'issue)...(trans
67ca0 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 29 29 0a ient-setup.'forge-topics-menu)).
67cc0 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d .;;;###autoload(autoload.'forge-
67ce0 6c 69 73 74 2d 70 75 6c 6c 72 65 71 73 20 22 66 6f 72 67 65 2d 74 6f 70 69 63 73 22 20 6e 69 6c list-pullreqs."forge-topics".nil
67d00 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 .t).(transient-define-suffix.for
67d20 67 65 2d 6c 69 73 74 2d 70 75 6c 6c 72 65 71 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f ge-list-pullreqs.(&optional.repo
67d40 29 0a 20 20 22 4c 69 73 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 6f 66 20 74 68 65 20 63 )..."List.pull-requests.of.the.c
67d60 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 urrent.repository."...:descripti
67d80 6f 6e 20 22 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 on."pull-requests"...(declare.(i
67da0 6e 74 65 72 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 6c 29 29 0a 20 20 28 69 6e 74 65 72 61 63 nteractive-only.nil))...(interac
67dc0 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 73 65 74 75 70 2d 62 75 66 66 tive)...(forge-topics-setup-buff
67de0 65 72 20 72 65 70 6f 20 6e 69 6c 20 3a 74 79 70 65 20 27 70 75 6c 6c 72 65 71 29 0a 20 20 28 74 er.repo.nil.:type.'pullreq)...(t
67e00 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e ransient-setup.'forge-topics-men
67e20 75 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f u))..;;;###autoload(autoload.'fo
67e40 72 67 65 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 2d 74 6f 70 69 63 73 20 22 66 6f 72 67 65 2d 74 6f rge-list-global-topics."forge-to
67e60 70 69 63 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 pics".nil.t).(transient-define-s
67e80 75 66 66 69 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 2d 74 6f 70 69 63 73 20 28 uffix.forge-list-global-topics.(
67ea0 26 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f 29 0a 20 20 22 4c 69 73 74 20 74 6f 70 69 63 73 20 61 &optional.repo)..."List.topics.a
67ec0 63 72 6f 73 73 20 61 6c 6c 20 74 72 61 63 6b 65 64 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 cross.all.tracked.repository."..
67ee0 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 74 6f 70 69 63 73 22 0a 20 20 3a 69 6e 61 70 74 2d .:description."topics"...:inapt-
67f00 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 61 6e 64 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 if.(lambda.().(and.(eq.major-mod
67f20 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 e.'forge-topics-mode)...........
67f40 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 .............(oref.forge--buffer
67f60 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 67 6c 6f 62 61 6c 29 29 29 0a 20 20 3a 69 6e 61 70 74 2d -topics-spec.global)))...:inapt-
67f80 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 0a 20 20 28 64 65 63 face.'forge-suffix-active...(dec
67fa0 6c 61 72 65 20 28 69 6e 74 65 72 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 6c 29 29 0a 20 20 28 lare.(interactive-only.nil))...(
67fc0 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 73 65 74 interactive)...(forge-topics-set
67fe0 75 70 2d 62 75 66 66 65 72 20 72 65 70 6f 20 6e 69 6c 20 3a 67 6c 6f 62 61 6c 20 74 29 0a 20 20 up-buffer.repo.nil.:global.t)...
68000 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d (transient-setup.'forge-topics-m
68020 65 6e 75 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 28 61 75 74 6f 6c 6f 61 64 20 27 enu))..;;;###autoload(autoload.'
68040 66 6f 72 67 65 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 2d 69 73 73 75 65 73 20 22 66 6f 72 67 65 2d forge-list-global-issues."forge-
68060 74 6f 70 69 63 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 topics".nil.t).(transient-define
68080 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 2d 69 73 73 75 65 73 -suffix.forge-list-global-issues
680a0 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f 29 0a 20 20 22 4c 69 73 74 20 69 73 73 75 65 73 .(&optional.repo)..."List.issues
680c0 20 61 63 72 6f 73 73 20 61 6c 6c 20 74 72 61 63 6b 65 64 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 .across.all.tracked.repository."
680e0 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 69 73 73 75 65 73 22 0a 20 20 28 64 65 63 6c ...:description."issues"...(decl
68100 61 72 65 20 28 69 6e 74 65 72 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 6c 29 29 0a 20 20 28 69 are.(interactive-only.nil))...(i
68120 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 73 65 74 75 nteractive)...(forge-topics-setu
68140 70 2d 62 75 66 66 65 72 20 72 65 70 6f 20 6e 69 6c 20 3a 67 6c 6f 62 61 6c 20 74 20 3a 74 79 70 p-buffer.repo.nil.:global.t.:typ
68160 65 20 27 69 73 73 75 65 29 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f e.'issue)...(transient-setup.'fo
68180 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 rge-topics-menu))..;;;###autoloa
681a0 64 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 2d 70 75 d(autoload.'forge-list-global-pu
681c0 6c 6c 72 65 71 73 20 22 66 6f 72 67 65 2d 74 6f 70 69 63 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 llreqs."forge-topics".nil.t).(tr
681e0 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 6c 69 73 74 ansient-define-suffix.forge-list
68200 2d 67 6c 6f 62 61 6c 2d 70 75 6c 6c 72 65 71 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f -global-pullreqs.(&optional.repo
68220 29 0a 20 20 22 4c 69 73 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 61 63 72 6f 73 73 20 61 )..."List.pull-requests.across.a
68240 6c 6c 20 74 72 61 63 6b 65 64 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20 3a 64 65 73 63 72 ll.tracked.repository."...:descr
68260 69 70 74 69 6f 6e 20 22 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 22 0a 20 20 28 64 65 63 6c 61 72 iption."pull-requests"...(declar
68280 65 20 28 69 6e 74 65 72 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 6c 29 29 0a 20 20 28 69 6e 74 e.(interactive-only.nil))...(int
682a0 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 73 65 74 75 70 2d eractive)...(forge-topics-setup-
682c0 62 75 66 66 65 72 20 72 65 70 6f 20 6e 69 6c 20 3a 67 6c 6f 62 61 6c 20 74 20 3a 74 79 70 65 20 buffer.repo.nil.:global.t.:type.
682e0 27 70 75 6c 6c 72 65 71 29 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 'pullreq)...(transient-setup.'fo
68300 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 29 29 0a 0a 3b 3b 3b 3b 20 54 79 70 65 0a 0a 28 64 rge-topics-menu))..;;;;.Type..(d
68320 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 74 79 70 efclass.forge--topics-filter-typ
68340 65 2d 63 6f 6d 6d 61 6e 64 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 29 0a 20 20 28 e-command.(transient-suffix)...(
68360 28 74 79 70 65 20 3a 69 6e 69 74 61 72 67 20 3a 74 79 70 65 29 0a 20 20 20 28 64 65 66 69 6e 69 (type.:initarg.:type)....(defini
68380 74 69 6f 6e 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 26 6f 70 74 tion.....:initform.(lambda.(&opt
683a0 69 6f 6e 61 6c 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 ional.repo).................(int
683c0 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 eractive).................(oset.
683e0 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 74 79 70 65 0a 20 forge--buffer-topics-spec.type..
68400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 28 74 72 61 6e .....................(oref.(tran
68420 73 69 65 6e 74 2d 73 75 66 66 69 78 2d 6f 62 6a 65 63 74 29 20 74 79 70 65 29 29 0a 20 20 20 20 sient-suffix-object).type)).....
68440 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 63 61 73 74 2d 74 6f 70 69 63 73 2d ............(forge--cast-topics-
68460 73 70 65 63 2d 73 74 61 74 65 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d spec-state.forge--buffer-topics-
68480 73 70 65 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 spec).................(forge-ref
684a0 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 28 69 6e 61 70 74 2d 66 61 63 65 20 3a 69 resh-buffer)))....(inapt-face.:i
684c0 6e 69 74 66 6f 72 6d 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 29 0a 20 20 nitform.'forge-suffix-active)...
684e0 20 28 69 6e 61 70 74 2d 69 66 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 .(inapt-if.....:initform.(lambda
68500 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 28 6f 72 65 66 20 66 6f .().................(eq.(oref.fo
68520 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 74 79 70 65 29 0a 20 20 rge--buffer-topics-spec.type)...
68540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 28 74 72 61 6e 73 69 65 ..................(oref.(transie
68560 6e 74 2d 73 75 66 66 69 78 2d 6f 62 6a 65 63 74 29 20 74 79 70 65 29 29 29 29 29 29 0a 0a 28 74 nt-suffix-object).type))))))..(t
68580 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 ransient-define-suffix.forge-top
685a0 69 63 73 2d 61 6c 6c 2d 74 79 70 65 73 20 28 29 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 ics-all-types.()...:class.'forge
685c0 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 74 79 70 65 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 --topics-filter-type-command.:ty
685e0 70 65 20 27 74 6f 70 69 63 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 74 6f 70 69 63 73 pe.'topic...:description."topics
68600 22 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 ")..(transient-define-suffix.for
68620 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 64 69 73 63 75 73 73 69 6f 6e 73 20 28 29 0a ge-topics-filter-discussions.().
68640 20 20 22 4c 69 73 74 20 64 69 73 63 75 73 73 69 6f 6e 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 .."List.discussions.of.the.curre
68660 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d nt.repository."...:class.'forge-
68680 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 74 79 70 65 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 -topics-filter-type-command.:typ
686a0 65 20 27 64 69 73 63 75 73 73 69 6f 6e 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 64 69 e.'discussion...:description."di
686c0 73 63 75 73 73 69 6f 6e 73 22 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 scussions")..(transient-define-s
686e0 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 69 73 73 75 65 73 uffix.forge-topics-filter-issues
68700 20 28 29 0a 20 20 22 4c 69 73 74 20 69 73 73 75 65 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e .()..."List.issues.of.the.curren
68720 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d t.repository."...:class.'forge--
68740 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 74 79 70 65 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 topics-filter-type-command.:type
68760 20 27 69 73 73 75 65 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 69 73 73 75 65 73 22 29 .'issue...:description."issues")
68780 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 ..(transient-define-suffix.forge
687a0 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 70 75 6c 6c 72 65 71 73 20 28 29 0a 20 20 22 4c 69 -topics-filter-pullreqs.()..."Li
687c0 73 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 st.pull-requests.of.the.current.
687e0 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f repository."...:class.'forge--to
68800 70 69 63 73 2d 66 69 6c 74 65 72 2d 74 79 70 65 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 pics-filter-type-command.:type.'
68820 70 75 6c 6c 72 65 71 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 70 75 6c 6c 2d 72 65 71 pullreq...:description."pull-req
68840 75 65 73 74 73 22 29 0a 0a 3b 3b 3b 3b 20 41 63 74 69 76 65 0a 0a 28 74 72 61 6e 73 69 65 6e 74 uests")..;;;;.Active..(transient
68860 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 -define-suffix.forge-topics-filt
68880 65 72 2d 61 63 74 69 76 65 20 28 29 0a 20 20 22 4c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 er-active.()..."Limit.topic.list
688a0 20 74 6f 20 61 63 74 69 76 65 20 74 6f 70 69 63 73 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 .to.active.topics."...:descripti
688c0 6f 6e 20 22 61 63 74 69 76 65 22 0a 20 20 3a 66 61 63 65 20 28 23 23 61 6e 64 20 28 6f 72 65 66 on."active"...:face.(##and.(oref
688e0 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 61 63 74 69 76 .forge--buffer-topics-spec.activ
68900 65 29 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 29 0a 20 20 28 69 6e 74 65 e).'forge-suffix-active)...(inte
68920 72 61 63 74 69 76 65 29 0a 20 20 28 6f 73 65 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 ractive)...(oset.forge--buffer-t
68940 6f 70 69 63 73 2d 73 70 65 63 20 61 63 74 69 76 65 0a 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 opics-spec.active.........(not.(
68960 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 61 oref.forge--buffer-topics-spec.a
68980 63 74 69 76 65 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 ctive)))...(forge-refresh-buffer
689a0 29 29 0a 0a 3b 3b 3b 3b 20 53 74 61 74 65 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d ))..;;;;.State..(defclass.forge-
689c0 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 20 28 74 72 -topics-filter-state-command.(tr
689e0 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 29 0a 20 20 28 28 73 74 61 74 65 20 3a 69 6e 69 74 61 ansient-suffix)...((state.:inita
68a00 72 67 20 3a 73 74 61 74 65 29 0a 20 20 20 28 64 65 66 69 6e 69 74 69 6f 6e 0a 20 20 20 20 3a 69 rg.:state)....(definition.....:i
68a20 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 nitform.(lambda.()..............
68a40 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...(interactive)................
68a60 20 28 6c 65 74 20 28 28 77 61 6e 74 20 28 6f 72 65 66 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 .(let.((want.(oref.(transient-su
68a80 66 66 69 78 2d 6f 62 6a 65 63 74 29 20 73 74 61 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 ffix-object).state))............
68aa0 20 20 20 20 20 20 20 20 20 20 20 28 73 70 65 63 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 ...........(spec.forge--buffer-t
68ac0 6f 70 69 63 73 2d 73 70 65 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 opics-spec))...................(
68ae0 63 6f 6e 64 20 28 28 61 6e 64 20 28 65 71 20 77 61 6e 74 20 27 6f 70 65 6e 29 0a 20 20 20 20 20 cond.((and.(eq.want.'open)......
68b00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 73 .........................(oref.s
68b20 70 65 63 20 61 63 74 69 76 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pec.active))....................
68b40 20 20 20 20 20 20 28 6f 73 65 74 20 73 70 65 63 20 61 63 74 69 76 65 20 6e 69 6c 29 0a 20 20 20 ......(oset.spec.active.nil)....
68b60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 73 70 65 63 ......................(oset.spec
68b80 20 73 74 61 74 65 20 77 61 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .state.want))...................
68ba0 20 20 20 20 20 20 28 28 65 71 75 61 6c 20 28 6f 72 65 66 20 73 70 65 63 20 73 74 61 74 65 29 20 ......((equal.(oref.spec.state).
68bc0 77 61 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 want)..........................(
68be0 6f 73 65 74 20 73 70 65 63 20 73 74 61 74 65 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 oset.spec.state.nil))...........
68c00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..............(t................
68c20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 73 70 65 63 20 61 63 74 69 76 65 20 6e 69 6c 29 ..........(oset.spec.active.nil)
68c40 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 ..........................(oset.
68c60 73 70 65 63 20 73 74 61 74 65 20 77 61 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 spec.state.want)))).............
68c80 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 ....(forge-refresh-buffer)))....
68ca0 28 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 (description.....:initform.(lamb
68cc0 64 61 20 28 73 75 66 66 69 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d da.(suffix).................(sym
68ce0 62 6f 6c 2d 6e 61 6d 65 20 28 6f 72 65 66 20 73 75 66 66 69 78 20 73 74 61 74 65 29 29 29 29 0a bol-name.(oref.suffix.state)))).
68d00 20 20 20 28 66 61 63 65 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 ...(face.....:initform.(lambda.(
68d20 73 75 66 66 69 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 77 suffix).................(let.((w
68d40 61 6e 74 20 20 20 28 6f 72 65 66 20 73 75 66 66 69 78 20 73 74 61 74 65 29 29 0a 20 20 20 20 20 ant...(oref.suffix.state))......
68d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 61 76 65 20 20 20 28 6f 72 65 66 20 66 .................(have...(oref.f
68d80 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 73 74 61 74 65 29 29 orge--buffer-topics-spec.state))
68da0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 63 74 69 76 65 20 28 .......................(active.(
68dc0 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 61 oref.forge--buffer-topics-spec.a
68de0 63 74 69 76 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 ctive)))...................(cond
68e00 20 28 28 61 6e 64 20 28 6e 6f 74 20 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .((and.(not.active).............
68e20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 75 61 6c 20 68 61 76 65 20 77 61 ..................(equal.have.wa
68e40 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 nt))..........................'f
68e60 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 orge-suffix-active).............
68e80 20 20 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 28 6f 72 20 61 63 74 69 76 65 0a 20 20 20 ............((and.(or.active....
68ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
68ec0 65 71 20 68 61 76 65 20 27 6f 70 65 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eq.have.'open)).................
68ee0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 77 61 6e 74 20 27 6f 70 65 6e 29 29 0a 20 ..............(eq.want.'open))..
68f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 ........................(if.(eq.
68f20 68 61 76 65 20 77 61 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 have.want)......................
68f40 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 2d 61 6e 64 ........'forge-suffix-active-and
68f60 2d 69 6d 70 6c 69 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -implied........................
68f80 20 20 20 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 69 6d 70 6c 69 65 64 29 29 0a 20 20 20 20 ....'forge-suffix-implied)).....
68fa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 28 6d 65 6d 71 20 ....................((and.(memq.
68fc0 77 61 6e 74 20 27 28 75 6e 70 6c 61 6e 6e 65 64 20 64 75 70 6c 69 63 61 74 65 20 6f 75 74 64 61 want.'(unplanned.duplicate.outda
68fe0 74 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ted))...........................
69000 20 20 20 20 28 65 71 75 61 6c 20 68 61 76 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(equal.have.................
69020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 75 6e 70 6c 61 6e 6e 65 64 .....................'(unplanned
69040 20 64 75 70 6c 69 63 61 74 65 20 6f 75 74 64 61 74 65 64 20 72 65 6a 65 63 74 65 64 29 29 0a 20 .duplicate.outdated.rejected))..
69060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f .............................(no
69080 74 20 61 63 74 69 76 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.active))......................
690a0 20 20 20 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 69 6d 70 6c 69 65 64 29 29 29 29 29 29 29 ....'forge-suffix-implied)))))))
690c0 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 ..(transient-define-suffix.forge
690e0 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 6f 70 65 6e 20 28 29 0a 20 20 22 -topics-filter-state-open.()..."
69100 4c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 6f 70 65 6e 20 74 6f 70 69 63 73 2e Limit.topic.list.to.open.topics.
69120 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 "...:class.'forge--topics-filter
69140 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 74 61 74 65 20 27 6f 70 65 6e 29 0a 0a -state-command...:state.'open)..
69160 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 (transient-define-suffix.forge-t
69180 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 72 65 61 6c 69 7a 65 64 20 28 29 0a 20 opics-filter-state-realized.()..
691a0 20 22 4c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 72 65 61 6c 69 7a 65 64 20 74 ."Limit.topic.list.to.realized.t
691c0 6f 70 69 63 73 2e 0a 52 65 61 6c 69 7a 65 64 20 74 6f 70 69 63 73 20 69 6e 63 6c 75 64 65 3a 0a opics..Realized.topics.include:.
691e0 2d 20 63 6f 6d 70 6c 65 74 65 64 20 64 69 73 63 75 73 73 69 6f 6e 73 2c 0a 2d 20 63 6f 6d 70 6c -.completed.discussions,.-.compl
69200 65 74 65 64 20 69 73 73 75 65 73 2c 20 61 6e 64 0a 2d 20 6d 65 72 67 65 64 20 70 75 6c 6c 2d 72 eted.issues,.and.-.merged.pull-r
69220 65 71 75 65 73 74 73 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 equests."...:class.'forge--topic
69240 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 74 61 74 65 20 s-filter-state-command...:state.
69260 27 28 63 6f 6d 70 6c 65 74 65 64 20 6d 65 72 67 65 64 29 0a 20 20 3a 64 65 73 63 72 69 70 74 69 '(completed.merged)...:descripti
69280 6f 6e 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 on.(lambda.()..................(
692a0 70 63 61 73 65 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 pcase.(oref.forge--buffer-topics
692c0 2d 73 70 65 63 20 74 79 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 -spec.type)....................(
692e0 27 64 69 73 63 75 73 73 69 6f 6e 20 22 63 6f 6d 70 6c 65 74 65 64 22 29 0a 20 20 20 20 20 20 20 'discussion."completed")........
69300 20 20 20 20 20 20 20 20 20 20 20 20 28 27 69 73 73 75 65 20 20 20 20 20 20 22 63 6f 6d 70 6c 65 ............('issue......"comple
69320 74 65 64 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 70 75 6c 6c 72 ted")....................('pullr
69340 65 71 20 20 20 20 22 6d 65 72 67 65 64 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eq...."merged").................
69360 20 20 20 28 27 74 6f 70 69 63 20 20 20 20 20 20 22 72 65 61 6c 69 7a 65 64 22 29 29 29 29 0a 0a ...('topic......"realized"))))..
69380 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 (transient-define-suffix.forge-t
693a0 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 65 78 70 75 6e 67 65 64 20 28 29 0a 20 opics-filter-state-expunged.()..
693c0 20 22 4c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 65 78 70 75 6e 67 65 64 20 74 ."Limit.topic.list.to.expunged.t
693e0 6f 70 69 63 73 2e 0a 45 78 70 75 6e 67 65 64 20 74 6f 70 69 63 73 20 69 6e 63 6c 75 64 65 3a 0a opics..Expunged.topics.include:.
69400 2d 20 64 69 73 63 75 73 73 69 6f 6e 73 20 63 6c 6f 73 65 64 20 61 73 20 6f 75 74 64 61 74 65 64 -.discussions.closed.as.outdated
69420 2c 0a 2d 20 64 69 73 63 75 73 73 69 6f 6e 73 20 63 6c 6f 73 65 64 20 61 73 20 64 75 70 6c 69 63 ,.-.discussions.closed.as.duplic
69440 61 74 65 73 2c 0a 2d 20 69 73 73 75 65 73 20 63 6c 6f 73 65 64 20 61 73 20 75 6e 70 6c 61 6e 6e ates,.-.issues.closed.as.unplann
69460 65 64 2c 0a 2d 20 69 73 73 75 65 73 20 63 6c 6f 73 65 64 20 61 73 20 64 75 70 6c 69 63 61 74 65 ed,.-.issues.closed.as.duplicate
69480 73 2c 20 61 6e 64 0a 2d 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 63 6c 6f 73 65 64 20 77 69 s,.and.-.pull-requests.closed.wi
694a0 74 68 6f 75 74 20 6d 65 72 67 69 6e 67 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d thout.merging."...:class.'forge-
694c0 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a -topics-filter-state-command...:
694e0 73 74 61 74 65 20 27 28 75 6e 70 6c 61 6e 6e 65 64 20 64 75 70 6c 69 63 61 74 65 20 6f 75 74 64 state.'(unplanned.duplicate.outd
69500 61 74 65 64 20 72 65 6a 65 63 74 65 64 29 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 28 6c ated.rejected)...:description.(l
69520 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 ambda.()..................(pcase
69540 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 .(oref.forge--buffer-topics-spec
69560 20 74 79 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 64 69 73 63 .type)....................('disc
69580 75 73 73 69 6f 6e 20 22 65 78 70 75 6e 67 65 64 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ussion."expunged")..............
695a0 20 20 20 20 20 20 28 27 69 73 73 75 65 20 20 20 20 20 20 22 65 78 70 75 6e 67 65 64 22 29 0a 20 ......('issue......"expunged")..
695c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 70 75 6c 6c 72 65 71 20 20 20 20 22 ..................('pullreq...."
695e0 72 65 6a 65 63 74 65 64 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 rejected")....................('
69600 74 6f 70 69 63 20 20 20 20 20 20 22 65 78 70 75 6e 67 65 64 22 29 29 29 29 0a 0a 28 74 72 61 6e topic......"expunged"))))..(tran
69620 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 sient-define-suffix.forge-topics
69640 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 75 6e 70 6c 61 6e 6e 65 64 20 28 29 0a 20 20 22 4c 69 -filter-state-unplanned.()..."Li
69660 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 69 73 73 75 65 73 20 63 6c 6f 73 65 64 20 mit.topic.list.to.issues.closed.
69680 61 73 20 75 6e 70 6c 61 6e 6e 65 64 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d as.unplanned."...:class.'forge--
696a0 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 topics-filter-state-command...:s
696c0 74 61 74 65 20 27 75 6e 70 6c 61 6e 6e 65 64 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 tate.'unplanned...:description."
696e0 20 20 75 6e 70 6c 61 6e 6e 65 64 22 0a 20 20 3a 69 66 20 28 23 23 65 71 20 28 6f 72 65 66 20 66 ..unplanned"...:if.(##eq.(oref.f
69700 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 74 79 70 65 29 20 27 orge--buffer-topics-spec.type).'
69720 69 73 73 75 65 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 issue))..(transient-define-suffi
69740 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 6f 75 74 64 x.forge-topics-filter-state-outd
69760 61 74 65 64 20 28 29 0a 20 20 22 4c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 64 ated.()..."Limit.topic.list.to.d
69780 69 73 63 75 73 73 69 6f 6e 73 20 63 6c 6f 73 65 64 20 61 73 20 6f 75 74 64 61 74 65 64 2e 22 0a iscussions.closed.as.outdated.".
697a0 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 ..:class.'forge--topics-filter-s
697c0 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 74 61 74 65 20 27 6f 75 74 64 61 74 65 64 0a tate-command...:state.'outdated.
697e0 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 20 20 6f 75 74 64 61 74 65 64 22 0a 20 20 3a 69 ..:description."..outdated"...:i
69800 66 20 28 23 23 65 71 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 f.(##eq.(oref.forge--buffer-topi
69820 63 73 2d 73 70 65 63 20 74 79 70 65 29 20 27 64 69 73 63 75 73 73 69 6f 6e 29 29 0a 0a 28 74 72 cs-spec.type).'discussion))..(tr
69840 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 ansient-define-suffix.forge-topi
69860 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 65 2d 64 75 70 6c 69 63 61 74 65 20 28 29 0a 20 20 22 cs-filter-state-duplicate.()..."
69880 4c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 64 69 73 63 75 73 73 69 6f 6e 73 20 Limit.topic.list.to.discussions.
698a0 61 6e 64 20 69 73 73 75 65 73 20 63 6c 6f 73 65 64 20 61 73 20 64 75 70 6c 69 63 61 74 65 73 2e and.issues.closed.as.duplicates.
698c0 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 "...:class.'forge--topics-filter
698e0 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 74 61 74 65 20 27 64 75 70 6c 69 63 61 -state-command...:state.'duplica
69900 74 65 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 20 20 64 75 70 6c 69 63 61 74 65 22 0a te...:description."..duplicate".
69920 20 20 3a 69 66 20 28 23 23 6d 65 6d 71 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 ..:if.(##memq.(oref.forge--buffe
69940 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 74 79 70 65 29 20 27 28 64 69 73 63 75 73 73 69 6f 6e r-topics-spec.type).'(discussion
69960 20 69 73 73 75 65 29 29 29 0a 0a 3b 3b 3b 3b 20 53 74 61 74 75 73 0a 0a 28 64 65 66 63 6c 61 73 .issue)))..;;;;.Status..(defclas
69980 73 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 75 73 2d 63 6f s.forge--topics-filter-status-co
699a0 6d 6d 61 6e 64 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 29 0a 20 20 28 28 73 74 61 mmand.(transient-suffix)...((sta
699c0 74 75 73 20 3a 69 6e 69 74 61 72 67 20 3a 73 74 61 74 75 73 29 0a 20 20 20 28 64 65 66 69 6e 69 tus.:initarg.:status)....(defini
699e0 74 69 6f 6e 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 tion.....:initform.(lambda.()...
69a00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 ..............(interactive).....
69a20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 77 61 6e 74 20 20 20 28 6f 72 65 66 ............(let*.((want...(oref
69a40 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 2d 6f 62 6a 65 63 74 29 20 73 74 61 74 75 .(transient-suffix-object).statu
69a60 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 70 65 63 s))........................(spec
69a80 20 20 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 29 0a 20 20 ...forge--buffer-topics-spec)...
69aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 61 76 65 20 20 20 28 6f 72 .....................(have...(or
69ac0 65 66 20 73 70 65 63 20 73 74 61 74 75 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ef.spec.status))................
69ae0 20 20 20 20 20 20 20 20 28 61 63 74 69 76 65 20 28 6f 72 65 66 20 73 70 65 63 20 61 63 74 69 76 ........(active.(oref.spec.activ
69b00 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 61 63 e)))...................(cond.(ac
69b20 74 69 76 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f tive..........................(o
69b40 73 65 74 20 73 70 65 63 20 61 63 74 69 76 65 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 set.spec.active.nil)............
69b60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 73 70 65 63 20 73 74 61 74 75 73 20 ..............(oset.spec.status.
69b80 77 61 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 want)).........................(
69ba0 28 65 71 20 68 61 76 65 20 77 61 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (eq.have.want)..................
69bc0 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 73 70 65 63 20 73 74 61 74 75 73 20 6e 69 6c 29 29 0a ........(oset.spec.status.nil)).
69be0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6f 73 65 74 20 73 ........................((oset.s
69c00 70 65 63 20 73 74 61 74 75 73 20 77 61 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 pec.status.want)))).............
69c20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 ....(forge-refresh-buffer)))....
69c40 28 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 (description.....:initform.(lamb
69c60 64 61 20 28 73 75 66 66 69 78 29 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 6f 72 65 66 20 73 da.(suffix).(symbol-name.(oref.s
69c80 75 66 66 69 78 20 73 74 61 74 75 73 29 29 29 29 0a 20 20 20 28 66 61 63 65 0a 20 20 20 20 3a 69 uffix.status))))....(face.....:i
69ca0 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 61 20 28 73 75 66 66 69 78 29 0a 20 20 20 20 20 20 20 nitform.(lambda.(suffix)........
69cc0 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 77 61 6e 74 20 20 20 28 6f 72 65 66 20 73 75 66 .........(let.((want...(oref.suf
69ce0 66 69 78 20 73 74 61 74 75 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 fix.status))....................
69d00 20 20 20 28 68 61 76 65 20 20 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 ...(have...(oref.forge--buffer-t
69d20 6f 70 69 63 73 2d 73 70 65 63 20 73 74 61 74 75 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 opics-spec.status)).............
69d40 20 20 20 20 20 20 20 20 20 20 28 61 63 74 69 76 65 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 ..........(active.(oref.forge--b
69d60 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 61 63 74 69 76 65 29 29 29 0a 20 20 20 20 uffer-topics-spec.active))).....
69d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 61 6e 64 20 28 6e 6f 74 20 61 ..............(cond.((and.(not.a
69da0 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ctive)..........................
69dc0 20 20 20 20 20 28 65 71 75 61 6c 20 68 61 76 65 20 77 61 6e 74 29 29 0a 20 20 20 20 20 20 20 20 .....(equal.have.want)).........
69de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 .................'forge-suffix-a
69e00 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ctive).........................(
69e20 28 61 6e 64 20 28 6f 72 20 61 63 74 69 76 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (and.(or.active.................
69e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 68 61 76 65 20 27 69 6e 62 6f ..................(eq.have.'inbo
69e60 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 x)).............................
69e80 20 20 28 6d 65 6d 71 20 77 61 6e 74 20 27 28 69 6e 62 6f 78 20 75 6e 72 65 61 64 20 70 65 6e 64 ..(memq.want.'(inbox.unread.pend
69ea0 69 6e 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ing)))..........................
69ec0 28 69 66 20 28 65 71 20 68 61 76 65 20 77 61 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 (if.(eq.have.want)..............
69ee0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 ................'forge-suffix-ac
69f00 74 69 76 65 2d 61 6e 64 2d 69 6d 70 6c 69 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tive-and-implied................
69f20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 69 6d 70 6c 69 65 ............'forge-suffix-implie
69f40 64 29 29 29 29 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 d))))))))..(transient-define-suf
69f60 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 75 73 2d 69 fix.forge-topics-filter-status-i
69f80 6e 62 6f 78 20 28 29 0a 20 20 22 4c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 75 nbox.()..."Limit.topic.list.to.u
69fa0 6e 72 65 61 64 20 61 6e 64 20 70 65 6e 64 69 6e 67 20 74 6f 70 69 63 73 2e 22 0a 20 20 3a 63 6c nread.and.pending.topics."...:cl
69fc0 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 75 73 ass.'forge--topics-filter-status
69fe0 2d 63 6f 6d 6d 61 6e 64 20 3a 73 74 61 74 75 73 20 27 69 6e 62 6f 78 29 0a 0a 28 74 72 61 6e 73 -command.:status.'inbox)..(trans
6a000 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d ient-define-suffix.forge-topics-
6a020 66 69 6c 74 65 72 2d 73 74 61 74 75 73 2d 75 6e 72 65 61 64 20 28 29 0a 20 20 22 4c 69 6d 69 74 filter-status-unread.()..."Limit
6a040 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 75 6e 72 65 61 64 20 74 6f 70 69 63 73 2e 22 0a 20 .topic.list.to.unread.topics."..
6a060 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 .:class.'forge--topics-filter-st
6a080 61 74 75 73 2d 63 6f 6d 6d 61 6e 64 20 3a 73 74 61 74 75 73 20 27 75 6e 72 65 61 64 29 0a 0a 28 atus-command.:status.'unread)..(
6a0a0 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f transient-define-suffix.forge-to
6a0c0 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 75 73 2d 70 65 6e 64 69 6e 67 20 28 29 0a 20 20 pics-filter-status-pending.()...
6a0e0 22 4c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 70 65 6e 64 69 6e 67 20 74 6f 70 "Limit.topic.list.to.pending.top
6a100 69 63 73 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 ics."...:class.'forge--topics-fi
6a120 6c 74 65 72 2d 73 74 61 74 75 73 2d 63 6f 6d 6d 61 6e 64 20 3a 73 74 61 74 75 73 20 27 70 65 6e lter-status-command.:status.'pen
6a140 64 69 6e 67 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 ding)..(transient-define-suffix.
6a160 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 74 61 74 75 73 2d 64 6f 6e 65 20 forge-topics-filter-status-done.
6a180 28 29 0a 20 20 22 4c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 64 6f 6e 65 20 74 ()..."Limit.topic.list.to.done.t
6a1a0 6f 70 69 63 73 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d opics."...:class.'forge--topics-
6a1c0 66 69 6c 74 65 72 2d 73 74 61 74 75 73 2d 63 6f 6d 6d 61 6e 64 20 3a 73 74 61 74 75 73 20 27 64 filter-status-command.:status.'d
6a1e0 6f 6e 65 29 0a 0a 3b 3b 3b 3b 20 46 69 6c 74 65 72 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 one)..;;;;.Filter..(defclass.for
6a200 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 63 6f 6d 6d 61 6e 64 20 28 74 72 61 6e 73 ge--topics-filter-command.(trans
6a220 69 65 6e 74 2d 73 75 66 66 69 78 29 0a 20 20 28 28 73 6c 6f 74 20 20 20 20 20 20 20 20 3a 69 6e ient-suffix)...((slot........:in
6a240 69 74 61 72 67 20 3a 73 6c 6f 74 29 0a 20 20 20 28 72 65 61 64 65 72 20 20 20 20 20 20 3a 69 6e itarg.:slot)....(reader......:in
6a260 69 74 61 72 67 20 3a 72 65 61 64 65 72 29 0a 20 20 20 28 66 6f 72 6d 61 74 74 65 72 20 20 20 3a itarg.:reader)....(formatter...:
6a280 69 6e 69 74 61 72 67 20 3a 66 6f 72 6d 61 74 74 65 72 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c initarg.:formatter.:initform.nil
6a2a0 29 0a 20 20 20 28 64 65 66 69 6e 69 74 69 6f 6e 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 )....(definition.....:initform.(
6a2c0 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 lambda.().................(inter
6a2e0 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c active).................(with-sl
6a300 6f 74 73 20 28 73 6c 6f 74 20 72 65 61 64 65 72 29 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 ots.(slot.reader).(transient-suf
6a320 66 69 78 2d 6f 62 6a 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 fix-object)...................(e
6a340 69 65 69 6f 2d 6f 73 65 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 ieio-oset.forge--buffer-topics-s
6a360 70 65 63 20 73 6c 6f 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pec.slot........................
6a380 20 20 20 20 20 20 20 28 69 66 20 28 65 69 65 69 6f 2d 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 .......(if.(eieio-oref.forge--bu
6a3a0 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 73 6c 6f 74 29 0a 20 20 20 20 20 20 20 20 20 ffer-topics-spec.slot)..........
6a3c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 0a 20 20 20 .........................nil....
6a3e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 .............................(fu
6a400 6e 63 61 6c 6c 20 72 65 61 64 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ncall.reader))).................
6a420 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 29 0a 20 20 20 28 ..(forge-refresh-buffer))))....(
6a440 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 28 6c 61 6d 62 64 description.....:initform.(lambd
6a460 61 20 28 6f 62 6a 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c a.(obj).................(with-sl
6a480 6f 74 73 20 28 73 6c 6f 74 20 66 6f 72 6d 61 74 74 65 72 29 20 6f 62 6a 0a 20 20 20 20 20 20 20 ots.(slot.formatter).obj........
6a4a0 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 76 61 6c 75 65 20 28 65 69 65 69 6f 2d 6f ...........(let.((value.(eieio-o
6a4c0 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 73 6c ref.forge--buffer-topics-spec.sl
6a4e0 6f 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 76 61 ot))).....................(if.va
6a500 6c 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 lue.........................(for
6a520 6d 61 74 20 22 25 73 20 25 73 22 20 73 6c 6f 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 mat."%s.%s".slot................
6a540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 66 6f 72 6d 61 74 74 65 72 0a 20 .................(if.formatter..
6a560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
6a580 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6f 72 6d 61 74 74 65 72 20 76 61 6c 75 65 29 0a 20 20 20 ...(funcall.formatter.value)....
6a5a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
6a5c0 70 72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 76 61 6c 75 65 29 0a 20 propertize.(format."%s".value)..
6a5e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
6a600 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 .............'face.'forge-suffix
6a620 2d 61 63 74 69 76 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -active)))......................
6a640 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 73 6c 6f 74 29 29 29 29 29 29 29 29 0a 0a 28 63 6c 2d .(format."%s".slot))))))))..(cl-
6a660 64 65 66 6d 65 74 68 6f 64 20 69 6e 69 74 69 61 6c 69 7a 65 2d 69 6e 73 74 61 6e 63 65 20 3a 61 defmethod.initialize-instance.:a
6a680 66 74 65 72 0a 20 20 28 28 6f 62 6a 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 fter...((obj.forge--topics-filte
6a6a0 72 2d 63 6f 6d 6d 61 6e 64 29 20 26 6f 70 74 69 6f 6e 61 6c 20 5f 73 6c 6f 74 73 29 0a 20 20 28 r-command).&optional._slots)...(
6a6c0 75 6e 6c 65 73 73 20 28 73 6c 6f 74 2d 62 6f 75 6e 64 70 20 6f 62 6a 20 27 72 65 61 64 65 72 29 unless.(slot-boundp.obj.'reader)
6a6e0 0a 20 20 20 20 28 6f 73 65 74 20 6f 62 6a 20 72 65 61 64 65 72 20 28 69 6e 74 65 72 6e 20 28 66 .....(oset.obj.reader.(intern.(f
6a700 6f 72 6d 61 74 20 22 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 25 73 22 20 28 6f 72 65 ormat."forge-read-topic-%s".(ore
6a720 66 20 6f 62 6a 20 73 6c 6f 74 29 29 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 f.obj.slot))))))..(transient-def
6a740 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 63 ine-suffix.forge-topics-filter-c
6a760 61 74 65 67 6f 72 79 20 28 29 0a 20 20 22 52 65 61 64 20 61 20 63 61 74 65 67 6f 72 79 20 61 6e ategory.()..."Read.a.category.an
6a780 64 20 6c 69 6d 69 74 20 64 69 73 63 75 73 73 69 6f 6e 73 20 74 6f 20 74 68 61 74 20 63 61 74 65 d.limit.discussions.to.that.cate
6a7a0 67 6f 72 79 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 gory."...:class.'forge--topics-f
6a7c0 69 6c 74 65 72 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 6c 6f 74 20 27 63 61 74 65 67 6f 72 79 0a ilter-command...:slot.'category.
6a7e0 20 20 3a 66 6f 72 6d 61 74 74 65 72 20 28 23 23 70 72 6f 70 65 72 74 69 7a 65 20 25 20 27 66 61 ..:formatter.(##propertize.%.'fa
6a800 63 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 29 29 0a 0a 28 74 72 61 6e 73 69 ce.'forge-topic-label))..(transi
6a820 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 ent-define-suffix.forge-topics-f
6a840 69 6c 74 65 72 2d 6d 69 6c 65 73 74 6f 6e 65 20 28 29 0a 20 20 22 52 65 61 64 20 61 20 6d 69 6c ilter-milestone.()..."Read.a.mil
6a860 65 73 74 6f 6e 65 20 61 6e 64 20 6c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 74 estone.and.limit.topic.list.to.t
6a880 6f 70 69 63 73 20 77 69 74 68 20 74 68 61 74 20 6d 69 6c 65 73 74 6f 6e 65 2e 22 0a 20 20 3a 63 opics.with.that.milestone."...:c
6a8a0 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 63 6f 6d 6d 61 lass.'forge--topics-filter-comma
6a8c0 6e 64 0a 20 20 3a 73 6c 6f 74 20 27 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 3a 66 6f 72 6d 61 74 74 nd...:slot.'milestone...:formatt
6a8e0 65 72 20 28 23 23 70 72 6f 70 65 72 74 69 7a 65 20 25 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d er.(##propertize.%.'face.'forge-
6a900 74 6f 70 69 63 2d 6c 61 62 65 6c 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 topic-label))..(transient-define
6a920 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 6c 61 62 65 -suffix.forge-topics-filter-labe
6a940 6c 73 20 28 29 0a 20 20 22 52 65 61 64 20 6c 61 62 65 6c 73 20 61 6e 64 20 6c 69 6d 69 74 20 74 ls.()..."Read.labels.and.limit.t
6a960 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 74 6f 70 69 63 73 20 77 69 74 68 20 6f 6e 65 20 6f 66 20 opic.list.to.topics.with.one.of.
6a980 74 68 65 73 65 20 6c 61 62 65 6c 73 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d these.labels."...:class.'forge--
6a9a0 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 6c 6f 74 20 27 6c topics-filter-command...:slot.'l
6a9c0 61 62 65 6c 73 0a 20 20 3a 66 6f 72 6d 61 74 74 65 72 20 28 23 23 61 6e 64 20 25 20 28 66 6f 72 abels...:formatter.(##and.%.(for
6a9e0 67 65 2d 2d 66 6f 72 6d 61 74 2d 6c 61 62 65 6c 73 20 25 20 22 20 22 29 29 29 0a 0a 28 74 72 61 ge--format-labels.%.".")))..(tra
6aa00 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 nsient-define-suffix.forge-topic
6aa20 73 2d 66 69 6c 74 65 72 2d 6d 61 72 6b 73 20 28 29 0a 20 20 22 52 65 61 64 20 6d 61 72 6b 73 20 s-filter-marks.()..."Read.marks.
6aa40 61 6e 64 20 6c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 74 6f 70 69 63 73 20 77 and.limit.topic.list.to.topics.w
6aa60 69 74 68 20 6f 6e 65 20 6f 66 20 74 68 65 73 65 20 6d 61 72 6b 73 2e 22 0a 20 20 3a 63 6c 61 73 ith.one.of.these.marks."...:clas
6aa80 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 63 6f 6d 6d 61 6e 64 0a s.'forge--topics-filter-command.
6aaa0 20 20 3a 73 6c 6f 74 20 27 6d 61 72 6b 73 0a 20 20 3a 66 6f 72 6d 61 74 74 65 72 20 28 23 23 61 ..:slot.'marks...:formatter.(##a
6aac0 6e 64 20 25 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 6d 61 72 6b 73 20 25 20 22 20 22 29 nd.%.(forge--format-marks.%.".")
6aae0 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 ))..(transient-define-suffix.for
6ab00 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 73 61 76 65 64 20 28 29 0a 20 20 22 54 6f 67 ge-topics-filter-saved.()..."Tog
6ab20 67 6c 65 20 77 68 65 74 68 65 72 20 74 6f 20 6c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 gle.whether.to.limit.topic.list.
6ab40 74 6f 20 73 61 76 65 64 20 74 6f 70 69 63 73 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 to.saved.topics."...:class.'forg
6ab60 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 6c 6f 74 e--topics-filter-command...:slot
6ab80 20 27 73 61 76 65 64 0a 20 20 3a 72 65 61 64 65 72 20 23 27 61 6c 77 61 79 73 0a 20 20 3a 64 65 .'saved...:reader.#'always...:de
6aba0 73 63 72 69 70 74 69 6f 6e 0a 20 20 28 23 23 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 62 6f 6f scription...(##forge--format-boo
6abc0 6c 65 61 6e 20 27 73 61 76 65 64 20 22 73 61 76 65 64 22 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 lean.'saved."saved".forge--buffe
6abe0 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 r-topics-spec))..(transient-defi
6ac00 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 61 75 ne-suffix.forge-topics-filter-au
6ac20 74 68 6f 72 20 28 29 0a 20 20 22 52 65 61 64 20 61 6e 20 61 75 74 68 6f 72 20 61 6e 64 20 6c 69 thor.()..."Read.an.author.and.li
6ac40 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 74 6f 70 69 63 73 20 63 72 65 61 74 65 64 mit.topic.list.to.topics.created
6ac60 20 62 79 20 74 68 61 74 20 61 75 74 68 6f 72 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 .by.that.author."...:class.'forg
6ac80 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 6c 6f 74 e--topics-filter-command...:slot
6aca0 20 27 61 75 74 68 6f 72 0a 20 20 3a 72 65 61 64 65 72 20 28 23 23 66 6f 72 67 65 2d 2d 72 65 61 .'author...:reader.(##forge--rea
6acc0 64 2d 66 69 6c 74 65 72 2d 62 79 2d 75 73 65 72 20 22 41 75 74 68 6f 72 22 29 29 0a 0a 28 74 72 d-filter-by-user."Author"))..(tr
6ace0 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 ansient-define-suffix.forge-topi
6ad00 63 73 2d 66 69 6c 74 65 72 2d 61 73 73 69 67 6e 65 65 20 28 29 0a 20 20 22 52 65 61 64 20 61 6e cs-filter-assignee.()..."Read.an
6ad20 20 61 73 73 69 67 6e 65 65 20 61 6e 64 20 6c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 .assignee.and.limit.topic.list.t
6ad40 6f 20 74 6f 70 69 63 73 20 61 73 73 69 67 6e 65 65 20 74 6f 20 74 68 61 74 20 70 65 72 73 6f 6e o.topics.assignee.to.that.person
6ad60 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 ."...:class.'forge--topics-filte
6ad80 72 2d 63 6f 6d 6d 61 6e 64 0a 20 20 3a 73 6c 6f 74 20 27 61 73 73 69 67 6e 65 65 0a 20 20 3a 72 r-command...:slot.'assignee...:r
6ada0 65 61 64 65 72 20 28 23 23 66 6f 72 67 65 2d 2d 72 65 61 64 2d 66 69 6c 74 65 72 2d 62 79 2d 75 eader.(##forge--read-filter-by-u
6adc0 73 65 72 20 22 41 73 73 69 67 6e 65 65 22 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 ser."Assignee"))..(transient-def
6ade0 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 72 ine-suffix.forge-topics-filter-r
6ae00 65 76 69 65 77 65 72 20 28 29 0a 20 20 22 52 65 61 64 20 61 20 72 65 76 69 65 77 65 72 20 61 6e eviewer.()..."Read.a.reviewer.an
6ae20 64 20 6c 69 6d 69 74 20 74 6f 70 69 63 20 6c 69 73 74 20 74 6f 20 72 65 76 69 65 77 73 20 72 65 d.limit.topic.list.to.reviews.re
6ae40 71 75 65 73 74 65 64 20 66 72 6f 6d 20 74 68 61 74 20 70 65 72 73 6f 6e 2e 22 0a 20 20 3a 63 6c quested.from.that.person."...:cl
6ae60 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 73 2d 66 69 6c 74 65 72 2d 63 6f 6d 6d 61 6e ass.'forge--topics-filter-comman
6ae80 64 0a 20 20 3a 73 6c 6f 74 20 27 72 65 76 69 65 77 65 72 0a 20 20 3a 72 65 61 64 65 72 20 28 23 d...:slot.'reviewer...:reader.(#
6aea0 23 66 6f 72 67 65 2d 2d 72 65 61 64 2d 66 69 6c 74 65 72 2d 62 79 2d 75 73 65 72 20 22 52 65 76 #forge--read-filter-by-user."Rev
6aec0 69 65 77 65 72 22 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 72 65 61 64 2d 66 69 6c iewer"))..(defun.forge--read-fil
6aee0 74 65 72 2d 62 79 2d 75 73 65 72 20 28 70 72 6f 6d 70 74 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 ter-by-user.(prompt)...(let*.((r
6af00 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 74 72 61 63 6b epo.(forge-get-repository.:track
6af20 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 73 20 28 6d 61 70 63 61 72 20 23 ed))..........(choices.(mapcar.#
6af40 27 63 61 64 72 20 28 6f 72 65 66 20 72 65 70 6f 20 61 73 73 69 67 6e 65 65 73 29 29 29 29 0a 20 'cadr.(oref.repo.assignees))))..
6af60 20 20 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 70 72 6f 6d 70 74 ...(magit-completing-read.prompt
6af80 20 63 68 6f 69 63 65 73 29 29 29 0a 0a 3b 3b 3b 3b 20 44 69 73 70 6c 61 79 0a 0a 28 74 72 61 6e .choices)))..;;;;.Display..(tran
6afa0 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 sient-define-suffix.forge-topics
6afc0 2d 73 65 74 2d 6f 72 64 65 72 20 28 6f 72 64 65 72 29 0a 20 20 22 53 65 6c 65 63 74 20 6f 72 64 -set-order.(order)..."Select.ord
6afe0 65 72 20 75 73 65 64 20 74 6f 20 64 69 73 70 6c 61 79 20 74 6f 70 69 63 73 20 69 6e 20 74 6f 70 er.used.to.display.topics.in.top
6b000 69 63 20 6c 69 73 74 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 28 6c 61 6d 62 ic.list."...:description...(lamb
6b020 64 61 20 28 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 6f 72 64 65 72 20 62 79 20 25 73 22 0a da.().....(format."order.by.%s".
6b040 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74 20 ............(propertize.(format.
6b060 22 25 73 22 20 28 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d "%s".(oref.forge--buffer-topics-
6b080 73 70 65 63 20 6f 72 64 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 spec.order))....................
6b0a0 20 20 20 20 20 27 66 61 63 65 20 27 62 6f 6c 64 29 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 .....'face.'bold)))...(interacti
6b0c0 76 65 0a 20 20 20 28 6c 69 73 74 20 28 6d 61 67 69 74 2d 72 65 61 64 2d 63 68 61 72 2d 63 61 73 ve....(list.(magit-read-char-cas
6b0e0 65 20 22 4f 72 64 65 72 20 62 79 3a 20 22 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 28 3f 6e 20 e."Order.by:.".t............(?n.
6b100 22 5b 6e 5d 65 77 65 73 74 22 20 20 20 20 20 20 20 20 20 20 20 20 27 6e 65 77 65 73 74 29 0a 20 "[n]ewest"............'newest)..
6b120 20 20 20 20 20 20 20 20 20 20 28 3f 6f 20 22 5b 6f 5d 6c 64 65 73 74 22 20 20 20 20 20 20 20 20 ..........(?o."[o]ldest"........
6b140 20 20 20 20 27 6f 6c 64 65 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 3f 72 20 22 5b 72 5d ....'oldest)............(?r."[r]
6b160 65 63 65 6e 74 6c 79 20 75 70 64 61 74 65 64 22 20 20 27 72 65 63 65 6e 74 6c 79 2d 75 70 64 61 ecently.updated"..'recently-upda
6b180 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 3f 61 20 22 5b 61 5d 6e 63 69 65 6e 74 6c 79 ted)............(?a."[a]nciently
6b1a0 20 75 70 64 61 74 65 64 22 20 27 61 6e 63 69 65 6e 74 6c 79 2d 75 70 64 61 74 65 64 29 29 29 29 .updated".'anciently-updated))))
6b1c0 0a 20 20 28 6f 73 65 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 ...(oset.forge--buffer-topics-sp
6b1e0 65 63 20 6f 72 64 65 72 20 6f 72 64 65 72 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 ec.order.order)...(forge-refresh
6b200 2d 62 75 66 66 65 72 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 -buffer))..(transient-define-suf
6b220 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 73 65 74 2d 6c 69 6d 69 74 20 28 6c 69 6d 69 fix.forge-topics-set-limit.(limi
6b240 74 29 0a 20 20 22 52 65 61 64 20 6d 61 78 69 6d 61 6c 20 6e 75 6d 62 65 72 20 6f 66 20 74 6f 70 t)..."Read.maximal.number.of.top
6b260 69 63 73 20 74 6f 20 62 65 20 64 69 73 70 6c 61 79 65 64 20 69 6e 20 74 6f 70 69 63 20 6c 69 73 ics.to.be.displayed.in.topic.lis
6b280 74 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 28 6c 61 6d 62 64 61 20 28 29 0a t."...:description...(lambda.().
6b2a0 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 6c 69 6d 69 74 20 28 6f 72 65 66 20 66 6f 72 67 65 2d ....(if-let.((limit.(oref.forge-
6b2c0 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 6c 69 6d 69 74 29 29 29 0a 20 20 20 -buffer-topics-spec.limit)))....
6b2e0 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 6c 69 6d 69 74 20 74 6f 20 25 73 22 20 28 70 72 6f 70 .....(format."limit.to.%s".(prop
6b300 65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 6c 69 6d 69 74 29 20 27 66 61 63 65 ertize.(format."%s".limit).'face
6b320 20 27 62 6f 6c 64 29 29 0a 20 20 20 20 20 20 22 6e 6f 20 6c 69 6d 69 74 22 29 29 0a 20 20 28 69 .'bold))......."no.limit"))...(i
6b340 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 72 65 61 64 2d 6e 75 6d 62 65 72 20 22 4c nteractive.(list.(read-number."L
6b360 69 6d 69 74 20 6e 75 6d 62 65 72 20 28 30 20 66 6f 72 20 6e 6f 20 6c 69 6d 69 74 29 3a 20 22 29 imit.number.(0.for.no.limit):.")
6b380 29 29 0a 20 20 28 6f 73 65 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d ))...(oset.forge--buffer-topics-
6b3a0 73 70 65 63 20 6c 69 6d 69 74 20 28 69 66 20 28 7a 65 72 6f 70 20 6c 69 6d 69 74 29 20 6e 69 6c spec.limit.(if.(zerop.limit).nil
6b3c0 20 6c 69 6d 69 74 29 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 .limit))...(forge-refresh-buffer
6b3e0 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 ))..(transient-define-suffix.for
6b400 67 65 2d 74 6f 70 69 63 73 2d 67 72 6f 75 70 20 28 29 0a 20 20 22 47 72 6f 75 70 20 74 6f 70 69 ge-topics-group.()..."Group.topi
6b420 63 73 20 62 79 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f cs.by.repository."...:descriptio
6b440 6e 20 22 67 72 6f 75 70 20 62 79 20 72 65 70 6f 22 0a 20 20 3a 69 66 20 28 23 23 6f 72 65 66 20 n."group.by.repo"...:if.(##oref.
6b460 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 67 6c 6f 62 61 6c forge--buffer-topics-spec.global
6b480 29 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 28 23 23 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 )...:inapt-if.(##oref.forge--buf
6b4a0 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 67 72 6f 75 70 65 64 29 0a 20 20 3a 69 6e 61 70 fer-topics-spec.grouped)...:inap
6b4c0 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 66 66 69 78 2d 61 63 74 69 76 65 0a 20 20 28 69 t-face.'forge-suffix-active...(i
6b4e0 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6f 73 65 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 nteractive)...(oset.forge--buffe
6b500 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 67 72 6f 75 70 65 64 20 74 29 0a 20 20 28 66 6f 72 67 r-topics-spec.grouped.t)...(forg
6b520 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 e-refresh-buffer))..(transient-d
6b540 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 75 6e 67 72 6f 75 efine-suffix.forge-topics-ungrou
6b560 70 20 28 29 0a 20 20 22 53 68 6f 77 20 61 20 66 6c 61 74 20 74 6f 70 69 63 20 6c 69 73 74 2e 22 p.()..."Show.a.flat.topic.list."
6b580 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 73 69 6e 67 6c 65 20 6c 69 73 74 22 0a 20 20 ...:description."single.list"...
6b5a0 3a 69 66 20 28 23 23 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 :if.(##oref.forge--buffer-topics
6b5c0 2d 73 70 65 63 20 67 6c 6f 62 61 6c 29 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 20 28 23 -spec.global)...:inapt-if-not.(#
6b5e0 23 6f 72 65 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 #oref.forge--buffer-topics-spec.
6b600 67 72 6f 75 70 65 64 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 73 75 grouped)...:inapt-face.'forge-su
6b620 66 66 69 78 2d 61 63 74 69 76 65 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6f ffix-active...(interactive)...(o
6b640 73 65 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 73 2d 73 70 65 63 20 67 72 set.forge--buffer-topics-spec.gr
6b660 6f 75 70 65 64 20 6e 69 6c 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 ouped.nil)...(forge-refresh-buff
6b680 65 72 29 29 0a 0a 3b 3b 3b 20 5f 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a er))..;;;._.;;.Local.Variables:.
6b6a0 3b 3b 20 72 65 61 64 2d 73 79 6d 62 6f 6c 2d 73 68 6f 72 74 68 61 6e 64 73 3a 20 28 0a 3b 3b 20 ;;.read-symbol-shorthands:.(.;;.
6b6c0 20 20 28 22 61 6e 64 24 22 20 20 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d ..("and$"............"cond-let--
6b6e0 61 6e 64 24 22 29 0a 3b 3b 20 20 20 28 22 61 6e 64 2d 6c 65 74 22 20 20 20 20 20 20 20 2e 20 22 and$").;;...("and-let"........."
6b700 63 6f 6e 64 2d 6c 65 74 2d 2d 61 6e 64 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 69 66 2d 6c 65 cond-let--and-let").;;...("if-le
6b720 74 22 20 20 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 69 66 2d 6c 65 74 22 29 0a t".........."cond-let--if-let").
6b740 3b 3b 20 20 20 28 22 77 68 65 6e 2d 6c 65 74 22 20 20 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 ;;...("when-let"........"cond-le
6b760 74 2d 2d 77 68 65 6e 2d 6c 65 74 22 29 0a 3b 3b 20 20 20 28 22 77 68 69 6c 65 2d 6c 65 74 22 20 t--when-let").;;...("while-let".
6b780 20 20 20 20 2e 20 22 63 6f 6e 64 2d 6c 65 74 2d 2d 77 68 69 6c 65 2d 6c 65 74 22 29 29 0a 3b 3b ......"cond-let--while-let")).;;
6b7a0 20 45 6e 64 3a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 29 0a 3b 3b .End:.(provide.'forge-topics).;;
6b7c0 3b 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 ;.forge-topics.el.ends.here.....
6b7e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b800 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2e 65 6c 00 00 00 00 forge-20250916.1119/forge.el....
6b820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b860 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
6b880 30 30 31 34 34 36 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 35 35 30 00 20 30 00 00 00 0014460.00000000000.013550..0...
6b8a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b8c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b8e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b900 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
6b920 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
6b940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b9a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b9c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b9e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ba00 3b 3b 3b 20 66 6f 72 67 65 2e 65 6c 20 2d 2d 2d 20 41 63 63 65 73 73 20 47 69 74 20 66 6f 72 67 ;;;.forge.el.---.Access.Git.forg
6ba20 65 73 20 66 72 6f 6d 20 4d 61 67 69 74 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 es.from.Magit..-*-.lexical-bindi
6ba40 6e 67 3a 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d ng:t.-*-..;;.Copyright.(C).2018-
6ba60 32 30 32 35 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 2025.Jonas.Bernoulli..;;.Author:
6ba80 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f .Jonas.Bernoulli.<emacs.forge@jo
6baa0 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 nas.bernoulli.dev>.;;.Maintainer
6bac0 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a :.Jonas.Bernoulli.<emacs.forge@j
6bae0 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a onas.bernoulli.dev>.;;.Homepage:
6bb00 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6d 61 67 69 74 2f 66 6f 72 67 65 0a .https://github.com/magit/forge.
6bb20 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 67 69 74 20 74 6f 6f 6c 73 20 76 63 0a 0a 3b 3b 20 50 61 ;;.Keywords:.git.tools.vc..;;.Pa
6bb40 63 6b 61 67 65 2d 56 65 72 73 69 6f 6e 3a 20 32 30 32 35 30 39 31 36 2e 31 31 31 39 0a 3b 3b 20 ckage-Version:.20250916.1119.;;.
6bb60 50 61 63 6b 61 67 65 2d 52 65 76 69 73 69 6f 6e 3a 20 38 30 34 34 37 62 63 31 31 61 37 66 0a 3b Package-Revision:.80447bc11a7f.;
6bb80 3b 20 50 61 63 6b 61 67 65 2d 52 65 71 75 69 72 65 73 3a 20 28 0a 3b 3b 20 20 20 20 20 28 65 6d ;.Package-Requires:.(.;;.....(em
6bba0 61 63 73 20 20 20 20 20 20 20 20 22 32 39 2e 31 22 29 0a 3b 3b 20 20 20 20 20 28 63 6f 6d 70 61 acs........"29.1").;;.....(compa
6bbc0 74 20 20 20 20 20 20 20 22 33 30 2e 31 22 29 0a 3b 3b 20 20 20 20 20 28 63 6c 6f 73 71 6c 20 20 t......."30.1").;;.....(closql..
6bbe0 20 20 20 20 20 20 22 32 2e 33 22 29 0a 3b 3b 20 20 20 20 20 28 63 6f 6e 64 2d 6c 65 74 20 20 20 ......"2.3").;;.....(cond-let...
6bc00 20 20 20 22 30 2e 31 22 29 0a 3b 3b 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 20 20 20 20 20 20 ..."0.1").;;.....(emacsql.......
6bc20 22 34 2e 33 22 29 0a 3b 3b 20 20 20 20 20 28 67 68 75 62 20 20 20 20 20 20 20 20 20 20 22 35 2e "4.3").;;.....(ghub.........."5.
6bc40 30 22 29 0a 3b 3b 20 20 20 20 20 28 6c 6c 61 6d 61 20 20 20 20 20 20 20 20 20 22 31 2e 30 22 29 0").;;.....(llama........."1.0")
6bc60 0a 3b 3b 20 20 20 20 20 28 6d 61 67 69 74 20 20 20 20 20 20 20 20 20 22 34 2e 34 22 29 0a 3b 3b .;;.....(magit........."4.4").;;
6bc80 20 20 20 20 20 28 6d 61 72 6b 64 6f 77 6e 2d 6d 6f 64 65 20 22 32 2e 37 22 29 0a 3b 3b 20 20 20 .....(markdown-mode."2.7").;;...
6bca0 20 20 28 73 65 71 20 20 20 20 20 20 20 20 20 20 20 22 32 2e 32 34 22 29 0a 3b 3b 20 20 20 20 20 ..(seq..........."2.24").;;.....
6bcc0 28 74 72 61 6e 73 69 65 6e 74 20 20 20 20 20 22 30 2e 31 30 22 29 0a 3b 3b 20 20 20 20 20 28 79 (transient....."0.10").;;.....(y
6bce0 61 6d 6c 20 20 20 20 20 20 20 20 20 20 22 31 2e 32 22 29 29 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 aml.........."1.2"))..;;.SPDX-Li
6bd00 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 cense-Identifier:.GPL-3.0-or-lat
6bd20 65 72 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 er..;;.This.file.is.free.softwar
6bd40 65 3a 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f e:.you.can.redistribute.it.and/o
6bd60 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f r.modify.;;.it.under.the.terms.o
6bd80 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 f.the.GNU.General.Public.License
6bda0 20 61 73 20 70 75 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 .as.published.;;.by.the.Free.Sof
6bdc0 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e tware.Foundation,.either.version
6bde0 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 .3.of.the.License,.;;.or.(at.you
6be00 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a r.option).any.later.version..;;.
6be20 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 ;;.This.file.is.distributed.in.t
6be40 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a he.hope.that.it.will.be.useful,.
6be60 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 ;;.but.WITHOUT.ANY.WARRANTY;.wit
6be80 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f hout.even.the.implied.warranty.o
6bea0 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 f.;;.MERCHANTABILITY.or.FITNESS.
6bec0 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 FOR.A.PARTICULAR.PURPOSE...See.t
6bee0 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 he.;;.GNU.General.Public.License
6bf00 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f .for.more.details..;;.;;.You.sho
6bf20 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 uld.have.received.a.copy.of.the.
6bf40 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c GNU.General.Public.License.;;.al
6bf60 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 ong.with.this.file...If.not,.see
6bf80 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e .<https://www.gnu.org/licenses/>
6bfa0 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 57 6f 72 6b 20 77 69 74 68 ...;;;.Commentary:..;;.Work.with
6bfc0 20 47 69 74 20 66 6f 72 67 65 73 2c 20 73 75 63 68 20 61 73 20 47 69 74 68 75 62 20 61 6e 64 20 .Git.forges,.such.as.Github.and.
6bfe0 47 69 74 6c 61 62 2c 20 66 72 6f 6d 20 74 68 65 20 63 6f 6d 66 6f 72 74 0a 3b 3b 20 6f 66 20 4d Gitlab,.from.the.comfort.;;.of.M
6c000 61 67 69 74 20 61 6e 64 20 74 68 65 20 72 65 73 74 20 6f 66 20 45 6d 61 63 73 2e 0a 0a 3b 3b 20 agit.and.the.rest.of.Emacs...;;.
6c020 54 68 65 20 73 63 68 65 6d 61 20 6f 66 20 74 68 65 20 64 61 74 61 62 61 73 65 20 68 61 73 20 6e The.schema.of.the.database.has.n
6c040 6f 74 20 62 65 65 6e 20 66 69 6e 61 6c 69 7a 65 64 20 79 65 74 2e 20 20 55 6e 74 69 6c 20 74 68 ot.been.finalized.yet...Until.th
6c060 61 74 0a 3b 3b 20 68 61 73 20 68 61 70 70 65 6e 65 64 20 69 74 20 77 69 6c 6c 20 6f 63 63 61 73 at.;;.has.happened.it.will.occas
6c080 69 6f 6e 61 6c 6c 79 20 68 61 76 65 20 74 6f 20 62 65 20 64 69 73 63 61 72 64 65 64 2e 20 20 46 ionally.have.to.be.discarded...F
6c0a0 6f 72 20 6e 6f 77 0a 3b 3b 20 74 68 65 20 64 61 74 61 62 61 73 65 20 64 6f 65 73 20 6e 6f 74 20 or.now.;;.the.database.does.not.
6c0c0 63 6f 6e 74 61 69 6e 20 61 6e 79 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 74 68 61 74 20 63 61 6e contain.any.information.that.can
6c0e0 6e 6f 74 20 73 69 6d 70 6c 79 0a 3b 3b 20 62 65 20 66 65 74 63 68 65 64 20 61 67 61 69 6e 2e 0a not.simply.;;.be.fetched.again..
6c100 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 6d 61 67 69 74 29 0a 0a 28 72 .;;;.Code:..(require.'magit)..(r
6c120 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 64 62 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 equire.'forge-db).(require.'forg
6c140 65 2d 63 6f 72 65 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 29 0a 0a 28 72 65 71 75 e-core)..(provide.'forge)..(requ
6c160 69 72 65 20 27 66 6f 72 67 65 2d 72 65 70 6f 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 ire.'forge-repo).(require.'forge
6c180 2d 70 6f 73 74 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 28 72 -post).(require.'forge-topic).(r
6c1a0 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 64 69 73 63 75 73 73 69 6f 6e 29 0a 28 72 65 71 75 69 equire.'forge-discussion).(requi
6c1c0 72 65 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 re.'forge-issue).(require.'forge
6c1e0 2d 70 75 6c 6c 72 65 71 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 72 65 76 6e 6f 74 -pullreq).(require.'forge-revnot
6c200 65 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 79 29 0a 0a 28 72 65 71 e).(require.'forge-notify)..(req
6c220 75 69 72 65 20 27 66 6f 72 67 65 2d 66 6f 72 67 65 6a 6f 29 0a 28 72 65 71 75 69 72 65 20 27 66 uire.'forge-forgejo).(require.'f
6c240 6f 72 67 65 2d 67 69 74 68 75 62 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 67 69 74 orge-github).(require.'forge-git
6c260 6c 61 62 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 67 69 74 65 61 29 0a 28 72 65 71 lab).(require.'forge-gitea).(req
6c280 75 69 72 65 20 27 66 6f 72 67 65 2d 67 6f 67 73 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 uire.'forge-gogs).(require.'forg
6c2a0 65 2d 62 69 74 62 75 63 6b 65 74 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 73 65 6d e-bitbucket).(require.'forge-sem
6c2c0 69 29 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 29 0a 28 72 i)..(require.'forge-commands).(r
6c2e0 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 29 0a 28 72 65 71 75 69 72 65 20 27 equire.'forge-topics).(require.'
6c300 66 6f 72 67 65 2d 72 65 70 6f 73 29 0a 0a 3b 3b 3b 20 41 64 64 20 53 65 63 74 69 6f 6e 73 0a 0a forge-repos)..;;;.Add.Sections..
6c320 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 61 64 64 2d 64 65 66 61 75 6c 74 2d 73 65 63 74 69 6f (defvar.forge-add-default-sectio
6c340 6e 73 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 61 64 64 20 46 6f 72 67 65 27 73 20 73 ns.t..."Whether.to.add.Forge's.s
6c360 65 63 74 69 6f 6e 73 20 74 6f 20 60 6d 61 67 69 74 2d 73 74 61 74 75 73 2d 73 65 63 74 69 6f 6e ections.to.`magit-status-section
6c380 73 2d 68 6f 6f 6b 27 2e 0a 0a 49 66 20 79 6f 75 20 77 61 6e 74 20 74 6f 20 64 69 73 61 62 6c 65 s-hook'...If.you.want.to.disable
6c3a0 20 74 68 69 73 2c 20 74 68 65 6e 20 79 6f 75 20 6d 75 73 74 20 73 65 74 20 74 68 69 73 20 74 6f .this,.then.you.must.set.this.to
6c3c0 20 6e 69 6c 20 62 65 66 6f 72 65 0a 60 66 6f 72 67 65 27 20 69 73 20 6c 6f 61 64 65 64 2e 22 29 .nil.before.`forge'.is.loaded.")
6c3e0 0a 0a 28 77 68 65 6e 20 66 6f 72 67 65 2d 61 64 64 2d 64 65 66 61 75 6c 74 2d 73 65 63 74 69 6f ..(when.forge-add-default-sectio
6c400 6e 73 0a 20 20 28 6d 61 67 69 74 2d 61 64 64 2d 73 65 63 74 69 6f 6e 2d 68 6f 6f 6b 20 27 6d 61 ns...(magit-add-section-hook.'ma
6c420 67 69 74 2d 73 74 61 74 75 73 2d 73 65 63 74 69 6f 6e 73 2d 68 6f 6f 6b 20 23 27 66 6f 72 67 65 git-status-sections-hook.#'forge
6c440 2d 69 6e 73 65 72 74 2d 70 75 6c 6c 72 65 71 73 20 20 20 20 6e 69 6c 20 74 29 0a 20 20 28 6d 61 -insert-pullreqs....nil.t)...(ma
6c460 67 69 74 2d 61 64 64 2d 73 65 63 74 69 6f 6e 2d 68 6f 6f 6b 20 27 6d 61 67 69 74 2d 73 74 61 74 git-add-section-hook.'magit-stat
6c480 75 73 2d 73 65 63 74 69 6f 6e 73 2d 68 6f 6f 6b 20 23 27 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d us-sections-hook.#'forge-insert-
6c4a0 69 73 73 75 65 73 20 20 20 20 20 20 6e 69 6c 20 74 29 0a 20 20 28 6d 61 67 69 74 2d 61 64 64 2d issues......nil.t)...(magit-add-
6c4c0 73 65 63 74 69 6f 6e 2d 68 6f 6f 6b 20 27 6d 61 67 69 74 2d 73 74 61 74 75 73 2d 73 65 63 74 69 section-hook.'magit-status-secti
6c4e0 6f 6e 73 2d 68 6f 6f 6b 20 23 27 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 64 69 73 63 75 73 73 69 ons-hook.#'forge-insert-discussi
6c500 6f 6e 73 20 6e 69 6c 20 74 29 29 0a 0a 3b 3b 3b 20 41 64 64 20 42 69 6e 64 69 6e 67 73 0a 0a 3b ons.nil.t))..;;;.Add.Bindings..;
6c520 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 61 64 64 2d ;;###autoload.(defvar.forge-add-
6c540 64 65 66 61 75 6c 74 2d 62 69 6e 64 69 6e 67 73 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f default-bindings.t..."Whether.to
6c560 20 61 64 64 20 46 6f 72 67 65 27 73 20 62 69 6e 64 69 6e 67 73 20 74 6f 20 76 61 72 69 6f 75 73 .add.Forge's.bindings.to.various
6c580 20 4d 61 67 69 74 20 6b 65 79 6d 61 70 73 2e 0a 0a 49 66 20 79 6f 75 20 77 61 6e 74 20 74 6f 20 .Magit.keymaps...If.you.want.to.
6c5a0 64 69 73 61 62 6c 65 20 74 68 69 73 2c 20 74 68 65 6e 20 79 6f 75 20 6d 75 73 74 20 73 65 74 20 disable.this,.then.you.must.set.
6c5c0 74 68 69 73 20 74 6f 20 6e 69 6c 20 62 65 66 6f 72 65 0a 60 6d 61 67 69 74 27 20 69 73 20 6c 6f this.to.nil.before.`magit'.is.lo
6c5e0 61 64 65 64 2e 20 20 49 66 20 79 6f 75 20 64 6f 20 69 74 20 62 65 66 6f 72 65 20 60 66 6f 72 67 aded...If.you.do.it.before.`forg
6c600 65 27 20 62 75 74 20 61 66 74 65 72 20 60 6d 61 67 69 74 27 0a 69 73 20 6c 6f 61 64 65 64 2c 20 e'.but.after.`magit'.is.loaded,.
6c620 74 68 65 6e 20 60 6d 61 67 69 74 2d 6d 6f 64 65 2d 6d 61 70 27 20 65 6e 64 73 20 75 70 20 62 65 then.`magit-mode-map'.ends.up.be
6c640 69 6e 67 20 6d 6f 64 69 66 69 65 64 20 61 6e 79 77 61 79 2e 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 ing.modified.anyway.")..;;;###au
6c660 74 6f 6c 6f 61 64 0a 28 77 69 74 68 2d 65 76 61 6c 2d 61 66 74 65 72 2d 6c 6f 61 64 20 27 6d 61 toload.(with-eval-after-load.'ma
6c680 67 69 74 2d 6d 6f 64 65 0a 20 20 28 77 68 65 6e 20 66 6f 72 67 65 2d 61 64 64 2d 64 65 66 61 75 git-mode...(when.forge-add-defau
6c6a0 6c 74 2d 62 69 6e 64 69 6e 67 73 0a 20 20 20 20 28 6b 65 79 6d 61 70 2d 73 65 74 20 6d 61 67 69 lt-bindings.....(keymap-set.magi
6c6c0 74 2d 6d 6f 64 65 2d 6d 61 70 20 22 27 22 20 23 27 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 29 t-mode-map."'".#'forge-dispatch)
6c6e0 0a 20 20 20 20 28 6b 65 79 6d 61 70 2d 73 65 74 20 6d 61 67 69 74 2d 6d 6f 64 65 2d 6d 61 70 20 .....(keymap-set.magit-mode-map.
6c700 22 4e 22 20 23 27 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 6b 65 79 6d 61 "N".#'forge-dispatch).....(keyma
6c720 70 2d 73 65 74 20 6d 61 67 69 74 2d 6d 6f 64 65 2d 6d 61 70 20 22 3c 72 65 6d 61 70 3e 20 3c 6d p-set.magit-mode-map."<remap>.<m
6c740 61 67 69 74 2d 62 72 6f 77 73 65 2d 74 68 69 6e 67 3e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 agit-browse-thing>".............
6c760 20 20 20 20 23 27 66 6f 72 67 65 2d 62 72 6f 77 73 65 29 0a 20 20 20 20 28 6b 65 79 6d 61 70 2d ....#'forge-browse).....(keymap-
6c780 73 65 74 20 6d 61 67 69 74 2d 6d 6f 64 65 2d 6d 61 70 20 22 3c 72 65 6d 61 70 3e 20 3c 6d 61 67 set.magit-mode-map."<remap>.<mag
6c7a0 69 74 2d 63 6f 70 79 2d 74 68 69 6e 67 3e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 it-copy-thing>".................
6c7c0 23 27 66 6f 72 67 65 2d 63 6f 70 79 2d 75 72 6c 2d 61 74 2d 70 6f 69 6e 74 2d 61 73 2d 6b 69 6c #'forge-copy-url-at-point-as-kil
6c7e0 6c 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 77 69 74 68 2d 65 76 61 6c 2d l)))..;;;###autoload.(with-eval-
6c800 61 66 74 65 72 2d 6c 6f 61 64 20 27 6d 61 67 69 74 2d 72 65 70 6f 73 0a 20 20 28 77 68 65 6e 20 after-load.'magit-repos...(when.
6c820 66 6f 72 67 65 2d 61 64 64 2d 64 65 66 61 75 6c 74 2d 62 69 6e 64 69 6e 67 73 0a 20 20 20 20 28 forge-add-default-bindings.....(
6c840 6b 65 79 6d 61 70 2d 73 65 74 20 6d 61 67 69 74 2d 72 65 70 6f 6c 69 73 74 2d 6d 6f 64 65 2d 6d keymap-set.magit-repolist-mode-m
6c860 61 70 20 22 4e 22 20 23 27 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 29 29 29 0a 0a 3b 3b 3b 23 ap."N".#'forge-dispatch)))..;;;#
6c880 23 23 61 75 74 6f 6c 6f 61 64 0a 28 77 69 74 68 2d 65 76 61 6c 2d 61 66 74 65 72 2d 6c 6f 61 64 ##autoload.(with-eval-after-load
6c8a0 20 27 67 69 74 2d 63 6f 6d 6d 69 74 0a 20 20 28 77 68 65 6e 20 66 6f 72 67 65 2d 61 64 64 2d 64 .'git-commit...(when.forge-add-d
6c8c0 65 66 61 75 6c 74 2d 62 69 6e 64 69 6e 67 73 0a 20 20 20 20 28 6b 65 79 6d 61 70 2d 73 65 74 20 efault-bindings.....(keymap-set.
6c8e0 67 69 74 2d 63 6f 6d 6d 69 74 2d 6d 6f 64 65 2d 6d 61 70 20 22 43 2d 63 20 43 2d 76 22 20 23 27 git-commit-mode-map."C-c.C-v".#'
6c900 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 6f 70 69 63 29 29 29 0a 0a 28 77 68 65 6e 20 66 6f 72 67 forge-visit-topic)))..(when.forg
6c920 65 2d 61 64 64 2d 64 65 66 61 75 6c 74 2d 62 69 6e 64 69 6e 67 73 0a 20 20 28 6b 65 79 6d 61 70 e-add-default-bindings...(keymap
6c940 2d 73 65 74 20 6d 61 67 69 74 2d 63 6f 6d 6d 69 74 2d 73 65 63 74 69 6f 6e 2d 6d 61 70 20 22 43 -set.magit-commit-section-map."C
6c960 2d 63 20 43 2d 76 22 20 23 27 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 6f 70 69 63 29 0a 20 20 28 -c.C-v".#'forge-visit-topic)...(
6c980 6b 65 79 6d 61 70 2d 73 65 74 20 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 73 65 63 74 69 6f 6e 2d keymap-set.magit-branch-section-
6c9a0 6d 61 70 20 22 43 2d 63 20 43 2d 76 22 20 23 27 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 6f 70 69 map."C-c.C-v".#'forge-visit-topi
6c9c0 63 29 0a 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 69 6e 73 65 72 74 2d 73 75 66 66 69 78 20 27 c)....(transient-insert-suffix.'
6c9e0 6d 61 67 69 74 2d 64 69 73 70 61 74 63 68 20 22 6f 22 0a 20 20 20 20 27 28 22 4e 22 20 22 46 6f magit-dispatch."o".....'("N"."Fo
6ca00 72 67 65 22 20 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 29 29 0a 0a 20 20 28 74 72 61 6e 73 69 rge".forge-dispatch))....(transi
6ca20 65 6e 74 2d 61 70 70 65 6e 64 2d 73 75 66 66 69 78 20 27 6d 61 67 69 74 2d 66 65 74 63 68 20 22 ent-append-suffix.'magit-fetch."
6ca40 6d 22 20 27 28 22 6e 22 20 66 6f 72 67 65 2d 70 75 6c 6c 29 29 0a 20 20 28 74 72 61 6e 73 69 65 m".'("n".forge-pull))...(transie
6ca60 6e 74 2d 61 70 70 65 6e 64 2d 73 75 66 66 69 78 20 27 6d 61 67 69 74 2d 66 65 74 63 68 20 22 6e nt-append-suffix.'magit-fetch."n
6ca80 22 20 27 28 22 4e 22 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 ".'("N".forge-pull-notifications
6caa0 29 29 0a 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 70 70 65 6e 64 2d 73 75 66 66 69 78 20 27 ))....(transient-append-suffix.'
6cac0 6d 61 67 69 74 2d 70 75 6c 6c 20 20 22 6d 22 20 27 28 22 6e 22 20 66 6f 72 67 65 2d 70 75 6c 6c magit-pull.."m".'("n".forge-pull
6cae0 29 29 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 70 70 65 6e 64 2d 73 75 66 66 69 78 20 27 6d ))...(transient-append-suffix.'m
6cb00 61 67 69 74 2d 70 75 6c 6c 20 20 22 6e 22 20 27 28 22 4e 22 20 66 6f 72 67 65 2d 70 75 6c 6c 2d agit-pull.."n".'("N".forge-pull-
6cb20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 29 29 0a 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 69 6e notifications))....(transient-in
6cb40 73 65 72 74 2d 73 75 66 66 69 78 20 27 6d 61 67 69 74 2d 70 75 73 68 20 22 70 22 0a 20 20 20 20 sert-suffix.'magit-push."p".....
6cb60 27 28 22 4e 22 20 66 6f 72 67 65 2d 70 75 73 68 2d 74 6f 2d 75 6e 6e 61 6d 65 64 2d 70 75 6c 6c '("N".forge-push-to-unnamed-pull
6cb80 72 65 71 29 29 0a 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 70 70 65 6e 64 2d 73 75 66 66 69 req))....(transient-append-suffi
6cba0 78 20 27 6d 61 67 69 74 2d 62 72 61 6e 63 68 20 22 77 22 0a 20 20 20 20 27 28 22 66 22 20 22 70 x.'magit-branch."w".....'("f"."p
6cbc0 75 6c 6c 2d 72 65 71 75 65 73 74 22 20 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 70 75 6c 6c ull-request".forge-checkout-pull
6cbe0 72 65 71 29 29 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 70 70 65 6e 64 2d 73 75 66 66 69 78 req))...(transient-append-suffix
6cc00 20 27 6d 61 67 69 74 2d 62 72 61 6e 63 68 20 22 57 22 0a 20 20 20 20 27 28 22 46 22 20 22 66 72 .'magit-branch."W".....'("F"."fr
6cc20 6f 6d 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 22 20 66 6f 72 67 65 2d 62 72 61 6e 63 68 2d 70 75 om.pull-request".forge-branch-pu
6cc40 6c 6c 72 65 71 29 29 0a 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 70 70 65 6e 64 2d 73 75 66 llreq))....(transient-append-suf
6cc60 66 69 78 20 27 6d 61 67 69 74 2d 72 65 6d 6f 74 65 20 22 61 22 0a 20 20 20 20 27 28 22 66 22 20 fix.'magit-remote."a".....'("f".
6cc80 22 46 6f 72 6b 22 20 66 6f 72 67 65 2d 66 6f 72 6b 29 29 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 "Fork".forge-fork))...(transient
6cca0 2d 69 6e 73 65 72 74 2d 73 75 66 66 69 78 20 27 6d 61 67 69 74 2d 72 65 6d 6f 74 65 20 22 64 20 -insert-suffix.'magit-remote."d.
6ccc0 75 22 0a 20 20 20 20 27 28 22 64 20 73 22 20 22 53 65 74 20 64 65 66 61 75 6c 74 20 62 72 61 6e u".....'("d.s"."Set.default.bran
6cce0 63 68 22 20 66 6f 72 67 65 2d 73 65 74 2d 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 29 29 0a 20 ch".forge-set-default-branch))..
6cd00 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 70 70 65 6e 64 2d 73 75 66 66 69 78 20 27 6d 61 67 69 74 .(transient-append-suffix.'magit
6cd20 2d 72 65 6d 6f 74 65 20 22 64 20 75 22 0a 20 20 20 20 27 28 22 64 20 72 22 20 22 52 65 6e 61 6d -remote."d.u".....'("d.r"."Renam
6cd40 65 20 64 65 66 61 75 6c 74 20 62 72 61 6e 63 68 22 20 66 6f 72 67 65 2d 72 65 6e 61 6d 65 2d 64 e.default.branch".forge-rename-d
6cd60 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 29 29 0a 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 70 efault-branch))....(transient-ap
6cd80 70 65 6e 64 2d 73 75 66 66 69 78 20 27 6d 61 67 69 74 2d 77 6f 72 6b 74 72 65 65 20 22 63 22 0a pend-suffix.'magit-worktree."c".
6cda0 20 20 20 20 27 28 22 6e 22 20 22 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 77 6f 72 6b 74 72 65 65 ....'("n"."pull-request.worktree
6cdc0 22 20 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 77 6f 72 6b 74 72 65 65 29 29 0a 0a 20 20 28 ".forge-checkout-worktree))....(
6cde0 74 72 61 6e 73 69 65 6e 74 2d 61 70 70 65 6e 64 2d 73 75 66 66 69 78 20 27 6d 61 67 69 74 2d 73 transient-append-suffix.'magit-s
6ce00 74 61 74 75 73 2d 6a 75 6d 70 20 22 77 22 0a 20 20 20 20 27 28 22 4e 70 22 20 22 50 75 6c 6c 20 tatus-jump."w".....'("Np"."Pull.
6ce20 72 65 71 75 65 73 74 73 22 20 66 6f 72 67 65 2d 6a 75 6d 70 2d 74 6f 2d 70 75 6c 6c 72 65 71 73 requests".forge-jump-to-pullreqs
6ce40 29 29 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 70 70 65 6e 64 2d 73 75 66 66 69 78 20 27 6d ))...(transient-append-suffix.'m
6ce60 61 67 69 74 2d 73 74 61 74 75 73 2d 6a 75 6d 70 20 22 4e 70 22 0a 20 20 20 20 27 28 22 4e 69 22 agit-status-jump."Np".....'("Ni"
6ce80 20 22 49 73 73 75 65 73 22 20 66 6f 72 67 65 2d 6a 75 6d 70 2d 74 6f 2d 69 73 73 75 65 73 29 29 ."Issues".forge-jump-to-issues))
6cea0 0a 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 70 70 65 6e 64 2d 73 75 66 66 69 78 20 27 6d 61 ....(transient-append-suffix.'ma
6cec0 67 69 74 2d 6d 65 72 67 65 20 22 61 22 0a 20 20 20 20 27 28 37 20 22 4d 22 20 22 4d 65 72 67 65 git-merge."a".....'(7."M"."Merge
6cee0 20 75 73 69 6e 67 20 41 50 49 22 20 66 6f 72 67 65 2d 6d 65 72 67 65 29 29 29 0a 0a 3b 3b 3b 20 .using.API".forge-merge)))..;;;.
6cf00 53 74 61 72 74 75 70 20 41 73 73 65 72 74 73 0a 0a 28 64 65 66 63 6f 6e 73 74 20 66 6f 72 67 65 Startup.Asserts..(defconst.forge
6cf20 2d 2d 6d 69 6e 69 6d 61 6c 2d 67 69 74 20 22 32 2e 32 35 2e 30 22 29 0a 0a 28 64 65 66 75 6e 20 --minimal-git."2.25.0")..(defun.
6cf40 66 6f 72 67 65 2d 73 74 61 72 74 75 70 2d 61 73 73 65 72 74 73 20 28 29 0a 20 20 28 6c 65 74 20 forge-startup-asserts.()...(let.
6cf60 28 28 76 65 72 73 69 6f 6e 20 28 6d 61 67 69 74 2d 67 69 74 2d 76 65 72 73 69 6f 6e 29 29 29 0a ((version.(magit-git-version))).
6cf80 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 76 65 72 73 69 6f 6e 20 28 76 65 72 73 69 6f 6e 3c ....(when.(and.version.(version<
6cfa0 20 76 65 72 73 69 6f 6e 20 66 6f 72 67 65 2d 2d 6d 69 6e 69 6d 61 6c 2d 67 69 74 29 29 0a 20 20 .version.forge--minimal-git))...
6cfc0 20 20 20 20 28 64 69 73 70 6c 61 79 2d 77 61 72 6e 69 6e 67 20 27 6d 61 67 69 74 20 28 66 6f 72 ....(display-warning.'magit.(for
6cfe0 6d 61 74 20 22 5c 0a 46 6f 72 67 65 20 72 65 71 75 69 72 65 73 20 47 69 74 20 3e 3d 20 25 73 2c mat."\.Forge.requires.Git.>=.%s,
6d000 20 79 6f 75 20 61 72 65 20 75 73 69 6e 67 20 25 73 2e 0a 0a 49 66 20 74 68 69 73 20 63 6f 6d 65 .you.are.using.%s...If.this.come
6d020 73 20 61 73 20 61 20 73 75 72 70 72 69 73 65 20 74 6f 20 79 6f 75 2c 20 62 65 63 61 75 73 65 20 s.as.a.surprise.to.you,.because.
6d040 79 6f 75 20 64 6f 20 61 63 74 75 61 6c 6c 79 20 68 61 76 65 0a 61 20 6e 65 77 65 72 20 76 65 72 you.do.actually.have.a.newer.ver
6d060 73 69 6f 6e 20 69 6e 73 74 61 6c 6c 65 64 2c 20 74 68 65 6e 20 74 68 61 74 20 70 72 6f 62 61 62 sion.installed,.then.that.probab
6d080 6c 79 20 6d 65 61 6e 73 20 74 68 61 74 20 74 68 65 0a 6f 6c 64 65 72 20 76 65 72 73 69 6f 6e 20 ly.means.that.the.older.version.
6d0a0 68 61 70 70 65 6e 73 20 74 6f 20 61 70 70 65 61 72 20 65 61 72 6c 69 65 72 20 6f 6e 20 74 68 65 happens.to.appear.earlier.on.the
6d0c0 20 60 24 50 41 54 48 27 2e 20 20 49 66 20 79 6f 75 0a 61 6c 77 61 79 73 20 73 74 61 72 74 20 45 .`$PATH'...If.you.always.start.E
6d0e0 6d 61 63 73 20 66 72 6f 6d 20 61 20 73 68 65 6c 6c 2c 20 74 68 65 6e 20 74 68 61 74 20 63 61 6e macs.from.a.shell,.then.that.can
6d100 20 62 65 20 66 69 78 65 64 20 69 6e 20 74 68 65 0a 73 68 65 6c 6c 27 73 20 69 6e 69 74 20 66 69 .be.fixed.in.the.shell's.init.fi
6d120 6c 65 2e 20 20 49 66 20 79 6f 75 20 73 74 61 72 74 20 45 6d 61 63 73 20 62 79 20 63 6c 69 63 6b le...If.you.start.Emacs.by.click
6d140 69 6e 67 20 6f 6e 20 61 6e 20 69 63 6f 6e 2c 0a 6f 72 20 75 73 69 6e 67 20 73 6f 6d 65 20 73 6f ing.on.an.icon,.or.using.some.so
6d160 72 74 20 6f 66 20 61 70 70 6c 69 63 61 74 69 6f 6e 20 6c 61 75 6e 63 68 65 72 2c 20 74 68 65 6e rt.of.application.launcher,.then
6d180 20 79 6f 75 20 70 72 6f 62 61 62 6c 79 0a 68 61 76 65 20 74 6f 20 61 64 6a 75 73 74 20 74 68 65 .you.probably.have.to.adjust.the
6d1a0 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 61 73 20 73 65 65 6e 20 62 79 20 67 72 61 70 68 69 63 61 .environment.as.seen.by.graphica
6d1c0 6c 20 69 6e 74 65 72 66 61 63 65 2e 0a 46 6f 72 20 58 31 31 20 73 6f 6d 65 74 68 69 6e 67 20 6c l.interface..For.X11.something.l
6d1e0 69 6b 65 20 7e 2f 2e 78 69 6e 69 74 72 63 20 73 68 6f 75 6c 64 20 77 6f 72 6b 2e 0a 0a 49 66 20 ike.~/.xinitrc.should.work...If.
6d200 79 6f 75 20 75 73 65 20 54 72 61 6d 70 20 74 6f 20 77 6f 72 6b 20 69 6e 73 69 64 65 20 72 65 6d you.use.Tramp.to.work.inside.rem
6d220 6f 74 65 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2c 20 74 68 65 6e 20 79 6f 75 0a 68 ote.Git.repositories,.then.you.h
6d240 61 76 65 20 74 6f 20 6d 61 6b 65 20 73 75 72 65 20 61 20 73 75 69 74 61 62 6c 65 20 47 69 74 20 ave.to.make.sure.a.suitable.Git.
6d260 69 73 20 75 73 65 64 20 6f 6e 20 74 68 65 20 72 65 6d 6f 74 65 20 6d 61 63 68 69 6e 65 73 0a 74 is.used.on.the.remote.machines.t
6d280 6f 6f 2e 5c 6e 22 20 66 6f 72 67 65 2d 2d 6d 69 6e 69 6d 61 6c 2d 67 69 74 20 76 65 72 73 69 6f oo.\n".forge--minimal-git.versio
6d2a0 6e 29 20 3a 65 72 72 6f 72 29 29 29 29 0a 0a 28 69 66 20 61 66 74 65 72 2d 69 6e 69 74 2d 74 69 n).:error))))..(if.after-init-ti
6d2c0 6d 65 0a 20 20 20 20 28 66 6f 72 67 65 2d 73 74 61 72 74 75 70 2d 61 73 73 65 72 74 73 29 0a 20 me.....(forge-startup-asserts)..
6d2e0 20 28 61 64 64 2d 68 6f 6f 6b 20 27 61 66 74 65 72 2d 69 6e 69 74 2d 68 6f 6f 6b 20 23 27 66 6f .(add-hook.'after-init-hook.#'fo
6d300 72 67 65 2d 73 74 61 72 74 75 70 2d 61 73 73 65 72 74 73 20 74 29 29 0a 0a 3b 3b 3b 20 66 6f 72 rge-startup-asserts.t))..;;;.for
6d320 67 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ge.el.ends.here.................
6d340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d400 66 6f 72 67 65 2d 32 30 32 35 30 39 31 36 2e 31 31 31 39 2f 66 6f 72 67 65 2e 69 6e 66 6f 00 00 forge-20250916.1119/forge.info..
6d420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d460 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
6d480 30 32 35 31 36 37 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 31 31 35 00 20 30 00 00 00 0251674.00000000000.014115..0...
6d4a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d4c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d4e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d500 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
6d520 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
6d540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d5a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d600 54 68 69 73 20 69 73 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 70 72 6f 64 75 63 65 64 20 62 79 20 This.is.forge.info,.produced.by.
6d620 6d 61 6b 65 69 6e 66 6f 20 76 65 72 73 69 6f 6e 20 36 2e 38 20 66 72 6f 6d 20 66 6f 72 67 65 2e makeinfo.version.6.8.from.forge.
6d640 74 65 78 69 2e 0a 0a 20 20 20 20 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 texi........Copyright.(C).2018-2
6d660 30 32 35 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 20 20 20 20 20 3c 65 6d 61 63 73 2e 025.Jonas.Bernoulli......<emacs.
6d680 66 6f 72 67 65 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 20 20 20 20 forge@jonas.bernoulli.dev>......
6d6a0 20 59 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 74 68 69 73 20 64 6f 63 75 6d .You.can.redistribute.this.docum
6d6c0 65 6e 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 ent.and/or.modify.it.under.the.t
6d6e0 65 72 6d 73 0a 20 20 20 20 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 erms......of.the.GNU.General.Pub
6d700 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 20 74 68 65 20 lic.License.as.published.by.the.
6d720 46 72 65 65 20 53 6f 66 74 77 61 72 65 0a 20 20 20 20 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 Free.Software......Foundation,.e
6d740 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 ither.version.3.of.the.License,.
6d760 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 0a 20 20 20 20 20 61 6e 79 20 6c 61 74 or.(at.your.option)......any.lat
6d780 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 20 20 20 20 20 54 68 69 73 20 64 6f 63 75 6d 65 6e 74 20 er.version........This.document.
6d7a0 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 is.distributed.in.the.hope.that.
6d7c0 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 20 20 20 20 20 62 75 74 20 57 49 54 48 it.will.be.useful,......but.WITH
6d7e0 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 OUT.ANY.WARRANTY;.without.even.t
6d800 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 20 20 20 20 20 4d 45 52 43 he.implied.warranty.of......MERC
6d820 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 HANTABILITY.or.FITNESS.FOR.A.PAR
6d840 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 20 47 4e 55 0a 20 20 TICULAR.PURPOSE...See.the.GNU...
6d860 20 20 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f ...General.Public.License.for.mo
6d880 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 49 4e 46 4f 2d 44 49 52 2d 53 45 43 54 49 4f 4e 20 45 6d re.details...INFO-DIR-SECTION.Em
6d8a0 61 63 73 0a 53 54 41 52 54 2d 49 4e 46 4f 2d 44 49 52 2d 45 4e 54 52 59 0a 2a 20 46 6f 72 67 65 acs.START-INFO-DIR-ENTRY.*.Forge
6d8c0 3a 20 28 66 6f 72 67 65 29 2e 20 20 20 20 20 20 20 41 63 63 65 73 73 20 47 69 74 20 46 6f 72 67 :.(forge)........Access.Git.Forg
6d8e0 65 73 20 66 72 6f 6d 20 4d 61 67 69 74 2e 0a 45 4e 44 2d 49 4e 46 4f 2d 44 49 52 2d 45 4e 54 52 es.from.Magit..END-INFO-DIR-ENTR
6d900 59 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 54 6f Y....File:.forge.info,..Node:.To
6d920 70 2c 20 20 4e 65 78 74 3a 20 49 6e 74 72 6f 64 75 63 74 69 6f 6e 2c 20 20 55 70 3a 20 28 64 69 p,..Next:.Introduction,..Up:.(di
6d940 72 29 0a 0a 46 6f 72 67 65 20 55 73 65 72 20 61 6e 64 20 44 65 76 65 6c 6f 70 65 72 20 4d 61 6e r)..Forge.User.and.Developer.Man
6d960 75 61 6c 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ual.****************************
6d980 2a 2a 2a 0a 0a 46 6f 72 67 65 20 61 6c 6c 6f 77 73 20 79 6f 75 20 74 6f 20 77 6f 72 6b 20 77 69 ***..Forge.allows.you.to.work.wi
6d9a0 74 68 20 47 69 74 20 66 6f 72 67 65 73 2c 20 63 75 72 72 65 6e 74 6c 79 20 47 69 74 68 75 62 20 th.Git.forges,.currently.Github.
6d9c0 61 6e 64 20 47 69 74 6c 61 62 2c 0a 66 72 6f 6d 20 74 68 65 20 63 6f 6d 66 6f 72 74 20 6f 66 20 and.Gitlab,.from.the.comfort.of.
6d9e0 4d 61 67 69 74 20 61 6e 64 20 45 6d 61 63 73 2e 0a 0a 54 68 69 73 20 6d 61 6e 75 61 6c 20 69 73 Magit.and.Emacs...This.manual.is
6da00 20 66 6f 72 20 46 6f 72 67 65 20 76 65 72 73 69 6f 6e 20 30 2e 36 2e 30 2e 0a 0a 20 20 20 20 20 .for.Forge.version.0.6.0........
6da20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f 6e 61 73 20 42 65 Copyright.(C).2018-2025.Jonas.Be
6da40 72 6e 6f 75 6c 6c 69 0a 20 20 20 20 20 3c 65 6d 61 63 73 2e 66 6f 72 67 65 40 6a 6f 6e 61 73 2e rnoulli......<emacs.forge@jonas.
6da60 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 0a 20 20 20 20 20 59 6f 75 20 63 61 6e 20 72 65 64 bernoulli.dev>.......You.can.red
6da80 69 73 74 72 69 62 75 74 65 20 74 68 69 73 20 64 6f 63 75 6d 65 6e 74 20 61 6e 64 2f 6f 72 20 6d istribute.this.document.and/or.m
6daa0 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 0a 20 20 20 20 20 6f 66 odify.it.under.the.terms......of
6dac0 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 .the.GNU.General.Public.License.
6dae0 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 as.published.by.the.Free.Softwar
6db00 65 0a 20 20 20 20 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f e......Foundation,.either.versio
6db20 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 20 28 61 74 20 79 6f 75 72 20 n.3.of.the.License,.or.(at.your.
6db40 6f 70 74 69 6f 6e 29 0a 20 20 20 20 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a option)......any.later.version..
6db60 0a 20 20 20 20 20 54 68 69 73 20 64 6f 63 75 6d 65 6e 74 20 69 73 20 64 69 73 74 72 69 62 75 74 ......This.document.is.distribut
6db80 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 ed.in.the.hope.that.it.will.be.u
6dba0 73 65 66 75 6c 2c 0a 20 20 20 20 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 seful,......but.WITHOUT.ANY.WARR
6dbc0 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 ANTY;.without.even.the.implied.w
6dbe0 61 72 72 61 6e 74 79 20 6f 66 0a 20 20 20 20 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 arranty.of......MERCHANTABILITY.
6dc00 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 or.FITNESS.FOR.A.PARTICULAR.PURP
6dc20 4f 53 45 2e 20 20 53 65 65 20 74 68 65 20 47 4e 55 0a 20 20 20 20 20 47 65 6e 65 72 61 6c 20 50 OSE...See.the.GNU......General.P
6dc40 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a ublic.License.for.more.details..
6dc60 0a 2a 20 4d 65 6e 75 3a 0a 0a 2a 20 49 6e 74 72 6f 64 75 63 74 69 6f 6e 3a 3a 0a 2a 20 49 6e 69 .*.Menu:..*.Introduction::.*.Ini
6dc80 74 69 61 6c 20 53 65 74 75 70 3a 3a 0a 2a 20 49 6e 69 74 69 61 6c 20 50 75 6c 6c 3a 3a 0a 2a 20 tial.Setup::.*.Initial.Pull::.*.
6dca0 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 3a 3a 0a 2a 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 Getting.Started::.*.Lists.and.Me
6dcc0 6e 75 73 3a 3a 0a 2a 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 3a 3a 0a 2a 20 43 72 65 61 nus::.*.Visiting.Topics::.*.Crea
6dce0 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 3a 3a 0a 2a 20 45 64 69 74 69 6e ting.Topics.and.Posts::.*.Editin
6dd00 67 20 54 6f 70 69 63 73 3a 3a 0a 2a 20 50 75 6c 6c 69 6e 67 3a 3a 0a 2a 20 42 72 61 6e 63 68 69 g.Topics::.*.Pulling::.*.Branchi
6dd20 6e 67 3a 3a 0a 2a 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 3a 3a 0a ng::.*.Miscellaneous.Commands::.
6dd40 2a 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 4f 70 74 69 6f 6e 73 3a 3a 0a 2a 20 48 6f 77 20 *.Miscellaneous.Options::.*.How.
6dd60 46 6f 72 67 65 20 44 65 74 65 63 74 69 6f 6e 20 57 6f 72 6b 73 3a 3a 0a 2a 20 53 75 70 70 6f 72 Forge.Detection.Works::.*.Suppor
6dd80 74 65 64 20 46 6f 72 67 65 73 20 61 6e 64 20 48 6f 73 74 73 3a 3a 0a 2a 20 46 41 51 3a 3a 0a 2a ted.Forges.and.Hosts::.*.FAQ::.*
6dda0 20 4b 65 79 73 74 72 6f 6b 65 20 49 6e 64 65 78 3a 3a 0a 2a 20 46 75 6e 63 74 69 6f 6e 20 61 6e .Keystroke.Index::.*.Function.an
6ddc0 64 20 43 6f 6d 6d 61 6e 64 20 49 6e 64 65 78 3a 3a 0a 2a 20 56 61 72 69 61 62 6c 65 20 49 6e 64 d.Command.Index::.*.Variable.Ind
6dde0 65 78 3a 3a 0a 0a e2 80 94 20 54 68 65 20 44 65 74 61 69 6c 65 64 20 4e 6f 64 65 20 4c 69 73 74 ex::......The.Detailed.Node.List
6de00 69 6e 67 20 e2 80 94 0a 0a 49 6e 69 74 69 61 6c 20 53 65 74 75 70 0a 0a 2a 20 53 65 74 75 70 20 ing......Initial.Setup..*.Setup.
6de20 66 6f 72 20 47 69 74 68 75 62 2e 63 6f 6d 3a 20 53 65 74 75 70 20 66 6f 72 20 47 69 74 68 75 62 for.Github.com:.Setup.for.Github
6de40 63 6f 6d 2e 0a 2a 20 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 68 65 72 20 47 69 74 68 75 62 20 com..*.Setup.for.Another.Github.
6de60 49 6e 73 74 61 6e 63 65 3a 3a 0a 2a 20 53 65 74 75 70 20 66 6f 72 20 47 69 74 6c 61 62 2e 63 6f Instance::.*.Setup.for.Gitlab.co
6de80 6d 3a 20 53 65 74 75 70 20 66 6f 72 20 47 69 74 6c 61 62 63 6f 6d 2e 0a 2a 20 53 65 74 75 70 20 m:.Setup.for.Gitlabcom..*.Setup.
6dea0 66 6f 72 20 41 6e 6f 74 68 65 72 20 47 69 74 6c 61 62 20 49 6e 73 74 61 6e 63 65 3a 3a 0a 2a 20 for.Another.Gitlab.Instance::.*.
6dec0 53 65 74 75 70 20 61 20 50 61 72 74 69 61 6c 6c 79 20 53 75 70 70 6f 72 74 65 64 20 48 6f 73 74 Setup.a.Partially.Supported.Host
6dee0 3a 3a 0a 0a 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 20 61 6e 64 20 48 6f 73 74 73 0a 0a ::..Supported.Forges.and.Hosts..
6df00 2a 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 3a 3a 0a 2a 20 50 61 72 74 69 61 6c 6c 79 *.Supported.Forges::.*.Partially
6df20 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 3a 3a 0a 2a 20 53 75 70 70 6f 72 74 65 64 20 .Supported.Forges::.*.Supported.
6df40 53 65 6d 69 2d 46 6f 72 67 65 73 3a 3a 0a 0a 46 41 51 0a 0a 2a 20 e2 80 98 65 72 72 6f 72 20 69 Semi-Forges::..FAQ..*....error.i
6df60 6e 20 70 72 6f 63 65 73 73 20 66 69 6c 74 65 72 20 48 54 54 50 20 45 72 72 6f 72 20 35 30 32 2c n.process.filter.HTTP.Error.502,
6df80 20 22 42 61 64 20 67 61 74 65 77 61 79 22 e2 80 99 3a 20 65 72 72 6f 72 20 69 6e 20 70 72 6f 63 ."Bad.gateway"...:.error.in.proc
6dfa0 65 73 73 20 66 69 6c 74 65 72 20 48 54 54 50 20 45 72 72 6f 72 20 35 30 32 20 22 42 61 64 20 67 ess.filter.HTTP.Error.502."Bad.g
6dfc0 61 74 65 77 61 79 22 2e 0a 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 ateway"......File:.forge.info,..
6dfe0 4e 6f 64 65 3a 20 49 6e 74 72 6f 64 75 63 74 69 6f 6e 2c 20 20 4e 65 78 74 3a 20 49 6e 69 74 69 Node:.Introduction,..Next:.Initi
6e000 61 6c 20 53 65 74 75 70 2c 20 20 50 72 65 76 3a 20 54 6f 70 2c 20 20 55 70 3a 20 54 6f 70 0a 0a al.Setup,..Prev:.Top,..Up:.Top..
6e020 31 20 49 6e 74 72 6f 64 75 63 74 69 6f 6e 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 46 1.Introduction.**************..F
6e040 6f 72 67 65 20 61 6c 6c 6f 77 73 20 79 6f 75 20 74 6f 20 77 6f 72 6b 20 77 69 74 68 20 47 69 74 orge.allows.you.to.work.with.Git
6e060 20 66 6f 72 67 65 73 2c 20 63 75 72 72 65 6e 74 6c 79 20 47 69 74 68 75 62 20 61 6e 64 20 47 69 .forges,.currently.Github.and.Gi
6e080 74 6c 61 62 2c 0a 66 72 6f 6d 20 74 68 65 20 63 6f 6d 66 6f 72 74 20 6f 66 20 4d 61 67 69 74 20 tlab,.from.the.comfort.of.Magit.
6e0a0 61 6e 64 20 45 6d 61 63 73 2e 0a 0a 20 20 20 46 6f 72 67 65 20 66 65 74 63 68 65 73 20 69 73 73 and.Emacs......Forge.fetches.iss
6e0c0 75 65 73 2c 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 61 6e 64 20 6f 74 68 65 72 20 64 61 74 ues,.pull-requests.and.other.dat
6e0e0 61 20 75 73 69 6e 67 20 74 68 65 20 66 6f 72 67 65 e2 80 99 73 0a 41 50 49 20 61 6e 64 20 73 74 a.using.the.forge...s.API.and.st
6e100 6f 72 65 73 20 74 68 65 20 72 65 74 72 69 65 76 65 64 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 ores.the.retrieved.information.i
6e120 6e 20 61 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 2e 0a 41 64 64 69 74 69 6f 6e 61 6c 6c 79 n.a.local.database..Additionally
6e140 20 69 74 20 66 65 74 63 68 65 73 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 72 65 66 65 72 65 6e .it.fetches.pull-request.referen
6e160 63 65 73 20 75 73 69 6e 67 20 47 69 74 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e ces.using.Git.....File:.forge.in
6e180 66 6f 2c 20 20 4e 6f 64 65 3a 20 49 6e 69 74 69 61 6c 20 53 65 74 75 70 2c 20 20 4e 65 78 74 3a fo,..Node:.Initial.Setup,..Next:
6e1a0 20 49 6e 69 74 69 61 6c 20 50 75 6c 6c 2c 20 20 50 72 65 76 3a 20 49 6e 74 72 6f 64 75 63 74 69 .Initial.Pull,..Prev:.Introducti
6e1c0 6f 6e 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 32 20 49 6e 69 74 69 61 6c 20 53 65 74 75 70 0a 2a 2a on,..Up:.Top..2.Initial.Setup.**
6e1e0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 50 6c 65 61 73 65 20 66 69 72 73 74 20 64 6f 20 74 *************..Please.first.do.t
6e200 68 65 20 63 6f 6d 6d 6f 6e 20 73 65 74 75 70 20 62 65 6c 6f 77 20 61 6e 64 20 74 68 65 6e 20 63 he.common.setup.below.and.then.c
6e220 61 72 65 66 75 6c 6c 79 20 66 6f 6c 6c 6f 77 20 74 68 65 0a 69 6e 73 74 72 75 63 74 69 6f 6e 73 arefully.follow.the.instructions
6e240 20 66 6f 72 20 79 6f 75 72 20 66 6f 72 67 65 20 69 6e 73 74 61 6e 63 65 2e 20 20 4f 6e 63 65 20 .for.your.forge.instance...Once.
6e260 79 6f 75 20 68 61 76 65 20 63 6f 6d 70 6c 65 74 65 64 20 74 68 65 0a 73 65 74 75 70 2c 20 79 6f you.have.completed.the.setup,.yo
6e280 75 20 63 61 6e 20 73 74 61 72 74 20 74 72 61 63 6b 69 6e 67 20 72 65 70 6f 73 69 74 6f 72 69 65 u.can.start.tracking.repositorie
6e2a0 73 20 28 73 65 65 20 2a 6e 6f 74 65 20 49 6e 69 74 69 61 6c 20 50 75 6c 6c 3a 3a 29 2e 0a 0a 20 s.(see.*note.Initial.Pull::)....
6e2c0 20 20 49 66 20 79 6f 75 20 72 75 6e 20 69 6e 74 6f 20 64 69 66 66 69 63 75 6c 74 69 65 73 20 64 ..If.you.run.into.difficulties.d
6e2e0 75 72 69 6e 67 20 73 65 74 75 70 20 6f 72 20 74 68 65 20 69 6e 69 74 69 61 6c 20 70 75 6c 6c 2c uring.setup.or.the.initial.pull,
6e300 20 74 68 65 6e 0a 70 6c 65 61 73 65 20 61 6c 73 6f 20 73 65 65 20 2a 6e 6f 74 65 20 48 6f 77 20 .then.please.also.see.*note.How.
6e320 46 6f 72 67 65 20 44 65 74 65 63 74 69 6f 6e 20 57 6f 72 6b 73 3a 3a 20 61 6e 64 20 2a 6e 6f 74 Forge.Detection.Works::.and.*not
6e340 65 0a 28 67 68 75 62 29 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 3a 3a 2e 0a 0a 2a 20 4d 65 e.(ghub)Getting.Started::...*.Me
6e360 6e 75 3a 0a 0a 2a 20 53 65 74 75 70 20 66 6f 72 20 47 69 74 68 75 62 2e 63 6f 6d 3a 20 53 65 74 nu:..*.Setup.for.Github.com:.Set
6e380 75 70 20 66 6f 72 20 47 69 74 68 75 62 63 6f 6d 2e 0a 2a 20 53 65 74 75 70 20 66 6f 72 20 41 6e up.for.Githubcom..*.Setup.for.An
6e3a0 6f 74 68 65 72 20 47 69 74 68 75 62 20 49 6e 73 74 61 6e 63 65 3a 3a 0a 2a 20 53 65 74 75 70 20 other.Github.Instance::.*.Setup.
6e3c0 66 6f 72 20 47 69 74 6c 61 62 2e 63 6f 6d 3a 20 53 65 74 75 70 20 66 6f 72 20 47 69 74 6c 61 62 for.Gitlab.com:.Setup.for.Gitlab
6e3e0 63 6f 6d 2e 0a 2a 20 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 68 65 72 20 47 69 74 6c 61 62 20 com..*.Setup.for.Another.Gitlab.
6e400 49 6e 73 74 61 6e 63 65 3a 3a 0a 2a 20 53 65 74 75 70 20 61 20 50 61 72 74 69 61 6c 6c 79 20 53 Instance::.*.Setup.a.Partially.S
6e420 75 70 70 6f 72 74 65 64 20 48 6f 73 74 3a 3a 0a 0a 43 6f 6d 6d 6f 6e 20 53 65 74 75 70 0a 3d 3d upported.Host::..Common.Setup.==
6e440 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 4c 6f 61 64 69 6e 67 20 4d 61 67 69 74 20 64 6f 65 73 6e e2 ==========..Loading.Magit.doesn.
6e460 80 99 74 20 63 61 75 73 65 20 46 6f 72 67 65 20 74 6f 20 62 65 20 6c 6f 61 64 65 64 20 61 75 74 ..t.cause.Forge.to.be.loaded.aut
6e480 6f 6d 61 74 69 63 61 6c 6c 79 2e 20 20 41 64 64 69 6e 67 0a 73 6f 6d 65 74 68 69 6e 67 20 6c 69 omatically...Adding.something.li
6e4a0 6b 65 20 74 68 69 73 20 74 6f 20 79 6f 75 72 20 69 6e 69 74 20 66 69 6c 65 20 74 61 6b 65 73 20 ke.this.to.your.init.file.takes.
6e4c0 63 61 72 65 20 6f 66 20 74 68 61 74 3a 0a 0a 20 20 20 20 20 28 77 69 74 68 2d 65 76 61 6c 2d 61 care.of.that:.......(with-eval-a
6e4e0 66 74 65 72 2d 6c 6f 61 64 20 27 6d 61 67 69 74 0a 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 fter-load.'magit........(require
6e500 20 27 66 6f 72 67 65 29 29 0a 0a 4f 72 20 69 66 20 79 6f 75 20 75 73 65 20 e2 80 98 75 73 65 2d .'forge))..Or.if.you.use....use-
6e520 70 61 63 6b 61 67 65 e2 80 99 3a 0a 0a 20 20 20 20 20 28 75 73 65 2d 70 61 63 6b 61 67 65 20 66 package...:.......(use-package.f
6e540 6f 72 67 65 0a 20 20 20 20 20 20 20 3a 61 66 74 65 72 20 6d 61 67 69 74 29 0a 0a 20 20 20 42 79 orge........:after.magit).....By
6e560 20 64 65 66 61 75 6c 74 20 46 6f 72 67 65 20 61 64 64 73 20 73 6f 6d 65 20 62 69 6e 64 69 6e 67 .default.Forge.adds.some.binding
6e580 73 20 74 6f 20 4d 61 67 69 74 20 6b 65 79 6d 61 70 73 20 61 6e 64 20 6d 65 6e 75 73 2c 20 61 6e s.to.Magit.keymaps.and.menus,.an
6e5a0 64 0a 73 6f 6d 65 20 73 65 63 74 69 6f 6e 73 20 74 6f 20 4d 61 67 69 74 20 62 75 66 66 65 72 73 d.some.sections.to.Magit.buffers
6e5c0 2e 20 20 49 66 20 79 6f 75 20 77 6f 75 6c 64 20 6c 69 6b 65 20 74 6f 20 70 72 65 76 65 6e 74 20 ...If.you.would.like.to.prevent.
6e5e0 74 68 61 74 2c 20 79 6f 75 0a 68 61 76 65 20 74 6f 20 73 65 74 20 e2 80 98 66 6f 72 67 65 2d 61 that,.you.have.to.set....forge-a
6e600 64 64 2d 64 65 66 61 75 6c 74 2d 62 69 6e 64 69 6e 67 73 e2 80 99 20 61 6e 64 2f 6f 72 0a e2 80 dd-default-bindings....and/or...
6e620 98 66 6f 72 67 65 2d 61 64 64 2d 64 65 66 61 75 6c 74 2d 73 65 63 74 69 6f 6e 73 e2 80 99 20 74 .forge-add-default-sections....t
6e640 6f 20 e2 80 98 6e 69 6c e2 80 99 2c 20 62 65 66 6f 72 65 20 e2 80 98 6d 61 67 69 74 e2 80 99 20 o....nil...,.before....magit....
6e660 28 6e 6f 74 20 6a 75 73 74 20 e2 80 98 66 6f 72 67 65 e2 80 99 29 0a 69 73 20 6c 6f 61 64 65 64 (not.just....forge...).is.loaded
6e680 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 53 65 .....File:.forge.info,..Node:.Se
6e6a0 74 75 70 20 66 6f 72 20 47 69 74 68 75 62 63 6f 6d 2c 20 20 4e 65 78 74 3a 20 53 65 74 75 70 20 tup.for.Githubcom,..Next:.Setup.
6e6c0 66 6f 72 20 41 6e 6f 74 68 65 72 20 47 69 74 68 75 62 20 49 6e 73 74 61 6e 63 65 2c 20 20 55 70 for.Another.Github.Instance,..Up
6e6e0 3a 20 49 6e 69 74 69 61 6c 20 53 65 74 75 70 0a 0a 32 2e 31 20 53 65 74 75 70 20 66 6f 72 20 47 :.Initial.Setup..2.1.Setup.for.G
6e700 69 74 68 75 62 2e 63 6f 6d 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ithub.com.======================
6e720 3d 3d 0a 0a 53 65 74 20 79 6f 75 72 20 55 73 65 72 6e 61 6d 65 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ==..Set.your.Username.----------
6e740 2d 2d 2d 2d 2d 2d 2d 0a 0a 46 69 72 73 74 20 69 6e 66 6f 72 6d 20 46 6f 72 67 65 20 61 62 6f 75 -------..First.inform.Forge.abou
6e760 74 20 79 6f 75 72 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 3e 20 75 73 65 72 t.your.<https://github.com>.user
6e780 6e 61 6d 65 3a 0a 0a 20 20 20 20 20 67 69 74 20 63 6f 6e 66 69 67 20 2d 2d 67 6c 6f 62 61 6c 20 name:.......git.config.--global.
6e7a0 67 69 74 68 75 62 2e 75 73 65 72 20 55 53 45 52 4e 41 4d 45 0a 0a 20 20 20 49 66 20 79 6f 75 20 github.user.USERNAME.....If.you.
6e7c0 6e 65 65 64 20 74 6f 20 69 64 65 6e 74 69 66 79 20 61 73 20 61 6e 6f 74 68 65 72 20 75 73 65 72 need.to.identify.as.another.user
6e7e0 20 69 6e 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 72 65 70 6f 73 69 74 6f 72 79 2c 0a 74 68 65 .in.a.particular.repository,.the
6e800 6e 20 79 6f 75 20 68 61 76 65 20 74 6f 20 73 65 74 20 74 68 61 74 20 76 61 72 69 61 62 6c 65 20 n.you.have.to.set.that.variable.
6e820 6c 6f 63 61 6c 6c 79 3a 0a 0a 20 20 20 20 20 63 64 20 2f 70 61 74 68 2f 74 6f 2f 72 65 70 6f 0a locally:.......cd./path/to/repo.
6e840 20 20 20 20 20 67 69 74 20 63 6f 6e 66 69 67 20 2d 2d 6c 6f 63 61 6c 20 67 69 74 68 75 62 2e 75 .....git.config.--local.github.u
6e860 73 65 72 20 55 53 45 52 4e 41 4d 45 0a 0a 43 72 65 61 74 65 20 61 6e 64 20 53 74 6f 72 65 20 61 ser.USERNAME..Create.and.Store.a
6e880 6e 20 41 63 63 65 73 73 20 54 6f 6b 65 6e 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d n.Access.Token.-----------------
6e8a0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 56 69 73 69 74 20 3c 68 74 74 70 73 3a 2f 2f ---------------..Visit.<https://
6e8c0 67 69 74 68 75 62 2e 63 6f 6d 2f 73 65 74 74 69 6e 67 73 2f 74 6f 6b 65 6e 73 3e 20 69 6e 20 61 github.com/settings/tokens>.in.a
6e8e0 20 62 72 6f 77 73 65 72 20 74 6f 20 67 65 6e 65 72 61 74 65 20 61 0a 6e 65 77 20 22 63 6c 61 73 .browser.to.generate.a.new."clas
6e900 73 69 63 22 20 74 6f 6b 65 6e 20 75 73 69 6e 67 20 74 68 65 20 e2 80 98 72 65 70 6f e2 80 99 2c sic".token.using.the....repo...,
6e920 20 e2 80 98 75 73 65 72 e2 80 99 20 61 6e 64 20 e2 80 98 72 65 61 64 3a 6f 72 67 e2 80 99 20 73 ....user....and....read:org....s
6e940 63 6f 70 65 73 2e 20 20 44 6f 0a 6e 6f 74 20 63 6c 6f 73 65 20 74 68 65 20 62 72 6f 77 73 65 72 copes...Do.not.close.the.browser
6e960 20 77 69 6e 64 6f 77 20 6a 75 73 74 20 79 65 74 2c 20 62 65 63 61 75 73 65 20 74 68 65 20 74 6f .window.just.yet,.because.the.to
6e980 6b 65 6e 20 77 69 6c 6c 20 6f 6e 6c 79 20 62 65 0a 73 68 6f 77 6e 20 6f 6e 63 65 2e 0a 0a 20 20 ken.will.only.be.shown.once.....
6e9a0 20 54 68 65 20 62 75 69 6c 74 2d 69 6e 20 41 75 74 68 2d 53 6f 75 72 63 65 20 28 2a 6e 6f 74 65 .The.built-in.Auth-Source.(*note
6e9c0 20 28 61 75 74 68 29 54 6f 70 3a 3a 29 20 70 61 63 6b 61 67 65 20 69 73 20 75 73 65 64 20 74 6f .(auth)Top::).package.is.used.to
6e9e0 20 73 74 6f 72 65 0a 74 68 65 20 74 6f 6b 65 6e 20 67 65 6e 65 72 61 74 65 64 20 69 6e 20 74 68 .store.the.token.generated.in.th
6ea00 65 20 70 72 65 76 69 6f 75 73 20 73 74 65 70 2e 20 20 54 68 65 20 e2 80 98 61 75 74 68 2d 73 6f e.previous.step...The....auth-so
6ea20 75 72 63 65 73 e2 80 99 20 76 61 72 69 61 62 6c 65 0a 63 6f 6e 74 72 6f 6c 73 20 68 6f 77 20 61 urces....variable.controls.how.a
6ea40 6e 64 20 77 68 65 72 65 20 41 75 74 68 2d 53 6f 75 72 63 65 20 6b 65 65 70 73 20 69 74 73 20 73 nd.where.Auth-Source.keeps.its.s
6ea60 65 63 72 65 74 73 2e 20 20 54 68 65 20 64 65 66 61 75 6c 74 20 76 61 6c 75 65 0a 69 73 20 61 20 ecrets...The.default.value.is.a.
6ea80 6c 69 73 74 20 6f 66 20 74 68 72 65 65 20 66 69 6c 65 73 3a 20 e2 80 98 28 22 7e 2f 2e 61 75 74 list.of.three.files:....("~/.aut
6eaa0 68 69 6e 66 6f 22 20 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 70 67 22 0a 22 7e 2f 2e 6e 65 74 hinfo"."~/.authinfo.gpg"."~/.net
6eac0 72 63 22 29 e2 80 99 2c 20 62 75 74 20 74 68 61 74 20 63 61 6e 20 6c 65 61 64 20 74 6f 20 63 6f rc")...,.but.that.can.lead.to.co
6eae0 6e 66 75 73 69 6e 67 20 62 65 68 61 76 69 6f 72 2c 20 73 6f 20 79 6f 75 20 73 68 6f 75 6c 64 0a nfusing.behavior,.so.you.should.
6eb00 6d 61 6b 65 20 73 75 72 65 20 74 68 61 74 20 6f 6e 6c 79 20 6f 6e 65 20 6f 66 20 74 68 65 73 65 make.sure.that.only.one.of.these
6eb20 20 66 69 6c 65 73 20 65 78 69 73 74 73 2c 20 61 6e 64 20 74 68 65 6e 20 79 6f 75 20 73 68 6f 75 .files.exists,.and.then.you.shou
6eb40 6c 64 20 61 6c 73 6f 0a 61 64 6a 75 73 74 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20 ld.also.adjust.the.value.of.the.
6eb60 76 61 72 69 61 62 6c 65 20 74 6f 20 6f 6e 6c 79 20 65 76 65 72 20 75 73 65 20 74 68 61 74 20 66 variable.to.only.ever.use.that.f
6eb80 69 6c 65 2c 20 66 6f 72 0a 65 78 61 6d 70 6c 65 3a 0a 0a 20 20 20 20 20 28 73 65 74 71 20 61 75 ile,.for.example:.......(setq.au
6eba0 74 68 2d 73 6f 75 72 63 65 73 20 27 28 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 22 29 29 0a 0a 20 20 th-sources.'("~/.authinfo"))....
6ebc0 20 49 6e 20 e2 80 98 7e 2f 2e 61 75 74 68 69 6e 66 6f e2 80 99 20 73 65 63 72 65 74 73 20 61 72 .In....~/.authinfo....secrets.ar
6ebe0 65 20 73 74 6f 72 65 64 20 69 6e 20 70 6c 61 69 6e 20 74 65 78 74 2e 20 20 49 66 20 79 6f 75 20 e.stored.in.plain.text...If.you.
6ec00 64 6f 6e e2 80 99 74 20 77 61 6e 74 0a 74 68 61 74 2c 20 74 68 65 6e 20 79 6f 75 20 73 68 6f 75 don...t.want.that,.then.you.shou
6ec20 6c 64 20 75 73 65 20 74 68 65 20 65 6e 63 72 79 70 74 65 64 20 e2 80 98 7e 2f 2e 61 75 74 68 69 ld.use.the.encrypted....~/.authi
6ec40 6e 66 6f 2e 67 70 67 e2 80 99 20 69 6e 73 74 65 61 64 3a 0a 0a 20 20 20 20 20 28 73 65 74 71 20 nfo.gpg....instead:.......(setq.
6ec60 61 75 74 68 2d 73 6f 75 72 63 65 73 20 27 28 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 70 67 22 auth-sources.'("~/.authinfo.gpg"
6ec80 29 29 0a 0a 20 20 20 4d 61 6b 65 20 73 75 72 65 20 79 6f 75 20 70 75 74 20 6f 6e 65 20 6f 66 20 )).....Make.sure.you.put.one.of.
6eca0 74 68 65 73 65 20 66 6f 72 6d 73 20 69 6e 20 79 6f 75 72 20 69 6e 69 74 20 66 69 6c 65 20 2a 61 these.forms.in.your.init.file.*a
6ecc0 6e 64 2a 20 74 6f 0a 65 76 61 6c 75 61 74 65 20 69 74 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e nd*.to.evaluate.it.in.the.curren
6ece0 74 20 45 6d 61 63 73 20 69 6e 73 74 61 6e 63 65 20 61 73 20 77 65 6c 6c 2c 20 62 79 20 70 6c 61 t.Emacs.instance.as.well,.by.pla
6ed00 63 69 6e 67 20 74 68 65 20 63 75 72 73 6f 72 0a 61 66 74 65 72 20 74 68 65 20 66 69 6e 61 6c 20 cing.the.cursor.after.the.final.
6ed20 63 6c 6f 73 69 6e 67 20 70 61 72 65 6e 74 68 65 73 69 73 20 61 6e 64 20 74 79 70 69 6e 67 20 e2 closing.parenthesis.and.typing..
6ed40 80 98 43 2d 78 20 43 2d 65 e2 80 99 0a 28 e2 80 98 65 76 61 6c 2d 6c 61 73 74 2d 73 65 78 70 e2 ..C-x.C-e....(...eval-last-sexp.
6ed60 80 99 29 2e 0a 0a 20 20 20 4e 65 78 74 20 61 64 64 20 61 20 6c 69 6e 65 20 6c 69 6b 65 20 74 68 ..)......Next.add.a.line.like.th
6ed80 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 74 6f 20 74 68 65 20 63 68 6f 73 65 6e 20 66 69 6c 65 3a 0a e.following.to.the.chosen.file:.
6eda0 0a 20 20 20 20 20 6d 61 63 68 69 6e 65 20 61 70 69 2e 67 69 74 68 75 62 2e 63 6f 6d 20 6c 6f 67 ......machine.api.github.com.log
6edc0 69 6e 20 55 53 45 52 4e 41 4d 45 5e 66 6f 72 67 65 20 70 61 73 73 77 6f 72 64 20 54 4f 4b 45 4e in.USERNAME^forge.password.TOKEN
6ede0 0a 0a 20 20 20 e2 80 a2 20 54 68 65 20 76 61 6c 75 65 20 6f 66 20 e2 80 98 6d 61 63 68 69 6e 65 .........The.value.of....machine
6ee00 e2 80 99 20 6d 75 73 74 20 62 65 20 e2 80 98 61 70 69 2e 67 69 74 68 75 62 2e 63 6f 6d e2 80 99 ....must.be....api.github.com...
6ee20 2e 20 20 56 61 72 69 61 74 69 6f 6e 73 20 6f 66 0a 20 20 20 20 20 74 68 69 73 20 77 6f 6e e2 80 ...Variations.of......this.won..
6ee40 99 74 20 77 6f 72 6b 2e 0a 0a 20 20 20 e2 80 a2 20 55 53 45 52 4e 41 4d 45 20 6d 75 73 74 20 62 .t.work..........USERNAME.must.b
6ee60 65 20 74 68 65 20 73 61 6d 65 20 61 73 20 74 68 65 20 76 61 6c 75 65 20 75 73 65 64 20 66 6f 72 e.the.same.as.the.value.used.for
6ee80 20 74 68 65 20 e2 80 98 67 69 74 68 75 62 2e 75 73 65 72 e2 80 99 0a 20 20 20 20 20 47 69 74 20 .the....github.user.........Git.
6eea0 76 61 72 69 61 62 6c 65 20 61 62 6f 76 65 2e 20 20 59 6f 75 20 2a 6d 75 73 74 2a 20 61 70 70 65 variable.above...You.*must*.appe
6eec0 6e 64 20 e2 80 98 5e 66 6f 72 67 65 e2 80 99 20 74 6f 20 74 68 61 74 2c 20 77 69 74 68 6f 75 74 nd....^forge....to.that,.without
6eee0 0a 20 20 20 20 20 61 6e 79 20 73 70 61 63 65 20 69 6e 20 62 65 74 77 65 65 6e 2e 0a 0a 20 20 20 ......any.space.in.between......
6ef00 e2 80 a2 20 54 4f 4b 45 4e 20 69 73 20 74 68 65 20 74 6f 6b 65 6e 20 79 6f 75 20 67 65 6e 65 72 ....TOKEN.is.the.token.you.gener
6ef20 61 74 65 64 20 65 61 72 6c 69 65 72 2e 0a 0a 20 20 20 46 69 6e 69 73 68 20 62 79 20 74 79 70 69 ated.earlier......Finish.by.typi
6ef40 6e 67 20 e2 80 98 4d 2d 78 20 61 75 74 68 2d 73 6f 75 72 63 65 2d 66 6f 72 67 65 74 2d 61 6c 6c ng....M-x.auth-source-forget-all
6ef60 2d 63 61 63 68 65 64 20 52 45 54 e2 80 99 2e 20 20 49 66 20 79 6f 75 0a 64 6f 6e e2 80 99 74 20 -cached.RET......If.you.don...t.
6ef80 64 6f 20 74 68 69 73 2c 20 74 68 65 6e 20 41 75 74 68 2d 53 6f 75 72 63 65 20 6d 61 79 20 66 61 do.this,.then.Auth-Source.may.fa
6efa0 69 6c 20 74 6f 20 6c 6f 6f 6b 20 75 70 20 74 68 65 20 74 6f 6b 65 6e 2e 0a 0a 1f 0a 46 69 6c 65 il.to.look.up.the.token.....File
6efc0 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 53 65 74 75 70 20 66 6f 72 20 41 :.forge.info,..Node:.Setup.for.A
6efe0 6e 6f 74 68 65 72 20 47 69 74 68 75 62 20 49 6e 73 74 61 6e 63 65 2c 20 20 4e 65 78 74 3a 20 53 nother.Github.Instance,..Next:.S
6f000 65 74 75 70 20 66 6f 72 20 47 69 74 6c 61 62 63 6f 6d 2c 20 20 50 72 65 76 3a 20 53 65 74 75 70 etup.for.Gitlabcom,..Prev:.Setup
6f020 20 66 6f 72 20 47 69 74 68 75 62 63 6f 6d 2c 20 20 55 70 3a 20 49 6e 69 74 69 61 6c 20 53 65 74 .for.Githubcom,..Up:.Initial.Set
6f040 75 70 0a 0a 32 2e 32 20 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 68 65 72 20 47 69 74 68 75 62 up..2.2.Setup.for.Another.Github
6f060 20 49 6e 73 74 61 6e 63 65 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d .Instance.======================
6f080 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 42 65 66 6f 72 65 20 79 6f 75 20 73 65 74 75 ===============..Before.you.setu
6f0a0 70 20 61 20 47 69 74 68 75 62 20 69 6e 73 74 61 6e 63 65 20 74 68 61 74 20 69 73 20 6e 6f 74 20 p.a.Github.instance.that.is.not.
6f0c0 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 3e 2c 0a 70 6c 65 61 73 65 20 73 65 74 <https://github.com>,.please.set
6f0e0 20 74 68 61 74 20 75 70 20 66 69 72 73 74 2e 20 20 54 68 65 20 73 65 74 75 70 20 66 6f 72 20 3c .that.up.first...The.setup.for.<
6f100 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 3e 20 69 73 20 65 61 73 69 65 72 0a 61 6e https://github.com>.is.easier.an
6f120 64 20 69 66 20 74 68 61 74 20 77 6f 72 6b 73 2c 20 62 75 74 20 74 68 65 20 73 65 74 75 70 20 66 d.if.that.works,.but.the.setup.f
6f140 6f 72 20 74 68 65 20 6f 74 68 65 72 20 47 69 74 68 75 62 20 69 6e 73 74 61 6e 63 65 20 66 61 69 or.the.other.Github.instance.fai
6f160 6c 73 2c 0a 74 68 65 6e 20 77 65 20 63 61 6e 20 74 65 6e 74 61 74 69 76 65 6c 79 20 6e 61 72 72 ls,.then.we.can.tentatively.narr
6f180 6f 77 20 74 68 65 20 69 73 73 75 65 20 64 6f 77 6e 20 74 6f 20 74 68 65 20 70 61 72 74 73 20 74 ow.the.issue.down.to.the.parts.t
6f1a0 68 61 74 20 64 69 66 66 65 72 0a 62 65 74 77 65 65 6e 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 hat.differ.between.<https://gith
6f1c0 75 62 2e 63 6f 6d 3e 20 61 6e 64 20 6f 74 68 65 72 20 69 6e 73 74 61 6e 63 65 73 2e 0a 0a 54 65 ub.com>.and.other.instances...Te
6f1e0 6c 6c 20 46 6f 72 67 65 20 61 62 6f 75 74 20 74 68 65 20 49 6e 73 74 61 6e 63 65 0a 2d 2d 2d 2d ll.Forge.about.the.Instance.----
6f200 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 57 68 69 6c 65 -------------------------..While
6f220 20 46 6f 72 67 65 20 6b 6e 6f 77 73 20 61 62 6f 75 74 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 .Forge.knows.about.<https://gith
6f240 75 62 2e 63 6f 6d 3e 2c 20 69 74 20 64 6f 65 73 20 6e 6f 74 20 6b 6e 6f 77 20 61 62 6f 75 74 0a ub.com>,.it.does.not.know.about.
6f260 79 6f 75 72 20 6f 74 68 65 72 20 47 69 74 68 75 62 20 69 6e 73 74 61 6e 63 65 73 2e 20 20 46 6f your.other.Github.instances...Fo
6f280 72 67 65 20 69 6e 73 74 61 6e 63 65 73 20 61 72 65 20 63 6f 6e 66 69 67 75 72 65 64 20 75 73 69 rge.instances.are.configured.usi
6f2a0 6e 67 20 74 68 65 0a 6f 70 74 69 6f 6e 20 e2 80 98 66 6f 72 67 65 2d 61 6c 69 73 74 e2 80 99 20 ng.the.option....forge-alist....
6f2c0 28 61 6c 73 6f 20 73 65 65 20 69 74 73 20 64 6f 63 73 74 72 69 6e 67 29 2e 20 20 54 68 65 20 65 (also.see.its.docstring)...The.e
6f2e0 6e 74 72 79 20 66 6f 72 0a 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 3e 20 69 6e ntry.for.<https://github.com>.in
6f300 20 74 68 61 74 20 76 61 72 69 61 62 6c 65 20 6c 6f 6f 6b 73 20 6c 69 6b 65 20 74 68 69 73 3a 0a .that.variable.looks.like.this:.
6f320 0a 20 20 20 20 20 28 22 67 69 74 68 75 62 2e 63 6f 6d 22 20 20 20 20 20 20 20 20 20 20 20 20 20 ......("github.com".............
6f340 20 20 20 20 20 20 20 20 20 20 3b 20 47 49 54 48 4f 53 54 0a 20 20 20 20 20 20 22 61 70 69 2e 67 ..........;.GITHOST......."api.g
6f360 69 74 68 75 62 2e 63 6f 6d 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 41 ithub.com"...................;.A
6f380 50 49 48 4f 53 54 0a 20 20 20 20 20 20 22 67 69 74 68 75 62 2e 63 6f 6d 22 20 20 20 20 20 20 20 PIHOST......."github.com".......
6f3a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 57 45 42 48 4f 53 54 20 61 6e 64 20 49 4e ................;.WEBHOST.and.IN
6f3c0 53 54 41 4e 43 45 2d 49 44 0a 20 20 20 20 20 20 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 STANCE-ID........forge-github-re
6f3e0 70 6f 73 69 74 6f 72 79 29 20 20 20 20 20 20 20 20 20 20 3b 20 43 4c 41 53 53 0a 0a 20 20 20 59 pository)..........;.CLASS.....Y
6f400 6f 75 20 68 61 76 65 20 74 6f 20 61 64 64 20 61 6e 20 65 6e 74 72 79 20 66 6f 72 20 79 6f 75 72 ou.have.to.add.an.entry.for.your
6f420 20 69 6e 73 74 61 6e 63 65 2e 20 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c 20 61 73 73 75 6d 69 6e .instance...For.example,.assumin
6f440 67 0a 79 6f 75 20 63 6f 6d 70 61 6e 79 20 75 73 65 73 20 3c 68 74 74 70 73 3a 2f 2f 65 78 61 6d g.you.company.uses.<https://exam
6f460 70 6c 65 2e 63 6f 6d 3e 2c 20 74 68 69 73 20 6d 69 67 68 74 20 62 65 20 63 6f 72 72 65 63 74 3a ple.com>,.this.might.be.correct:
6f480 0a 0a 20 20 20 20 20 28 70 75 73 68 20 27 28 22 65 78 61 6d 70 6c 65 2e 63 6f 6d 22 20 20 20 20 .......(push.'("example.com"....
6f4a0 20 20 20 20 20 20 20 20 20 20 20 3b 20 47 49 54 48 4f 53 54 0a 20 20 20 20 20 20 20 20 20 20 20 ...........;.GITHOST............
6f4c0 20 20 22 61 70 69 2e 65 78 61 6d 70 6c 65 2e 63 6f 6d 22 20 20 20 20 20 20 20 20 20 20 20 3b 20 .."api.example.com"...........;.
6f4e0 41 50 49 48 4f 53 54 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 22 65 78 61 6d 70 6c 65 2e 63 6f APIHOST.............."example.co
6f500 6d 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 57 45 42 48 4f 53 54 20 61 6e 64 20 49 m"...............;.WEBHOST.and.I
6f520 4e 53 54 41 4e 43 45 2d 49 44 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 67 69 NSTANCE-ID..............forge-gi
6f540 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 20 20 20 3b 20 43 4c 41 53 53 0a 20 20 20 20 thub-repository)....;.CLASS.....
6f560 20 20 20 20 20 20 20 66 6f 72 67 65 2d 61 6c 69 73 74 29 0a 0a 20 20 20 59 6f 75 72 20 63 6f 6d .......forge-alist).....Your.com
6f580 70 61 6e 79 20 6d 61 79 20 75 73 65 20 68 6f 73 74 6e 61 6d 65 73 20 74 68 61 74 20 66 6f 6c 6c pany.may.use.hostnames.that.foll
6f5a0 6f 77 20 61 20 64 69 66 66 65 72 65 6e 74 20 66 6f 72 6d 61 74 2e 20 20 59 6f 75 0a 73 68 6f 75 ow.a.different.format...You.shou
6f5c0 6c 64 20 62 65 20 61 62 6c 65 20 74 6f 20 65 61 73 69 6c 79 20 64 65 74 65 72 6d 69 6e 65 20 61 ld.be.able.to.easily.determine.a
6f5e0 6e 64 20 76 65 72 69 66 79 20 47 49 54 48 4f 53 54 20 61 6e 64 20 57 45 42 48 4f 53 54 2c 20 62 nd.verify.GITHOST.and.WEBHOST,.b
6f600 75 74 0a 64 65 74 65 72 6d 69 6e 69 6e 67 20 41 50 49 48 4f 53 54 20 69 73 20 6d 6f 72 65 20 64 ut.determining.APIHOST.is.more.d
6f620 69 66 66 69 63 75 6c 74 3b 20 79 6f 75 20 6d 69 67 68 74 20 68 61 76 65 20 74 6f 20 61 73 6b 20 ifficult;.you.might.have.to.ask.
6f640 61 20 63 6f 77 6f 72 6b 65 72 2e 0a 41 50 49 48 4f 53 54 20 63 6f 75 6c 64 20 62 65 20 73 6f 6d a.coworker..APIHOST.could.be.som
6f660 65 74 68 69 6e 67 20 6c 69 6b 65 20 e2 80 98 61 70 69 2e 65 78 61 6d 70 6c 65 2e 63 6f 6d e2 80 ething.like....api.example.com..
6f680 99 2c 20 62 75 74 20 69 74 20 63 6f 75 6c 64 20 61 6c 73 6f 20 62 65 0a 73 6f 6d 65 74 68 69 6e .,.but.it.could.also.be.somethin
6f6a0 67 20 6c 69 6b 65 20 e2 80 98 65 78 61 6d 70 6c 65 2e 63 6f 6d 2f 61 70 69 e2 80 99 2e 0a 0a 20 g.like....example.com/api.......
6f6c0 20 20 49 66 20 74 68 65 20 52 45 53 54 20 41 50 49 e2 80 99 73 20 65 6e 64 20 70 6f 69 6e 74 20 ..If.the.REST.API...s.end.point.
6f6e0 69 73 20 e2 80 98 2f 76 33 e2 80 99 20 61 6e 64 20 74 68 65 20 47 72 61 70 68 51 4c 20 41 50 49 is..../v3....and.the.GraphQL.API
6f700 e2 80 99 73 20 65 6e 64 20 70 6f 69 6e 74 0a 69 73 20 e2 80 98 2f 67 72 61 70 68 71 6c e2 80 99 ...s.end.point.is..../graphql...
6f720 2c 20 74 68 65 6e 20 75 73 65 20 73 6f 6d 65 74 68 69 6e 67 20 6c 69 6b 65 20 e2 80 98 65 78 61 ,.then.use.something.like....exa
6f740 6d 70 6c 65 2e 63 6f 6d 2f 76 33 e2 80 99 20 61 73 20 41 50 49 48 4f 53 54 2e 0a 54 68 69 73 20 mple.com/v3....as.APIHOST..This.
6f760 69 73 20 61 20 68 69 73 74 6f 72 69 63 20 61 63 63 69 64 65 6e 74 2e 20 20 53 65 65 0a 3c 68 74 is.a.historic.accident...See.<ht
6f780 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6d 61 67 69 74 2f 66 6f 72 67 65 2f 69 73 73 tps://github.com/magit/forge/iss
6f7a0 75 65 73 2f 31 37 34 3e 2e 0a 0a 20 20 20 57 65 20 77 69 6c 6c 20 75 73 65 20 49 4e 53 54 41 4e ues/174>......We.will.use.INSTAN
6f7c0 43 45 2d 49 44 20 28 61 6b 61 20 57 45 42 48 4f 53 54 29 20 61 6e 64 20 41 50 49 48 4f 53 54 20 CE-ID.(aka.WEBHOST).and.APIHOST.
6f7e0 62 65 6c 6f 77 2e 0a 0a 53 65 74 20 79 6f 75 72 20 55 73 65 72 6e 61 6d 65 0a 2d 2d 2d 2d 2d 2d below...Set.your.Username.------
6f800 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 49 6e 66 6f 72 6d 20 46 6f 72 67 65 20 61 62 6f 75 74 20 -----------..Inform.Forge.about.
6f820 79 6f 75 72 20 75 73 65 72 6e 61 6d 65 20 66 6f 72 20 74 68 65 20 47 69 74 68 75 62 20 69 6e 73 your.username.for.the.Github.ins
6f840 74 61 6e 63 65 20 69 6e 20 71 75 65 73 74 69 6f 6e 3a 0a 0a 20 20 20 20 20 67 69 74 20 63 6f 6e tance.in.question:.......git.con
6f860 66 69 67 20 2d 2d 67 6c 6f 62 61 6c 20 67 69 74 68 75 62 2e 49 4e 53 54 41 4e 43 45 2d 49 44 2e fig.--global.github.INSTANCE-ID.
6f880 75 73 65 72 20 55 53 45 52 4e 41 4d 45 0a 0a 20 20 20 53 6f 20 69 66 20 49 4e 53 54 41 4e 43 45 user.USERNAME.....So.if.INSTANCE
6f8a0 2d 49 44 20 69 73 20 e2 80 98 65 78 61 6d 70 6c 65 2e 63 6f 6d e2 80 99 20 61 6e 64 20 55 53 45 -ID.is....example.com....and.USE
6f8c0 52 4e 41 4d 45 20 69 73 20 e2 80 98 74 61 72 73 69 75 73 e2 80 99 20 74 68 65 6e 0a 75 73 65 3a RNAME.is....tarsius....then.use:
6f8e0 0a 0a 20 20 20 20 20 67 69 74 20 63 6f 6e 66 69 67 20 2d 2d 67 6c 6f 62 61 6c 20 67 69 74 68 75 .......git.config.--global.githu
6f900 62 2e 65 78 61 6d 70 6c 65 2e 63 6f 6d 2e 75 73 65 72 20 74 61 72 73 69 75 73 0a 0a 43 72 65 61 b.example.com.user.tarsius..Crea
6f920 74 65 20 61 6e 64 20 53 74 6f 72 65 20 61 6e 20 41 63 63 65 73 73 20 54 6f 6b 65 6e 0a 2d 2d 2d te.and.Store.an.Access.Token.---
6f940 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 56 -----------------------------..V
6f960 69 73 69 74 20 79 6f 75 72 20 66 6f 72 67 65 20 69 6e 20 61 20 62 72 6f 77 73 65 72 2e 20 20 46 isit.your.forge.in.a.browser...F
6f980 6f 6c 6c 6f 77 20 61 20 6c 69 6e 6b 20 74 6f 20 22 53 65 74 74 69 6e 67 73 22 2c 20 66 72 6f 6d ollow.a.link.to."Settings",.from
6f9a0 20 74 68 65 72 65 0a 74 6f 20 22 44 65 76 65 6c 6f 70 65 72 20 73 65 74 74 69 6e 67 73 22 2c 20 .there.to."Developer.settings",.
6f9c0 66 72 6f 6d 20 74 68 65 72 65 20 74 6f 20 22 50 65 72 73 6f 6e 61 6c 20 61 63 63 65 73 73 20 74 from.there.to."Personal.access.t
6f9e0 6f 6b 65 6e 73 22 2c 20 61 6e 64 0a 66 69 6e 61 6c 6c 79 20 74 6f 20 22 54 6f 6b 65 6e 73 20 28 okens",.and.finally.to."Tokens.(
6fa00 63 6c 61 73 73 69 63 29 22 2e 20 20 4f 6e 20 74 68 61 74 20 70 61 67 65 20 67 65 6e 65 72 61 74 classic)"...On.that.page.generat
6fa20 65 20 61 20 6e 65 77 20 74 6f 6b 65 6e 20 75 73 69 6e 67 0a 74 68 65 20 e2 80 98 72 65 70 6f e2 e.a.new.token.using.the....repo.
6fa40 80 99 2c 20 e2 80 98 75 73 65 72 e2 80 99 20 61 6e 64 20 e2 80 98 72 65 61 64 3a 6f 72 67 e2 80 ..,....user....and....read:org..
6fa60 99 20 73 63 6f 70 65 73 2e 20 20 44 6f 20 6e 6f 74 20 63 6c 6f 73 65 20 74 68 65 20 62 72 6f 77 ..scopes...Do.not.close.the.brow
6fa80 73 65 72 0a 77 69 6e 64 6f 77 20 6a 75 73 74 20 79 65 74 2c 20 62 65 63 61 75 73 65 20 74 68 65 ser.window.just.yet,.because.the
6faa0 20 74 6f 6b 65 6e 20 77 69 6c 6c 20 6f 6e 6c 79 20 62 65 20 73 68 6f 77 6e 20 6f 6e 63 65 2e 0a .token.will.only.be.shown.once..
6fac0 0a 20 20 20 54 68 65 20 62 75 69 6c 74 2d 69 6e 20 41 75 74 68 2d 53 6f 75 72 63 65 20 28 2a 6e ....The.built-in.Auth-Source.(*n
6fae0 6f 74 65 20 28 61 75 74 68 29 54 6f 70 3a 3a 29 20 70 61 63 6b 61 67 65 20 69 73 20 75 73 65 64 ote.(auth)Top::).package.is.used
6fb00 20 74 6f 20 73 74 6f 72 65 0a 74 68 65 20 74 6f 6b 65 6e 20 67 65 6e 65 72 61 74 65 64 20 69 6e .to.store.the.token.generated.in
6fb20 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 73 74 65 70 2e 20 20 54 68 65 20 e2 80 98 61 75 74 68 .the.previous.step...The....auth
6fb40 2d 73 6f 75 72 63 65 73 e2 80 99 20 76 61 72 69 61 62 6c 65 0a 63 6f 6e 74 72 6f 6c 73 20 68 6f -sources....variable.controls.ho
6fb60 77 20 61 6e 64 20 77 68 65 72 65 20 41 75 74 68 2d 53 6f 75 72 63 65 20 6b 65 65 70 73 20 69 74 w.and.where.Auth-Source.keeps.it
6fb80 73 20 73 65 63 72 65 74 73 2e 20 20 54 68 65 20 64 65 66 61 75 6c 74 20 76 61 6c 75 65 0a 69 73 s.secrets...The.default.value.is
6fba0 20 61 20 6c 69 73 74 20 6f 66 20 74 68 72 65 65 20 66 69 6c 65 73 3a 20 e2 80 98 28 22 7e 2f 2e .a.list.of.three.files:....("~/.
6fbc0 61 75 74 68 69 6e 66 6f 22 20 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 70 67 22 0a 22 7e 2f 2e authinfo"."~/.authinfo.gpg"."~/.
6fbe0 6e 65 74 72 63 22 29 e2 80 99 2c 20 62 75 74 20 74 68 61 74 20 63 61 6e 20 6c 65 61 64 20 74 6f netrc")...,.but.that.can.lead.to
6fc00 20 63 6f 6e 66 75 73 69 6e 67 20 62 65 68 61 76 69 6f 72 2c 20 73 6f 20 79 6f 75 20 73 68 6f 75 .confusing.behavior,.so.you.shou
6fc20 6c 64 0a 6d 61 6b 65 20 73 75 72 65 20 74 68 61 74 20 6f 6e 6c 79 20 6f 6e 65 20 6f 66 20 74 68 ld.make.sure.that.only.one.of.th
6fc40 65 73 65 20 66 69 6c 65 73 20 65 78 69 73 74 73 2c 20 61 6e 64 20 74 68 65 6e 20 79 6f 75 20 73 ese.files.exists,.and.then.you.s
6fc60 68 6f 75 6c 64 20 61 6c 73 6f 0a 61 64 6a 75 73 74 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 hould.also.adjust.the.value.of.t
6fc80 68 65 20 76 61 72 69 61 62 6c 65 20 74 6f 20 6f 6e 6c 79 20 65 76 65 72 20 75 73 65 20 74 68 61 he.variable.to.only.ever.use.tha
6fca0 74 20 66 69 6c 65 2c 20 66 6f 72 0a 65 78 61 6d 70 6c 65 3a 0a 0a 20 20 20 20 20 28 73 65 74 71 t.file,.for.example:.......(setq
6fcc0 20 61 75 74 68 2d 73 6f 75 72 63 65 73 20 27 28 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 22 29 29 0a .auth-sources.'("~/.authinfo")).
6fce0 0a 20 20 20 49 6e 20 e2 80 98 7e 2f 2e 61 75 74 68 69 6e 66 6f e2 80 99 20 73 65 63 72 65 74 73 ....In....~/.authinfo....secrets
6fd00 20 61 72 65 20 73 74 6f 72 65 64 20 69 6e 20 70 6c 61 69 6e 20 74 65 78 74 2e 20 20 49 66 20 79 .are.stored.in.plain.text...If.y
6fd20 6f 75 20 64 6f 6e e2 80 99 74 20 77 61 6e 74 0a 74 68 61 74 2c 20 74 68 65 6e 20 79 6f 75 20 73 ou.don...t.want.that,.then.you.s
6fd40 68 6f 75 6c 64 20 75 73 65 20 74 68 65 20 65 6e 63 72 79 70 74 65 64 20 e2 80 98 7e 2f 2e 61 75 hould.use.the.encrypted....~/.au
6fd60 74 68 69 6e 66 6f 2e 67 70 67 e2 80 99 20 69 6e 73 74 65 61 64 3a 0a 0a 20 20 20 20 20 28 73 65 thinfo.gpg....instead:.......(se
6fd80 74 71 20 61 75 74 68 2d 73 6f 75 72 63 65 73 20 27 28 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 tq.auth-sources.'("~/.authinfo.g
6fda0 70 67 22 29 29 0a 0a 20 20 20 4d 61 6b 65 20 73 75 72 65 20 79 6f 75 20 70 75 74 20 6f 6e 65 20 pg")).....Make.sure.you.put.one.
6fdc0 6f 66 20 74 68 65 73 65 20 66 6f 72 6d 73 20 69 6e 20 79 6f 75 72 20 69 6e 69 74 20 66 69 6c 65 of.these.forms.in.your.init.file
6fde0 20 2a 61 6e 64 2a 20 74 6f 0a 65 76 61 6c 75 61 74 65 20 69 74 20 69 6e 20 74 68 65 20 63 75 72 .*and*.to.evaluate.it.in.the.cur
6fe00 72 65 6e 74 20 45 6d 61 63 73 20 69 6e 73 74 61 6e 63 65 20 61 73 20 77 65 6c 6c 2c 20 62 79 20 rent.Emacs.instance.as.well,.by.
6fe20 70 6c 61 63 69 6e 67 20 74 68 65 20 63 75 72 73 6f 72 0a 61 66 74 65 72 20 74 68 65 20 66 69 6e placing.the.cursor.after.the.fin
6fe40 61 6c 20 63 6c 6f 73 69 6e 67 20 70 61 72 65 6e 74 68 65 73 69 73 20 61 6e 64 20 74 79 70 69 6e al.closing.parenthesis.and.typin
6fe60 67 20 e2 80 98 43 2d 78 20 43 2d 65 e2 80 99 0a 28 e2 80 98 65 76 61 6c 2d 6c 61 73 74 2d 73 65 g....C-x.C-e....(...eval-last-se
6fe80 78 70 e2 80 99 29 2e 0a 0a 20 20 20 4e 65 78 74 20 61 64 64 20 61 20 6c 69 6e 65 20 6c 69 6b 65 xp...)......Next.add.a.line.like
6fea0 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 74 6f 20 74 68 65 20 63 68 6f 73 65 6e 20 66 69 6c .the.following.to.the.chosen.fil
6fec0 65 3a 0a 0a 20 20 20 20 20 6d 61 63 68 69 6e 65 20 41 50 49 48 4f 53 54 20 6c 6f 67 69 6e 20 55 e:.......machine.APIHOST.login.U
6fee0 53 45 52 4e 41 4d 45 5e 66 6f 72 67 65 20 70 61 73 73 77 6f 72 64 20 54 4f 4b 45 4e 0a 0a 20 20 SERNAME^forge.password.TOKEN....
6ff00 20 e2 80 a2 20 41 50 49 48 4f 53 54 20 6d 75 73 74 20 62 65 20 74 68 65 20 73 61 6d 65 20 61 73 .....APIHOST.must.be.the.same.as
6ff20 20 74 68 65 20 73 65 63 6f 6e 64 20 65 6c 65 6d 65 6e 74 20 6f 66 20 74 68 65 20 65 6e 74 72 79 .the.second.element.of.the.entry
6ff40 20 77 65 0a 20 20 20 20 20 61 64 64 65 64 20 74 6f 20 e2 80 98 66 6f 72 67 65 2d 61 6c 69 73 74 .we......added.to....forge-alist
6ff60 e2 80 99 2e 20 20 49 6e 20 74 68 65 20 61 62 6f 76 65 20 65 78 61 6d 70 6c 65 20 74 68 61 74 20 ......In.the.above.example.that.
6ff80 77 6f 75 6c 64 20 62 65 0a 20 20 20 20 20 e2 80 98 61 70 69 2e 65 78 61 6d 70 6c 65 2e 63 6f 6d would.be.........api.example.com
6ffa0 e2 80 99 2e 20 20 44 6f 20 2a 6e 6f 74 2a 20 69 6e 73 74 65 61 64 20 75 73 65 20 47 49 54 48 4f ......Do.*not*.instead.use.GITHO
6ffc0 53 54 20 6f 72 20 49 4e 53 54 41 4e 43 45 2d 49 44 0a 20 20 20 20 20 28 61 6b 61 20 57 45 42 48 ST.or.INSTANCE-ID......(aka.WEBH
6ffe0 4f 53 54 29 2e 0a 0a 20 20 20 e2 80 a2 20 55 53 45 52 4e 41 4d 45 20 6d 75 73 74 20 62 65 20 74 OST)..........USERNAME.must.be.t
70000 68 65 20 73 61 6d 65 20 75 73 65 72 6e 61 6d 65 20 79 6f 75 20 75 73 65 64 20 61 62 6f 76 65 20 he.same.username.you.used.above.
70020 61 73 20 74 68 65 20 76 61 6c 75 65 20 6f 66 0a 20 20 20 20 20 74 68 65 20 47 69 74 20 76 61 72 as.the.value.of......the.Git.var
70040 69 61 62 6c 65 2e 20 20 59 6f 75 20 2a 6d 75 73 74 2a 20 61 70 70 65 6e 64 20 e2 80 98 5e 66 6f iable...You.*must*.append....^fo
70060 72 67 65 e2 80 99 20 74 6f 20 74 68 61 74 2c 20 77 69 74 68 6f 75 74 20 61 6e 79 0a 20 20 20 20 rge....to.that,.without.any.....
70080 20 73 70 61 63 65 20 69 6e 20 62 65 74 77 65 65 6e 2e 0a 0a 20 20 20 e2 80 a2 20 54 4f 4b 45 4e .space.in.between..........TOKEN
700a0 20 69 73 20 74 68 65 20 74 6f 6b 65 6e 20 79 6f 75 20 67 65 6e 65 72 61 74 65 64 20 65 61 72 6c .is.the.token.you.generated.earl
700c0 69 65 72 2e 0a 0a 20 20 20 46 69 6e 69 73 68 20 62 79 20 74 79 70 69 6e 67 20 e2 80 98 4d 2d 78 ier......Finish.by.typing....M-x
700e0 20 61 75 74 68 2d 73 6f 75 72 63 65 2d 66 6f 72 67 65 74 2d 61 6c 6c 2d 63 61 63 68 65 64 20 52 .auth-source-forget-all-cached.R
70100 45 54 e2 80 99 2e 20 20 49 66 20 79 6f 75 0a 64 6f 6e e2 80 99 74 20 64 6f 20 74 68 69 73 2c 20 ET......If.you.don...t.do.this,.
70120 74 68 65 6e 20 41 75 74 68 2d 53 6f 75 72 63 65 20 6d 61 79 20 66 61 69 6c 20 74 6f 20 6c 6f 6f then.Auth-Source.may.fail.to.loo
70140 6b 20 75 70 20 74 68 65 20 74 6f 6b 65 6e 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 k.up.the.token.....File:.forge.i
70160 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 53 65 74 75 70 20 66 6f 72 20 47 69 74 6c 61 62 63 6f 6d 2c nfo,..Node:.Setup.for.Gitlabcom,
70180 20 20 4e 65 78 74 3a 20 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 68 65 72 20 47 69 74 6c 61 62 ..Next:.Setup.for.Another.Gitlab
701a0 20 49 6e 73 74 61 6e 63 65 2c 20 20 50 72 65 76 3a 20 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 .Instance,..Prev:.Setup.for.Anot
701c0 68 65 72 20 47 69 74 68 75 62 20 49 6e 73 74 61 6e 63 65 2c 20 20 55 70 3a 20 49 6e 69 74 69 61 her.Github.Instance,..Up:.Initia
701e0 6c 20 53 65 74 75 70 0a 0a 32 2e 33 20 53 65 74 75 70 20 66 6f 72 20 47 69 74 6c 61 62 2e 63 6f l.Setup..2.3.Setup.for.Gitlab.co
70200 6d 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 53 65 74 20 m.========================..Set.
70220 79 6f 75 72 20 55 73 65 72 6e 61 6d 65 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a your.Username.-----------------.
70240 0a 46 69 72 73 74 20 69 6e 66 6f 72 6d 20 46 6f 72 67 65 20 61 62 6f 75 74 20 79 6f 75 72 20 3c .First.inform.Forge.about.your.<
70260 68 74 74 70 73 3a 2f 2f 67 69 74 6c 61 62 2e 63 6f 6d 3e 20 75 73 65 72 6e 61 6d 65 3a 0a 0a 20 https://gitlab.com>.username:...
70280 20 20 20 20 67 69 74 20 63 6f 6e 66 69 67 20 2d 2d 67 6c 6f 62 61 6c 20 67 69 74 6c 61 62 2e 75 ....git.config.--global.gitlab.u
702a0 73 65 72 20 55 53 45 52 4e 41 4d 45 0a 0a 20 20 20 49 66 20 79 6f 75 20 6e 65 65 64 20 74 6f 20 ser.USERNAME.....If.you.need.to.
702c0 69 64 65 6e 74 69 66 79 20 61 73 20 61 6e 6f 74 68 65 72 20 75 73 65 72 20 69 6e 20 61 20 70 61 identify.as.another.user.in.a.pa
702e0 72 74 69 63 75 6c 61 72 20 72 65 70 6f 73 69 74 6f 72 79 2c 0a 74 68 65 6e 20 79 6f 75 20 68 61 rticular.repository,.then.you.ha
70300 76 65 20 74 6f 20 73 65 74 20 74 68 61 74 20 76 61 72 69 61 62 6c 65 20 6c 6f 63 61 6c 6c 79 3a ve.to.set.that.variable.locally:
70320 0a 0a 20 20 20 20 20 63 64 20 2f 70 61 74 68 2f 74 6f 2f 72 65 70 6f 0a 20 20 20 20 20 67 69 74 .......cd./path/to/repo......git
70340 20 63 6f 6e 66 69 67 20 2d 2d 6c 6f 63 61 6c 20 67 69 74 6c 61 62 2e 75 73 65 72 20 55 53 45 52 .config.--local.gitlab.user.USER
70360 4e 41 4d 45 0a 0a 43 72 65 61 74 65 20 61 6e 64 20 53 74 6f 72 65 20 61 6e 20 41 63 63 65 73 73 NAME..Create.and.Store.an.Access
70380 20 54 6f 6b 65 6e 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d .Token.-------------------------
703a0 2d 2d 2d 2d 2d 2d 2d 0a 0a 56 69 73 69 74 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 6c 61 62 2e 63 -------..Visit.<https://gitlab.c
703c0 6f 6d 2f 2d 2f 75 73 65 72 5f 73 65 74 74 69 6e 67 73 2f 70 65 72 73 6f 6e 61 6c 5f 61 63 63 65 om/-/user_settings/personal_acce
703e0 73 73 5f 74 6f 6b 65 6e 73 3e 20 69 6e 20 61 0a 62 72 6f 77 73 65 72 20 74 6f 20 67 65 6e 65 72 ss_tokens>.in.a.browser.to.gener
70400 61 74 65 20 61 20 6e 65 77 20 74 6f 6b 65 6e 20 75 73 69 6e 67 20 74 68 65 20 e2 80 98 61 70 69 ate.a.new.token.using.the....api
70420 e2 80 99 2c 20 e2 80 98 72 65 61 64 5f 61 70 69 e2 80 99 20 61 6e 64 0a e2 80 98 72 65 61 64 5f ...,....read_api....and....read_
70440 75 73 65 72 e2 80 99 20 73 63 6f 70 65 73 2e 20 20 44 6f 20 6e 6f 74 20 63 6c 6f 73 65 20 74 68 user....scopes...Do.not.close.th
70460 65 20 62 72 6f 77 73 65 72 20 77 69 6e 64 6f 77 20 6a 75 73 74 20 79 65 74 2c 20 62 65 63 61 75 e.browser.window.just.yet,.becau
70480 73 65 0a 74 68 65 20 74 6f 6b 65 6e 20 77 69 6c 6c 20 6f 6e 6c 79 20 62 65 20 73 68 6f 77 6e 20 se.the.token.will.only.be.shown.
704a0 6f 6e 63 65 2e 0a 0a 20 20 20 54 68 65 20 62 75 69 6c 74 2d 69 6e 20 41 75 74 68 2d 53 6f 75 72 once......The.built-in.Auth-Sour
704c0 63 65 20 28 2a 6e 6f 74 65 20 28 61 75 74 68 29 54 6f 70 3a 3a 29 20 70 61 63 6b 61 67 65 20 69 ce.(*note.(auth)Top::).package.i
704e0 73 20 75 73 65 64 20 74 6f 20 73 74 6f 72 65 0a 74 68 65 20 74 6f 6b 65 6e 20 67 65 6e 65 72 61 s.used.to.store.the.token.genera
70500 74 65 64 20 69 6e 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 73 74 65 70 2e 20 20 54 68 65 20 e2 ted.in.the.previous.step...The..
70520 80 98 61 75 74 68 2d 73 6f 75 72 63 65 73 e2 80 99 20 76 61 72 69 61 62 6c 65 0a 63 6f 6e 74 72 ..auth-sources....variable.contr
70540 6f 6c 73 20 68 6f 77 20 61 6e 64 20 77 68 65 72 65 20 41 75 74 68 2d 53 6f 75 72 63 65 20 6b 65 ols.how.and.where.Auth-Source.ke
70560 65 70 73 20 69 74 73 20 73 65 63 72 65 74 73 2e 20 20 54 68 65 20 64 65 66 61 75 6c 74 20 76 61 eps.its.secrets...The.default.va
70580 6c 75 65 0a 69 73 20 61 20 6c 69 73 74 20 6f 66 20 74 68 72 65 65 20 66 69 6c 65 73 3a 20 e2 80 lue.is.a.list.of.three.files:...
705a0 98 28 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 22 20 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 70 67 .("~/.authinfo"."~/.authinfo.gpg
705c0 22 0a 22 7e 2f 2e 6e 65 74 72 63 22 29 e2 80 99 2c 20 62 75 74 20 74 68 61 74 20 63 61 6e 20 6c "."~/.netrc")...,.but.that.can.l
705e0 65 61 64 20 74 6f 20 63 6f 6e 66 75 73 69 6e 67 20 62 65 68 61 76 69 6f 72 2c 20 73 6f 20 79 6f ead.to.confusing.behavior,.so.yo
70600 75 20 73 68 6f 75 6c 64 0a 6d 61 6b 65 20 73 75 72 65 20 74 68 61 74 20 6f 6e 6c 79 20 6f 6e 65 u.should.make.sure.that.only.one
70620 20 6f 66 20 74 68 65 73 65 20 66 69 6c 65 73 20 65 78 69 73 74 73 2c 20 61 6e 64 20 74 68 65 6e .of.these.files.exists,.and.then
70640 20 79 6f 75 20 73 68 6f 75 6c 64 20 61 6c 73 6f 0a 61 64 6a 75 73 74 20 74 68 65 20 76 61 6c 75 .you.should.also.adjust.the.valu
70660 65 20 6f 66 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 74 6f 20 6f 6e 6c 79 20 65 76 65 72 20 75 e.of.the.variable.to.only.ever.u
70680 73 65 20 74 68 61 74 20 66 69 6c 65 2c 20 66 6f 72 0a 65 78 61 6d 70 6c 65 3a 0a 0a 20 20 20 20 se.that.file,.for.example:......
706a0 20 28 73 65 74 71 20 61 75 74 68 2d 73 6f 75 72 63 65 73 20 27 28 22 7e 2f 2e 61 75 74 68 69 6e .(setq.auth-sources.'("~/.authin
706c0 66 6f 22 29 29 0a 0a 20 20 20 49 6e 20 e2 80 98 7e 2f 2e 61 75 74 68 69 6e 66 6f e2 80 99 20 73 fo")).....In....~/.authinfo....s
706e0 65 63 72 65 74 73 20 61 72 65 20 73 74 6f 72 65 64 20 69 6e 20 70 6c 61 69 6e 20 74 65 78 74 2e ecrets.are.stored.in.plain.text.
70700 20 20 49 66 20 79 6f 75 20 64 6f 6e e2 80 99 74 20 77 61 6e 74 0a 74 68 61 74 2c 20 74 68 65 6e ..If.you.don...t.want.that,.then
70720 20 79 6f 75 20 73 68 6f 75 6c 64 20 75 73 65 20 74 68 65 20 65 6e 63 72 79 70 74 65 64 20 e2 80 .you.should.use.the.encrypted...
70740 98 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 70 67 e2 80 99 20 69 6e 73 74 65 61 64 3a 0a 0a 20 20 .~/.authinfo.gpg....instead:....
70760 20 20 20 28 73 65 74 71 20 61 75 74 68 2d 73 6f 75 72 63 65 73 20 27 28 22 7e 2f 2e 61 75 74 68 ...(setq.auth-sources.'("~/.auth
70780 69 6e 66 6f 2e 67 70 67 22 29 29 0a 0a 20 20 20 4d 61 6b 65 20 73 75 72 65 20 79 6f 75 20 70 75 info.gpg")).....Make.sure.you.pu
707a0 74 20 6f 6e 65 20 6f 66 20 74 68 65 73 65 20 66 6f 72 6d 73 20 69 6e 20 79 6f 75 72 20 69 6e 69 t.one.of.these.forms.in.your.ini
707c0 74 20 66 69 6c 65 20 2a 61 6e 64 2a 20 74 6f 0a 65 76 61 6c 75 61 74 65 20 69 74 20 69 6e 20 74 t.file.*and*.to.evaluate.it.in.t
707e0 68 65 20 63 75 72 72 65 6e 74 20 45 6d 61 63 73 20 69 6e 73 74 61 6e 63 65 20 61 73 20 77 65 6c he.current.Emacs.instance.as.wel
70800 6c 2c 20 62 79 20 70 6c 61 63 69 6e 67 20 74 68 65 20 63 75 72 73 6f 72 0a 61 66 74 65 72 20 74 l,.by.placing.the.cursor.after.t
70820 68 65 20 66 69 6e 61 6c 20 63 6c 6f 73 69 6e 67 20 70 61 72 65 6e 74 68 65 73 69 73 20 61 6e 64 he.final.closing.parenthesis.and
70840 20 74 79 70 69 6e 67 20 e2 80 98 43 2d 78 20 43 2d 65 e2 80 99 0a 28 e2 80 98 65 76 61 6c 2d 6c .typing....C-x.C-e....(...eval-l
70860 61 73 74 2d 73 65 78 70 e2 80 99 29 2e 0a 0a 20 20 20 4e 65 78 74 20 61 64 64 20 61 20 6c 69 6e ast-sexp...)......Next.add.a.lin
70880 65 20 6c 69 6b 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 74 6f 20 74 68 65 20 63 68 6f 73 e.like.the.following.to.the.chos
708a0 65 6e 20 66 69 6c 65 3a 0a 0a 20 20 20 20 20 6d 61 63 68 69 6e 65 20 67 69 74 6c 61 62 2e 63 6f en.file:.......machine.gitlab.co
708c0 6d 20 6c 6f 67 69 6e 20 55 53 45 52 4e 41 4d 45 5e 66 6f 72 67 65 20 70 61 73 73 77 6f 72 64 20 m.login.USERNAME^forge.password.
708e0 54 4f 4b 45 4e 0a 0a 20 20 20 e2 80 a2 20 54 68 65 20 76 61 6c 75 65 20 6f 66 20 e2 80 98 6d 61 TOKEN.........The.value.of....ma
70900 63 68 69 6e 65 e2 80 99 20 73 68 6f 75 6c 64 20 62 65 20 e2 80 98 67 69 74 6c 61 62 2e 63 6f 6d chine....should.be....gitlab.com
70920 e2 80 99 2e 20 20 46 6f 72 20 68 69 73 74 6f 72 69 63 0a 20 20 20 20 20 72 65 61 73 6f 6e 73 20 ......For.historic......reasons.
70940 e2 80 98 67 69 74 6c 61 62 2e 63 6f 6d e2 80 99 20 69 73 20 61 6c 73 6f 20 73 75 70 70 6f 72 74 ...gitlab.com....is.also.support
70960 65 64 2e 0a 0a 20 20 20 e2 80 a2 20 4e 6f 74 65 20 74 68 61 74 20 69 66 20 79 6f 75 20 69 6e 73 ed..........Note.that.if.you.ins
70980 74 65 61 64 20 75 73 65 20 74 68 65 20 e2 80 98 61 75 74 68 2d 73 6f 75 72 63 65 2d 70 61 73 73 tead.use.the....auth-source-pass
709a0 e2 80 99 20 62 61 63 6b 65 6e 64 2c 20 74 68 65 6e 0a 20 20 20 20 20 79 6f 75 20 2a 6d 75 73 74 ....backend,.then......you.*must
709c0 2a 20 75 73 65 20 e2 80 98 67 69 74 6c 61 62 2e 63 6f 6d e2 80 99 20 61 73 20 e2 80 98 68 6f 73 *.use....gitlab.com....as....hos
709e0 74 e2 80 99 2e 0a 0a 20 20 20 e2 80 a2 20 55 53 45 52 4e 41 4d 45 20 6d 75 73 74 20 62 65 20 74 t.............USERNAME.must.be.t
70a00 68 65 20 73 61 6d 65 20 61 73 20 74 68 65 20 76 61 6c 75 65 20 75 73 65 64 20 66 6f 72 20 74 68 he.same.as.the.value.used.for.th
70a20 65 20 e2 80 98 67 69 74 6c 61 62 2e 75 73 65 72 e2 80 99 0a 20 20 20 20 20 47 69 74 20 76 61 72 e....gitlab.user.........Git.var
70a40 69 61 62 6c 65 20 61 62 6f 76 65 2e 20 20 59 6f 75 20 2a 6d 75 73 74 2a 20 61 70 70 65 6e 64 20 iable.above...You.*must*.append.
70a60 e2 80 98 5e 66 6f 72 67 65 e2 80 99 20 74 6f 20 74 68 61 74 2c 20 77 69 74 68 6f 75 74 0a 20 20 ...^forge....to.that,.without...
70a80 20 20 20 61 6e 79 20 73 70 61 63 65 20 69 6e 20 62 65 74 77 65 65 6e 2e 0a 0a 20 20 20 e2 80 a2 ...any.space.in.between.........
70aa0 20 54 4f 4b 45 4e 20 69 73 20 74 68 65 20 74 6f 6b 65 6e 20 79 6f 75 20 67 65 6e 65 72 61 74 65 .TOKEN.is.the.token.you.generate
70ac0 64 20 65 61 72 6c 69 65 72 2e 0a 0a 20 20 20 46 69 6e 69 73 68 20 62 79 20 74 79 70 69 6e 67 20 d.earlier......Finish.by.typing.
70ae0 e2 80 98 4d 2d 78 20 61 75 74 68 2d 73 6f 75 72 63 65 2d 66 6f 72 67 65 74 2d 61 6c 6c 2d 63 61 ...M-x.auth-source-forget-all-ca
70b00 63 68 65 64 20 52 45 54 e2 80 99 2e 20 20 49 66 20 79 6f 75 0a 64 6f 6e e2 80 99 74 20 64 6f 20 ched.RET......If.you.don...t.do.
70b20 74 68 69 73 2c 20 74 68 65 6e 20 41 75 74 68 2d 53 6f 75 72 63 65 20 6d 61 79 20 66 61 69 6c 20 this,.then.Auth-Source.may.fail.
70b40 74 6f 20 6c 6f 6f 6b 20 75 70 20 74 68 65 20 74 6f 6b 65 6e 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 to.look.up.the.token.....File:.f
70b60 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 orge.info,..Node:.Setup.for.Anot
70b80 68 65 72 20 47 69 74 6c 61 62 20 49 6e 73 74 61 6e 63 65 2c 20 20 4e 65 78 74 3a 20 53 65 74 75 her.Gitlab.Instance,..Next:.Setu
70ba0 70 20 61 20 50 61 72 74 69 61 6c 6c 79 20 53 75 70 70 6f 72 74 65 64 20 48 6f 73 74 2c 20 20 50 p.a.Partially.Supported.Host,..P
70bc0 72 65 76 3a 20 53 65 74 75 70 20 66 6f 72 20 47 69 74 6c 61 62 63 6f 6d 2c 20 20 55 70 3a 20 49 rev:.Setup.for.Gitlabcom,..Up:.I
70be0 6e 69 74 69 61 6c 20 53 65 74 75 70 0a 0a 32 2e 34 20 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 nitial.Setup..2.4.Setup.for.Anot
70c00 68 65 72 20 47 69 74 6c 61 62 20 49 6e 73 74 61 6e 63 65 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d her.Gitlab.Instance.============
70c20 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 42 65 66 6f 72 =========================..Befor
70c40 65 20 79 6f 75 20 73 65 74 75 70 20 61 20 47 69 74 6c 61 62 20 69 6e 73 74 61 6e 63 65 20 74 68 e.you.setup.a.Gitlab.instance.th
70c60 61 74 20 69 73 20 6e 6f 74 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 6c 61 62 2e 63 6f 6d 3e 2c 0a at.is.not.<https://gitlab.com>,.
70c80 70 6c 65 61 73 65 20 73 65 74 20 74 68 61 74 20 75 70 20 66 69 72 73 74 2e 20 20 54 68 65 20 73 please.set.that.up.first...The.s
70ca0 65 74 75 70 20 66 6f 72 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 6c 61 62 2e 63 6f 6d 3e 20 69 73 etup.for.<https://gitlab.com>.is
70cc0 20 65 61 73 69 65 72 0a 61 6e 64 20 69 66 20 74 68 61 74 20 77 6f 72 6b 73 2c 20 62 75 74 20 74 .easier.and.if.that.works,.but.t
70ce0 68 65 20 73 65 74 75 70 20 66 6f 72 20 74 68 65 20 6f 74 68 65 72 20 47 69 74 6c 61 62 20 69 6e he.setup.for.the.other.Gitlab.in
70d00 73 74 61 6e 63 65 20 66 61 69 6c 73 2c 0a 74 68 65 6e 20 77 65 20 63 61 6e 20 74 65 6e 74 61 74 stance.fails,.then.we.can.tentat
70d20 69 76 65 6c 79 20 6e 61 72 72 6f 77 20 74 68 65 20 69 73 73 75 65 20 64 6f 77 6e 20 74 6f 20 74 ively.narrow.the.issue.down.to.t
70d40 68 65 20 70 61 72 74 73 20 74 68 61 74 20 64 69 66 66 65 72 0a 62 65 74 77 65 65 6e 20 3c 68 74 he.parts.that.differ.between.<ht
70d60 74 70 73 3a 2f 2f 67 69 74 6c 61 62 2e 63 6f 6d 3e 20 61 6e 64 20 6f 74 68 65 72 20 69 6e 73 74 tps://gitlab.com>.and.other.inst
70d80 61 6e 63 65 73 2e 0a 0a 54 65 6c 6c 20 46 6f 72 67 65 20 61 62 6f 75 74 20 74 68 65 20 49 6e 73 ances...Tell.Forge.about.the.Ins
70da0 74 61 6e 63 65 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d tance.--------------------------
70dc0 2d 2d 2d 0a 0a 57 68 69 6c 65 20 46 6f 72 67 65 20 6b 6e 6f 77 73 20 61 62 6f 75 74 20 3c 68 74 ---..While.Forge.knows.about.<ht
70de0 74 70 73 3a 2f 2f 67 69 74 6c 61 62 2e 63 6f 6d 3e 20 28 61 6e 64 20 61 20 66 65 77 20 6f 74 68 tps://gitlab.com>.(and.a.few.oth
70e00 65 72 20 77 65 6c 6c 2d 6b 6e 6f 77 6e 0a 69 6e 73 74 61 6e 63 65 73 2c 20 73 65 65 20 69 74 73 er.well-known.instances,.see.its
70e20 20 76 61 6c 75 65 29 20 69 74 20 68 61 73 20 74 6f 20 62 65 20 74 61 75 67 68 74 20 61 62 6f 75 .value).it.has.to.be.taught.abou
70e40 74 20 6f 74 68 65 72 20 47 69 74 6c 61 62 0a 69 6e 73 74 61 6e 63 65 73 2e 20 20 46 6f 72 67 65 t.other.Gitlab.instances...Forge
70e60 20 69 6e 73 74 61 6e 63 65 73 20 61 72 65 20 63 6f 6e 66 69 67 75 72 65 64 20 75 73 69 6e 67 20 .instances.are.configured.using.
70e80 74 68 65 20 6f 70 74 69 6f 6e 0a e2 80 98 66 6f 72 67 65 2d 61 6c 69 73 74 e2 80 99 20 28 61 6c the.option....forge-alist....(al
70ea0 73 6f 20 73 65 65 20 69 74 73 20 64 6f 63 73 74 72 69 6e 67 29 2e 20 20 54 68 65 20 65 6e 74 72 so.see.its.docstring)...The.entr
70ec0 79 20 66 6f 72 0a 3c 68 74 74 70 73 3a 2f 2f 67 69 74 6c 61 62 2e 63 6f 6d 3e 20 69 6e 20 74 68 y.for.<https://gitlab.com>.in.th
70ee0 61 74 20 76 61 72 69 61 62 6c 65 20 6c 6f 6f 6b 73 20 6c 69 6b 65 20 74 68 69 73 3a 0a 0a 20 20 at.variable.looks.like.this:....
70f00 20 20 20 28 22 67 69 74 6c 61 62 2e 63 6f 6d 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...("gitlab.com"................
70f20 20 20 20 20 20 20 20 3b 20 47 49 54 48 4f 53 54 0a 20 20 20 20 20 20 22 67 69 74 6c 61 62 2e 63 .......;.GITHOST......."gitlab.c
70f40 6f 6d 2f 61 70 69 2f 76 34 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 41 50 49 48 om/api/v4"................;.APIH
70f60 4f 53 54 0a 20 20 20 20 20 20 22 67 69 74 6c 61 62 2e 63 6f 6d 22 20 20 20 20 20 20 20 20 20 20 OST......."gitlab.com"..........
70f80 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 57 45 42 48 4f 53 54 20 61 6e 64 20 49 4e 53 54 41 .............;.WEBHOST.and.INSTA
70fa0 4e 43 45 2d 49 44 0a 20 20 20 20 20 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 NCE-ID.......forge-gitlab-reposi
70fc0 74 6f 72 79 29 20 20 20 20 20 20 20 20 20 20 20 3b 20 43 4c 41 53 53 0a 0a 20 20 20 46 6f 72 20 tory)...........;.CLASS.....For.
70fe0 68 69 73 74 6f 72 69 63 20 72 65 61 73 6f 6e 73 2c 20 41 50 49 48 4f 53 54 20 61 63 74 75 61 6c historic.reasons,.APIHOST.actual
71000 6c 79 20 68 61 73 20 74 6f 20 62 65 20 61 20 68 6f 73 74 20 66 6f 6c 6c 6f 77 65 64 20 62 79 20 ly.has.to.be.a.host.followed.by.
71020 61 0a 70 61 74 68 2e 0a 0a 20 20 20 59 6f 75 20 68 61 76 65 20 74 6f 20 61 64 64 20 61 6e 20 65 a.path......You.have.to.add.an.e
71040 6e 74 72 79 20 66 6f 72 20 79 6f 75 72 20 69 6e 73 74 61 6e 63 65 2e 20 20 46 6f 72 20 65 78 61 ntry.for.your.instance...For.exa
71060 6d 70 6c 65 2c 20 61 73 73 75 6d 69 6e 67 0a 79 6f 75 20 63 6f 6d 70 61 6e 79 2f 6f 72 67 61 6e mple,.assuming.you.company/organ
71080 69 73 61 74 69 6f 6e 20 75 73 65 73 20 3c 68 74 74 70 73 3a 2f 2f 65 78 61 6d 70 6c 65 2e 63 6f isation.uses.<https://example.co
710a0 6d 3e 2c 20 74 68 69 73 20 6d 69 67 68 74 20 62 65 0a 63 6f 72 72 65 63 74 3a 0a 0a 20 20 20 20 m>,.this.might.be.correct:......
710c0 20 28 70 75 73 68 20 27 28 22 65 78 61 6d 70 6c 65 2e 63 6f 6d 22 20 20 20 20 20 20 20 20 20 20 .(push.'("example.com"..........
710e0 20 20 20 20 20 3b 20 47 49 54 48 4f 53 54 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 22 65 78 61 .....;.GITHOST.............."exa
71100 6d 70 6c 65 2e 63 6f 6d 2f 61 70 69 2f 76 34 22 20 20 20 20 20 20 20 20 3b 20 41 50 49 48 4f 53 mple.com/api/v4"........;.APIHOS
71120 54 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 22 65 78 61 6d 70 6c 65 2e 63 6f 6d 22 20 20 20 20 T.............."example.com"....
71140 20 20 20 20 20 20 20 20 20 20 20 3b 20 57 45 42 48 4f 53 54 20 61 6e 64 20 49 4e 53 54 41 4e 43 ...........;.WEBHOST.and.INSTANC
71160 45 2d 49 44 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 E-ID..............forge-gitlab-r
71180 65 70 6f 73 69 74 6f 72 79 29 20 20 20 20 3b 20 43 4c 41 53 53 0a 20 20 20 20 20 20 20 20 20 20 epository)....;.CLASS...........
711a0 20 66 6f 72 67 65 2d 61 6c 69 73 74 29 0a 0a 20 20 20 59 6f 75 72 20 63 6f 6d 70 61 6e 79 20 6d .forge-alist).....Your.company.m
711c0 61 79 20 75 73 65 20 68 6f 73 74 6e 61 6d 65 73 20 74 68 61 74 20 66 6f 6c 6c 6f 77 20 61 20 64 ay.use.hostnames.that.follow.a.d
711e0 69 66 66 65 72 65 6e 74 20 66 6f 72 6d 61 74 2e 20 20 59 6f 75 0a 73 68 6f 75 6c 64 20 62 65 20 ifferent.format...You.should.be.
71200 61 62 6c 65 20 74 6f 20 65 61 73 69 6c 79 20 64 65 74 65 72 6d 69 6e 65 20 61 6e 64 20 76 65 72 able.to.easily.determine.and.ver
71220 69 66 79 20 47 49 54 48 4f 53 54 20 61 6e 64 20 57 45 42 48 4f 53 54 2c 20 62 75 74 0a 64 65 74 ify.GITHOST.and.WEBHOST,.but.det
71240 65 72 6d 69 6e 69 6e 67 20 41 50 49 48 4f 53 54 20 69 73 20 6d 6f 72 65 20 64 69 66 66 69 63 75 ermining.APIHOST.is.more.difficu
71260 6c 74 3b 20 79 6f 75 20 6d 69 67 68 74 20 68 61 76 65 20 74 6f 20 61 73 6b 20 61 0a 63 6f 6c 6c lt;.you.might.have.to.ask.a.coll
71280 65 61 67 75 65 2e 0a 0a 20 20 20 57 65 20 77 69 6c 6c 20 75 73 65 20 49 4e 53 54 41 4e 43 45 2d eague......We.will.use.INSTANCE-
712a0 49 44 20 28 61 6b 61 20 57 45 42 48 4f 53 54 29 20 61 6e 64 20 41 50 49 48 4f 53 54 20 62 65 6c ID.(aka.WEBHOST).and.APIHOST.bel
712c0 6f 77 2e 0a 0a 53 65 74 20 79 6f 75 72 20 55 73 65 72 6e 61 6d 65 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d ow...Set.your.Username.---------
712e0 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 49 6e 66 6f 72 6d 20 46 6f 72 67 65 20 61 62 6f 75 74 20 79 6f 75 --------..Inform.Forge.about.you
71300 72 20 75 73 65 72 6e 61 6d 65 20 66 6f 72 20 74 68 65 20 47 69 74 6c 61 62 20 69 6e 73 74 61 6e r.username.for.the.Gitlab.instan
71320 63 65 20 69 6e 20 71 75 65 73 74 69 6f 6e 3a 0a 0a 20 20 20 20 20 67 69 74 20 63 6f 6e 66 69 67 ce.in.question:.......git.config
71340 20 2d 2d 67 6c 6f 62 61 6c 20 67 69 74 6c 61 62 2e 49 4e 53 54 41 4e 43 45 2d 49 44 2e 75 73 65 .--global.gitlab.INSTANCE-ID.use
71360 72 20 55 53 45 52 4e 41 4d 45 0a 0a 20 20 20 53 6f 20 69 66 20 49 4e 53 54 41 4e 43 45 2d 49 44 r.USERNAME.....So.if.INSTANCE-ID
71380 20 69 73 20 e2 80 98 65 78 61 6d 70 6c 65 2e 63 6f 6d e2 80 99 20 61 6e 64 20 55 53 45 52 4e 41 .is....example.com....and.USERNA
713a0 4d 45 20 69 73 20 e2 80 98 74 61 72 73 69 75 73 e2 80 99 20 74 68 65 6e 0a 75 73 65 3a 0a 0a 20 ME.is....tarsius....then.use:...
713c0 20 20 20 20 67 69 74 20 63 6f 6e 66 69 67 20 2d 2d 67 6c 6f 62 61 6c 20 67 69 74 6c 61 62 2e 65 ....git.config.--global.gitlab.e
713e0 78 61 6d 70 6c 65 2e 63 6f 6d 2e 75 73 65 72 20 74 61 72 73 69 75 73 0a 0a 43 72 65 61 74 65 20 xample.com.user.tarsius..Create.
71400 61 6e 64 20 53 74 6f 72 65 20 61 6e 20 41 63 63 65 73 73 20 54 6f 6b 65 6e 0a 2d 2d 2d 2d 2d 2d and.Store.an.Access.Token.------
71420 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 56 69 73 69 --------------------------..Visi
71440 74 20 79 6f 75 72 20 66 6f 72 67 65 20 69 6e 20 61 20 62 72 6f 77 73 65 72 2e 20 20 46 6f 6c 6c t.your.forge.in.a.browser...Foll
71460 6f 77 20 61 20 6c 69 6e 6b 20 74 6f 20 22 50 72 65 66 65 72 65 6e 63 65 73 22 20 61 6e 64 20 66 ow.a.link.to."Preferences".and.f
71480 72 6f 6d 0a 74 68 65 72 65 20 74 6f 20 22 41 63 63 65 73 73 20 54 6f 6b 65 6e 73 22 2e 20 20 4f rom.there.to."Access.Tokens"...O
714a0 6e 20 74 68 61 74 20 70 61 67 65 20 67 65 6e 65 72 61 74 65 20 61 20 6e 65 77 20 22 50 65 72 73 n.that.page.generate.a.new."Pers
714c0 6f 6e 61 6c 20 61 63 63 65 73 73 0a 74 6f 6b 65 6e 22 20 75 73 69 6e 67 20 74 68 65 20 e2 80 98 onal.access.token".using.the....
714e0 61 70 69 e2 80 99 2c 20 e2 80 98 72 65 61 64 5f 61 70 69 e2 80 99 20 61 6e 64 20 e2 80 98 72 65 api...,....read_api....and....re
71500 61 64 5f 75 73 65 72 e2 80 99 20 73 63 6f 70 65 73 2e 20 20 44 6f 20 6e 6f 74 20 63 6c 6f 73 65 ad_user....scopes...Do.not.close
71520 0a 74 68 65 20 62 72 6f 77 73 65 72 20 77 69 6e 64 6f 77 20 6a 75 73 74 20 79 65 74 2c 20 62 65 .the.browser.window.just.yet,.be
71540 63 61 75 73 65 20 74 68 65 20 74 6f 6b 65 6e 20 77 69 6c 6c 20 6f 6e 6c 79 20 62 65 20 73 68 6f cause.the.token.will.only.be.sho
71560 77 6e 20 6f 6e 63 65 2e 0a 0a 20 20 20 54 68 65 20 62 75 69 6c 74 2d 69 6e 20 41 75 74 68 2d 53 wn.once......The.built-in.Auth-S
71580 6f 75 72 63 65 20 28 2a 6e 6f 74 65 20 28 61 75 74 68 29 54 6f 70 3a 3a 29 20 70 61 63 6b 61 67 ource.(*note.(auth)Top::).packag
715a0 65 20 69 73 20 75 73 65 64 20 74 6f 20 73 74 6f 72 65 0a 74 68 65 20 74 6f 6b 65 6e 20 67 65 6e e.is.used.to.store.the.token.gen
715c0 65 72 61 74 65 64 20 69 6e 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 73 74 65 70 2e 20 20 54 68 erated.in.the.previous.step...Th
715e0 65 20 e2 80 98 61 75 74 68 2d 73 6f 75 72 63 65 73 e2 80 99 20 76 61 72 69 61 62 6c 65 0a 63 6f e....auth-sources....variable.co
71600 6e 74 72 6f 6c 73 20 68 6f 77 20 61 6e 64 20 77 68 65 72 65 20 41 75 74 68 2d 53 6f 75 72 63 65 ntrols.how.and.where.Auth-Source
71620 20 6b 65 65 70 73 20 69 74 73 20 73 65 63 72 65 74 73 2e 20 20 54 68 65 20 64 65 66 61 75 6c 74 .keeps.its.secrets...The.default
71640 20 76 61 6c 75 65 0a 69 73 20 61 20 6c 69 73 74 20 6f 66 20 74 68 72 65 65 20 66 69 6c 65 73 3a .value.is.a.list.of.three.files:
71660 20 e2 80 98 28 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 22 20 22 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e ....("~/.authinfo"."~/.authinfo.
71680 67 70 67 22 0a 22 7e 2f 2e 6e 65 74 72 63 22 29 e2 80 99 2c 20 62 75 74 20 74 68 61 74 20 63 61 gpg"."~/.netrc")...,.but.that.ca
716a0 6e 20 6c 65 61 64 20 74 6f 20 63 6f 6e 66 75 73 69 6e 67 20 62 65 68 61 76 69 6f 72 2c 20 73 6f n.lead.to.confusing.behavior,.so
716c0 20 79 6f 75 20 73 68 6f 75 6c 64 0a 6d 61 6b 65 20 73 75 72 65 20 74 68 61 74 20 6f 6e 6c 79 20 .you.should.make.sure.that.only.
716e0 6f 6e 65 20 6f 66 20 74 68 65 73 65 20 66 69 6c 65 73 20 65 78 69 73 74 73 2c 20 61 6e 64 20 74 one.of.these.files.exists,.and.t
71700 68 65 6e 20 79 6f 75 20 73 68 6f 75 6c 64 20 61 6c 73 6f 0a 61 64 6a 75 73 74 20 74 68 65 20 76 hen.you.should.also.adjust.the.v
71720 61 6c 75 65 20 6f 66 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 74 6f 20 6f 6e 6c 79 20 65 76 65 alue.of.the.variable.to.only.eve
71740 72 20 75 73 65 20 74 68 61 74 20 66 69 6c 65 2c 20 66 6f 72 0a 65 78 61 6d 70 6c 65 3a 0a 0a 20 r.use.that.file,.for.example:...
71760 20 20 20 20 28 73 65 74 71 20 61 75 74 68 2d 73 6f 75 72 63 65 73 20 27 28 22 7e 2f 2e 61 75 74 ....(setq.auth-sources.'("~/.aut
71780 68 69 6e 66 6f 22 29 29 0a 0a 20 20 20 49 6e 20 e2 80 98 7e 2f 2e 61 75 74 68 69 6e 66 6f e2 80 hinfo")).....In....~/.authinfo..
717a0 99 20 73 65 63 72 65 74 73 20 61 72 65 20 73 74 6f 72 65 64 20 69 6e 20 70 6c 61 69 6e 20 74 65 ..secrets.are.stored.in.plain.te
717c0 78 74 2e 20 20 49 66 20 79 6f 75 20 64 6f 6e e2 80 99 74 20 77 61 6e 74 0a 74 68 61 74 2c 20 74 xt...If.you.don...t.want.that,.t
717e0 68 65 6e 20 79 6f 75 20 73 68 6f 75 6c 64 20 75 73 65 20 74 68 65 20 65 6e 63 72 79 70 74 65 64 hen.you.should.use.the.encrypted
71800 20 e2 80 98 7e 2f 2e 61 75 74 68 69 6e 66 6f 2e 67 70 67 e2 80 99 20 69 6e 73 74 65 61 64 3a 0a ....~/.authinfo.gpg....instead:.
71820 0a 20 20 20 20 20 28 73 65 74 71 20 61 75 74 68 2d 73 6f 75 72 63 65 73 20 27 28 22 7e 2f 2e 61 ......(setq.auth-sources.'("~/.a
71840 75 74 68 69 6e 66 6f 2e 67 70 67 22 29 29 0a 0a 20 20 20 4d 61 6b 65 20 73 75 72 65 20 79 6f 75 uthinfo.gpg")).....Make.sure.you
71860 20 70 75 74 20 6f 6e 65 20 6f 66 20 74 68 65 73 65 20 66 6f 72 6d 73 20 69 6e 20 79 6f 75 72 20 .put.one.of.these.forms.in.your.
71880 69 6e 69 74 20 66 69 6c 65 20 2a 61 6e 64 2a 20 74 6f 0a 65 76 61 6c 75 61 74 65 20 69 74 20 69 init.file.*and*.to.evaluate.it.i
718a0 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 45 6d 61 63 73 20 69 6e 73 74 61 6e 63 65 20 61 73 20 n.the.current.Emacs.instance.as.
718c0 77 65 6c 6c 2c 20 62 79 20 70 6c 61 63 69 6e 67 20 74 68 65 20 63 75 72 73 6f 72 0a 61 66 74 65 well,.by.placing.the.cursor.afte
718e0 72 20 74 68 65 20 66 69 6e 61 6c 20 63 6c 6f 73 69 6e 67 20 70 61 72 65 6e 74 68 65 73 69 73 20 r.the.final.closing.parenthesis.
71900 61 6e 64 20 74 79 70 69 6e 67 20 e2 80 98 43 2d 78 20 43 2d 65 e2 80 99 0a 28 e2 80 98 65 76 61 and.typing....C-x.C-e....(...eva
71920 6c 2d 6c 61 73 74 2d 73 65 78 70 e2 80 99 29 2e 0a 0a 20 20 20 4e 65 78 74 20 61 64 64 20 61 20 l-last-sexp...)......Next.add.a.
71940 6c 69 6e 65 20 6c 69 6b 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 74 6f 20 74 68 65 20 63 line.like.the.following.to.the.c
71960 68 6f 73 65 6e 20 66 69 6c 65 3a 0a 0a 20 20 20 20 20 6d 61 63 68 69 6e 65 20 41 50 49 48 4f 53 hosen.file:.......machine.APIHOS
71980 54 20 6c 6f 67 69 6e 20 55 53 45 52 4e 41 4d 45 5e 66 6f 72 67 65 20 70 61 73 73 77 6f 72 64 20 T.login.USERNAME^forge.password.
719a0 54 4f 4b 45 4e 0a 0a 20 20 20 e2 80 a2 20 41 50 49 48 4f 53 54 20 6d 75 73 74 20 62 65 20 65 69 TOKEN.........APIHOST.must.be.ei
719c0 74 68 65 72 20 74 68 65 20 73 61 6d 65 20 61 73 20 74 68 65 20 73 65 63 6f 6e 64 20 65 6c 65 6d ther.the.same.as.the.second.elem
719e0 65 6e 74 20 6f 66 20 74 68 65 20 65 6e 74 72 79 0a 20 20 20 20 20 77 65 20 61 64 64 65 64 20 74 ent.of.the.entry......we.added.t
71a00 6f 20 e2 80 98 66 6f 72 67 65 2d 61 6c 69 73 74 e2 80 99 2c 20 6f 72 20 74 68 61 74 20 65 6c 65 o....forge-alist...,.or.that.ele
71a20 6d 65 6e 74 20 77 69 74 68 20 74 68 65 20 70 61 74 68 20 73 75 66 66 69 78 0a 20 20 20 20 20 72 ment.with.the.path.suffix......r
71a40 65 6d 6f 76 65 64 2e 20 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c 20 69 66 20 74 68 65 20 41 50 49 emoved...For.example,.if.the.API
71a60 48 4f 53 54 2c 20 73 70 65 63 69 66 69 65 64 20 69 6e 20 61 6e 0a 20 20 20 20 20 e2 80 98 66 6f HOST,.specified.in.an.........fo
71a80 72 67 65 2d 61 6c 69 73 74 e2 80 99 20 65 6e 74 72 79 2c 20 69 73 20 e2 80 98 65 78 61 6d 70 6c rge-alist....entry,.is....exampl
71aa0 65 2e 63 6f 6d 2f 61 70 69 2f 76 34 e2 80 99 2c 20 74 68 65 6e 20 79 6f 75 20 63 61 6e 20 75 73 e.com/api/v4...,.then.you.can.us
71ac0 65 0a 20 20 20 20 20 e2 80 98 65 78 61 6d 70 6c 65 2e 63 6f 6d 2f 61 70 69 2f 76 34 e2 80 99 20 e.........example.com/api/v4....
71ae0 6f 72 20 e2 80 98 65 78 61 6d 70 6c 65 2e 63 6f 6d e2 80 99 2e 0a 0a 20 20 20 20 20 48 69 73 74 or....example.com...........Hist
71b00 6f 72 69 63 61 6c 6c 79 20 6f 6e 6c 79 20 74 68 65 20 66 6f 72 6d 65 72 20 77 61 73 20 73 75 70 orically.only.the.former.was.sup
71b20 70 6f 72 74 65 64 2c 20 62 75 74 20 74 68 61 74 20 77 61 73 20 61 20 64 65 73 69 67 6e 0a 20 20 ported,.but.that.was.a.design...
71b40 20 20 20 6d 69 73 74 61 6b 65 2c 20 77 68 69 63 68 20 77 65 20 61 72 65 20 6e 6f 77 20 73 74 75 ...mistake,.which.we.are.now.stu
71b60 63 6b 20 77 69 74 68 2c 20 61 6e 64 20 75 73 69 6e 67 20 6a 75 73 74 20 e2 80 98 65 78 61 6d 70 ck.with,.and.using.just....examp
71b80 6c 65 2e 63 6f 6d e2 80 99 0a 20 20 20 20 20 61 73 20 41 50 49 48 4f 53 54 20 69 6e 20 e2 80 98 le.com.........as.APIHOST.in....
71ba0 7e 2f 2e 61 75 74 68 73 6f 75 72 63 65 e2 80 99 20 69 73 20 6e 6f 77 20 72 65 63 6f 6d 6d 65 6e ~/.authsource....is.now.recommen
71bc0 64 65 64 2e 20 20 46 6f 72 20 74 68 65 20 74 69 6d 65 0a 20 20 20 20 20 62 65 69 6e 67 2c 20 69 ded...For.the.time......being,.i
71be0 6e 20 e2 80 98 66 6f 72 67 65 2d 61 6c 69 73 74 e2 80 99 20 79 6f 75 20 6d 75 73 74 20 73 74 69 n....forge-alist....you.must.sti
71c00 6c 6c 20 61 6c 77 61 79 73 20 75 73 65 0a 20 20 20 20 20 e2 80 98 65 78 61 6d 70 6c 65 2e 63 6f ll.always.use.........example.co
71c20 6d 2f 61 70 69 2f 76 34 e2 80 99 20 61 73 20 41 50 49 48 4f 53 54 2e 0a 0a 20 20 20 20 20 49 66 m/api/v4....as.APIHOST........If
71c40 20 79 6f 75 20 69 6e 73 74 65 61 64 20 75 73 65 20 74 68 65 20 e2 80 98 61 75 74 68 2d 73 6f 75 .you.instead.use.the....auth-sou
71c60 72 63 65 2d 70 61 73 73 e2 80 99 20 62 61 63 6b 65 6e 64 2c 20 74 68 65 6e 20 79 6f 75 20 2a 6d rce-pass....backend,.then.you.*m
71c80 75 73 74 2a 0a 20 20 20 20 20 75 73 65 20 e2 80 98 65 78 61 6d 70 6c 65 2e 63 6f 6d e2 80 99 20 ust*......use....example.com....
71ca0 61 73 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 e2 80 98 68 6f 73 74 e2 80 99 2e 20 20 55 73 69 as.the.value.of....host......Usi
71cc0 6e 67 0a 20 20 20 20 20 e2 80 98 65 78 61 6d 70 6c 65 2e 63 6f 6d 2f 61 70 69 2f 76 34 e2 80 99 ng.........example.com/api/v4...
71ce0 20 64 6f 65 73 20 6e 6f 74 20 77 6f 72 6b 20 77 69 74 68 20 74 68 61 74 20 62 61 63 6b 65 6e 64 .does.not.work.with.that.backend
71d00 2e 0a 0a 20 20 20 e2 80 a2 20 55 53 45 52 4e 41 4d 45 20 6d 75 73 74 20 62 65 20 74 68 65 20 73 ..........USERNAME.must.be.the.s
71d20 61 6d 65 20 75 73 65 72 6e 61 6d 65 20 79 6f 75 20 75 73 65 64 20 61 62 6f 76 65 20 61 73 20 74 ame.username.you.used.above.as.t
71d40 68 65 20 76 61 6c 75 65 20 6f 66 0a 20 20 20 20 20 74 68 65 20 47 69 74 20 76 61 72 69 61 62 6c he.value.of......the.Git.variabl
71d60 65 2e 20 20 59 6f 75 20 2a 6d 75 73 74 2a 20 61 70 70 65 6e 64 20 e2 80 98 5e 66 6f 72 67 65 e2 e...You.*must*.append....^forge.
71d80 80 99 20 74 6f 20 74 68 61 74 2c 20 77 69 74 68 6f 75 74 20 61 6e 79 0a 20 20 20 20 20 73 70 61 ...to.that,.without.any......spa
71da0 63 65 20 69 6e 20 62 65 74 77 65 65 6e 2e 0a 0a 20 20 20 e2 80 a2 20 54 4f 4b 45 4e 20 69 73 20 ce.in.between..........TOKEN.is.
71dc0 74 68 65 20 74 6f 6b 65 6e 20 79 6f 75 20 67 65 6e 65 72 61 74 65 64 20 65 61 72 6c 69 65 72 2e the.token.you.generated.earlier.
71de0 0a 0a 20 20 20 46 69 6e 69 73 68 20 62 79 20 74 79 70 69 6e 67 20 e2 80 98 4d 2d 78 20 61 75 74 .....Finish.by.typing....M-x.aut
71e00 68 2d 73 6f 75 72 63 65 2d 66 6f 72 67 65 74 2d 61 6c 6c 2d 63 61 63 68 65 64 20 52 45 54 e2 80 h-source-forget-all-cached.RET..
71e20 99 2e 20 20 49 66 20 79 6f 75 0a 64 6f 6e e2 80 99 74 20 64 6f 20 74 68 69 73 2c 20 74 68 65 6e ....If.you.don...t.do.this,.then
71e40 20 41 75 74 68 2d 53 6f 75 72 63 65 20 6d 61 79 20 66 61 69 6c 20 74 6f 20 6c 6f 6f 6b 20 75 70 .Auth-Source.may.fail.to.look.up
71e60 20 74 68 65 20 74 6f 6b 65 6e 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c .the.token.....File:.forge.info,
71e80 20 20 4e 6f 64 65 3a 20 53 65 74 75 70 20 61 20 50 61 72 74 69 61 6c 6c 79 20 53 75 70 70 6f 72 ..Node:.Setup.a.Partially.Suppor
71ea0 74 65 64 20 48 6f 73 74 2c 20 20 50 72 65 76 3a 20 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 68 ted.Host,..Prev:.Setup.for.Anoth
71ec0 65 72 20 47 69 74 6c 61 62 20 49 6e 73 74 61 6e 63 65 2c 20 20 55 70 3a 20 49 6e 69 74 69 61 6c er.Gitlab.Instance,..Up:.Initial
71ee0 20 53 65 74 75 70 0a 0a 32 2e 35 20 53 65 74 75 70 20 61 20 50 61 72 74 69 61 6c 6c 79 20 53 75 .Setup..2.5.Setup.a.Partially.Su
71f00 70 70 6f 72 74 65 64 20 48 6f 73 74 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d pported.Host.===================
71f20 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 46 6f 72 67 65 20 63 75 72 72 65 6e 74 =================..Forge.current
71f40 6c 79 20 6f 6e 6c 79 20 73 75 70 70 6f 72 74 73 20 74 68 65 20 47 69 74 68 75 62 20 61 6e 64 20 ly.only.supports.the.Github.and.
71f60 47 69 74 6c 61 62 20 41 50 49 73 2e 0a 0a 20 20 20 49 74 20 64 6f 65 73 20 68 6f 77 65 76 65 72 Gitlab.APIs......It.does.however
71f80 20 70 61 72 74 69 61 6c 6c 79 20 73 75 70 70 6f 72 74 20 61 20 66 65 77 20 61 64 64 69 74 69 6f .partially.support.a.few.additio
71fa0 6e 61 6c 20 66 6f 72 67 65 20 74 79 70 65 73 20 28 73 65 65 0a 2a 6e 6f 74 65 20 50 61 72 74 69 nal.forge.types.(see.*note.Parti
71fc0 61 6c 6c 79 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 3a 3a 29 20 61 6e 64 20 6f 74 68 ally.Supported.Forges::).and.oth
71fe0 65 72 20 6c 69 67 68 74 65 72 20 77 65 69 67 68 74 20 73 6f 66 74 77 61 72 65 0a 75 73 65 64 20 er.lighter.weight.software.used.
72000 74 6f 20 68 6f 73 74 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2c 20 77 68 69 63 68 20 to.host.Git.repositories,.which.
72020 61 6c 73 6f 20 70 72 6f 76 69 64 65 20 61 20 77 65 62 20 69 6e 74 65 72 66 61 63 65 73 20 28 73 also.provide.a.web.interfaces.(s
72040 65 65 0a 2a 6e 6f 74 65 20 53 75 70 70 6f 72 74 65 64 20 53 65 6d 69 2d 46 6f 72 67 65 73 3a 3a ee.*note.Supported.Semi-Forges::
72060 29 2e 20 20 46 6f 72 67 65 20 64 6f 65 73 6e e2 80 99 74 20 75 73 65 20 74 68 65 20 41 50 49 73 )...Forge.doesn...t.use.the.APIs
72080 20 6f 66 20 73 75 63 68 0a 66 6f 72 67 65 73 2c 20 62 75 74 20 72 65 67 69 73 74 65 72 69 6e 67 .of.such.forges,.but.registering
720a0 20 74 68 65 20 68 6f 73 74 20 61 6e 64 20 61 64 64 69 6e 67 20 72 65 70 6f 73 69 74 6f 72 69 65 .the.host.and.adding.repositorie
720c0 73 20 74 6f 20 74 68 65 20 6c 6f 63 61 6c 0a 64 61 74 61 62 61 73 65 20 61 74 20 6c 65 61 73 74 s.to.the.local.database.at.least
720e0 20 65 6e 61 62 6c 65 73 20 74 68 65 20 75 73 65 20 6f 66 20 63 6f 6d 6d 61 6e 64 73 20 73 75 63 .enables.the.use.of.commands.suc
72100 68 20 61 73 20 e2 80 98 66 6f 72 67 65 2d 62 72 6f 77 73 65 e2 80 99 2e 0a 0a 54 65 6c 6c 20 46 h.as....forge-browse......Tell.F
72120 6f 72 67 65 20 61 62 6f 75 74 20 74 68 65 20 49 6e 73 74 61 6e 63 65 0a 2d 2d 2d 2d 2d 2d 2d 2d orge.about.the.Instance.--------
72140 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 41 20 66 65 77 20 68 6f 73 ---------------------..A.few.hos
72160 74 73 2c 20 77 68 69 63 68 20 75 73 65 20 70 61 72 74 69 61 6c 6c 79 20 73 75 70 70 6f 72 74 65 ts,.which.use.partially.supporte
72180 64 20 66 6f 72 67 65 20 74 79 70 65 73 2c 20 61 72 65 20 61 76 61 69 6c 61 62 6c 65 0a 6f 75 74 d.forge.types,.are.available.out
721a0 2d 6f 66 2d 74 68 65 2d 62 6f 78 2c 20 62 65 63 61 75 73 65 20 74 68 65 79 20 68 61 76 65 20 61 -of-the-box,.because.they.have.a
721c0 6e 20 65 6e 74 72 79 20 69 6e 20 74 68 65 20 64 65 66 61 75 6c 74 20 76 61 6c 75 65 20 6f 66 0a n.entry.in.the.default.value.of.
721e0 6f 70 74 69 6f 6e 20 e2 80 98 66 6f 72 67 65 2d 61 6c 69 73 74 e2 80 99 20 28 61 6c 73 6f 20 73 option....forge-alist....(also.s
72200 65 65 20 69 74 73 20 64 6f 63 73 74 72 69 6e 67 29 2e 20 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c ee.its.docstring)...For.example,
72220 20 74 68 65 20 65 6e 74 72 79 0a 66 6f 72 20 3c 68 74 74 70 73 3a 2f 2f 63 6f 64 65 62 65 72 67 .the.entry.for.<https://codeberg
72240 2e 6f 72 67 3e 20 69 6e 20 74 68 61 74 20 76 61 72 69 61 62 6c 65 20 6c 6f 6f 6b 73 20 6c 69 6b .org>.in.that.variable.looks.lik
72260 65 20 74 68 69 73 3a 0a 0a 20 20 20 20 20 28 22 63 6f 64 65 62 65 72 67 2e 6f 72 67 22 20 20 20 e.this:.......("codeberg.org"...
72280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 47 49 54 48 4f 53 54 0a 20 20 20 20 ..................;.GITHOST.....
722a0 20 20 22 63 6f 64 65 62 65 72 67 2e 6f 72 67 2f 61 70 69 2f 76 31 22 20 20 20 20 20 20 20 20 20 .."codeberg.org/api/v1".........
722c0 20 20 20 20 20 3b 20 41 50 49 48 4f 53 54 0a 20 20 20 20 20 20 22 63 6f 64 65 62 65 72 67 2e 6f .....;.APIHOST......."codeberg.o
722e0 72 67 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 57 45 42 48 4f 53 rg".....................;.WEBHOS
72300 54 20 61 6e 64 20 49 4e 53 54 41 4e 43 45 2d 49 44 0a 20 20 20 20 20 20 66 6f 72 67 65 2d 67 69 T.and.INSTANCE-ID.......forge-gi
72320 74 65 61 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 43 4c 41 tea-repository)............;.CLA
72340 53 53 0a 0a 20 20 20 54 6f 20 62 65 20 61 62 6c 65 20 74 6f 20 61 64 64 20 72 65 70 6f 73 69 74 SS.....To.be.able.to.add.reposit
72360 6f 72 69 65 73 20 66 72 6f 6d 20 61 2c 20 73 6f 20 66 61 72 2c 20 75 6e 6b 6e 6f 77 6e 20 66 6f ories.from.a,.so.far,.unknown.fo
72380 72 67 65 20 69 6e 73 74 61 6e 63 65 0a 74 6f 20 79 6f 75 72 20 6c 6f 63 61 6c 20 64 61 74 61 62 rge.instance.to.your.local.datab
723a0 61 73 65 2c 20 79 6f 75 20 68 61 76 65 20 74 6f 20 61 64 64 20 61 6e 20 65 6e 74 72 79 20 66 6f ase,.you.have.to.add.an.entry.fo
723c0 72 20 74 68 61 74 20 69 6e 73 74 61 6e 63 65 20 74 6f 0a e2 80 98 66 6f 72 67 65 2d 61 6c 69 73 r.that.instance.to....forge-alis
723e0 74 e2 80 99 2e 20 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c 20 61 73 73 75 6d 69 6e 67 20 79 6f 75 t......For.example,.assuming.you
72400 20 75 73 65 20 61 6e 6f 74 68 65 72 20 47 69 74 65 61 20 69 6e 73 74 61 6e 63 65 2c 0a 68 6f 73 .use.another.Gitea.instance,.hos
72420 74 65 64 20 61 74 20 3c 68 74 74 70 73 3a 2f 2f 65 78 61 6d 70 6c 65 2e 63 6f 6d 3e 2c 20 74 68 ted.at.<https://example.com>,.th
72440 69 73 20 6d 69 67 68 74 20 62 65 20 63 6f 72 72 65 63 74 3a 0a 0a 20 20 20 20 20 28 70 75 73 68 is.might.be.correct:.......(push
72460 20 27 28 22 65 78 61 6d 70 6c 65 2e 63 6f 6d 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b .'("example.com"...............;
72480 20 47 49 54 48 4f 53 54 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 22 65 78 61 6d 70 6c 65 2e 63 .GITHOST.............."example.c
724a0 6f 6d 2f 61 70 69 2f 76 31 22 20 20 20 20 20 20 20 20 3b 20 41 50 49 48 4f 53 54 0a 20 20 20 20 om/api/v1"........;.APIHOST.....
724c0 20 20 20 20 20 20 20 20 20 22 65 78 61 6d 70 6c 65 2e 63 6f 6d 22 20 20 20 20 20 20 20 20 20 20 ........."example.com"..........
724e0 20 20 20 20 20 3b 20 57 45 42 48 4f 53 54 20 61 6e 64 20 49 4e 53 54 41 4e 43 45 2d 49 44 0a 20 .....;.WEBHOST.and.INSTANCE-ID..
72500 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 67 69 74 65 61 2d 72 65 70 6f 73 69 74 6f ............forge-gitea-reposito
72520 72 79 29 20 20 20 20 20 3b 20 43 4c 41 53 53 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 ry).....;.CLASS............forge
72540 2d 61 6c 69 73 74 29 0a 0a 20 20 20 4c 6f 6f 6b 20 61 74 20 e2 80 98 66 6f 72 67 65 2d 61 6c 69 -alist).....Look.at....forge-ali
72560 73 74 e2 80 99 20 65 6e 74 72 69 65 73 20 6f 66 20 6f 74 68 65 72 20 68 6f 73 74 73 20 75 73 69 st....entries.of.other.hosts.usi
72580 6e 67 20 74 68 65 20 73 61 6d 65 20 66 6f 72 67 65 0a 74 79 70 65 20 61 73 20 74 68 65 20 69 6e ng.the.same.forge.type.as.the.in
725a0 73 74 61 6e 63 65 20 79 6f 75 20 61 72 65 20 63 6f 6e 66 69 67 75 72 69 6e 67 2c 20 74 6f 20 73 stance.you.are.configuring,.to.s
725c0 65 65 20 77 68 61 74 20 66 6f 72 6d 61 74 20 2a 6d 69 67 68 74 2a 20 62 65 0a 61 70 70 72 6f 70 ee.what.format.*might*.be.approp
725e0 72 69 61 74 65 2e 20 20 59 6f 75 20 73 68 6f 75 6c 64 20 62 65 20 61 62 6c 65 20 74 6f 20 65 61 riate...You.should.be.able.to.ea
72600 73 69 6c 79 20 64 65 74 65 72 6d 69 6e 65 20 61 6e 64 20 76 65 72 69 66 79 20 47 49 54 48 4f 53 sily.determine.and.verify.GITHOS
72620 54 0a 61 6e 64 20 57 45 42 48 4f 53 54 2c 20 62 75 74 20 64 65 74 65 72 6d 69 6e 69 6e 67 20 41 T.and.WEBHOST,.but.determining.A
72640 50 49 48 4f 53 54 20 69 73 20 6d 6f 72 65 20 64 69 66 66 69 63 75 6c 74 3b 20 79 6f 75 20 6d 69 PIHOST.is.more.difficult;.you.mi
72660 67 68 74 20 68 61 76 65 0a 74 6f 20 61 73 6b 20 61 20 63 6f 6c 6c 65 61 67 75 65 2e 20 20 41 50 ght.have.to.ask.a.colleague...AP
72680 49 48 4f 53 54 20 63 6f 75 6c 64 20 62 65 20 73 6f 6d 65 74 68 69 6e 67 20 6c 69 6b 65 0a e2 80 IHOST.could.be.something.like...
726a0 98 65 78 61 6d 70 6c 65 2e 63 6f 6d 2f 61 70 69 2f 76 69 e2 80 99 2c 20 62 75 74 20 69 74 20 63 .example.com/api/vi...,.but.it.c
726c0 6f 75 6c 64 20 61 6c 73 6f 20 62 65 20 73 6f 6d 65 74 68 69 6e 67 20 6c 69 6b 65 0a e2 80 98 61 ould.also.be.something.like....a
726e0 70 69 2e 65 78 61 6d 70 6c 65 2e 63 6f 6d e2 80 99 2e 0a 0a 41 64 64 20 53 75 70 70 6f 72 74 20 pi.example.com......Add.Support.
72700 66 6f 72 20 41 64 64 69 74 69 6f 6e 61 6c 20 46 6f 72 67 65 20 54 79 70 65 73 0a 2d 2d 2d 2d 2d for.Additional.Forge.Types.-----
72720 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d --------------------------------
72740 2d 0a 0a 46 6f 72 20 65 61 63 68 20 66 75 6c 6c 79 20 6f 72 20 70 61 72 74 69 61 6c 6c 79 20 73 -..For.each.fully.or.partially.s
72760 75 70 70 6f 72 74 65 64 20 66 6f 72 67 65 20 74 79 70 65 2c 20 46 6f 72 67 65 20 64 65 66 69 6e upported.forge.type,.Forge.defin
72780 65 73 20 61 74 20 6c 65 61 73 74 0a 61 20 63 6c 61 73 73 2e 20 20 54 68 65 20 66 6f 6c 6c 6f 77 es.at.least.a.class...The.follow
727a0 69 6e 67 20 65 78 61 6d 70 6c 65 20 69 73 20 74 61 6b 65 6e 20 66 72 6f 6d 20 e2 80 98 66 6f 72 ing.example.is.taken.from....for
727c0 67 65 2d 73 65 6d 69 2e 65 6c e2 80 99 3a 0a 0a 20 20 20 20 20 28 64 65 66 63 6c 61 73 73 20 66 ge-semi.el...:.......(defclass.f
727e0 6f 72 67 65 2d 63 67 69 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 6e 6f 61 70 orge-cgit-repository.(forge-noap
72800 69 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 20 20 20 28 28 63 6f 6d 6d 69 74 2d 75 72 i-repository)........((commit-ur
72820 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 l-format.:initform."https://%h/%
72840 70 2e 67 69 74 2f 63 6f 6d 6d 69 74 2f 3f 69 64 3d 25 72 22 29 0a 20 20 20 20 20 20 20 20 28 62 p.git/commit/?id=%r").........(b
72860 72 61 6e 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 ranch-url-format.:initform."http
72880 73 3a 2f 2f 25 68 2f 25 70 2e 67 69 74 2f 6c 6f 67 2f 3f 68 3d 25 72 22 29 0a 20 20 20 20 20 20 s://%h/%p.git/log/?h=%r").......
728a0 20 20 28 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 ..(remote-url-format.:initform."
728c0 68 74 74 70 73 3a 2f 2f 25 68 2f 25 70 2e 67 69 74 2f 61 62 6f 75 74 22 29 29 0a 20 20 20 20 20 https://%h/%p.git/about"))......
728e0 20 20 22 43 67 69 74 20 66 72 6f 6d 20 68 74 74 70 73 3a 2f 2f 67 69 74 2e 7a 78 32 63 34 2e 63 .."Cgit.from.https://git.zx2c4.c
72900 6f 6d 2f 63 67 69 74 2f 61 62 6f 75 74 2e 0a 20 20 20 20 20 44 69 66 66 65 72 65 6e 74 20 68 6f om/cgit/about.......Different.ho
72920 73 74 73 20 75 73 65 20 64 69 66 66 65 72 65 6e 74 20 75 72 6c 20 73 63 68 65 6d 61 74 61 2c 20 sts.use.different.url.schemata,.
72940 73 6f 20 77 65 20 6e 65 65 64 20 6d 75 6c 74 69 70 6c 65 0a 20 20 20 20 20 63 6c 61 73 73 65 73 so.we.need.multiple......classes
72960 2e 20 20 53 65 65 20 74 68 65 69 72 20 64 65 66 69 6e 69 74 69 6f 6e 73 20 69 6e 20 5c 22 66 6f ...See.their.definitions.in.\"fo
72980 72 67 65 2d 73 65 6d 69 2e 65 6c 5c 22 2e 22 29 0a 0a 20 20 20 4f 6e 63 65 20 79 6f 75 20 61 64 rge-semi.el\".").....Once.you.ad
729a0 64 20 61 20 68 6f 73 74 20 75 73 69 6e 67 20 74 68 61 74 20 63 6c 61 73 73 20 74 6f 20 e2 80 98 d.a.host.using.that.class.to....
729c0 66 6f 72 67 65 2d 61 6c 69 73 74 e2 80 99 20 61 6e 64 20 74 68 65 6e 20 61 0a 72 65 70 6f 73 69 forge-alist....and.then.a.reposi
729e0 74 6f 72 79 20 66 72 6f 6d 20 74 68 61 74 20 68 6f 73 74 20 74 6f 20 74 68 65 20 6c 6f 63 61 6c tory.from.that.host.to.the.local
72a00 20 64 61 74 61 62 61 73 65 2c 20 79 6f 75 20 77 69 6c 6c 20 62 65 20 61 62 6c 65 20 74 6f 20 75 .database,.you.will.be.able.to.u
72a20 73 65 0a 63 6f 6d 6d 61 6e 64 73 20 73 75 63 68 20 61 73 20 e2 80 98 66 6f 72 67 65 2d 62 72 6f se.commands.such.as....forge-bro
72a40 77 73 65 2d 62 72 61 6e 63 68 e2 80 99 20 28 62 75 74 20 6e 6f 74 20 6d 75 63 68 20 6d 6f 72 65 wse-branch....(but.not.much.more
72a60 29 2e 0a 0a 20 20 20 49 66 20 79 6f 75 20 77 61 6e 74 20 74 6f 20 61 64 64 20 61 20 72 65 70 6f )......If.you.want.to.add.a.repo
72a80 73 69 74 6f 72 79 20 66 72 6f 6d 20 61 6e 6f 74 68 65 72 20 68 6f 73 74 2c 20 77 68 69 63 68 20 sitory.from.another.host,.which.
72aa0 68 61 70 70 65 6e 73 20 74 6f 0a 75 73 65 20 61 6e 6f 74 68 65 72 20 73 6f 66 74 77 61 72 65 20 happens.to.use.another.software.
72ac0 6f 72 20 61 6e 6f 74 68 65 72 20 55 52 4c 20 73 63 68 65 6d 61 74 61 2c 20 74 68 65 6e 20 79 6f or.another.URL.schemata,.then.yo
72ae0 75 20 6d 69 67 68 74 20 68 61 76 65 20 74 6f 0a 64 65 66 69 6e 65 20 61 6e 20 61 64 64 69 74 69 u.might.have.to.define.an.additi
72b00 6f 6e 61 6c 20 63 6c 61 73 73 20 66 69 72 73 74 2e 20 20 53 65 65 20 e2 80 98 66 6f 72 67 65 2d onal.class.first...See....forge-
72b20 73 65 6d 69 2e 65 6c e2 80 99 20 66 6f 72 20 73 69 6d 70 6c 65 0a 65 78 61 6d 70 6c 65 73 20 61 semi.el....for.simple.examples.a
72b40 6e 64 20 67 72 65 70 20 66 6f 72 20 e2 80 98 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 2e 2a nd.grep.for....defclass.forge-.*
72b60 2d 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 20 66 6f 72 20 6d 6f 72 65 20 63 6f 6d 70 6c 65 78 0a -repository....for.more.complex.
72b80 6f 6e 65 73 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 ones.....File:.forge.info,..Node
72ba0 3a 20 49 6e 69 74 69 61 6c 20 50 75 6c 6c 2c 20 20 4e 65 78 74 3a 20 47 65 74 74 69 6e 67 20 53 :.Initial.Pull,..Next:.Getting.S
72bc0 74 61 72 74 65 64 2c 20 20 50 72 65 76 3a 20 49 6e 69 74 69 61 6c 20 53 65 74 75 70 2c 20 20 55 tarted,..Prev:.Initial.Setup,..U
72be0 70 3a 20 54 6f 70 0a 0a 33 20 49 6e 69 74 69 61 6c 20 50 75 6c 6c 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a p:.Top..3.Initial.Pull.*********
72c00 2a 2a 2a 2a 2a 0a 0a 54 6f 20 73 74 61 72 74 20 75 73 69 6e 67 20 46 6f 72 67 65 20 69 6e 20 61 *****..To.start.using.Forge.in.a
72c20 20 63 65 72 74 61 69 6e 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 76 69 73 69 74 20 74 68 65 20 4d .certain.repository,.visit.the.M
72c40 61 67 69 74 20 73 74 61 74 75 73 0a 62 75 66 66 65 72 20 66 6f 72 20 74 68 61 74 20 72 65 70 6f agit.status.buffer.for.that.repo
72c60 73 69 74 6f 72 79 20 61 6e 64 20 74 79 70 65 20 e2 80 98 4e 20 2f 20 61 e2 80 99 20 28 e2 80 98 sitory.and.type....N./.a....(...
72c80 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 29 2e 0a 59 6f 75 20 61 72 forge-add-repository...)..You.ar
72ca0 65 20 67 69 76 65 6e 20 61 20 63 68 6f 69 63 65 20 74 6f 20 70 75 6c 6c 20 61 6c 6c 20 74 6f 70 e.given.a.choice.to.pull.all.top
72cc0 69 63 73 2c 20 61 6c 6c 20 74 6f 70 69 63 73 20 74 68 61 74 20 77 65 72 65 20 75 70 64 61 74 65 ics,.all.topics.that.were.update
72ce0 64 0a 61 66 74 65 72 20 61 20 63 65 72 74 61 69 6e 20 64 61 74 65 2c 20 6f 72 20 6f 6e 6c 79 20 d.after.a.certain.date,.or.only.
72d00 69 6e 64 69 76 69 64 75 61 6c 20 74 6f 70 69 63 73 2e 0a 0a 20 20 20 42 65 73 69 64 65 20 61 64 individual.topics......Beside.ad
72d20 64 69 6e 67 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 20 74 68 65 20 64 61 74 61 62 ding.the.repository.to.the.datab
72d40 61 73 65 2c 20 74 68 69 73 20 61 6c 73 6f 20 61 64 64 73 20 61 20 6e 65 77 0a 76 61 6c 75 65 20 ase,.this.also.adds.a.new.value.
72d60 74 6f 20 74 68 65 20 47 69 74 20 76 61 72 69 61 62 6c 65 20 e2 80 98 72 65 6d 6f 74 65 2e 3c 72 to.the.Git.variable....remote.<r
72d80 65 6d 6f 74 65 3e 2e 66 65 74 63 68 e2 80 99 2c 20 77 68 69 63 68 20 63 61 75 73 65 73 20 61 6c emote>.fetch...,.which.causes.al
72da0 6c 0a 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 72 65 66 73 20 28 e2 80 98 2b 72 65 66 73 2f 70 75 l.pull-request.refs.(...+refs/pu
72dc0 6c 6c 2f 2a 2f 68 65 61 64 3a 72 65 66 73 2f 70 75 6c 6c 72 65 71 73 2f 2a e2 80 99 20 66 6f 72 ll/*/head:refs/pullreqs/*....for
72de0 20 47 69 74 68 75 62 29 20 74 6f 20 62 65 0a 66 65 74 63 68 65 64 20 62 79 20 47 69 74 2e 0a 0a .Github).to.be.fetched.by.Git...
72e00 20 20 20 4e 6f 74 65 20 74 68 61 74 20 69 74 20 69 73 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 75 ...Note.that.it.is.possible.to.u
72e20 73 65 20 74 68 65 20 73 61 6d 65 20 63 6f 6d 6d 61 6e 64 20 74 6f 20 61 64 64 20 61 6e 79 0a 72 se.the.same.command.to.add.any.r
72e40 65 70 6f 73 69 74 6f 72 79 20 66 72 6f 6d 20 61 20 73 75 70 70 6f 72 74 65 64 20 66 6f 72 67 65 epository.from.a.supported.forge
72e60 20 74 6f 20 74 68 65 20 64 61 74 61 62 61 73 65 2c 20 77 69 74 68 6f 75 74 20 63 6c 6f 6e 69 6e .to.the.database,.without.clonin
72e80 67 20 74 68 65 0a 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 20 66 69 72 73 74 2e 0a 0a 20 20 20 g.the.Git.repository.first......
72ea0 54 68 65 20 69 6e 69 74 69 61 6c 20 66 65 74 63 68 20 63 61 6e 20 74 61 6b 65 20 61 20 77 68 69 The.initial.fetch.can.take.a.whi
72ec0 6c 65 20 62 75 74 20 6d 6f 73 74 20 6f 66 20 74 68 65 20 77 6f 72 6b 20 69 73 20 64 6f 6e 65 0a le.but.most.of.the.work.is.done.
72ee0 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 20 20 53 74 6f 72 69 6e 67 20 74 68 65 20 69 6e 66 asynchronously...Storing.the.inf
72f00 6f 72 6d 61 74 69 6f 6e 20 69 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 20 69 73 20 64 6f 6e 65 ormation.in.the.database.is.done
72f20 0a 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 74 68 6f 75 67 68 2c 20 73 6f 20 74 68 65 72 65 20 .synchronously.though,.so.there.
72f40 63 61 6e 20 62 65 20 61 20 6e 6f 74 69 63 65 61 62 6c 65 20 68 61 6e 67 20 61 74 20 74 68 65 20 can.be.a.noticeable.hang.at.the.
72f60 65 6e 64 2e 0a 53 75 62 73 65 71 75 65 6e 74 20 66 65 74 63 68 65 73 20 61 72 65 20 6d 75 63 68 end..Subsequent.fetches.are.much
72f80 20 66 61 73 74 65 72 2e 0a 0a 20 20 20 46 65 74 63 68 69 6e 67 20 69 73 73 75 65 73 20 66 72 6f .faster......Fetching.issues.fro
72fa0 6d 20 47 69 74 68 75 62 20 69 73 20 6d 75 63 68 20 66 61 73 74 65 72 20 74 68 61 6e 20 66 65 74 m.Github.is.much.faster.than.fet
72fc0 63 68 69 6e 67 20 66 72 6f 6d 20 6f 74 68 65 72 0a 66 6f 72 67 65 73 2c 20 62 65 63 61 75 73 65 ching.from.other.forges,.because
72fe0 20 6d 61 6b 69 6e 67 20 61 20 68 61 6e 64 66 75 6c 20 6f 66 20 47 72 61 70 68 51 4c 20 72 65 71 .making.a.handful.of.GraphQL.req
73000 75 65 73 74 73 2c 20 69 73 20 6d 75 63 68 20 66 61 73 74 65 72 0a 74 68 61 6e 20 6d 61 6b 69 6e uests,.is.much.faster.than.makin
73020 67 20 68 75 6e 64 72 65 64 73 20 6f 66 20 52 45 53 54 20 72 65 71 75 65 73 74 73 2e 0a 0a 1f 0a g.hundreds.of.REST.requests.....
73040 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 47 65 74 74 69 6e 67 File:.forge.info,..Node:.Getting
73060 20 53 74 61 72 74 65 64 2c 20 20 4e 65 78 74 3a 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 .Started,..Next:.Lists.and.Menus
73080 2c 20 20 50 72 65 76 3a 20 49 6e 69 74 69 61 6c 20 50 75 6c 6c 2c 20 20 55 70 3a 20 54 6f 70 0a ,..Prev:.Initial.Pull,..Up:.Top.
730a0 0a 34 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a .4.Getting.Started.*************
730c0 2a 2a 2a 2a 0a 0a 4d 75 63 68 20 6c 69 6b 65 20 47 69 74 20 73 74 6f 72 65 73 20 69 6e 66 6f 72 ****..Much.like.Git.stores.infor
730e0 6d 61 74 69 6f 6e 20 69 6e 20 61 20 6c 6f 63 61 6c 20 72 65 70 6f 73 69 74 6f 72 79 20 61 6e 64 mation.in.a.local.repository.and
73100 20 64 6f 65 73 20 6e 6f 74 0a 72 65 71 75 69 72 65 20 61 20 63 6f 6e 73 74 61 6e 74 20 69 6e 74 .does.not.require.a.constant.int
73120 65 72 6e 65 74 20 63 6f 6e 6e 65 63 74 69 6f 6e 2c 20 46 6f 72 67 65 20 72 65 74 72 69 65 76 65 ernet.connection,.Forge.retrieve
73140 73 20 61 64 64 69 74 69 6f 6e 61 6c 0a 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 75 73 69 6e 67 20 61 s.additional.information.using.a
73160 20 66 6f 72 67 65 e2 80 99 73 20 41 50 49 20 61 6e 64 20 73 74 6f 72 65 73 20 74 68 61 74 20 69 .forge...s.API.and.stores.that.i
73180 6e 20 61 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 2e 0a 0a 20 20 20 46 6f 72 67 65 e2 80 99 n.a.local.database......Forge...
731a0 73 20 65 71 75 69 76 61 6c 65 6e 74 20 6f 66 20 e2 80 98 67 69 74 20 63 6c 6f 6e 65 e2 80 99 20 s.equivalent.of....git.clone....
731c0 69 73 20 e2 80 98 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 2c 20 77 is....forge-add-repository...,.w
731e0 68 69 63 68 0a 68 61 73 20 74 6f 20 62 65 20 72 75 6e 2c 20 62 65 66 6f 72 65 20 6d 6f 73 74 20 hich.has.to.be.run,.before.most.
73200 6f 66 20 46 6f 72 67 65 73 20 66 65 61 74 75 72 65 73 20 62 65 63 6f 6d 65 20 61 76 61 69 6c 61 of.Forges.features.become.availa
73220 62 6c 65 20 69 6e 20 74 68 65 0a 6c 6f 63 61 6c 20 63 6c 6f 6e 65 20 6f 66 20 61 20 47 69 74 20 ble.in.the.local.clone.of.a.Git.
73240 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a e2 80 98 4e 20 2f 20 61 e2 80 99 20 28 e2 80 98 66 6f 72 repository......N./.a....(...for
73260 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 ge-add-repository...)......This.
73280 63 6f 6d 6d 61 6e 64 20 67 75 69 64 65 73 20 74 68 65 20 75 73 65 72 20 74 68 72 6f 75 67 68 20 command.guides.the.user.through.
732a0 74 68 65 20 70 72 6f 63 65 73 73 20 6f 66 20 61 64 64 69 6e 67 20 61 0a 20 20 20 20 20 72 65 70 the.process.of.adding.a......rep
732c0 6f 73 69 74 6f 72 79 20 74 6f 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 2e 0a 0a ository.to.the.local.database...
732e0 20 20 20 20 20 4e 6f 74 65 20 74 68 61 74 20 69 74 20 69 73 20 70 6f 73 73 69 62 6c 65 20 74 6f .....Note.that.it.is.possible.to
73300 20 61 64 64 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 20 74 68 65 20 6c 6f 63 61 6c 20 64 .add.a.repository.to.the.local.d
73320 61 74 61 62 61 73 65 2c 0a 20 20 20 20 20 77 69 74 68 6f 75 74 20 70 75 6c 6c 69 6e 67 20 61 6c atabase,......without.pulling.al
73340 6c 20 74 68 65 20 64 61 74 61 2c 20 77 68 69 63 68 20 69 73 20 75 73 65 66 75 6c 20 69 66 20 79 l.the.data,.which.is.useful.if.y
73360 6f 75 20 6a 75 73 74 20 77 61 6e 74 20 74 6f 0a 20 20 20 20 20 63 72 65 61 74 65 20 61 20 73 69 ou.just.want.to......create.a.si
73380 6e 67 6c 65 20 69 73 73 75 65 20 6f 72 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 69 6e 20 61 20 ngle.issue.or.pull-request.in.a.
733a0 72 65 70 6f 73 69 74 6f 72 79 2c 20 62 75 74 20 61 72 65 20 6e 6f 74 0a 20 20 20 20 20 69 6e 74 repository,.but.are.not......int
733c0 65 72 65 73 74 65 64 20 69 6e 20 65 78 69 73 74 69 6e 67 20 74 6f 70 69 63 73 2c 20 65 2e 67 2e erested.in.existing.topics,.e.g.
733e0 2c 20 62 65 63 61 75 73 65 20 79 6f 75 20 64 6f 20 6e 6f 74 20 72 65 67 75 6c 61 72 6c 79 0a 20 ,.because.you.do.not.regularly..
73400 20 20 20 20 63 6f 6e 74 72 69 62 75 74 65 20 74 6f 20 74 68 61 74 20 72 65 70 6f 73 69 74 6f 72 ....contribute.to.that.repositor
73420 79 2e 0a 0a 20 20 20 20 20 41 6c 73 6f 20 6e 6f 74 65 20 74 68 61 74 20 79 6f 75 20 63 61 6e 20 y........Also.note.that.you.can.
73440 61 64 64 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 add.a.repository.to.the.local.da
73460 74 61 62 61 73 65 2c 20 65 76 65 6e 0a 20 20 20 20 20 69 66 20 6e 6f 20 6c 6f 63 61 6c 20 47 69 tabase,.even......if.no.local.Gi
73480 74 20 63 6c 6f 6e 65 20 65 78 69 73 74 73 2e 0a 0a 20 20 20 4c 69 6b 65 20 77 69 74 68 20 47 69 t.clone.exists......Like.with.Gi
734a0 74 2c 20 79 6f 75 20 68 61 76 65 20 74 6f 20 65 78 70 6c 69 63 69 74 6c 79 20 70 75 6c 6c 20 72 t,.you.have.to.explicitly.pull.r
734c0 65 6d 6f 74 65 20 63 68 61 6e 67 65 73 2c 20 61 74 20 79 6f 75 72 0a 6c 65 69 73 75 72 65 2c 20 emote.changes,.at.your.leisure,.
734e0 75 73 69 6e 67 20 e2 80 98 66 6f 72 67 65 2d 70 75 6c 6c e2 80 99 2e 0a 0a e2 80 98 66 20 6e e2 using....forge-pull.........f.n.
73500 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 70 75 6c 6c e2 80 99 29 0a e2 80 98 4e 20 66 20 66 e2 80 ...(...forge-pull...)....N.f.f..
73520 99 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 75 73 65 73 20 61 20 66 6f 72 67 65 .......This.command.uses.a.forge
73540 e2 80 99 73 20 41 50 49 20 74 6f 20 66 65 74 63 68 20 74 6f 70 69 63 73 20 61 6e 64 20 6f 74 68 ...s.API.to.fetch.topics.and.oth
73560 65 72 0a 20 20 20 20 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 74 68 65 20 63 75 er......information.about.the.cu
73580 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 61 6e 64 20 73 74 6f 72 65 73 20 74 68 65 rrent.repository,.and.stores.the
735a0 20 66 65 74 63 68 65 64 0a 20 20 20 20 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 6e 20 74 68 65 .fetched......information.in.the
735c0 20 64 61 74 61 62 61 73 65 2e 0a 0a 20 20 20 20 20 49 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 .database........If.the.current.
735e0 72 65 70 6f 73 69 74 6f 72 79 20 69 73 6e e2 80 99 74 20 62 65 69 6e 67 20 74 72 61 63 6b 65 64 repository.isn...t.being.tracked
73600 20 69 6e 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 0a 20 20 20 20 20 79 65 74 2c .in.the.local.database......yet,
73620 20 74 68 65 6e 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20 70 69 76 6f 74 73 20 74 6f 20 62 65 68 .then.this.command.pivots.to.beh
73640 61 76 65 20 6c 69 6b 65 0a 20 20 20 20 20 e2 80 98 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 ave.like.........forge-add-repos
73660 69 74 6f 72 79 e2 80 99 2e 0a 0a 20 20 20 46 6f 72 67 65 20 61 64 64 73 20 74 77 6f 20 61 64 64 itory.........Forge.adds.two.add
73680 69 74 69 6f 6e 61 6c 20 73 65 63 74 69 6f 6e 73 20 74 6f 20 4d 61 67 69 74 e2 80 99 73 20 73 74 itional.sections.to.Magit...s.st
736a0 61 74 75 73 20 62 75 66 66 65 72 2c 20 77 68 69 63 68 0a 6c 69 73 74 20 6f 70 65 6e 20 61 6e 64 atus.buffer,.which.list.open.and
736c0 2f 6f 72 20 70 65 6e 64 69 6e 67 20 69 73 73 75 65 73 20 61 6e 64 20 70 75 6c 6c 2d 72 65 71 75 /or.pending.issues.and.pull-requ
736e0 65 73 74 73 2e 20 20 54 79 70 69 6e 67 20 e2 80 98 52 45 54 e2 80 99 2c 20 77 68 69 6c 65 0a 74 ests...Typing....RET...,.while.t
73700 68 65 20 63 75 72 73 6f 72 20 69 73 20 6f 6e 20 61 20 74 6f 70 69 63 20 73 65 63 74 69 6f 6e 2c he.cursor.is.on.a.topic.section,
73720 20 73 68 6f 77 73 20 6d 6f 72 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 74 68 .shows.more.information.about.th
73740 61 74 0a 74 6f 70 69 63 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 2e 20 20 at.topic.in.a.separate.buffer...
73760 54 79 70 69 6e 67 20 e2 80 98 52 45 54 e2 80 99 20 6f 6e 20 61 20 74 6f 70 69 63 20 6c 69 73 74 Typing....RET....on.a.topic.list
73780 20 73 65 63 74 69 6f 6e 2c 20 73 68 6f 77 73 0a 74 68 61 74 20 6c 69 73 74 20 69 6e 20 61 20 73 .section,.shows.that.list.in.a.s
737a0 65 70 61 72 61 74 65 20 62 75 66 66 65 72 2c 20 77 68 65 72 65 20 79 6f 75 20 63 61 6e 20 61 70 eparate.buffer,.where.you.can.ap
737c0 70 6c 79 20 64 69 66 66 65 72 65 6e 74 20 66 69 6c 74 65 72 73 2e 0a 0a 20 20 20 54 68 65 20 6f ply.different.filters......The.o
737e0 74 68 65 72 20 6d 61 69 6e 20 65 6e 74 72 79 20 70 6f 69 6e 74 20 74 6f 20 74 68 65 20 66 75 6e ther.main.entry.point.to.the.fun
73800 63 74 69 6f 6e 61 6c 69 74 79 20 70 72 6f 76 69 64 65 64 20 62 79 20 46 6f 72 67 65 20 69 73 0a ctionality.provided.by.Forge.is.
73820 74 68 65 20 e2 80 98 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 e2 80 99 20 6d 65 6e 75 2e 0a 0a the....forge-dispatch....menu...
73840 e2 80 98 4e e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 e2 80 99 29 0a 20 ...N....(...forge-dispatch...)..
73860 20 20 20 20 54 68 69 73 20 70 72 65 66 69 78 20 63 6f 6d 6d 61 6e 64 20 69 73 20 61 76 61 69 6c ....This.prefix.command.is.avail
73880 61 62 6c 65 20 69 6e 20 61 6c 6c 20 4d 61 67 69 74 20 62 75 66 66 65 72 73 20 61 6e 64 20 70 72 able.in.all.Magit.buffers.and.pr
738a0 6f 76 69 64 65 73 0a 20 20 20 20 20 61 63 63 65 73 73 20 74 6f 20 6d 6f 73 74 20 6f 66 20 74 68 ovides......access.to.most.of.th
738c0 65 20 61 76 61 69 6c 61 62 6c 65 20 46 6f 72 67 65 20 63 6f 6d 6d 61 6e 64 73 2e 20 20 53 65 65 e.available.Forge.commands...See
738e0 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 20 20 20 20 20 73 65 63 74 69 6f 6e 73 20 66 6f 72 .the.following......sections.for
73900 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 74 68 65 20 61 76 61 69 6c 61 62 6c 65 .information.about.the.available
73920 20 63 6f 6d 6d 61 6e 64 73 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 .commands.....File:.forge.info,.
73940 20 4e 6f 64 65 3a 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2c 20 20 4e 65 78 74 3a 20 56 .Node:.Lists.and.Menus,..Next:.V
73960 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2c 20 20 50 72 65 76 3a 20 47 65 74 74 69 6e 67 20 53 isiting.Topics,..Prev:.Getting.S
73980 74 61 72 74 65 64 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 35 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 tarted,..Up:.Top..5.Lists.and.Me
739a0 6e 75 73 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 54 6f 70 69 63 73 20 61 72 nus.*****************..Topics.ar
739c0 65 20 6c 69 73 74 65 64 20 69 6e 20 74 77 6f 20 73 65 63 74 69 6f 6e 73 20 69 6e 20 4d 61 67 69 e.listed.in.two.sections.in.Magi
739e0 74 e2 80 99 73 20 73 74 61 74 75 73 20 62 75 66 66 65 72 2c 20 62 75 74 20 63 61 6e 20 61 6c 73 t...s.status.buffer,.but.can.als
73a00 6f 0a 62 65 20 6c 69 73 74 65 64 20 69 6e 20 64 65 64 69 63 61 74 65 64 20 62 75 66 66 65 72 73 o.be.listed.in.dedicated.buffers
73a20 2e 20 20 4c 69 6b 65 77 69 73 65 20 69 6e 64 69 76 69 64 75 61 6c 20 74 6f 70 69 63 73 20 63 61 ...Likewise.individual.topics.ca
73a40 6e 20 62 65 0a 76 69 73 69 74 65 64 20 69 6e 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 73 n.be.visited.in.separate.buffers
73a60 2e 20 20 49 6e 20 62 6f 74 68 20 63 61 73 65 73 20 74 68 69 73 20 63 61 6e 20 62 65 20 64 6f 6e ...In.both.cases.this.can.be.don
73a80 65 20 62 79 20 70 6c 61 63 69 6e 67 0a 74 68 65 20 63 75 72 73 6f 72 20 6f 6e 20 74 68 65 20 72 e.by.placing.the.cursor.on.the.r
73aa0 65 73 70 65 63 74 69 76 65 20 73 65 63 74 69 6f 6e 20 69 6e 20 74 68 65 20 73 74 61 74 75 73 20 espective.section.in.the.status.
73ac0 62 75 66 66 65 72 20 61 6e 64 20 74 79 70 69 6e 67 0a e2 80 98 52 45 54 e2 80 99 2c 20 6f 72 20 buffer.and.typing....RET...,.or.
73ae0 62 79 20 69 6e 76 6f 6b 69 6e 67 20 74 68 65 20 61 70 70 72 6f 70 72 69 61 74 65 20 63 6f 6d 6d by.invoking.the.appropriate.comm
73b00 61 6e 64 20 66 72 6f 6d 20 46 6f 72 67 65 e2 80 99 73 20 6d 61 69 6e 20 6d 65 6e 75 2c 20 6f 6e and.from.Forge...s.main.menu,.on
73b20 0a e2 80 98 4e e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 e2 80 99 29 2e ....N....(...forge-dispatch...).
73b40 0a 0a 20 20 20 4c 69 73 74 20 63 6f 6d 6d 61 6e 64 73 20 61 6e 64 20 63 6f 72 72 65 73 70 6f 6e .....List.commands.and.correspon
73b60 64 69 6e 67 20 6d 65 6e 75 20 63 6f 6d 6d 61 6e 64 73 20 65 78 69 73 74 20 66 6f 72 20 74 6f 70 ding.menu.commands.exist.for.top
73b80 69 63 73 2c 0a 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 61 6e 64 20 72 65 70 6f 73 69 74 6f 72 ics,.notifications.and.repositor
73ba0 69 65 73 2c 20 62 75 74 20 74 68 65 72 65 20 69 73 6e e2 80 99 74 20 61 6c 77 61 79 73 20 61 6e ies,.but.there.isn...t.always.an
73bc0 20 65 78 63 6c 75 73 69 76 65 0a 6d 61 70 70 69 6e 67 20 66 72 6f 6d 20 6d 65 6e 75 20 74 6f 20 .exclusive.mapping.from.menu.to.
73be0 62 75 66 66 65 72 2e 20 20 54 68 65 20 6d 61 69 6e 20 6d 65 6e 75 20 28 e2 80 98 66 6f 72 67 65 buffer...The.main.menu.(...forge
73c00 2d 64 69 73 70 61 74 63 68 e2 80 99 29 2c 20 74 68 65 0a 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e -dispatch...),.the.configuration
73c20 20 6d 65 6e 75 20 28 e2 80 98 66 6f 72 67 65 2d 63 6f 6e 66 69 67 75 72 65 e2 80 99 29 2c 20 74 .menu.(...forge-configure...),.t
73c40 68 65 20 6d 65 6e 75 20 77 68 69 63 68 20 63 6f 6e 74 72 6f 6c 73 20 74 68 65 0a 63 75 72 72 65 he.menu.which.controls.the.curre
73c60 6e 74 20 74 6f 70 69 63 20 6f 72 20 74 68 65 20 74 6f 70 69 63 20 61 74 20 70 6f 69 6e 74 20 28 nt.topic.or.the.topic.at.point.(
73c80 e2 80 98 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 e2 80 99 29 2c 20 61 6e 64 20 74 68 65 ...forge-topic-menu...),.and.the
73ca0 20 6d 65 6e 75 0a 77 68 69 63 68 20 63 6f 6e 74 72 6f 6c 73 20 74 68 65 20 74 6f 70 69 63 73 20 .menu.which.controls.the.topics.
73cc0 6c 69 73 74 65 64 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 0a 28 e2 80 listed.in.the.current.buffer.(..
73ce0 98 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 e2 80 99 29 2c 20 61 72 65 20 75 73 65 66 .forge-topics-menu...),.are.usef
73d00 75 6c 20 69 6e 20 6d 6f 72 65 20 74 68 61 6e 20 6f 6e 65 20 6d 61 6a 6f 72 20 6d 6f 64 65 2e 0a ul.in.more.than.one.major.mode..
73d20 0a 20 20 20 41 6c 6c 20 6f 66 20 74 68 65 73 65 20 6d 65 6e 75 73 20 66 65 61 74 75 72 65 20 62 ....All.of.these.menus.feature.b
73d40 69 6e 64 69 6e 67 73 20 74 6f 20 64 69 72 65 63 74 6c 79 20 73 77 69 74 63 68 20 74 6f 20 74 68 indings.to.directly.switch.to.th
73d60 65 20 6f 74 68 65 72 0a 61 70 70 72 6f 70 72 69 61 74 65 20 6d 65 6e 75 73 2e 20 20 53 6f 20 69 e.other.appropriate.menus...So.i
73d80 74 20 69 73 20 65 6e 6f 75 67 68 20 74 6f 20 72 65 6d 65 6d 62 65 72 20 74 68 61 74 20 e2 80 98 t.is.enough.to.remember.that....
73da0 4e e2 80 99 20 61 6c 77 61 79 73 20 62 72 69 6e 67 73 0a 75 70 20 74 68 65 20 64 69 73 70 61 74 N....always.brings.up.the.dispat
73dc0 63 68 20 6d 65 6e 75 3b 20 79 6f 75 20 63 61 6e 20 61 6c 77 61 79 73 20 6e 61 76 69 67 61 74 65 ch.menu;.you.can.always.navigate
73de0 20 74 6f 20 61 6e 6f 74 68 65 72 20 6d 65 6e 75 20 66 72 6f 6d 0a 74 68 65 72 65 2e 0a 0a 20 20 .to.another.menu.from.there.....
73e00 20 e2 80 98 43 2d 63 20 43 2d 63 e2 80 99 20 62 72 69 6e 67 73 20 75 70 20 74 68 65 20 6d 6f 73 ....C-c.C-c....brings.up.the.mos
73e20 74 20 61 70 70 72 6f 70 72 69 61 74 65 20 6d 65 6e 75 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 t.appropriate.menu.for.the.curre
73e40 6e 74 20 62 75 66 66 65 72 2e 0a 49 6e 20 4d 61 67 69 74 e2 80 99 73 20 73 74 61 74 75 73 20 62 nt.buffer..In.Magit...s.status.b
73e60 75 66 66 65 72 20 74 68 65 20 6d 6f 73 74 20 61 70 70 72 6f 70 72 69 61 74 65 20 6d 65 6e 75 20 uffer.the.most.appropriate.menu.
73e80 69 73 20 4d 61 67 69 74 e2 80 99 73 20 6f 77 6e 0a 64 69 73 70 61 74 63 68 20 6d 65 6e 75 20 28 is.Magit...s.own.dispatch.menu.(
73ea0 e2 80 98 6d 61 67 69 74 2d 64 69 73 70 61 74 63 68 e2 80 99 29 2c 20 73 6f 20 68 65 72 65 20 74 ...magit-dispatch...),.so.here.t
73ec0 68 65 20 71 75 69 63 6b 65 73 74 20 77 61 79 20 74 6f 20 69 6e 76 6f 6b 65 0a 46 6f 72 67 65 e2 he.quickest.way.to.invoke.Forge.
73ee0 80 99 73 20 64 69 73 70 61 74 63 68 20 6d 65 6e 75 20 69 73 20 e2 80 98 4e e2 80 99 2e 20 20 45 ..s.dispatch.menu.is....N......E
73f00 76 65 6e 20 69 6e 20 4d 61 67 69 74 e2 80 99 73 20 73 74 61 74 75 73 20 62 75 66 66 65 72 2c 20 ven.in.Magit...s.status.buffer,.
73f20 77 68 65 6e 20 74 68 65 0a 63 75 72 73 6f 72 20 69 73 20 61 6e 20 69 6e 64 69 76 69 64 75 61 6c when.the.cursor.is.an.individual
73f40 20 74 6f 70 69 63 20 6f 72 20 6f 6e 20 61 20 74 6f 70 69 63 20 6c 69 73 74 20 73 65 63 74 69 6f .topic.or.on.a.topic.list.sectio
73f60 6e 2c 20 e2 80 98 43 2d 63 20 43 2d 63 e2 80 99 0a 6f 70 65 6e 73 20 74 68 65 20 72 65 73 70 65 n,....C-c.C-c....opens.the.respe
73f80 63 74 69 76 65 20 6d 65 6e 75 20 28 e2 80 98 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 ctive.menu.(...forge-topics-menu
73fa0 e2 80 99 20 6f 72 20 e2 80 98 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 e2 80 99 29 2e 0a ....or....forge-topic-menu...)..
73fc0 0a 20 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 65 63 74 69 6f 6e 73 20 64 65 73 63 72 ....The.following.sections.descr
73fe0 69 62 65 20 6d 6f 73 74 20 6f 66 20 74 68 65 20 61 76 61 69 6c 61 62 6c 65 20 6d 65 6e 75 20 61 ibe.most.of.the.available.menu.a
74000 6e 64 20 6c 69 73 74 0a 63 6f 6d 6d 61 6e 64 73 2e 20 20 46 6f 72 20 e2 80 98 66 6f 72 67 65 2d nd.list.commands...For....forge-
74020 74 6f 70 69 63 2d 6d 65 6e 75 e2 80 99 2c 20 73 65 65 20 2a 6e 6f 74 65 20 45 64 69 74 69 6e 67 topic-menu...,.see.*note.Editing
74040 20 54 6f 70 69 63 73 3a 3a 2e 0a 0a 44 69 73 70 61 74 63 68 20 61 6e 64 20 63 6f 6e 66 69 67 75 .Topics::...Dispatch.and.configu
74060 72 61 74 69 6f 6e 20 6d 65 6e 75 73 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ration.menus.===================
74080 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a e2 80 98 4e e2 80 99 20 28 e2 80 98 66 6f 72 67 65 =============.....N....(...forge
740a0 2d 64 69 73 70 61 74 63 68 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 70 72 65 66 69 78 20 6d -dispatch...)......This.prefix.m
740c0 65 6e 75 20 63 6f 6d 6d 61 6e 64 20 69 73 20 61 76 61 69 6c 61 62 6c 65 20 69 6e 20 61 6c 6c 20 enu.command.is.available.in.all.
740e0 4d 61 67 69 74 20 62 75 66 66 65 72 73 20 61 6e 64 0a 20 20 20 20 20 70 72 6f 76 69 64 65 73 20 Magit.buffers.and......provides.
74100 61 63 63 65 73 73 20 74 6f 20 6d 6f 73 74 20 6f 66 20 74 68 65 20 61 76 61 69 6c 61 62 6c 65 20 access.to.most.of.the.available.
74120 46 6f 72 67 65 20 63 6f 6d 6d 61 6e 64 73 2e 20 20 53 65 65 20 74 68 65 0a 20 20 20 20 20 66 6f Forge.commands...See.the......fo
74140 6c 6c 6f 77 69 6e 67 20 73 65 63 74 69 6f 6e 73 20 66 6f 72 20 69 6e 66 6f 72 6d 61 74 69 6f 6e llowing.sections.for.information
74160 20 61 62 6f 75 74 20 74 68 65 20 61 76 61 69 6c 61 62 6c 65 20 63 6f 6d 6d 61 6e 64 73 2e 0a 0a .about.the.available.commands...
74180 e2 80 98 4e 20 6d 20 63 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 63 6f 6e 66 69 67 75 72 65 e2 ...N.m.c....(...forge-configure.
741a0 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 64 69 73 70 6c 61 79 73 20 61 ..)......This.command.displays.a
741c0 20 6d 65 6e 75 20 75 73 65 64 20 74 6f 20 63 6f 6e 66 69 67 75 72 65 20 74 68 65 20 63 75 72 72 .menu.used.to.configure.the.curr
741e0 65 6e 74 0a 20 20 20 20 20 72 65 70 6f 73 69 74 6f 72 79 20 61 6e 64 20 73 6f 6d 65 20 67 6c 6f ent......repository.and.some.glo
74200 62 61 6c 20 73 65 74 74 69 6e 67 73 20 61 73 20 77 65 6c 6c 2e 0a 0a 54 6f 70 69 63 20 6d 65 6e bal.settings.as.well...Topic.men
74220 75 20 61 6e 64 20 6c 69 73 74 20 63 6f 6d 6d 61 6e 64 73 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d u.and.list.commands.============
74240 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a e2 80 98 4e 20 6d 20 66 e2 80 99 20 28 e2 ================.....N.m.f....(.
74260 80 98 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 e2 80 99 29 0a e2 80 98 43 2d 63 20 43 ..forge-topics-menu...)....C-c.C
74280 2d 63 20 5b 69 6e 20 74 6f 70 69 63 73 20 6c 69 73 74 20 62 75 66 66 65 72 2f 73 65 63 74 69 6f -c.[in.topics.list.buffer/sectio
742a0 6e 5d e2 80 99 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 64 69 73 70 6c 61 79 73 n].........This.command.displays
742c0 20 61 20 6d 65 6e 75 20 75 73 65 64 20 74 6f 20 63 6f 6e 74 72 6f 6c 20 74 68 65 20 6c 69 73 74 .a.menu.used.to.control.the.list
742e0 20 6f 66 20 74 6f 70 69 63 73 0a 20 20 20 20 20 64 69 73 70 6c 61 79 65 64 20 69 6e 20 74 68 65 .of.topics......displayed.in.the
74300 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 0a 20 20 20 20 20 4e 6f 74 65 20 74 68 61 74 .current.buffer........Note.that
74320 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20 63 61 6e 20 6e 6f 74 20 6f 6e 6c 79 20 62 65 20 75 73 .this.command.can.not.only.be.us
74340 65 64 20 69 6e 20 62 75 66 66 65 72 73 20 64 65 64 69 63 61 74 65 64 20 74 6f 0a 20 20 20 20 20 ed.in.buffers.dedicated.to......
74360 6c 69 73 74 69 6e 67 20 74 6f 70 69 63 73 2c 20 62 75 74 20 61 6c 73 6f 20 69 6e 20 4d 61 67 69 listing.topics,.but.also.in.Magi
74380 74 e2 80 99 73 20 73 74 61 74 75 73 20 62 75 66 66 65 72 2e 0a 0a e2 80 98 4e 20 6c 20 74 e2 80 t...s.status.buffer......N.l.t..
743a0 99 20 28 e2 80 98 66 6f 72 67 65 2d 6c 69 73 74 2d 74 6f 70 69 63 73 e2 80 99 29 0a 20 20 20 20 ..(...forge-list-topics...).....
743c0 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6c 69 73 74 73 20 74 68 65 20 63 75 72 72 65 6e 74 20 .This.command.lists.the.current.
743e0 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 73 20 69 73 73 75 65 73 20 69 6e 20 61 20 73 65 70 61 72 repository...s.issues.in.a.separ
74400 61 74 65 0a 20 20 20 20 20 62 75 66 66 65 72 2e 20 20 49 66 20 74 68 65 20 6c 69 73 74 20 62 75 ate......buffer...If.the.list.bu
74420 66 66 65 72 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 2c 20 74 68 69 73 20 63 6f 6d 6d 61 6e ffer.already.exists,.this.comman
74440 64 20 6f 6e 6c 79 0a 20 20 20 20 20 65 6e 73 75 72 65 73 20 74 68 61 74 20 61 6c 6c 20 74 79 70 d.only......ensures.that.all.typ
74460 65 73 20 6f 66 20 74 6f 70 69 63 73 20 61 72 65 20 6c 69 73 74 65 64 2e 20 20 49 66 20 61 6e 79 es.of.topics.are.listed...If.any
74480 20 6f 74 68 65 72 20 66 69 6c 74 65 72 73 0a 20 20 20 20 20 61 72 65 20 69 6e 20 65 66 66 65 63 .other.filters......are.in.effec
744a0 74 2c 20 74 68 65 79 20 61 72 65 20 6c 65 66 74 20 69 6e 74 61 63 74 2e 0a 0a e2 80 98 3c 52 45 t,.they.are.left.intact......<RE
744c0 54 3e 20 5b 6f 6e 20 22 49 73 73 75 65 73 22 20 73 74 61 74 75 73 20 73 65 63 74 69 6f 6e 5d e2 T>.[on."Issues".status.section].
744e0 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 6c 69 73 74 2d 69 73 73 75 65 73 e2 80 99 29 0a 20 20 20 ...(...forge-list-issues...)....
74500 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6c 69 73 74 73 20 74 68 65 20 63 75 72 72 65 6e 74 ..This.command.lists.the.current
74520 20 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 73 20 69 73 73 75 65 73 20 69 6e 20 61 20 73 65 70 61 .repository...s.issues.in.a.sepa
74540 72 61 74 65 0a 20 20 20 20 20 62 75 66 66 65 72 2e 20 20 49 66 20 74 68 65 20 6c 69 73 74 20 62 rate......buffer...If.the.list.b
74560 75 66 66 65 72 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 2c 20 74 68 69 73 20 63 6f 6d 6d 61 uffer.already.exists,.this.comma
74580 6e 64 20 6c 69 6d 69 74 73 20 74 68 65 0a 20 20 20 20 20 6c 69 73 74 20 74 6f 20 69 73 73 75 65 nd.limits.the......list.to.issue
745a0 73 2e 20 20 49 66 20 61 6e 79 20 6f 74 68 65 72 20 66 69 6c 74 65 72 73 20 61 72 65 20 69 6e 20 s...If.any.other.filters.are.in.
745c0 65 66 66 65 63 74 2c 20 74 68 65 79 20 61 72 65 20 6c 65 66 74 0a 20 20 20 20 20 69 6e 74 61 63 effect,.they.are.left......intac
745e0 74 2e 0a 0a e2 80 98 3c 52 45 54 3e 20 5b 6f 6e 20 22 50 75 6c 6c 20 72 65 71 75 65 73 74 73 22 t......<RET>.[on."Pull.requests"
74600 20 73 74 61 74 75 73 20 73 65 63 74 69 6f 6e 5d e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 6c 69 .status.section]....(...forge-li
74620 73 74 2d 70 75 6c 6c 72 65 71 73 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e st-pullreqs...)......This.comman
74640 64 20 6c 69 73 74 73 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 e2 80 d.lists.the.current.repository..
74660 99 73 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 69 6e 20 61 0a 20 20 20 20 20 73 65 70 61 72 .s.pull-requests.in.a......separ
74680 61 74 65 20 62 75 66 66 65 72 2e 20 20 49 66 20 74 68 65 20 6c 69 73 74 20 62 75 66 66 65 72 20 ate.buffer...If.the.list.buffer.
746a0 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 2c 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 0a 20 20 20 already.exists,.this.command....
746c0 20 20 6c 69 6d 69 74 73 20 74 68 65 20 6c 69 73 74 20 74 6f 20 70 75 6c 6c 2d 72 65 71 75 65 73 ..limits.the.list.to.pull-reques
746e0 74 73 2e 20 20 49 66 20 61 6e 79 20 6f 74 68 65 72 20 66 69 6c 74 65 72 73 20 61 72 65 20 69 6e ts...If.any.other.filters.are.in
74700 0a 20 20 20 20 20 65 66 66 65 63 74 2c 20 74 68 65 79 20 61 72 65 20 6c 65 66 74 20 69 6e 74 61 ......effect,.they.are.left.inta
74720 63 74 2e 0a 0a e2 80 98 4e 20 6c 20 67 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 6c 69 73 74 2d ct......N.l.g....(...forge-list-
74740 67 6c 6f 62 61 6c 2d 74 6f 70 69 63 73 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d global-topics...)......This.comm
74760 61 6e 64 20 6c 69 73 74 73 20 74 6f 70 69 63 73 20 61 63 72 6f 73 73 20 61 6c 6c 20 74 72 61 63 and.lists.topics.across.all.trac
74780 6b 65 64 20 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 49 66 20 74 68 65 0a 20 20 20 20 20 6c 69 73 ked.repository...If.the......lis
747a0 74 20 62 75 66 66 65 72 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 2c 20 66 69 6c 74 65 72 73 t.buffer.already.exists,.filters
747c0 20 65 78 63 65 70 74 20 66 6f 72 20 74 68 65 20 74 79 70 65 20 66 69 6c 74 65 72 20 61 72 65 0a .except.for.the.type.filter.are.
747e0 20 20 20 20 20 6c 65 66 74 20 69 6e 20 65 66 66 65 63 74 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e .....left.in.effect....--.Comman
74800 64 3a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 2d 69 73 73 75 65 73 0a 20 20 20 20 d:.forge-list-global-issues.....
74820 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6c 69 73 74 73 20 69 73 73 75 65 73 20 61 63 72 6f 73 .This.command.lists.issues.acros
74840 73 20 61 6c 6c 20 74 72 61 63 6b 65 64 20 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 49 66 20 74 68 s.all.tracked.repository...If.th
74860 65 0a 20 20 20 20 20 6c 69 73 74 20 62 75 66 66 65 72 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 e......list.buffer.already.exist
74880 73 2c 20 66 69 6c 74 65 72 73 20 65 78 63 65 70 74 20 66 6f 72 20 74 68 65 20 74 79 70 65 20 66 s,.filters.except.for.the.type.f
748a0 69 6c 74 65 72 20 61 72 65 0a 20 20 20 20 20 6c 65 66 74 20 69 6e 20 65 66 66 65 63 74 2e 0a 0a ilter.are......left.in.effect...
748c0 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 2d 70 .--.Command:.forge-list-global-p
748e0 75 6c 6c 72 65 71 73 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6c 69 73 74 73 20 ullreqs......This.command.lists.
74900 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 61 63 72 6f 73 73 20 61 6c 6c 20 74 72 61 63 6b 65 64 pull-requests.across.all.tracked
74920 20 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 49 66 0a 20 20 20 20 20 74 68 65 20 6c 69 73 74 20 62 .repository...If......the.list.b
74940 75 66 66 65 72 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 2c 20 66 69 6c 74 65 72 73 20 65 78 uffer.already.exists,.filters.ex
74960 63 65 70 74 20 66 6f 72 20 74 68 65 20 74 79 70 65 20 66 69 6c 74 65 72 0a 20 20 20 20 20 61 72 cept.for.the.type.filter......ar
74980 65 20 69 6e 20 65 66 66 65 63 74 2e 0a 0a 4e 6f 74 69 66 69 63 61 74 69 6f 6e 20 6d 65 6e 75 20 e.in.effect...Notification.menu.
749a0 61 6e 64 20 6c 69 73 74 20 63 6f 6d 6d 61 6e 64 73 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d and.list.commands.==============
749c0 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a e2 80 98 4e 20 6d 20 6e e2 =====================.....N.m.n.
749e0 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 65 6e 75 e2 ...(...forge-notifications-menu.
74a00 80 99 29 0a e2 80 98 43 2d 63 20 43 2d 63 20 5b 69 6e 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 ..)....C-c.C-c.[in.notifications
74a20 20 6c 69 73 74 20 62 75 66 66 65 72 5d e2 80 99 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 .list.buffer].........This.comma
74a40 6e 64 20 64 69 73 70 6c 61 79 73 20 61 20 6d 65 6e 75 20 75 73 65 64 20 74 6f 20 63 6f 6e 74 72 nd.displays.a.menu.used.to.contr
74a60 6f 6c 20 74 68 65 20 6c 69 73 74 20 6f 66 0a 20 20 20 20 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e ol.the.list.of......notification
74a80 73 20 64 69 73 70 6c 61 79 65 64 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 s.displayed.in.the.current.buffe
74aa0 72 2e 0a 0a e2 80 98 4e 20 6c 20 6e e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 6c 69 73 74 2d 6e r......N.l.n....(...forge-list-n
74ac0 6f 74 69 66 69 63 61 74 69 6f 6e 73 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 otifications...)......This.comma
74ae0 6e 64 20 6c 69 73 74 73 20 61 6c 6c 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 66 6f 72 20 61 nd.lists.all.notifications.for.a
74b00 6c 6c 20 66 6f 72 67 65 73 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 0a 20 20 20 20 20 62 75 66 ll.forges.in.a.separate......buf
74b20 66 65 72 2e 0a 0a 52 65 70 6f 73 69 74 6f 72 79 20 6d 65 6e 75 20 61 6e 64 20 6c 69 73 74 20 63 fer...Repository.menu.and.list.c
74b40 6f 6d 6d 61 6e 64 73 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ommands.========================
74b60 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a e2 80 98 4e 20 6d 20 72 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 =========.....N.m.r....(...forge
74b80 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e 75 e2 80 99 29 0a e2 80 98 43 2d 63 20 43 2d -repositories-menu...)....C-c.C-
74ba0 63 20 5b 69 6e 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 6c 69 73 74 20 62 75 66 66 65 72 5d e2 c.[in.repositories.list.buffer].
74bc0 80 99 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 64 69 73 70 6c 61 79 73 20 61 20 ........This.command.displays.a.
74be0 6d 65 6e 75 20 75 73 65 64 20 74 6f 20 63 6f 6e 74 72 6f 6c 20 74 68 65 20 6c 69 73 74 20 6f 66 menu.used.to.control.the.list.of
74c00 0a 20 20 20 20 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 64 69 73 70 6c 61 79 65 64 20 69 6e 20 ......repositories.displayed.in.
74c20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 0a e2 80 98 4e 20 6c 20 72 e2 80 99 the.current.buffer......N.l.r...
74c40 20 28 e2 80 98 66 6f 72 67 65 2d 6c 69 73 74 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 e2 80 99 29 .(...forge-list-repositories...)
74c60 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6c 69 73 74 73 20 61 6c 6c 20 6b 6e 6f ......This.command.lists.all.kno
74c80 77 6e 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 wn.repositories.in.a.separate.bu
74ca0 66 66 65 72 2e 0a 20 20 20 20 20 48 65 72 65 20 22 6b 6e 6f 77 6e 22 20 6d 65 61 6e 73 20 74 68 ffer.......Here."known".means.th
74cc0 61 74 20 61 6e 20 65 6e 74 72 79 20 65 78 69 73 74 73 20 69 6e 20 74 68 65 20 6c 6f 63 61 6c 20 at.an.entry.exists.in.the.local.
74ce0 64 61 74 61 62 61 73 65 2e 0a 0a e2 80 98 3c 52 45 54 3e 20 5b 6f 6e 20 72 65 70 6f 73 69 74 6f database......<RET>.[on.reposito
74d00 72 79 5d e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 72 65 70 6f ry]....(...forge-visit-this-repo
74d20 73 69 74 6f 72 79 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 73 20 76 69 sitory...)......This.commands.vi
74d40 73 69 74 73 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 61 74 20 70 6f 69 6e 74 20 69 6e 20 sits.the.repository.at.point.in.
74d60 61 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 2e 0a 0a e2 80 98 6f 20 5b 69 6e 20 66 6f 72 a.separate.buffer......o.[in.for
74d80 67 65 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e 75 5d e2 80 99 20 28 e2 80 98 66 6f 72 ge-repositories-menu]....(...for
74da0 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 e2 80 99 29 0a 20 ge-list-owned-repositories...)..
74dc0 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6c 69 73 74 73 20 61 6c 6c 20 6b 6e 6f 77 6e ....This.command.lists.all.known
74de0 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 74 68 61 74 20 62 65 6c 6f 6e 67 20 74 6f 20 74 68 65 .repositories.that.belong.to.the
74e00 20 75 73 65 72 0a 20 20 20 20 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 2e .user......in.a.separate.buffer.
74e20 20 20 48 65 72 65 20 22 6b 6e 6f 77 6e 22 20 6d 65 61 6e 73 20 74 68 61 74 20 61 6e 20 65 6e 74 ..Here."known".means.that.an.ent
74e40 72 79 20 65 78 69 73 74 73 20 69 6e 0a 20 20 20 20 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 ry.exists.in......the.local.data
74e60 62 61 73 65 2e 20 20 4f 6e 6c 79 20 47 69 74 68 75 62 20 69 73 20 73 75 70 70 6f 72 74 65 64 20 base...Only.Github.is.supported.
74e80 66 6f 72 20 6e 6f 77 2e 0a 0a 20 20 20 54 68 65 20 62 65 6c 6f 77 20 6f 70 74 69 6f 6e 73 20 63 for.now......The.below.options.c
74ea0 6f 6e 74 72 6f 6c 73 20 77 68 69 63 68 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 63 ontrols.which.repositories.are.c
74ec0 6f 6e 73 69 64 65 72 65 64 20 74 6f 20 62 65 0a 6f 77 6e 65 64 20 62 79 20 74 68 65 20 75 73 65 onsidered.to.be.owned.by.the.use
74ee0 72 2e 20 20 54 68 65 79 20 61 72 65 20 61 64 64 69 74 69 6f 6e 61 6c 6c 79 20 75 73 65 64 20 62 r...They.are.additionally.used.b
74f00 79 20 e2 80 98 66 6f 72 67 65 2d 66 6f 72 6b e2 80 99 2e 0a 0a 20 2d 2d 20 55 73 65 72 20 4f 70 y....forge-fork.......--.User.Op
74f20 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e 74 73 0a 20 20 20 20 20 tion:.forge-owned-accounts......
74f40 54 68 69 73 20 69 73 20 61 6e 20 61 6c 69 73 74 20 6f 66 20 61 63 63 6f 75 6e 74 73 20 74 68 61 This.is.an.alist.of.accounts.tha
74f60 74 20 61 72 65 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 2e 20 20 54 68 69 73 20 73 68 6f 75 6c 64 t.are.owned.by.you...This.should
74f80 0a 20 20 20 20 20 69 6e 63 6c 75 64 65 20 79 6f 75 72 20 75 73 65 72 6e 61 6d 65 20 61 73 20 77 ......include.your.username.as.w
74fa0 65 6c 6c 20 61 73 20 61 6e 79 20 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 20 74 68 61 74 20 79 6f 75 ell.as.any.organization.that.you
74fc0 20 6f 77 6e 2e 0a 0a 20 20 20 20 20 45 61 63 68 20 65 6c 65 6d 65 6e 74 20 68 61 73 20 74 68 65 .own........Each.element.has.the
74fe0 20 66 6f 72 6d 20 e2 80 98 28 41 43 43 4f 55 4e 54 20 2e 20 50 4c 49 53 54 29 e2 80 99 2e 20 20 .form....(ACCOUNT...PLIST)......
75000 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 20 20 20 20 20 70 72 6f 70 65 72 74 69 65 73 20 61 72 The.following......properties.ar
75020 65 20 63 75 72 72 65 6e 74 6c 79 20 62 65 69 6e 67 20 75 73 65 64 3a 0a 0a 20 20 20 20 20 20 20 e.currently.being.used:.........
75040 20 e2 80 a2 20 e2 80 98 72 65 6d 6f 74 65 2d 6e 61 6d 65 e2 80 99 20 54 68 65 20 64 65 66 61 75 ........remote-name....The.defau
75060 6c 74 20 6e 61 6d 65 20 73 75 67 67 65 73 74 65 64 20 62 79 20 e2 80 98 66 6f 72 67 65 2d 66 6f lt.name.suggested.by....forge-fo
75080 72 6b e2 80 99 20 66 6f 72 20 61 0a 20 20 20 20 20 20 20 20 20 20 66 6f 72 6b 20 63 72 65 61 74 rk....for.a...........fork.creat
750a0 65 64 20 77 69 74 68 69 6e 20 74 68 69 73 20 61 63 63 6f 75 6e 74 2e 20 20 49 66 20 75 6e 73 70 ed.within.this.account...If.unsp
750c0 65 63 69 66 69 65 64 2c 20 74 68 65 6e 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 ecified,.then.the...........name
750e0 20 6f 66 20 74 68 65 20 61 63 63 6f 75 6e 74 20 69 73 20 75 73 65 64 2e 0a 0a 20 20 20 20 20 45 .of.the.account.is.used........E
75100 78 61 6d 70 6c 65 3a 20 e2 80 98 28 28 22 74 61 72 73 69 75 73 22 29 20 28 22 65 6d 61 63 73 6d xample:....(("tarsius").("emacsm
75120 69 72 72 6f 72 22 20 72 65 6d 6f 74 65 2d 6e 61 6d 65 20 22 6d 69 72 72 6f 72 22 29 29 e2 80 99 irror".remote-name."mirror"))...
75140 2e 0a 0a 20 2d 2d 20 55 73 65 72 20 4f 70 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d ....--.User.Option:.forge-owned-
75160 69 67 6e 6f 72 65 64 0a 20 20 20 20 20 54 68 69 73 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 72 ignored......This.is.a.list.of.r
75180 65 70 6f 73 69 74 6f 72 79 20 6e 61 6d 65 73 20 74 68 61 74 20 61 72 65 20 63 6f 6e 73 69 64 65 epository.names.that.are.conside
751a0 72 65 64 20 74 6f 20 6e 6f 74 20 62 65 0a 20 20 20 20 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 2c red.to.not.be......owned.by.you,
751c0 20 65 76 65 6e 20 74 68 6f 75 67 68 20 74 68 65 79 20 77 6f 75 6c 64 20 68 61 76 65 20 62 65 65 .even.though.they.would.have.bee
751e0 6e 20 63 6f 6e 73 69 64 65 72 65 64 20 74 6f 20 62 65 0a 20 20 20 20 20 6f 77 6e 65 64 20 62 79 n.considered.to.be......owned.by
75200 20 79 6f 75 20 62 61 73 65 64 20 6f 6e 20 e2 80 98 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 .you.based.on....forge-owned-acc
75220 6f 75 6e 74 73 e2 80 99 2e 0a 0a 45 78 69 74 69 6e 67 20 6d 65 6e 75 73 20 61 6e 64 20 6c 69 73 ounts......Exiting.menus.and.lis
75240 74 73 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 54 6f 20 65 ts.=======================..To.e
75260 78 69 74 20 61 20 6d 65 6e 75 2c 20 74 79 70 65 20 e2 80 98 43 2d 67 e2 80 99 2e 20 20 49 66 20 xit.a.menu,.type....C-g......If.
75280 74 68 65 20 6d 65 6e 75 20 77 61 73 20 69 6e 76 6f 6b 65 64 20 66 72 6f 6d 20 61 6e 6f 74 68 65 the.menu.was.invoked.from.anothe
752a0 72 20 6d 65 6e 75 0a 61 6e 64 20 74 68 61 74 20 6d 65 6e 75 20 69 73 20 75 73 65 66 75 6c 20 69 r.menu.and.that.menu.is.useful.i
752c0 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2c 20 74 68 65 6e 20 74 68 61 74 20 n.the.current.buffer,.then.that.
752e0 6d 65 6e 75 20 62 65 63 6f 6d 65 73 0a 61 63 74 69 76 65 20 61 67 61 69 6e 2e 20 20 49 66 20 74 menu.becomes.active.again...If.t
75300 68 61 74 20 68 61 70 70 65 6e 73 20 61 6e 64 20 79 6f 75 20 61 63 74 75 61 6c 6c 79 20 77 61 6e hat.happens.and.you.actually.wan
75320 74 20 74 6f 20 71 75 69 74 20 61 6c 6c 20 6d 65 6e 75 73 2c 0a 74 68 65 6e 20 6a 75 73 74 20 74 t.to.quit.all.menus,.then.just.t
75340 79 70 65 20 e2 80 98 43 2d 67 e2 80 99 20 61 67 61 69 6e 2e 20 20 59 6f 75 20 63 61 6e 20 61 6c ype....C-g....again...You.can.al
75360 73 6f 20 64 69 72 65 63 74 6c 79 20 65 78 69 74 20 61 6c 6c 20 6d 65 6e 75 73 20 62 79 0a 75 73 so.directly.exit.all.menus.by.us
75380 69 6e 67 20 e2 80 98 43 2d 71 e2 80 99 2c 20 69 6e 73 74 65 61 64 20 6f 66 20 e2 80 98 43 2d 67 ing....C-q...,.instead.of....C-g
753a0 e2 80 99 2e 0a 0a 20 20 20 54 79 70 65 20 e2 80 98 71 e2 80 99 20 74 6f 20 71 75 69 74 20 6e 6f .........Type....q....to.quit.no
753c0 74 20 6f 6e 6c 79 20 74 68 65 20 6d 65 6e 75 2c 20 62 75 74 20 61 6c 73 6f 20 74 68 65 20 6c 69 t.only.the.menu,.but.also.the.li
753e0 73 74 20 6f 72 20 74 6f 70 69 63 20 64 65 74 61 69 6c 0a 62 75 66 66 65 72 2e 20 20 54 68 61 74 st.or.topic.detail.buffer...That
75400 20 62 69 6e 64 69 6e 67 20 69 73 20 61 6c 73 6f 20 61 76 61 69 6c 61 62 6c 65 20 77 68 65 6e 20 .binding.is.also.available.when.
75420 6e 6f 20 6d 65 6e 75 20 69 73 20 61 63 74 69 76 65 2c 20 69 6e 20 77 68 69 63 68 0a 63 61 73 65 no.menu.is.active,.in.which.case
75440 20 69 74 20 77 69 6c 6c 20 73 69 6d 70 6c 79 20 71 75 69 74 20 74 68 65 20 62 75 66 66 65 72 2e .it.will.simply.quit.the.buffer.
75460 20 20 57 68 65 6e 20 69 6e 76 6f 6b 65 64 20 66 72 6f 6d 20 61 20 6d 65 6e 75 2c 20 74 68 65 6e ..When.invoked.from.a.menu,.then
75480 0a 74 68 69 73 20 62 69 6e 64 69 6e 67 20 6d 61 79 20 72 65 74 75 72 6e 20 74 6f 20 61 6e 6f 74 .this.binding.may.return.to.anot
754a0 68 65 72 20 6c 69 73 74 20 62 75 66 66 65 72 2c 20 69 6e 20 77 68 69 63 68 20 63 61 73 65 20 73 her.list.buffer,.in.which.case.s
754c0 6f 6d 65 20 6d 65 6e 75 0a 6d 61 79 20 61 6c 73 6f 20 72 65 6d 61 69 6e 20 61 63 74 69 76 65 2e ome.menu.may.also.remain.active.
754e0 0a 0a 44 65 66 61 75 6c 74 20 74 6f 70 69 63 20 66 69 6c 74 65 72 73 0a 3d 3d 3d 3d 3d 3d 3d 3d ..Default.topic.filters.========
75500 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 20 2d 2d 20 55 73 65 72 20 4f 70 74 69 6f 6e 3a 20 =============...--.User.Option:.
75520 66 6f 72 67 65 2d 6c 69 73 74 2d 62 75 66 66 65 72 2d 64 65 66 61 75 6c 74 2d 74 6f 70 69 63 2d forge-list-buffer-default-topic-
75540 66 69 6c 74 65 72 73 0a 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 6f 6e 20 73 70 65 63 69 66 69 filters......This.option.specifi
75560 65 73 20 74 68 65 20 66 69 6c 74 65 72 73 20 69 6e 69 74 69 61 6c 6c 79 20 75 73 65 64 20 74 6f es.the.filters.initially.used.to
75580 20 6c 69 6d 69 74 20 74 6f 70 69 63 73 0a 20 20 20 20 20 6c 69 73 74 65 64 20 69 6e 20 74 6f 70 .limit.topics......listed.in.top
755a0 69 63 20 6c 69 73 74 20 62 75 66 66 65 72 73 2e 0a 0a 20 2d 2d 20 55 73 65 72 20 4f 70 74 69 6f ic.list.buffers....--.User.Optio
755c0 6e 3a 20 66 6f 72 67 65 2d 73 74 61 74 75 73 2d 62 75 66 66 65 72 2d 64 65 66 61 75 6c 74 2d 74 n:.forge-status-buffer-default-t
755e0 6f 70 69 63 2d 66 69 6c 74 65 72 73 0a 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 6f 6e 20 73 70 opic-filters......This.option.sp
75600 65 63 69 66 69 65 73 20 74 68 65 20 66 69 6c 74 65 72 73 20 69 6e 69 74 69 61 6c 6c 79 20 75 73 ecifies.the.filters.initially.us
75620 65 64 20 74 6f 20 6c 69 6d 69 74 20 74 6f 70 69 63 73 0a 20 20 20 20 20 6c 69 73 74 65 64 20 69 ed.to.limit.topics......listed.i
75640 6e 20 4d 61 67 69 74 20 73 74 61 74 75 73 20 62 75 66 66 65 72 73 2e 0a 0a 20 20 20 20 20 41 6c n.Magit.status.buffers........Al
75660 73 6f 20 73 65 65 20 2a 6e 6f 74 65 20 54 6f 70 69 63 20 73 65 63 74 69 6f 6e 73 20 69 6e 20 4d so.see.*note.Topic.sections.in.M
75680 61 67 69 74 20 73 74 61 74 75 73 20 62 75 66 66 65 72 73 3a 3a 2e 0a 0a 54 6f 70 69 63 20 73 65 agit.status.buffers::...Topic.se
756a0 63 74 69 6f 6e 73 20 69 6e 20 4d 61 67 69 74 20 73 74 61 74 75 73 20 62 75 66 66 65 72 73 0a 3d ctions.in.Magit.status.buffers.=
756c0 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================================
756e0 3d 3d 3d 3d 3d 0a 0a 46 6f 72 67 65 20 61 72 72 61 6e 67 65 73 20 66 6f 72 20 63 65 72 74 61 69 =====..Forge.arranges.for.certai
75700 6e 20 69 73 73 75 65 73 20 61 6e 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 74 6f 20 62 65 n.issues.and.pull-requests.to.be
75720 20 6c 69 73 74 20 69 6e 20 4d 61 67 69 74 0a 73 74 61 74 75 73 20 62 75 66 66 65 72 73 2c 20 62 .list.in.Magit.status.buffers,.b
75740 79 20 61 64 64 69 6e 67 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 y.adding.the.following.functions
75760 20 74 6f 0a e2 80 98 6d 61 67 69 74 2d 73 74 61 74 75 73 2d 73 65 63 74 69 6f 6e 73 2d 68 6f 6f .to....magit-status-sections-hoo
75780 6b e2 80 99 2e 0a 0a 20 20 20 57 68 69 63 68 20 74 6f 70 69 63 73 20 61 72 65 20 6c 69 73 74 65 k.........Which.topics.are.liste
757a0 64 20 69 6e 69 74 69 61 6c 6c 79 20 69 73 20 63 75 73 74 6f 6d 69 7a 61 62 6c 65 20 75 73 69 6e d.initially.is.customizable.usin
757c0 67 20 6f 70 74 69 6f 6e 0a e2 80 98 66 6f 72 67 65 2d 73 74 61 74 75 73 2d 62 75 66 66 65 72 2d g.option....forge-status-buffer-
757e0 64 65 66 61 75 6c 74 2d 74 6f 70 69 63 2d 66 69 6c 74 65 72 73 e2 80 99 20 61 6e 64 20 63 61 6e default-topic-filters....and.can
75800 20 62 65 20 63 68 61 6e 67 65 64 0a 74 65 6d 70 6f 72 61 72 69 6c 79 20 66 6f 72 20 74 68 65 20 .be.changed.temporarily.for.the.
75820 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2c 20 75 73 69 6e 67 20 e2 80 98 4e 20 6d 20 66 e2 80 current.buffer,.using....N.m.f..
75840 99 20 28 e2 80 98 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 e2 80 99 29 2e 0a 0a 20 2d ..(...forge-topics-menu...)....-
75860 2d 20 46 75 6e 63 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 64 69 73 63 75 73 73 -.Function:.forge-insert-discuss
75880 69 6f 6e 73 0a 20 20 20 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 6e 73 65 72 74 73 20 ions......This.function.inserts.
758a0 61 20 6c 69 73 74 20 6f 66 20 64 69 73 63 75 73 73 69 6f 6e 73 2c 20 62 79 20 64 65 66 61 75 6c a.list.of.discussions,.by.defaul
758c0 74 20 61 20 6c 69 73 74 20 6f 66 0a 20 20 20 20 20 22 61 63 74 69 76 65 22 20 64 69 73 63 75 73 t.a.list.of......"active".discus
758e0 73 69 6f 6e 73 2e 0a 0a 20 2d 2d 20 46 75 6e 63 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 69 6e 73 65 sions....--.Function:.forge-inse
75900 72 74 2d 69 73 73 75 65 73 0a 20 20 20 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 6e 73 rt-issues......This.function.ins
75920 65 72 74 73 20 61 20 6c 69 73 74 20 6f 66 20 69 73 73 75 65 73 2c 20 62 79 20 64 65 66 61 75 6c erts.a.list.of.issues,.by.defaul
75940 74 20 61 20 6c 69 73 74 20 6f 66 0a 20 20 20 20 20 22 61 63 74 69 76 65 22 20 69 73 73 75 65 73 t.a.list.of......"active".issues
75960 2e 0a 0a 20 2d 2d 20 46 75 6e 63 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 70 75 ....--.Function:.forge-insert-pu
75980 6c 6c 72 65 71 73 0a 20 20 20 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 6e 73 65 72 74 llreqs......This.function.insert
759a0 73 20 61 20 6c 69 73 74 20 6f 66 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2c 20 62 79 20 64 65 s.a.list.of.pull-requests,.by.de
759c0 66 61 75 6c 74 20 61 20 6c 69 73 74 20 6f 66 0a 20 20 20 20 20 22 61 63 74 69 76 65 22 20 70 75 fault.a.list.of......"active".pu
759e0 6c 6c 2d 72 65 71 75 65 73 74 73 2e 0a 0a 20 20 20 46 6f 72 67 65 20 75 73 65 64 20 74 6f 20 70 ll-requests......Forge.used.to.p
75a00 72 6f 76 69 64 65 20 61 64 64 69 74 69 6f 6e 61 6c 20 66 75 6e 63 74 69 6f 6e 73 20 74 6f 20 69 rovide.additional.functions.to.i
75a20 6e 73 65 72 74 20 68 61 72 64 2d 63 6f 64 65 64 20 74 6f 70 69 63 0a 73 75 62 73 65 74 73 2c 20 nsert.hard-coded.topic.subsets,.
75a40 62 75 74 20 74 68 65 79 20 77 65 72 65 20 72 65 6d 6f 76 65 64 20 69 6e 20 66 61 76 6f 72 20 6f but.they.were.removed.in.favor.o
75a60 66 20 74 68 65 20 6d 6f 72 65 20 66 6c 65 78 69 62 6c 65 20 61 70 70 72 6f 61 63 68 0a 64 65 73 f.the.more.flexible.approach.des
75a80 63 72 69 62 65 64 20 61 62 6f 76 65 2e 20 20 49 66 20 79 6f 75 20 6d 69 73 73 20 74 68 65 20 72 cribed.above...If.you.miss.the.r
75aa0 65 6d 6f 76 65 64 20 73 65 63 74 69 6f 6e 73 2c 20 79 6f 75 20 63 61 6e 20 75 73 65 20 74 68 65 emoved.sections,.you.can.use.the
75ac0 20 6e 65 77 0a e2 80 98 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 73 e2 80 99 20 68 .new....forge-insert-topics....h
75ae0 65 6c 70 65 72 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 64 65 66 69 6e 65 20 79 6f 75 72 20 6f 77 elper.function.to.define.your.ow
75b00 6e 20 73 65 63 74 69 6f 6e 0a 69 6e 73 65 72 74 65 72 20 66 75 6e 63 74 69 6f 6e 73 2e 20 20 53 n.section.inserter.functions...S
75b20 65 65 20 69 74 73 20 64 6f 63 73 74 72 69 6e 67 20 66 6f 72 20 6d 6f 72 65 20 69 6e 66 6f 72 6d ee.its.docstring.for.more.inform
75b40 61 74 69 6f 6e 2e 0a 0a 20 20 20 49 66 20 79 6f 75 20 64 6f 6e e2 80 99 74 20 77 61 6e 74 20 61 ation......If.you.don...t.want.a
75b60 6e 79 20 74 6f 70 69 63 20 6c 69 73 74 20 73 65 63 74 69 6f 6e 73 20 74 6f 20 62 65 20 64 69 73 ny.topic.list.sections.to.be.dis
75b80 70 6c 61 79 65 64 20 69 6e 20 4d 61 67 69 74 0a 73 74 61 74 75 73 20 62 75 66 66 65 72 73 2c 20 played.in.Magit.status.buffers,.
75ba0 73 65 74 20 e2 80 98 66 6f 72 67 65 2d 61 64 64 2d 64 65 66 61 75 6c 74 2d 73 65 63 74 69 6f 6e set....forge-add-default-section
75bc0 73 e2 80 99 20 74 6f 20 e2 80 98 6e 69 6c e2 80 99 20 62 65 66 6f 72 65 20 e2 80 98 6d 61 67 69 s....to....nil....before....magi
75be0 74 e2 80 99 0a 69 73 20 6c 6f 61 64 65 64 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 t....is.loaded.....File:.forge.i
75c00 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2c 20 20 4e 65 nfo,..Node:.Visiting.Topics,..Ne
75c20 78 74 3a 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2c 20 20 xt:.Creating.Topics.and.Posts,..
75c40 50 72 65 76 3a 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2c 20 20 55 70 3a 20 54 6f 70 0a Prev:.Lists.and.Menus,..Up:.Top.
75c60 0a 36 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a .6.Visiting.Topics.*************
75c80 2a 2a 2a 2a 0a 0a 54 68 65 20 63 6f 6d 6d 61 6e 64 73 2c 20 61 63 63 65 73 73 69 62 6c 65 20 66 ****..The.commands,.accessible.f
75ca0 72 6f 6d 20 e2 80 98 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 e2 80 99 20 28 6f 6e 20 e2 rom....forge-topic-menu....(on..
75cc0 80 98 43 2d 72 65 74 75 72 6e e2 80 99 29 2c 20 61 63 74 20 6f 6e 0a 74 68 65 20 74 6f 70 69 63 ..C-return...),.act.on.the.topic
75ce0 20 61 74 20 70 6f 69 6e 74 3b 20 73 6f 20 74 68 69 73 20 6d 65 6e 75 20 69 73 20 75 73 65 66 75 .at.point;.so.this.menu.is.usefu
75d00 6c 20 69 6e 20 62 75 66 66 65 72 73 20 64 65 64 69 63 61 74 65 64 20 74 6f 0a 6c 69 73 74 69 6e l.in.buffers.dedicated.to.listin
75d20 67 20 74 6f 70 69 63 73 20 61 6e 64 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 28 77 68 69 63 g.topics.and.notifications.(whic
75d40 68 20 63 6f 72 72 65 73 70 6f 6e 64 20 74 6f 20 74 6f 70 69 63 73 29 2c 20 62 75 74 20 61 6c 73 h.correspond.to.topics),.but.als
75d60 6f 0a 69 6e 20 74 68 65 20 73 74 61 74 75 73 20 62 75 66 66 65 72 20 28 77 68 69 63 68 20 61 6c o.in.the.status.buffer.(which.al
75d80 73 6f 20 6c 69 73 74 73 20 74 6f 70 69 63 73 29 2e 20 20 49 6e 20 62 75 66 66 65 72 73 20 64 65 so.lists.topics)...In.buffers.de
75da0 64 69 63 61 74 65 64 20 74 6f 0a 73 68 6f 77 69 6e 67 20 64 65 74 61 69 6c 73 20 61 62 6f 75 74 dicated.to.showing.details.about
75dc0 20 61 20 73 69 6e 67 6c 65 20 74 6f 70 69 63 2c 20 74 68 65 73 65 20 63 6f 6d 6d 61 6e 64 73 20 .a.single.topic,.these.commands.
75de0 61 63 74 20 6f 6e 20 74 68 61 74 20 74 6f 70 69 63 3b 0a 73 6f 20 74 68 69 73 20 6d 65 6e 75 20 act.on.that.topic;.so.this.menu.
75e00 63 61 6e 20 62 65 20 75 73 65 64 20 74 68 65 72 65 20 74 6f 6f 2e 0a 0a 20 20 20 54 6f 20 73 77 can.be.used.there.too......To.sw
75e20 69 74 63 68 20 74 6f 20 74 68 69 73 20 6d 65 6e 75 20 66 72 6f 6d 20 61 6e 6f 74 68 65 72 20 6d itch.to.this.menu.from.another.m
75e40 65 6e 75 20 75 73 65 20 e2 80 98 6d 20 73 e2 80 99 2e 20 20 49 66 20 74 68 65 20 63 75 72 73 6f enu.use....m.s......If.the.curso
75e60 72 20 69 73 0a 6f 6e 20 61 20 74 6f 70 69 63 20 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 r.is.on.a.topic.or.the.current.b
75e80 75 66 66 65 72 20 76 69 73 69 74 73 20 61 20 74 6f 70 69 63 2e 0a 0a 20 20 20 54 6f 20 64 69 73 uffer.visits.a.topic......To.dis
75ea0 70 6c 61 79 20 64 65 74 61 69 6c 73 20 61 62 6f 75 74 20 61 20 74 6f 70 69 63 20 69 6e 20 61 20 play.details.about.a.topic.in.a.
75ec0 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 20 61 6e 64 20 61 74 20 74 68 65 20 73 61 6d 65 0a separate.buffer.and.at.the.same.
75ee0 74 69 6d 65 20 64 69 73 70 6c 61 79 20 74 68 65 20 74 6f 70 69 63 20 6d 65 6e 75 2c 20 69 6e 76 time.display.the.topic.menu,.inv
75f00 6f 6b 65 20 e2 80 98 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 e2 80 99 20 77 69 74 68 20 oke....forge-topic-menu....with.
75f20 61 20 70 72 65 66 69 78 0a 61 72 67 75 6d 65 6e 74 2c 20 69 2e 65 2e 2c 20 e2 80 98 43 2d 75 20 a.prefix.argument,.i.e.,....C-u.
75f40 52 45 54 e2 80 99 2e 0a 0a e2 80 98 3c 52 45 54 3e 20 5b 6f 6e 20 74 6f 70 69 63 5d e2 80 99 20 RET.........<RET>.[on.topic]....
75f60 28 e2 80 98 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 74 6f 70 69 63 e2 80 99 29 0a 20 (...forge-visit-this-topic...)..
75f80 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 73 20 76 69 73 69 74 73 20 74 68 65 20 74 6f 70 ....This.commands.visits.the.top
75fa0 69 63 20 61 74 20 70 6f 69 6e 74 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 ic.at.point.in.a.separate.buffer
75fc0 2e 20 20 57 68 65 6e 0a 20 20 20 20 20 69 6e 76 6f 6b 65 64 20 77 69 74 68 20 61 20 70 72 65 66 ...When......invoked.with.a.pref
75fe0 69 78 20 61 72 67 75 6d 65 6e 74 20 74 68 65 6e 20 69 74 20 6e 6f 74 20 6f 6e 6c 79 20 76 69 73 ix.argument.then.it.not.only.vis
76000 69 74 73 20 74 68 65 20 74 6f 70 69 63 20 69 6e 0a 20 20 20 20 20 61 20 73 65 70 61 72 61 74 65 its.the.topic.in......a.separate
76020 20 62 75 66 66 65 72 2c 20 69 74 20 61 74 20 74 68 65 20 73 61 6d 65 20 74 69 6d 65 20 64 69 73 .buffer,.it.at.the.same.time.dis
76040 70 6c 61 79 73 0a 0a e2 80 98 4e 20 76 20 74 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 76 69 73 plays.....N.v.t....(...forge-vis
76060 69 74 2d 74 6f 70 69 63 e2 80 99 29 0a e2 80 98 4e 20 76 20 69 e2 80 99 20 28 e2 80 98 66 6f 72 it-topic...)....N.v.i....(...for
76080 67 65 2d 76 69 73 69 74 2d 69 73 73 75 65 e2 80 99 29 0a e2 80 98 4e 20 76 20 70 e2 80 99 20 28 ge-visit-issue...)....N.v.p....(
760a0 e2 80 98 66 6f 72 67 65 2d 76 69 73 69 74 2d 70 75 6c 6c 72 65 71 e2 80 99 29 0a 20 20 20 20 20 ...forge-visit-pullreq...)......
760c0 54 68 65 73 65 20 63 6f 6d 6d 61 6e 64 73 20 72 65 61 64 20 61 20 74 6f 70 69 63 2c 20 69 73 73 These.commands.read.a.topic,.iss
760e0 75 65 20 6f 72 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 61 6e 64 20 76 69 73 69 74 20 69 74 20 ue.or.pull-request.and.visit.it.
76100 69 6e 0a 20 20 20 20 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 2e 0a 0a e2 80 98 4e in......a.separate.buffer......N
76120 20 76 20 75 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 6f 70 69 63 2d 66 72 .v.u....(...forge-visit-topic-fr
76140 6f 6d 2d 75 72 6c e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 73 20 72 65 om-url...)......This.commands.re
76160 61 64 73 20 61 6e 20 55 52 4c 20 61 6e 64 20 76 69 73 69 74 73 20 74 68 65 20 63 6f 72 72 65 73 ads.an.URL.and.visits.the.corres
76180 70 6f 6e 64 69 6e 67 20 74 6f 70 69 63 2e 0a 20 20 20 20 20 4e 6f 72 6d 61 6c 6c 79 20 75 73 65 ponding.topic.......Normally.use
761a0 72 73 20 77 6f 75 6c 64 20 79 61 6e 6b 20 74 68 61 74 20 55 52 4c 20 69 6e 74 6f 20 74 68 65 20 rs.would.yank.that.URL.into.the.
761c0 6d 69 6e 69 62 75 66 66 65 72 2c 20 61 66 74 65 72 0a 20 20 20 20 20 68 61 76 69 6e 67 20 63 6f minibuffer,.after......having.co
761e0 70 69 65 64 20 69 74 20 66 72 6f 6d 20 61 6e 20 65 6d 61 69 6c 20 6f 72 20 61 20 62 72 6f 77 73 pied.it.from.an.email.or.a.brows
76200 65 72 e2 80 99 73 20 61 64 64 72 65 73 73 20 62 61 72 2e 0a 0a 20 20 20 20 20 54 68 69 73 20 63 er...s.address.bar........This.c
76220 6f 6d 6d 61 6e 64 20 69 73 20 64 69 73 61 62 6c 65 64 20 69 6e 20 74 68 65 20 6d 65 6e 75 20 62 ommand.is.disabled.in.the.menu.b
76240 79 20 64 65 66 61 75 6c 74 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 6f e2 80 99 20 28 e2 80 98 66 6f y.default......C-c.C-o....(...fo
76260 72 67 65 2d 62 72 6f 77 73 65 e2 80 99 29 0a e2 80 98 6f 20 5b 6f 6e 20 74 6f 70 69 63 20 69 6e rge-browse...)....o.[on.topic.in
76280 20 74 6f 70 69 63 20 6c 69 73 74 5d e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 62 72 6f 77 73 65 .topic.list]....(...forge-browse
762a0 2d 74 68 69 73 2d 74 6f 70 69 63 e2 80 99 29 0a e2 80 98 6f 20 5b 6f 6e 20 72 65 70 6f 73 69 74 -this-topic...)....o.[on.reposit
762c0 6f 72 79 20 69 6e 20 72 65 70 6f 73 69 74 6f 72 79 20 6c 69 73 74 5d e2 80 99 20 28 e2 80 98 66 ory.in.repository.list]....(...f
762e0 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 68 69 73 2d 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 29 0a orge-browse-this-repository...).
76300 20 20 20 20 20 54 68 65 73 65 20 63 6f 6d 6d 61 6e 64 73 20 76 69 73 69 74 20 74 68 65 20 74 6f .....These.commands.visit.the.to
76320 70 69 63 2c 20 69 73 73 75 65 28 73 29 2c 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 28 73 29 2c 20 pic,.issue(s),.pull-request(s),.
76340 70 6f 73 74 2c 0a 20 20 20 20 20 62 72 61 6e 63 68 2c 20 63 6f 6d 6d 69 74 2c 20 72 65 6d 6f 74 post,......branch,.commit,.remot
76360 65 2c 20 72 65 70 6f 73 69 74 6f 72 79 20 6f 72 20 62 6c 6f 62 20 61 74 20 70 6f 69 6e 74 20 69 e,.repository.or.blob.at.point.i
76380 6e 20 61 20 62 72 6f 77 73 65 72 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 n.a.browser....--.Command:.forge
763a0 2d 62 72 6f 77 73 65 2d 63 6f 6d 6d 69 74 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 -browse-commit..--.Command:.forg
763c0 65 2d 62 72 6f 77 73 65 2d 62 72 61 6e 63 68 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 e-browse-branch..--.Command:.for
763e0 67 65 2d 62 72 6f 77 73 65 2d 72 65 70 6f 73 69 74 6f 72 79 0a e2 80 98 4e 20 62 20 74 e2 80 99 ge-browse-repository....N.b.t...
76400 20 28 e2 80 98 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 6f 70 69 63 e2 80 99 29 0a e2 80 98 4e .(...forge-browse-topic...)....N
76420 20 62 20 69 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 73 75 65 e2 80 .b.i....(...forge-browse-issue..
76440 99 29 0a e2 80 98 4e 20 62 20 70 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d .)....N.b.p....(...forge-browse-
76460 70 75 6c 6c 72 65 71 e2 80 99 29 0a e2 80 98 4e 20 62 20 72 e2 80 99 20 28 e2 80 98 66 6f 72 67 pullreq...)....N.b.r....(...forg
76480 65 2d 62 72 6f 77 73 65 2d 72 65 6d 6f 74 65 e2 80 99 29 0a e2 80 98 4e 20 62 20 49 e2 80 99 20 e-browse-remote...)....N.b.I....
764a0 28 e2 80 98 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 73 75 65 73 e2 80 99 29 0a e2 80 98 4e (...forge-browse-issues...)....N
764c0 20 62 20 50 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 70 75 6c 6c 72 65 71 .b.P....(...forge-browse-pullreq
764e0 73 e2 80 99 29 0a 20 20 20 20 20 54 68 65 73 65 20 63 6f 6d 6d 61 6e 64 73 20 72 65 61 64 20 61 s...)......These.commands.read.a
76500 20 74 6f 70 69 63 2c 20 69 73 73 75 65 28 73 29 2c 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 28 73 .topic,.issue(s),.pull-request(s
76520 29 2c 20 62 72 61 6e 63 68 2c 0a 20 20 20 20 20 63 6f 6d 6d 69 74 2c 20 72 65 6d 6f 74 65 20 6f ),.branch,......commit,.remote.o
76540 72 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 61 6e 64 20 6f 70 65 6e 20 69 74 20 69 6e 20 61 20 62 r.repository,.and.open.it.in.a.b
76560 72 6f 77 73 65 72 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 62 72 6f 77 rowser....--.Command:.forge-brow
76580 73 65 2d 63 6f 6d 6d 69 74 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 76 69 73 69 se-commit......This.command.visi
765a0 74 20 61 20 62 6c 6f 62 20 69 6e 20 61 20 62 72 6f 77 73 65 72 2e 0a 0a 20 20 20 20 20 57 68 65 t.a.blob.in.a.browser........Whe
765c0 6e 20 69 6e 76 6f 6b 65 64 20 66 72 6f 6d 20 61 20 62 6c 6f 62 2d 20 6f 72 20 66 69 6c 65 2d 76 n.invoked.from.a.blob-.or.file-v
765e0 69 73 69 74 69 6e 67 20 62 75 66 66 65 72 2c 20 76 69 73 69 74 20 74 68 61 74 20 62 6c 6f 62 0a isiting.buffer,.visit.that.blob.
76600 20 20 20 20 20 77 69 74 68 6f 75 74 20 70 72 6f 6d 70 74 69 6e 67 2e 20 20 49 66 20 74 68 65 20 .....without.prompting...If.the.
76620 72 65 67 69 6f 6e 20 69 73 20 61 63 74 69 76 65 2c 20 74 72 79 20 74 6f 20 6a 75 6d 70 20 74 6f region.is.active,.try.to.jump.to
76640 20 74 68 65 0a 20 20 20 20 20 6d 61 72 6b 65 64 20 6c 69 6e 65 20 6f 72 20 6c 69 6e 65 73 2c 20 .the......marked.line.or.lines,.
76660 61 6e 64 20 68 69 67 68 6c 69 67 68 74 20 74 68 65 6d 20 69 6e 20 74 68 65 20 62 72 6f 77 73 65 and.highlight.them.in.the.browse
76680 72 2e 20 20 54 6f 20 77 68 61 74 0a 20 20 20 20 20 65 78 74 65 6e 64 20 74 68 61 74 20 69 73 20 r...To.what......extend.that.is.
766a0 70 6f 73 73 69 62 6c 65 20 64 65 70 65 6e 64 73 20 6f 6e 20 74 68 65 20 66 6f 72 67 65 2e 20 20 possible.depends.on.the.forge...
766c0 57 68 65 6e 20 74 68 65 20 72 65 67 69 6f 6e 20 69 73 0a 20 20 20 20 20 6e 6f 74 20 61 63 74 69 When.the.region.is......not.acti
766e0 76 65 20 6a 75 73 74 20 76 69 73 69 74 20 74 68 65 20 62 6c 6f 62 2c 20 77 69 74 68 6f 75 74 20 ve.just.visit.the.blob,.without.
76700 74 72 79 69 6e 67 20 74 6f 20 6a 75 6d 70 20 74 6f 20 74 68 65 0a 20 20 20 20 20 63 75 72 72 65 trying.to.jump.to.the......curre
76720 6e 74 20 6c 69 6e 65 2e 20 20 57 68 65 6e 20 6a 75 6d 70 69 6e 67 20 74 6f 20 61 20 6c 69 6e 65 nt.line...When.jumping.to.a.line
76740 2c 20 61 6c 77 61 79 73 20 75 73 65 20 61 20 63 6f 6d 6d 69 74 20 68 61 73 68 20 61 73 0a 20 20 ,.always.use.a.commit.hash.as...
76760 20 20 20 70 61 72 74 20 6f 66 20 74 68 65 20 55 52 4c 2e 20 20 46 72 6f 6d 20 61 20 66 69 6c 65 ...part.of.the.URL...From.a.file
76780 20 69 6e 20 74 68 65 20 77 6f 72 6b 74 72 65 65 20 77 69 74 68 20 6e 6f 20 61 63 74 69 76 65 0a .in.the.worktree.with.no.active.
767a0 20 20 20 20 20 72 65 67 69 6f 6e 2c 20 69 6e 73 74 65 61 64 20 75 73 65 20 74 68 65 20 62 72 61 .....region,.instead.use.the.bra
767c0 6e 63 68 20 6e 61 6d 65 20 61 73 20 70 61 72 74 20 6f 66 20 74 68 65 20 55 52 4c 2c 20 75 6e 6c nch.name.as.part.of.the.URL,.unl
767e0 65 73 73 20 61 0a 20 20 20 20 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 69 73 20 75 73 ess.a......prefix.argument.is.us
76800 65 64 2e 0a 0a 20 20 20 20 20 57 68 65 6e 20 69 6e 76 6f 6b 65 64 20 66 72 6f 6d 20 61 6e 79 20 ed........When.invoked.from.any.
76820 6f 74 68 65 72 20 62 75 66 66 65 72 2c 20 70 72 6f 6d 70 74 20 74 68 65 20 75 73 65 72 20 66 6f other.buffer,.prompt.the.user.fo
76840 72 20 61 20 62 72 61 6e 63 68 20 6f 72 0a 20 20 20 20 20 63 6f 6d 6d 69 74 2c 20 61 6e 64 20 66 r.a.branch.or......commit,.and.f
76860 6f 72 20 61 20 66 69 6c 65 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 or.a.file.....File:.forge.info,.
76880 20 4e 6f 64 65 3a 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 .Node:.Creating.Topics.and.Posts
768a0 2c 20 20 4e 65 78 74 3a 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 2c 20 20 50 72 65 76 3a 20 ,..Next:.Editing.Topics,..Prev:.
768c0 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 37 20 43 72 65 Visiting.Topics,..Up:.Top..7.Cre
768e0 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a ating.Topics.and.Posts.*********
76900 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 57 65 20 63 61 6c 6c 20 62 6f 74 68 ******************..We.call.both
76920 20 69 73 73 75 65 73 20 61 6e 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 22 74 6f 70 69 63 .issues.and.pull-requests."topic
76940 73 22 2e 20 20 54 68 65 20 63 6f 6e 74 72 69 62 75 74 69 6f 6e 73 20 74 6f 0a 74 68 65 20 63 6f s"...The.contributions.to.the.co
76960 6e 76 65 72 73 61 74 69 6f 6e 20 61 72 65 20 63 61 6c 6c 65 64 20 22 70 6f 73 74 73 22 2e 20 20 nversation.are.called."posts"...
76980 54 68 65 20 69 6e 69 74 69 61 6c 20 74 6f 70 69 63 20 64 65 73 63 72 69 70 74 69 6f 6e 20 69 73 The.initial.topic.description.is
769a0 0a 61 6c 73 6f 20 63 61 6c 6c 65 64 20 61 20 70 6f 73 74 2e 0a 0a 20 20 20 43 72 65 61 74 69 6e .also.called.a.post......Creatin
769c0 67 20 61 20 6e 65 77 20 74 6f 70 69 63 20 6f 72 20 70 6f 73 74 20 61 6e 64 20 65 64 69 74 69 6e g.a.new.topic.or.post.and.editin
769e0 67 20 61 6e 20 65 78 69 73 74 69 6e 67 20 70 6f 73 74 20 77 6f 72 6b 0a 73 69 6d 69 6c 61 72 6c g.an.existing.post.work.similarl
76a00 79 20 74 6f 20 6e 6f 77 20 63 72 65 61 74 69 6e 67 20 61 20 6e 65 77 20 63 6f 6d 6d 69 74 20 6f y.to.now.creating.a.new.commit.o
76a20 72 20 65 64 69 74 69 6e 67 20 74 68 65 20 6d 65 73 73 61 67 65 20 6f 66 20 61 6e 0a 65 78 69 73 r.editing.the.message.of.an.exis
76a40 74 69 6e 67 20 63 6f 6d 6d 69 74 20 77 6f 72 6b 73 20 69 6e 20 4d 61 67 69 74 2e 20 20 49 6e 20 ting.commit.works.in.Magit...In.
76a60 62 6f 74 68 20 63 61 73 65 73 20 74 68 65 20 6d 65 73 73 61 67 65 20 68 61 73 20 74 6f 20 62 65 both.cases.the.message.has.to.be
76a80 0a 77 72 69 74 74 65 6e 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 20 61 6e .written.in.a.separate.buffer.an
76aa0 64 20 74 68 65 6e 20 74 68 65 20 70 72 6f 63 65 73 73 20 68 61 73 20 74 6f 20 62 65 20 66 69 6e d.then.the.process.has.to.be.fin
76ac0 69 73 68 65 64 20 6f 72 0a 63 61 6e 63 65 6c 65 64 20 75 73 69 6e 67 20 61 20 73 65 70 61 72 61 ished.or.canceled.using.a.separa
76ae0 74 65 20 63 6f 6d 6d 61 6e 64 2e 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 6f 6d 6d 61 te.command...The.following.comma
76b00 6e 64 73 20 64 72 6f 70 20 79 6f 75 20 69 6e 74 6f 0a 73 75 63 68 20 61 20 62 75 66 66 65 72 2e nds.drop.you.into.such.a.buffer.
76b20 0a 0a e2 80 98 4e 20 63 20 70 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 .....N.c.p....(...forge-create-p
76b40 75 6c 6c 72 65 71 e2 80 99 29 0a e2 80 98 43 2d 63 20 43 2d 6e 20 5b 6f 6e 20 22 50 75 6c 6c 20 ullreq...)....C-c.C-n.[on."Pull.
76b60 72 65 71 75 65 73 74 73 22 20 73 65 63 74 69 6f 6e 5d e2 80 99 0a 20 20 20 20 20 54 68 69 73 20 requests".section].........This.
76b80 63 6f 6d 6d 61 6e 64 20 63 72 65 61 74 65 73 20 61 20 6e 65 77 20 70 75 6c 6c 2d 72 65 71 75 65 command.creates.a.new.pull-reque
76ba0 73 74 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a st.for.the.current.repository...
76bc0 e2 80 98 4e 20 63 20 69 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 69 73 73 ...N.c.i....(...forge-create-iss
76be0 75 65 e2 80 99 29 0a e2 80 98 43 2d 63 20 43 2d 6e 20 5b 6f 6e 20 22 49 73 73 75 65 73 22 20 73 ue...)....C-c.C-n.[on."Issues".s
76c00 65 63 74 69 6f 6e 5d e2 80 99 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 63 72 65 ection].........This.command.cre
76c20 61 74 65 73 20 61 20 6e 65 77 20 69 73 73 75 65 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 ates.a.new.issue.for.the.current
76c40 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 6e e2 80 99 20 28 e2 80 98 .repository......C-c.C-n....(...
76c60 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 6f 73 74 e2 80 99 29 0a e2 80 98 43 2d 63 20 43 2d 72 forge-create-post...)....C-c.C-r
76c80 e2 80 99 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 63 72 65 61 74 65 73 20 61 20 .........This.command.creates.a.
76ca0 6e 65 77 20 70 6f 73 74 20 6f 6e 20 61 6e 20 65 78 69 73 74 69 6e 67 20 74 6f 70 69 63 2e 20 20 new.post.on.an.existing.topic...
76cc0 49 74 20 69 73 20 6f 6e 6c 79 0a 20 20 20 20 20 61 76 61 69 6c 61 62 6c 65 20 69 6e 20 62 75 66 It.is.only......available.in.buf
76ce0 66 65 72 73 20 74 68 61 74 20 76 69 73 69 74 20 61 6e 20 65 78 69 73 74 69 6e 67 20 74 6f 70 69 fers.that.visit.an.existing.topi
76d00 63 2e 0a 0a 20 20 20 20 20 49 66 20 74 68 65 20 72 65 67 69 6f 6e 20 69 73 20 61 63 74 69 76 65 c........If.the.region.is.active
76d20 20 61 6e 64 20 6d 61 72 6b 73 20 70 61 72 74 20 6f 66 20 61 6e 20 65 78 69 73 74 69 6e 67 20 70 .and.marks.part.of.an.existing.p
76d40 6f 73 74 2c 20 74 68 65 6e 0a 20 20 20 20 20 74 68 61 74 20 70 61 72 74 20 6f 66 20 74 68 65 20 ost,.then......that.part.of.the.
76d60 70 6f 73 74 20 69 73 20 71 75 6f 74 65 64 2e 20 20 57 68 65 6e 20 61 20 70 72 65 66 69 78 20 61 post.is.quoted...When.a.prefix.a
76d80 72 67 75 6d 65 6e 74 20 69 73 20 75 73 65 64 2c 0a 20 20 20 20 20 74 68 65 6e 20 74 68 65 20 63 rgument.is.used,......then.the.c
76da0 6f 6d 70 6c 65 74 65 20 70 6f 73 74 2c 20 77 68 69 63 68 20 70 6f 69 6e 74 20 69 73 20 63 75 72 omplete.post,.which.point.is.cur
76dc0 72 65 6e 74 6c 79 20 6f 6e 2c 20 69 73 20 71 75 6f 74 65 64 2e 0a 0a 20 20 20 54 68 65 20 66 6f rently.on,.is.quoted......The.fo
76de0 6c 6c 6f 77 69 6e 67 20 63 6f 6d 6d 61 6e 64 73 20 61 72 65 20 61 76 61 69 6c 61 62 6c 65 20 69 llowing.commands.are.available.i
76e00 6e 20 62 75 66 66 65 72 73 20 75 73 65 64 20 74 6f 20 65 64 69 74 20 70 6f 73 74 73 3a 0a 0a e2 n.buffers.used.to.edit.posts:...
76e20 80 98 43 2d 63 20 43 2d 63 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 70 6f 73 74 2d 73 75 62 6d ..C-c.C-c....(...forge-post-subm
76e40 69 74 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 73 75 62 6d 69 74 73 it...)......This.command.submits
76e60 20 74 68 65 20 70 6f 73 74 20 74 68 61 74 20 69 73 20 62 65 69 6e 67 20 65 64 69 74 65 64 20 69 .the.post.that.is.being.edited.i
76e80 6e 20 74 68 65 20 63 75 72 72 65 6e 74 0a 20 20 20 20 20 62 75 66 66 65 72 2e 0a 0a e2 80 98 43 n.the.current......buffer......C
76ea0 2d 63 20 43 2d 6b e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 70 6f 73 74 2d 63 61 6e 63 65 6c e2 -c.C-k....(...forge-post-cancel.
76ec0 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 63 61 6e 63 65 6c 73 20 74 68 ..)......This.command.cancels.th
76ee0 65 20 70 6f 73 74 20 74 68 61 74 20 69 73 20 62 65 69 6e 67 20 65 64 69 74 65 64 20 69 6e 20 74 e.post.that.is.being.edited.in.t
76f00 68 65 20 63 75 72 72 65 6e 74 0a 20 20 20 20 20 62 75 66 66 65 72 2e 0a 0a e2 80 98 43 2d 63 20 he.current......buffer......C-c.
76f20 43 2d 65 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 70 6f 73 74 2d 64 69 73 70 61 74 63 68 e2 80 C-e....(...forge-post-dispatch..
76f40 99 29 0a 20 20 20 20 20 54 68 69 73 20 70 72 65 66 69 78 20 63 6f 6d 6d 61 6e 64 20 66 65 61 74 .)......This.prefix.command.feat
76f60 75 72 65 73 20 74 68 65 20 61 62 6f 76 65 20 74 77 6f 20 63 6f 6d 6d 61 6e 64 73 20 61 73 20 73 ures.the.above.two.commands.as.s
76f80 75 66 66 69 78 65 73 2c 0a 20 20 20 20 20 61 6e 64 20 77 68 65 6e 20 63 72 65 61 74 69 6e 67 20 uffixes,......and.when.creating.
76fa0 61 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 61 6c 73 6f 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e a.pull-request.also.the.followin
76fc0 67 20 63 6f 6d 6d 61 6e 64 2e 20 20 4d 6f 72 65 0a 20 20 20 20 20 73 75 66 66 69 78 20 63 6f 6d g.command...More......suffix.com
76fe0 6d 61 6e 64 73 20 77 69 6c 6c 20 6c 69 6b 65 6c 79 20 62 65 20 61 64 64 65 64 20 69 6e 20 74 68 mands.will.likely.be.added.in.th
77000 65 20 66 75 74 75 72 65 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 65 20 64 e2 80 99 20 28 e2 80 98 66 e.future......C-c.C-e.d....(...f
77020 6f 72 67 65 2d 70 6f 73 74 2d 74 6f 67 67 6c 65 2d 64 72 61 66 74 e2 80 99 29 0a 20 20 20 20 20 orge-post-toggle-draft...)......
77040 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 74 6f 67 67 6c 65 73 20 77 68 65 74 68 65 72 20 74 68 65 This.command.toggles.whether.the
77060 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 65 69 6e 67 20 63 72 65 61 74 65 64 20 69 73 20 61 .pull-request.being.created.is.a
77080 0a 20 20 20 20 20 64 72 61 66 74 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f ......draft.....File:.forge.info
770a0 2c 20 20 4e 6f 64 65 3a 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 2c 20 20 4e 65 78 74 3a 20 ,..Node:.Editing.Topics,..Next:.
770c0 50 75 6c 6c 69 6e 67 2c 20 20 50 72 65 76 3a 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 Pulling,..Prev:.Creating.Topics.
770e0 61 6e 64 20 50 6f 73 74 73 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 38 20 45 64 69 74 69 6e 67 20 54 and.Posts,..Up:.Top..8.Editing.T
77100 6f 70 69 63 73 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 4d 61 6e 79 20 64 65 74 opics.****************..Many.det
77120 61 69 6c 73 20 61 62 6f 75 74 20 61 20 74 6f 70 69 63 20 63 61 6e 20 62 65 20 63 68 61 6e 67 65 ails.about.a.topic.can.be.change
77140 64 20 66 72 6f 6d 20 74 68 65 20 62 75 66 66 65 72 20 74 68 61 74 20 76 69 73 69 74 73 0a 74 68 d.from.the.buffer.that.visits.th
77160 61 74 20 74 6f 70 69 63 2c 20 62 75 74 20 61 6c 73 6f 20 66 72 6f 6d 20 74 6f 70 69 63 20 6c 69 at.topic,.but.also.from.topic.li
77180 73 74 73 2c 20 69 66 20 74 68 65 20 63 75 72 73 6f 72 20 69 73 20 70 6c 61 63 65 64 20 6f 6e 20 sts,.if.the.cursor.is.placed.on.
771a0 74 68 65 0a 74 6f 70 69 63 20 74 6f 20 62 65 20 65 64 69 74 65 64 2e 20 20 48 6f 77 65 76 65 72 the.topic.to.be.edited...However
771c0 2c 20 74 6f 20 65 64 69 74 20 74 68 65 20 70 6f 73 74 73 20 6f 6e 20 61 20 74 6f 70 69 63 2c 20 ,.to.edit.the.posts.on.a.topic,.
771e0 74 68 65 20 74 6f 70 69 63 0a 68 61 73 20 74 6f 20 62 65 20 76 69 73 69 74 65 64 20 69 6e 20 69 the.topic.has.to.be.visited.in.i
77200 74 73 20 6f 77 6e 20 62 75 66 66 65 72 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 61 ts.own.buffer......C-c.C-e.[on.a
77220 20 70 6f 73 74 20 73 65 63 74 69 6f 6e 5d e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 65 64 69 74 .post.section]....(...forge-edit
77240 2d 70 6f 73 74 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 76 69 73 69 -post...)......This.command.visi
77260 74 73 20 61 6e 20 65 78 69 73 74 69 6e 67 20 70 6f 73 74 20 69 6e 20 61 20 73 65 70 61 72 61 74 ts.an.existing.post.in.a.separat
77280 65 20 62 75 66 66 65 72 2c 20 69 74 20 63 61 6e 0a 20 20 20 20 20 6f 6e 6c 79 20 62 65 20 69 6e e.buffer,.it.can......only.be.in
772a0 76 6f 6b 65 64 20 66 72 6f 6d 20 61 20 74 6f 70 69 63 20 62 75 66 66 65 72 2c 20 77 68 65 6e 20 voked.from.a.topic.buffer,.when.
772c0 74 68 65 20 63 75 72 73 6f 72 20 69 73 20 6f 6e 20 74 68 65 20 70 6f 73 74 0a 20 20 20 20 20 74 the.cursor.is.on.the.post......t
772e0 6f 20 62 65 20 65 64 69 74 65 64 2e 0a 0a 20 20 20 20 20 45 64 69 74 69 6e 67 20 61 6e 20 65 78 o.be.edited........Editing.an.ex
77300 69 73 74 69 6e 67 20 70 6f 73 74 20 69 73 20 73 69 6d 69 6c 61 72 20 74 6f 20 63 72 65 61 74 69 isting.post.is.similar.to.creati
77320 6e 67 20 61 20 6e 65 77 20 70 6f 73 74 2c 20 61 73 0a 20 20 20 20 20 64 65 73 63 72 69 62 65 64 ng.a.new.post,.as......described
77340 20 69 6e 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 73 65 63 74 69 6f 6e 2e 0a 0a e2 80 98 43 2d .in.the.previous.section......C-
77360 63 20 43 2d 6b 20 5b 6f 6e 20 61 20 70 6f 73 74 20 73 65 63 74 69 6f 6e 5d e2 80 99 20 28 e2 80 c.C-k.[on.a.post.section]....(..
77380 98 66 6f 72 67 65 2d 64 65 6c 65 74 65 2d 63 6f 6d 6d 65 6e 74 e2 80 99 29 0a 20 20 20 20 20 54 .forge-delete-comment...)......T
773a0 68 69 73 20 63 6f 6d 6d 61 6e 64 20 64 65 6c 65 74 65 73 20 74 68 65 20 70 6f 73 74 20 74 68 65 his.command.deletes.the.post.the
773c0 20 63 75 72 73 6f 72 20 69 73 20 6f 6e 2e 20 20 54 68 65 20 69 6e 69 74 69 61 6c 0a 20 20 20 20 .cursor.is.on...The.initial.....
773e0 20 6d 65 73 73 61 67 65 20 74 68 61 74 20 77 61 73 20 77 72 69 74 74 65 6e 20 77 68 65 6e 20 74 .message.that.was.written.when.t
77400 68 65 20 74 6f 70 69 63 20 77 61 73 20 63 72 65 61 74 65 64 2c 20 63 61 6e 6e 6f 74 20 62 65 0a he.topic.was.created,.cannot.be.
77420 20 20 20 20 20 64 65 6c 65 74 65 64 2c 20 6f 6e 6c 79 20 72 65 70 6c 69 65 73 20 74 6f 20 74 68 .....deleted,.only.replies.to.th
77440 61 74 2e 0a 0a e2 80 98 4e 20 6d 20 73 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 74 6f 70 69 63 at......N.m.s....(...forge-topic
77460 2d 6d 65 6e 75 e2 80 99 29 0a e2 80 98 43 2d 3c 72 65 74 75 72 6e 3e 20 5b 6f 6e 20 61 20 74 6f -menu...)....C-<return>.[on.a.to
77480 70 69 63 20 73 65 63 74 69 6f 6e 5d e2 80 99 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e pic.section].........This.comman
774a0 64 20 64 69 73 70 6c 61 79 73 20 61 20 6d 65 6e 75 20 75 73 65 64 20 74 6f 20 65 64 69 74 20 64 d.displays.a.menu.used.to.edit.d
774c0 65 74 61 69 6c 73 20 61 62 6f 75 74 20 74 68 65 20 74 6f 70 69 63 0a 20 20 20 20 20 74 68 65 20 etails.about.the.topic......the.
774e0 63 75 72 73 6f 72 20 69 73 20 6f 6e 20 6f 72 20 74 68 61 74 20 69 73 20 62 65 69 6e 67 20 76 69 cursor.is.on.or.that.is.being.vi
77500 73 69 74 65 64 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 20 20 20 sited.in.the.current.buffer.....
77520 20 20 45 2e 67 2e 2c 20 69 74 20 63 61 6e 20 62 65 20 75 73 65 64 20 74 6f 20 63 68 61 6e 67 65 ..E.g.,.it.can.be.used.to.change
77540 20 74 68 65 20 73 74 61 74 75 73 20 6f 66 20 74 68 65 20 74 6f 70 69 63 20 6f 72 20 74 6f 20 61 .the.status.of.the.topic.or.to.a
77560 70 70 6c 79 0a 20 20 20 20 20 6c 61 62 65 6c 73 20 74 6f 20 69 74 2e 20 20 41 64 64 69 74 69 6f pply......labels.to.it...Additio
77580 6e 61 6c 6c 79 20 69 74 20 66 65 61 74 75 72 65 73 20 61 20 66 65 77 20 63 6f 6d 6d 61 6e 64 73 nally.it.features.a.few.commands
775a0 20 74 68 61 74 20 61 63 74 20 6f 6e 0a 20 20 20 20 20 74 68 61 74 20 74 6f 70 69 63 2e 0a 0a 20 .that.act.on......that.topic....
775c0 20 20 44 65 74 61 69 6c 73 20 61 62 6f 75 74 20 61 20 74 6f 70 69 63 2c 20 73 75 63 68 20 61 73 ..Details.about.a.topic,.such.as
775e0 20 69 74 73 20 73 74 61 74 75 73 20 61 6e 64 20 6c 61 62 65 6c 73 2c 20 63 61 6e 0a 61 6c 74 65 .its.status.and.labels,.can.alte
77600 72 6e 61 74 69 76 65 6c 79 20 62 65 20 65 64 69 74 65 64 20 62 79 20 76 69 73 69 74 69 6e 67 20 rnatively.be.edited.by.visiting.
77620 74 68 65 20 74 6f 70 69 63 20 69 6e 20 69 74 73 20 6f 77 6e 20 62 75 66 66 65 72 2c 0a 6e 61 76 the.topic.in.its.own.buffer,.nav
77640 69 67 61 74 69 6e 67 20 74 6f 20 74 68 65 20 68 65 61 64 65 72 20 74 68 61 74 20 64 69 73 70 6c igating.to.the.header.that.displ
77660 61 79 73 20 74 68 65 20 64 65 74 61 69 6c 20 61 6e 64 20 74 68 65 6e 20 74 79 70 69 6e 67 20 e2 ays.the.detail.and.then.typing..
77680 80 98 43 2d 63 0a 43 2d 65 e2 80 99 2e 20 20 54 68 69 73 20 6f 6c 64 65 72 20 61 70 70 72 6f 61 ..C-c.C-e......This.older.approa
776a0 63 68 20 69 73 20 73 74 69 6c 6c 20 61 76 61 69 6c 61 62 6c 65 2c 20 62 75 74 20 69 74 20 69 73 ch.is.still.available,.but.it.is
776c0 20 75 73 75 61 6c 6c 79 20 6d 75 63 68 0a 66 61 73 74 65 72 20 74 6f 20 75 73 65 20 74 68 65 20 .usually.much.faster.to.use.the.
776e0 6d 65 6e 75 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 menu.....File:.forge.info,..Node
77700 3a 20 50 75 6c 6c 69 6e 67 2c 20 20 4e 65 78 74 3a 20 42 72 61 6e 63 68 69 6e 67 2c 20 20 50 72 :.Pulling,..Next:.Branching,..Pr
77720 65 76 3a 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 39 20 ev:.Editing.Topics,..Up:.Top..9.
77740 50 75 6c 6c 69 6e 67 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 54 68 65 20 63 6f 6d 6d 61 6e 64 73 20 Pulling.*********..The.commands.
77760 74 68 61 74 20 66 65 74 63 68 20 66 6f 72 67 65 20 64 61 74 61 20 61 72 65 20 61 76 61 69 6c 61 that.fetch.forge.data.are.availa
77780 62 6c 65 20 74 68 65 20 46 6f 72 67 65 e2 80 99 73 20 6d 61 69 6e 20 6d 65 6e 75 0a 28 e2 80 98 ble.the.Forge...s.main.menu.(...
777a0 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 e2 80 99 20 6f 6e 20 e2 80 98 4e e2 80 99 29 20 61 6e forge-dispatch....on....N...).an
777c0 64 20 66 72 6f 6d 20 74 68 65 20 73 61 6d 65 20 6d 65 6e 75 20 28 e2 80 98 6d 61 67 69 74 2d 66 d.from.the.same.menu.(...magit-f
777e0 65 74 63 68 e2 80 99 20 6f 6e 20 e2 80 98 66 e2 80 99 29 0a 74 68 61 74 20 69 73 20 75 73 65 64 etch....on....f...).that.is.used
77800 20 74 6f 20 66 65 74 63 68 20 47 69 74 20 64 61 74 61 2e 20 20 49 66 20 e2 80 98 6d 61 67 69 74 .to.fetch.Git.data...If....magit
77820 2d 70 75 6c 6c 2d 6f 72 2d 66 65 74 63 68 e2 80 99 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 0a 74 68 -pull-or-fetch....is.non-nil,.th
77840 65 6e 20 74 68 65 79 20 61 72 65 20 61 6c 73 6f 20 61 76 61 69 6c 61 62 6c 65 20 66 72 6f 6d 20 en.they.are.also.available.from.
77860 74 68 65 20 e2 80 98 6d 61 67 69 74 2d 70 75 6c 6c e2 80 99 20 6d 65 6e 75 20 28 6f 6e 20 e2 80 the....magit-pull....menu.(on...
77880 98 46 e2 80 99 29 2e 0a 0a 20 20 20 57 69 74 68 20 47 69 74 20 79 6f 75 20 68 61 76 65 20 74 6f .F...)......With.Git.you.have.to
778a0 20 65 78 70 6c 69 63 69 74 6c 79 20 70 75 6c 6c 20 47 69 74 20 64 61 74 61 20 74 6f 20 6d 61 6b .explicitly.pull.Git.data.to.mak
778c0 65 20 69 74 20 61 76 61 69 6c 61 62 6c 65 20 69 6e 0a 74 68 65 20 6c 6f 63 61 6c 20 72 65 70 6f e.it.available.in.the.local.repo
778e0 73 69 74 6f 72 79 2e 20 20 46 6f 72 67 65 20 77 6f 72 6b 73 20 74 68 65 20 73 61 6d 65 3b 20 79 sitory...Forge.works.the.same;.y
77900 6f 75 20 68 61 76 65 20 74 6f 20 65 78 70 6c 69 63 69 74 6c 79 20 70 75 6c 6c 0a 74 6f 20 70 75 ou.have.to.explicitly.pull.to.pu
77920 6c 6c 20 64 61 74 61 20 75 73 69 6e 67 20 74 68 65 20 66 6f 72 67 65 e2 80 99 73 20 41 50 49 20 ll.data.using.the.forge...s.API.
77940 61 6e 64 20 73 74 6f 72 69 6e 67 20 69 6e 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 and.storing.in.the.local.databas
77960 65 2e 0a 54 68 69 73 20 69 73 20 6c 65 73 73 20 64 69 73 72 75 70 74 69 76 65 2c 20 6d 6f 72 65 e..This.is.less.disruptive,.more
77980 20 72 65 6c 69 61 62 6c 65 2c 20 66 61 6d 69 6c 69 61 72 20 61 6e 64 20 65 61 73 69 65 72 20 74 .reliable,.familiar.and.easier.t
779a0 6f 0a 75 6e 64 65 72 73 74 61 6e 64 20 74 68 61 6e 20 69 66 20 46 6f 72 67 65 20 70 75 6c 6c 65 o.understand.than.if.Forge.pulle
779c0 64 20 62 79 20 69 74 73 65 6c 66 20 61 74 20 72 61 6e 64 6f 6d 20 69 6e 74 65 72 76 61 6c 73 2e d.by.itself.at.random.intervals.
779e0 20 20 49 74 20 6d 69 67 68 74 0a 68 6f 77 65 76 65 72 20 6d 65 61 6e 20 74 68 61 74 20 79 6f 75 ..It.might.however.mean.that.you
77a00 20 6f 63 63 61 73 69 6f 6e 61 6c 6c 79 20 69 6e 76 6f 6b 65 20 61 20 63 6f 6d 6d 61 6e 64 20 65 .occasionally.invoke.a.command.e
77a20 78 70 65 63 74 69 6e 67 20 74 68 65 20 6d 6f 73 74 0a 72 65 63 65 6e 74 20 64 61 74 61 20 74 6f xpecting.the.most.recent.data.to
77a40 20 62 65 20 61 76 61 69 6c 61 62 6c 65 20 61 6e 64 20 74 68 65 6e 20 68 61 76 65 20 74 6f 20 61 .be.available.and.then.have.to.a
77a60 62 6f 72 74 20 61 6e 64 20 70 75 6c 6c 20 66 69 72 73 74 2e 20 20 54 68 65 0a 73 61 6d 65 20 63 bort.and.pull.first...The.same.c
77a80 61 6e 20 68 61 70 70 65 6e 20 77 69 74 68 20 47 69 74 2c 20 65 2e 67 2e 2c 20 79 6f 75 20 6d 69 an.happen.with.Git,.e.g.,.you.mi
77aa0 67 68 74 20 61 74 74 65 6d 70 74 20 74 6f 20 6d 65 72 67 65 20 61 20 62 72 61 6e 63 68 20 74 68 ght.attempt.to.merge.a.branch.th
77ac0 61 74 0a 79 6f 75 20 6b 6e 6f 77 20 65 78 69 73 74 73 20 62 75 74 20 68 61 76 65 6e e2 80 99 74 at.you.know.exists.but.haven...t
77ae0 20 61 63 74 75 61 6c 6c 79 20 70 75 6c 6c 65 64 20 79 65 74 2e 0a 0a e2 80 98 66 20 6e e2 80 99 .actually.pulled.yet......f.n...
77b00 20 28 e2 80 98 66 6f 72 67 65 2d 70 75 6c 6c e2 80 99 29 0a e2 80 98 4e 20 66 20 66 e2 80 99 0a .(...forge-pull...)....N.f.f....
77b20 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 75 73 65 73 20 61 20 66 6f 72 67 65 e2 80 .....This.command.uses.a.forge..
77b40 99 73 20 41 50 49 20 74 6f 20 66 65 74 63 68 20 74 6f 70 69 63 73 20 61 6e 64 20 6f 74 68 65 72 .s.API.to.fetch.topics.and.other
77b60 0a 20 20 20 20 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 74 68 65 20 63 75 72 72 ......information.about.the.curr
77b80 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 20 61 6e 64 20 73 74 6f 72 65 73 20 74 68 65 20 66 65 ent.repository.and.stores.the.fe
77ba0 74 63 68 65 64 0a 20 20 20 20 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 6e 20 74 68 65 20 64 61 tched......information.in.the.da
77bc0 74 61 62 61 73 65 2e 0a 0a 20 20 20 20 20 49 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 tabase........If.the.current.rep
77be0 6f 73 69 74 6f 72 79 20 69 73 20 73 74 69 6c 6c 20 75 6e 74 72 61 63 6b 65 64 20 6c 6f 63 61 6c ository.is.still.untracked.local
77c00 6c 79 2c 20 6f 72 20 74 68 65 0a 20 20 20 20 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f ly,.or.the......current.reposito
77c20 72 79 20 63 61 6e 6e 6f 74 20 62 65 20 64 65 74 65 72 6d 69 6e 65 64 2c 20 74 68 69 73 20 63 6f ry.cannot.be.determined,.this.co
77c40 6d 6d 61 6e 64 20 69 6e 73 74 65 61 64 0a 20 20 20 20 20 62 65 68 61 76 65 73 20 6c 69 6b 65 20 mmand.instead......behaves.like.
77c60 e2 80 98 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 2c 20 69 2e 65 2e ...forge-add-repository...,.i.e.
77c80 2c 20 69 74 20 61 64 64 73 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 74 6f ,.it.adds.the.repository......to
77ca0 20 74 68 65 20 64 61 74 61 62 61 73 65 20 61 6e 64 20 74 68 65 6e 20 70 65 72 66 6f 72 6d 73 20 .the.database.and.then.performs.
77cc0 74 68 65 20 69 6e 69 74 69 61 6c 20 70 75 6c 6c 2e 0a 0a e2 80 98 66 20 4e e2 80 99 20 28 e2 80 the.initial.pull......f.N....(..
77ce0 98 66 6f 72 67 65 2d 70 75 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 e2 80 99 29 0a e2 80 .forge-pull-notifications...)...
77d00 98 4e 20 66 20 6e e2 80 99 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 75 73 65 73 .N.f.n.........This.command.uses
77d20 20 61 20 66 6f 72 67 65 e2 80 99 73 20 41 50 49 20 74 6f 20 66 65 74 63 68 20 61 6c 6c 20 6e 6f .a.forge...s.API.to.fetch.all.no
77d40 74 69 66 69 63 61 74 69 6f 6e 73 20 66 72 6f 6d 0a 20 20 20 20 20 74 68 61 74 20 66 6f 72 67 65 tifications.from......that.forge
77d60 2c 20 69 6e 63 6c 75 64 69 6e 67 2c 20 62 75 74 20 6e 6f 74 20 6c 69 6d 69 74 65 64 20 74 6f 2c ,.including,.but.not.limited.to,
77d80 20 74 68 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 66 6f 72 0a 20 20 20 20 20 74 68 65 20 .the.notifications.for......the.
77da0 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a 20 20 20 20 20 46 65 74 63 68 69 current.repository........Fetchi
77dc0 6e 67 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 66 65 74 63 68 65 73 20 61 73 73 6f 63 69 61 ng.notifications.fetches.associa
77de0 74 65 64 20 74 6f 70 69 63 73 20 65 76 65 6e 20 66 6f 72 0a 20 20 20 20 20 72 65 70 6f 73 69 74 ted.topics.even.for......reposit
77e00 6f 72 69 65 73 20 74 68 61 74 20 79 6f 75 20 68 61 76 65 20 6e 6f 74 20 79 65 74 20 65 78 70 6c ories.that.you.have.not.yet.expl
77e20 69 63 69 74 6c 79 20 61 64 64 65 64 20 74 6f 20 74 68 65 20 6c 6f 63 61 6c 0a 20 20 20 20 20 64 icitly.added.to.the.local......d
77e40 61 74 61 62 61 73 65 2e 0a 0a e2 80 98 4e 20 66 20 74 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d atabase......N.f.t....(...forge-
77e60 70 75 6c 6c 2d 74 6f 70 69 63 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 pull-topic...)......This.command
77e80 20 75 73 65 73 20 61 20 66 6f 72 67 65 e2 80 99 73 20 41 50 49 20 74 6f 20 66 65 74 63 68 20 61 .uses.a.forge...s.API.to.fetch.a
77ea0 20 73 69 6e 67 6c 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 61 6e 64 0a 20 20 20 20 20 73 74 .single.pull-request.and......st
77ec0 6f 72 65 73 20 69 74 20 69 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 20 20 54 68 69 73 20 69 ores.it.in.the.database...This.i
77ee0 73 20 75 73 65 66 75 6c 20 69 66 20 79 6f 75 20 63 68 6f 73 65 20 74 6f 20 6e 6f 74 0a 20 20 20 s.useful.if.you.chose.to.not....
77f00 20 20 66 65 74 63 68 20 61 6c 6c 20 74 6f 70 69 63 73 20 77 68 65 6e 20 79 6f 75 20 61 64 64 65 ..fetch.all.topics.when.you.adde
77f20 64 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 75 73 69 6e 67 0a 20 20 20 20 20 e2 80 98 66 d.the.repository.using.........f
77f40 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 2e 0a 0a 1f 0a 46 69 6c 65 3a orge-add-repository........File:
77f60 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 42 72 61 6e 63 68 69 6e 67 2c 20 20 .forge.info,..Node:.Branching,..
77f80 4e 65 78 74 3a 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2c 20 20 50 Next:.Miscellaneous.Commands,..P
77fa0 72 65 76 3a 20 50 75 6c 6c 69 6e 67 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 31 30 20 42 72 61 6e 63 rev:.Pulling,..Up:.Top..10.Branc
77fc0 68 69 6e 67 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 46 6f 72 67 65 20 70 72 6f 76 69 64 65 hing.************..Forge.provide
77fe0 73 20 63 6f 6d 6d 61 6e 64 73 20 66 6f 72 20 63 72 65 61 74 69 6e 67 20 61 6e 64 20 63 68 65 63 s.commands.for.creating.and.chec
78000 6b 69 6e 67 20 6f 75 74 20 61 20 6e 65 77 20 62 72 61 6e 63 68 20 6f 72 0a 77 6f 72 6b 20 74 72 king.out.a.new.branch.or.work.tr
78020 65 65 20 66 72 6f 6d 20 61 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 20 20 54 68 65 73 65 20 63 ee.from.a.pull-request...These.c
78040 6f 6d 6d 61 6e 64 73 20 61 72 65 20 61 76 61 69 6c 61 62 6c 65 20 66 72 6f 6d 20 74 68 65 0a 73 ommands.are.available.from.the.s
78060 61 6d 65 20 74 72 61 6e 73 69 65 6e 74 20 70 72 65 66 69 78 20 63 6f 6d 6d 61 6e 64 73 20 61 73 ame.transient.prefix.commands.as
78080 20 74 68 65 20 73 75 66 66 69 78 20 63 6f 6d 6d 61 6e 64 73 2c 20 75 73 65 64 20 74 6f 20 63 72 .the.suffix.commands,.used.to.cr
780a0 65 61 74 65 0a 61 6e 64 20 63 68 65 63 6b 20 6f 75 74 20 62 72 61 6e 63 68 65 73 20 61 6e 64 20 eate.and.check.out.branches.and.
780c0 77 6f 72 6b 20 74 72 65 65 73 20 69 6e 20 61 20 6d 6f 72 65 20 67 65 6e 65 72 69 63 20 66 61 73 work.trees.in.a.more.generic.fas
780e0 68 69 6f 6e 0a 28 e2 80 98 6d 61 67 69 74 2d 62 72 61 6e 63 68 e2 80 99 20 6f 6e 20 e2 80 98 62 hion.(...magit-branch....on....b
78100 e2 80 99 20 61 6e 64 20 e2 80 98 6d 61 67 69 74 2d 77 6f 72 6b 74 72 65 65 e2 80 99 20 6f 6e 20 ....and....magit-worktree....on.
78120 e2 80 98 25 e2 80 99 29 2e 0a 0a e2 80 98 62 20 46 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 62 ...%...)......b.F....(...forge-b
78140 72 61 6e 63 68 2d 70 75 6c 6c 72 65 71 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d ranch-pullreq...)......This.comm
78160 61 6e 64 20 63 72 65 61 74 65 73 20 61 6e 64 20 63 6f 6e 66 69 67 75 72 65 73 20 61 20 6e 65 77 and.creates.and.configures.a.new
78180 20 62 72 61 6e 63 68 20 66 72 6f 6d 20 61 0a 20 20 20 20 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 .branch.from.a......pull-request
781a0 2c 20 63 72 65 61 74 69 6e 67 20 61 6e 64 20 63 6f 6e 66 69 67 75 72 69 6e 67 20 61 20 6e 65 77 ,.creating.and.configuring.a.new
781c0 20 72 65 6d 6f 74 65 20 69 66 20 6e 65 63 65 73 73 61 72 79 2e 0a 0a 20 20 20 20 20 54 68 65 20 .remote.if.necessary........The.
781e0 6e 61 6d 65 20 6f 66 20 74 68 65 20 6c 6f 63 61 6c 20 62 72 61 6e 63 68 20 69 73 20 74 68 65 20 name.of.the.local.branch.is.the.
78200 73 61 6d 65 20 61 73 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 72 65 6d 6f 74 65 0a 20 same.as.the.name.of.the.remote..
78220 20 20 20 20 62 72 61 6e 63 68 20 74 68 61 74 20 79 6f 75 20 61 72 65 20 62 65 69 6e 67 20 61 73 ....branch.that.you.are.being.as
78240 6b 65 64 20 74 6f 20 6d 65 72 67 65 2c 20 75 6e 6c 65 73 73 20 74 68 65 20 63 6f 6e 74 72 69 62 ked.to.merge,.unless.the.contrib
78260 75 74 6f 72 0a 20 20 20 20 20 63 6f 75 6c 64 20 6e 6f 74 20 62 65 20 62 6f 74 68 65 72 65 64 20 utor......could.not.be.bothered.
78280 74 6f 20 70 72 6f 70 65 72 6c 79 20 6e 61 6d 65 20 74 68 65 20 62 72 61 6e 63 68 20 62 65 66 6f to.properly.name.the.branch.befo
782a0 72 65 20 6f 70 65 6e 69 6e 67 0a 20 20 20 20 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 re.opening......the.pull-request
782c0 2e 20 20 54 68 65 20 6d 6f 73 74 20 6c 69 6b 65 6c 79 20 73 75 63 68 20 63 61 73 65 20 69 73 20 ...The.most.likely.such.case.is.
782e0 77 68 65 6e 20 79 6f 75 20 61 72 65 20 62 65 69 6e 67 0a 20 20 20 20 20 61 73 6b 65 64 20 74 6f when.you.are.being......asked.to
78300 20 6d 65 72 67 65 20 73 6f 6d 65 74 68 69 6e 67 20 6c 69 6b 65 20 22 66 6f 72 6b 2f 6d 61 73 74 .merge.something.like."fork/mast
78320 65 72 22 20 69 6e 74 6f 20 22 6f 72 69 67 69 6e 2f 6d 61 73 74 65 72 22 2e 0a 20 20 20 20 20 49 er".into."origin/master".......I
78340 6e 20 73 75 63 68 20 63 61 73 65 73 20 74 68 65 20 6c 6f 63 61 6c 20 62 72 61 6e 63 68 20 77 69 n.such.cases.the.local.branch.wi
78360 6c 6c 20 62 65 20 6e 61 6d 65 64 20 22 70 72 2d 4e 22 2c 20 77 68 65 72 65 20 e2 80 98 4e e2 80 ll.be.named."pr-N",.where....N..
78380 99 20 69 73 0a 20 20 20 20 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 6e 75 6d 62 65 ..is......the.pull-request.numbe
783a0 72 2e 0a 0a 20 20 20 20 20 54 68 65 73 65 20 76 61 72 69 61 62 6c 65 73 20 61 72 65 20 61 6c 77 r........These.variables.are.alw
783c0 61 79 73 20 73 65 74 20 62 79 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 3a 0a 0a 20 20 20 20 20 20 ays.set.by.this.command:........
783e0 20 20 e2 80 a2 20 e2 80 98 62 72 61 6e 63 68 2e 3c 6e 61 6d 65 3e 2e 70 75 6c 6c 52 65 71 75 65 .........branch.<name>.pullReque
78400 73 74 e2 80 99 20 69 73 20 73 65 74 20 74 6f 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 st....is.set.to.the.pull-request
78420 20 6e 75 6d 62 65 72 2e 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 e2 80 98 62 72 61 6e 63 68 2e 3c .number.................branch.<
78440 6e 61 6d 65 3e 2e 70 75 6c 6c 52 65 71 75 65 73 74 52 65 6d 6f 74 65 e2 80 99 20 69 73 20 73 65 name>.pullRequestRemote....is.se
78460 74 20 74 6f 20 74 68 65 20 72 65 6d 6f 74 65 20 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 77 68 69 t.to.the.remote.on...........whi
78480 63 68 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 72 61 6e 63 68 20 69 73 20 6c 6f ch.the.pull-request.branch.is.lo
784a0 63 61 74 65 64 2e 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 e2 80 98 62 72 61 6e 63 68 2e 3c 6e 61 cated.................branch.<na
784c0 6d 65 3e 2e 70 75 73 68 52 65 6d 6f 74 65 e2 80 99 20 69 73 20 73 65 74 20 74 6f 20 74 68 65 20 me>.pushRemote....is.set.to.the.
784e0 73 61 6d 65 20 72 65 6d 6f 74 65 20 61 73 0a 20 20 20 20 20 20 20 20 20 20 e2 80 98 62 72 61 6e same.remote.as..............bran
78500 63 68 2e 3c 6e 61 6d 65 3e 2e 70 75 6c 6c 52 65 71 75 65 73 74 52 65 6d 6f 74 65 e2 80 99 20 69 ch.<name>.pullRequestRemote....i
78520 66 20 74 68 61 74 20 69 73 20 70 6f 73 73 69 62 6c 65 2c 0a 20 20 20 20 20 20 20 20 20 20 6f 74 f.that.is.possible,...........ot
78540 68 65 72 77 69 73 65 20 69 74 20 69 73 20 73 65 74 20 74 6f 20 74 68 65 20 75 70 73 74 72 65 61 herwise.it.is.set.to.the.upstrea
78560 6d 20 72 65 6d 6f 74 65 2e 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 e2 80 98 62 72 61 6e 63 68 2e m.remote.................branch.
78580 3c 6e 61 6d 65 3e 2e 64 65 73 63 72 69 70 74 69 6f 6e e2 80 99 20 69 73 20 73 65 74 20 74 6f 20 <name>.description....is.set.to.
785a0 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 74 69 74 6c 65 2e 0a 20 20 20 20 20 20 20 20 the.pull-request.title..........
785c0 e2 80 a2 20 e2 80 98 62 72 61 6e 63 68 2e 3c 6e 61 6d 65 3e 2e 72 65 62 61 73 65 e2 80 99 20 69 .......branch.<name>.rebase....i
785e0 73 20 73 65 74 20 74 6f 20 e2 80 98 74 72 75 65 e2 80 99 20 62 65 63 61 75 73 65 20 74 68 65 72 s.set.to....true....because.ther
78600 65 20 73 68 6f 75 6c 64 0a 20 20 20 20 20 20 20 20 20 20 62 65 20 6e 6f 20 6d 65 72 67 65 20 63 e.should...........be.no.merge.c
78620 6f 6d 6d 69 74 73 20 61 6d 6f 6e 67 20 74 68 65 20 63 6f 6d 6d 69 74 73 20 69 6e 20 61 20 70 75 ommits.among.the.commits.in.a.pu
78640 6c 6c 2d 72 65 71 75 65 73 74 2e 0a 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 61 ll-request........This.command.a
78660 6c 73 6f 20 63 6f 6e 66 69 67 75 72 65 73 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 61 6e 64 20 lso.configures.the.upstream.and.
78680 74 68 65 20 70 75 73 68 2d 72 65 6d 6f 74 65 20 6f 66 0a 20 20 20 20 20 74 68 65 20 6c 6f 63 61 the.push-remote.of......the.loca
786a0 6c 20 62 72 61 6e 63 68 20 74 68 61 74 20 69 74 20 63 72 65 61 74 65 73 2e 0a 0a 20 20 20 20 20 l.branch.that.it.creates........
786c0 54 68 65 20 62 72 61 6e 63 68 20 61 67 61 69 6e 73 74 20 77 68 69 63 68 20 74 68 65 20 70 75 6c The.branch.against.which.the.pul
786e0 6c 2d 72 65 71 75 65 73 74 20 77 61 73 20 6f 70 65 6e 65 64 20 69 73 20 61 6c 77 61 79 73 20 75 l-request.was.opened.is.always.u
78700 73 65 64 0a 20 20 20 20 20 61 73 20 74 68 65 20 75 70 73 74 72 65 61 6d 2e 20 20 54 68 69 73 20 sed......as.the.upstream...This.
78720 6d 61 6b 65 73 20 69 74 20 65 61 73 79 20 74 6f 20 73 65 65 20 77 68 61 74 20 63 6f 6d 6d 69 74 makes.it.easy.to.see.what.commit
78740 73 20 79 6f 75 20 61 72 65 0a 20 20 20 20 20 62 65 69 6e 67 20 61 73 6b 65 64 20 74 6f 20 6d 65 s.you.are......being.asked.to.me
78760 72 67 65 20 69 6e 20 74 68 65 20 73 65 63 74 69 6f 6e 20 74 69 74 6c 65 64 20 73 6f 6d 65 74 68 rge.in.the.section.titled.someth
78780 69 6e 67 20 6c 69 6b 65 20 22 55 6e 6d 65 72 67 65 64 0a 20 20 20 20 20 69 6e 74 6f 20 6f 72 69 ing.like."Unmerged......into.ori
787a0 67 69 6e 2f 6d 61 73 74 65 72 22 2e 0a 0a 20 20 20 20 20 4c 69 6b 65 20 66 6f 72 20 6f 74 68 65 gin/master"........Like.for.othe
787c0 72 20 63 6f 6d 6d 61 6e 64 73 20 74 68 61 74 20 63 72 65 61 74 65 20 61 20 62 72 61 6e 63 68 2c r.commands.that.create.a.branch,
787e0 20 69 74 20 64 65 70 65 6e 64 73 20 6f 6e 20 74 68 65 0a 20 20 20 20 20 6f 70 74 69 6f 6e 20 e2 .it.depends.on.the......option..
78800 80 98 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 70 72 65 66 65 72 2d 72 65 6d 6f 74 65 2d 75 70 73 ..magit-branch-prefer-remote-ups
78820 74 72 65 61 6d e2 80 99 20 77 68 65 74 68 65 72 20 74 68 65 20 72 65 6d 6f 74 65 0a 20 20 20 20 tream....whether.the.remote.....
78840 20 62 72 61 6e 63 68 20 69 74 73 65 6c 66 20 6f 72 20 74 68 65 20 72 65 73 70 65 63 74 69 76 65 .branch.itself.or.the.respective
78860 20 6c 6f 63 61 6c 20 62 72 61 6e 63 68 20 69 73 20 75 73 65 64 20 61 73 20 74 68 65 0a 20 20 20 .local.branch.is.used.as.the....
78880 20 20 75 70 73 74 72 65 61 6d 2c 20 73 6f 20 74 68 69 73 20 73 65 63 74 69 6f 6e 20 6d 61 79 20 ..upstream,.so.this.section.may.
788a0 61 6c 73 6f 20 62 65 20 74 69 74 6c 65 64 2c 20 65 2e 67 2e 2c 20 22 55 6e 6d 65 72 67 65 64 20 also.be.titled,.e.g.,."Unmerged.
788c0 69 6e 74 6f 0a 20 20 20 20 20 6d 61 73 74 65 72 22 2e 0a 0a 20 20 20 20 20 57 68 65 6e 20 6e 65 into......master"........When.ne
788e0 63 65 73 73 61 72 79 20 61 6e 64 20 70 6f 73 73 69 62 6c 65 2c 20 74 68 65 20 72 65 6d 6f 74 65 cessary.and.possible,.the.remote
78900 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 72 61 6e 63 68 20 69 73 0a 20 20 20 20 20 63 6f 6e .pull-request.branch.is......con
78920 66 69 67 75 72 65 64 20 74 6f 20 62 65 20 75 73 65 64 20 61 73 20 74 68 65 20 70 75 73 68 2d 74 figured.to.be.used.as.the.push-t
78940 61 72 67 65 74 2e 20 20 54 68 69 73 20 6d 61 6b 65 73 20 69 74 20 65 61 73 79 20 74 6f 0a 20 20 arget...This.makes.it.easy.to...
78960 20 20 20 73 65 65 20 77 68 61 74 20 66 75 72 74 68 65 72 20 63 68 61 6e 67 65 73 20 74 68 65 20 ...see.what.further.changes.the.
78980 63 6f 6e 74 72 69 62 75 74 6f 72 20 68 61 73 20 6d 61 64 65 20 73 69 6e 63 65 20 79 6f 75 20 6c contributor.has.made.since.you.l
789a0 61 73 74 0a 20 20 20 20 20 72 65 76 69 65 77 65 64 20 74 68 65 69 72 20 63 68 61 6e 67 65 73 20 ast......reviewed.their.changes.
789c0 69 6e 20 74 68 65 20 73 65 63 74 69 6f 6e 20 74 69 74 6c 65 64 20 73 6f 6d 65 74 68 69 6e 67 20 in.the.section.titled.something.
789e0 6c 69 6b 65 0a 20 20 20 20 20 22 55 6e 70 75 6c 6c 65 64 20 66 72 6f 6d 20 6f 72 69 67 69 6e 2f like......"Unpulled.from.origin/
78a00 6e 65 77 2d 66 65 61 74 75 72 65 22 20 6f 72 20 22 55 6e 70 75 6c 6c 65 64 20 66 72 6f 6d 0a 20 new-feature".or."Unpulled.from..
78a20 20 20 20 20 66 6f 72 6b 2f 6e 65 77 2d 66 65 61 74 75 72 65 22 2e 0a 0a 20 20 20 20 20 20 20 20 ....fork/new-feature"...........
78a40 e2 80 a2 20 49 66 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 72 61 6e 63 68 20 69 ....If.the.pull-request.branch.i
78a60 73 20 6c 6f 63 61 74 65 64 20 69 6e 20 74 68 65 20 75 70 73 74 72 65 61 6d 0a 20 20 20 20 20 20 s.located.in.the.upstream.......
78a80 20 20 20 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 74 68 65 6e 20 79 6f 75 20 70 72 6f 62 61 62 6c ....repository,.then.you.probabl
78aa0 79 20 68 61 76 65 20 73 65 74 20 e2 80 98 72 65 6d 6f 74 65 2e 70 75 73 68 44 65 66 61 75 6c 74 y.have.set....remote.pushDefault
78ac0 e2 80 99 20 74 6f 0a 20 20 20 20 20 20 20 20 20 20 74 68 61 74 20 72 65 70 6f 73 69 74 6f 72 79 ....to...........that.repository
78ae0 2e 20 20 48 6f 77 65 76 65 72 20 73 6f 6d 65 20 75 73 65 72 73 20 6c 69 6b 65 20 74 6f 20 73 65 ...However.some.users.like.to.se
78b00 74 20 74 68 61 74 20 76 61 72 69 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 74 6f 20 74 68 65 t.that.variable...........to.the
78b20 69 72 20 70 65 72 73 6f 6e 61 6c 20 66 6f 72 6b 2c 20 65 76 65 6e 20 69 66 20 74 68 65 79 20 68 ir.personal.fork,.even.if.they.h
78b40 61 76 65 20 70 75 73 68 20 61 63 63 65 73 73 20 74 6f 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 ave.push.access.to.the..........
78b60 20 75 70 73 74 72 65 61 6d 2c 20 73 6f 20 e2 80 98 62 72 61 6e 63 68 2e 3c 6e 61 6d 65 3e 2e 70 .upstream,.so....branch.<name>.p
78b80 75 73 68 52 65 6d 6f 74 65 e2 80 99 20 69 73 20 73 65 74 20 61 6e 79 77 61 79 2e 0a 0a 20 20 20 ushRemote....is.set.anyway......
78ba0 20 20 20 20 20 e2 80 a2 20 54 68 65 20 70 75 73 68 2d 72 65 6d 6f 74 65 20 69 73 20 63 6f 6e 66 .........The.push-remote.is.conf
78bc0 69 67 75 72 65 64 20 75 73 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 e2 80 98 62 72 61 6e 63 68 igured.using..............branch
78be0 2e 3c 6e 61 6d 65 3e 2e 70 75 73 68 52 65 6d 6f 74 65 e2 80 99 2c 20 65 76 65 6e 20 69 66 20 74 .<name>.pushRemote...,.even.if.t
78c00 68 65 20 75 73 65 64 20 76 61 6c 75 65 20 69 73 0a 20 20 20 20 20 20 20 20 20 20 69 64 65 6e 74 he.used.value.is...........ident
78c20 69 63 61 6c 20 74 6f 20 74 68 61 74 20 6f 66 20 e2 80 98 72 65 6d 6f 74 65 2e 70 75 73 68 44 65 ical.to.that.of....remote.pushDe
78c40 66 61 75 6c 74 e2 80 99 2c 20 6a 75 73 74 20 69 6e 20 63 61 73 65 20 79 6f 75 0a 20 20 20 20 20 fault...,.just.in.case.you......
78c60 20 20 20 20 20 63 68 61 6e 67 65 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20 6c 61 74 .....change.the.value.of.the.lat
78c80 74 65 72 20 6c 61 74 65 72 20 6f 6e 2e 20 20 41 64 64 69 74 69 6f 6e 61 6c 6c 79 20 74 68 65 0a ter.later.on...Additionally.the.
78ca0 20 20 20 20 20 20 20 20 20 20 76 61 72 69 61 62 6c 65 20 e2 80 98 62 72 61 6e 63 68 2e 3c 6e 61 ..........variable....branch.<na
78cc0 6d 65 3e 2e 70 75 6c 6c 52 65 71 75 65 73 74 52 65 6d 6f 74 65 e2 80 99 20 69 73 20 73 65 74 20 me>.pullRequestRemote....is.set.
78ce0 74 6f 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 72 65 6d 6f 74 65 20 6f 6e 20 77 68 69 63 68 to.the...........remote.on.which
78d00 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 72 61 6e 63 68 20 69 73 20 6c 6f 63 61 .the.pull-request.branch.is.loca
78d20 74 65 64 2e 0a 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 49 66 20 74 68 65 20 70 75 6c 6c 2d 72 65 ted...............If.the.pull-re
78d40 71 75 65 73 74 20 62 72 61 6e 63 68 20 69 73 20 6c 6f 63 61 74 65 64 20 6f 6e 20 74 68 65 20 63 quest.branch.is.located.on.the.c
78d60 6f 6e 74 72 69 62 75 74 6f 72 e2 80 99 73 0a 20 20 20 20 20 20 20 20 20 20 66 6f 72 6b 2c 20 74 ontributor...s...........fork,.t
78d80 68 65 6e 20 79 6f 75 2c 20 61 73 20 61 20 6d 61 69 6e 74 61 69 6e 65 72 20 6f 66 20 74 68 65 20 hen.you,.as.a.maintainer.of.the.
78da0 75 70 73 74 72 65 61 6d 20 72 65 70 6f 73 69 74 6f 72 79 2c 0a 20 20 20 20 20 20 20 20 20 20 61 upstream.repository,...........a
78dc0 72 65 20 75 73 75 61 6c 6c 79 20 61 6c 6c 6f 77 65 64 20 74 6f 20 70 75 73 68 20 74 6f 20 74 68 re.usually.allowed.to.push.to.th
78de0 61 74 20 62 72 61 6e 63 68 20 61 6e 79 77 61 79 2e 20 20 28 48 6f 77 65 76 65 72 2c 0a 20 20 20 at.branch.anyway...(However,....
78e00 20 20 20 20 20 20 20 74 68 65 20 63 6f 6e 74 72 69 62 75 74 6f 72 20 63 6f 75 6c 64 20 65 78 70 .......the.contributor.could.exp
78e20 6c 69 63 69 74 6c 79 20 64 69 73 61 6c 6c 6f 77 20 74 68 69 73 2c 20 62 75 74 20 69 6e 20 6d 79 licitly.disallow.this,.but.in.my
78e40 0a 20 20 20 20 20 20 20 20 20 20 65 78 70 65 72 69 65 6e 63 65 20 74 68 61 74 20 72 61 72 65 6c ...........experience.that.rarel
78e60 79 20 68 61 70 70 65 6e 73 2e 29 0a 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 41 73 20 6d 65 6e 74 y.happens.)..............As.ment
78e80 69 6f 6e 65 64 20 61 62 6f 76 65 2c 20 63 6f 6e 74 72 69 62 75 74 6f 72 73 20 73 6f 6d 65 74 69 ioned.above,.contributors.someti
78ea0 6d 65 73 20 66 61 69 6c 20 74 6f 20 75 73 65 20 61 0a 20 20 20 20 20 20 20 20 20 20 64 65 64 69 mes.fail.to.use.a...........dedi
78ec0 63 61 74 65 64 20 62 72 61 6e 63 68 20 66 6f 72 20 74 68 65 69 72 20 70 75 6c 6c 2d 72 65 71 75 cated.branch.for.their.pull-requ
78ee0 65 73 74 73 20 61 6e 64 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20 69 73 0a 20 20 20 20 20 20 20 ests.and.this.command.is........
78f00 20 20 20 74 68 75 73 20 66 6f 72 63 65 64 20 74 6f 20 6d 61 6b 65 20 75 70 20 61 20 62 72 61 6e ...thus.forced.to.make.up.a.bran
78f20 63 68 20 6e 61 6d 65 20 73 75 63 68 20 61 73 20 22 70 72 2d 33 31 33 22 2e 0a 0a 20 20 20 20 20 ch.name.such.as."pr-313"........
78f40 20 20 20 20 20 55 73 75 61 6c 6c 79 20 61 20 6d 61 69 6e 74 61 69 6e 65 72 20 77 6f 75 6c 64 20 .....Usually.a.maintainer.would.
78f60 75 73 65 0a 20 20 20 20 20 20 20 20 20 20 e2 80 98 6d 61 67 69 74 2d 70 75 73 68 2d 63 75 72 72 use..............magit-push-curr
78f80 65 6e 74 2d 74 6f 2d 70 75 73 68 72 65 6d 6f 74 65 e2 80 99 20 28 6f 6e 20 e2 80 98 70 e2 80 99 ent-to-pushremote....(on....p...
78fa0 29 20 74 6f 20 70 75 73 68 20 74 6f 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 63 6f 6e 74 72 ).to.push.to.the...........contr
78fc0 69 62 75 74 6f 72 e2 80 99 73 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 72 61 6e 63 68 20 6f ibutor...s.pull-request.branch.o
78fe0 6e 20 74 68 65 69 72 20 66 6f 72 6b 2e 20 20 46 6f 72 20 61 20 62 72 61 6e 63 68 0a 20 20 20 20 n.their.fork...For.a.branch.....
79000 20 20 20 20 20 20 6e 61 6d 65 64 20 22 70 72 2d 33 31 33 22 20 74 68 61 74 20 64 6f 65 73 20 6e ......named."pr-313".that.does.n
79020 6f 74 20 77 6f 72 6b 2e 20 20 28 49 6e 73 74 65 61 64 20 6f 66 20 70 75 73 68 69 6e 67 20 74 6f ot.work...(Instead.of.pushing.to
79040 0a 20 20 20 20 20 20 20 20 20 20 22 66 6f 72 6b 2f 6d 61 69 6e 22 2c 20 69 74 20 77 6f 75 6c 64 ..........."fork/main",.it.would
79060 20 75 6e 73 75 63 63 65 73 73 66 75 6c 6c 79 20 61 74 74 65 6d 70 74 20 74 6f 20 63 72 65 61 74 .unsuccessfully.attempt.to.creat
79080 65 20 61 20 6e 65 77 0a 20 20 20 20 20 20 20 20 20 20 62 72 61 6e 63 68 20 22 70 72 2d 33 31 33 e.a.new...........branch."pr-313
790a0 22 20 6f 6e 20 74 68 65 20 66 6f 72 6b 2e 29 20 20 49 6e 20 73 75 63 68 20 73 69 74 75 61 74 69 ".on.the.fork.)..In.such.situati
790c0 6f 6e 73 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 e2 80 98 6d 61 67 69 74 2d 70 75 73 68 e2 ons.the..............magit-push.
790e0 80 99 20 6d 65 6e 75 20 6f 66 66 65 72 73 20 61 6e 20 61 6c 74 65 72 6e 61 74 69 76 65 20 63 6f ...menu.offers.an.alternative.co
79100 6d 6d 61 6e 64 20 66 6f 72 20 70 75 73 68 69 6e 67 20 74 6f 0a 20 20 20 20 20 20 20 20 20 20 74 mmand.for.pushing.to...........t
79120 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 72 61 6e 63 68 3a 20 e2 80 98 66 6f 72 67 65 he.pull-request.branch:....forge
79140 2d 70 75 73 68 2d 74 6f 2d 75 6e 6e 61 6d 65 64 2d 70 75 6c 6c 72 65 71 e2 80 99 20 28 6f 6e 0a -push-to-unnamed-pullreq....(on.
79160 20 20 20 20 20 20 20 20 20 20 e2 80 98 4e e2 80 99 29 2e 0a 0a e2 80 98 62 20 66 e2 80 99 20 28 .............N...)......b.f....(
79180 e2 80 98 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 70 75 6c 6c 72 65 71 e2 80 99 29 0a 20 20 ...forge-checkout-pullreq...)...
791a0 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 63 72 65 61 74 65 73 20 61 6e 64 20 63 6f 6e 66 ...This.command.creates.and.conf
791c0 69 67 75 72 65 73 20 61 20 6e 65 77 20 62 72 61 6e 63 68 20 66 72 6f 6d 20 61 0a 20 20 20 20 20 igures.a.new.branch.from.a......
791e0 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 74 68 65 20 73 61 6d 65 20 77 61 79 20 e2 80 98 66 6f 72 pull-request.the.same.way....for
79200 67 65 2d 62 72 61 6e 63 68 2d 70 75 6c 6c 72 65 71 e2 80 99 20 64 6f 65 73 2e 0a 20 20 20 20 20 ge-branch-pullreq....does.......
79220 41 64 64 69 74 69 6f 6e 61 6c 6c 79 20 69 74 20 63 68 65 63 6b 73 20 6f 75 74 20 74 68 65 20 6e Additionally.it.checks.out.the.n
79240 65 77 20 62 72 61 6e 63 68 2e 0a 0a e2 80 98 5a 20 6e e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d ew.branch......Z.n....(...forge-
79260 63 68 65 63 6b 6f 75 74 2d 77 6f 72 6b 74 72 65 65 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 checkout-worktree...)......This.
79280 63 6f 6d 6d 61 6e 64 20 63 72 65 61 74 65 73 20 61 6e 64 20 63 6f 6e 66 69 67 75 72 65 73 20 61 command.creates.and.configures.a
792a0 20 6e 65 77 20 62 72 61 6e 63 68 20 66 72 6f 6d 20 61 0a 20 20 20 20 20 70 75 6c 6c 2d 72 65 71 .new.branch.from.a......pull-req
792c0 75 65 73 74 20 74 68 65 20 73 61 6d 65 20 77 61 79 20 e2 80 98 66 6f 72 67 65 2d 62 72 61 6e 63 uest.the.same.way....forge-branc
792e0 68 2d 70 75 6c 6c 72 65 71 e2 80 99 20 64 6f 65 73 2e 0a 20 20 20 20 20 41 64 64 69 74 69 6f 6e h-pullreq....does.......Addition
79300 61 6c 6c 79 20 69 74 20 63 68 65 63 6b 73 20 6f 75 74 20 74 68 65 20 6e 65 77 20 62 72 61 6e 63 ally.it.checks.out.the.new.branc
79320 68 2c 20 75 73 69 6e 67 20 61 20 6e 65 77 20 77 6f 72 6b 69 6e 67 0a 20 20 20 20 20 74 72 65 65 h,.using.a.new.working......tree
79340 2e 0a 0a 20 2d 2d 20 55 73 65 72 20 4f 70 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 63 68 65 63 6b 6f ....--.User.Option:.forge-checko
79360 75 74 2d 77 6f 72 6b 74 72 65 65 2d 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 66 75 6e 63 74 ut-worktree-read-directory-funct
79380 69 6f 6e 0a 20 20 20 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 75 73 65 64 20 62 ion......This.function.is.used.b
793a0 79 20 e2 80 98 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 77 6f 72 6b 74 72 65 65 e2 80 99 2c y....forge-checkout-worktree...,
793c0 20 74 6f 20 72 65 61 64 20 74 68 65 20 6e 65 77 0a 20 20 20 20 20 77 6f 72 6b 74 72 65 65 20 64 .to.read.the.new......worktree.d
793e0 69 72 65 63 74 6f 72 79 20 77 68 65 72 65 20 69 74 20 63 68 65 63 6b 73 20 6f 75 74 20 74 68 65 irectory.where.it.checks.out.the
79400 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 20 20 49 74 20 74 61 6b 65 73 0a 20 20 20 20 20 74 68 .pull-request...It.takes......th
79420 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 61 73 20 74 68 65 20 6f 6e 6c 79 20 61 72 67 75 6d e.pull-request.as.the.only.argum
79440 65 6e 74 20 61 6e 64 20 6d 75 73 74 20 72 65 74 75 72 6e 20 61 20 64 69 72 65 63 74 6f 72 79 2e ent.and.must.return.a.directory.
79460 0a 0a 20 20 20 57 68 65 6e 20 79 6f 75 20 64 65 6c 65 74 65 20 61 20 70 75 6c 6c 2d 72 65 71 75 .....When.you.delete.a.pull-requ
79480 65 73 74 20 62 72 61 6e 63 68 2c 20 77 68 69 63 68 20 77 61 73 20 63 72 65 61 74 65 64 20 75 73 est.branch,.which.was.created.us
794a0 69 6e 67 20 6f 6e 65 20 6f 66 0a 74 68 65 20 61 62 6f 76 65 20 74 68 72 65 65 20 63 6f 6d 6d 61 ing.one.of.the.above.three.comma
794c0 6e 64 73 2c 20 74 68 65 6e 20 e2 80 98 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 64 65 6c 65 74 65 nds,.then....magit-branch-delete
794e0 e2 80 99 20 75 73 75 61 6c 6c 79 20 6f 66 66 65 72 73 20 74 6f 0a 61 6c 73 6f 20 64 65 6c 65 74 ....usually.offers.to.also.delet
79500 65 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 72 65 6d 6f 74 65 2e 20 20 49 74 20 e.the.corresponding.remote...It.
79520 64 6f 65 73 20 6e 6f 74 20 6f 66 66 65 72 20 74 6f 20 64 65 6c 65 74 65 20 61 0a 72 65 6d 6f 74 does.not.offer.to.delete.a.remot
79540 65 20 69 66 20 28 31 29 20 74 68 65 20 72 65 6d 6f 74 65 20 69 73 20 74 68 65 20 75 70 73 74 72 e.if.(1).the.remote.is.the.upstr
79560 65 61 6d 20 72 65 6d 6f 74 65 2c 20 61 6e 64 2f 6f 72 20 28 32 29 20 69 66 20 6f 74 68 65 72 0a eam.remote,.and/or.(2).if.other.
79580 62 72 61 6e 63 68 65 73 20 61 72 65 20 62 65 69 6e 67 20 66 65 74 63 68 65 64 20 66 72 6f 6d 20 branches.are.being.fetched.from.
795a0 74 68 65 20 72 65 6d 6f 74 65 2e 0a 0a 20 20 20 4e 6f 74 65 20 74 68 61 74 20 79 6f 75 20 68 61 the.remote......Note.that.you.ha
795c0 76 65 20 74 6f 20 64 65 6c 65 74 65 20 74 68 65 20 6c 6f 63 61 6c 20 62 72 61 6e 63 68 20 28 65 ve.to.delete.the.local.branch.(e
795e0 2e 67 2e 2c 20 22 66 65 61 74 75 72 65 22 29 20 66 6f 72 0a 74 68 69 73 20 74 6f 20 77 6f 72 6b .g.,."feature").for.this.to.work
79600 2e 20 20 49 66 20 79 6f 75 20 64 65 6c 65 74 65 20 74 68 65 20 74 72 61 63 6b 69 6e 67 20 62 72 ...If.you.delete.the.tracking.br
79620 61 6e 63 68 20 28 65 2e 67 2e 2c 20 22 66 6f 72 6b 2f 66 65 61 74 75 72 65 22 29 2c 0a 74 68 65 anch.(e.g.,."fork/feature"),.the
79640 6e 20 74 68 65 20 72 65 6d 6f 74 65 20 69 73 20 6e 65 76 65 72 20 72 65 6d 6f 76 65 64 2e 0a 0a n.the.remote.is.never.removed...
79660 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 4d 69 73 63 65 ..File:.forge.info,..Node:.Misce
79680 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2c 20 20 4e 65 78 74 3a 20 4d 69 73 63 65 6c llaneous.Commands,..Next:.Miscel
796a0 6c 61 6e 65 6f 75 73 20 4f 70 74 69 6f 6e 73 2c 20 20 50 72 65 76 3a 20 42 72 61 6e 63 68 69 6e laneous.Options,..Prev:.Branchin
796c0 67 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 31 31 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f g,..Up:.Top..11.Miscellaneous.Co
796e0 6d 6d 61 6e 64 73 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a mmands.*************************
79700 0a 0a e2 80 98 4e 20 4d e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 6d 65 72 67 65 e2 80 99 29 0a .....N.M....(...forge-merge...).
79720 e2 80 98 6d 20 4d 20 5b 69 66 20 65 6e 61 62 6c 65 64 5d e2 80 99 0a 20 20 20 20 20 54 68 69 73 ...m.M.[if.enabled].........This
79740 20 63 6f 6d 6d 61 6e 64 20 6d 65 72 67 65 73 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 75 6c 6c .command.merges.the.current.pull
79760 2d 72 65 71 75 65 73 74 20 75 73 69 6e 67 20 74 68 65 20 66 6f 72 67 65 e2 80 99 73 20 41 50 49 -request.using.the.forge...s.API
79780 2e 0a 20 20 20 20 20 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 63 75 72 72 65 6e 74 20 70 75 .......If.there.is.no.current.pu
797a0 6c 6c 2d 72 65 71 75 65 73 74 20 6f 72 20 77 69 74 68 20 61 20 70 72 65 66 69 78 20 61 72 67 75 ll-request.or.with.a.prefix.argu
797c0 6d 65 6e 74 2c 20 74 68 65 6e 0a 20 20 20 20 20 69 74 20 72 65 61 64 73 20 61 20 70 75 6c 6c 2d ment,.then......it.reads.a.pull-
797e0 72 65 71 75 65 73 74 20 74 6f 20 76 69 73 69 74 20 69 6e 73 74 65 61 64 2e 0a 0a 20 20 20 20 20 request.to.visit.instead........
79800 54 68 65 20 22 6d 65 72 67 65 20 6d 65 74 68 6f 64 22 20 74 6f 20 62 65 20 75 73 65 64 20 69 73 The."merge.method".to.be.used.is
79820 20 72 65 61 64 20 66 72 6f 6d 20 74 68 65 20 75 73 65 72 2e 0a 0a 20 20 20 20 20 55 73 65 20 6f .read.from.the.user........Use.o
79840 66 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20 69 73 20 64 69 73 63 6f 75 72 61 67 65 64 2e 20 20 f.this.command.is.discouraged...
79860 55 6e 6c 65 73 73 20 74 68 65 20 72 65 6d 6f 74 65 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 Unless.the.remote.repository....
79880 20 20 69 73 20 63 6f 6e 66 69 67 75 72 65 64 20 74 6f 20 64 69 73 61 6c 6c 6f 77 20 74 68 61 74 ..is.configured.to.disallow.that
798a0 2c 20 79 6f 75 20 73 68 6f 75 6c 64 20 69 6e 73 74 65 61 64 20 6d 65 72 67 65 20 6c 6f 63 61 6c ,.you.should.instead.merge.local
798c0 6c 79 0a 20 20 20 20 20 61 6e 64 20 74 68 65 6e 20 70 75 73 68 20 74 68 65 20 74 61 72 67 65 74 ly......and.then.push.the.target
798e0 20 62 72 61 6e 63 68 2e 20 20 46 6f 72 67 65 73 20 64 65 74 65 63 74 20 74 68 61 74 20 79 6f 75 .branch...Forges.detect.that.you
79900 20 68 61 76 65 20 64 6f 6e 65 0a 20 20 20 20 20 74 68 61 74 20 61 6e 64 20 72 65 73 70 6f 6e 64 .have.done......that.and.respond
79920 20 62 79 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 6d 61 72 6b 69 6e 67 20 74 68 65 20 70 75 .by.automatically.marking.the.pu
79940 6c 6c 2d 72 65 71 75 65 73 74 20 61 73 0a 20 20 20 20 20 6d 65 72 67 65 64 2e 0a 0a e2 80 98 4e ll-request.as......merged......N
79960 20 63 20 66 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 66 6f 72 6b e2 80 99 29 0a 20 20 20 20 20 .c.f....(...forge-fork...)......
79980 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 61 64 64 73 20 61 6e 20 61 64 64 69 74 69 6f 6e 61 6c 20 This.command.adds.an.additional.
799a0 72 65 6d 6f 74 65 20 74 6f 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 remote.to.the.current.repository
799c0 2e 0a 20 20 20 20 20 54 68 65 20 72 65 6d 6f 74 65 20 63 61 6e 20 65 69 74 68 65 72 20 70 6f 69 .......The.remote.can.either.poi
799e0 6e 74 20 61 74 20 61 6e 20 65 78 69 73 74 69 6e 67 20 72 65 70 6f 73 69 74 6f 72 79 20 6f 72 20 nt.at.an.existing.repository.or.
79a00 6f 6e 65 20 74 68 61 74 0a 20 20 20 20 20 68 61 73 20 74 6f 20 62 65 20 63 72 65 61 74 65 64 20 one.that......has.to.be.created.
79a20 66 69 72 73 74 20 62 79 20 66 6f 72 6b 69 6e 67 20 69 74 20 74 6f 20 61 6e 20 61 63 63 6f 75 6e first.by.forking.it.to.an.accoun
79a40 74 20 74 68 65 20 75 73 65 72 20 68 61 73 0a 20 20 20 20 20 61 63 63 65 73 73 20 74 6f 2e 0a 0a t.the.user.has......access.to...
79a60 20 20 20 20 20 43 75 72 72 65 6e 74 6c 79 20 74 68 69 73 20 6f 6e 6c 79 20 73 75 70 70 6f 72 74 .....Currently.this.only.support
79a80 73 20 47 69 74 68 75 62 20 61 6e 64 20 47 69 74 6c 61 62 2e 0a 0a e2 80 98 4e 20 2d 20 48 e2 80 s.Github.and.Gitlab......N.-.H..
79aa0 99 20 28 e2 80 98 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 74 6f 70 69 63 2d 6c 65 67 65 6e 64 e2 ..(...forge-toggle-topic-legend.
79ac0 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 74 6f 67 67 6c 65 20 77 68 65 ..)......This.command.toggle.whe
79ae0 74 68 65 72 20 74 6f 20 73 68 6f 77 20 61 20 6c 65 67 65 6e 64 20 66 6f 72 20 66 61 63 65 73 20 ther.to.show.a.legend.for.faces.
79b00 75 73 65 64 20 69 6e 0a 20 20 20 20 20 74 6f 70 69 63 20 6d 65 6e 75 73 20 61 6e 64 20 6c 69 73 used.in......topic.menus.and.lis
79b20 74 73 2e 0a 0a e2 80 98 4e 20 2d 20 53 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 74 6f 67 67 6c ts......N.-.S....(...forge-toggl
79b40 65 2d 64 69 73 70 6c 61 79 2d 69 6e 2d 73 74 61 74 75 73 2d 62 75 66 66 65 72 e2 80 99 29 0a 20 e-display-in-status-buffer...)..
79b60 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 74 6f 67 67 6c 65 73 20 77 68 65 74 68 65 72 ....This.command.toggles.whether
79b80 20 61 6e 79 20 74 6f 70 69 63 73 20 61 72 65 20 64 69 73 70 6c 61 79 65 64 20 69 6e 20 74 68 65 .any.topics.are.displayed.in.the
79ba0 0a 20 20 20 20 20 63 75 72 72 65 6e 74 20 4d 61 67 69 74 20 73 74 61 74 75 73 20 62 75 66 66 65 ......current.Magit.status.buffe
79bc0 72 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 77 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 63 6f 70 79 r......C-c.C-w....(...forge-copy
79be0 2d 75 72 6c 2d 61 74 2d 70 6f 69 6e 74 2d 61 73 2d 6b 69 6c 6c e2 80 99 29 0a 20 20 20 20 20 54 -url-at-point-as-kill...)......T
79c00 68 69 73 20 63 6f 6d 6d 61 6e 64 20 63 6f 70 69 65 73 20 74 68 65 20 75 72 6c 20 66 6f 72 20 74 his.command.copies.the.url.for.t
79c20 68 65 20 74 6f 70 69 63 2c 20 69 73 73 75 65 28 73 29 2c 0a 20 20 20 20 20 70 75 6c 6c 2d 72 65 he.topic,.issue(s),......pull-re
79c40 71 75 65 73 74 28 73 29 2c 20 70 6f 73 74 2c 20 62 72 61 6e 63 68 2c 20 63 6f 6d 6d 69 74 2c 20 quest(s),.post,.branch,.commit,.
79c60 72 65 6d 6f 74 65 20 6f 72 20 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 20 74 68 65 0a 20 20 20 20 remote.or.repository.to.the.....
79c80 20 6b 69 6c 6c 2d 72 69 6e 67 2e 0a 0a 20 20 20 20 20 54 68 69 73 20 64 65 74 65 72 6d 69 6e 65 .kill-ring........This.determine
79ca0 73 20 74 68 65 20 75 72 6c 20 74 68 65 20 73 61 6d 65 20 77 61 79 20 61 73 20 e2 80 98 66 6f 72 s.the.url.the.same.way.as....for
79cc0 67 65 2d 62 72 6f 77 73 65 e2 80 99 20 64 6f 65 73 2c 20 62 75 74 0a 20 20 20 20 20 74 68 65 6e ge-browse....does,.but......then
79ce0 20 61 64 64 73 20 69 74 20 74 6f 20 74 68 65 20 6b 69 6c 6c 2d 72 69 6e 67 2c 20 69 6e 73 74 65 .adds.it.to.the.kill-ring,.inste
79d00 61 64 20 6f 66 20 76 69 73 69 74 69 6e 67 20 69 74 20 69 6e 20 61 20 62 72 6f 77 73 65 72 2e 0a ad.of.visiting.it.in.a.browser..
79d20 0a e2 80 98 4d 20 62 20 72 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 72 65 6e 61 6d 65 2d 64 65 ....M.b.r....(...forge-rename-de
79d40 66 61 75 6c 74 2d 62 72 61 6e 63 68 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 fault-branch...)......This.comma
79d60 6e 64 20 72 65 6e 61 6d 65 20 74 68 65 20 64 65 66 61 75 6c 74 20 62 72 61 6e 63 68 20 74 6f 20 nd.rename.the.default.branch.to.
79d80 61 20 6e 65 77 20 6e 61 6d 65 20 72 65 61 64 20 66 72 6f 6d 20 74 68 65 0a 20 20 20 20 20 75 73 a.new.name.read.from.the......us
79da0 65 72 2e 0a 0a 20 20 20 20 20 54 68 69 73 20 63 68 61 6e 67 65 73 20 74 68 65 20 6e 61 6d 65 20 er........This.changes.the.name.
79dc0 6f 6e 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 6d 6f 74 65 6c 79 20 61 6e 64 20 6c 6f 63 on.the.upstream.remotely.and.loc
79de0 61 6c 6c 79 2c 20 61 6e 64 0a 20 20 20 20 20 75 70 64 61 74 65 20 74 68 65 20 75 70 73 74 72 65 ally,.and......update.the.upstre
79e00 61 6d 20 72 65 6d 6f 74 65 73 20 6f 66 20 6c 6f 63 61 6c 20 62 72 61 6e 63 68 65 73 20 61 63 63 am.remotes.of.local.branches.acc
79e20 6f 72 64 69 6e 67 6c 79 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 61 64 ordingly....--.Command:.forge-ad
79e40 64 2d 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d d-pullreq-refspec......This.comm
79e60 61 6e 64 20 63 6f 6e 66 69 67 75 72 65 73 20 47 69 74 20 74 6f 20 66 65 74 63 68 20 61 6c 6c 20 and.configures.Git.to.fetch.all.
79e80 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e 0a 0a 20 20 20 20 20 54 68 69 73 20 69 73 20 64 6f 6e pull-requests........This.is.don
79ea0 65 20 62 79 20 61 64 64 69 6e 67 20 e2 80 98 2b 72 65 66 73 2f 70 75 6c 6c 2f 2a 2f 68 65 61 64 e.by.adding....+refs/pull/*/head
79ec0 3a 72 65 66 73 2f 70 75 6c 6c 72 65 71 73 2f 2a e2 80 99 20 74 6f 20 74 68 65 0a 20 20 20 20 20 :refs/pullreqs/*....to.the......
79ee0 76 61 6c 75 65 20 6f 66 20 e2 80 98 72 65 6d 6f 74 65 2e 52 45 4d 4f 54 45 2e 66 65 74 63 68 e2 value.of....remote.REMOTE.fetch.
79f00 80 99 2c 20 77 68 65 72 65 20 52 45 4d 4f 54 45 20 69 73 20 74 68 65 20 75 70 73 74 72 65 61 6d ..,.where.REMOTE.is.the.upstream
79f20 0a 20 20 20 20 20 72 65 6d 6f 74 65 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 ......remote....--.Command:.forg
79f40 65 2d 61 64 64 2d 75 73 65 72 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 0a 20 20 20 20 20 54 68 69 e-add-user-repositories......Thi
79f60 73 20 63 6f 6d 6d 61 6e 64 20 72 65 61 64 73 20 61 20 68 6f 73 74 20 61 6e 64 20 61 20 75 73 65 s.command.reads.a.host.and.a.use
79f80 72 6e 61 6d 65 20 66 72 6f 6d 20 74 68 65 20 75 73 65 72 20 61 6e 64 20 61 64 64 73 20 61 6c 6c rname.from.the.user.and.adds.all
79fa0 0a 20 20 20 20 20 6f 66 20 74 68 61 74 20 75 73 65 72 e2 80 99 73 20 72 65 70 6f 73 69 74 6f 72 ......of.that.user...s.repositor
79fc0 69 65 73 20 6f 6e 20 74 68 61 74 20 68 6f 73 74 20 74 6f 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 ies.on.that.host.to.the.local.da
79fe0 74 61 62 61 73 65 2e 0a 0a 20 20 20 20 20 54 68 69 73 20 6d 61 79 20 74 61 6b 65 20 61 20 77 68 tabase........This.may.take.a.wh
7a000 69 6c 65 2e 20 20 4f 6e 6c 79 20 47 69 74 68 75 62 20 69 73 20 73 75 70 70 6f 72 74 65 64 20 61 ile...Only.Github.is.supported.a
7a020 74 20 74 68 65 20 6d 6f 6d 65 6e 74 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 t.the.moment....--.Command:.forg
7a040 65 2d 61 64 64 2d 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 0a e-add-organization-repositories.
7a060 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 72 65 61 64 73 20 61 20 68 6f 73 74 20 61 .....This.command.reads.a.host.a
7a080 6e 64 20 61 6e 20 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 20 66 72 6f 6d 20 74 68 65 20 75 73 65 72 nd.an.organization.from.the.user
7a0a0 20 61 6e 64 0a 20 20 20 20 20 61 64 64 73 20 61 6c 6c 20 74 68 65 20 6f 72 67 61 6e 69 7a 61 74 .and......adds.all.the.organizat
7a0c0 69 6f 6e e2 80 99 73 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 6f 6e 20 74 68 61 74 20 68 6f 73 ion...s.repositories.on.that.hos
7a0e0 74 20 74 6f 20 74 68 65 20 6c 6f 63 61 6c 0a 20 20 20 20 20 64 61 74 61 62 61 73 65 2e 0a 0a 20 t.to.the.local......database....
7a100 20 20 20 20 54 68 69 73 20 6d 61 79 20 74 61 6b 65 20 61 20 77 68 69 6c 65 2e 20 20 4f 6e 6c 79 ....This.may.take.a.while...Only
7a120 20 47 69 74 68 75 62 20 69 73 20 73 75 70 70 6f 72 74 65 64 20 61 74 20 74 68 65 20 6d 6f 6d 65 .Github.is.supported.at.the.mome
7a140 6e 74 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 72 65 6d 6f 76 65 2d 72 nt....--.Command:.forge-remove-r
7a160 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 72 65 61 64 epository......This.command.read
7a180 73 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 61 6e 64 20 72 65 6d 6f 76 65 73 20 69 74 20 66 72 s.a.repository.and.removes.it.fr
7a1a0 6f 6d 20 74 68 65 20 6c 6f 63 61 6c 0a 20 20 20 20 20 64 61 74 61 62 61 73 65 2e 0a 0a 20 2d 2d om.the.local......database....--
7a1c0 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 72 65 6d 6f 76 65 2d 74 6f 70 69 63 2d 6c 6f 63 .Command:.forge-remove-topic-loc
7a1e0 61 6c 6c 79 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 72 65 61 64 73 20 61 20 74 ally......This.command.reads.a.t
7a200 6f 70 69 63 20 61 6e 64 20 72 65 6d 6f 76 65 73 20 69 74 20 66 72 6f 6d 20 74 68 65 20 6c 6f 63 opic.and.removes.it.from.the.loc
7a220 61 6c 20 64 61 74 61 62 61 73 65 2e 0a 20 20 20 20 20 57 68 65 6e 20 74 68 65 20 72 65 67 69 6f al.database.......When.the.regio
7a240 6e 20 6d 61 72 6b 73 20 6d 75 6c 74 69 70 6c 65 20 74 6f 70 69 63 73 2c 20 74 68 65 6e 20 6f 66 n.marks.multiple.topics,.then.of
7a260 66 65 72 20 74 6f 20 72 65 6d 6f 76 65 20 74 68 65 6d 0a 20 20 20 20 20 61 6c 6c 2e 0a 0a 20 20 fer.to.remove.them......all.....
7a280 20 20 20 54 68 65 20 74 6f 70 69 63 20 69 73 20 6e 6f 74 20 72 65 6d 6f 76 65 64 20 66 72 6f 6d ...The.topic.is.not.removed.from
7a2a0 20 74 68 65 20 66 6f 72 67 65 20 61 6e 64 2c 20 69 66 20 69 74 20 69 73 20 6c 61 74 65 72 0a 20 .the.forge.and,.if.it.is.later..
7a2c0 20 20 20 20 6d 6f 64 69 66 69 65 64 2c 20 74 68 65 6e 20 69 74 20 77 69 6c 6c 20 62 65 20 61 64 ....modified,.then.it.will.be.ad
7a2e0 64 65 64 20 74 6f 20 74 68 65 20 64 61 74 61 62 61 73 65 20 61 67 61 69 6e 20 77 68 65 6e 20 66 ded.to.the.database.again.when.f
7a300 65 74 63 68 69 6e 67 0a 20 20 20 20 20 61 6c 6c 20 74 6f 70 69 63 73 2e 0a 0a 20 20 20 20 20 54 etching......all.topics........T
7a320 68 69 73 20 69 73 20 75 73 65 66 75 6c 20 66 6f 72 20 75 73 65 72 73 20 77 68 6f 20 6f 6e 6c 79 his.is.useful.for.users.who.only
7a340 20 66 65 74 63 68 20 69 6e 64 69 76 69 64 75 61 6c 20 74 6f 70 69 63 73 20 61 6e 64 20 77 61 6e .fetch.individual.topics.and.wan
7a360 74 0a 20 20 20 20 20 74 6f 20 72 65 6d 6f 76 65 20 74 68 65 20 74 6f 70 69 63 73 20 74 68 65 79 t......to.remove.the.topics.they
7a380 20 61 72 65 20 6e 6f 20 6c 6f 6e 67 65 72 20 69 6e 74 65 72 65 73 74 65 64 20 69 6e 2e 20 20 54 .are.no.longer.interested.in...T
7a3a0 68 69 73 20 63 61 6e 0a 20 20 20 20 20 61 6c 73 6f 20 62 65 20 75 73 65 64 20 74 6f 20 72 65 6d his.can......also.be.used.to.rem
7a3c0 6f 76 65 20 74 6f 70 69 63 73 20 6c 6f 63 61 6c 6c 79 2c 20 77 68 69 63 68 20 68 61 76 65 20 61 ove.topics.locally,.which.have.a
7a3e0 6c 72 65 61 64 79 20 62 65 65 6e 0a 20 20 20 20 20 72 65 6d 6f 76 65 64 20 6f 6e 20 74 68 65 20 lready.been......removed.on.the.
7a400 66 6f 72 67 65 20 28 74 68 65 20 73 65 72 76 69 63 65 29 2e 20 20 46 6f 72 67 65 20 28 74 68 65 forge.(the.service)...Forge.(the
7a420 20 70 61 63 6b 61 67 65 29 20 63 61 6e 6e 6f 74 0a 20 20 20 20 20 61 75 74 6f 6d 61 74 69 63 61 .package).cannot......automatica
7a440 6c 6c 79 20 64 65 74 65 63 74 20 77 68 65 6e 20 74 68 61 74 20 68 61 70 70 65 6e 73 2c 20 62 65 lly.detect.when.that.happens,.be
7a460 63 61 75 73 65 20 67 69 76 65 6e 20 68 6f 77 20 74 68 65 20 41 50 49 73 0a 20 20 20 20 20 77 6f cause.given.how.the.APIs......wo
7a480 72 6b 2c 20 74 68 69 73 20 77 6f 75 6c 64 20 62 65 20 74 6f 6f 20 65 78 70 65 6e 73 69 76 65 2e rk,.this.would.be.too.expensive.
7a4a0 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 72 65 73 65 74 2d 64 61 74 61 62 ...--.Command:.forge-reset-datab
7a4c0 61 73 65 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6d 6f 76 65 73 20 74 68 65 20 ase......This.command.moves.the.
7a4e0 63 75 72 72 65 6e 74 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 20 74 6f 20 74 68 65 20 74 72 61 current.database.file.to.the.tra
7a500 73 68 20 61 6e 64 0a 20 20 20 20 20 63 72 65 61 74 65 73 20 61 20 6e 65 77 20 65 6d 70 74 79 20 sh.and......creates.a.new.empty.
7a520 64 61 74 61 62 61 73 65 2e 0a 0a 20 20 20 20 20 54 68 69 73 20 69 73 20 75 73 65 66 75 6c 20 61 database........This.is.useful.a
7a540 66 74 65 72 20 74 68 65 20 64 61 74 61 62 61 73 65 e2 80 99 73 20 74 61 62 6c 65 20 73 63 68 65 fter.the.database...s.table.sche
7a560 6d 61 74 61 20 68 61 76 65 20 63 68 61 6e 67 65 64 2c 0a 20 20 20 20 20 77 68 69 63 68 20 77 69 mata.have.changed,......which.wi
7a580 6c 6c 20 68 61 70 70 65 6e 20 61 20 66 65 77 20 74 69 6d 65 73 20 77 68 69 6c 65 20 74 68 65 20 ll.happen.a.few.times.while.the.
7a5a0 46 6f 72 67 65 20 66 75 6e 63 74 69 6f 6e 61 6c 69 74 79 20 69 73 0a 20 20 20 20 20 73 74 69 6c Forge.functionality.is......stil
7a5c0 6c 20 75 6e 64 65 72 20 68 65 61 76 79 20 64 65 76 65 6c 6f 70 6d 65 6e 74 2e 0a 0a 1f 0a 46 69 l.under.heavy.development.....Fi
7a5e0 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 4d 69 73 63 65 6c 6c 61 6e le:.forge.info,..Node:.Miscellan
7a600 65 6f 75 73 20 4f 70 74 69 6f 6e 73 2c 20 20 4e 65 78 74 3a 20 48 6f 77 20 46 6f 72 67 65 20 44 eous.Options,..Next:.How.Forge.D
7a620 65 74 65 63 74 69 6f 6e 20 57 6f 72 6b 73 2c 20 20 50 72 65 76 3a 20 4d 69 73 63 65 6c 6c 61 6e etection.Works,..Prev:.Miscellan
7a640 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 31 32 20 4d 69 73 63 eous.Commands,..Up:.Top..12.Misc
7a660 65 6c 6c 61 6e 65 6f 75 73 20 4f 70 74 69 6f 6e 73 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ellaneous.Options.**************
7a680 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 20 2d 2d 20 55 73 65 72 20 4f 70 74 69 6f 6e 3a 20 66 6f 72 **********...--.User.Option:.for
7a6a0 67 65 2d 64 61 74 61 62 61 73 65 2d 66 69 6c 65 0a 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 6f ge-database-file......This.optio
7a6c0 6e 20 73 70 65 63 69 66 69 65 73 20 74 68 65 20 66 69 6c 65 20 75 73 65 64 20 74 6f 20 73 74 6f n.specifies.the.file.used.to.sto
7a6e0 72 65 20 74 68 65 20 66 6f 72 67 65 20 64 61 74 61 62 61 73 65 2e 0a 0a 20 2d 2d 20 55 73 65 72 re.the.forge.database....--.User
7a700 20 4f 70 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 77 61 73 68 2d 74 69 74 6c 65 2d .Option:.forge-topic-wash-title-
7a720 68 6f 6f 6b 0a 20 20 20 20 20 46 75 6e 63 74 69 6f 6e 73 20 75 73 65 64 20 74 6f 20 68 69 67 68 hook......Functions.used.to.high
7a740 6c 69 67 68 74 20 70 61 72 74 73 20 6f 66 20 65 61 63 68 20 69 6e 64 69 76 69 64 75 61 6c 20 74 light.parts.of.each.individual.t
7a760 6f 70 69 63 20 74 69 74 6c 65 2e 0a 0a 20 20 20 20 20 54 68 65 73 65 20 66 75 6e 63 74 69 6f 6e opic.title........These.function
7a780 73 20 61 72 65 20 63 61 6c 6c 65 64 20 69 6e 20 6f 72 64 65 72 2c 20 69 6e 20 61 20 62 75 66 66 s.are.called.in.order,.in.a.buff
7a7a0 65 72 20 74 68 61 74 20 63 6f 6e 74 61 69 6e 69 6e 67 0a 20 20 20 20 20 74 68 65 20 74 6f 70 69 er.that.containing......the.topi
7a7c0 63 20 74 69 74 6c 65 2e 20 20 54 68 65 79 20 73 68 6f 75 6c 64 20 73 65 74 20 74 65 78 74 20 70 c.title...They.should.set.text.p
7a7e0 72 6f 70 65 72 74 69 65 73 20 61 73 20 74 68 65 79 20 73 65 65 20 66 69 74 2c 0a 20 20 20 20 20 roperties.as.they.see.fit,......
7a800 75 73 75 61 6c 6c 79 20 6a 75 73 74 20 e2 80 98 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 e2 80 usually.just....font-lock-face..
7a820 99 2e 20 20 42 65 66 6f 72 65 20 65 61 63 68 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 63 61 6c 6c ....Before.each.function.is.call
7a840 65 64 2c 0a 20 20 20 20 20 70 6f 69 6e 74 20 69 73 20 61 74 20 74 68 65 20 62 65 67 69 6e 6e 69 ed,......point.is.at.the.beginni
7a860 6e 67 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 2e 0a 0a 20 2d 2d 20 55 73 65 72 20 4f 70 74 69 ng.of.the.buffer....--.User.Opti
7a880 6f 6e 3a 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 72 65 70 6f 73 69 74 6f 72 79 2d 73 6c 75 67 2d on:.forge-topic-repository-slug-
7a8a0 77 69 64 74 68 0a 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 6f 6e 20 73 70 65 63 69 66 69 65 73 width......This.option.specifies
7a8c0 20 74 68 65 20 77 69 64 74 68 20 6f 66 20 72 65 70 6f 73 69 74 6f 72 79 20 73 6c 75 67 73 20 28 .the.width.of.repository.slugs.(
7a8e0 69 2e 65 2e 2c 0a 20 20 20 20 20 22 4f 57 4e 45 52 2f 4e 41 4d 45 22 29 2e 0a 0a 20 2d 2d 20 55 i.e.,......"OWNER/NAME")....--.U
7a900 73 65 72 20 4f 70 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 64 72 61 66 74 2d 70 ser.Option:.forge-buffer-draft-p
7a920 0a 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 6f 6e 20 63 6f 6e 74 72 6f 6c 73 20 77 68 65 74 68 ......This.option.controls.wheth
7a940 65 72 20 6e 65 77 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 73 74 61 72 74 20 6f 75 74 20 61 er.new.pull-requests.start.out.a
7a960 73 20 64 72 61 66 74 73 0a 20 20 20 20 20 62 79 20 64 65 66 61 75 6c 74 2e 0a 0a 20 20 20 20 20 s.drafts......by.default........
7a980 54 68 65 20 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 76 61 6c 75 65 20 6f 66 20 74 68 69 73 20 76 The.buffer-local.value.of.this.v
7a9a0 61 72 69 61 62 6c 65 20 69 73 20 75 73 65 64 20 74 6f 20 6b 65 65 70 20 74 72 61 63 6b 20 6f 66 ariable.is.used.to.keep.track.of
7a9c0 0a 20 20 20 20 20 74 68 65 20 64 72 61 66 74 20 73 74 61 74 75 73 20 6f 66 20 74 68 65 20 63 75 ......the.draft.status.of.the.cu
7a9e0 72 72 65 6e 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 0a 0a 20 2d 2d 20 55 73 65 72 20 4f 70 rrent.pull-request....--.User.Op
7aa00 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 63 6f 6c 75 tion:.forge-repository-list-colu
7aa20 6d 6e 73 0a 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 6f 6e 20 73 70 65 63 69 66 69 65 73 20 74 mns......This.option.specifies.t
7aa40 68 65 20 6c 69 73 74 20 6f 66 20 63 6f 6c 75 6d 6e 73 20 64 69 73 70 6c 61 79 65 64 20 77 68 65 he.list.of.columns.displayed.whe
7aa60 6e 20 6c 69 73 74 69 6e 67 0a 20 20 20 20 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 0a 0a 20 20 n.listing......repositories.....
7aa80 20 20 20 45 61 63 68 20 65 6c 65 6d 65 6e 74 20 68 61 73 20 74 68 65 20 66 6f 72 6d 20 e2 80 98 ...Each.element.has.the.form....
7aaa0 28 48 45 41 44 45 52 20 53 4f 55 52 43 45 20 57 49 44 54 48 20 53 4f 52 54 20 50 52 4f 50 53 29 (HEADER.SOURCE.WIDTH.SORT.PROPS)
7aac0 e2 80 99 2e 0a 0a 20 20 20 20 20 48 45 41 44 45 52 20 69 73 20 74 68 65 20 73 74 72 69 6e 67 20 ...........HEADER.is.the.string.
7aae0 64 69 73 70 6c 61 79 65 64 20 69 6e 20 74 68 65 20 68 65 61 64 65 72 2e 20 20 57 49 44 54 48 20 displayed.in.the.header...WIDTH.
7ab00 69 73 20 74 68 65 20 77 69 64 74 68 0a 20 20 20 20 20 6f 66 20 74 68 65 20 63 6f 6c 75 6d 6e 2e is.the.width......of.the.column.
7ab20 20 20 53 4f 55 52 43 45 20 69 73 20 75 73 65 64 20 74 6f 20 67 65 74 20 74 68 65 20 76 61 6c 75 ..SOURCE.is.used.to.get.the.valu
7ab40 65 2c 20 69 74 20 68 61 73 20 74 6f 20 62 65 20 74 68 65 0a 20 20 20 20 20 6e 61 6d 65 20 6f 66 e,.it.has.to.be.the......name.of
7ab60 20 61 20 73 6c 6f 74 20 6f 66 20 e2 80 98 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 e2 80 .a.slot.of....forge-repository..
7ab80 99 20 6f 72 20 61 20 66 75 6e 63 74 69 6f 6e 20 74 68 61 74 20 74 61 6b 65 73 20 73 75 63 68 0a ..or.a.function.that.takes.such.
7aba0 20 20 20 20 20 61 6e 20 6f 62 6a 65 63 74 20 61 73 20 61 72 67 75 6d 65 6e 74 2e 20 20 53 4f 52 .....an.object.as.argument...SOR
7abc0 54 20 69 73 20 61 20 62 6f 6f 6c 65 61 6e 20 6f 72 20 61 20 66 75 6e 63 74 69 6f 6e 20 75 73 65 T.is.a.boolean.or.a.function.use
7abe0 64 20 74 6f 0a 20 20 20 20 20 73 6f 72 74 20 62 79 20 74 68 69 73 20 63 6f 6c 75 6d 6e 2e 20 20 d.to......sort.by.this.column...
7ac00 53 75 70 70 6f 72 74 65 64 20 50 52 4f 50 53 20 69 6e 63 6c 75 64 65 20 e2 80 98 3a 72 69 67 68 Supported.PROPS.include....:righ
7ac20 74 2d 61 6c 69 67 6e e2 80 99 20 61 6e 64 0a 20 20 20 20 20 e2 80 98 3a 70 61 64 2d 72 69 67 68 t-align....and.........:pad-righ
7ac40 74 e2 80 99 2e 0a 0a 20 2d 2d 20 55 73 65 72 20 4f 70 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 6c 69 t.......--.User.Option:.forge-li
7ac60 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 63 65 73 0a 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 mit-topic-choices......This.opti
7ac80 6f 6e 20 63 6f 6e 74 72 6f 6c 73 20 77 68 65 74 68 65 72 20 74 6f 20 69 6e 69 74 69 61 6c 6c 79 on.controls.whether.to.initially
7aca0 20 6c 69 6d 69 74 20 63 6f 6d 70 6c 65 74 69 6f 6e 0a 20 20 20 20 20 63 61 6e 64 69 64 61 74 65 .limit.completion......candidate
7acc0 73 20 74 6f 20 61 63 74 69 76 65 20 74 6f 70 69 63 73 2e 0a 0a 20 2d 2d 20 55 73 65 72 20 4f 70 s.to.active.topics....--.User.Op
7ace0 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 70 6f 73 74 2d 68 65 61 64 69 6e 67 2d 66 6f 72 6d 61 74 0a tion:.forge-post-heading-format.
7ad00 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 6f 6e 20 73 70 65 63 69 66 69 65 73 20 74 68 65 20 66 .....This.option.specifies.the.f
7ad20 6f 72 6d 61 74 20 66 6f 72 20 70 6f 73 74 20 68 65 61 64 69 6e 67 73 20 69 6e 20 74 6f 70 69 63 ormat.for.post.headings.in.topic
7ad40 20 76 69 65 77 2e 0a 0a 20 20 20 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 e2 80 98 25 e2 .view........The.following....%.
7ad60 80 99 2d 73 65 71 75 65 6e 63 65 73 20 61 72 65 20 73 75 70 70 6f 72 74 65 64 3a 0a 0a 20 20 20 ..-sequences.are.supported:.....
7ad80 20 20 20 20 20 e2 80 a2 20 e2 80 98 25 61 e2 80 99 20 54 68 65 20 66 6f 72 67 65 20 6e 69 63 6b ............%a....The.forge.nick
7ada0 6e 61 6d 65 20 6f 66 20 74 68 65 20 61 75 74 68 6f 72 2e 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 name.of.the.author..............
7adc0 e2 80 98 25 63 e2 80 99 20 54 68 65 20 61 62 73 6f 6c 75 74 65 20 63 72 65 61 74 69 6f 6e 20 64 ...%c....The.absolute.creation.d
7ade0 61 74 65 2e 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 e2 80 98 25 43 e2 80 99 20 54 68 65 20 72 65 ate.................%C....The.re
7ae00 6c 61 74 69 76 65 20 63 72 65 61 74 69 6f 6e 20 64 61 74 65 2e 0a 0a 20 2d 2d 20 55 73 65 72 20 lative.creation.date....--.User.
7ae20 4f 70 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 70 6f 73 74 2d 66 69 6c 6c 2d 72 65 67 69 6f 6e 0a 20 Option:.forge-post-fill-region..
7ae40 20 20 20 20 54 68 69 73 20 6f 70 74 69 6f 6e 20 63 6f 6e 74 72 6f 6c 73 20 77 68 65 74 68 65 72 ....This.option.controls.whether
7ae60 20 74 6f 20 63 61 6c 6c 20 e2 80 98 66 69 6c 6c 2d 72 65 67 69 6f 6e e2 80 99 20 62 65 66 6f 72 .to.call....fill-region....befor
7ae80 65 0a 20 20 20 20 20 64 69 73 70 6c 61 79 69 6e 67 20 66 6f 72 67 65 20 70 6f 73 74 73 2e 0a 0a e......displaying.forge.posts...
7aea0 20 2d 2d 20 55 73 65 72 20 4f 70 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 62 75 67 2d 72 65 66 65 72 .--.User.Option:.forge-bug-refer
7aec0 65 6e 63 65 2d 68 6f 6f 6b 73 0a 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 6f 6e 20 6c 69 73 74 ence-hooks......This.option.list
7aee0 73 20 74 68 65 20 68 6f 6f 6b 73 20 74 6f 20 77 68 69 63 68 20 e2 80 98 66 6f 72 67 65 2d 62 75 s.the.hooks.to.which....forge-bu
7af00 67 2d 72 65 66 65 72 65 6e 63 65 2d 73 65 74 75 70 e2 80 99 20 69 73 0a 20 20 20 20 20 61 64 64 g-reference-setup....is......add
7af20 65 64 2e 20 20 49 74 20 68 61 73 20 74 6f 20 62 65 20 63 75 73 74 6f 6d 69 7a 65 64 20 62 65 66 ed...It.has.to.be.customized.bef
7af40 6f 72 65 20 e2 80 98 66 6f 72 67 65 e2 80 99 20 69 73 20 6c 6f 61 64 65 64 2c 20 6f 72 20 69 74 ore....forge....is.loaded,.or.it
7af60 0a 20 20 20 20 20 77 6f 6e e2 80 99 74 20 74 61 6b 65 20 65 66 66 65 63 74 2e 0a 0a 1f 0a 46 69 ......won...t.take.effect.....Fi
7af80 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 48 6f 77 20 46 6f 72 67 65 le:.forge.info,..Node:.How.Forge
7afa0 20 44 65 74 65 63 74 69 6f 6e 20 57 6f 72 6b 73 2c 20 20 4e 65 78 74 3a 20 53 75 70 70 6f 72 74 .Detection.Works,..Next:.Support
7afc0 65 64 20 46 6f 72 67 65 73 20 61 6e 64 20 48 6f 73 74 73 2c 20 20 50 72 65 76 3a 20 4d 69 73 63 ed.Forges.and.Hosts,..Prev:.Misc
7afe0 65 6c 6c 61 6e 65 6f 75 73 20 4f 70 74 69 6f 6e 73 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 41 70 70 ellaneous.Options,..Up:.Top..App
7b000 65 6e 64 69 78 20 41 20 48 6f 77 20 46 6f 72 67 65 20 44 65 74 65 63 74 69 6f 6e 20 57 6f 72 6b endix.A.How.Forge.Detection.Work
7b020 73 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a s.******************************
7b040 2a 2a 2a 2a 2a 2a 0a 0a 46 6f 72 67 65 20 75 73 65 73 20 74 68 65 20 47 68 75 62 20 70 61 63 6b ******..Forge.uses.the.Ghub.pack
7b060 61 67 65 20 74 6f 20 63 6f 6d 6d 75 6e 69 63 61 74 65 20 77 69 74 68 20 66 6f 72 67 65 20 41 50 age.to.communicate.with.forge.AP
7b080 49 73 2e 20 20 46 6f 72 20 6d 6f 72 65 0a 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 Is...For.more.information.about.
7b0a0 47 68 75 62 2c 20 73 65 65 20 2a 6e 6f 74 65 20 28 67 68 75 62 29 54 6f 70 3a 3a 2e 0a 0a 20 20 Ghub,.see.*note.(ghub)Top::.....
7b0c0 20 47 68 75 62 20 64 6f 65 73 20 2a 6e 6f 74 2a 20 61 73 73 6f 63 69 61 74 65 20 61 20 67 69 76 .Ghub.does.*not*.associate.a.giv
7b0e0 65 6e 20 6c 6f 63 61 6c 20 72 65 70 6f 73 69 74 6f 72 79 20 77 69 74 68 20 61 20 72 65 70 6f 73 en.local.repository.with.a.repos
7b100 69 74 6f 72 79 0a 6f 6e 20 61 20 66 6f 72 67 65 2e 20 20 54 68 65 20 46 6f 72 67 65 20 70 61 63 itory.on.a.forge...The.Forge.pac
7b120 6b 61 67 65 20 69 74 73 65 6c 66 20 74 61 6b 65 73 20 63 61 72 65 20 6f 66 20 74 68 69 73 2e 20 kage.itself.takes.care.of.this..
7b140 20 49 6e 20 64 6f 69 6e 67 20 73 6f 0a 69 74 20 69 67 6e 6f 72 65 73 20 74 68 65 20 47 69 74 20 .In.doing.so.it.ignores.the.Git.
7b160 76 61 72 69 61 62 6c 65 20 e2 80 98 67 68 75 62 2e 68 6f 73 74 e2 80 99 20 61 6e 64 20 6f 74 68 variable....ghub.host....and.oth
7b180 65 72 20 e2 80 98 2a 2e 68 6f 73 74 e2 80 99 20 76 61 72 69 61 62 6c 65 73 0a 75 73 65 64 20 62 er....*.host....variables.used.b
7b1a0 79 20 47 68 75 62 2e 20 20 28 42 75 74 20 e2 80 98 67 69 74 68 75 62 2e 75 73 65 72 e2 80 99 2c y.Ghub...(But....github.user...,
7b1c0 20 61 6e 64 20 6f 74 68 65 72 20 76 61 72 69 61 62 6c 65 73 20 75 73 65 64 20 74 6f 20 73 70 65 .and.other.variables.used.to.spe
7b1e0 63 69 66 79 0a 74 68 65 20 75 73 65 72 2c 20 61 72 65 20 68 6f 6e 6f 72 65 64 29 2e 0a 0a 20 20 cify.the.user,.are.honored).....
7b200 20 46 6f 72 67 65 20 61 73 73 6f 63 69 61 74 65 73 20 74 68 65 20 6c 6f 63 61 6c 20 72 65 70 6f .Forge.associates.the.local.repo
7b220 73 69 74 6f 72 79 20 77 69 74 68 20 61 20 66 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 sitory.with.a.forge.repository,.
7b240 62 79 0a 66 69 72 73 74 20 64 65 74 65 72 6d 69 6e 69 6e 67 20 77 68 69 63 68 20 72 65 6d 6f 74 by.first.determining.which.remot
7b260 65 20 69 73 20 61 73 73 6f 63 69 61 74 65 64 20 77 69 74 68 20 74 68 65 20 75 70 73 74 72 65 61 e.is.associated.with.the.upstrea
7b280 6d 0a 72 65 70 6f 73 69 74 6f 72 79 2c 20 61 6e 64 20 74 68 65 6e 20 6c 6f 6f 6b 69 6e 67 20 74 m.repository,.and.then.looking.t
7b2a0 68 61 74 20 75 70 20 69 6e 20 e2 80 98 66 6f 72 67 65 2d 61 6c 69 73 74 e2 80 99 2e 0a 0a 20 20 hat.up.in....forge-alist........
7b2c0 20 49 66 20 6f 6e 6c 79 20 6f 6e 65 20 72 65 6d 6f 74 65 20 65 78 69 73 74 73 2c 20 74 68 65 6e .If.only.one.remote.exists,.then
7b2e0 20 46 6f 72 67 65 20 75 73 65 73 20 74 68 61 74 20 75 6e 63 6f 6e 64 69 74 69 6f 6e 61 6c 6c 79 .Forge.uses.that.unconditionally
7b300 2e 20 20 54 6f 0a 72 65 64 75 63 65 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 73 75 70 70 6f ...To.reduce.the.number.of.suppo
7b320 72 74 20 72 65 71 75 65 73 74 73 2c 20 74 68 69 73 20 69 73 20 65 76 65 6e 20 74 68 65 20 63 61 rt.requests,.this.is.even.the.ca
7b340 73 65 20 69 66 20 74 68 65 20 47 69 74 0a 76 61 72 69 61 62 6c 65 20 e2 80 98 66 6f 72 67 65 2e se.if.the.Git.variable....forge.
7b360 72 65 6d 6f 74 65 e2 80 99 20 6e 61 6d 65 73 20 61 6e 6f 74 68 65 72 2c 20 6e 6f 6e 2d 65 78 69 remote....names.another,.non-exi
7b380 73 74 65 6e 74 2c 20 72 65 6d 6f 74 65 2e 0a 0a 20 20 20 49 66 20 73 65 76 65 72 61 6c 20 72 65 stent,.remote......If.several.re
7b3a0 6d 6f 74 65 73 20 65 78 69 73 74 2c 20 74 68 65 6e 20 61 20 72 65 6d 6f 74 65 20 6d 61 79 20 62 motes.exist,.then.a.remote.may.b
7b3c0 65 20 73 65 6c 65 63 74 65 64 20 62 61 73 65 64 20 6f 6e 20 69 74 73 0a 6e 61 6d 65 2e 20 20 41 e.selected.based.on.its.name...A
7b3e0 6c 6d 6f 73 74 20 61 6c 77 61 79 73 20 77 65 20 77 61 6e 74 20 74 6f 20 66 65 74 63 68 20 74 68 lmost.always.we.want.to.fetch.th
7b400 65 20 64 61 74 61 20 61 73 73 6f 63 69 61 74 65 64 20 77 69 74 68 20 74 68 65 0a 75 70 73 74 72 e.data.associated.with.the.upstr
7b420 65 61 6d 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 73 6f 20 74 68 61 74 20 69 73 20 77 68 61 74 20 eam.repository,.so.that.is.what.
7b440 74 68 65 20 6c 6f 67 69 63 20 64 65 73 63 72 69 62 65 64 20 68 65 72 65 20 74 72 69 65 73 20 74 the.logic.described.here.tries.t
7b460 6f 0a 61 63 68 69 65 76 65 2e 20 20 54 68 65 20 63 6f 6e 76 65 6e 74 69 6f 6e 20 69 73 20 74 6f o.achieve...The.convention.is.to
7b480 20 6e 61 6d 65 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 6d 6f 74 65 20 22 6f 72 69 67 69 .name.the.upstream.remote."origi
7b4a0 6e 22 2c 20 61 6e 64 20 69 66 0a 74 68 61 74 20 63 6f 6e 76 65 6e 74 69 6f 6e 20 77 65 72 65 20 n",.and.if.that.convention.were.
7b4c0 75 6e 69 76 65 72 73 61 6c 6c 79 20 66 6f 6c 6c 6f 77 65 64 2c 20 74 68 65 6e 20 74 68 69 6e 67 universally.followed,.then.thing
7b4e0 73 20 77 6f 75 6c 64 20 62 65 20 74 72 69 76 69 61 6c 2e 0a 48 6f 77 65 76 65 72 20 6d 61 6e 79 s.would.be.trivial..However.many
7b500 20 70 65 6f 70 6c 65 20 6e 61 6d 65 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 6d 6f 74 65 .people.name.the.upstream.remote
7b520 20 22 75 70 73 74 72 65 61 6d 22 2c 20 77 68 69 63 68 20 61 6c 73 6f 0a 6d 61 6b 65 73 20 73 65 ."upstream",.which.also.makes.se
7b540 6e 73 65 2e 0a 0a 20 20 20 20 20 4e 6f 74 65 2c 20 68 6f 77 65 76 65 72 2c 20 74 68 61 74 20 65 nse........Note,.however,.that.e
7b560 76 65 6e 20 74 68 6f 75 67 68 20 61 20 73 75 72 70 72 69 73 69 6e 67 20 6e 75 6d 62 65 72 20 6f ven.though.a.surprising.number.o
7b580 66 20 70 65 6f 70 6c 65 20 64 6f 0a 20 20 20 20 20 6a 75 73 74 20 74 68 61 74 2c 20 69 74 20 64 f.people.do......just.that,.it.d
7b5a0 6f 65 73 20 6e 6f 74 20 6d 61 6b 65 20 61 6e 79 20 73 65 6e 73 65 20 74 6f 20 75 73 65 20 74 68 oes.not.make.any.sense.to.use.th
7b5c0 65 20 6e 61 6d 65 20 22 6f 72 69 67 69 6e 22 20 74 6f 0a 20 20 20 20 20 72 65 66 65 72 20 74 6f e.name."origin".to......refer.to
7b5e0 20 61 20 66 6f 72 6b 3b 20 6e 6f 74 20 65 76 65 6e 20 74 6f 20 79 6f 75 72 20 6f 77 6e 20 66 6f .a.fork;.not.even.to.your.own.fo
7b600 72 6b 2e 20 20 41 20 66 6f 72 6b 20 69 73 20 61 20 2a 63 6f 70 79 2a 20 6f 66 0a 20 20 20 20 20 rk...A.fork.is.a.*copy*.of......
7b620 74 68 65 20 6f 72 69 67 69 6e 61 6c 2c 20 22 63 6f 70 79 22 20 69 73 20 61 6e 20 61 6e 74 6f 6e the.original,."copy".is.an.anton
7b640 79 6d 20 66 6f 72 20 22 6f 72 69 67 69 6e 61 6c 22 2c 20 61 6e 64 20 74 68 65 20 77 6f 72 64 0a ym.for."original",.and.the.word.
7b660 20 20 20 20 20 22 6f 72 69 67 69 6e 22 20 69 73 20 6e 6f 74 20 6f 6e 6c 79 20 63 6c 6f 73 65 6c ....."origin".is.not.only.closel
7b680 79 20 72 65 6c 61 74 65 64 20 74 6f 20 62 75 74 20 69 73 20 65 76 65 6e 20 63 6f 6e 74 61 69 6e y.related.to.but.is.even.contain
7b6a0 65 64 20 69 6e 0a 20 20 20 20 20 74 68 65 20 77 6f 72 64 20 22 6f 72 69 67 69 6e 61 6c 22 2e 20 ed.in......the.word."original"..
7b6c0 20 4e 61 6d 69 6e 67 20 61 20 66 6f 72 6b 20 74 68 65 20 22 6f 72 69 67 69 6e 22 20 69 73 20 61 .Naming.a.fork.the."origin".is.a
7b6e0 74 20 62 65 73 74 0a 20 20 20 20 20 65 78 74 72 65 6d 65 6c 79 20 63 6f 6e 66 75 73 69 6e 67 2e t.best......extremely.confusing.
7b700 0a 0a 20 20 20 20 20 63 6f 70 79 0a 20 20 20 20 20 20 20 20 20 20 61 20 74 68 69 6e 67 20 6d 61 .......copy...........a.thing.ma
7b720 64 65 20 74 6f 20 62 65 20 73 69 6d 69 6c 61 72 20 6f 72 20 69 64 65 6e 74 69 63 61 6c 20 74 6f de.to.be.similar.or.identical.to
7b740 20 61 6e 6f 74 68 65 72 2e 0a 0a 20 20 20 20 20 6f 72 69 67 69 6e 61 6c 0a 20 20 20 20 20 20 20 .another........original........
7b760 20 20 20 74 68 65 20 65 61 72 6c 69 65 73 74 20 66 6f 72 6d 20 6f 66 20 73 6f 6d 65 74 68 69 6e ...the.earliest.form.of.somethin
7b780 67 2c 20 66 72 6f 6d 20 77 68 69 63 68 20 63 6f 70 69 65 73 20 6d 61 79 20 62 65 20 6d 61 64 65 g,.from.which.copies.may.be.made
7b7a0 2e 0a 0a 20 20 20 20 20 6f 72 69 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 74 68 65 20 70 6f 69 ........origin...........the.poi
7b7c0 6e 74 20 6f 72 20 70 6c 61 63 65 20 77 68 65 72 65 20 73 6f 6d 65 74 68 69 6e 67 20 62 65 67 69 nt.or.place.where.something.begi
7b7e0 6e 73 2c 20 61 72 69 73 65 73 2c 20 6f 72 20 69 73 0a 20 20 20 20 20 20 20 20 20 20 64 65 72 69 ns,.arises,.or.is...........deri
7b800 76 65 64 2e 0a 0a 20 20 20 49 66 20 73 65 76 65 72 61 6c 20 72 65 6d 6f 74 65 73 20 65 78 69 73 ved......If.several.remotes.exis
7b820 74 2c 20 74 68 65 6e 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 72 65 6d 6f 74 65 20 6e 61 6d t,.then.the.following.remote.nam
7b840 65 73 20 61 72 65 20 74 72 69 65 64 0a 69 6e 20 6f 72 64 65 72 20 61 6e 64 20 74 68 65 20 66 69 es.are.tried.in.order.and.the.fi
7b860 72 73 74 20 72 65 6d 6f 74 65 20 74 68 75 73 20 6e 61 6d 65 64 20 74 68 61 74 20 65 78 69 73 74 rst.remote.thus.named.that.exist
7b880 73 20 69 6e 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 0a 69 73 20 75 73 65 64 2e 0a 0a 20 20 s.in.the.repository.is.used.....
7b8a0 31 2e 20 54 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20 47 69 74 20 76 61 72 69 61 62 6c 65 1..The.value.of.the.Git.variable
7b8c0 20 e2 80 98 66 6f 72 67 65 2e 72 65 6d 6f 74 65 e2 80 99 2c 20 69 66 20 73 65 74 2e 20 20 49 66 ....forge.remote...,.if.set...If
7b8e0 20 74 68 65 0a 20 20 20 20 20 76 61 72 69 61 62 6c 65 20 68 61 73 20 61 20 76 61 6c 75 65 20 62 .the......variable.has.a.value.b
7b900 75 74 20 6e 6f 20 72 65 6d 6f 74 65 20 62 79 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 6e 61 ut.no.remote.by.the.specified.na
7b920 6d 65 20 65 78 69 73 74 73 2c 0a 20 20 20 20 20 74 68 65 6e 20 61 20 77 61 72 6e 69 6e 67 20 69 me.exists,......then.a.warning.i
7b940 73 20 73 68 6f 77 6e 2c 20 62 75 74 20 6f 74 68 65 72 77 69 73 65 20 74 68 69 73 20 63 6f 6e 66 s.shown,.but.otherwise.this.conf
7b960 6c 69 63 74 20 69 73 20 69 67 6e 6f 72 65 64 2e 0a 20 20 20 20 20 54 68 69 73 20 62 65 68 61 76 lict.is.ignored.......This.behav
7b980 69 6f 72 20 69 73 20 61 72 67 75 61 62 6c 79 20 6f 64 64 2c 20 62 75 74 20 64 75 65 20 74 6f 20 ior.is.arguably.odd,.but.due.to.
7b9a0 68 69 73 74 6f 72 69 63 20 61 6e 64 20 70 72 61 67 6d 61 74 69 63 0a 20 20 20 20 20 72 65 61 73 historic.and.pragmatic......reas
7b9c0 6f 6e 73 20 69 74 20 69 73 20 74 68 65 20 6c 65 61 73 74 20 70 61 69 6e 66 75 6c 20 70 61 74 68 ons.it.is.the.least.painful.path
7b9e0 20 66 6f 72 77 61 72 64 2e 0a 0a 20 20 32 2e 20 54 68 65 20 72 65 6d 6f 74 65 20 6e 61 6d 65 64 .forward.....2..The.remote.named
7ba00 20 e2 80 98 75 70 73 74 72 65 61 6d e2 80 99 2c 20 69 66 20 69 74 20 65 78 69 73 74 73 2e 0a 0a ....upstream...,.if.it.exists...
7ba20 20 20 33 2e 20 54 68 65 20 72 65 6d 6f 74 65 20 6e 61 6d 65 64 20 e2 80 98 6f 72 69 67 69 6e e2 ..3..The.remote.named....origin.
7ba40 80 99 2c 20 69 66 20 69 74 20 65 78 69 73 74 73 2e 0a 0a 20 20 20 54 68 65 20 72 65 6d 6f 74 65 ..,.if.it.exists......The.remote
7ba60 20 6e 61 6d 65 64 20 22 75 70 73 74 72 65 61 6d 22 20 69 73 20 70 72 65 66 65 72 72 65 64 20 6f .named."upstream".is.preferred.o
7ba80 76 65 72 20 74 68 65 20 72 65 6d 6f 74 65 20 6e 61 6d 65 64 0a 22 6f 72 69 67 69 6e 22 20 62 65 ver.the.remote.named."origin".be
7baa0 63 61 75 73 65 20 74 68 65 20 65 78 69 73 74 65 6e 63 65 20 6f 66 20 74 68 65 20 66 6f 72 6d 65 cause.the.existence.of.the.forme
7bac0 72 20 73 74 72 6f 6e 67 6c 79 20 73 75 67 67 65 73 74 73 20 74 68 61 74 20 74 68 65 0a 6c 61 74 r.strongly.suggests.that.the.lat
7bae0 74 65 72 20 69 73 20 65 69 74 68 65 72 20 6e 6f 74 20 75 73 65 64 20 69 6e 20 74 68 69 73 20 72 ter.is.either.not.used.in.this.r
7bb00 65 70 6f 73 69 74 6f 72 79 20 28 69 6e 20 77 68 69 63 68 20 63 61 73 65 20 74 68 65 20 6f 72 64 epository.(in.which.case.the.ord
7bb20 65 72 0a 64 6f 65 73 20 6e 6f 74 20 6d 61 74 74 65 72 29 20 6f 72 20 65 6c 73 65 20 69 74 20 69 er.does.not.matter).or.else.it.i
7bb40 73 20 61 62 75 73 65 64 20 61 73 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 20 66 6f 72 6b 20 28 s.abused.as.the.name.of.a.fork.(
7bb60 69 6e 20 77 68 69 63 68 0a 63 61 73 65 20 22 75 70 73 74 72 65 61 6d 22 20 6d 75 73 74 20 62 65 in.which.case."upstream".must.be
7bb80 20 70 72 65 66 65 72 72 65 64 29 2e 0a 0a 20 2d 2d 20 56 61 72 69 61 62 6c 65 3a 20 66 6f 72 67 .preferred)....--.Variable:.forg
7bba0 65 2e 72 65 6d 6f 74 65 0a 20 20 20 20 20 54 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 69 73 20 e.remote......The.value.of.this.
7bbc0 76 61 72 69 61 62 6c 65 20 73 70 65 63 69 66 69 65 73 20 74 68 65 20 72 65 6d 6f 74 65 20 66 72 variable.specifies.the.remote.fr
7bbe0 6f 6d 20 77 68 69 63 68 20 46 6f 72 67 65 0a 20 20 20 20 20 66 65 74 63 68 65 73 20 64 61 74 61 om.which.Forge......fetches.data
7bc00 2e 20 20 49 74 20 69 73 20 75 73 75 61 6c 6c 79 20 62 65 73 74 20 74 6f 20 6c 65 61 76 65 20 74 ...It.is.usually.best.to.leave.t
7bc20 68 69 73 20 75 6e 73 70 65 63 69 66 69 65 64 20 61 6e 64 20 74 6f 0a 20 20 20 20 20 72 65 6c 79 his.unspecified.and.to......rely
7bc40 20 6f 6e 20 74 68 65 20 62 65 68 61 76 69 6f 72 20 64 65 73 63 72 69 62 65 64 20 61 62 6f 76 65 .on.the.behavior.described.above
7bc60 2e 0a 0a 20 20 20 20 20 49 66 20 74 68 65 20 72 65 6d 6f 74 65 20 68 61 73 20 74 6f 20 62 65 20 ........If.the.remote.has.to.be.
7bc80 73 70 65 63 69 66 69 65 64 20 65 78 70 6c 69 63 69 74 6c 79 2c 20 74 68 65 6e 20 74 68 69 73 20 specified.explicitly,.then.this.
7bca0 73 68 6f 75 6c 64 20 62 65 0a 20 20 20 20 20 64 6f 6e 65 20 6c 6f 63 61 6c 6c 79 2c 20 66 6f 72 should.be......done.locally,.for
7bcc0 20 61 20 73 69 6e 67 6c 65 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a 20 20 20 20 20 4f 6e 6c 79 .a.single.repository........Only
7bce0 20 65 76 65 72 20 73 65 74 20 74 68 69 73 20 67 6c 6f 62 61 6c 6c 79 2c 20 69 66 20 79 6f 75 20 .ever.set.this.globally,.if.you.
7bd00 63 6f 6e 73 69 73 74 65 6e 74 6c 79 20 75 73 65 20 61 20 63 65 72 74 61 69 6e 20 6e 61 6d 65 0a consistently.use.a.certain.name.
7bd20 20 20 20 20 20 74 6f 20 72 65 66 65 72 20 74 6f 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 .....to.refer.to.the.upstream.re
7bd40 70 6f 73 69 74 6f 72 79 20 61 6e 64 20 69 74 20 69 73 6e e2 80 99 74 20 6f 6e 65 20 6f 66 20 22 pository.and.it.isn...t.one.of."
7bd60 75 70 73 74 72 65 61 6d 22 0a 20 20 20 20 20 6f 72 20 22 6f 72 69 67 69 6e 22 2c 20 61 6e 64 20 upstream"......or."origin",.and.
7bd80 79 6f 75 20 2a 6e 65 76 65 72 2a 20 75 73 65 20 74 68 61 74 20 6e 61 6d 65 20 74 6f 20 72 65 66 you.*never*.use.that.name.to.ref
7bda0 65 72 20 74 6f 20 61 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 74 68 61 74 20 64 6f 65 er.to.a.repository......that.doe
7bdc0 73 20 2a 6e 6f 74 2a 20 72 65 66 65 72 20 74 6f 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 s.*not*.refer.to.the.upstream.re
7bde0 70 6f 73 69 74 6f 72 79 2e 0a 0a e2 80 98 4e 20 72 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 66 pository......N.r....(...forge-f
7be00 6f 72 67 65 2e 72 65 6d 6f 74 65 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e orge.remote...)......This.comman
7be20 64 20 63 68 61 6e 67 65 73 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20 e2 80 98 66 6f d.changes.the.value.of.the....fo
7be40 72 67 65 2e 72 65 6d 6f 74 65 e2 80 99 20 47 69 74 20 76 61 72 69 61 62 6c 65 0a 20 20 20 20 20 rge.remote....Git.variable......
7be60 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a 20 20 20 49 in.the.current.repository......I
7be80 66 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 69 73 20 73 65 74 2c 20 74 68 65 6e 20 46 6f 72 f.this.variable.is.set,.then.For
7bea0 67 65 20 75 73 65 73 20 74 68 65 20 72 65 6d 6f 74 65 20 62 79 20 74 68 61 74 20 6e 61 6d 65 2c ge.uses.the.remote.by.that.name,
7bec0 20 69 66 0a 69 74 20 65 78 69 73 74 73 2c 20 74 68 65 20 73 61 6d 65 20 77 61 79 20 69 74 20 6d .if.it.exists,.the.same.way.it.m
7bee0 61 79 20 68 61 76 65 20 75 73 65 64 20 e2 80 98 6f 72 69 67 69 6e e2 80 99 20 69 66 20 74 68 65 ay.have.used....origin....if.the
7bf00 20 76 61 72 69 61 62 6c 65 20 77 65 72 65 0a 75 6e 64 65 66 69 6e 65 64 2e 20 20 49 2e 65 2e 2c .variable.were.undefined...I.e.,
7bf20 20 69 74 20 64 6f 65 73 20 6e 6f 74 20 66 61 6c 6c 20 74 68 72 6f 75 67 68 20 74 6f 20 74 72 79 .it.does.not.fall.through.to.try
7bf40 20 e2 80 98 6f 72 69 67 69 6e e2 80 99 20 69 66 20 6e 6f 20 72 65 6d 6f 74 65 0a 62 79 20 79 6f ....origin....if.no.remote.by.yo
7bf60 75 72 20 63 68 6f 73 65 6e 20 6e 61 6d 65 20 65 78 69 73 74 73 2e 0a 0a 20 20 20 4f 6e 63 65 20 ur.chosen.name.exists......Once.
7bf80 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 6d 6f 74 65 20 68 61 73 20 62 65 65 6e 20 64 65 74 the.upstream.remote.has.been.det
7bfa0 65 72 6d 69 6e 65 64 2c 20 46 6f 72 67 65 20 6c 6f 6f 6b 73 20 69 74 20 75 70 20 69 6e 0a e2 80 ermined,.Forge.looks.it.up.in...
7bfc0 98 66 6f 72 67 65 2d 61 6c 69 73 74 e2 80 99 2c 20 75 73 69 6e 67 20 74 68 65 20 68 6f 73 74 20 .forge-alist...,.using.the.host.
7bfe0 70 61 72 74 20 6f 66 20 74 68 65 20 55 52 4c 20 61 73 20 74 68 65 20 6b 65 79 2e 20 20 46 6f 72 part.of.the.URL.as.the.key...For
7c000 20 65 78 61 6d 70 6c 65 2c 0a 74 68 65 20 6b 65 79 20 66 6f 72 20 e2 80 98 67 69 74 40 67 69 74 .example,.the.key.for....git@git
7c020 68 75 62 2e 63 6f 6d 3a 6d 61 67 69 74 2f 66 6f 72 67 65 2e 67 69 74 e2 80 99 20 69 73 20 e2 80 hub.com:magit/forge.git....is...
7c040 98 67 69 74 68 75 62 2e 63 6f 6d e2 80 99 2e 0a 0a 20 2d 2d 20 55 73 65 72 20 4f 70 74 69 6f 6e .github.com.......--.User.Option
7c060 3a 20 66 6f 72 67 65 2d 61 6c 69 73 74 0a 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 6f 6e 20 64 :.forge-alist......This.option.d
7c080 65 66 69 6e 65 73 20 66 6f 72 67 65 20 68 6f 73 74 73 20 6b 6e 6f 77 6e 20 74 6f 20 46 6f 72 67 efines.forge.hosts.known.to.Forg
7c0a0 65 2e 0a 0a 20 20 20 20 20 45 61 63 68 20 65 6e 74 72 79 20 68 61 73 20 74 68 65 20 66 6f 72 6d e........Each.entry.has.the.form
7c0c0 20 e2 80 98 28 47 49 54 48 4f 53 54 20 41 50 49 48 4f 53 54 20 57 45 42 48 4f 53 54 20 43 4c 41 ....(GITHOST.APIHOST.WEBHOST.CLA
7c0e0 53 53 29 e2 80 99 2e 0a 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 47 49 54 48 4f 53 54 20 69 73 20 SS)..................GITHOST.is.
7c100 74 68 65 20 68 6f 73 74 20 75 73 65 64 20 74 6f 20 61 63 63 65 73 73 20 72 65 70 6f 73 69 74 6f the.host.used.to.access.reposito
7c120 72 69 65 73 20 6f 6e 20 74 68 65 20 66 6f 72 67 65 0a 20 20 20 20 20 20 20 20 20 20 75 73 69 6e ries.on.the.forge...........usin
7c140 67 20 47 69 74 2e 0a 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 41 50 49 48 4f 53 54 20 69 73 20 74 g.Git...............APIHOST.is.t
7c160 68 65 20 68 6f 73 74 20 75 73 65 64 20 74 6f 20 61 63 63 65 73 73 20 74 68 65 20 66 6f 72 67 65 he.host.used.to.access.the.forge
7c180 e2 80 99 73 20 41 50 49 2e 20 20 46 6f 72 20 73 6f 6d 65 0a 20 20 20 20 20 20 20 20 20 20 66 6f ...s.API...For.some...........fo
7c1a0 72 67 65 73 20 74 68 65 20 69 73 6e e2 80 99 74 20 6a 75 73 74 20 61 20 68 6f 73 74 2c 20 62 75 rges.the.isn...t.just.a.host,.bu
7c1c0 74 20 61 20 68 6f 73 74 20 66 6f 6c 6c 6f 77 65 64 20 62 79 20 74 68 65 20 70 61 74 68 0a 20 20 t.a.host.followed.by.the.path...
7c1e0 20 20 20 20 20 20 20 20 74 6f 20 74 68 65 20 41 50 49 e2 80 99 73 20 65 6e 64 70 6f 69 6e 74 2e ........to.the.API...s.endpoint.
7c200 0a 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 57 45 42 48 4f 53 54 20 69 73 20 74 68 65 20 68 6f 73 ..............WEBHOST.is.the.hos
7c220 74 20 75 73 65 64 20 74 6f 20 61 63 63 65 73 73 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 6f 6e t.used.to.access.repositories.on
7c240 20 74 68 69 73 20 66 6f 72 67 65 0a 20 20 20 20 20 20 20 20 20 20 75 73 69 6e 67 20 61 20 62 72 .this.forge...........using.a.br
7c260 6f 77 73 65 72 2e 20 20 54 68 65 20 49 44 73 20 75 73 65 64 20 74 6f 20 69 64 65 6e 74 69 66 79 owser...The.IDs.used.to.identify
7c280 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 66 72 6f 6d 0a 20 20 20 20 20 20 20 20 20 20 74 68 65 .repositories.from...........the
7c2a0 20 66 6f 72 67 65 20 69 6e 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 20 61 6c 73 .forge.in.the.local.database.als
7c2c0 6f 20 64 65 72 69 76 65 73 20 66 72 6f 6d 20 74 68 69 73 20 76 61 6c 75 65 2e 0a 0a 20 20 20 20 o.derives.from.this.value.......
7c2e0 20 20 20 20 e2 80 a2 20 43 4c 41 53 53 20 69 73 20 74 68 65 20 63 6c 61 73 73 20 74 6f 20 62 65 ........CLASS.is.the.class.to.be
7c300 20 75 73 65 64 20 66 6f 72 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 66 72 6f 6d 20 74 68 65 20 .used.for.repositories.from.the.
7c320 66 6f 72 67 65 2e 0a 0a 20 20 20 20 20 43 6f 6d 70 6c 69 63 61 74 69 6f 6e 73 3a 0a 0a 20 20 20 forge........Complications:.....
7c340 20 20 20 20 20 e2 80 a2 20 57 68 65 6e 20 63 6f 6e 6e 65 63 74 69 6e 67 20 74 6f 20 61 20 47 69 .........When.connecting.to.a.Gi
7c360 74 68 75 62 20 45 6e 74 65 72 70 72 69 73 65 20 65 64 69 74 69 6f 6e 20 77 68 6f 73 65 20 52 45 thub.Enterprise.edition.whose.RE
7c380 53 54 0a 20 20 20 20 20 20 20 20 20 20 41 50 49 e2 80 99 73 20 65 6e 64 20 70 6f 69 6e 74 20 69 ST...........API...s.end.point.i
7c3a0 73 20 22 3c 68 6f 73 74 3e 2f 76 33 22 20 61 6e 64 20 77 68 6f 73 65 20 47 72 61 70 68 51 4c 20 s."<host>/v3".and.whose.GraphQL.
7c3c0 41 50 49 e2 80 99 73 20 65 6e 64 0a 20 20 20 20 20 20 20 20 20 20 70 6f 69 6e 74 20 69 73 20 22 API...s.end...........point.is."
7c3e0 3c 68 6f 73 74 3e 2f 67 72 61 70 68 71 6c 22 2c 20 74 68 65 6e 20 75 73 65 20 22 3c 68 6f 73 74 <host>/graphql",.then.use."<host
7c400 3e 2f 76 33 22 20 61 73 20 41 50 49 48 4f 53 54 2e 0a 20 20 20 20 20 20 20 20 20 20 54 68 69 73 >/v3".as.APIHOST............This
7c420 20 69 73 20 61 20 68 69 73 74 6f 72 69 63 20 61 63 63 69 64 65 6e 74 2e 20 20 53 65 65 20 69 73 .is.a.historic.accident...See.is
7c440 73 75 65 20 23 31 37 34 2e 0a 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 57 45 42 48 4f 53 54 20 61 sue.#174...............WEBHOST.a
7c460 6e 64 20 43 4c 41 53 53 20 63 61 6e 6e 6f 74 20 62 65 20 63 68 61 6e 67 65 64 20 6f 6e 63 65 20 nd.CLASS.cannot.be.changed.once.
7c480 79 6f 75 20 68 61 76 65 20 61 64 64 65 64 20 6f 6e 65 20 6f 72 0a 20 20 20 20 20 20 20 20 20 20 you.have.added.one.or...........
7c4a0 6d 6f 72 65 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 66 72 6f 6d 20 61 20 66 6f 72 67 65 2e 20 more.repositories.from.a.forge..
7c4c0 20 43 68 61 6e 67 69 6e 67 20 47 49 54 48 4f 53 54 20 61 6e 64 2f 6f 72 0a 20 20 20 20 20 20 20 .Changing.GITHOST.and/or........
7c4e0 20 20 20 41 50 49 48 4f 53 54 20 6d 61 79 20 62 65 20 70 6f 73 73 69 62 6c 65 2c 20 62 75 74 20 ...APIHOST.may.be.possible,.but.
7c500 73 68 6f 75 6c 64 20 73 65 6c 64 6f 6d 20 62 65 20 6e 65 63 65 73 73 61 72 79 2e 0a 0a 1f 0a 46 should.seldom.be.necessary.....F
7c520 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 53 75 70 70 6f 72 74 65 ile:.forge.info,..Node:.Supporte
7c540 64 20 46 6f 72 67 65 73 20 61 6e 64 20 48 6f 73 74 73 2c 20 20 4e 65 78 74 3a 20 46 41 51 2c 20 d.Forges.and.Hosts,..Next:.FAQ,.
7c560 20 50 72 65 76 3a 20 48 6f 77 20 46 6f 72 67 65 20 44 65 74 65 63 74 69 6f 6e 20 57 6f 72 6b 73 .Prev:.How.Forge.Detection.Works
7c580 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 41 70 70 65 6e 64 69 78 20 42 20 53 75 70 70 6f 72 74 65 64 ,..Up:.Top..Appendix.B.Supported
7c5a0 20 46 6f 72 67 65 73 20 61 6e 64 20 48 6f 73 74 73 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a .Forges.and.Hosts.**************
7c5c0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 43 75 72 72 65 6e 74 ***********************..Current
7c5e0 6c 79 20 46 6f 72 67 65 20 73 75 70 70 6f 72 74 73 20 74 77 6f 20 66 6f 72 67 65 73 20 61 6e 64 ly.Forge.supports.two.forges.and
7c600 20 74 68 72 65 65 20 6d 6f 72 65 20 66 6f 72 67 65 73 20 70 61 72 74 69 61 6c 6c 79 2e 0a 41 64 .three.more.forges.partially..Ad
7c620 64 69 74 69 6f 6e 61 6c 6c 79 20 69 74 20 73 75 70 70 6f 72 74 73 20 66 6f 75 72 20 73 65 6d 69 ditionally.it.supports.four.semi
7c640 2d 66 6f 72 67 65 73 2e 20 20 53 75 70 70 6f 72 74 20 66 6f 72 20 6d 6f 72 65 20 66 6f 72 67 65 -forges...Support.for.more.forge
7c660 73 20 61 6e 64 0a 73 65 6d 69 2d 66 6f 72 67 65 73 20 63 61 6e 20 61 6e 64 20 77 69 6c 6c 20 62 s.and.semi-forges.can.and.will.b
7c680 65 20 61 64 64 65 64 2e 0a 0a 20 20 20 42 6f 74 68 20 66 6f 72 67 65 73 20 61 6e 64 20 73 65 6d e.added......Both.forges.and.sem
7c6a0 69 2d 66 6f 72 67 65 73 20 70 72 6f 76 69 64 65 20 77 65 62 20 69 6e 74 65 72 66 61 63 65 73 20 i-forges.provide.web.interfaces.
7c6c0 66 6f 72 20 47 69 74 0a 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 20 20 46 6f 72 67 65 73 20 61 64 for.Git.repositories...Forges.ad
7c6e0 64 69 74 69 6f 6e 61 6c 6c 79 20 73 75 70 70 6f 72 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 ditionally.support.pull-requests
7c700 20 61 6e 64 20 69 73 73 75 65 73 20 61 6e 64 0a 6d 61 6b 65 20 74 68 6f 73 65 20 61 6e 64 20 6f .and.issues.and.make.those.and.o
7c720 74 68 65 72 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 76 61 69 6c 61 62 6c 65 20 75 73 69 6e 67 ther.information.available.using
7c740 20 61 6e 20 41 50 49 2e 0a 0a 20 20 20 57 68 65 6e 20 61 20 66 6f 72 67 65 20 69 73 20 6f 6e 6c .an.API......When.a.forge.is.onl
7c760 79 20 70 61 72 74 69 61 6c 6c 79 20 73 75 70 70 6f 72 74 65 64 2c 20 74 68 65 6e 20 74 68 61 74 y.partially.supported,.then.that
7c780 20 6d 65 61 6e 73 20 74 68 61 74 20 6f 6e 6c 79 0a 74 68 65 20 66 75 6e 63 74 69 6f 6e 61 6c 69 .means.that.only.the.functionali
7c7a0 74 79 20 74 68 61 74 20 64 6f 65 73 20 6e 6f 74 20 72 65 71 75 69 72 65 20 74 68 65 20 41 50 49 ty.that.does.not.require.the.API
7c7c0 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64 2c 20 6f 72 20 69 6e 0a 6f 74 68 65 72 20 77 6f 72 .is.implemented,.or.in.other.wor
7c7e0 64 73 2c 20 74 68 61 74 20 74 68 65 20 66 6f 72 67 65 20 69 73 20 6f 6e 6c 79 20 73 75 70 70 6f ds,.that.the.forge.is.only.suppo
7c800 72 74 65 64 20 61 73 20 61 20 73 65 6d 69 2d 66 6f 72 67 65 2e 0a 0a 20 20 20 41 20 68 6f 73 74 rted.as.a.semi-forge......A.host
7c820 20 69 73 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 61 20 66 .is.a.particular.instance.of.a.f
7c840 6f 72 67 65 2e 20 20 46 6f 72 20 65 78 61 6d 70 6c 65 20 74 68 65 20 68 6f 73 74 73 0a 3c 68 74 orge...For.example.the.hosts.<ht
7c860 74 70 73 3a 2f 2f 67 69 74 6c 61 62 2e 63 6f 6d 3e 20 61 6e 64 20 3c 68 74 74 70 73 3a 2f 2f 73 tps://gitlab.com>.and.<https://s
7c880 61 6c 73 61 2e 64 65 62 69 61 6e 2e 6f 72 67 3e 20 61 72 65 20 62 6f 74 68 20 69 6e 73 74 61 6e alsa.debian.org>.are.both.instan
7c8a0 63 65 73 0a 6f 66 20 74 68 65 20 47 69 74 6c 61 62 20 66 6f 72 67 65 2e 20 20 46 6f 72 67 65 20 ces.of.the.Gitlab.forge...Forge.
7c8c0 73 75 70 70 6f 72 74 73 20 73 6f 6d 65 20 77 65 6c 6c 20 6b 6e 6f 77 6e 20 68 6f 73 74 73 20 6f supports.some.well.known.hosts.o
7c8e0 75 74 20 6f 66 20 74 68 65 0a 62 6f 78 20 61 6e 64 20 61 64 64 69 74 69 6f 6e 61 6c 20 68 6f 73 ut.of.the.box.and.additional.hos
7c900 74 73 20 63 61 6e 20 65 61 73 69 6c 79 20 62 65 20 73 75 70 70 6f 72 74 65 64 20 62 79 20 61 64 ts.can.easily.be.supported.by.ad
7c920 64 69 6e 67 20 65 6e 74 72 69 65 73 20 74 6f 0a 74 68 65 20 6f 70 74 69 6f 6e 20 e2 80 98 66 6f ding.entries.to.the.option....fo
7c940 72 67 65 2d 61 6c 69 73 74 e2 80 99 20 28 73 65 65 20 2a 6e 6f 74 65 20 48 6f 77 20 46 6f 72 67 rge-alist....(see.*note.How.Forg
7c960 65 20 44 65 74 65 63 74 69 6f 6e 20 57 6f 72 6b 73 3a 3a 29 2e 0a 0a 20 20 20 46 6f 72 20 6d 6f e.Detection.Works::)......For.mo
7c980 72 65 20 64 65 74 61 69 6c 73 20 61 62 6f 75 74 20 74 68 65 20 63 61 76 65 61 74 73 20 6d 65 6e re.details.about.the.caveats.men
7c9a0 74 69 6f 6e 65 64 20 62 65 6c 6f 77 20 28 61 6e 64 20 73 6f 6d 65 20 6f 74 68 65 72 73 29 0a 73 tioned.below.(and.some.others).s
7c9c0 65 65 20 61 6c 73 6f 20 2a 6e 6f 74 65 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 3a 3a 2e ee.also.*note.Getting.Started::.
7c9e0 0a 0a 2a 20 4d 65 6e 75 3a 0a 0a 2a 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 3a 3a 0a ..*.Menu:..*.Supported.Forges::.
7ca00 2a 20 50 61 72 74 69 61 6c 6c 79 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 3a 3a 0a 2a *.Partially.Supported.Forges::.*
7ca20 20 53 75 70 70 6f 72 74 65 64 20 53 65 6d 69 2d 46 6f 72 67 65 73 3a 3a 0a 0a 1f 0a 46 69 6c 65 .Supported.Semi-Forges::....File
7ca40 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 53 75 70 70 6f 72 74 65 64 20 46 :.forge.info,..Node:.Supported.F
7ca60 6f 72 67 65 73 2c 20 20 4e 65 78 74 3a 20 50 61 72 74 69 61 6c 6c 79 20 53 75 70 70 6f 72 74 65 orges,..Next:.Partially.Supporte
7ca80 64 20 46 6f 72 67 65 73 2c 20 20 55 70 3a 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 20 d.Forges,..Up:.Supported.Forges.
7caa0 61 6e 64 20 48 6f 73 74 73 0a 0a 42 2e 31 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 0a and.Hosts..B.1.Supported.Forges.
7cac0 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 42 2e 31 2e 31 20 47 69 74 68 ====================..B.1.1.Gith
7cae0 75 62 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 46 6f 72 67 65 e2 80 99 73 20 73 75 70 70 6f ub.------------..Forge...s.suppo
7cb00 72 74 20 66 6f 72 20 47 69 74 68 75 62 20 63 61 6e 20 62 65 20 63 6f 6e 73 69 64 65 72 65 64 20 rt.for.Github.can.be.considered.
7cb20 74 68 65 20 22 72 65 66 65 72 65 6e 63 65 0a 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 22 2e 20 the."reference.implementation"..
7cb40 20 53 75 70 70 6f 72 74 20 66 6f 72 20 6f 74 68 65 72 20 66 6f 72 67 65 73 20 63 61 6e 20 6c 61 .Support.for.other.forges.can.la
7cb60 67 20 62 65 68 69 6e 64 20 61 20 62 69 74 2e 0a 0a 42 2e 31 2e 31 2e 31 20 47 69 74 68 75 62 20 g.behind.a.bit...B.1.1.1.Github.
7cb80 43 61 76 65 61 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a Caveats.........................
7cba0 20 20 20 e2 80 a2 20 46 6f 72 67 65 20 75 73 65 73 20 74 68 65 20 47 69 74 68 75 62 20 47 72 61 .......Forge.uses.the.Github.Gra
7cbc0 70 68 51 4c 20 41 50 49 20 77 68 65 6e 20 70 6f 73 73 69 62 6c 65 20 62 75 74 20 68 61 73 20 74 phQL.API.when.possible.but.has.t
7cbe0 6f 20 66 61 6c 6c 0a 20 20 20 20 20 62 61 63 6b 20 74 6f 20 75 73 65 20 74 68 65 20 52 45 53 54 o.fall......back.to.use.the.REST
7cc00 20 41 50 49 20 69 6e 20 6d 61 6e 79 20 63 61 73 65 73 20 62 65 63 61 75 73 65 20 74 68 65 20 66 .API.in.many.cases.because.the.f
7cc20 6f 72 6d 65 72 20 69 73 20 73 74 69 6c 6c 0a 20 20 20 20 20 72 61 74 68 65 72 20 69 6e 63 6f 6d ormer.is.still......rather.incom
7cc40 70 6c 65 74 65 2e 0a 0a 20 20 20 e2 80 a2 20 54 68 65 20 47 69 74 68 75 62 20 47 72 61 70 68 51 plete..........The.Github.GraphQ
7cc60 4c 20 41 50 49 20 68 61 73 20 61 20 68 61 72 64 2d 63 6f 64 65 64 20 74 69 6d 65 6f 75 74 20 6f L.API.has.a.hard-coded.timeout.o
7cc80 6e 20 71 75 65 72 69 65 73 2e 20 20 54 68 65 0a 20 20 20 20 20 6f 6e 6c 79 20 73 6f 6c 75 74 69 n.queries...The......only.soluti
7cca0 6f 6e 20 69 73 20 74 6f 20 72 65 64 75 63 65 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 65 6e on.is.to.reduce.the.number.of.en
7ccc0 74 69 74 69 65 73 20 77 65 20 71 75 65 72 79 20 61 74 20 6f 6e 63 65 2c 0a 20 20 20 20 20 77 68 tities.we.query.at.once,......wh
7cce0 69 63 68 20 63 61 6e 20 62 65 20 64 6f 6e 65 20 62 79 20 61 64 6a 75 73 74 69 6e 67 20 65 69 74 ich.can.be.done.by.adjusting.eit
7cd00 68 65 72 20 74 68 65 20 e2 80 98 66 6f 72 67 65 2e 67 72 61 70 68 71 6c 49 74 65 6d 4c 69 6d 69 her.the....forge.graphqlItemLimi
7cd20 74 e2 80 99 0a 20 20 20 20 20 67 69 74 20 76 61 72 69 61 62 6c 65 20 6f 72 20 74 68 65 20 66 69 t.........git.variable.or.the.fi
7cd40 65 6c 64 20 22 47 51 4c 20 65 6e 74 69 74 79 20 6c 69 6d 69 74 22 20 69 6e 20 61 20 73 74 61 74 eld."GQL.entity.limit".in.a.stat
7cd60 75 73 20 62 75 66 66 65 72 2e 0a 0a 20 20 20 e2 80 a2 20 46 6f 72 67 65 20 64 65 70 65 6e 64 73 us.buffer..........Forge.depends
7cd80 20 6f 6e 20 74 68 65 20 e2 80 98 75 70 64 61 74 65 64 5f 61 74 e2 80 99 20 66 69 65 6c 64 20 62 .on.the....updated_at....field.b
7cda0 65 69 6e 67 20 75 70 64 61 74 65 64 20 77 68 65 6e 0a 20 20 20 20 20 61 70 70 72 6f 70 72 69 61 eing.updated.when......appropria
7cdc0 74 65 2e 20 20 46 6f 72 20 47 69 74 68 75 62 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 61 74 te...For.Github.pull-requests.at
7cde0 20 6c 65 61 73 74 2c 20 74 68 61 74 20 69 73 20 6e 6f 74 20 61 6c 77 61 79 73 0a 20 20 20 20 20 .least,.that.is.not.always......
7ce00 64 6f 6e 65 2e 0a 0a 42 2e 31 2e 31 2e 32 20 47 69 74 68 75 62 20 48 6f 73 74 73 0a 2e 2e 2e 2e done...B.1.1.2.Github.Hosts.....
7ce20 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 3c 68 74 74 70 73 3a .........................<https:
7ce40 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 3e 0a 0a 42 2e 31 2e 32 20 47 69 74 6c 61 62 0a 2d 2d 2d 2d //github.com>..B.1.2.Gitlab.----
7ce60 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 42 2e 31 2e 32 2e 31 20 47 69 74 6c 61 62 20 43 61 76 65 61 74 73 --------..B.1.2.1.Gitlab.Caveats
7ce80 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 ................................
7cea0 46 6f 72 67 65 20 63 61 6e 6e 6f 74 20 70 72 6f 76 69 64 65 20 6e 6f 74 69 66 69 63 61 74 69 6f Forge.cannot.provide.notificatio
7cec0 6e 73 20 62 65 63 61 75 73 65 20 74 68 65 20 47 69 74 6c 61 62 20 41 50 49 20 64 6f 65 73 20 6e ns.because.the.Gitlab.API.does.n
7cee0 6f 74 0a 20 20 20 20 20 65 78 70 6f 73 65 20 74 68 6f 73 65 2e 0a 0a 42 2e 31 2e 32 2e 32 20 47 ot......expose.those...B.1.2.2.G
7cf00 69 74 6c 61 62 20 48 6f 73 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e itlab.Hosts.....................
7cf20 0a 0a 20 20 20 e2 80 a2 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 6c 61 62 2e 63 6f 6d 3e 0a 20 20 .........<https://gitlab.com>...
7cf40 20 e2 80 a2 20 3c 68 74 74 70 73 3a 2f 2f 73 61 6c 73 61 2e 64 65 62 69 61 6e 2e 6f 72 67 3e 0a .....<https://salsa.debian.org>.
7cf60 20 20 20 e2 80 a2 20 3c 68 74 74 70 73 3a 2f 2f 66 72 61 6d 61 67 69 74 2e 6f 72 67 3e 0a 0a 1f .......<https://framagit.org>...
7cf80 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 50 61 72 74 69 61 .File:.forge.info,..Node:.Partia
7cfa0 6c 6c 79 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 2c 20 20 4e 65 78 74 3a 20 53 75 70 lly.Supported.Forges,..Next:.Sup
7cfc0 70 6f 72 74 65 64 20 53 65 6d 69 2d 46 6f 72 67 65 73 2c 20 20 50 72 65 76 3a 20 53 75 70 70 6f ported.Semi-Forges,..Prev:.Suppo
7cfe0 72 74 65 64 20 46 6f 72 67 65 73 2c 20 20 55 70 3a 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 rted.Forges,..Up:.Supported.Forg
7d000 65 73 20 61 6e 64 20 48 6f 73 74 73 0a 0a 42 2e 32 20 50 61 72 74 69 61 6c 6c 79 20 53 75 70 70 es.and.Hosts..B.2.Partially.Supp
7d020 6f 72 74 65 64 20 46 6f 72 67 65 73 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d orted.Forges.===================
7d040 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 42 2e 32 2e 31 20 46 6f 72 67 65 6a 6f 20 68 74 74 70 73 ===========..B.2.1.Forgejo.https
7d060 3a 2f 2f 66 6f 72 67 65 6a 6f 2e 6f 72 67 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ://forgejo.org.-----------------
7d080 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 54 68 69 73 20 69 73 20 74 68 65 20 6e 65 ----------------..This.is.the.ne
7d0a0 78 74 20 66 6f 72 67 65 20 77 68 6f 73 65 20 41 50 49 20 77 69 6c 6c 20 62 65 20 73 75 70 70 6f xt.forge.whose.API.will.be.suppo
7d0c0 72 74 65 64 2e 0a 0a 42 2e 32 2e 31 2e 31 20 46 6f 72 67 65 6a 6f 20 48 6f 73 74 73 0a 2e 2e 2e rted...B.2.1.1.Forgejo.Hosts....
7d0e0 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 3c 68 74 74 70 ...........................<http
7d100 73 3a 2f 2f 63 6f 64 65 62 65 72 67 2e 6f 72 67 3e 0a 0a 42 2e 32 2e 32 20 47 69 74 65 61 20 68 s://codeberg.org>..B.2.2.Gitea.h
7d120 74 74 70 73 3a 2f 2f 67 69 74 65 61 2e 69 6f 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ttps://gitea.io.----------------
7d140 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 4f 6e 63 65 20 46 6f 72 67 65 6a 6f 20 69 73 20 73 75 ------------..Once.Forgejo.is.su
7d160 70 70 6f 72 74 65 64 20 69 74 20 6d 69 67 68 74 20 62 65 20 66 61 69 72 6c 79 20 73 69 6d 70 6c pported.it.might.be.fairly.simpl
7d180 65 20 74 6f 20 73 75 70 70 6f 72 74 20 47 69 74 65 61 0a 74 6f 6f 2c 20 62 65 63 61 75 73 65 20 e.to.support.Gitea.too,.because.
7d1a0 74 68 65 20 66 6f 72 6d 65 72 20 69 73 20 61 20 66 6f 72 6b 20 6f 66 20 74 68 65 20 6c 61 74 74 the.former.is.a.fork.of.the.latt
7d1c0 65 72 2c 20 61 6e 64 20 74 68 65 69 72 20 41 50 49 73 20 6d 69 67 68 74 0a 73 74 69 6c 6c 20 62 er,.and.their.APIs.might.still.b
7d1e0 65 20 73 69 6d 69 6c 61 72 20 65 6e 6f 75 67 68 2e 0a 0a 42 2e 32 2e 33 20 47 6f 67 73 20 68 74 e.similar.enough...B.2.3.Gogs.ht
7d200 74 70 73 3a 2f 2f 67 6f 67 73 2e 69 6f 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d tps://gogs.io.------------------
7d220 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 4f 6e 63 65 20 46 6f 72 67 65 6a 6f 20 69 73 20 73 75 70 70 6f 72 --------..Once.Forgejo.is.suppor
7d240 74 65 64 20 69 74 20 6d 69 67 68 74 20 62 65 20 66 61 69 72 6c 79 20 73 69 6d 70 6c 65 20 74 6f ted.it.might.be.fairly.simple.to
7d260 20 73 75 70 70 6f 72 74 20 47 6f 67 73 20 74 6f 6f 2c 0a 62 65 63 61 75 73 65 20 74 68 65 20 46 .support.Gogs.too,.because.the.F
7d280 6f 72 67 65 6a 6f 20 69 73 20 61 20 66 6f 72 6b 20 6f 66 20 47 69 74 65 61 2c 20 77 68 69 63 68 orgejo.is.a.fork.of.Gitea,.which
7d2a0 20 69 73 20 61 20 66 6f 72 6b 20 6f 66 20 47 6f 67 73 2c 20 61 6e 64 0a 74 68 65 69 72 20 41 50 .is.a.fork.of.Gogs,.and.their.AP
7d2c0 49 73 20 6d 69 67 68 74 20 73 74 69 6c 6c 20 62 65 20 73 69 6d 69 6c 61 72 20 65 6e 6f 75 67 68 Is.might.still.be.similar.enough
7d2e0 2e 0a 0a 42 2e 32 2e 34 20 42 69 74 62 75 63 6b 65 74 20 68 74 74 70 73 3a 2f 2f 62 69 74 62 75 ...B.2.4.Bitbucket.https://bitbu
7d300 63 6b 65 74 2e 6f 72 67 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d cket.org.-----------------------
7d320 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 49 20 64 6f 6e e2 80 99 74 20 70 6c 61 6e 20 74 --------------..I.don...t.plan.t
7d340 6f 20 73 75 70 70 6f 72 74 20 42 69 74 62 75 63 6b 65 74 e2 80 99 73 20 41 50 49 20 61 6e 79 20 o.support.Bitbucket...s.API.any.
7d360 74 69 6d 65 20 73 6f 6f 6e 2c 20 61 6e 64 20 69 74 20 67 65 74 73 20 6c 65 73 73 0a 6c 69 6b 65 time.soon,.and.it.gets.less.like
7d380 6c 79 20 74 68 61 74 20 49 20 77 69 6c 6c 20 65 76 65 72 79 20 64 6f 20 69 74 20 65 76 65 72 79 ly.that.I.will.every.do.it.every
7d3a0 20 74 69 6d 65 20 49 20 6c 6f 6f 6b 20 61 74 20 69 74 2e 0a 0a 42 2e 32 2e 34 2e 31 20 42 69 74 .time.I.look.at.it...B.2.4.1.Bit
7d3c0 62 75 63 6b 65 74 20 43 61 76 65 61 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e bucket.Caveats..................
7d3e0 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 54 68 65 20 41 50 49 20 64 6f 63 75 6d 65 6e .................The.API.documen
7d400 74 61 74 69 6f 6e 20 69 73 20 70 6f 6f 72 20 61 6e 64 20 69 6e 69 74 69 61 6c 20 74 65 73 74 73 tation.is.poor.and.initial.tests
7d420 20 69 6e 64 69 63 61 74 65 64 20 74 68 61 74 20 74 68 65 0a 20 20 20 20 20 69 6d 70 6c 65 6d 65 .indicated.that.the......impleme
7d440 6e 74 61 74 69 6f 6e 20 69 73 20 62 75 67 67 79 2e 0a 0a 20 20 20 e2 80 a2 20 41 74 6c 61 73 73 ntation.is.buggy..........Atlass
7d460 69 61 6e e2 80 99 73 20 6f 66 66 65 72 69 6e 67 20 63 6f 6e 74 61 69 6e 73 20 74 77 6f 20 76 65 ian...s.offering.contains.two.ve
7d480 72 79 20 64 69 73 74 69 6e 63 74 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 73 0a 20 20 20 20 ry.distinct.implementations.....
7d4a0 20 74 68 61 74 20 61 72 65 20 62 6f 74 68 20 63 61 6c 6c 65 64 20 22 42 69 74 62 75 63 6b 65 74 .that.are.both.called."Bitbucket
7d4c0 22 2e 20 20 46 6f 72 67 65 20 6f 6e 6c 79 20 73 75 70 70 6f 72 74 73 20 74 68 65 0a 20 20 20 20 "...Forge.only.supports.the.....
7d4e0 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 77 68 6f 73 65 20 6f 6e 6c 79 20 69 6e 73 74 61 .implementation.whose.only.insta
7d500 6e 63 65 20 69 73 20 61 76 61 69 6c 61 62 6c 65 20 61 74 0a 20 20 20 20 20 3c 68 74 74 70 73 3a nce.is.available.at......<https:
7d520 2f 2f 62 69 74 62 75 63 6b 65 74 2e 6f 72 67 3e 2c 20 62 65 63 61 75 73 65 20 49 20 6f 6e 6c 79 //bitbucket.org>,.because.I.only
7d540 20 68 61 76 65 20 61 63 63 65 73 73 20 74 6f 20 74 68 61 74 2e 0a 0a 20 20 20 e2 80 a2 20 55 6e .have.access.to.that..........Un
7d560 6c 69 6b 65 20 61 6c 6c 20 6f 74 68 65 72 20 66 6f 72 67 65 73 2c 20 42 69 74 62 75 63 6b 65 74 like.all.other.forges,.Bitbucket
7d580 20 64 6f 65 73 20 6e 6f 74 20 65 78 70 6f 73 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 61 .does.not.expose.pull-requests.a
7d5a0 73 0a 20 20 20 20 20 72 65 66 65 72 65 6e 63 65 73 20 69 6e 20 74 68 65 20 75 70 73 74 72 65 61 s......references.in.the.upstrea
7d5c0 6d 20 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 46 6f 72 20 74 68 61 74 20 72 65 61 73 6f 6e 20 46 m.repository...For.that.reason.F
7d5e0 6f 72 67 65 0a 20 20 20 20 20 61 63 74 75 61 6c 6c 79 20 74 72 65 61 74 73 20 69 74 20 61 73 20 orge......actually.treats.it.as.
7d600 61 20 73 65 6d 69 2d 66 6f 72 67 65 2c 20 6e 6f 74 20 61 73 20 66 6f 72 67 65 20 77 68 6f 73 65 a.semi-forge,.not.as.forge.whose
7d620 20 41 50 49 20 69 73 20 6e 6f 74 0a 20 20 20 20 20 73 75 70 70 6f 72 74 65 64 20 79 65 74 2e 20 .API.is.not......supported.yet..
7d640 20 54 68 69 73 20 6d 65 61 6e 73 20 74 68 61 74 20 79 6f 75 20 63 61 6e 6e 6f 74 20 63 68 65 63 .This.means.that.you.cannot.chec
7d660 6b 6f 75 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 0a 20 20 20 20 20 6c 6f 63 61 6c 6c 79 2e kout.pull-requests......locally.
7d680 20 20 54 68 65 72 65 20 69 73 20 6c 69 74 74 6c 65 20 68 6f 70 65 20 74 68 61 74 20 74 68 69 73 ..There.is.little.hope.that.this
7d6a0 20 77 69 6c 6c 20 65 76 65 72 20 67 65 74 20 66 69 78 65 64 3b 20 74 68 65 0a 20 20 20 20 20 72 .will.ever.get.fixed;.the......r
7d6c0 65 73 70 65 63 74 69 76 65 20 69 73 73 75 65 20 77 61 73 20 6f 70 65 6e 65 64 20 73 69 78 20 79 espective.issue.was.opened.six.y
7d6e0 65 61 72 73 20 61 67 6f 20 61 6e 64 20 74 68 65 72 65 20 68 61 73 20 62 65 65 6e 20 6e 6f 0a 20 ears.ago.and.there.has.been.no..
7d700 20 20 20 20 70 72 6f 67 72 65 73 73 20 73 69 6e 63 65 3a 20 3c 68 74 74 70 73 3a 2f 2f 62 69 74 ....progress.since:.<https://bit
7d720 62 75 63 6b 65 74 2e 6f 72 67 2f 73 69 74 65 2f 6d 61 73 74 65 72 2f 69 73 73 75 65 73 2f 35 38 bucket.org/site/master/issues/58
7d740 31 34 3e 2e 0a 0a 42 2e 32 2e 34 2e 32 20 42 69 74 62 75 63 6b 65 74 20 48 6f 73 74 73 0a 2e 2e 14>...B.2.4.2.Bitbucket.Hosts...
7d760 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 3c 68 ..............................<h
7d780 74 74 70 73 3a 2f 2f 62 69 74 62 75 63 6b 65 74 2e 6f 72 67 3e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 ttps://bitbucket.org>....File:.f
7d7a0 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 53 75 70 70 6f 72 74 65 64 20 53 65 6d 69 orge.info,..Node:.Supported.Semi
7d7c0 2d 46 6f 72 67 65 73 2c 20 20 50 72 65 76 3a 20 50 61 72 74 69 61 6c 6c 79 20 53 75 70 70 6f 72 -Forges,..Prev:.Partially.Suppor
7d7e0 74 65 64 20 46 6f 72 67 65 73 2c 20 20 55 70 3a 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 ted.Forges,..Up:.Supported.Forge
7d800 73 20 61 6e 64 20 48 6f 73 74 73 0a 0a 42 2e 33 20 53 75 70 70 6f 72 74 65 64 20 53 65 6d 69 2d s.and.Hosts..B.3.Supported.Semi-
7d820 46 6f 72 67 65 73 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d Forges.=========================
7d840 0a 0a 42 2e 33 2e 31 20 47 69 74 77 65 62 20 68 74 74 70 73 3a 2f 2f 67 69 74 2d 73 63 6d 2e 63 ..B.3.1.Gitweb.https://git-scm.c
7d860 6f 6d 2f 64 6f 63 73 2f 67 69 74 77 65 62 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d om/docs/gitweb.-----------------
7d880 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 42 2e 33 ---------------------------..B.3
7d8a0 2e 31 2e 31 20 47 69 74 77 65 62 20 43 61 76 65 61 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e .1.1.Gitweb.Caveats.............
7d8c0 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 49 20 63 6f 75 6c 64 20 66 69 6e 64 20 ...................I.could.find.
7d8e0 6f 6e 6c 79 20 6f 6e 65 20 70 75 62 6c 69 63 20 69 6e 73 74 61 6c 6c 61 74 69 6f 6e 0a 20 20 20 only.one.public.installation....
7d900 20 20 28 3c 68 74 74 70 73 3a 2f 2f 67 69 74 2e 73 61 76 61 6e 6e 61 68 2e 67 6e 75 2e 6f 72 67 ..(<https://git.savannah.gnu.org
7d920 3e 29 2c 20 77 68 69 63 68 20 67 69 76 65 73 20 75 73 65 72 73 20 74 68 65 20 63 68 6f 69 63 65 >),.which.gives.users.the.choice
7d940 0a 20 20 20 20 20 62 65 74 77 65 65 6e 20 47 69 74 77 65 62 20 61 6e 64 20 43 67 69 74 2e 20 20 ......between.Gitweb.and.Cgit...
7d960 54 68 65 20 6c 61 74 74 65 72 20 73 65 65 6d 73 20 6d 6f 72 65 20 70 6f 70 75 6c 61 72 20 28 6e The.latter.seems.more.popular.(n
7d980 6f 74 20 6a 75 73 74 0a 20 20 20 20 20 6f 6e 20 74 68 69 73 20 73 69 74 65 29 2e 0a 0a 42 2e 33 ot.just......on.this.site)...B.3
7d9a0 2e 32 20 43 67 69 74 20 68 74 74 70 73 3a 2f 2f 67 69 74 2e 7a 78 32 63 34 2e 63 6f 6d 2f 63 67 .2.Cgit.https://git.zx2c4.com/cg
7d9c0 69 74 2f 61 62 6f 75 74 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d it/about.-----------------------
7d9e0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 42 2e 33 2e 32 2e 31 20 43 67 --------------------..B.3.2.1.Cg
7da00 69 74 20 43 61 76 65 61 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a it.Caveats......................
7da20 0a 20 20 20 e2 80 a2 20 44 69 66 66 65 72 65 6e 74 20 73 69 74 65 73 20 75 73 65 20 64 69 66 66 ........Different.sites.use.diff
7da40 65 72 65 6e 74 20 55 52 4c 20 73 63 68 65 6d 61 74 61 20 61 6e 64 20 73 6f 6d 65 20 6f 66 20 74 erent.URL.schemata.and.some.of.t
7da60 68 65 20 62 69 67 67 65 72 0a 20 20 20 20 20 73 69 74 65 73 20 75 73 65 20 61 20 66 6f 72 6b 2e he.bigger......sites.use.a.fork.
7da80 20 20 46 6f 72 20 74 68 69 73 20 72 65 61 73 6f 6e 20 46 6f 72 67 65 20 68 61 73 20 74 6f 20 70 ..For.this.reason.Forge.has.to.p
7daa0 72 6f 76 69 64 65 20 73 65 76 65 72 61 6c 0a 20 20 20 20 20 63 6c 61 73 73 65 73 20 74 6f 20 73 rovide.several......classes.to.s
7dac0 75 70 70 6f 72 74 20 64 69 66 66 65 72 65 6e 74 20 76 61 72 69 61 74 69 6f 6e 73 20 6f 66 20 43 upport.different.variations.of.C
7dae0 67 69 74 20 61 6e 64 20 79 6f 75 20 68 61 76 65 20 74 6f 0a 20 20 20 20 20 6c 6f 6f 6b 20 61 74 git.and.you.have.to......look.at
7db00 20 74 68 65 69 72 20 64 65 66 69 6e 69 74 69 6f 6e 73 20 74 6f 20 66 69 67 75 72 65 20 6f 75 74 .their.definitions.to.figure.out
7db20 20 77 68 69 63 68 20 6f 6e 65 20 69 73 20 74 68 65 20 63 6f 72 72 65 63 74 0a 20 20 20 20 20 6f .which.one.is.the.correct......o
7db40 6e 65 20 66 6f 72 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 69 6e 73 74 61 6c 6c 61 74 69 6f 6e ne.for.a.particular.installation
7db60 2e 0a 0a 42 2e 33 2e 32 2e 32 20 43 67 69 74 20 48 6f 73 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e ...B.3.2.2.Cgit.Hosts...........
7db80 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 2e 73 61 .................<https://git.sa
7dba0 76 61 6e 6e 61 68 2e 67 6e 75 2e 6f 72 67 2f 63 67 69 74 3e 0a 20 20 20 e2 80 a2 20 3c 68 74 74 vannah.gnu.org/cgit>........<htt
7dbc0 70 73 3a 2f 2f 67 69 74 2e 6b 65 72 6e 65 6c 2e 6f 72 67 3e 0a 20 20 20 e2 80 a2 20 3c 68 74 74 ps://git.kernel.org>........<htt
7dbe0 70 73 3a 2f 2f 72 65 70 6f 2e 6f 72 2e 63 7a 3e 0a 0a 42 2e 33 2e 33 20 53 74 67 69 74 20 68 74 ps://repo.or.cz>..B.3.3.Stgit.ht
7dc00 74 70 73 3a 2f 2f 63 6f 64 65 6d 61 64 6e 65 73 73 2e 6f 72 67 2f 67 69 74 2f 73 74 61 67 69 74 tps://codemadness.org/git/stagit
7dc20 2f 66 69 6c 65 2f 52 45 41 44 4d 45 2e 68 74 6d 6c 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d /file/README.html.--------------
7dc40 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d --------------------------------
7dc60 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 42 2e 33 2e 33 2e 31 20 53 74 67 69 74 -----------------..B.3.3.1.Stgit
7dc80 20 43 61 76 65 61 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a .Caveats........................
7dca0 20 20 20 e2 80 a2 20 53 74 67 69 74 20 63 61 6e 6e 6f 74 20 73 68 6f 77 20 6c 6f 67 73 20 66 6f .......Stgit.cannot.show.logs.fo
7dcc0 72 20 62 72 61 6e 63 68 65 73 20 62 65 73 69 64 65 20 22 6d 61 73 74 65 72 22 2e 20 20 46 6f 72 r.branches.beside."master"...For
7dce0 20 74 68 61 74 0a 20 20 20 20 20 72 65 61 73 6f 6e 20 46 6f 72 67 65 20 74 61 6b 65 73 20 75 73 .that......reason.Forge.takes.us
7dd00 65 72 73 20 74 6f 20 61 20 70 61 67 65 20 6c 69 73 74 69 6e 67 20 74 68 65 20 62 72 61 6e 63 68 ers.to.a.page.listing.the.branch
7dd20 65 73 20 77 68 65 6e 20 74 68 65 79 0a 20 20 20 20 20 72 65 71 75 65 73 74 20 74 68 65 20 6c 6f es.when.they......request.the.lo
7dd40 67 20 66 6f 72 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 62 72 61 6e 63 68 20 28 65 76 65 6e 20 g.for.a.particular.branch.(even.
7dd60 66 6f 72 20 22 6d 61 73 74 65 72 22 20 77 68 6f 73 65 0a 20 20 20 20 20 6c 6f 67 20 69 73 20 6a for."master".whose......log.is.j
7dd80 75 73 74 20 6f 6e 65 20 63 6c 69 63 6b 20 61 77 61 79 20 66 72 6f 6d 20 74 68 65 72 65 29 2e 0a ust.one.click.away.from.there)..
7dda0 0a 42 2e 33 2e 33 2e 32 20 53 74 67 69 74 20 48 6f 73 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e .B.3.3.2.Stgit.Hosts............
7ddc0 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 2e 73 75 .................<https://git.su
7dde0 63 6b 6c 65 73 73 2e 6f 72 67 3e 0a 0a 42 2e 33 2e 34 20 53 72 68 74 20 68 74 74 70 73 3a 2f 2f ckless.org>..B.3.4.Srht.https://
7de00 6d 65 74 61 2e 73 72 2e 68 74 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d meta.sr.ht.---------------------
7de20 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 42 2e 33 2e 34 2e 31 20 53 72 68 74 20 43 61 76 65 61 74 73 0a 2e --------..B.3.4.1.Srht.Caveats..
7de40 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 53 72 68 74 ............................Srht
7de60 20 63 61 6e 6e 6f 74 20 73 68 6f 77 20 6c 6f 67 73 20 66 6f 72 20 62 72 61 6e 63 68 65 73 20 62 .cannot.show.logs.for.branches.b
7de80 65 73 69 64 65 20 22 6d 61 73 74 65 72 22 2e 20 20 46 6f 72 20 74 68 61 74 0a 20 20 20 20 20 72 eside."master"...For.that......r
7dea0 65 61 73 6f 6e 20 46 6f 72 67 65 20 74 61 6b 65 73 20 75 73 65 72 73 20 74 6f 20 61 20 70 61 67 eason.Forge.takes.users.to.a.pag
7dec0 65 20 6c 69 73 74 69 6e 67 20 74 68 65 20 62 72 61 6e 63 68 65 73 20 77 68 65 6e 20 74 68 65 79 e.listing.the.branches.when.they
7dee0 0a 20 20 20 20 20 72 65 71 75 65 73 74 20 74 68 65 20 6c 6f 67 20 66 6f 72 20 61 20 70 61 72 74 ......request.the.log.for.a.part
7df00 69 63 75 6c 61 72 20 62 72 61 6e 63 68 20 28 65 76 65 6e 20 66 6f 72 20 22 6d 61 73 74 65 72 22 icular.branch.(even.for."master"
7df20 20 77 68 6f 73 65 0a 20 20 20 20 20 6c 6f 67 20 69 73 20 6a 75 73 74 20 6f 6e 65 20 63 6c 69 63 .whose......log.is.just.one.clic
7df40 6b 20 61 77 61 79 20 66 72 6f 6d 20 74 68 65 72 65 29 2e 0a 0a 42 2e 33 2e 34 2e 32 20 53 72 68 k.away.from.there)...B.3.4.2.Srh
7df60 74 20 48 6f 73 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 t.Hosts.........................
7df80 80 a2 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 2e 73 72 2e 68 74 3e 0a 0a 1f 0a 46 69 6c 65 3a 20 ...<https://git.sr.ht>....File:.
7dfa0 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 46 41 51 2c 20 20 4e 65 78 74 3a 20 4b forge.info,..Node:.FAQ,..Next:.K
7dfc0 65 79 73 74 72 6f 6b 65 20 49 6e 64 65 78 2c 20 20 50 72 65 76 3a 20 53 75 70 70 6f 72 74 65 64 eystroke.Index,..Prev:.Supported
7dfe0 20 46 6f 72 67 65 73 20 61 6e 64 20 48 6f 73 74 73 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 41 70 70 .Forges.and.Hosts,..Up:.Top..App
7e000 65 6e 64 69 78 20 43 20 46 41 51 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 54 68 69 73 endix.C.FAQ.**************..This
7e020 20 73 65 63 74 69 6f 6e 20 6c 69 73 74 73 20 73 6f 6d 65 20 66 72 65 71 75 65 6e 74 6c 79 20 61 .section.lists.some.frequently.a
7e040 73 6b 65 64 20 71 75 65 73 74 69 6f 6e 73 2e 20 20 50 6c 65 61 73 65 20 73 65 65 20 61 6c 73 6f sked.questions...Please.see.also
7e060 0a 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6d 61 67 69 74 2f 66 6f 72 67 65 .<https://github.com/magit/forge
7e080 2f 77 69 6b 69 2f 46 41 51 3e 20 66 6f 72 20 61 6e 20 65 78 74 65 6e 64 65 64 20 6c 69 73 74 20 /wiki/FAQ>.for.an.extended.list.
7e0a0 6f 66 20 63 6f 6d 6d 6f 6e 0a 69 73 73 75 65 73 2e 0a 0a 2a 20 4d 65 6e 75 3a 0a 0a 2a 20 e2 80 of.common.issues...*.Menu:..*...
7e0c0 98 65 72 72 6f 72 20 69 6e 20 70 72 6f 63 65 73 73 20 66 69 6c 74 65 72 20 48 54 54 50 20 45 72 .error.in.process.filter.HTTP.Er
7e0e0 72 6f 72 20 35 30 32 2c 20 22 42 61 64 20 67 61 74 65 77 61 79 22 e2 80 99 3a 20 65 72 72 6f 72 ror.502,."Bad.gateway"...:.error
7e100 20 69 6e 20 70 72 6f 63 65 73 73 20 66 69 6c 74 65 72 20 48 54 54 50 20 45 72 72 6f 72 20 35 30 .in.process.filter.HTTP.Error.50
7e120 32 20 22 42 61 64 20 67 61 74 65 77 61 79 22 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 2."Bad.gateway".....File:.forge.
7e140 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 65 72 72 6f 72 20 69 6e 20 70 72 6f 63 65 73 73 20 66 69 info,..Node:.error.in.process.fi
7e160 6c 74 65 72 20 48 54 54 50 20 45 72 72 6f 72 20 35 30 32 20 22 42 61 64 20 67 61 74 65 77 61 79 lter.HTTP.Error.502."Bad.gateway
7e180 22 2c 20 20 55 70 3a 20 46 41 51 0a 0a 43 2e 31 20 e2 80 98 65 72 72 6f 72 20 69 6e 20 70 72 6f ",..Up:.FAQ..C.1....error.in.pro
7e1a0 63 65 73 73 20 66 69 6c 74 65 72 3a 20 48 54 54 50 20 45 72 72 6f 72 3a 20 35 30 32 2c 20 22 42 cess.filter:.HTTP.Error:.502,."B
7e1c0 61 64 20 67 61 74 65 77 61 79 22 e2 80 99 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ad.gateway"....=================
7e1e0 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================================
7e200 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 54 68 69 73 20 69 73 20 61 20 66 72 65 71 75 65 6e 74 ============..This.is.a.frequent
7e220 6c 79 20 6f 63 63 75 72 72 69 6e 67 20 65 72 72 6f 72 2e 20 20 41 64 64 69 6e 67 20 73 6f 6d 65 ly.occurring.error...Adding.some
7e240 20 66 6f 72 6d 61 74 74 69 6e 67 2c 20 74 68 65 20 66 75 6c 6c 0a 65 72 72 6f 72 20 69 73 3a 0a .formatting,.the.full.error.is:.
7e260 0a 20 20 20 20 20 65 72 72 6f 72 20 69 6e 20 70 72 6f 63 65 73 73 20 66 69 6c 74 65 72 3a 20 67 ......error.in.process.filter:.g
7e280 68 75 62 2d 2d 73 69 67 6e 61 6c 2d 65 72 72 6f 72 3a 20 48 54 54 50 20 45 72 72 6f 72 3a 20 35 hub--signal-error:.HTTP.Error:.5
7e2a0 30 32 2c 0a 20 20 20 20 20 20 20 22 42 61 64 20 67 61 74 65 77 61 79 22 2c 20 22 2f 67 72 61 70 02,........"Bad.gateway",."/grap
7e2c0 68 71 6c 22 2c 0a 20 20 20 20 20 20 20 28 28 64 61 74 61 20 2e 20 22 6e 75 6c 6c 22 29 0a 20 20 hql",........((data..."null")...
7e2e0 20 20 20 20 20 20 28 65 72 72 6f 72 73 20 28 28 6d 65 73 73 61 67 65 20 2e 20 22 53 6f 6d 65 74 ......(errors.((message..."Somet
7e300 68 69 6e 67 20 77 65 6e 74 20 77 72 6f 6e 67 20 77 68 69 6c 65 20 65 78 65 63 75 74 69 6e 67 20 hing.went.wrong.while.executing.
7e320 79 6f 75 72 20 71 75 65 72 79 2e 0a 20 20 20 20 20 20 20 20 20 20 20 54 68 69 73 20 6d 61 79 20 your.query.............This.may.
7e340 62 65 20 74 68 65 20 72 65 73 75 6c 74 20 6f 66 20 61 20 74 69 6d 65 6f 75 74 2c 20 6f 72 20 69 be.the.result.of.a.timeout,.or.i
7e360 74 20 63 6f 75 6c 64 20 62 65 20 61 20 47 69 74 48 75 62 20 62 75 67 2e 0a 20 20 20 20 20 20 20 t.could.be.a.GitHub.bug.........
7e380 20 20 20 20 50 6c 65 61 73 65 20 69 6e 63 6c 75 64 65 20 60 43 43 32 43 3a 34 46 45 41 3a 41 31 ....Please.include.`CC2C:4FEA:A1
7e3a0 37 37 31 43 31 3a 43 42 46 34 30 43 45 3a 35 43 33 33 46 37 45 35 60 0a 20 20 20 20 20 20 20 20 771C1:CBF40CE:5C33F7E5`.........
7e3c0 20 20 20 77 68 65 6e 20 72 65 70 6f 72 74 69 6e 67 20 74 68 69 73 20 69 73 73 75 65 2e 22 29 29 ...when.reporting.this.issue."))
7e3e0 29 29 0a 0a 20 20 20 54 68 69 73 20 69 6e 64 69 63 61 74 65 73 20 74 68 61 74 20 73 6f 6d 65 74 )).....This.indicates.that.somet
7e400 68 69 6e 67 20 77 65 6e 74 20 77 72 6f 6e 67 20 77 69 74 68 69 6e 20 47 69 74 68 75 62 e2 80 99 hing.went.wrong.within.Github...
7e420 73 20 6e 65 74 77 6f 72 6b 2e 0a 55 6e 66 6f 72 74 75 6e 61 74 65 6c 79 20 74 68 65 20 72 65 61 s.network..Unfortunately.the.rea
7e440 73 6f 6e 20 67 69 76 65 6e 20 69 73 20 72 61 74 68 65 72 20 76 61 67 75 65 2c 20 62 75 74 20 49 son.given.is.rather.vague,.but.I
7e460 20 62 65 6c 69 65 76 65 20 74 68 69 73 0a 75 73 75 61 6c 6c 79 20 68 61 70 70 65 6e 73 20 77 68 .believe.this.usually.happens.wh
7e480 65 6e 20 74 68 65 72 65 20 61 72 65 20 74 6f 70 69 63 73 20 77 69 74 68 20 6f 6e 65 20 6f 72 20 en.there.are.topics.with.one.or.
7e4a0 74 77 6f 20 6d 61 67 6e 69 74 75 64 65 73 20 6d 6f 72 65 0a 70 6f 73 74 73 20 74 68 61 6e 20 75 two.magnitudes.more.posts.than.u
7e4c0 73 75 61 6c 2c 20 77 68 69 63 68 20 63 61 6e 20 63 61 75 73 65 20 47 72 61 70 68 51 4c 20 72 65 sual,.which.can.cause.GraphQL.re
7e4e0 73 70 6f 6e 73 65 73 20 74 6f 20 62 65 63 6f 6d 65 20 68 75 67 65 2e 0a 0a 20 20 20 54 68 69 73 sponses.to.become.huge......This
7e500 20 63 61 6e 20 62 65 20 63 6f 75 6e 74 65 72 65 64 20 69 6e 20 74 68 65 20 61 66 66 65 63 74 65 .can.be.countered.in.the.affecte
7e520 64 20 72 65 70 6f 73 69 74 6f 72 79 20 62 79 20 73 65 74 74 69 6e 67 20 74 68 65 20 47 69 74 0a d.repository.by.setting.the.Git.
7e540 76 61 72 69 61 62 6c 65 20 e2 80 98 66 6f 72 67 65 2e 67 72 61 70 68 71 6c 49 74 65 6d 4c 69 6d variable....forge.graphqlItemLim
7e560 69 74 e2 80 99 3a 0a 0a 20 20 20 20 20 67 69 74 20 63 6f 6e 66 69 67 20 2d 2d 6c 6f 63 61 6c 20 it...:.......git.config.--local.
7e580 66 6f 72 67 65 2e 67 72 61 70 68 71 6c 49 74 65 6d 4c 69 6d 69 74 20 32 30 0a 0a 20 20 20 54 68 forge.graphqlItemLimit.20.....Th
7e5a0 65 20 64 65 66 61 75 6c 74 20 69 73 20 73 70 65 63 69 66 69 65 64 20 75 73 69 6e 67 20 74 68 65 e.default.is.specified.using.the
7e5c0 20 e2 80 98 67 68 75 62 2d 67 72 61 70 68 71 6c 2d 69 74 65 6d 73 2d 70 65 72 2d 72 65 71 75 65 ....ghub-graphql-items-per-reque
7e5e0 73 74 e2 80 99 2c 0a 77 68 69 63 68 20 64 65 66 61 75 6c 74 73 20 74 6f 20 35 30 20 28 64 6f 77 st...,.which.defaults.to.50.(dow
7e600 6e 20 66 72 6f 6d 20 47 69 74 68 75 62 e2 80 99 73 20 64 65 66 61 75 6c 74 20 61 6e 64 20 6d 61 n.from.Github...s.default.and.ma
7e620 78 69 6d 75 6d 20 6f 66 20 31 30 30 29 2e 0a 0a 20 20 20 46 65 74 63 68 69 6e 67 20 6c 65 73 73 ximum.of.100)......Fetching.less
7e640 20 69 74 65 6d 73 20 70 65 72 20 72 65 71 75 65 73 74 20 72 65 73 75 6c 74 73 20 69 6e 20 6d 6f .items.per.request.results.in.mo
7e660 72 65 20 72 65 71 75 65 73 74 73 2c 20 77 68 69 63 68 20 73 6c 6f 77 73 0a 64 6f 77 6e 20 74 68 re.requests,.which.slows.down.th
7e680 65 20 70 72 6f 63 65 73 73 2c 20 77 68 69 63 68 20 69 73 20 77 68 79 20 74 68 65 20 64 65 66 61 e.process,.which.is.why.the.defa
7e6a0 75 6c 74 20 73 68 6f 75 6c 64 20 6e 6f 74 20 62 65 20 74 6f 6f 20 73 6d 61 6c 6c 2c 20 62 75 74 ult.should.not.be.too.small,.but
7e6c0 0a 66 6f 72 20 73 6f 6d 65 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 61 20 6d 6f 72 65 20 61 67 .for.some.repositories.a.more.ag
7e6e0 67 72 65 73 73 69 76 65 20 6c 69 6d 69 74 20 69 73 20 6e 65 65 64 65 64 2e 0a 0a 1f 0a 46 69 6c gressive.limit.is.needed.....Fil
7e700 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 4b 65 79 73 74 72 6f 6b 65 20 e:.forge.info,..Node:.Keystroke.
7e720 49 6e 64 65 78 2c 20 20 4e 65 78 74 3a 20 46 75 6e 63 74 69 6f 6e 20 61 6e 64 20 43 6f 6d 6d 61 Index,..Next:.Function.and.Comma
7e740 6e 64 20 49 6e 64 65 78 2c 20 20 50 72 65 76 3a 20 46 41 51 2c 20 20 55 70 3a 20 54 6f 70 0a 0a nd.Index,..Prev:.FAQ,..Up:.Top..
7e760 41 70 70 65 6e 64 69 78 20 44 20 4b 65 79 73 74 72 6f 6b 65 20 49 6e 64 65 78 0a 2a 2a 2a 2a 2a Appendix.D.Keystroke.Index.*****
7e780 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 00 08 5b 69 6e 64 65 78 00 *********************....[index.
7e7a0 08 5d 0a 2a 20 4d 65 6e 75 3a 0a 0a 2a 20 62 20 46 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .].*.Menu:..*.b.F:..............
7e7c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 72 61 6e 63 68 69 6e 67 2e 20 .....................Branching..
7e7e0 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 31 33 29 0a 2a 20 62 20 66 3a 20 20 20 20 20 ..........(line..13).*.b.f:.....
7e800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 72 ..............................Br
7e820 61 6e 63 68 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 39 31 29 0a 2a 20 anching............(line..91).*.
7e840 43 2d 3c 72 65 74 75 72 6e 3e 20 5b 6f 6e 20 61 20 74 6f 70 69 63 20 73 65 63 74 69 6f 6e 5d 3a C-<return>.[on.a.topic.section]:
7e860 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 20 28 6c 69 6e .......Editing.Topics.......(lin
7e880 65 20 20 32 36 29 0a 2a 20 43 2d 63 20 43 2d 63 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e..26).*.C-c.C-c:...............
7e8a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 ................Creating.Topics.
7e8c0 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 and.Posts.......................
7e8e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7e900 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 33 37 29 0a 2a 20 43 2d 63 20 43 2d 63 20 5b 69 .........(line..37).*.C-c.C-c.[i
7e920 6e 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 6c 69 73 74 20 62 75 66 66 65 72 5d 3a 20 4c 69 n.notifications.list.buffer]:.Li
7e940 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 28 6c 69 6e 65 20 20 39 37 29 0a 2a 20 43 sts.and.Menus.....(line..97).*.C
7e960 2d 63 20 43 2d 63 20 5b 69 6e 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 6c 69 73 74 20 62 75 66 -c.C-c.[in.repositories.list.buf
7e980 66 65 72 5d 3a 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 fer]:.Lists.and.Menus......(line
7e9a0 20 31 30 39 29 0a 2a 20 43 2d 63 20 43 2d 63 20 5b 69 6e 20 74 6f 70 69 63 73 20 6c 69 73 74 20 .109).*.C-c.C-c.[in.topics.list.
7e9c0 62 75 66 66 65 72 2f 73 65 63 74 69 6f 6e 5d 3a 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 buffer/section]:.Lists.and.Menus
7e9e0 2e 20 20 20 28 6c 69 6e 65 20 20 35 33 29 0a 2a 20 43 2d 63 20 43 2d 65 3a 20 20 20 20 20 20 20 ....(line..53).*.C-c.C-e:.......
7ea00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 72 65 61 74 69 6e 67 ........................Creating
7ea20 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .Topics.and.Posts...............
7ea40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7ea60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 35 29 0a 2a 20 43 2d .................(line..45).*.C-
7ea80 63 20 43 2d 65 20 64 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c.C-e.d:........................
7eaa0 20 20 20 20 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a .....Creating.Topics.and.Posts..
7eac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7eae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c ..............................(l
7eb00 69 6e 65 20 20 35 30 29 0a 2a 20 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 61 20 70 6f 73 74 20 73 65 ine..50).*.C-c.C-e.[on.a.post.se
7eb20 63 74 69 6f 6e 5d 3a 20 20 20 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 ction]:...........Editing.Topics
7eb40 2e 20 20 20 20 20 20 28 6c 69 6e 65 20 20 31 32 29 0a 2a 20 43 2d 63 20 43 2d 6b 3a 20 20 20 20 .......(line..12).*.C-c.C-k:....
7eb60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 72 65 61 74 ...........................Creat
7eb80 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 ing.Topics.and.Posts............
7eba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7ebc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 31 29 0a 2a ....................(line..41).*
7ebe0 20 43 2d 63 20 43 2d 6b 20 5b 6f 6e 20 61 20 70 6f 73 74 20 73 65 63 74 69 6f 6e 5d 3a 20 20 20 .C-c.C-k.[on.a.post.section]:...
7ec00 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 20 28 6c 69 ........Editing.Topics.......(li
7ec20 6e 65 20 20 32 30 29 0a 2a 20 43 2d 63 20 43 2d 6e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ne..20).*.C-c.C-n:..............
7ec40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 .................Creating.Topics
7ec60 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .and.Posts......................
7ec80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7eca0 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 37 29 0a 2a 20 43 2d 63 20 43 2d 6e 20 5b ..........(line..27).*.C-c.C-n.[
7ecc0 6f 6e 20 22 49 73 73 75 65 73 22 20 73 65 63 74 69 6f 6e 5d 3a 20 20 20 20 20 20 20 20 20 43 72 on."Issues".section]:.........Cr
7ece0 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 20 20 20 20 20 eating.Topics.and.Posts.........
7ed00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7ed20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 33 .......................(line..23
7ed40 29 0a 2a 20 43 2d 63 20 43 2d 6e 20 5b 6f 6e 20 22 50 75 6c 6c 20 72 65 71 75 65 73 74 73 22 20 ).*.C-c.C-n.[on."Pull.requests".
7ed60 73 65 63 74 69 6f 6e 5d 3a 20 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 section]:..Creating.Topics.and.P
7ed80 6f 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 osts............................
7eda0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7edc0 20 20 20 20 28 6c 69 6e 65 20 20 31 39 29 0a 2a 20 43 2d 63 20 43 2d 6f 3a 20 20 20 20 20 20 20 ....(line..19).*.C-c.C-o:.......
7ede0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 ........................Visiting
7ee00 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 34 31 29 0a 2a 20 43 2d 63 20 43 2d .Topics......(line..41).*.C-c.C-
7ee20 72 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r:..............................
7ee40 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 20 20 .Creating.Topics.and.Posts......
7ee60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7ee80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 ..........................(line.
7eea0 20 32 37 29 0a 2a 20 43 2d 63 20 43 2d 77 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .27).*.C-c.C-w:.................
7eec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d ..............Miscellaneous.Comm
7eee0 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ands............................
7ef00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7ef20 20 20 20 20 28 6c 69 6e 65 20 20 33 37 29 0a 2a 20 66 20 6e 3a 20 20 20 20 20 20 20 20 20 20 20 ....(line..37).*.f.n:...........
7ef40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 65 74 74 69 6e 67 20 ........................Getting.
7ef60 53 74 61 72 74 65 64 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 33 32 29 0a 2a 20 66 20 6e 20 3c 31 Started......(line..32).*.f.n.<1
7ef80 3e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 >:..............................
7efa0 20 50 75 6c 6c 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 33 29 .Pulling..............(line..23)
7efc0 0a 2a 20 66 20 4e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .*.f.N:.........................
7efe0 20 20 20 20 20 20 20 20 20 20 50 75 6c 6c 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ..........Pulling..............(
7f000 6c 69 6e 65 20 20 33 34 29 0a 2a 20 4d 20 62 20 72 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 line..34).*.M.b.r:..............
7f020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 ...................Miscellaneous
7f040 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .Commands.......................
7f060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7f080 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 35 29 0a 2a 20 6d 20 4d 20 5b 69 66 20 65 6e .........(line..45).*.m.M.[if.en
7f0a0 61 62 6c 65 64 5d 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 abled]:......................Mis
7f0c0 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 cellaneous.Commands.............
7f0e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7f100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 20 38 29 0a 2a 20 ...................(line...8).*.
7f120 4e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 N:..............................
7f140 20 20 20 20 20 20 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 2e 20 20 20 20 20 28 6c 69 6e .......Getting.Started......(lin
7f160 65 20 20 35 30 29 0a 2a 20 4e 20 3c 31 3e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e..50).*.N.<1>:.................
7f180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e ................Lists.and.Menus.
7f1a0 20 20 20 20 20 28 6c 69 6e 65 20 20 34 30 29 0a 2a 20 4e 20 2d 20 48 3a 20 20 20 20 20 20 20 20 .....(line..40).*.N.-.H:........
7f1c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c .........................Miscell
7f1e0 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 aneous.Commands.................
7f200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7f220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 39 29 0a 2a 20 4e 20 2d 20 ...............(line..29).*.N.-.
7f240 53 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 S:..............................
7f260 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 ...Miscellaneous.Commands.......
7f280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7f2a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 .........................(line..
7f2c0 33 33 29 0a 2a 20 4e 20 2f 20 61 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 33).*.N./.a:....................
7f2e0 20 20 20 20 20 20 20 20 20 20 20 20 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 2e 20 20 20 .............Getting.Started....
7f300 20 20 28 6c 69 6e 65 20 20 31 35 29 0a 2a 20 4e 20 62 20 69 3a 20 20 20 20 20 20 20 20 20 20 20 ..(line..15).*.N.b.i:...........
7f320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 ......................Visiting.T
7f340 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 35 33 29 0a 2a 20 4e 20 62 20 49 3a 20 20 opics......(line..53).*.N.b.I:..
7f360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 ...............................V
7f380 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 35 33 29 0a 2a isiting.Topics......(line..53).*
7f3a0 20 4e 20 62 20 70 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .N.b.p:.........................
7f3c0 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 ........Visiting.Topics......(li
7f3e0 6e 65 20 20 35 33 29 0a 2a 20 4e 20 62 20 50 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ne..53).*.N.b.P:................
7f400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 .................Visiting.Topics
7f420 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 35 33 29 0a 2a 20 4e 20 62 20 72 3a 20 20 20 20 20 20 20 ......(line..53).*.N.b.r:.......
7f440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 ..........................Visiti
7f460 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 35 33 29 0a 2a 20 4e 20 62 20 ng.Topics......(line..53).*.N.b.
7f480 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t:..............................
7f4a0 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 35 ...Visiting.Topics......(line..5
7f4c0 33 29 0a 2a 20 4e 20 63 20 66 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3).*.N.c.f:.....................
7f4e0 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e ............Miscellaneous.Comman
7f500 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ds..............................
7f520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7f540 20 20 28 6c 69 6e 65 20 20 32 31 29 0a 2a 20 4e 20 63 20 69 3a 20 20 20 20 20 20 20 20 20 20 20 ..(line..21).*.N.c.i:...........
7f560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 72 65 61 74 69 6e 67 20 54 ......................Creating.T
7f580 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 opics.and.Posts.................
7f5a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7f5c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 33 29 0a 2a 20 4e 20 63 20 ...............(line..23).*.N.c.
7f5e0 70 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 p:..............................
7f600 20 20 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 ...Creating.Topics.and.Posts....
7f620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7f640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e ............................(lin
7f660 65 20 20 31 39 29 0a 2a 20 4e 20 66 20 66 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e..19).*.N.f.f:.................
7f680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 2e ................Getting.Started.
7f6a0 20 20 20 20 20 28 6c 69 6e 65 20 20 33 32 29 0a 2a 20 4e 20 66 20 66 20 3c 31 3e 3a 20 20 20 20 .....(line..32).*.N.f.f.<1>:....
7f6c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 75 6c 6c 69 6e 67 .........................Pulling
7f6e0 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 33 29 0a 2a 20 4e 20 66 20 6e ..............(line..23).*.N.f.n
7f700 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :...............................
7f720 20 20 50 75 6c 6c 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 33 34 ..Pulling..............(line..34
7f740 29 0a 2a 20 4e 20 66 20 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ).*.N.f.t:......................
7f760 20 20 20 20 20 20 20 20 20 20 20 50 75 6c 6c 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 ...........Pulling..............
7f780 28 6c 69 6e 65 20 20 34 33 29 0a 2a 20 4e 20 6c 20 67 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 (line..43).*.N.l.g:.............
7f7a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 ....................Lists.and.Me
7f7c0 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 37 38 29 0a 2a 20 4e 20 6c 20 6e 3a 20 20 20 20 nus......(line..78).*.N.l.n:....
7f7e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 .............................Lis
7f800 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 31 30 31 29 0a 2a 20 4e ts.and.Menus......(line.101).*.N
7f820 20 6c 20 72 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .l.r:...........................
7f840 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 ......Lists.and.Menus......(line
7f860 20 31 31 33 29 0a 2a 20 4e 20 6c 20 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .113).*.N.l.t:..................
7f880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 ...............Lists.and.Menus..
7f8a0 20 20 20 20 28 6c 69 6e 65 20 20 36 30 29 0a 2a 20 4e 20 4d 3a 20 20 20 20 20 20 20 20 20 20 20 ....(line..60).*.N.M:...........
7f8c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 ........................Miscella
7f8e0 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 neous.Commands..................
7f900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7f920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 20 38 29 0a 2a 20 4e 20 6d 20 63 ..............(line...8).*.N.m.c
7f940 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :...............................
7f960 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 34 35 ..Lists.and.Menus......(line..45
7f980 29 0a 2a 20 4e 20 6d 20 66 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ).*.N.m.f:......................
7f9a0 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 ...........Lists.and.Menus......
7f9c0 28 6c 69 6e 65 20 20 35 33 29 0a 2a 20 4e 20 6d 20 6e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 (line..53).*.N.m.n:.............
7f9e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 ....................Lists.and.Me
7fa00 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 39 37 29 0a 2a 20 4e 20 6d 20 72 3a 20 20 20 20 nus......(line..97).*.N.m.r:....
7fa20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 .............................Lis
7fa40 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 31 30 39 29 0a 2a 20 4e ts.and.Menus......(line.109).*.N
7fa60 20 6d 20 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .m.s:...........................
7fa80 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 20 28 6c 69 6e 65 ......Editing.Topics.......(line
7faa0 20 20 32 36 29 0a 2a 20 4e 20 72 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..26).*.N.r:....................
7fac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 6f 77 20 46 6f 72 67 65 20 44 65 74 65 63 74 69 ...............How.Forge.Detecti
7fae0 6f 6e 20 57 6f 72 6b 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 on.Works........................
7fb00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7fb20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 38 33 29 0a 2a 20 4e 20 76 20 69 3a 20 20 20 20 20 ........(line..83).*.N.v.i:.....
7fb40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 ............................Visi
7fb60 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 32 38 29 0a 2a 20 4e 20 ting.Topics......(line..28).*.N.
7fb80 76 20 70 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 v.p:............................
7fba0 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 .....Visiting.Topics......(line.
7fbc0 20 32 38 29 0a 2a 20 4e 20 76 20 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .28).*.N.v.t:...................
7fbe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 ..............Visiting.Topics...
7fc00 20 20 20 28 6c 69 6e 65 20 20 32 38 29 0a 2a 20 4e 20 76 20 75 3a 20 20 20 20 20 20 20 20 20 20 ...(line..28).*.N.v.u:..........
7fc20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 .......................Visiting.
7fc40 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 33 32 29 0a 2a 20 6f 20 5b 69 6e 20 66 Topics......(line..32).*.o.[in.f
7fc60 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e 75 5d 3a 20 20 20 20 20 20 20 20 orge-repositories-menu]:........
7fc80 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 31 32 30 29 0a Lists.and.Menus......(line.120).
7fca0 2a 20 6f 20 5b 6f 6e 20 72 65 70 6f 73 69 74 6f 72 79 20 69 6e 20 72 65 70 6f 73 69 74 6f 72 79 *.o.[on.repository.in.repository
7fcc0 20 6c 69 73 74 5d 3a 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c .list]:..Visiting.Topics......(l
7fce0 69 6e 65 20 20 34 31 29 0a 2a 20 6f 20 5b 6f 6e 20 74 6f 70 69 63 20 69 6e 20 74 6f 70 69 63 20 ine..41).*.o.[on.topic.in.topic.
7fd00 6c 69 73 74 5d 3a 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 list]:............Visiting.Topic
7fd20 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 34 31 29 0a 2a 20 52 45 54 20 5b 6f 6e 20 22 49 73 73 s......(line..41).*.RET.[on."Iss
7fd40 75 65 73 22 20 73 74 61 74 75 73 20 73 65 63 74 69 6f 6e 5d 3a 20 20 20 20 20 20 4c 69 73 74 73 ues".status.section]:......Lists
7fd60 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 36 36 29 0a 2a 20 52 45 54 .and.Menus......(line..66).*.RET
7fd80 20 5b 6f 6e 20 22 50 75 6c 6c 20 72 65 71 75 65 73 74 73 22 20 73 74 61 74 75 73 20 73 65 63 74 .[on."Pull.requests".status.sect
7fda0 69 6f 6e 5d 3a 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 28 6c 69 6e 65 20 20 ion]:.Lists.and.Menus....(line..
7fdc0 37 32 29 0a 2a 20 52 45 54 20 5b 6f 6e 20 72 65 70 6f 73 69 74 6f 72 79 5d 3a 20 20 20 20 20 20 72).*.RET.[on.repository]:......
7fde0 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 .............Lists.and.Menus....
7fe00 20 20 28 6c 69 6e 65 20 31 31 37 29 0a 2a 20 52 45 54 20 5b 6f 6e 20 74 6f 70 69 63 5d 3a 20 20 ..(line.117).*.RET.[on.topic]:..
7fe20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 ......................Visiting.T
7fe40 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 32 31 29 0a 2a 20 5a 20 6e 3a 20 20 20 20 opics......(line..21).*.Z.n:....
7fe60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 ...............................B
7fe80 72 61 6e 63 68 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 39 36 29 0a 0a ranching............(line..96)..
7fea0 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 46 75 6e 63 74 ..File:.forge.info,..Node:.Funct
7fec0 69 6f 6e 20 61 6e 64 20 43 6f 6d 6d 61 6e 64 20 49 6e 64 65 78 2c 20 20 4e 65 78 74 3a 20 56 61 ion.and.Command.Index,..Next:.Va
7fee0 72 69 61 62 6c 65 20 49 6e 64 65 78 2c 20 20 50 72 65 76 3a 20 4b 65 79 73 74 72 6f 6b 65 20 49 riable.Index,..Prev:.Keystroke.I
7ff00 6e 64 65 78 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 41 70 70 65 6e 64 69 78 20 45 20 46 75 6e 63 74 ndex,..Up:.Top..Appendix.E.Funct
7ff20 69 6f 6e 20 61 6e 64 20 43 6f 6d 6d 61 6e 64 20 49 6e 64 65 78 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ion.and.Command.Index.**********
7ff40 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 00 08 5b ***************************....[
7ff60 69 6e 64 65 78 00 08 5d 0a 2a 20 4d 65 6e 75 3a 0a 0a 2a 20 66 6f 72 67 65 2d 61 64 64 2d 6f 72 index..].*.Menu:..*.forge-add-or
7ff80 67 61 6e 69 7a 61 74 69 6f 6e 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 3a 20 20 20 4d 69 73 63 65 ganization-repositories:...Misce
7ffa0 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 llaneous.Commands...............
7ffc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7ffe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 36 34 29 0a 2a 20 66 6f .................(line..64).*.fo
80000 72 67 65 2d 61 64 64 2d 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 3a 20 20 20 20 20 20 20 20 rge-add-pullreq-refspec:........
80020 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 .....Miscellaneous.Commands.....
80040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
80060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 ...........................(line
80080 20 20 35 31 29 0a 2a 20 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 3a 20 20 20 ..51).*.forge-add-repository:...
800a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 2e 20 ...............Getting.Started..
800c0 20 20 20 20 28 6c 69 6e 65 20 20 31 35 29 0a 2a 20 66 6f 72 67 65 2d 61 64 64 2d 75 73 65 72 2d ....(line..15).*.forge-add-user-
800e0 72 65 70 6f 73 69 74 6f 72 69 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 repositories:...........Miscella
80100 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 neous.Commands..................
80120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
80140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 35 38 29 0a 2a 20 66 6f 72 67 65 ..............(line..58).*.forge
80160 2d 62 72 61 6e 63 68 2d 70 75 6c 6c 72 65 71 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -branch-pullreq:................
80180 20 20 42 72 61 6e 63 68 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 31 33 ..Branching............(line..13
801a0 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ).*.forge-browse:...............
801c0 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 ...........Visiting.Topics......
801e0 28 6c 69 6e 65 20 20 34 31 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 62 72 61 6e 63 68 (line..41).*.forge-browse-branch
80200 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 :...................Visiting.Top
80220 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 34 35 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 ics......(line..45).*.forge-brow
80240 73 65 2d 63 6f 6d 6d 69 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 se-commit:...................Vis
80260 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 34 34 29 0a 2a 20 66 iting.Topics......(line..44).*.f
80280 6f 72 67 65 2d 62 72 6f 77 73 65 2d 63 6f 6d 6d 69 74 20 3c 31 3e 3a 20 20 20 20 20 20 20 20 20 orge-browse-commit.<1>:.........
802a0 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 ......Visiting.Topics......(line
802c0 20 20 35 36 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 73 75 65 3a 20 20 20 20 20 ..56).*.forge-browse-issue:.....
802e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 ...............Visiting.Topics..
80300 20 20 20 20 28 6c 69 6e 65 20 20 35 33 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 ....(line..53).*.forge-browse-is
80320 73 75 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 sues:...................Visiting
80340 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 35 33 29 0a 2a 20 66 6f 72 67 65 2d .Topics......(line..53).*.forge-
80360 62 72 6f 77 73 65 2d 70 75 6c 6c 72 65 71 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 browse-pullreq:.................
80380 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 35 33 29 .Visiting.Topics......(line..53)
803a0 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 70 75 6c 6c 72 65 71 73 3a 20 20 20 20 20 20 20 .*.forge-browse-pullreqs:.......
803c0 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 ..........Visiting.Topics......(
803e0 6c 69 6e 65 20 20 35 33 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 72 65 6d 6f 74 65 3a line..53).*.forge-browse-remote:
80400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 ...................Visiting.Topi
80420 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 35 33 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 cs......(line..53).*.forge-brows
80440 65 2d 72 65 70 6f 73 69 74 6f 72 79 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 e-repository:...............Visi
80460 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 34 36 29 0a 2a 20 66 6f ting.Topics......(line..46).*.fo
80480 72 67 65 2d 62 72 6f 77 73 65 2d 74 68 69 73 2d 72 65 70 6f 73 69 74 6f 72 79 3a 20 20 20 20 20 rge-browse-this-repository:.....
804a0 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 .....Visiting.Topics......(line.
804c0 20 34 31 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 68 69 73 2d 74 6f 70 69 63 3a 20 .41).*.forge-browse-this-topic:.
804e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 ..............Visiting.Topics...
80500 20 20 20 28 6c 69 6e 65 20 20 34 31 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 6f 70 ...(line..41).*.forge-browse-top
80520 69 63 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 ic:....................Visiting.
80540 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 35 33 29 0a 2a 20 66 6f 72 67 65 2d 63 Topics......(line..53).*.forge-c
80560 68 65 63 6b 6f 75 74 2d 70 75 6c 6c 72 65 71 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 heckout-pullreq:................
80580 42 72 61 6e 63 68 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 39 31 29 0a Branching............(line..91).
805a0 2a 20 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 77 6f 72 6b 74 72 65 65 3a 20 20 20 20 20 20 *.forge-checkout-worktree:......
805c0 20 20 20 20 20 20 20 20 20 42 72 61 6e 63 68 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 28 6c .........Branching............(l
805e0 69 6e 65 20 20 39 36 29 0a 2a 20 66 6f 72 67 65 2d 63 6f 6e 66 69 67 75 72 65 3a 20 20 20 20 20 ine..96).*.forge-configure:.....
80600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 ..................Lists.and.Menu
80620 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 34 35 29 0a 2a 20 66 6f 72 67 65 2d 63 6f 70 79 2d 75 s......(line..45).*.forge-copy-u
80640 72 6c 2d 61 74 2d 70 6f 69 6e 74 2d 61 73 2d 6b 69 6c 6c 3a 20 20 20 20 20 20 20 4d 69 73 63 65 rl-at-point-as-kill:.......Misce
80660 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 llaneous.Commands...............
80680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
806a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 33 37 29 0a 2a 20 66 6f .................(line..37).*.fo
806c0 72 67 65 2d 63 72 65 61 74 65 2d 69 73 73 75 65 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rge-create-issue:...............
806e0 20 20 20 20 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a .....Creating.Topics.and.Posts..
80700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
80720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c ..............................(l
80740 69 6e 65 20 20 32 33 29 0a 2a 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 6f 73 74 3a 20 20 20 ine..23).*.forge-create-post:...
80760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 ..................Creating.Topic
80780 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s.and.Posts.....................
807a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
807c0 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 37 29 0a 2a 20 66 6f 72 67 65 2d 63 72 ...........(line..27).*.forge-cr
807e0 65 61 74 65 2d 70 75 6c 6c 72 65 71 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 eate-pullreq:..................C
80800 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 20 20 20 20 reating.Topics.and.Posts........
80820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
80840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 31 ........................(line..1
80860 39 29 0a 2a 20 66 6f 72 67 65 2d 64 65 6c 65 74 65 2d 63 6f 6d 6d 65 6e 74 3a 20 20 20 20 20 20 9).*.forge-delete-comment:......
80880 20 20 20 20 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 ............Editing.Topics......
808a0 20 28 6c 69 6e 65 20 20 32 30 29 0a 2a 20 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 3a 20 20 20 .(line..20).*.forge-dispatch:...
808c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 65 74 74 69 6e 67 20 53 74 61 .....................Getting.Sta
808e0 72 74 65 64 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 35 30 29 0a 2a 20 66 6f 72 67 65 2d 64 69 73 rted......(line..50).*.forge-dis
80900 70 61 74 63 68 20 3c 31 3e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 patch.<1>:....................Li
80920 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 34 30 29 0a 2a 20 sts.and.Menus......(line..40).*.
80940 66 6f 72 67 65 2d 65 64 69 74 2d 70 6f 73 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 forge-edit-post:................
80960 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 20 28 6c 69 6e .......Editing.Topics.......(lin
80980 65 20 20 31 32 29 0a 2a 20 66 6f 72 67 65 2d 66 6f 72 67 65 2e 72 65 6d 6f 74 65 3a 20 20 20 20 e..12).*.forge-forge.remote:....
809a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 6f 77 20 46 6f 72 67 65 20 44 65 74 65 63 74 ................How.Forge.Detect
809c0 69 6f 6e 20 57 6f 72 6b 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ion.Works.......................
809e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
80a00 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 38 33 29 0a 2a 20 66 6f 72 67 65 2d 66 6f 72 6b .........(line..83).*.forge-fork
80a20 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 :............................Mis
80a40 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 cellaneous.Commands.............
80a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
80a80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 31 29 0a 2a 20 ...................(line..21).*.
80aa0 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 64 69 73 63 75 73 73 69 6f 6e 73 3a 20 20 20 20 20 20 20 forge-insert-discussions:.......
80ac0 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e .......Lists.and.Menus......(lin
80ae0 65 20 31 38 34 29 0a 2a 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 69 73 73 75 65 73 3a 20 20 20 e.184).*.forge-insert-issues:...
80b00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e ................Lists.and.Menus.
80b20 20 20 20 20 20 28 6c 69 6e 65 20 31 38 38 29 0a 2a 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 70 .....(line.188).*.forge-insert-p
80b40 75 6c 6c 72 65 71 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 ullreqs:.................Lists.a
80b60 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 31 39 32 29 0a 2a 20 66 6f 72 67 65 nd.Menus......(line.192).*.forge
80b80 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 2d 69 73 73 75 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 -list-global-issues:............
80ba0 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 38 32 ..Lists.and.Menus......(line..82
80bc0 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 2d 70 75 6c 6c 72 65 71 73 3a 20 ).*.forge-list-global-pullreqs:.
80be0 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 ...........Lists.and.Menus......
80c00 28 6c 69 6e 65 20 20 38 37 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 2d 74 (line..87).*.forge-list-global-t
80c20 6f 70 69 63 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 opics:..............Lists.and.Me
80c40 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 37 38 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 nus......(line..78).*.forge-list
80c60 2d 69 73 73 75 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 -issues:.....................Lis
80c80 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 36 36 29 0a 2a 20 66 ts.and.Menus......(line..66).*.f
80ca0 6f 72 67 65 2d 6c 69 73 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 3a 20 20 20 20 20 20 20 20 orge-list-notifications:........
80cc0 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 ......Lists.and.Menus......(line
80ce0 20 31 30 31 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 72 65 70 6f 73 69 74 .101).*.forge-list-owned-reposit
80d00 6f 72 69 65 73 3a 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 ories:.........Lists.and.Menus..
80d20 20 20 20 20 28 6c 69 6e 65 20 31 32 30 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 70 75 6c 6c ....(line.120).*.forge-list-pull
80d40 72 65 71 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e reqs:...................Lists.an
80d60 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 37 32 29 0a 2a 20 66 6f 72 67 65 2d d.Menus......(line..72).*.forge-
80d80 6c 69 73 74 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 list-repositories:..............
80da0 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 31 31 33 29 .Lists.and.Menus......(line.113)
80dc0 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 74 6f 70 69 63 73 3a 20 20 20 20 20 20 20 20 20 20 20 .*.forge-list-topics:...........
80de0 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 ..........Lists.and.Menus......(
80e00 6c 69 6e 65 20 20 36 30 29 0a 2a 20 66 6f 72 67 65 2d 6d 65 72 67 65 3a 20 20 20 20 20 20 20 20 line..60).*.forge-merge:........
80e20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 ...................Miscellaneous
80e40 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .Commands.......................
80e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
80e80 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 20 38 29 0a 2a 20 66 6f 72 67 65 2d 6e 6f 74 69 .........(line...8).*.forge-noti
80ea0 66 69 63 61 74 69 6f 6e 73 2d 6d 65 6e 75 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 fications-menu:..............Lis
80ec0 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 39 37 29 0a 2a 20 66 ts.and.Menus......(line..97).*.f
80ee0 6f 72 67 65 2d 70 6f 73 74 2d 63 61 6e 63 65 6c 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 orge-post-cancel:...............
80f00 20 20 20 20 20 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e ......Creating.Topics.and.Posts.
80f20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
80f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
80f60 6c 69 6e 65 20 20 34 31 29 0a 2a 20 66 6f 72 67 65 2d 70 6f 73 74 2d 64 69 73 70 61 74 63 68 3a line..41).*.forge-post-dispatch:
80f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 ...................Creating.Topi
80fa0 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 cs.and.Posts....................
80fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
80fe0 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 35 29 0a 2a 20 66 6f 72 67 65 2d 70 ............(line..45).*.forge-p
81000 6f 73 74 2d 73 75 62 6d 69 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ost-submit:.....................
81020 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 20 20 20 20 Creating.Topics.and.Posts.......
81040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 .........................(line..
81080 33 37 29 0a 2a 20 66 6f 72 67 65 2d 70 6f 73 74 2d 74 6f 67 67 6c 65 2d 64 72 61 66 74 3a 20 20 37).*.forge-post-toggle-draft:..
810a0 20 20 20 20 20 20 20 20 20 20 20 20 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 .............Creating.Topics.and
810c0 20 50 6f 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .Posts..........................
810e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81100 20 20 20 20 20 20 28 6c 69 6e 65 20 20 35 30 29 0a 2a 20 66 6f 72 67 65 2d 70 75 6c 6c 3a 20 20 ......(line..50).*.forge-pull:..
81120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 65 74 74 69 6e ..........................Gettin
81140 67 20 53 74 61 72 74 65 64 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 33 32 29 0a 2a 20 66 6f 72 67 g.Started......(line..32).*.forg
81160 65 2d 70 75 6c 6c 20 3c 31 3e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-pull.<1>:.....................
81180 20 20 20 50 75 6c 6c 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 ...Pulling..............(line..2
811a0 33 29 0a 2a 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 3a 20 20 3).*.forge-pull-notifications:..
811c0 20 20 20 20 20 20 20 20 20 20 20 20 50 75 6c 6c 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 20 ............Pulling.............
811e0 20 28 6c 69 6e 65 20 20 33 34 29 0a 2a 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 74 6f 70 69 63 3a 20 .(line..34).*.forge-pull-topic:.
81200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 75 6c 6c 69 6e 67 2e 20 20 20 .....................Pulling....
81220 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 33 29 0a 2a 20 66 6f 72 67 65 2d 72 65 6d ..........(line..43).*.forge-rem
81240 6f 76 65 2d 72 65 70 6f 73 69 74 6f 72 79 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 ove-repository:...............Mi
81260 73 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 scellaneous.Commands............
81280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
812a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 37 31 29 0a 2a ....................(line..71).*
812c0 20 66 6f 72 67 65 2d 72 65 6d 6f 76 65 2d 74 6f 70 69 63 2d 6c 6f 63 61 6c 6c 79 3a 20 20 20 20 .forge-remove-topic-locally:....
812e0 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a ........Miscellaneous.Commands..
81300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c ..............................(l
81340 69 6e 65 20 20 37 35 29 0a 2a 20 66 6f 72 67 65 2d 72 65 6e 61 6d 65 2d 64 65 66 61 75 6c 74 2d ine..75).*.forge-rename-default-
81360 62 72 61 6e 63 68 3a 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 branch:...........Miscellaneous.
81380 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Commands........................
813a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
813c0 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 35 29 0a 2a 20 66 6f 72 67 65 2d 72 65 70 6f 73 ........(line..45).*.forge-repos
813e0 69 74 6f 72 69 65 73 2d 6d 65 6e 75 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 itories-menu:...............List
81400 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 31 30 39 29 0a 2a 20 66 6f s.and.Menus......(line.109).*.fo
81420 72 67 65 2d 72 65 73 65 74 2d 64 61 74 61 62 61 73 65 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 rge-reset-database:.............
81440 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 .....Miscellaneous.Commands.....
81460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 ...........................(line
814a0 20 20 39 31 29 0a 2a 20 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 64 69 73 70 6c 61 79 2d 69 6e 2d ..91).*.forge-toggle-display-in-
814c0 73 74 61 74 75 73 2d 62 75 66 66 65 72 3a 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 43 6f 6d status-buffer:.Miscellaneous.Com
814e0 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 mands...........................
81500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81520 20 20 20 20 20 28 6c 69 6e 65 20 20 33 33 29 0a 2a 20 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 74 .....(line..33).*.forge-toggle-t
81540 6f 70 69 63 2d 6c 65 67 65 6e 64 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c opic-legend:.............Miscell
81560 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 aneous.Commands.................
81580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
815a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 39 29 0a 2a 20 66 6f 72 67 ...............(line..29).*.forg
815c0 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-topic-menu:...................
815e0 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 ...Editing.Topics.......(line..2
81600 36 29 0a 2a 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 3a 20 20 20 20 20 20 20 20 20 6).*.forge-topics-menu:.........
81620 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 ............Lists.and.Menus.....
81640 20 28 6c 69 6e 65 20 20 35 33 29 0a 2a 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 69 73 73 75 65 3a .(line..53).*.forge-visit-issue:
81660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f .....................Visiting.To
81680 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 32 38 29 0a 2a 20 66 6f 72 67 65 2d 76 69 73 pics......(line..28).*.forge-vis
816a0 69 74 2d 70 75 6c 6c 72 65 71 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 it-pullreq:...................Vi
816c0 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 32 38 29 0a 2a 20 siting.Topics......(line..28).*.
816e0 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 72 65 70 6f 73 69 74 6f 72 79 3a 20 20 20 20 forge-visit-this-repository:....
81700 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e .......Lists.and.Menus......(lin
81720 65 20 31 31 37 29 0a 2a 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 74 6f 70 69 63 3a e.117).*.forge-visit-this-topic:
81740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e ................Visiting.Topics.
81760 20 20 20 20 20 28 6c 69 6e 65 20 20 32 31 29 0a 2a 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 6f .....(line..21).*.forge-visit-to
81780 70 69 63 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 69 73 69 74 69 6e pic:.....................Visitin
817a0 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 32 38 29 0a 2a 20 66 6f 72 67 65 g.Topics......(line..28).*.forge
817c0 2d 76 69 73 69 74 2d 74 6f 70 69 63 2d 66 72 6f 6d 2d 75 72 6c 3a 20 20 20 20 20 20 20 20 20 20 -visit-topic-from-url:..........
817e0 20 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 33 32 ..Visiting.Topics......(line..32
81800 29 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 56 61 )....File:.forge.info,..Node:.Va
81820 72 69 61 62 6c 65 20 49 6e 64 65 78 2c 20 20 50 72 65 76 3a 20 46 75 6e 63 74 69 6f 6e 20 61 6e riable.Index,..Prev:.Function.an
81840 64 20 43 6f 6d 6d 61 6e 64 20 49 6e 64 65 78 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 41 70 70 65 6e d.Command.Index,..Up:.Top..Appen
81860 64 69 78 20 46 20 56 61 72 69 61 62 6c 65 20 49 6e 64 65 78 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a dix.F.Variable.Index.***********
81880 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 00 08 5b 69 6e 64 65 78 00 08 5d 0a 2a 20 4d 65 **************....[index..].*.Me
818a0 6e 75 3a 0a 0a 2a 20 66 6f 72 67 65 2d 61 6c 69 73 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 nu:..*.forge-alist:.............
818c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 6f 77 20 46 6f 72 67 65 20 44 65 74 65 63 74 69 6f ..............How.Forge.Detectio
818e0 6e 20 57 6f 72 6b 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n.Works.........................
81900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81920 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 39 35 29 0a 2a 20 66 6f 72 67 65 2d 62 75 66 66 65 72 .......(line..95).*.forge-buffer
81940 2d 64 72 61 66 74 2d 70 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 -draft-p:..................Misce
81960 6c 6c 61 6e 65 6f 75 73 20 4f 70 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 llaneous.Options................
81980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
819a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 31 29 0a 2a 20 66 6f 72 ................(line..21).*.for
819c0 67 65 2d 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 68 6f 6f 6b 73 3a 20 20 20 20 20 20 20 20 20 ge-bug-reference-hooks:.........
819e0 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 4f 70 74 69 6f 6e 73 2e 0a 20 20 20 20 20 ....Miscellaneous.Options.......
81a00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81a20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 .........................(line..
81a40 35 38 29 0a 2a 20 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 77 6f 72 6b 74 72 65 65 2d 72 65 58).*.forge-checkout-worktree-re
81a60 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 66 75 6e 63 74 69 6f 6e 3a 20 42 72 61 6e 63 68 69 6e 67 ad-directory-function:.Branching
81a80 2e 20 28 6c 69 6e 65 20 31 30 31 29 0a 2a 20 66 6f 72 67 65 2d 64 61 74 61 62 61 73 65 2d 66 69 ..(line.101).*.forge-database-fi
81aa0 6c 65 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 le:...................Miscellane
81ac0 6f 75 73 20 4f 70 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ous.Options.....................
81ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81b00 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 20 36 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 ...........(line...6).*.forge-li
81b20 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 63 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 4d mit-topic-choices:.............M
81b40 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 4f 70 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 iscellaneous.Options............
81b60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 31 29 0a 2a ....................(line..41).*
81ba0 20 66 6f 72 67 65 2d 6c 69 73 74 2d 62 75 66 66 65 72 2d 64 65 66 61 75 6c 74 2d 74 6f 70 69 63 .forge-list-buffer-default-topic
81bc0 2d 66 69 6c 74 65 72 73 3a 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 28 6c 69 -filters:.Lists.and.Menus....(li
81be0 6e 65 20 31 36 33 29 0a 2a 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e 74 73 3a 20 ne.163).*.forge-owned-accounts:.
81c00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 .................Lists.and.Menus
81c20 2e 20 20 20 20 20 28 6c 69 6e 65 20 31 32 37 29 0a 2a 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 69 ......(line.127).*.forge-owned-i
81c40 67 6e 6f 72 65 64 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 73 20 gnored:...................Lists.
81c60 61 6e 64 20 4d 65 6e 75 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 31 34 30 29 0a 2a 20 66 6f 72 67 and.Menus......(line.140).*.forg
81c80 65 2d 70 6f 73 74 2d 66 69 6c 6c 2d 72 65 67 69 6f 6e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 e-post-fill-region:.............
81ca0 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 4f 70 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 ...Miscellaneous.Options........
81cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81ce0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 35 ........................(line..5
81d00 34 29 0a 2a 20 66 6f 72 67 65 2d 70 6f 73 74 2d 68 65 61 64 69 6e 67 2d 66 6f 72 6d 61 74 3a 20 4).*.forge-post-heading-format:.
81d20 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 4f 70 74 69 6f 6e ............Miscellaneous.Option
81d40 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s...............................
81d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81d80 20 28 6c 69 6e 65 20 20 34 35 29 0a 2a 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c .(line..45).*.forge-repository-l
81da0 69 73 74 2d 63 6f 6c 75 6d 6e 73 3a 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f ist-columns:.........Miscellaneo
81dc0 75 73 20 4f 70 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 us.Options......................
81de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81e00 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 32 38 29 0a 2a 20 66 6f 72 67 65 2d 73 74 61 ..........(line..28).*.forge-sta
81e20 74 75 73 2d 62 75 66 66 65 72 2d 64 65 66 61 75 6c 74 2d 74 6f 70 69 63 2d 66 69 6c 74 65 72 73 tus-buffer-default-topic-filters
81e40 3a 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 2e 20 28 6c 69 6e 65 20 31 36 37 29 0a 2a 20 :.Lists.and.Menus..(line.167).*.
81e60 66 6f 72 67 65 2d 74 6f 70 69 63 2d 72 65 70 6f 73 69 74 6f 72 79 2d 73 6c 75 67 2d 77 69 64 74 forge-topic-repository-slug-widt
81e80 68 3a 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 4f 70 74 69 6f 6e 73 2e 0a 20 20 h:.....Miscellaneous.Options....
81ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e ............................(lin
81ee0 65 20 20 31 37 29 0a 2a 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 77 61 73 68 2d 74 69 74 6c 65 2d e..17).*.forge-topic-wash-title-
81f00 68 6f 6f 6b 3a 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 20 4f 70 hook:...........Miscellaneous.Op
81f20 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tions...........................
81f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81f60 20 20 20 20 20 28 6c 69 6e 65 20 20 20 39 29 0a 2a 20 66 6f 72 67 65 2e 72 65 6d 6f 74 65 3a 20 .....(line...9).*.forge.remote:.
81f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 6f 77 20 46 6f 72 .........................How.For
81fa0 67 65 20 44 65 74 65 63 74 69 6f 6e 20 57 6f 72 6b 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 ge.Detection.Works..............
81fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
81fe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 36 39 29 0a 0a 0a 1f ..................(line..69)....
82000 0a 54 61 67 20 54 61 62 6c 65 3a 0a 4e 6f 64 65 3a 20 54 6f 70 7f 37 37 31 0a 4e 6f 64 65 3a 20 .Tag.Table:.Node:.Top.771.Node:.
82020 49 6e 74 72 6f 64 75 63 74 69 6f 6e 7f 32 35 30 37 0a 4e 6f 64 65 3a 20 49 6e 69 74 69 61 6c 20 Introduction.2507.Node:.Initial.
82040 53 65 74 75 70 7f 32 39 32 38 0a 52 65 66 3a 20 43 6f 6d 6d 6f 6e 20 53 65 74 75 70 7f 33 36 33 Setup.2928.Ref:.Common.Setup.363
82060 33 0a 4e 6f 64 65 3a 20 53 65 74 75 70 20 66 6f 72 20 47 69 74 68 75 62 63 6f 6d 7f 34 32 32 37 3.Node:.Setup.for.Githubcom.4227
82080 0a 52 65 66 3a 20 53 65 74 20 79 6f 75 72 20 55 73 65 72 6e 61 6d 65 7f 34 33 38 38 0a 52 65 66 .Ref:.Set.your.Username.4388.Ref
820a0 3a 20 43 72 65 61 74 65 20 61 6e 64 20 53 74 6f 72 65 20 61 6e 20 41 63 63 65 73 73 20 54 6f 6b :.Create.and.Store.an.Access.Tok
820c0 65 6e 7f 34 37 31 38 0a 4e 6f 64 65 3a 20 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 68 65 72 20 en.4718.Node:.Setup.for.Another.
820e0 47 69 74 68 75 62 20 49 6e 73 74 61 6e 63 65 7f 36 35 38 36 0a 52 65 66 3a 20 54 65 6c 6c 20 46 Github.Instance.6586.Ref:.Tell.F
82100 6f 72 67 65 20 61 62 6f 75 74 20 74 68 65 20 49 6e 73 74 61 6e 63 65 7f 37 31 33 34 0a 52 65 66 orge.about.the.Instance.7134.Ref
82120 3a 20 53 65 74 20 79 6f 75 72 20 55 73 65 72 6e 61 6d 65 20 28 31 29 7f 38 36 38 30 0a 52 65 66 :.Set.your.Username.(1).8680.Ref
82140 3a 20 43 72 65 61 74 65 20 61 6e 64 20 53 74 6f 72 65 20 61 6e 20 41 63 63 65 73 73 20 54 6f 6b :.Create.and.Store.an.Access.Tok
82160 65 6e 20 28 31 29 7f 38 39 38 38 0a 4e 6f 64 65 3a 20 53 65 74 75 70 20 66 6f 72 20 47 69 74 6c en.(1).8988.Node:.Setup.for.Gitl
82180 61 62 63 6f 6d 7f 31 31 30 38 39 0a 52 65 66 3a 20 53 65 74 20 79 6f 75 72 20 55 73 65 72 6e 61 abcom.11089.Ref:.Set.your.Userna
821a0 6d 65 20 28 32 29 7f 31 31 32 39 32 0a 52 65 66 3a 20 43 72 65 61 74 65 20 61 6e 64 20 53 74 6f me.(2).11292.Ref:.Create.and.Sto
821c0 72 65 20 61 6e 20 41 63 63 65 73 73 20 54 6f 6b 65 6e 20 28 32 29 7f 31 31 36 32 32 0a 4e 6f 64 re.an.Access.Token.(2).11622.Nod
821e0 65 3a 20 53 65 74 75 70 20 66 6f 72 20 41 6e 6f 74 68 65 72 20 47 69 74 6c 61 62 20 49 6e 73 74 e:.Setup.for.Another.Gitlab.Inst
82200 61 6e 63 65 7f 31 33 36 35 35 0a 52 65 66 3a 20 54 65 6c 6c 20 46 6f 72 67 65 20 61 62 6f 75 74 ance.13655.Ref:.Tell.Forge.about
82220 20 74 68 65 20 49 6e 73 74 61 6e 63 65 20 28 31 29 7f 31 34 32 31 36 0a 52 65 66 3a 20 53 65 74 .the.Instance.(1).14216.Ref:.Set
82240 20 79 6f 75 72 20 55 73 65 72 6e 61 6d 65 20 28 33 29 7f 31 35 35 35 37 0a 52 65 66 3a 20 43 72 .your.Username.(3).15557.Ref:.Cr
82260 65 61 74 65 20 61 6e 64 20 53 74 6f 72 65 20 61 6e 20 41 63 63 65 73 73 20 54 6f 6b 65 6e 20 28 eate.and.Store.an.Access.Token.(
82280 33 29 7f 31 35 38 36 35 0a 4e 6f 64 65 3a 20 53 65 74 75 70 20 61 20 50 61 72 74 69 61 6c 6c 79 3).15865.Node:.Setup.a.Partially
822a0 20 53 75 70 70 6f 72 74 65 64 20 48 6f 73 74 7f 31 38 35 34 31 0a 52 65 66 3a 20 54 65 6c 6c 20 .Supported.Host.18541.Ref:.Tell.
822c0 46 6f 72 67 65 20 61 62 6f 75 74 20 74 68 65 20 49 6e 73 74 61 6e 63 65 20 28 32 29 7f 31 39 32 Forge.about.the.Instance.(2).192
822e0 32 36 0a 52 65 66 3a 20 41 64 64 20 53 75 70 70 6f 72 74 20 66 6f 72 20 41 64 64 69 74 69 6f 6e 26.Ref:.Add.Support.for.Addition
82300 61 6c 20 46 6f 72 67 65 20 54 79 70 65 73 7f 32 30 37 32 34 0a 4e 6f 64 65 3a 20 49 6e 69 74 69 al.Forge.Types.20724.Node:.Initi
82320 61 6c 20 50 75 6c 6c 7f 32 31 38 39 35 0a 4e 6f 64 65 3a 20 47 65 74 74 69 6e 67 20 53 74 61 72 al.Pull.21895.Node:.Getting.Star
82340 74 65 64 7f 32 33 31 30 32 0a 4e 6f 64 65 3a 20 4c 69 73 74 73 20 61 6e 64 20 4d 65 6e 75 73 7f ted.23102.Node:.Lists.and.Menus.
82360 32 35 33 38 38 0a 52 65 66 3a 20 44 69 73 70 61 74 63 68 20 61 6e 64 20 63 6f 6e 66 69 67 75 72 25388.Ref:.Dispatch.and.configur
82380 61 74 69 6f 6e 20 6d 65 6e 75 73 7f 32 37 32 31 32 0a 52 65 66 3a 20 54 6f 70 69 63 20 6d 65 6e ation.menus.27212.Ref:.Topic.men
823a0 75 20 61 6e 64 20 6c 69 73 74 20 63 6f 6d 6d 61 6e 64 73 7f 32 37 36 37 31 0a 52 65 66 3a 20 4e u.and.list.commands.27671.Ref:.N
823c0 6f 74 69 66 69 63 61 74 69 6f 6e 20 6d 65 6e 75 20 61 6e 64 20 6c 69 73 74 20 63 6f 6d 6d 61 6e otification.menu.and.list.comman
823e0 64 73 7f 32 39 35 38 32 0a 52 65 66 3a 20 52 65 70 6f 73 69 74 6f 72 79 20 6d 65 6e 75 20 61 6e ds.29582.Ref:.Repository.menu.an
82400 64 20 6c 69 73 74 20 63 6f 6d 6d 61 6e 64 73 7f 32 39 39 39 30 0a 52 65 66 3a 20 45 78 69 74 69 d.list.commands.29990.Ref:.Exiti
82420 6e 67 20 6d 65 6e 75 73 20 61 6e 64 20 6c 69 73 74 73 7f 33 31 37 38 37 0a 52 65 66 3a 20 44 65 ng.menus.and.lists.31787.Ref:.De
82440 66 61 75 6c 74 20 74 6f 70 69 63 20 66 69 6c 74 65 72 73 7f 33 32 34 38 32 0a 52 65 66 3a 20 54 fault.topic.filters.32482.Ref:.T
82460 6f 70 69 63 20 73 65 63 74 69 6f 6e 73 20 69 6e 20 4d 61 67 69 74 20 73 74 61 74 75 73 20 62 75 opic.sections.in.Magit.status.bu
82480 66 66 65 72 73 7f 33 32 39 32 30 0a 4e 6f 64 65 3a 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 ffers.32920.Node:.Visiting.Topic
824a0 73 7f 33 34 32 38 39 0a 4e 6f 64 65 3a 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e s.34289.Node:.Creating.Topics.an
824c0 64 20 50 6f 73 74 73 7f 33 37 34 38 34 0a 4e 6f 64 65 3a 20 45 64 69 74 69 6e 67 20 54 6f 70 69 d.Posts.37484.Node:.Editing.Topi
824e0 63 73 7f 33 39 35 36 36 0a 4e 6f 64 65 3a 20 50 75 6c 6c 69 6e 67 7f 34 31 31 39 31 0a 4e 6f 64 cs.39566.Node:.Pulling.41191.Nod
82500 65 3a 20 42 72 61 6e 63 68 69 6e 67 7f 34 33 33 35 33 0a 4e 6f 64 65 3a 20 4d 69 73 63 65 6c 6c e:.Branching.43353.Node:.Miscell
82520 61 6e 65 6f 75 73 20 43 6f 6d 6d 61 6e 64 73 7f 34 39 32 34 38 0a 4e 6f 64 65 3a 20 4d 69 73 63 aneous.Commands.49248.Node:.Misc
82540 65 6c 6c 61 6e 65 6f 75 73 20 4f 70 74 69 6f 6e 73 7f 35 33 32 31 32 0a 4e 6f 64 65 3a 20 48 6f ellaneous.Options.53212.Node:.Ho
82560 77 20 46 6f 72 67 65 20 44 65 74 65 63 74 69 6f 6e 20 57 6f 72 6b 73 7f 35 35 36 37 36 0a 4e 6f w.Forge.Detection.Works.55676.No
82580 64 65 3a 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 20 61 6e 64 20 48 6f 73 74 73 7f 36 de:.Supported.Forges.and.Hosts.6
825a0 31 32 31 33 0a 4e 6f 64 65 3a 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 7f 36 32 35 32 1213.Node:.Supported.Forges.6252
825c0 32 0a 52 65 66 3a 20 47 69 74 68 75 62 7f 36 32 36 37 38 0a 52 65 66 3a 20 47 69 74 68 75 62 20 2.Ref:.Github.62678.Ref:.Github.
825e0 43 61 76 65 61 74 73 7f 36 32 38 33 33 0a 52 65 66 3a 20 47 69 74 68 75 62 20 48 6f 73 74 73 7f Caveats.62833.Ref:.Github.Hosts.
82600 36 33 34 39 35 0a 52 65 66 3a 20 47 69 74 6c 61 62 7f 36 33 35 36 37 0a 52 65 66 3a 20 47 69 74 63495.Ref:.Gitlab.63567.Ref:.Git
82620 6c 61 62 20 43 61 76 65 61 74 73 7f 36 33 35 39 34 0a 52 65 66 3a 20 47 69 74 6c 61 62 20 48 6f lab.Caveats.63594.Ref:.Gitlab.Ho
82640 73 74 73 7f 36 33 37 33 35 0a 4e 6f 64 65 3a 20 50 61 72 74 69 61 6c 6c 79 20 53 75 70 70 6f 72 sts.63735.Node:.Partially.Suppor
82660 74 65 64 20 46 6f 72 67 65 73 7f 36 33 38 37 31 0a 52 65 66 3a 20 46 6f 72 67 65 6a 6f 20 68 74 ted.Forges.63871.Ref:.Forgejo.ht
82680 74 70 73 2f 2f 66 6f 72 67 65 6a 6f 6f 72 67 7f 36 34 30 37 37 0a 52 65 66 3a 20 46 6f 72 67 65 tps//forgejoorg.64077.Ref:.Forge
826a0 6a 6f 20 48 6f 73 74 73 7f 36 34 31 39 39 0a 52 65 66 3a 20 47 69 74 65 61 20 68 74 74 70 73 2f jo.Hosts.64199.Ref:.Gitea.https/
826c0 2f 67 69 74 65 61 69 6f 7f 36 34 32 37 35 0a 52 65 66 3a 20 47 6f 67 73 20 68 74 74 70 73 2f 2f /giteaio.64275.Ref:.Gogs.https//
826e0 67 6f 67 73 69 6f 7f 36 34 34 39 39 0a 52 65 66 3a 20 42 69 74 62 75 63 6b 65 74 20 68 74 74 70 gogsio.64499.Ref:.Bitbucket.http
82700 73 2f 2f 62 69 74 62 75 63 6b 65 74 6f 72 67 7f 36 34 37 33 39 0a 52 65 66 3a 20 42 69 74 62 75 s//bitbucketorg.64739.Ref:.Bitbu
82720 63 6b 65 74 20 43 61 76 65 61 74 73 7f 36 34 39 34 39 0a 52 65 66 3a 20 42 69 74 62 75 63 6b 65 cket.Caveats.64949.Ref:.Bitbucke
82740 74 20 48 6f 73 74 73 7f 36 35 38 36 32 0a 4e 6f 64 65 3a 20 53 75 70 70 6f 72 74 65 64 20 53 65 t.Hosts.65862.Node:.Supported.Se
82760 6d 69 2d 46 6f 72 67 65 73 7f 36 35 39 34 33 0a 52 65 66 3a 20 47 69 74 77 65 62 20 68 74 74 70 mi-Forges.65943.Ref:.Gitweb.http
82780 73 2f 2f 67 69 74 2d 73 63 6d 63 6f 6d 2f 64 6f 63 73 2f 67 69 74 77 65 62 7f 36 36 31 31 34 0a s//git-scmcom/docs/gitweb.66114.
827a0 52 65 66 3a 20 47 69 74 77 65 62 20 43 61 76 65 61 74 73 7f 36 36 32 30 35 0a 52 65 66 3a 20 43 Ref:.Gitweb.Caveats.66205.Ref:.C
827c0 67 69 74 20 68 74 74 70 73 2f 2f 67 69 74 7a 78 32 63 34 63 6f 6d 2f 63 67 69 74 2f 61 62 6f 75 git.https//gitzx2c4com/cgit/abou
827e0 74 7f 36 36 34 36 31 0a 52 65 66 3a 20 43 67 69 74 20 43 61 76 65 61 74 73 7f 36 36 35 35 30 0a t.66461.Ref:.Cgit.Caveats.66550.
82800 52 65 66 3a 20 43 67 69 74 20 48 6f 73 74 73 7f 36 36 39 31 35 0a 52 65 66 3a 20 53 74 67 69 74 Ref:.Cgit.Hosts.66915.Ref:.Stgit
82820 20 68 74 74 70 73 2f 2f 63 6f 64 65 6d 61 64 6e 65 73 73 6f 72 67 2f 67 69 74 2f 73 74 61 67 69 .https//codemadnessorg/git/stagi
82840 74 2f 66 69 6c 65 2f 52 45 41 44 4d 45 68 74 6d 6c 7f 36 37 30 35 38 0a 52 65 66 3a 20 53 74 67 t/file/READMEhtml.67058.Ref:.Stg
82860 69 74 20 43 61 76 65 61 74 73 7f 36 37 31 38 37 0a 52 65 66 3a 20 53 74 67 69 74 20 48 6f 73 74 it.Caveats.67187.Ref:.Stgit.Host
82880 73 7f 36 37 34 38 39 0a 52 65 66 3a 20 53 72 68 74 20 68 74 74 70 73 2f 2f 6d 65 74 61 73 72 68 s.67489.Ref:.Srht.https//metasrh
828a0 74 7f 36 37 35 36 35 0a 52 65 66 3a 20 53 72 68 74 20 43 61 76 65 61 74 73 7f 36 37 36 32 36 0a t.67565.Ref:.Srht.Caveats.67626.
828c0 52 65 66 3a 20 53 72 68 74 20 48 6f 73 74 73 7f 36 37 39 32 35 0a 4e 6f 64 65 3a 20 46 41 51 7f Ref:.Srht.Hosts.67925.Node:.FAQ.
828e0 36 37 39 39 32 0a 4e 6f 64 65 3a 20 65 72 72 6f 72 20 69 6e 20 70 72 6f 63 65 73 73 20 66 69 6c 67992.Node:.error.in.process.fil
82900 74 65 72 20 48 54 54 50 20 45 72 72 6f 72 20 35 30 32 20 22 42 61 64 20 67 61 74 65 77 61 79 22 ter.HTTP.Error.502."Bad.gateway"
82920 7f 36 38 34 30 32 0a 4e 6f 64 65 3a 20 4b 65 79 73 74 72 6f 6b 65 20 49 6e 64 65 78 7f 36 39 38 .68402.Node:.Keystroke.Index.698
82940 38 33 0a 4e 6f 64 65 3a 20 46 75 6e 63 74 69 6f 6e 20 61 6e 64 20 43 6f 6d 6d 61 6e 64 20 49 6e 83.Node:.Function.and.Command.In
82960 64 65 78 7f 37 35 39 33 36 0a 4e 6f 64 65 3a 20 56 61 72 69 61 62 6c 65 20 49 6e 64 65 78 7f 38 dex.75936.Node:.Variable.Index.8
82980 32 34 33 35 0a 1f 0a 45 6e 64 20 54 61 67 20 54 61 62 6c 65 0a 0a 1f 0a 4c 6f 63 61 6c 20 56 61 2435...End.Tag.Table....Local.Va
829a0 72 69 61 62 6c 65 73 3a 0a 63 6f 64 69 6e 67 3a 20 75 74 66 2d 38 0a 45 6e 64 3a 0a 00 00 00 00 riables:.coding:.utf-8.End:.....
829c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
829e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82a00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82c00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82c60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82c80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82e00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82e60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82e80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82f00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82f20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
82fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
830a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
830c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
830e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
831a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
831c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
831e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
832a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
832c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
832e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
833a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
833c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
833e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
834a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
834c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
834e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
835a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
835c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
835e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
836a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
836c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
836e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
837a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
837c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
837e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
838a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
838c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
838e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
839a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
839c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
839e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83a00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83c00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83c60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83c80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83e00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83e60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83e80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83f00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83f20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
83fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
840a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
840c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
840e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
841a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
841c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
841e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
842a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
842c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
842e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
843a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
843c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
843e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
844a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
844c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
844e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
845a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
845c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
845e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
846a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
846c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
846e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
84780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
847a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
847c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
847e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
generated by cgit v1.2.3 (git 2.25.1) at 2025-10-31 09:15:15 +0000