summaryrefslogtreecommitdiff
path: root/localrepo/forge-20240405.1509.tar
blob: ebf23ad157094c956dfb7fd6d7d3438f091de19c (plain)
ofshex dumpascii
0000 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 00 00 00 00 00 00 00 00 00 00 00 00 forge-20240405.1509/............
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 32 00 20 35 00 00 00 0000000.00000000000.012112..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 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 6e 6f 74 69 66 79 forge-20240405.1509/forge-notify
0220 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.............................
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 33 30 37 37 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 35 34 00 20 30 00 00 00 0030771.00000000000.015054..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 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
0420 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.-*
0440 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 34 20 4a 6f -..;;.Copyright.(C).2018-2024.Jo
0460 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.
0480 42 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 3b 3b 20 Bernoulli.<jonas@bernoul.li>.;;.
04a0 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e Maintainer:.Jonas.Bernoulli.<jon
04c0 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d as@bernoul.li>..;;.SPDX-License-
04e0 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..;;
0500 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
0520 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
0540 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.
0560 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
0580 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.
05a0 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.
05c0 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
05e0 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
0600 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
0620 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
0640 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
0660 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
0680 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.
06a0 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.;;.
06c0 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
06e0 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
0700 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
0720 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
0740 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
0760 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/>...;;;
0780 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
07a0 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 0a 3b 3b 3b 20 4f 70 74 69 6f 6e 73 0a 0a 28 64 e.'forge-topic)..;;;.Options..(d
07c0 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 72 65 70 efcustom.forge-notifications-rep
07e0 6f 2d 73 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 o-slug-width.28..."Width.of.repo
0800 73 69 74 6f 72 79 20 73 6c 75 67 73 20 69 6e 20 60 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 sitory.slugs.in.`forge-notificat
0820 69 6f 6e 73 2d 6d 6f 64 65 27 20 62 75 66 66 65 72 73 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d ions-mode'.buffers."...:package-
0840 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 67 72 version.'(forge..."0.4.0")...:gr
0860 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 28 69 66 20 28 3e 3d 20 65 6d 61 63 73 oup.'forge...:type.(if.(>=.emacs
0880 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f 6e 20 32 38 29 20 27 6e 61 74 6e 75 6d 20 27 6e 75 6d 62 -major-version.28).'natnum.'numb
08a0 65 72 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 er))..;;;.Class..(defclass.forge
08c0 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 28 66 6f 72 67 65 2d 6f 62 6a 65 63 74 29 0a 20 20 28 -notification.(forge-object)...(
08e0 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 3a 69 6e 69 74 (closql-class-prefix.......:init
0900 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 74 61 62 6c 65 20 form."forge-")....(closql-table.
0920 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 6f 74 69 66 69 63 61 .............:initform.'notifica
0940 74 69 6f 6e 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 tion)....(closql-primary-key....
0960 20 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 ....:initform.'id)....(closql-or
0980 64 65 72 2d 62 79 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 5b 28 64 65 73 der-by...........:initform.[(des
09a0 63 20 69 64 29 5d 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 c.id)])....(id..................
09c0 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 72 65 61 64 2d 69 ......:initarg.:id)....(thread-i
09e0 64 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 74 68 72 65 d.................:initarg.:thre
0a00 61 64 2d 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 ad-id)....(repository...........
0a20 20 20 20 20 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 74 .....:initarg.:repository)....(t
0a40 79 70 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 74 61 72 ype......................:initar
0a60 67 20 3a 74 79 70 65 29 0a 20 20 20 28 74 6f 70 69 63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 g.:type)....(topic..............
0a80 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 6f 70 69 63 29 0a 20 20 20 28 75 72 6c 20 .......:initarg.:topic)....(url.
0aa0 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 61 72 67 20 3a ......................:initarg.:
0ac0 75 72 6c 29 0a 20 20 20 28 74 69 74 6c 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 url)....(title..................
0ae0 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 74 69 74 6c 65 29 0a 20 20 20 28 72 65 61 73 6f 6e 20 20 ...:initarg.:title)....(reason..
0b00 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 67 20 3a 72 65 61 73 ..................:initarg.:reas
0b20 6f 6e 29 0a 20 20 20 28 6c 61 73 74 2d 72 65 61 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 on)....(last-read...............
0b40 20 20 3a 69 6e 69 74 61 72 67 20 3a 6c 61 73 74 2d 72 65 61 64 29 0a 20 20 20 28 75 70 64 61 74 ..:initarg.:last-read)....(updat
0b60 65 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 67 20 3a 75 ed...................:initarg.:u
0b80 70 64 61 74 65 64 29 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 pdated)))..;;;.Query.;;;;.Get..(
0ba0 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 72 cl-defmethod.forge-get-repositor
0bc0 79 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 6f 6e 29 29 0a y.((notify.forge-notification)).
0be0 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6f 62 6a 65 63 74 20 66 6f 72 20 74 68 65 20 72 65 70 .."Return.the.object.for.the.rep
0c00 6f 73 69 74 6f 72 79 20 74 68 61 74 20 4e 4f 54 49 46 59 20 62 65 6c 6f 6e 67 73 20 74 6f 2e 22 ository.that.NOTIFY.belongs.to."
0c20 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 69 64 20 28 6f 72 65 66 20 6e 6f 74 69 66 79 20 72 ...(and-let*.((id.(oref.notify.r
0c40 65 70 6f 73 69 74 6f 72 79 29 29 29 0a 20 20 20 20 28 63 6c 6f 73 71 6c 2d 67 65 74 20 28 66 6f epository))).....(closql-get.(fo
0c60 72 67 65 2d 64 62 29 20 69 64 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 29 0a rge-db).id.'forge-repository))).
0c80 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 28 .(cl-defmethod.forge-get-topic.(
0ca0 28 6e 6f 74 69 66 79 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 29 29 0a 20 20 28 (notify.forge-notification))...(
0cc0 61 6e 64 2d 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 70 6f 73 and-let*.((repo.(forge-get-repos
0ce0 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 65 2d 67 65 74 2d 74 itory.notify))).....(forge-get-t
0d00 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 70 69 63 29 29 29 29 opic.repo.(oref.notify.topic))))
0d20 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 6e 6f 74 69 66 69 ..(cl-defmethod.forge-get-notifi
0d40 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 6c 6f 73 71 6c 2d 67 cation.((id.string))...(closql-g
0d60 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 6f 74 69 66 69 63 61 et.(forge-db).id.'forge-notifica
0d80 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 67 65 2d 67 65 74 2d tion))..(cl-defmethod.forge-get-
0da0 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 65 2d 74 6f 70 69 63 notification.((topic.forge-topic
0dc0 29 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 72 6f 77 20 28 63 61 72 20 28 66 6f 72 67 65 ))...(and-let*.((row.(car.(forge
0de0 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 66 69 63 61 74 69 -sql.[:select.*.:from.notificati
0e00 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 20 20 20 20 on..............................
0e20 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 74 6f 72 79 20 ......:where.(and.(=.repository.
0e40 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 20 20 20 20 $s1)............................
0e60 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 20 24 73 32 ....................(=.topic.$s2
0e80 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 20 20 20 20 ))].............................
0ea0 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 20 ......(oref.topic.repository)...
0ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
0ee0 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 6c 6f (oref.topic.number))))).....(clo
0f00 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 74 69 sql--remake-instance.'forge-noti
0f20 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 3b 3b fication.(forge-db).row)))..;;;;
0f40 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 2d 6e .Current..(defun.forge-current-n
0f60 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 0a 20 otification.(&optional.demand)..
0f80 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 69 6f ."Return.the.current.notificatio
0fa0 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 79 2e n,.casting.a.topic.if.necessary.
0fc0 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 69 6f .If.there.is.no.such.notificatio
0fe0 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 73 69 n.and.DEMAND.is.non-nil,.then.si
1000 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 65 63 gnal.an.error."...(or.(magit-sec
1020 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 20 20 tion-value-if.'notification)....
1040 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 63 75 72 72 ...(and-let*.((topic.(forge-curr
1060 65 6e 74 2d 74 6f 70 69 63 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d ent-topic))).........(forge-get-
1080 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 74 6f 70 69 63 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 notification.topic)).......(and.
10a0 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 74 20 6e demand.(user-error."No.current.n
10c0 6f 74 69 66 69 63 61 74 69 6f 6e 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 6e otification"))))..(defun.forge-n
10e0 6f 74 69 66 69 63 61 74 69 6f 6e 2d 61 74 2d 70 6f 69 6e 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 otification-at-point.(&optional.
1100 64 65 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6e 6f 74 69 66 69 63 61 74 69 demand)..."Return.the.notificati
1120 6f 6e 20 61 74 20 70 6f 69 6e 74 2c 20 63 61 73 74 69 6e 67 20 61 20 74 6f 70 69 63 20 69 66 20 on.at.point,.casting.a.topic.if.
1140 6e 65 63 65 73 73 61 72 79 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 20 6e necessary..If.there.is.no.such.n
1160 6f 74 69 66 69 63 61 74 69 6f 6e 20 61 6e 64 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 otification.and.DEMAND.is.non-ni
1180 6c 2c 20 74 68 65 6e 0a 73 69 67 6e 61 6c 20 61 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 6f 72 20 l,.then.signal.an.error."...(or.
11a0 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 6e 6f 74 69 66 69 63 (magit-section-value-if.'notific
11c0 61 74 69 6f 6e 29 0a 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 74 6f 70 69 63 20 28 ation).......(and-let*.((topic.(
11e0 66 6f 72 67 65 2d 74 6f 70 69 63 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 forge-topic-at-point))).........
1200 28 66 6f 72 67 65 2d 67 65 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 74 6f 70 69 63 29 29 0a (forge-get-notification.topic)).
1220 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 4e ......(and.demand.(user-error."N
1240 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 29 29 0a 0a 3b 3b o.notification.at.point"))))..;;
1260 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 6e 6f 74 69 66 69 ;;.List..(defun.forge--ls-notifi
1280 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 28 73 74 61 74 75 cations.(status)...(let*.((statu
12a0 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 20 20 20 20 20 20 s.(ensure-list.status)).........
12c0 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 75 73 29 29 0a 20 .(savedp.(memq.'saved.status))..
12e0 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 65 64 20 73 74 61 ........(status.(remq.'saved.sta
1300 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 6c 61 6d 62 64 61 20 tus))).....(mapcar......(lambda.
1320 28 72 6f 77 29 20 28 63 6c 6f 73 71 6c 2d 2d 72 65 6d 61 6b 65 2d 69 6e 73 74 61 6e 63 65 20 27 (row).(closql--remake-instance.'
1340 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 20 72 6f forge-notification.(forge-db).ro
1360 77 29 29 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 w))......(if.(seq-set-equal-p.st
1380 61 74 75 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 atus.'(unread.pending.done).#'eq
13a0 29 0a 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 2a )..........(forge-sql.[:select.*
13c0 20 3a 66 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 .:from.notification.:order-by.[(
13e0 64 65 73 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 desc.updated)]])........(forge-s
1400 71 6c 0a 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 ql.........`[:select.:distinct.n
1420 6f 74 69 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 otification:*...........:from.[n
1440 6f 74 69 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 otification.(as.issue.topic)]...
1460 20 20 20 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 ........:where.(and.(=.notificat
1480 69 6f 6e 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 ion:topic.topic:id).............
14a0 20 20 20 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 ..........,@(and.status.'((in.to
14c0 70 69 63 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 pic:status.$v1)))...............
14e0 20 20 20 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 ........,@(and.savedp.'((=.topic
1500 3a 73 61 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 :saved-p.'t))))...........:union
1520 0a 20 20 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 ...........:select.:distinct.not
1540 69 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 ification:*...........:from.[not
1560 69 66 69 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 ification.(as.pullreq.topic)]...
1580 20 20 20 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 ........:where.(and.(=.notificat
15a0 69 6f 6e 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 ion:topic.topic:id).............
15c0 20 20 20 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 ..........,@(and.status.'((in.to
15e0 70 69 63 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 pic:status.$v1)))...............
1600 20 20 20 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 ........,@(and.savedp.'((=.topic
1620 3a 73 61 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 :saved-p.'t))))...........:order
1640 2d 62 79 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 -by.[(desc.notification:updated)
1660 5d 5d 0a 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 ]].........(vconcat.status))))))
1680 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 65 ..;;;.Mode..(defvar-keymap.forge
16a0 2d 6e 6f 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 -notifications-mode-map...:doc."
16c0 4b 65 79 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 Keymap.for.`forge-notifications-
16e0 6d 6f 64 65 27 2e 22 0a 20 20 3a 70 61 72 65 6e 74 20 6d 61 67 69 74 2d 6d 6f 64 65 2d 6d 61 70 mode'."...:parent.magit-mode-map
1700 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 22 20 23 27 6d ..."<remap>.<magit-refresh>".#'m
1720 61 67 69 74 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 0a 20 20 22 43 2d 63 20 43 2d 6d 22 20 agit-refresh-buffer..."C-c.C-m".
1740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 ................#'forge-notifica
1760 74 69 6f 6e 73 2d 6d 65 6e 75 29 0a 0a 28 64 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 tions-menu)..(define-derived-mod
1780 65 20 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 6d 61 67 69 74 e.forge-notifications-mode.magit
17a0 2d 6d 6f 64 65 20 22 46 6f 72 67 65 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 0a 20 20 22 4d -mode."Forge.Notifications"..."M
17c0 6f 64 65 20 66 6f 72 20 6c 6f 6f 6b 69 6e 67 20 61 74 20 66 6f 72 67 65 20 6e 6f 74 69 66 69 63 ode.for.looking.at.forge.notific
17e0 61 74 69 6f 6e 73 2e 22 0a 20 20 28 68 61 63 6b 2d 64 69 72 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 ations."...(hack-dir-local-varia
1800 62 6c 65 73 2d 6e 6f 6e 2d 66 69 6c 65 2d 62 75 66 66 65 72 29 29 0a 0a 28 64 65 66 75 6e 20 66 bles-non-file-buffer))..(defun.f
1820 6f 72 67 65 2d 6e 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 orge-notifications-setup-buffer.
1840 28 26 6f 70 74 69 6f 6e 61 6c 20 63 72 65 61 74 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 6e 61 6d (&optional.create)...(let*.((nam
1860 65 20 22 2a 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2a 22 29 0a 20 20 20 20 20 e."*forge-notifications*")......
1880 20 20 20 20 28 6d 61 67 69 74 2d 67 65 6e 65 72 61 74 65 2d 62 75 66 66 65 72 2d 6e 61 6d 65 2d ....(magit-generate-buffer-name-
18a0 66 75 6e 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 5f 6d 6f 64 65 20 5f 76 61 6c 75 65 29 20 function.(lambda.(_mode._value).
18c0 6e 61 6d 65 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 name))..........(default-directo
18e0 72 79 20 22 2f 22 29 29 0a 20 20 20 20 28 69 66 20 63 72 65 61 74 65 0a 20 20 20 20 20 20 20 20 ry."/")).....(if.create.........
1900 28 6d 61 67 69 74 2d 73 65 74 75 70 2d 62 75 66 66 65 72 2d 69 6e 74 65 72 6e 61 6c 20 23 27 66 (magit-setup-buffer-internal.#'f
1920 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 20 74 0a 20 20 20 20 20 20 orge-notifications-mode.t.......
1940 20 20 20 20 20 20 20 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 ...............................'
1960 28 28 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 75 6e 61 73 73 6f 63 69 61 74 65 64 2d 70 20 74 29 ((forge-buffer-unassociated-p.t)
1980 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 )...............................
19a0 20 20 20 20 20 20 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 28 67 65 74 2d 62 75 66 66 65 72 20 6e .......name).......(get-buffer.n
19c0 61 6d 65 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 ame))))..(defun.forge-notificati
19e0 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 66 6f 72 67 65 2d 69 ons-refresh-buffer.()...(forge-i
1a00 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 65 66 76 61 72 20 66 nsert-notifications))..(defvar.f
1a20 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
1a40 20 27 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 .'flat).(defvar.forge-notificati
1a60 6f 6e 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 ons-selection.'(unread.pending))
1a80 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
1aa0 65 2d 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 e-prefix.forge-notifications-men
1ac0 75 20 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 u.()..."Control.list.of.notifica
1ae0 74 69 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 tions.and.notification.at.point.
1b00 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 72 61 6e 73 "...:transient-suffix.t...:trans
1b20 69 65 6e 74 2d 6e 6f 6e 2d 73 75 66 66 69 78 20 74 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 2d 73 ient-non-suffix.t...:transient-s
1b40 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 66 66 69 witch-frame.nil...:refresh-suffi
1b60 78 65 73 20 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 xes.t...:column-widths.forge--to
1b80 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
1ba0 20 61 6c 77 61 79 73 0a 20 20 20 28 22 71 22 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6d 65 6e .always....("q"........forge-men
1bc0 75 2d 71 75 69 74 2d 6c 69 73 74 29 0a 20 20 20 28 22 52 45 54 22 20 20 20 20 20 20 66 6f 72 67 u-quit-list)....("RET"......forg
1be0 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 0a 20 20 20 28 22 3c 72 65 74 75 72 6e 3e 22 20 66 6f 72 e-topic-menu)....("<return>".for
1c00 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 5d 0a 20 20 5b 5b 22 54 79 70 65 22 0a 20 20 20 20 28 ge-topic-menu)]...[["Type".....(
1c20 22 74 22 20 20 20 22 74 6f 70 69 63 73 2e 2e 2e 22 20 20 20 20 20 20 20 66 6f 72 67 65 2d 74 6f "t"..."topics...".......forge-to
1c40 70 69 63 73 2d 6d 65 6e 75 20 20 20 20 20 20 20 3a 74 72 61 6e 73 69 65 6e 74 20 72 65 70 6c 61 pics-menu.......:transient.repla
1c60 63 65 29 0a 20 20 20 20 28 3a 69 6e 66 6f 20 22 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 20 20 ce).....(:info."notifications"..
1c80 20 3a 66 61 63 65 20 66 6f 72 67 65 2d 61 63 74 69 76 65 2d 73 75 66 66 69 78 29 0a 20 20 20 20 .:face.forge-active-suffix).....
1ca0 28 22 72 22 20 20 20 22 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 2e 2e 22 20 66 6f 72 67 65 2d 72 ("r"..."repositories...".forge-r
1cc0 65 70 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e 75 20 3a 74 72 61 6e 73 69 65 6e 74 20 72 65 70 6c epositories-menu.:transient.repl
1ce0 61 63 65 29 0a 20 20 20 20 22 22 5d 0a 20 20 20 5b 22 53 65 6c 65 63 74 69 6f 6e 22 0a 20 20 20 ace).....""]....["Selection"....
1d00 20 28 22 49 22 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 .("I".forge-notifications-displa
1d20 79 2d 69 6e 62 6f 78 29 0a 20 20 20 20 28 22 53 22 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 y-inbox).....("S".forge-notifica
1d40 74 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 73 61 76 65 64 29 0a 20 20 20 20 28 22 44 22 20 66 6f tions-display-saved).....("D".fo
1d60 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 64 6f 6e 65 29 0a rge-notifications-display-done).
1d80 20 20 20 20 28 22 41 22 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 64 69 73 ....("A".forge-notifications-dis
1da0 70 6c 61 79 2d 61 6c 6c 29 5d 5d 0a 20 20 5b 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d play-all)]]...[forge--topic-set-
1dc0 73 74 61 74 65 2d 67 72 6f 75 70 0a 20 20 20 5b 22 47 72 6f 75 70 22 0a 20 20 20 20 28 22 66 22 state-group....["Group".....("f"
1de0 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 66 6c 61 74 29 .forge-notifications-style-flat)
1e00 0a 20 20 20 20 28 22 67 22 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 74 .....("g".forge-notifications-st
1e20 79 6c 65 2d 6e 65 73 74 65 64 29 5d 5d 0a 20 20 5b 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 yle-nested)]]...[forge--topic-se
1e40 74 2d 73 74 61 74 75 73 2d 67 72 6f 75 70 5d 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a t-status-group]...(interactive).
1e60 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 65 ..(unless.(derived-mode-p.'forge
1e80 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 66 6f 72 67 65 2d -notifications-mode).....(forge-
1ea0 6c 69 73 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 29 29 0a 20 20 28 74 72 61 6e 73 69 65 6e list-notifications))...(transien
1ec0 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 6d 65 6e t-setup.'forge-notifications-men
1ee0 75 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 u))..;;;###autoload.(defun.forge
1f00 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 74 20 6e -list-notifications.()..."List.n
1f20 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 otifications."...(interactive)..
1f40 20 28 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 65 74 75 70 2d 62 75 66 66 .(forge-notifications-setup-buff
1f60 65 72 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 78 er.t))..(transient-define-suffix
1f80 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
1fa0 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
1fc0 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.
1fe0 22 69 6e 62 6f 78 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 "inbox"...:inapt-if.(lambda.().(
2000 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 73 65 6c 65 63 74 equal.forge-notifications-select
2020 69 6f 6e 20 27 28 75 6e 72 65 61 64 20 70 65 6e 64 69 6e 67 29 29 29 0a 20 20 3a 69 6e 61 70 74 ion.'(unread.pending)))...:inapt
2040 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 61 63 74 69 76 65 2d 73 75 66 66 69 78 0a 20 20 28 69 6e -face.'forge-active-suffix...(in
2060 74 65 72 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 teractive)...(unless.(derived-mo
2080 64 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 de-p.'forge-notifications-mode).
20a0 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 20 69 6e 20 6e 6f 74 69 66 69 63 61 ....(user-error."Not.in.notifica
20c0 74 69 6f 6e 20 62 75 66 66 65 72 22 29 29 0a 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 6e 6f 74 tion.buffer"))...(setq.forge-not
20e0 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 65 61 64 20 70 65 ifications-selection.'(unread.pe
2100 6e 64 69 6e 67 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 nding))...(forge-refresh-buffer)
2120 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
2140 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 20 28 29 e-notifications-display-saved.()
2160 0a 20 20 22 4c 69 73 74 20 73 61 76 65 64 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 22 0a 20 ..."List.saved.notifications."..
2180 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 73 61 76 65 64 22 0a 20 20 3a 69 6e 61 70 74 2d 69 .:description."saved"...:inapt-i
21a0 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 65 71 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 f.(lambda.().(eq.forge-notificat
21c0 69 6f 6e 73 2d 73 65 6c 65 63 74 69 6f 6e 20 27 73 61 76 65 64 29 29 0a 20 20 3a 69 6e 61 70 74 ions-selection.'saved))...:inapt
21e0 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 61 63 74 69 76 65 2d 73 75 66 66 69 78 0a 20 20 28 69 6e -face.'forge-active-suffix...(in
2200 74 65 72 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 teractive)...(unless.(derived-mo
2220 64 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 de-p.'forge-notifications-mode).
2240 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 20 69 6e 20 6e 6f 74 69 66 69 63 61 ....(user-error."Not.in.notifica
2260 74 69 6f 6e 20 62 75 66 66 65 72 22 29 29 0a 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 6e 6f 74 tion.buffer"))...(setq.forge-not
2280 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 65 64 29 0a 20 20 28 ifications-selection.'saved)...(
22a0 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 65 forge-refresh-buffer))..(transie
22c0 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 74 nt-define-suffix.forge-notificat
22e0 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 64 6f 6e 65 20 28 29 0a 20 20 22 4c 69 73 74 20 64 6f 6e ions-display-done.()..."List.don
2300 65 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 e.notifications."...:description
2320 20 22 64 6f 6e 65 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 ."done"...:inapt-if.(lambda.().(
2340 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 69 6f 6e eq.forge-notifications-selection
2360 20 27 64 6f 6e 65 29 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 61 63 .'done))...:inapt-face.'forge-ac
2380 74 69 76 65 2d 73 75 66 66 69 78 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 tive-suffix...(interactive)...(u
23a0 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 6f 74 nless.(derived-mode-p.'forge-not
23c0 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 6f 72 ifications-mode).....(user-error
23e0 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 29 0a ."Not.in.notification.buffer")).
2400 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 6c 65 ..(setq.forge-notifications-sele
2420 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 62 75 ction.'done)...(forge-refresh-bu
2440 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 69 78 ffer))..(transient-define-suffix
2460 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 6c 6c .forge-notifications-display-all
2480 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 22 0a .()..."List.all.notifications.".
24a0 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 69 66 ..:description."all"...:inapt-if
24c0 20 28 6c 61 6d 62 64 61 20 28 29 20 28 65 71 75 61 6c 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 .(lambda.().(equal.forge-notific
24e0 61 74 69 6f 6e 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 ations-selection.'(unread.pendin
2500 67 20 64 6f 6e 65 29 29 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 61 g.done)))...:inapt-face.'forge-a
2520 63 74 69 76 65 2d 73 75 66 66 69 78 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 ctive-suffix...(interactive)...(
2540 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 6f unless.(derived-mode-p.'forge-no
2560 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 6f tifications-mode).....(user-erro
2580 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 29 r."Not.in.notification.buffer"))
25a0 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 6c ...(setq.forge-notifications-sel
25c0 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 29 0a 20 ection.'(unread.pending.done))..
25e0 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 74 72 61 6e 73 .(forge-refresh-buffer))..(trans
2600 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 6e 6f 74 69 66 69 63 ient-define-suffix.forge-notific
2620 61 74 69 6f 6e 73 2d 73 74 79 6c 65 2d 66 6c 61 74 20 28 29 0a 20 20 22 53 68 6f 77 20 61 20 66 ations-style-flat.()..."Show.a.f
2640 6c 61 74 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 6c 69 73 74 2e 22 0a 20 20 3a 64 65 73 63 72 lat.notification.list."...:descr
2660 69 70 74 69 6f 6e 20 22 66 6c 61 74 20 6c 69 73 74 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 20 28 iption."flat.list"...:inapt-if.(
2680 6c 61 6d 62 64 61 20 28 29 20 28 65 71 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e lambda.().(eq.forge-notification
26a0 73 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 3a 69 6e 61 70 74 s-display-style.'flat))...:inapt
26c0 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 61 63 74 69 76 65 2d 73 75 66 66 69 78 0a 20 20 28 69 6e -face.'forge-active-suffix...(in
26e0 74 65 72 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 teractive)...(unless.(derived-mo
2700 64 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 de-p.'forge-notifications-mode).
2720 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 20 69 6e 20 6e 6f 74 69 66 69 63 61 ....(user-error."Not.in.notifica
2740 74 69 6f 6e 20 62 75 66 66 65 72 22 29 29 0a 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 6e 6f 74 tion.buffer"))...(setq.forge-not
2760 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 66 6c 61 74 29 0a ifications-display-style.'flat).
2780 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 74 72 61 6e ..(forge-refresh-buffer))..(tran
27a0 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 6e 6f 74 69 66 69 sient-define-suffix.forge-notifi
27c0 63 61 74 69 6f 6e 73 2d 73 74 79 6c 65 2d 6e 65 73 74 65 64 20 28 29 0a 20 20 22 47 72 6f 75 70 cations-style-nested.()..."Group
27e0 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 62 79 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 .notifications.by.repository."..
2800 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 62 79 20 72 65 70 6f 73 69 74 6f 72 79 22 0a 20 20 .:description."by.repository"...
2820 3a 69 6e 61 70 74 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 65 71 20 66 6f 72 67 65 2d 6e :inapt-if.(lambda.().(eq.forge-n
2840 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 6e 65 73 74 otifications-display-style.'nest
2860 65 64 29 29 0a 20 20 3a 69 6e 61 70 74 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 61 63 74 69 76 65 ed))...:inapt-face.'forge-active
2880 2d 73 75 66 66 69 78 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 -suffix...(interactive)...(unles
28a0 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 66 69 63 s.(derived-mode-p.'forge-notific
28c0 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 22 4e 6f ations-mode).....(user-error."No
28e0 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 20 28 73 t.in.notification.buffer"))...(s
2900 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 61 79 2d etq.forge-notifications-display-
2920 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 66 72 65 73 68 2d style.'nested)...(forge-refresh-
2940 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 65 66 63 6c 61 73 buffer))..;;;.Sections..(defclas
2960 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 20 28 6d 61 67 69 s.forge-repository-section.(magi
2980 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 74 66 6f 72 6d 20 t-section)...((type...:initform.
29a0 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 6e 69 74 66 6f 72 'forge-repo)....(keymap.:initfor
29c0 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 6e 2d 6d 61 70 29 m.'forge-repository-section-map)
29e0 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 62 6c 65 2d 61 6c ))..(define-obsolete-variable-al
2a00 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 69 6f 6e 2d 6d 61 ias.'forge-forge-repo-section-ma
2a20 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 69 6f 6e 2d 6d 61 p...'forge-repository-section-ma
2a40 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 6b 65 79 6d 61 70 p."Forge.0.4.0")..(defvar-keymap
2a60 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 6d 61 70 0a 20 20 .forge-repository-section-map...
2a80 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 6e 67 3e 22 20 23 "<remap>.<magit-browse-thing>".#
2aa0 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 6f 72 79 0a 20 20 'forge-browse-this-repository...
2ac0 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 20 23 "<remap>.<magit-visit-thing>"..#
2ae0 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 29 0a 0a 28 'forge-visit-this-repository)..(
2b00 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 61 74 69 6f 6e 73 defun.forge-insert-notifications
2b20 20 28 29 0a 20 20 28 6c 65 74 2a 20 28 28 73 74 61 74 75 73 20 66 6f 72 67 65 2d 6e 6f 74 69 66 .()...(let*.((status.forge-notif
2b40 69 63 61 74 69 6f 6e 73 2d 73 65 6c 65 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 28 6e 6f ications-selection)..........(no
2b60 74 69 66 73 20 28 66 6f 72 67 65 2d 2d 6c 73 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 73 74 tifs.(forge--ls-notifications.st
2b80 61 74 75 73 29 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 atus))).....(magit-insert-sectio
2ba0 6e 20 28 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 n.(notifications).......(magit-i
2bc0 6e 73 65 72 74 2d 68 65 61 64 69 6e 67 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 nsert-heading.........(cond.....
2be0 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 20 20 .....((not.(listp.status))......
2c00 20 20 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 .....(format."%s.notifications".
2c20 28 63 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 (capitalize.(symbol-name.status)
2c40 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 28 73 65 71 2d 73 65 74 2d 65 71 75 61 6c 2d 70 20 73 )))..........((seq-set-equal-p.s
2c60 74 61 74 75 73 20 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 tatus.'(unread.pending))."Inbox"
2c80 29 0a 20 20 20 20 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 )..........((seq-set-equal-p.sta
2ca0 74 75 73 20 27 28 75 6e 72 65 61 64 20 70 65 6e 64 69 6e 67 20 64 6f 6e 65 29 29 20 22 41 6c 6c tus.'(unread.pending.done))."All
2cc0 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 29 0a 20 20 20 20 20 20 20 20 20 28 28 66 6f 72 6d .notifications")..........((form
2ce0 61 74 20 22 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 25 73 22 20 73 74 61 74 75 73 29 29 29 29 at."Notifications.%s".status))))
2d00 0a 20 20 20 20 20 20 28 69 66 20 28 65 71 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f .......(if.(eq.forge-notificatio
2d20 6e 73 2d 64 69 73 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 ns-display-style.'flat).........
2d40 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 20 20 ..(magit-insert-section-body....
2d60 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6e 6f 74 20 6e 6f 74 69 66 73 29 0a 20 20 20 20 20 20 .........(if.(not.notifs).......
2d80 20 20 20 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 0a 20 ..........(insert."(empty)\n")..
2da0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 6e 6f 74 69 66 20 6e 6f 74 69 .............(dolist.(notif.noti
2dc0 66 73 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 69 6e 73 65 72 fs).................(forge-inser
2de0 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 6e 6f 74 69 66 29 29 0a 20 20 20 20 20 20 20 20 20 t-notification.notif))..........
2e00 20 20 20 20 20 28 69 6e 73 65 72 74 20 3f 5c 6e 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 63 61 .....(insert.?\n))).........(pca
2e20 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 5f 20 2e 20 2c 6e 6f 74 69 66 73 29 0a 20 20 20 20 20 se-dolist.(`(,_...,notifs)......
2e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 2d 67 72 6f 75 70 2d 62 79 20 28 6f ..................(--group-by.(o
2e60 72 65 66 20 69 74 20 72 65 70 6f 73 69 74 6f 72 79 29 20 6e 6f 74 69 66 73 29 29 0a 20 20 20 20 ref.it.repository).notifs)).....
2e80 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 70 ......(let.((repo.(forge-get-rep
2ea0 6f 73 69 74 6f 72 79 20 28 63 61 72 20 6e 6f 74 69 66 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 ository.(car.notifs)))).........
2ec0 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 65 ....(magit-insert-section.(forge
2ee0 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 74 -repo.repo)...............(magit
2f00 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 20 -insert-heading.................
2f20 28 63 6f 6e 63 61 74 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74 20 22 25 73 2f (concat.(propertize.(format."%s/
2f40 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 20 20 20 20 20 %s".............................
2f60 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 6f 77 6e 65 72 ................(oref.repo.owner
2f80 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 )...............................
2fa0 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 6e 61 6d 65 29 29 0a ..............(oref.repo.name)).
2fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
2fe0 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 0a 20 20 20 20 20 ....'font-lock-face.'bold)......
3000 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 20 28 25 73 ...................(format.".(%s
3020 29 22 20 28 6c 65 6e 67 74 68 20 6e 6f 74 69 66 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 )".(length.notifs))))...........
3040 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..
3060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 6e 6f 74 69 66 20 6e 6f ...............(dolist.(notif.no
3080 74 69 66 73 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 69 tifs)...................(forge-i
30a0 6e 73 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 6e 6f 74 69 66 29 29 0a 20 20 20 20 20 nsert-notification.notif))......
30c0 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 29 29 29 29 29 29 0a ...........(insert.?\n))))))))).
30e0 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 61 74 69 6f .(defun.forge-insert-notificatio
3100 6e 20 28 6e 6f 74 69 66 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 74 79 70 65 20 74 69 n.(notif)...(with-slots.(type.ti
3120 74 6c 65 20 75 72 6c 29 20 6e 6f 74 69 66 0a 20 20 20 20 28 70 63 61 73 65 20 74 79 70 65 0a 20 tle.url).notif.....(pcase.type..
3140 20 20 20 20 20 28 28 6f 72 20 27 69 73 73 75 65 20 27 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 .....((or.'issue.'pullreq)......
3160 20 20 28 66 6f 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 ..(forge--insert-topic.(forge-ge
3180 74 2d 74 6f 70 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 t-topic.notif))).......('commit.
31a0 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 63 .......(magit-insert-section.(nc
31c0 6f 6d 6d 69 74 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 ommit.nil).;.!commit..........(s
31e0 74 72 69 6e 67 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 tring-match."[^/]*\\'".url).....
3200 20 20 20 20 20 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 .....(insert...........(format."
3220 25 73 20 25 73 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 %s.%s\n"...................(prop
3240 65 72 74 69 7a 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 ertize.(substring.(match-string.
3260 30 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 20 20 20 20 20 0.url)..........................
3280 20 20 20 20 20 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 ................0.(magit-abbrev-
32a0 6c 65 6e 67 74 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 length))........................
32c0 20 20 20 20 20 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 .......'font-lock-face.'magit-ha
32e0 73 68 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 6c 6f 67 sh)...................(magit-log
3300 2d 70 72 6f 70 65 72 74 69 7a 65 2d 6b 65 79 77 6f 72 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 -propertize-keywords............
3320 20 20 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 20 20 20 28 ........nil....................(
3340 70 72 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 propertize.title.'font-lock-face
3360 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 ................................
3380 28 69 66 2d 6c 65 74 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 (if-let.((topic.(oref.notif.topi
33a0 63 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 c)).............................
33c0 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 28 6f 72 65 66 20 74 6f 70 69 63 20 73 74 61 ............((eq.(oref.topic.sta
33e0 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 20 tus).'unread))).................
3400 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-
3420 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 20 unread..........................
3440 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 29 ........'forge-topic-open)))))))
3460 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 74 .......(_........;;.The.document
3480 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 70 ation.does.not.mention.what."typ
34a0 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 62 es"........;;.exist...Make.it.ob
34c0 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 20 vious.that.this.is.something....
34e0 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 6e ....;;.we.do.not.know.how.to.han
3500 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 2d dle.properly.yet.........(magit-
3520 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 74 insert-section.(notification.not
3540 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 65 if)..........(insert.(propertize
3560 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 29 .(format."(%s).%s\n".type.title)
3580 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 66 ..............................'f
35a0 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 3b ont-lock-face.'error)))))))..;;;
35c0 20 5f 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 3b 20 66 ._.(provide.'forge-notify).;;;.f
35e0 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 00 00 00 orge-notify.el.ends.here........
3600 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e forge-20240405.1509/forge-comman
3620 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...........................
3640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3660 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
3680 30 31 33 34 30 34 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 33 34 36 00 20 30 00 00 00 0134047.00000000000.015346..0...
36a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
36e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3700 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...................
3720 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...................
3740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3800 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
3820 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.-*-..;
3840 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 34 20 4a 6f 6e 61 73 20 ;.Copyright.(C).2018-2024.Jonas.
3860 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
3880 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 3b 3b 20 4d 61 69 6e oulli.<jonas@bernoul.li>.;;.Main
38a0 74 61 69 6e 65 72 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 tainer:.Jonas.Bernoulli.<jonas@b
38c0 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e ernoul.li>..;;.SPDX-License-Iden
38e0 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
3900 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
3920 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.;
3940 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.
3960 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
3980 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
39a0 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.
39c0 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).
39e0 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
3a00 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
3a20 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
3a40 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.
3a60 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
3a80 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
3aa0 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.
3ac0 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.
3ae0 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
3b00 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
3b20 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
3b40 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://
3b60 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
3b80 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 4f 70 74 69 6f 6e e:..(require.'forge)..;;;.Option
3ba0 73 0a 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 s..(defcustom.forge-add-pullreq-
3bc0 72 65 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 refspec.t..."Whether.the.pull-re
3be0 71 75 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 quest.refspec.is.added.when.sett
3c00 69 6e 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 ing.up.a.repository...This.contr
3c20 6f 6c 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 ols.whether.running.`forge-pull'
3c40 20 66 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 .for.the.first.time.in.a.reposit
3c60 6f 72 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 ory.also.adds.a.refspec.that.fet
3c80 63 68 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 ches.all.pull-requests..In.repos
3ca0 69 74 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 itories.with.huge.numbers.of.pul
3cc0 6c 2d 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 l-requests.you.might.want.to.not
3ce0 20 64 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 .do.so,.in.which.case.you.should
3d00 20 73 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 .set.this.option.to.`ask'...You.
3d20 63 61 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 can.also.set.this.to.nil.and.lat
3d40 65 72 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 er.add.the.refspec.explicitly.fo
3d60 72 20 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 r.a.repository.using.the.command
3d80 20 60 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 .`forge-add-pullreq-refspec'."..
3da0 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 32 .:package-version.'(forge..."0.2
3dc0 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 63 .0")...:group.'forge...:type.'(c
3de0 68 6f 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 hoice.(const.:tag."Always.add.re
3e00 66 73 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 fspec".t)..................(cons
3e20 74 20 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 t.:tag."Ask.every.time".ask)....
3e40 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 4e 65 76 65 72 ..............(const.:tag."Never
3e60 20 61 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 .add.refspec".nil)))..(defcustom
3e80 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 61 64 2d 64 69 .forge-checkout-worktree-read-di
3ea0 72 65 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 rectory-function...'forge-checko
3ec0 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 69 72 65 63 74 6f ut-worktree-default-read-directo
3ee0 72 79 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 ry-function..."Function.used.by.
3f00 60 66 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 `forge-checkout-worktree'.to.rea
3f20 64 20 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 d.worktree.directory..Takes.the.
3f40 70 75 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 pull-request.as.only.argument.an
3f60 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 22 0a 20 20 3a 70 d.must.return.a.directory."...:p
3f80 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 30 22 ackage-version.'(forge..."0.4.0"
3fa0 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 66 75 6e 63 74 )...:group.'forge...:type.'funct
3fc0 69 6f 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 ion)..;;;.Dispatch..;;;###autolo
3fe0 61 64 20 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 ad.(autoload.'forge-dispatch."fo
4000 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-
4020 64 65 66 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 define-prefix.forge-dispatch.().
4040 20 20 22 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 .."Dispatch.a.forge.command."...
4060 5b 3a 69 66 20 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 3a 74 72 61 63 6b [:if.forge--get-repository:track
4080 65 64 3f 0a 20 20 20 5b 22 43 72 65 61 74 65 22 0a 20 20 20 20 28 22 63 20 69 22 20 22 69 73 73 ed?....["Create".....("c.i"."iss
40a0 75 65 22 20 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 69 73 73 ue".............forge-create-iss
40c0 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 65 73 74 22 20 20 20 ue).....("c.p"."pull-request"...
40e0 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 20 28 22 63 ...forge-create-pullreq).....("c
4100 20 75 22 20 22 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 66 72 6f 6d 20 69 73 73 75 65 22 0a 20 20 .u"."pull-request.from.issue"...
4120 20 20 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 66 72 6f 6d 2d 69 73 73 ...forge-create-pullreq-from-iss
4140 75 65 0a 20 20 20 20 20 3a 69 66 20 66 6f 72 67 65 2d 2d 67 65 74 2d 67 69 74 68 75 62 2d 72 65 ue......:if.forge--get-github-re
4160 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 28 22 63 20 66 22 20 22 66 6f 72 6b 20 6f 72 20 72 65 pository).....("c.f"."fork.or.re
4180 6d 6f 74 65 22 20 20 20 20 66 6f 72 67 65 2d 66 6f 72 6b 29 5d 5d 0a 20 20 5b 3a 69 66 20 66 6f mote"....forge-fork)]]...[:if.fo
41a0 72 67 65 2d 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 3a 74 72 61 63 6b 65 64 3f 0a 20 20 20 rge--get-repository:tracked?....
41c0 5b 22 4c 69 73 74 22 0a 20 20 20 20 28 22 74 22 20 22 74 6f 70 69 63 73 2e 2e 2e 20 20 20 20 20 ["List".....("t"."topics........
41e0 20 20 20 20 22 20 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 20 20 20 20 20 20 20 20 ...."..forge-topics-menu........
4200 3a 74 72 61 6e 73 69 65 6e 74 20 72 65 70 6c 61 63 65 29 0a 20 20 20 20 28 22 6e 22 20 22 6e 6f :transient.replace).....("n"."no
4220 74 69 66 69 63 61 74 69 6f 6e 73 2e 2e 2e 20 20 22 20 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 tifications....."..forge-notific
4240 61 74 69 6f 6e 73 2d 6d 65 6e 75 20 3a 74 72 61 6e 73 69 65 6e 74 20 72 65 70 6c 61 63 65 29 0a ations-menu.:transient.replace).
4260 20 20 20 20 28 22 72 22 20 22 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 2e 2e 20 20 20 22 20 20 66 ....("r"."repositories......"..f
4280 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e 75 20 20 3a 74 72 61 6e 73 69 65 orge-repositories-menu..:transie
42a0 6e 74 20 72 65 70 6c 61 63 65 29 5d 0a 20 20 20 5b 22 46 65 74 63 68 22 0a 20 20 20 20 28 22 66 nt.replace)]....["Fetch".....("f
42c0 20 66 22 20 22 61 6c 6c 20 74 6f 70 69 63 73 20 20 20 20 20 20 20 22 20 66 6f 72 67 65 2d 70 75 .f"."all.topics.......".forge-pu
42e0 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 20 20 20 20 20 20 20 ll).....("f.t"."one.topic.......
4300 20 22 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 22 20 .".forge-pull-topic).....("f.n".
4320 22 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 20 20 20 22 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 6e "notifications....".forge-pull-n
4340 6f 74 69 66 69 63 61 74 69 6f 6e 73 29 5d 0a 20 20 20 5b 22 41 50 49 20 43 6f 6d 6d 61 6e 64 73 otifications)]....["API.Commands
4360 22 0a 20 20 20 20 3a 69 66 20 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 3a ".....:if.forge--get-repository:
4380 74 72 61 63 6b 65 64 3f 0a 20 20 20 20 28 37 20 22 4d 22 20 22 6d 65 72 67 65 22 20 66 6f 72 67 tracked?.....(7."M"."merge".forg
43a0 65 2d 6d 65 72 67 65 29 5d 5d 0a 20 20 5b 3a 69 66 20 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 70 e-merge)]]...[:if.forge--get-rep
43c0 6f 73 69 74 6f 72 79 3a 74 72 61 63 6b 65 64 3f 0a 20 20 20 5b 22 56 69 73 69 74 22 0a 20 20 20 ository:tracked?....["Visit"....
43e0 20 28 22 76 20 74 22 20 22 74 6f 70 69 63 22 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 76 69 .("v.t"."topic".........forge-vi
4400 73 69 74 2d 74 6f 70 69 63 29 0a 20 20 20 20 28 22 76 20 69 22 20 22 69 73 73 75 65 22 20 20 20 sit-topic).....("v.i"."issue"...
4420 20 20 20 20 20 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 69 73 73 75 65 29 0a 20 20 20 20 28 22 76 ......forge-visit-issue).....("v
4440 20 70 22 20 22 70 75 6c 6c 2d 72 65 71 75 65 73 74 22 20 20 66 6f 72 67 65 2d 76 69 73 69 74 2d .p"."pull-request"..forge-visit-
4460 70 75 6c 6c 72 65 71 29 5d 0a 20 20 20 5b 22 42 72 6f 77 73 65 22 0a 20 20 20 20 28 22 62 20 74 pullreq)]....["Browse".....("b.t
4480 22 20 22 74 6f 70 69 63 22 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 "."topic".........forge-browse-t
44a0 6f 70 69 63 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 20 20 opic).....("b.i"."issue"........
44c0 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 73 75 65 29 0a 20 20 20 20 28 22 62 20 70 22 20 .forge-browse-issue).....("b.p".
44e0 22 70 75 6c 6c 2d 72 65 71 75 65 73 74 22 20 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 70 75 6c "pull-request"..forge-browse-pul
4500 6c 72 65 71 29 5d 0a 20 20 20 5b 22 42 72 6f 77 73 65 22 0a 20 20 20 20 28 22 62 20 72 22 20 22 lreq)]....["Browse".....("b.r"."
4520 72 65 6d 6f 74 65 22 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 72 65 6d 6f remote"........forge-browse-remo
4540 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 20 20 66 te).....("b.I"."issues"........f
4560 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 50 22 20 22 orge-browse-issues).....("b.P"."
4580 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 22 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 70 75 6c 6c pull-requests".forge-browse-pull
45a0 72 65 71 73 29 5d 5d 0a 20 20 5b 5b 22 43 6f 6e 66 69 67 75 72 65 22 0a 20 20 20 20 3a 69 66 20 reqs)]]...[["Configure".....:if.
45c0 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 3a 74 72 61 63 6b 65 64 3f 0a 20 forge--get-repository:tracked?..
45e0 20 20 20 28 22 61 20 20 22 20 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a ...("a..".forge-add-repository).
4600 20 20 20 20 28 22 52 20 20 22 20 66 6f 72 67 65 2d 61 64 64 2d 70 75 6c 6c 72 65 71 2d 72 65 66 ....("R..".forge-add-pullreq-ref
4620 73 70 65 63 29 0a 20 20 20 20 28 22 73 20 72 22 20 66 6f 72 67 65 2d 66 6f 72 67 65 2e 72 65 6d spec).....("s.r".forge-forge.rem
4640 6f 74 65 29 0a 20 20 20 20 28 22 73 20 6c 22 20 66 6f 72 67 65 2d 66 6f 72 67 65 2e 67 72 61 70 ote).....("s.l".forge-forge.grap
4660 68 71 6c 49 74 65 6d 4c 69 6d 69 74 29 0a 20 20 20 20 28 22 73 20 73 22 20 66 6f 72 67 65 2d 74 hqlItemLimit).....("s.s".forge-t
4680 6f 67 67 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 29 0a oggle-display-in-status-buffer).
46a0 20 20 20 20 28 22 73 20 63 22 20 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 63 6c 6f 73 65 64 2d 76 ....("s.c".forge-toggle-closed-v
46c0 69 73 69 62 69 6c 69 74 79 29 5d 5d 0a 20 20 5b 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 28 6c isibility)]]...[[:description.(l
46e0 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 28 69 66 20 ambda.()....................(if.
4700 28 6d 61 67 69 74 2d 67 69 74 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (magit-gitdir)..................
4720 20 20 20 20 20 20 22 46 6f 72 67 65 20 64 6f 65 73 6e 27 74 20 6b 6e 6f 77 20 61 62 6f 75 74 20 ......"Forge.doesn't.know.about.
4740 74 68 69 73 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 20 79 65 74 22 0a 20 20 20 20 20 20 20 this.Git.repository.yet"........
4760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 4e 6f 74 20 69 6e 73 69 64 65 20 61 20 47 69 74 20 .............."Not.inside.a.Git.
4780 72 65 70 6f 73 69 74 6f 72 79 22 29 29 0a 20 20 20 20 3a 69 66 2d 6e 6f 74 20 66 6f 72 67 65 2d repository")).....:if-not.forge-
47a0 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 3a 74 72 61 63 6b 65 64 3f 0a 20 20 20 20 28 22 61 -get-repository:tracked?.....("a
47c0 22 20 22 61 64 64 20 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 20 64 61 74 61 62 61 73 65 22 20 66 "."add.repository.to.database".f
47e0 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 28 22 66 22 20 22 66 orge-add-repository).....("f"."f
4800 65 74 63 68 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 20 20 20 20 20 20 20 20 66 6f 72 67 65 etch.notifications"........forge
4820 2d 70 75 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 29 0a 20 20 20 20 28 22 6c 22 20 22 6c -pull-notifications).....("l"."l
4840 69 73 74 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 ist.notifications".........forge
4860 2d 6c 69 73 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 29 5d 5d 29 0a 0a 3b 3b 3b 20 50 75 6c -list-notifications)]])..;;;.Pul
4880 6c 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 70 l..;;;###autoload.(defun.forge-p
48a0 75 6c 6c 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f 20 73 69 6e 63 65 20 69 6e 74 65 72 61 ull.(&optional.repo.since.intera
48c0 63 74 69 76 65 20 63 61 6c 6c 62 61 63 6b 29 0a 20 20 22 50 75 6c 6c 20 74 6f 70 69 63 73 20 66 ctive.callback)..."Pull.topics.f
48e0 72 6f 6d 20 74 68 65 20 66 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a 57 69 74 68 20 rom.the.forge.repository...With.
4900 61 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 61 6e 64 20 69 66 20 74 68 65 20 72 65 70 a.prefix.argument.and.if.the.rep
4920 6f 73 69 74 6f 72 79 20 68 61 73 20 6e 6f 74 20 62 65 65 6e 20 66 65 74 63 68 65 64 0a 62 65 66 ository.has.not.been.fetched.bef
4940 6f 72 65 2c 20 74 68 65 6e 20 72 65 61 64 20 61 20 64 61 74 65 20 66 72 6f 6d 20 74 68 65 20 75 ore,.then.read.a.date.from.the.u
4960 73 65 72 20 61 6e 64 20 6c 69 6d 69 74 20 70 75 6c 6c 65 64 20 74 6f 70 69 63 73 20 74 6f 0a 74 ser.and.limit.pulled.topics.to.t
4980 68 6f 73 65 20 74 68 61 74 20 68 61 76 65 20 62 65 65 6e 20 75 70 64 61 74 65 64 20 73 69 6e 63 hose.that.have.been.updated.sinc
49a0 65 20 74 68 65 6e 2e 0a 0a 49 66 20 70 75 6c 6c 69 6e 67 20 69 73 20 74 6f 6f 20 73 6c 6f 77 2c e.then...If.pulling.is.too.slow,
49c0 20 74 68 65 6e 20 61 6c 73 6f 20 63 6f 6e 73 69 64 65 72 20 73 65 74 74 69 6e 67 20 74 68 65 20 .then.also.consider.setting.the.
49e0 47 69 74 20 76 61 72 69 61 62 6c 65 0a 60 66 6f 72 67 65 2e 6f 6d 69 74 45 78 70 65 6e 73 69 76 Git.variable.`forge.omitExpensiv
4a00 65 27 20 74 6f 20 60 74 72 75 65 27 2e 0a 5c 6e 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 52 45 e'.to.`true'..\n(fn.&optional.RE
4a20 50 4f 20 53 49 4e 43 45 29 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c 69 PO.SINCE)"...(interactive....(li
4a40 73 74 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 63 75 72 72 65 6e 74 2d 70 72 65 st.nil..........(and.current-pre
4a60 66 69 78 2d 61 72 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 72 65 70 fix-arg...............(let.((rep
4a80 6f 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 29 0a 20 o.(forge-current-repository)))..
4aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 6e 6f 74 20 72 65 70 6f 29 0a 20 20 ...............(or.(not.repo)...
4ac0 20 20 20 20 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 2d 67 65 ..................(not.(forge-ge
4ae0 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 3a 74 72 61 63 6b 65 64 3f 29 29 29 29 0a t-repository.repo.:tracked?)))).
4b00 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 74 65 20 22 ..............(forge-read-date."
4b20 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 74 65 73 20 Limit.pulling.to.topics.updates.
4b40 73 69 6e 63 65 3a 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 74 29 29 0a 20 20 28 6c 65 74 20 28 since:."))..........t))...(let.(
4b60 63 72 65 61 74 65 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 28 6e 6f 74 20 72 65 70 6f 29 create).....(when.(or.(not.repo)
4b80 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 2d 67 65 74 2d 72 ...............(not.(forge-get-r
4ba0 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 3a 74 72 61 63 6b 65 64 3f 29 29 29 0a 20 20 20 20 epository.repo.:tracked?))).....
4bc0 20 20 28 73 65 74 71 20 72 65 70 6f 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 72 65 70 6f ..(setq.repo.(forge-current-repo
4be0 73 69 74 6f 72 79 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 72 65 70 6f 0a 20 20 20 20 sitory)).......(unless.repo.....
4c00 20 20 20 20 28 73 65 74 71 20 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 ....(setq.repo.(forge-get-reposi
4c20 74 6f 72 79 20 3a 69 6e 73 65 72 74 21 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 72 tory.:insert!)).........(setq.cr
4c40 65 61 74 65 20 74 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 63 72 65 61 74 65 20 69 eate.t))).....(when.(or.create.i
4c60 6e 74 65 72 61 63 74 69 76 65 20 28 6d 61 67 69 74 2d 67 69 74 2d 63 6f 6e 66 69 67 2d 70 20 22 nteractive.(magit-git-config-p."
4c80 66 6f 72 67 65 2e 61 75 74 6f 50 75 6c 6c 22 20 74 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 forge.autoPull".t)).......(when.
4ca0 28 61 6e 64 20 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (and.interactive................
4cc0 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 0a 20 20 20 20 20 20 ..(oref.repo.selective-p).......
4ce0 20 20 20 20 20 20 20 20 20 20 20 28 79 65 73 2d 6f 72 2d 6e 6f 2d 70 0a 20 20 20 20 20 20 20 20 ...........(yes-or-no-p.........
4d00 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 41 6c 77 61 79 73 20 70 75 6c 6c 20 61 ..........(format."Always.pull.a
4d20 6c 6c 20 6f 66 20 25 73 2f 25 73 27 73 20 74 6f 70 69 63 73 20 67 6f 69 6e 67 20 66 6f 72 77 61 ll.of.%s/%s's.topics.going.forwa
4d40 72 64 3f 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 28 rd?"...........................(
4d60 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 20 20 oref.repo.owner)................
4d80 20 20 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 29 29 0a 20 ...........(oref.repo.name))))..
4da0 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 73 65 6c 65 63 74 69 76 65 2d 70 20 6e 69 .......(oset.repo.selective-p.ni
4dc0 6c 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 72 65 6d 6f 74 65 20 20 28 l)).......(when-let*.((remote..(
4de0 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 20 20 20 20 oref.repo.remote))..............
4e00 20 20 20 20 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 .....(refspec.(oref.repo.pullreq
4e20 2d 72 65 66 73 70 65 63 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 63 -refspec))).........(when.(and.c
4e40 72 65 61 74 65 0a 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 6d reate....................(not.(m
4e60 65 6d 62 65 72 20 72 65 66 73 70 65 63 20 28 6d 61 67 69 74 2d 67 65 74 2d 61 6c 6c 20 22 72 65 ember.refspec.(magit-get-all."re
4e80 6d 6f 74 65 22 20 72 65 6d 6f 74 65 20 22 66 65 74 63 68 22 29 29 29 0a 20 20 20 20 20 20 20 20 mote".remote."fetch"))).........
4ea0 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 65 71 20 66 6f 72 67 65 2d 61 64 64 2d 70 75 6c ...........(or.(eq.forge-add-pul
4ec0 6c 72 65 71 2d 72 65 66 73 70 65 63 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lreq-refspec.t).................
4ee0 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 20 66 6f 72 67 65 2d 61 64 64 2d 70 75 6c 6c 72 65 .......(and.(eq.forge-add-pullre
4f00 71 2d 72 65 66 73 70 65 63 20 27 61 73 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 q-refspec.'ask).................
4f20 20 20 20 20 20 20 20 20 20 20 20 20 28 79 2d 6f 72 2d 6e 2d 70 20 28 66 6f 72 6d 61 74 20 22 41 ............(y-or-n-p.(format."A
4f40 6c 73 6f 20 61 64 64 20 25 53 20 72 65 66 73 70 65 63 3f 20 22 20 72 65 66 73 70 65 63 29 29 29 lso.add.%S.refspec?.".refspec)))
4f60 29 29 0a 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 20 22 63 6f ))...........(magit-call-git."co
4f80 6e 66 69 67 22 20 22 2d 2d 61 64 64 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nfig"."--add"...................
4fa0 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 2e 66 65 74 63 68 ........(format."remote.%s.fetch
4fc0 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 20 20 20 20 20 20 ".remote).......................
4fe0 20 20 20 20 72 65 66 73 70 65 63 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c ....refspec))).......(forge--pul
5000 6c 20 72 65 70 6f 20 63 61 6c 6c 62 61 63 6b 20 73 69 6e 63 65 29 29 29 29 0a 0a 28 64 65 66 75 l.repo.callback.since))))..(defu
5020 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 64 61 74 65 20 28 70 72 6f 6d 70 74 29 0a 20 20 28 72 65 n.forge-read-date.(prompt)...(re
5040 71 75 69 72 65 20 28 71 75 6f 74 65 20 6f 72 67 29 20 6e 69 6c 29 0a 20 20 28 69 66 20 28 66 62 quire.(quote.org).nil)...(if.(fb
5060 6f 75 6e 64 70 20 27 6f 72 67 2d 72 65 61 64 2d 64 61 74 65 29 0a 20 20 20 20 20 20 28 6f 72 67 oundp.'org-read-date).......(org
5080 2d 72 65 61 64 2d 64 61 74 65 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 70 72 6f 6d 70 74 29 0a 20 -read-date.nil.nil.nil.prompt)..
50a0 20 20 20 28 63 6c 2d 62 6c 6f 63 6b 20 6e 69 6c 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 74 0a ...(cl-block.nil.......(while.t.
50c0 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 74 72 20 28 72 65 61 64 2d 66 72 6f 6d 2d 6d 69 ........(let.((str.(read-from-mi
50e0 6e 69 62 75 66 66 65 72 20 70 72 6f 6d 70 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f nibuffer.prompt)))...........(co
5100 6e 64 20 28 28 73 74 72 69 6e 67 2d 65 71 75 61 6c 20 73 74 72 20 22 22 29 0a 20 20 20 20 20 20 nd.((string-equal.str."").......
5120 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 72 65 74 75 72 6e 20 6e 69 6c 29 29 0a 20 20 20 20 ...........(cl-return.nil)).....
5140 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 0a 20 20 20 ............((string-match-p....
5160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 60 5b 30 2d 39 5d 5c 5c 7b 34 5c 5c 7d 5b ..............."\\`[0-9]\\{4\\}[
5180 2d 2f 5d 5b 30 2d 39 5d 5c 5c 7b 32 5c 5c 7d 5b 2d 2f 5d 5b 30 2d 39 5d 5c 5c 7b 32 5c 5c 7d 5c -/][0-9]\\{2\\}[-/][0-9]\\{2\\}\
51a0 5c 27 22 20 73 74 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 72 65 \'".str)..................(cl-re
51c0 74 75 72 6e 20 73 74 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 50 turn.str)))).........(message."P
51e0 6c 65 61 73 65 20 65 6e 74 65 72 20 61 20 64 61 74 65 20 69 6e 20 74 68 65 20 66 6f 72 6d 61 74 lease.enter.a.date.in.the.format
5200 20 59 59 59 59 2d 4d 4d 2d 44 44 2e 22 29 0a 20 20 20 20 20 20 20 20 28 73 69 74 2d 66 6f 72 20 .YYYY-MM-DD.").........(sit-for.
5220 31 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 70 75 6c 1)))))..(cl-defmethod.forge--pul
5240 6c 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 6e 6f 61 70 69 2d 72 65 70 6f 73 69 74 6f 72 79 29 l.((repo.forge-noapi-repository)
5260 20 26 72 65 73 74 20 5f 29 0a 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 74 20 74 .&rest._)...(forge--msg.repo.t.t
5280 20 22 50 75 6c 6c 69 6e 67 20 66 72 6f 6d 20 52 45 50 4f 20 69 73 20 6e 6f 74 20 73 75 70 70 6f ."Pulling.from.REPO.is.not.suppo
52a0 72 74 65 64 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 70 75 rted"))..(cl-defmethod.forge--pu
52c0 6c 6c 20 28 28 72 65 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 ll.((repo.forge-unusedapi-reposi
52e0 74 6f 72 79 29 20 26 72 65 73 74 20 5f 29 0a 20 20 28 6d 61 67 69 74 2d 67 69 74 2d 66 65 74 63 tory).&rest._)...(magit-git-fetc
5300 68 20 28 6f 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 h.(oref.repo.remote).(magit-fetc
5320 68 2d 61 72 67 75 6d 65 6e 74 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6d 61 h-arguments)))..(defun.forge--ma
5340 79 62 65 2d 67 69 74 2d 66 65 74 63 68 20 28 72 65 70 6f 20 26 6f 70 74 69 6f 6e 61 6c 20 62 75 ybe-git-fetch.(repo.&optional.bu
5360 66 66 65 72 29 0a 20 20 28 69 66 20 28 61 6e 64 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 ffer)...(if.(and.(buffer-live-p.
5380 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 buffer)............(with-current
53a0 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 -buffer.buffer..............(and
53c0 20 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 20 .(derived-mode-p.'magit-mode)...
53e0 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 70 6f 73 69 74 6f 72 ................(forge-repositor
5400 79 2d 65 71 75 61 6c 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 y-equal.(forge-get-repository.:s
5420 74 75 62 3f 29 20 72 65 70 6f 29 29 29 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 tub?).repo)))).......(with-curre
5440 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d nt-buffer.buffer.........(magit-
5460 67 69 74 2d 66 65 74 63 68 20 28 6f 72 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 20 28 6d 61 git-fetch.(oref.repo.remote).(ma
5480 67 69 74 2d 66 65 74 63 68 2d 61 72 67 75 6d 65 6e 74 73 29 29 29 0a 20 20 20 20 28 77 68 65 6e git-fetch-arguments))).....(when
54a0 2d 6c 65 74 20 28 28 77 6f 72 6b 74 72 65 65 20 28 66 6f 72 67 65 2d 67 65 74 2d 77 6f 72 6b 74 -let.((worktree.(forge-get-workt
54c0 72 65 65 20 72 65 70 6f 29 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 ree.repo))).......(let.((default
54e0 2d 64 69 72 65 63 74 6f 72 79 20 77 6f 72 6b 74 72 65 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 -directory.worktree)............
5500 20 28 6d 61 67 69 74 2d 69 6e 68 69 62 69 74 2d 72 65 66 72 65 73 68 20 74 29 29 0a 20 20 20 20 .(magit-inhibit-refresh.t)).....
5520 20 20 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 72 65 70 6f 20 ....(magit-git-fetch.(oref.repo.
5540 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 6e 74 73 29 29 remote).(magit-fetch-arguments))
5560 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 72 67 ))))..;;;###autoload.(defun.forg
5580 65 2d 70 75 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 28 29 0a 20 20 22 46 65 74 63 68 e-pull-notifications.()..."Fetch
55a0 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 66 6f 72 20 61 6c 6c 20 72 65 70 6f 73 69 74 6f 72 .notifications.for.all.repositor
55c0 69 65 73 20 66 72 6f 6d 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 6f 72 67 65 2e 22 0a 20 20 28 ies.from.the.current.forge."...(
55e0 69 6e 74 65 72 61 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 interactive)...(if-let.((repo.(f
5600 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?)))...
5620 20 20 20 20 28 6c 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 ....(let.((class.(eieio-object-c
5640 6c 61 73 73 20 72 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 lass.repo))).........(if.(eq.cla
5660 73 73 20 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 ss.'forge-github-repository)....
5680 20 20 20 20 20 20 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 .........(forge--pull-notificati
56a0 6f 6e 73 20 63 6c 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 ons.class.(oref.repo.githost))..
56c0 20 20 20 20 20 20 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 .........(user-error."Fetching.n
56e0 6f 74 69 66 69 63 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 otifications.not.supported.for.f
5700 6f 72 67 65 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 28 orge.%S".......................(
5720 6f 72 65 66 20 72 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 oref.repo.forge)))).....(forge--
5740 70 75 6c 6c 2d 6e 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 pull-notifications.'forge-github
5760 2d 72 65 70 6f 73 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 -repository."github.com")))..;;;
5780 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 70 75 6c ###autoload.(autoload.'forge-pul
57a0 6c 2d 74 6f 70 69 63 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 l-topic."forge-commands".nil.t).
57c0 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 70 (transient-define-suffix.forge-p
57e0 75 6c 6c 2d 74 6f 70 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 ull-topic.(number)..."Read.a.top
5800 69 63 20 54 59 50 45 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 ic.TYPE.and.NUMBER.pull.data.abo
5820 75 74 20 69 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 ut.it.from.its.forge."...:inapt-
5840 69 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 if-not.#'forge--get-github-repos
5860 69 74 6f 72 79 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 72 itory...(interactive....(list.(r
5880 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 0a 20 20 20 20 20 20 ead-number."Pull.topic:.".......
58a0 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 74 6f 70 69 ................(and-let*.((topi
58c0 63 20 28 66 6f 72 67 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 c.(forge-current-topic))).......
58e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 74 6f 70 69 63 20 6e 75 ..................(oref.topic.nu
5900 6d 62 65 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 mber)))))...(forge--pull-topic.(
5920 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 29 20 6e forge-get-repository.:tracked).n
5940 75 6d 62 65 72 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 umber))..;;;###autoload.(autoloa
5960 64 20 27 66 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 d.'forge-pull-this-topic."forge-
5980 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 69 commands".nil.t).(transient-defi
59a0 6e 65 2d 73 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 ne-suffix.forge-pull-this-topic.
59c0 28 29 0a 20 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 ()..."Pull.data.about.the.topic.
59e0 61 74 20 70 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 at.point.from.its.forge."...:ina
5a00 70 74 2d 69 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 pt-if-not.#'forge--get-github-re
5a20 70 6f 73 69 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 pository...:description."fetch".
5a40 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 74 6f 70 69 63 20 28 ..(interactive)...(let.((topic.(
5a60 66 6f 72 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 28 66 6f forge-current-topic.t))).....(fo
5a80 72 67 65 2d 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 rge--pull-topic.(forge-get-repos
5aa0 69 74 6f 72 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 itory.topic).topic)))..(cl-defme
5ac0 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 72 65 70 6f 20 66 6f thod.forge--pull-topic.((repo.fo
5ae0 72 67 65 2d 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 rge-repository)._topic)...(error
5b00 20 22 46 65 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 ."Fetching.an.individual.topic.n
5b20 6f 74 20 69 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 ot.implemented.for.%s"..........
5b40 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 0a 0a 3b 3b 3b (eieio-object-class.repo)))..;;;
5b60 20 42 72 6f 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 .Browse..;;;###autoload.(defun.f
5b80 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 73 75 65 73 20 28 29 0a 20 20 22 56 69 73 69 74 20 74 orge-browse-issues.()..."Visit.t
5ba0 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 27 73 20 69 73 73 75 65 73 20 75 he.current.repository's.issues.u
5bc0 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)
5be0 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
5c00 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)......
5c20 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 69 73 73 75 65 73 2d ........................'issues-
5c40 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 28 64 url-format)))..;;;###autoload.(d
5c60 65 66 75 6e 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 70 75 6c 6c 72 65 71 73 20 28 29 0a 20 20 efun.forge-browse-pullreqs.()...
5c80 22 56 69 73 69 74 20 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 "Visit.the.current.repository's.
5ca0 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 22 0a pull-requests.using.a.browser.".
5cc0 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 28 66 ..(interactive)...(browse-url.(f
5ce0 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 74 6f orge--format.(forge-get-reposito
5d00 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 20 20 ry.:stub).......................
5d20 20 20 20 20 20 20 20 27 70 75 6c 6c 72 65 71 73 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 29 0a 0a .......'pullreqs-url-format)))..
5d40 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
5d60 73 65 2d 74 6f 70 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 se-topic.(topic)..."Read.a.TOPIC
5d80 20 61 6e 64 20 76 69 73 69 74 20 69 74 20 75 73 69 6e 67 20 61 20 62 72 6f 77 73 65 72 2e 0a 42 .and.visit.it.using.a.browser..B
5da0 79 20 64 65 66 61 75 6c 74 20 6f 6e 6c 79 20 6f 66 66 65 72 20 6f 70 65 6e 20 74 6f 70 69 63 73 y.default.only.offer.open.topics
5dc0 20 62 75 74 20 77 69 74 68 20 61 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 0a 61 6c 73 6f .but.with.a.prefix.argument.also
5de0 20 6f 66 66 65 72 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 .offer.closed.topics."...(intera
5e00 63 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 42 ctive.(list.(forge-read-topic."B
5e20 72 6f 77 73 65 20 74 6f 70 69 63 22 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 62 72 6f 77 73 65 rowse.topic")))...(forge--browse
5e40 2d 74 6f 70 69 63 20 74 6f 70 69 63 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 -topic.topic))..;;;###autoload.(
5e60 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 73 75 65 29 defun.forge-browse-issue.(issue)
5e80 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 69 74 20 75 ..."Read.an.ISSUE.and.visit.it.u
5ea0 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.
5ec0 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 20 70 72 65 offer.open.issues.but.with.a.pre
5ee0 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 69 fix.argument.also.offer.closed.i
5f00 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 20 28 66 6f ssues."...(interactive.(list.(fo
5f20 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 22 29 29 29 rge-read-issue."Browse.issue")))
5f40 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 65 29 29 0a ...(forge--browse-topic.issue)).
5f60 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
5f80 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 20 22 52 65 wse-pullreq.(pull-request)..."Re
5fa0 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 69 74 20 75 ad.a.PULL-REQUEST.and.visit.it.u
5fc0 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.
5fe0 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 20 77 69 74 offer.open.pull-requests.but.wit
6000 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 65 72 20 63 h.a.prefix.argument.also.offer.c
6020 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 65 72 61 63 losed.pull-requests."...(interac
6040 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 65 71 20 22 tive.(list.(forge-read-pullreq."
6060 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 6f 72 67 65 Browse.pull-request")))...(forge
6080 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 29 0a 0a 28 --browse-topic.pull-request))..(
60a0 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 6f 70 69 63 defun.forge--browse-topic.(topic
60c0 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 70 69 63 20 )...(let.((obj.(forge-get-topic.
60e0 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 72 67 65 2d topic))).....(browse-url.(forge-
6100 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 69 63 2d 6d get-url.obj)).....(forge-topic-m
6120 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 6f 61 64 0a ark-read.obj)))..;;;###autoload.
6140 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 63 6f 6d 6d (defun.forge-browse-commit.(comm
6160 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 69 74 20 69 it)..."Read.a.COMMIT.and.visit.i
6180 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
61a0 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 65 74 69 6e ve....(list.(or.(magit-completin
61c0 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 20 20 20 20 g-read."Browse.commit"..........
61e0 20 20 20 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 ...........................(magi
6200 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 20 20 20 20 t-list-branch-names)............
6220 20 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 6e 69 6c .........................nil.nil
6240 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 0a 20 20 20 .nil.'magit-revision-history....
6260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
6280 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 70 6f 69 6e .(magit-branch-or-commit-at-poin
62a0 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 20 22 4e 6f t))..............(user-error."No
62c0 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 65 2d 75 72 thing.selected"))))...(browse-ur
62e0 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 6d 69 74 29 l.(forge-get-url.:commit.commit)
6300 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-
6320 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 61 64 20 61 browse-branch.(branch)..."Read.a
6340 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 20 62 72 6f .BRANCH.and.visit.it.using.a.bro
6360 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 28 6d 61 67 wser."...(interactive.(list.(mag
6380 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 68 22 29 29 it-read-branch."Browse.branch"))
63a0 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 6c 20 3a )...(browse-url.(forge-get-url.:
63c0 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 6c 6f 61 64 branch.branch)))..;;;###autoload
63e0 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 28 72 65 6d .(defun.forge-browse-remote.(rem
6400 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 73 69 74 20 ote)..."Read.a.REMOTE.and.visit.
6420 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 61 63 74 it.using.a.browser."...(interact
6440 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 20 22 42 72 ive.(list.(magit-read-remote."Br
6460 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 77 73 65 2d owse.remote".nil.t)))...(browse-
6480 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 65 6d 6f 74 url.(forge-get-url.:remote.remot
64a0 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 66 6f 72 67 e)))..;;;###autoload.(defun.forg
64c0 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 6f 72 79 29 e-browse-repository.(repository)
64e0 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 73 69 74 20 ..."Read.a.REPOSITORY.and.visit.
6500 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 61 63 74 it.using.a.browser."...(interact
6520 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 74 6f 72 79 ive.(list.(forge-read-repository
6540 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 72 6f 77 73 ."Browse.repository")))...(brows
6560 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 6f 72 79 29 e-url.(forge-get-url.repository)
6580 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f ))..;;;###autoload.(autoload.'fo
65a0 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 72 67 65 2d 63 6f 6d rge-browse-this-topic."forge-com
65c0 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 69 6e 65 2d mands".nil.t).(transient-define-
65e0 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 74 6f 70 69 63 20 28 suffix.forge-browse-this-topic.(
6600 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 20 75 73 )..."Visit.the.topic.at.point.us
6620 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 70 74 69 6f 6e 20 22 ing.a.browser."...:description."
6640 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 20 28 66 6f 72 67 65 browse"...(interactive)...(forge
6660 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 65 6e 74 2d 74 6f 70 -browse-topic.(forge-current-top
6680 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 64 65 66 75 6e 20 66 ic.t)))..;;;###autoload.(defun.f
66a0 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 20 28 29 0a 20 orge-browse-this-repository.()..
66c0 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 20 70 6f 69 6e 74 20 ."Visit.the.repository.at.point.
66e0 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 76 65 using.a.browser."...(interactive
6700 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 6f 72 79 20 28 66 6f )...(forge-browse-repository.(fo
6720 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 29 29 29 0a 0a 3b 3b rge-repository-at-point.t)))..;;
6740 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 63 6f 70 79 2d 75 ;###autoload.(defun.forge-copy-u
6760 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 22 43 6f 70 79 20 74 rl-at-point-as-kill.()..."Copy.t
6780 68 65 20 75 72 6c 20 6f 66 20 74 68 65 20 74 68 69 6e 67 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 he.url.of.the.thing.at.point."..
67a0 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 28 74 61 72 67 65 .(interactive)...(if-let.((targe
67c0 74 20 28 66 6f 72 67 65 2d 2d 62 72 6f 77 73 65 2d 74 61 72 67 65 74 29 29 29 0a 20 20 20 20 20 t.(forge--browse-target)))......
67e0 20 28 6c 65 74 20 28 28 75 72 6c 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 74 61 72 67 65 74 29 .(let.((url.(if.(stringp.target)
6800 20 74 61 72 67 65 74 20 28 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 74 61 72 67 65 74 29 29 29 .target.(forge-get-url.target)))
6820 29 0a 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 6e 65 77 20 75 72 6c 29 0a 20 20 20 20 20 20 20 ).........(kill-new.url)........
6840 20 28 6d 65 73 73 61 67 65 20 22 43 6f 70 69 65 64 20 5c 22 25 73 5c 22 22 20 75 72 6c 29 29 0a .(message."Copied.\"%s\"".url)).
6860 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 68 69 6e 67 20 61 74 20 70 6f 69 6e ....(user-error."Nothing.at.poin
6880 74 20 77 69 74 68 20 61 20 55 52 4c 22 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 t.with.a.URL")))..;;;###autoload
68a0 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 20 28 29 0a 20 20 22 56 69 73 69 74 .(defun.forge-browse.()..."Visit
68c0 20 74 68 65 20 74 68 69 6e 67 20 61 74 20 70 6f 69 6e 74 20 75 73 69 6e 67 20 61 20 62 72 6f 77 .the.thing.at.point.using.a.brow
68e0 73 65 72 2e 22 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 ser."...(interactive)...(if-let.
6900 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 61 72 67 65 74 29 29 ((target.(forge--browse-target))
6920 29 0a 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 74 61 72 67 65 74 29 0a 20 20 20 ).......(if.(stringp.target)....
6940 20 20 20 20 20 20 20 28 62 72 6f 77 73 65 2d 75 72 6c 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 .......(browse-url.target)......
6960 20 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 6c 20 74 61 ...(browse-url.(forge-get-url.ta
6980 72 67 65 74 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 63 6c 2d 74 79 70 65 70 20 74 rget)).........(when.(cl-typep.t
69a0 61 72 67 65 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 28 66 arget.'forge-topic)...........(f
69c0 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 61 72 6b 2d 72 65 61 64 20 74 61 72 67 65 74 29 29 29 0a 20 orge-topic-mark-read.target)))..
69e0 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 68 69 6e 67 20 74 6f 20 62 72 6f 77 73 ...(user-error."Nothing.to.brows
6a00 65 20 68 65 72 65 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 62 72 6f 77 73 65 e.here")))..(defun.forge--browse
6a20 2d 74 61 72 67 65 74 20 28 29 0a 20 20 28 6f 72 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 62 72 61 -target.()...(or.(and-let*.((bra
6a40 6e 63 68 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 6f nch.(magit--painted-branch-at-po
6a60 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 75 72 6c 20 3a 62 int))).........(forge-get-url.:b
6a80 72 61 6e 63 68 20 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 ranch.branch)).......(and-let*.(
6aa0 28 63 6f 6d 6d 69 74 20 28 6d 61 67 69 74 2d 63 6f 6d 6d 69 74 2d 61 74 2d 70 6f 69 6e 74 29 29 (commit.(magit-commit-at-point))
6ac0 29 0a 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 6d 6d 69 74 ).........(forge-get-url.:commit
6ae0 20 63 6f 6d 6d 69 74 29 29 0a 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 62 72 61 6e .commit)).......(and-let*.((bran
6b00 63 68 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 20 20 ch.(magit-branch-at-point)))....
6b20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 3a 62 72 61 6e 63 68 20 62 72 61 6e .....(forge-get-url.:branch.bran
6b40 63 68 29 29 0a 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 72 65 6d 6f 74 65 20 28 6d ch)).......(and-let*.((remote.(m
6b60 61 67 69 74 2d 72 65 6d 6f 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 agit-remote-at-point))).........
6b80 28 66 6f 72 67 65 2d 67 65 74 2d 75 72 6c 20 3a 72 65 6d 6f 74 65 20 72 65 6d 6f 74 65 29 29 0a (forge-get-url.:remote.remote)).
6ba0 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 20 20 20 ......(forge-post-at-point).....
6bc0 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 20 28 61 ..(forge-current-topic).......(a
6be0 6e 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 nd.magit-buffer-revision........
6c00 20 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 ....(forge-get-url.:commit.magit
6c20 2d 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 -buffer-revision)).......(forge-
6c40 63 75 72 72 65 6e 74 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 29 0a 0a 3b 3b 3b 3b 20 55 72 6c 73 current-repository)))..;;;;.Urls
6c60 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 28 ..(cl-defgeneric.forge-get-url.(
6c80 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 72 obj)..."Return.the.URL.for.a.for
6ca0 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 67 ge.object.")..(cl-defmethod.forg
6cc0 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 73 73 75 65 29 29 0a e-get-url.((issue.forge-issue)).
6ce0 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 73 73 75 65 2d 75 72 ..(forge--format.issue.'issue-ur
6d00 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 67 65 2d l-format))..(cl-defmethod.forge-
6d20 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 75 6c 6c 72 65 71 29 get-url.((pullreq.forge-pullreq)
6d40 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 71 20 27 70 75 6c 6c )...(forge--format.pullreq.'pull
6d60 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 6d 65 74 68 6f 64 20 req-url-format))..(cl-defmethod.
6d80 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 65 2d 72 65 70 6f 73 forge-get-url.((repo.forge-repos
6da0 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 72 65 70 6f 20 27 72 itory))...(forge--format.repo.'r
6dc0 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 65 66 6d 65 74 68 6f emote-url-format))..(cl-defmetho
6de0 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 63 6f 6d 6d 69 74 29 d.forge-get-url.((_(eql.:commit)
6e00 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 66 6f 72 67 65 2d 67 ).commit)...(let.((repo.(forge-g
6e20 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 20 20 28 75 6e 6c 65 et-repository.:stub))).....(unle
6e40 73 73 20 28 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 ss.(magit-list-containing-branch
6e60 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6d 6d 69 74 20 22 2d 72 22 20 28 63 6f 6e es..............commit."-r".(con
6e80 63 61 74 20 28 6f 72 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 20 22 2f 2a 22 29 29 0a 20 20 cat.(oref.repo.remote)."/*"))...
6ea0 20 20 20 20 28 69 66 2d 6c 65 74 2a 20 28 28 62 72 61 6e 63 68 20 28 63 61 72 20 28 6d 61 67 69 ....(if-let*.((branch.(car.(magi
6ec0 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 6f 6d 6d 69 t-list-containing-branches.commi
6ee0 74 20 22 2d 72 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 74 t."-r"))).................(remot
6f00 65 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 6d 65 20 e.(cdr.(magit-split-branch-name.
6f20 62 72 61 6e 63 68 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 72 65 70 6f 20 branch))))...........(setq.repo.
6f40 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 72 65 6d 6f (forge-get-repository.:stub.remo
6f60 74 65 29 29 0a 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 te)).........(message."%s.does.n
6f80 6f 74 20 61 70 70 65 61 72 20 74 6f 20 62 65 20 61 76 61 69 6c 61 62 6c 65 20 6f 6e 20 61 6e 79 ot.appear.to.be.available.on.any
6fa0 20 72 65 6d 6f 74 65 2e 20 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 .remote...%s"..................c
6fc0 6f 6d 6d 69 74 20 22 59 6f 75 20 6d 69 67 68 74 20 68 61 76 65 20 74 6f 20 70 75 73 68 20 69 74 ommit."You.might.have.to.push.it
6fe0 20 66 69 72 73 74 2e 22 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 72 .first."))).....(forge--format.r
7000 65 70 6f 20 27 63 6f 6d 6d 69 74 2d 75 72 6c 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 epo.'commit-url-format..........
7020 20 20 20 20 20 20 20 20 20 20 60 28 28 3f 72 20 2e 20 2c 28 6d 61 67 69 74 2d 63 6f 6d 6d 69 74 ..........`((?r...,(magit-commit
7040 2d 70 20 63 6f 6d 6d 69 74 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 -p.commit))))))..(cl-defmethod.f
7060 6f 72 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 orge-get-url.((_(eql.:branch)).b
7080 72 61 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 ranch)...(let.(remote).....(if.(
70a0 6d 61 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 magit-remote-branch-p.branch)...
70c0 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 6f 6e 73 20 28 6d 61 67 69 74 2d 73 70 6c 69 74 2d 62 ......(let.((cons.(magit-split-b
70e0 72 61 6e 63 68 2d 6e 61 6d 65 20 62 72 61 6e 63 68 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 ranch-name.branch)))...........(
7100 73 65 74 71 20 72 65 6d 6f 74 65 20 28 63 61 72 20 63 6f 6e 73 29 29 0a 20 20 20 20 20 20 20 20 setq.remote.(car.cons)).........
7120 20 20 28 73 65 74 71 20 62 72 61 6e 63 68 20 28 63 64 72 20 63 6f 6e 73 29 29 29 0a 20 20 20 20 ..(setq.branch.(cdr.cons))).....
7140 20 20 28 75 6e 6c 65 73 73 20 28 73 65 74 71 20 72 65 6d 6f 74 65 20 28 6f 72 20 28 6d 61 67 69 ..(unless.(setq.remote.(or.(magi
7160 74 2d 67 65 74 2d 70 75 73 68 2d 72 65 6d 6f 74 65 20 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 t-get-push-remote.branch).......
7180 20 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 .........................(magit-
71a0 67 65 74 2d 75 70 73 74 72 65 61 6d 2d 72 65 6d 6f 74 65 20 62 72 61 6e 63 68 29 29 29 0a 20 20 get-upstream-remote.branch)))...
71c0 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 64 65 74 65 72 6d ......(user-error."Cannot.determ
71e0 69 6e 65 20 72 65 6d 6f 74 65 20 66 6f 72 20 25 73 22 20 62 72 61 6e 63 68 29 29 29 0a 20 20 20 ine.remote.for.%s".branch)))....
7200 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 72 65 70 6f 73 .(forge--format.(forge-get-repos
7220 69 74 6f 72 79 20 3a 73 74 75 62 20 72 65 6d 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 itory.:stub.remote).............
7240 20 20 20 20 20 20 20 27 62 72 61 6e 63 68 2d 75 72 6c 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 .......'branch-url-format.......
7260 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 3f 72 20 2e 20 2c 62 72 61 6e 63 68 29 29 29 29 .............`((?r...,branch))))
7280 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 72 6c 20 28 )..(cl-defmethod.forge-get-url.(
72a0 28 5f 28 65 71 6c 20 3a 72 65 6d 6f 74 65 29 29 20 72 65 6d 6f 74 65 29 0a 20 20 28 66 6f 72 67 (_(eql.:remote)).remote)...(forg
72c0 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 74 6f 72 79 20 e--format.(forge-get-repository.
72e0 3a 73 74 75 62 20 72 65 6d 6f 74 65 29 20 27 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 :stub.remote).'remote-url-format
7300 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 72 6c 20 ))..(cl-defmethod.forge-get-url.
7320 28 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 2d 66 6f ((post.forge-post))...(forge--fo
7340 72 6d 61 74 20 70 6f 73 74 20 28 6c 65 74 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 67 65 rmat.post.(let.((topic.(forge-ge
7360 74 2d 70 61 72 65 6e 74 20 70 6f 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t-parent.post)))................
7380 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 66 6f 72 67 65 2d 2d 63 68 69 6c 64 70 20 74 .........(cond.((forge--childp.t
73a0 6f 70 69 63 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 opic.'forge-issue)..............
73c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 69 73 73 75 65 2d 70 6f 73 74 2d 75 72 ..................'issue-post-ur
73e0 6c 2d 66 6f 72 6d 61 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 l-format).......................
7400 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 2d 63 68 69 6c 64 70 20 74 6f 70 69 63 20 27 66 ........((forge--childp.topic.'f
7420 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 orge-pullreq)...................
7440 20 20 20 20 20 20 20 20 20 20 20 20 20 27 70 75 6c 6c 72 65 71 2d 70 6f 73 74 2d 75 72 6c 2d 66 .............'pullreq-post-url-f
7460 6f 72 6d 61 74 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 ormat)))))..(cl-defmethod.forge-
7480 67 65 74 2d 75 72 6c 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 get-url.((notify.forge-notificat
74a0 69 6f 6e 29 29 0a 20 20 28 6f 72 65 66 20 6e 6f 74 69 66 79 20 75 72 6c 29 29 0a 0a 3b 3b 3b 20 ion))...(oref.notify.url))..;;;.
74c0 56 69 73 69 74 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 Visit..;;;###autoload.(defun.for
74e0 67 65 2d 76 69 73 69 74 2d 74 6f 70 69 63 20 28 74 6f 70 69 63 29 0a 20 20 22 52 65 61 64 20 61 ge-visit-topic.(topic)..."Read.a
7500 20 54 4f 50 49 43 20 61 6e 64 20 76 69 73 69 74 20 69 74 2e 0a 42 79 20 64 65 66 61 75 6c 74 20 .TOPIC.and.visit.it..By.default.
7520 6f 6e 6c 79 20 6f 66 66 65 72 20 6f 70 65 6e 20 74 6f 70 69 63 73 20 66 6f 72 20 63 6f 6d 70 6c only.offer.open.topics.for.compl
7540 65 74 69 6f 6e 3b 0a 77 69 74 68 20 61 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 61 6c etion;.with.a.prefix.argument.al
7560 73 6f 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 so.closed.topics."...(interactiv
7580 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 65 77 20 e.(list.(forge-read-topic."View.
75a0 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 70 2d 62 topic")))...(forge-topic-setup-b
75c0 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 29 29 0a uffer.(forge-get-topic.topic))).
75e0 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 76 69 73 .;;;###autoload.(defun.forge-vis
7600 69 74 2d 69 73 73 75 65 20 28 69 73 73 75 65 29 0a 20 20 22 52 65 61 64 20 61 6e 20 49 53 53 55 it-issue.(issue)..."Read.an.ISSU
7620 45 20 61 6e 64 20 76 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 E.and.visit.it..By.default.only.
7640 6f 66 66 65 72 20 6f 70 65 6e 20 74 6f 70 69 63 73 20 66 6f 72 20 63 6f 6d 70 6c 65 74 69 6f 6e offer.open.topics.for.completion
7660 3b 0a 77 69 74 68 20 61 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 61 6c 73 6f 20 63 6c ;.with.a.prefix.argument.also.cl
7680 6f 73 65 64 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 osed.topics."...(interactive.(li
76a0 73 74 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 st.(forge-read-issue."View.issue
76c0 22 29 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 ")))...(forge-topic-setup-buffer
76e0 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 29 0a 0a 3b 3b 3b 23 .(forge-get-issue.issue)))..;;;#
7700 23 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 70 75 ##autoload.(defun.forge-visit-pu
7720 6c 6c 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 llreq.(pull-request)..."Read.a.P
7740 55 4c 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 ULL-REQUEST.and.visit.it..By.def
7760 61 75 6c 74 20 6f 6e 6c 79 20 6f 66 66 65 72 20 6f 70 65 6e 20 74 6f 70 69 63 73 20 66 6f 72 20 ault.only.offer.open.topics.for.
7780 63 6f 6d 70 6c 65 74 69 6f 6e 3b 0a 77 69 74 68 20 61 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 completion;.with.a.prefix.argume
77a0 6e 74 20 61 6c 73 6f 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 73 2e 22 0a 20 20 28 69 6e 74 65 72 nt.also.closed.topics."...(inter
77c0 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 65 71 active.(list.(forge-read-pullreq
77e0 20 22 56 69 65 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 ."View.pull-request")))...(forge
7800 2d 74 6f 70 69 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 -topic-setup-buffer.(forge-get-p
7820 75 6c 6c 72 65 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 ullreq.pull-request)))..;;;###au
7840 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 73 2d 74 toload.(defun.forge-visit-this-t
7860 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 6f opic.()..."Visit.the.topic.at.po
7880 69 6e 74 2e 22 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 74 int."...(interactive)...(forge-t
78a0 6f 70 69 63 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 61 opic-setup-buffer.(forge-topic-a
78c0 74 2d 70 6f 69 6e 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 t-point)))..;;;###autoload.(defu
78e0 6e 20 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 20 28 29 n.forge-visit-this-repository.()
7900 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 20 70 6f 69 6e ..."Visit.the.repository.at.poin
7920 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 2a 20 28 28 72 65 t."...(interactive)...(let*.((re
7940 70 6f 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 po.(forge-repository-at-point)).
7960 20 20 20 20 20 20 20 20 20 28 77 6f 72 6b 74 72 65 65 20 28 66 6f 72 67 65 2d 67 65 74 2d 77 6f .........(worktree.(forge-get-wo
7980 72 6b 74 72 65 65 20 72 65 70 6f 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 28 rktree.repo))).....(cond......((
79a0 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 66 6f eq.transient-current-command.'fo
79c0 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 20 20 20 20 28 69 66 rge-repositories-menu).......(if
79e0 2d 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 67 65 74 2d 62 -let.((buffer.(forge-topic-get-b
7a00 75 66 66 65 72 20 72 65 70 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 2d uffer.repo)))...........(switch-
7a20 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 28 66 6f 72 67 65 to-buffer.buffer).........(forge
7a40 2d 6c 69 73 74 2d 74 6f 70 69 63 73 20 72 65 70 6f 29 29 0a 20 20 20 20 20 20 28 74 72 61 6e 73 -list-topics.repo)).......(trans
7a60 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)).
7a80 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 69 74 2d 73 74 61 74 .....(worktree.......(magit-stat
7aa0 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 29 0a 20 20 20 20 20 us-setup-buffer.worktree))......
7ac0 28 28 66 6f 72 67 65 2d 6c 69 73 74 2d 74 6f 70 69 63 73 20 72 65 70 6f 29 29 29 29 29 0a 0a 3b ((forge-list-topics.repo)))))..;
7ae0 3b 3b 20 43 72 65 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 69 ;;.Create..(defun.forge-create-i
7b00 73 73 75 65 20 28 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 6e 65 77 20 69 73 73 75 65 20 66 6f ssue.()..."Create.a.new.issue.fo
7b20 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 20 28 69 6e r.the.current.repository."...(in
7b40 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 teractive)...(let*.((repo.(forge
7b60 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 20 -get-repository.:tracked))......
7b80 20 20 20 20 28 62 75 66 20 28 66 6f 72 67 65 2d 2d 70 72 65 70 61 72 65 2d 70 6f 73 74 2d 62 75 ....(buf.(forge--prepare-post-bu
7ba0 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 6e 65 77 2d 69 73 73 75 65 22 0a ffer................"new-issue".
7bc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 72 65 ...............(forge--format.re
7be0 70 6f 20 22 43 72 65 61 74 65 20 6e 65 77 20 69 73 73 75 65 20 6f 6e 20 25 70 22 29 29 29 29 0a po."Create.new.issue.on.%p")))).
7c00 20 20 20 20 28 77 68 65 6e 20 62 75 66 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e ....(when.buf.......(with-curren
7c20 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 t-buffer.buf.........(setq.forge
7c40 2d 2d 62 75 66 66 65 72 2d 70 6f 73 74 2d 6f 62 6a 65 63 74 20 72 65 70 6f 29 0a 20 20 20 20 20 --buffer-post-object.repo)......
7c60 20 20 20 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 ...(setq.forge--submit-post-func
7c80 74 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 65 2d 69 73 73 75 tion.#'forge--submit-create-issu
7ca0 65 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 64 69 73 70 6c 61 79 2d 70 6f 73 74 2d 62 e)).......(forge--display-post-b
7cc0 75 66 66 65 72 20 62 75 66 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 72 65 61 uffer.buf))))..(defun.forge-crea
7ce0 74 65 2d 70 75 6c 6c 72 65 71 20 28 73 6f 75 72 63 65 20 74 61 72 67 65 74 29 0a 20 20 22 43 72 te-pullreq.(source.target)..."Cr
7d00 65 61 74 65 20 61 20 6e 65 77 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 66 6f 72 20 74 68 65 20 eate.a.new.pull-request.for.the.
7d20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 current.repository."...(interact
7d40 69 76 65 20 28 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 ive.(forge-create-pullreq--read-
7d60 61 72 67 73 29 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 args))...(let*.((repo.(forge-get
7d80 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 20 20 20 -repository.:tracked))..........
7da0 28 62 75 66 20 28 66 6f 72 67 65 2d 2d 70 72 65 70 61 72 65 2d 70 6f 73 74 2d 62 75 66 66 65 72 (buf.(forge--prepare-post-buffer
7dc0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 6e 65 77 2d 70 75 6c 6c 72 65 71 22 0a 20 20 ................"new-pullreq"...
7de0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 72 65 70 6f .............(forge--format.repo
7e00 20 22 43 72 65 61 74 65 20 6e 65 77 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 6f 6e 20 25 70 22 ."Create.new.pull-request.on.%p"
7e20 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 6f 75 72 63 65 20 74 61 72 67 65 74 29 29 )................source.target))
7e40 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 0a 20 ).....(with-current-buffer.buf..
7e60 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 62 61 73 65 2d 62 72 .....(setq.forge--buffer-base-br
7e80 61 6e 63 68 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d anch.target).......(setq.forge--
7ea0 62 75 66 66 65 72 2d 68 65 61 64 2d 62 72 61 6e 63 68 20 73 6f 75 72 63 65 29 0a 20 20 20 20 20 buffer-head-branch.source)......
7ec0 20 28 73 65 74 71 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 .(setq.forge--buffer-post-object
7ee0 20 72 65 70 6f 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 .repo).......(setq.forge--submit
7f00 2d 70 6f 73 74 2d 66 75 6e 63 74 69 6f 6e 20 23 27 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 63 -post-function.#'forge--submit-c
7f20 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 reate-pullreq).......(run-hooks.
7f40 27 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 68 6f 6f 6b 29 29 0a 20 20 20 'forge-create-pullreq-hook))....
7f60 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 75 66 .(forge--display-post-buffer.buf
7f80 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 6f )))..(transient-define-suffix.fo
7fa0 72 67 65 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 65 20 28 69 rge-create-pullreq-from-issue.(i
7fc0 73 73 75 65 20 73 6f 75 72 63 65 20 74 61 72 67 65 74 29 0a 20 20 22 43 6f 6e 76 65 72 74 20 61 ssue.source.target)..."Convert.a
7fe0 6e 20 65 78 69 73 74 69 6e 67 20 49 53 53 55 45 20 69 6e 74 6f 20 61 20 70 75 6c 6c 2d 72 65 71 n.existing.ISSUE.into.a.pull-req
8000 75 65 73 74 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 63 6f 6e 76 65 72 74 20 74 uest."...:description."convert.t
8020 6f 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 22 0a 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 o.pull-request"...:if.(lambda.()
8040 0a 20 20 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 .........(let.((issue.(forge-cur
8060 72 65 6e 74 2d 69 73 73 75 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 69 73 73 rent-issue)))...........(and.iss
8080 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 6e 29 ue.(eq.(oref.issue.state).'open)
80a0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 73 73 75 65 29 29 29 0a 20 20 28 69 6e 74 65 ................issue)))...(inte
80c0 72 61 63 74 69 76 65 20 28 63 6f 6e 73 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 6f 70 65 6e 2d 69 ractive.(cons.(forge-read-open-i
80e0 73 73 75 65 20 22 43 6f 6e 76 65 72 74 20 69 73 73 75 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 ssue."Convert.issue")...........
8100 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 ...........(forge-create-pullreq
8120 2d 2d 72 65 61 64 2d 61 72 67 73 29 29 29 0a 20 20 28 73 65 74 71 20 69 73 73 75 65 20 28 66 6f --read-args)))...(setq.issue.(fo
8140 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 69 73 73 75 65 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d rge-get-issue.issue))...(forge--
8160 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 20 28 66 6f 72 67 65 create-pullreq-from-issue.(forge
8180 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 69 73 73 75 65 29 0a 20 20 20 20 20 20 20 20 20 -get-repository.issue)..........
81a0 20 20 20 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 73 73 75 65 ...........................issue
81c0 20 73 6f 75 72 63 65 20 74 61 72 67 65 74 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 .source.target))..(defun.forge-c
81e0 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 2d 72 65 61 64 2d 61 72 67 73 20 28 29 0a 20 20 28 6c reate-pullreq--read-args.()...(l
8200 65 74 2a 20 28 28 73 6f 75 72 63 65 20 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d et*.((source..(magit-completing-
8220 72 65 61 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 6f 75 72 63 65 20 read...................."Source.
8240 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 28 6d 61 67 69 branch"....................(magi
8260 74 2d 6c 69 73 74 2d 72 65 6d 6f 74 65 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 73 29 0a 20 20 20 20 t-list-remote-branch-names).....
8280 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 27 6d 61 67 69 74 2d ...............nil.t.nil.'magit-
82a0 72 65 76 69 73 69 6f 6e 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 revision-history................
82c0 20 20 20 20 28 6f 72 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 64 20 28 6d 61 67 69 74 2d 62 72 61 ....(or.(and-let*.((d.(magit-bra
82e0 6e 63 68 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nch-at-point))).................
8300 20 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 .........(if.(magit-remote-branc
8320 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 20 20 20 20 20 h-p.d)..........................
8340 20 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 ....d...........................
8360 20 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 0a 20 .(magit-get-push-branch.d.t)))..
8380 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 2d 6c 65 74 2a 20 ......................(and-let*.
83a0 28 28 64 20 28 6d 61 67 69 74 2d 67 65 74 2d 63 75 72 72 65 6e 74 2d 62 72 61 6e 63 68 29 29 29 ((d.(magit-get-current-branch)))
83c0 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 66 20 28 6d ..........................(if.(m
83e0 61 67 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 agit-remote-branch-p.d).........
8400 20 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 .....................d..........
8420 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 2d 70 75 73 ..................(magit-get-pus
8440 68 2d 62 72 61 6e 63 68 20 64 20 74 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 70 h-branch.d.t))))))..........(rep
8460 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 74 72 61 63 o....(forge-get-repository.:trac
8480 6b 65 64 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 ked))..........(remote..(oref.re
84a0 70 6f 20 72 65 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 po.remote))..........(targets.(d
84c0 65 6c 65 74 65 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 elete.source.(magit-list-remote-
84e0 62 72 61 6e 63 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 branch-names.remote)))..........
8500 28 74 61 72 67 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 (target..(magit-completing-read.
8520 20 20 20 20 20 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 ..................."Target.branc
8540 68 22 20 74 61 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 h".targets.nil.t.nil.'magit-revi
8560 73 69 6f 6e 2d 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 sion-history....................
8580 28 6c 65 74 2a 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 (let*.((d.(cdr.(magit-split-bran
85a0 63 68 2d 6e 61 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 ch-name.source)))...............
85c0 20 20 20 20 20 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 ............(d.(and.(magit-branc
85e0 68 2d 70 20 64 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 h-p.d).d))......................
8600 20 20 20 20 20 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 .....(d.(and.d.(magit-get-upstre
8620 61 6d 2d 62 72 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 am-branch.d)))..................
8640 20 20 20 20 20 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 .........(d.(and.d.(if.(magit-re
8660 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 20 20 20 20 20 mote-branch-p.d)................
8680 20 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 0a 20 20 20 20 20 .........................d......
86a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
86c0 20 28 6d 61 67 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 .(magit-get-upstream-branch.d)))
86e0 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 64 20 28 )...........................(d.(
8700 6f 72 20 64 20 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 or.d.(concat.remote."/".........
8720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
8740 20 20 20 28 6f 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 ...(or.(oref.repo.default-branch
8760 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 )...............................
8780 20 20 20 20 20 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 ................."master")))))..
87a0 20 20 20 20 20 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 ....................(car.(member
87c0 20 64 20 74 61 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 .d.targets)))))).....(list.sourc
87e0 65 20 74 61 72 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 e.target)))..(defun.forge-create
8800 2d 70 6f 73 74 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 -post.(&optional.quote)..."Creat
8820 65 20 61 20 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 e.a.new.post.on.an.existing.topi
8840 63 2e 0a 49 66 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 c..If.the.region.is.active,.then
8860 20 71 75 6f 74 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 .quote.that.part.of.the.post..Ot
8880 68 65 72 77 69 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 herwise.and.with.a.prefix.argume
88a0 6e 74 20 71 75 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 nt.quote.the.post.that.point.is.
88c0 63 75 72 72 65 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 currently.on."...(interactive.(l
88e0 69 73 74 20 63 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 ist.current-prefix-arg))...(unle
8900 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 74 6f 70 69 63 2d ss.(derived-mode-p.'forge-topic-
8920 6d 6f 64 65 29 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 mode).....(user-error."This.comm
8940 61 6e 64 20 69 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 and.is.only.available.from.topic
8960 20 62 75 66 66 65 72 73 22 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 74 6f 70 69 63 20 66 6f 72 67 .buffers"))...(let*.((topic.forg
8980 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 20 28 66 e-buffer-topic)..........(buf.(f
89a0 6f 72 67 65 2d 2d 70 72 65 70 61 72 65 2d 70 6f 73 74 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 orge--prepare-post-buffer.......
89c0 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 74 6f 70 69 63 20 22 25 .........(forge--format.topic."%
89e0 69 3b 6e 65 77 2d 63 6f 6d 6d 65 6e 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 i;new-comment")................(
8a00 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 74 6f 70 69 63 20 22 4e 65 77 20 63 6f 6d 6d 65 6e 74 forge--format.topic."New.comment
8a20 20 6f 6e 20 23 25 69 20 6f 66 20 25 70 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 71 75 6f 74 .on.#%i.of.%p")))..........(quot
8a40 65 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 28 e.(cond..................((not.(
8a60 6d 61 67 69 74 2d 73 65 63 74 69 6f 6e 2d 6d 61 74 63 68 20 27 70 6f 73 74 29 29 20 6e 69 6c 29 magit-section-match.'post)).nil)
8a80 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 75 73 65 2d 72 65 67 69 6f 6e 2d 70 ..................((use-region-p
8aa0 29 0a 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 73 75 62 73 )...................(buffer-subs
8ac0 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 72 65 67 69 6f 6e 2d 62 65 67 69 tring-no-properties.(region-begi
8ae0 6e 6e 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 20 20 20 nning)..........................
8b00 20 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 72 65 67 69 6f 6e .........................(region
8b20 2d 65 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 71 75 6f 74 65 0a -end)))..................(quote.
8b40 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 73 65 63 74 69 6f 6e ..................(let.((section
8b60 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 0a 20 20 20 20 20 .(magit-current-section)))......
8b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 74 72 69 6d 2d 72 69 67 68 ...............(string-trim-righ
8ba0 74 0a 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 73 t......................(buffer-s
8bc0 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 6f 72 65 66 20 73 65 63 ubstring-no-properties.(oref.sec
8be0 74 69 6f 6e 20 63 6f 6e 74 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tion.content)...................
8c00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
8c20 20 20 20 28 6f 72 65 66 20 73 65 63 74 69 6f 6e 20 65 6e 64 29 29 29 29 29 29 29 29 0a 20 20 20 ...(oref.section.end))))))))....
8c40 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 0a 20 20 20 20 20 20 .(with-current-buffer.buf.......
8c60 28 73 65 74 71 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 (setq.forge--buffer-post-object.
8c80 74 6f 70 69 63 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 topic).......(setq.forge--submit
8ca0 2d 70 6f 73 74 2d 66 75 6e 63 74 69 6f 6e 20 23 27 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 63 -post-function.#'forge--submit-c
8cc0 72 65 61 74 65 2d 70 6f 73 74 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 71 75 6f 74 65 0a 20 20 reate-post).......(when.quote...
8ce0 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 61 78 29 29 0a 20 20 ......(goto-char.(point-max))...
8d00 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 62 6f 62 70 29 0a 20 20 20 20 20 20 20 20 20 20 28 ......(unless.(bobp)...........(
8d20 69 6e 73 65 72 74 20 22 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 72 insert."\n")).........(insert.(r
8d40 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 5e 22 20 22 3e 20 22 eplace-regexp-in-string."^".">."
8d60 20 71 75 6f 74 65 29 20 22 5c 6e 5c 6e 22 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 64 69 .quote)."\n\n"))).....(forge--di
8d80 73 70 6c 61 79 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 62 75 66 29 29 29 0a 0a 3b 3b 3b 20 45 64 splay-post-buffer.buf)))..;;;.Ed
8da0 69 74 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 65 64 69 74 2d 70 6f 73 74 20 28 29 0a 20 20 it..(defun.forge-edit-post.()...
8dc0 22 45 64 69 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 6f 73 74 2e 22 0a 20 20 28 69 6e 74 65 "Edit.the.current.post."...(inte
8de0 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 70 6f 73 74 20 28 66 6f 72 67 65 2d 70 ractive)...(let*.((post.(forge-p
8e00 6f 73 74 2d 61 74 2d 70 6f 69 6e 74 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 20 28 ost-at-point.t))..........(buf.(
8e20 63 6c 2d 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 20 20 20 20 cl-typecase.post................
8e40 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 .(forge-topic..................(
8e60 66 6f 72 67 65 2d 2d 70 72 65 70 61 72 65 2d 70 6f 73 74 2d 62 75 66 66 65 72 0a 20 20 20 20 20 forge--prepare-post-buffer......
8e80 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 70 6f 73 74 .............(forge--format.post
8ea0 20 22 25 69 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 ."%i")...................(forge-
8ec0 2d 66 6f 72 6d 61 74 20 70 6f 73 74 20 22 45 64 69 74 20 23 25 69 20 6f 66 20 25 70 22 29 29 29 -format.post."Edit.#%i.of.%p")))
8ee0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 6f 73 74 0a 20 20 20 .................(forge-post....
8f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 72 65 70 61 72 65 2d 70 6f ..............(forge--prepare-po
8f20 73 74 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 st-buffer...................(for
8f40 67 65 2d 2d 66 6f 72 6d 61 74 20 70 6f 73 74 20 22 25 69 3b 25 49 22 29 0a 20 20 20 20 20 20 20 ge--format.post."%i;%I")........
8f60 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 70 6f 73 74 20 22 ...........(forge--format.post."
8f80 45 64 69 74 20 63 6f 6d 6d 65 6e 74 20 6f 6e 20 23 25 69 20 6f 66 20 25 70 22 29 29 29 29 29 29 Edit.comment.on.#%i.of.%p"))))))
8fa0 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 0a 20 20 .....(with-current-buffer.buf...
8fc0 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 70 6f 73 74 2d 6f 62 6a ....(setq.forge--buffer-post-obj
8fe0 65 63 74 20 70 6f 73 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 73 75 62 ect.post).......(setq.forge--sub
9000 6d 69 74 2d 70 6f 73 74 2d 66 75 6e 63 74 69 6f 6e 20 23 27 66 6f 72 67 65 2d 2d 73 75 62 6d 69 mit-post-function.#'forge--submi
9020 74 2d 65 64 69 74 2d 70 6f 73 74 29 0a 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 t-edit-post).......(erase-buffer
9040 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 63 6c 2d 74 79 70 65 70 20 70 6f 73 74 20 27 66 6f ).......(when.(cl-typep.post.'fo
9060 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 23 20 22 20 rge-topic).........(insert."#.".
9080 28 6f 72 65 66 20 70 6f 73 74 20 74 69 74 6c 65 29 20 22 5c 6e 5c 6e 22 29 29 0a 20 20 20 20 20 (oref.post.title)."\n\n"))......
90a0 20 28 69 6e 73 65 72 74 20 28 6f 72 65 66 20 70 6f 73 74 20 62 6f 64 79 29 29 29 0a 20 20 20 20 .(insert.(oref.post.body))).....
90c0 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 75 66 29 (forge--display-post-buffer.buf)
90e0 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
9100 67 65 2d 65 64 69 74 2d 74 6f 70 69 63 2d 6e 6f 74 65 20 28 29 0a 20 20 22 45 64 69 74 20 79 6f ge-edit-topic-note.()..."Edit.yo
9120 75 72 20 70 72 69 76 61 74 65 20 6e 6f 74 65 20 61 62 6f 75 74 20 74 68 65 20 63 75 72 72 65 6e ur.private.note.about.the.curren
9140 74 20 74 6f 70 69 63 2e 22 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 20 23 27 74 72 61 6e 73 69 65 t.topic."...:transient.#'transie
9160 6e 74 2d 2d 64 6f 2d 71 75 69 74 2d 61 6c 6c 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 nt--do-quit-all...:description..
9180 20 28 6c 61 6d 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 .(lambda.().....(if-let.((topic.
91a0 28 66 6f 72 67 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 (forge-current-topic))).........
91c0 28 63 6f 6e 63 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 (concat."note.".................
91e0 28 69 66 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 (if-let.((note.(oref.topic.note)
9200 29 29 0a 20 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 )).....................(properti
9220 7a 65 20 28 73 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 ze.(substring.note.0.(string-mat
9240 63 68 2d 70 20 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 ch-p."$".note)).................
9260 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 2d 6c 6f 63 6b ................'face.'font-lock
9280 2d 73 74 72 69 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 -string-face)...................
92a0 28 70 72 6f 70 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 (propertize."none".'face.'magit-
92c0 64 69 6d 6d 65 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 dimmed)))......."note"))...(inte
92e0 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d ractive)...(let*.((topic.(forge-
9300 63 75 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 28 62 75 66 20 current-topic.t))..........(buf.
9320 28 66 6f 72 67 65 2d 2d 70 72 65 70 61 72 65 2d 70 6f 73 74 2d 62 75 66 66 65 72 0a 20 20 20 20 (forge--prepare-post-buffer.....
9340 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 74 6f 70 69 63 20 ...........(forge--format.topic.
9360 22 25 69 3b 6e 6f 74 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 "%i;note")................(forge
9380 2d 2d 66 6f 72 6d 61 74 20 74 6f 70 69 63 20 22 4e 65 77 20 6e 6f 74 65 20 6f 6e 20 23 25 69 20 --format.topic."New.note.on.#%i.
93a0 6f 66 20 25 70 22 29 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 of.%p")))).....(with-current-buf
93c0 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 fer.buf.......(setq.forge--buffe
93e0 72 2d 70 6f 73 74 2d 6f 62 6a 65 63 74 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 28 73 65 74 71 r-post-object.topic).......(setq
9400 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 6e 20 23 27 66 .forge--submit-post-function.#'f
9420 6f 72 67 65 2d 2d 73 61 76 65 2d 6e 6f 74 65 29 0a 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 orge--save-note).......(erase-bu
9440 66 66 65 72 29 0a 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 6e 6f 74 65 20 28 6f 72 ffer).......(when-let.((note.(or
9460 65 66 20 74 6f 70 69 63 20 6e 6f 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 ef.topic.note))).........(save-e
9480 78 63 75 72 73 69 6f 6e 20 28 69 6e 73 65 72 74 20 6e 6f 74 65 20 3f 5c 6e 29 29 29 29 0a 20 20 xcursion.(insert.note.?\n))))...
94a0 20 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 75 ..(forge--display-post-buffer.bu
94c0 66 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 6e 74 2d 64 65 66 f)))..;;;.Delete..(transient-def
94e0 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 6d 6d 65 6e 74 20 ine-suffix.forge-delete-comment.
9500 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 74 20 70 6f 69 6e ()..."Delete.the.comment.at.poin
9520 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 20 63 6f 6d 6d 65 t."...:description."delete.comme
9540 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 65 2d 63 6f 6d 6d nt"...:inapt-if-not.#'forge-comm
9560 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 65 29 0a 20 20 28 ent-at-point...(interactive)...(
9580 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 6e 74 2d 61 74 2d let.((comment.(forge-comment-at-
95a0 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 6f 72 2d 6e 6f 2d point.t))).....(when.(yes-or-no-
95c0 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 6e 74 20 63 6f 6d p."Really.delete.the.current.com
95e0 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 65 74 65 2d 63 6f ment?.").......(forge--delete-co
9600 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 79 20 3a 74 72 61 mment.(forge-get-repository.:tra
9620 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 6e 63 68 0a 0a 3b cked).comment))))..;;;.Branch..;
9640 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 61 6e 63 ;;###autoload.(defun.forge-branc
9660 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 61 74 65 20 61 6e h-pullreq.(pullreq)..."Create.an
9680 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 72 6f 6d 20 61 20 d.configure.a.new.branch.from.a.
96a0 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 68 65 20 6d 61 6e pull-request..Please.see.the.man
96c0 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 0a 20 20 28 69 6e ual.for.more.information."...(in
96e0 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 64 2d 70 75 6c 6c teractive.(list.(forge-read-pull
9700 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 29 29 0a 20 20 28 req."Branch.pull.request")))...(
9720 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 75 6c 6c 72 65 71 let.((pullreq.(forge-get-pullreq
9740 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 62 72 61 6e 63 68 .pullreq))).....(if-let.((branch
9760 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 74 69 76 65 20 70 .(forge--pullreq-branch-active.p
9780 75 6c 6c 72 65 71 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 6d 65 73 73 61 67 ullreq))).........(progn.(messag
97a0 65 20 22 42 72 61 6e 63 68 20 25 53 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 20 61 6e 64 20 e."Branch.%S.already.exists.and.
97c0 69 73 20 63 6f 6e 66 69 67 75 72 65 64 22 20 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 20 20 is.configured".branch)..........
97e0 20 20 20 20 20 20 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 62 72 61 6e ......branch).......(forge--bran
9800 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 72 79 ch-pullreq.(forge-get-repository
9820 20 70 75 6c 6c 72 65 71 29 20 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d .pullreq).pullreq).......(forge-
9840 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 68 6f refresh-buffer))))..(cl-defmetho
9860 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 72 65 d.forge--branch-pullreq.((pullre
9880 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 61 6e q.forge-pullreq))...(forge--bran
98a0 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 72 79 ch-pullreq.(forge-get-repository
98c0 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 74 68 .pullreq).pullreq))..(cl-defmeth
98e0 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 70 6f od.forge--branch-pullreq.((_repo
9900 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 75 6c .forge-unusedapi-repository).pul
9920 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 68 20 lreq)...;;.We.don't.know.enough.
9940 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 6d 62 to.do.a.good.job....(let*.((numb
9960 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 20 20 er.(oref.pullreq.number)).......
9980 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 62 65 ...(branch.(format."pr-%s".numbe
99a0 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 20 62 r))).....(when.(magit-branch-p.b
99c0 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 63 68 ranch).......(user-error."Branch
99e0 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 0a 20 .`%s'.already.exists".branch))..
9a00 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 28 66 ...(magit-git."branch".branch.(f
9a20 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 20 20 orge--pullreq-ref.pullreq)).....
9a40 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 20 74 ;;.More.often.than.not.this.is.t
9a60 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 28 6d he.correct.target.branch......(m
9a80 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 22 2d agit-call-git."branch".branch."-
9aa0 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 28 6d -set-upstream-to=master").....(m
9ac0 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 62 65 agit-set.(number-to-string.numbe
9ae0 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 74 22 r)."branch".branch."pullRequest"
9b00 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 66 6f ).....branch))..(cl-defmethod.fo
9b20 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 67 65 rge--branch-pullreq.((repo.forge
9b40 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 28 28 -repository).pullreq)...(let*.((
9b60 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 20 20 number.(oref.pullreq.number))...
9b80 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 73 22 .......(branch-n.(format."pr-%s"
9ba0 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 20 28 .number))..........(branch.(or.(
9bc0 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 20 70 forge--pullreq-branch-internal.p
9be0 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 75 6c ullreq).branch-n))..........(pul
9c00 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 73 2f lreq-ref.(format."refs/pullreqs/
9c20 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 6c 65 %s".number))).....(cond.((and-le
9c40 74 2a 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 61 t*.((pr-branch.(oref.pullreq.hea
9c60 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 65 d-ref)))..............(string-se
9c80 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 20 arch.":".pr-branch))............
9ca0 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 69 ;;.Such.a.branch.name.would.be.i
9cc0 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 20 nvalid...If.we.encounter........
9ce0 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 6e ....;;.it.anyway,.then.that.mean
9d00 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 20 s.that.the.source.branch.and....
9d20 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 66 ........;;.the.merge-request.ref
9d40 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 6f .are.missing...Luckily.Gitlab.no
9d60 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 2c ............;;.longer.does.this,
9d80 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 61 .but.we.nevertheless.have.to.dea
9da0 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 65 l............;;.with.merge-reque
9dc0 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 2e sts.that.have.been.lost.in.time.
9de0 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 6b ............(error."Cannot.check
9e00 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 20 .out.this.merge-request.because.
9e20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 6f 6e 20 6f 6c 64 20 47 69 %s"..................."on.old.Gi
9e40 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 63 tlab.version.discarded.the.sourc
9e60 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 20 e.branch"))...........((not.(eq.
9e80 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 20 (oref.pullreq.state).'open))....
9ea0 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 66 ........(magit-git."branch"."--f
9ec0 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 20 orce".branch.pullreq-ref))......
9ee0 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 65 .....(t............(let.((upstre
9f00 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 20 am..(oref.repo.remote)).........
9f20 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 65 .........(pr-remote.(oref.pullre
9f40 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 28 q.head-user))..................(
9f60 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 66 pr-branch.(oref.pullreq.head-ref
9f80 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 72 )))..............(cond.((not.(or
9fa0 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 20 ef.pullreq.cross-repo-p)).......
9fc0 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 63 ..............(let.((tracking.(c
9fe0 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 0a oncat.upstream."/".pr-branch))).
a000 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 6d ......................(unless.(m
a020 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 20 agit-branch-p.tracking).........
a040 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 20 ................(magit-call-git.
a060 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 20 "fetch".upstream))..............
a080 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 62 .........(forge--setup-pullreq-b
a0a0 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 20 ranch.branch.tracking)..........
a0c0 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 65 .............(magit-branch-maybe
a0e0 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 67 -adjust-upstream.branch.tracking
a100 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 73 ).......................(magit-s
a120 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 73 et.upstream."branch".branch."pus
a140 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 20 hRemote").......................
a160 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 61 (magit-set.upstream."branch".bra
a180 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 20 nch."pullRequestRemote")))......
a1a0 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 20 ..............((not.pr-branch)..
a1c0 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 65 ...................;;.The.pullre
a1e0 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 65 q.branch.(on.Github).has.been.de
a200 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 71 leted......................(setq
a220 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 20 .pr-remote.nil).................
a240 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 20 ....(setq.branch.branch-n)......
a260 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 6c ...............(forge--setup-pul
a280 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 0a lreq-branch.branch.pullreq-ref).
a2a0 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 75 ....................(magit-set.u
a2c0 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 6d pstream."branch".branch."pushRem
a2e0 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 20 ote"))....................(t....
a300 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 68 .................;;.For.prs.with
a320 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 6d in.the.upstream.we.are.more.perm
a340 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 62 issive,.....................;;.b
a360 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 68 ut.any.request.to.merge.a.branch
a380 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 20 .with.a.well.known..............
a3a0 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 67 .......;;.name.from.fork,.is.hig
a3c0 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 20 hly.suspicious.and.likely.the...
a3e0 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 61 ..................;;.result.of.a
a400 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 61 .contributor.not.bothering.to.na
a420 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 20 me.their.....................;;.
a440 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 20 feature.branch..................
a460 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 61 ....(when.(and.(member.branch.ma
a480 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 20 git-main-branch-names)..........
a4a0 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 61 ......................(magit-bra
a4c0 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 20 nch-p.branch))..................
a4e0 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 20 .....(setq.branch.branch-n))....
a500 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 70 .................(forge--setup-p
a520 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 20 ullreq-remote.pullreq)..........
a540 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 71 ...........(forge--setup-pullreq
a560 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 61 -branch......................bra
a580 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 61 nch.(concat.pr-remote."/".pr-bra
a5a0 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 61 nch)).....................(if.(a
a5c0 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 20 nd.(oref.pullreq.editable-p)....
a5e0 20 20 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 6c ..........................(equal
a600 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 20 .branch.pr-branch)).............
a620 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 65 ............(magit-set.pr-remote
a640 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 20 ."branch".branch."pushRemote")..
a660 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 20 .....................(magit-set.
a680 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
a6a0 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 2d mote"))))..............(when.pr-
a6c0 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 74 remote................(magit-set
a6e0 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 6c .pr-remote."branch".branch."pull
a700 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 6d RequestRemote"))..............(m
a720 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 20 agit-set."true"."branch".branch.
a740 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 69 "rebase")..............(magit-gi
a760 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 20 t."branch".branch...............
a780 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 20 ..........(let.((base-ref.(oref.
a7a0 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 20 pullreq.base-ref))).............
a7c0 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 73 ..............(concat."--set-ups
a7e0 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 20 tream-to="......................
a800 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 63 .............(if.(or.magit-branc
a820 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 20 h-prefer-remote-upstream........
a840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
a860 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 66 ...(not.(magit-branch-p.base-ref
a880 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 ))).............................
a8a0 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 62 ..........(concat.upstream."/".b
a8c0 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 20 ase-ref)........................
a8e0 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 20 .............base-ref)))))))....
a900 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 75 .(magit-set.(number-to-string.nu
a920 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 65 mber)."branch".branch."pullReque
a940 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 65 st").....(magit-set.(oref.pullre
a960 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 69 q.title)."branch".branch."descri
a980 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 72 ption").....branch))..(defun.for
a9a0 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 68 ge--setup-pullreq-branch.(branch
a9c0 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 70 .tracking)...(if.(magit-branch-p
a9e0 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 65 .branch).......(unless.(magit-re
aa00 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 20 v-equal.branch.tracking)........
aa20 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 69 .(message."Existing.branch.%s.di
aa40 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 29 verged.from.%s".branch.tracking)
aa60 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 68 ).....(magit-git."branch".branch
aa80 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 75 .tracking)))..(defun.forge--setu
aaa0 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 65 p-pullreq-remote.(pullreq)...(le
aac0 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 61 t*.((pr-remote.(oref.pullreq.hea
aae0 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 72 d-user))..........(pr-branch.(or
ab00 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 28 ef.pullreq.head-ref))..........(
ab20 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 72 repo.(forge-get-repository.pullr
ab40 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 67 eq))..........(host.(oref.repo.g
ab60 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 75 ithost))..........(user.(oref.pu
ab80 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 6b llreq.head-user))..........(fork
aba0 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 20 .(oref.pullreq.head-repo))).....
abc0 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 20 (if.(magit-remote-p.pr-remote)..
abe0 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 72 .......(let.((url.(magit-git-str
ac00 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 65 ing."remote"."get-url".pr-remote
ac20 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 67 ))...............(fetch.(magit-g
ac40 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 68 et-all."remote".pr-remote."fetch
ac60 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 66 ")))...........(unless.(equal.(f
ac80 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 20 orge--split-forge-url.url)......
aca0 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 75 ....................(list.host.u
acc0 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 20 ser.(substring.fork.(1+.(length.
ace0 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 6f user))))).............(user-erro
ad00 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 75 r."Remote.`%s'.already.exists.bu
ad20 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 20 t.does.not.point.to.%s".........
ad40 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 0a ................pr-remote.url)).
ad60 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 66 ..........(unless.(or.(member.(f
ad80 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 65 ormat."+refs/heads/*:refs/remote
ada0 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 20 s/%s/*".........................
adc0 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 20 ..............pr-remote)........
ade0 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 20 .......................fetch)...
ae00 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 72 ....................(member.(for
ae20 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 73 mat."+refs/heads/%s:refs/remotes
ae40 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 20 /%s/%s".........................
ae60 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 74 ..............pr-branch.pr-remot
ae80 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 20 e.pr-branch)....................
aea0 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 28 ...........fetch)).............(
aec0 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 73 magit-git."remote"."set-branches
aee0 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 20 "."--add".pr-remote.pr-branch)..
af00 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 72 ...........(magit-git."fetch".pr
af20 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 67 -remote))).......(let.((url.(mag
af40 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 22 it-git-string."remote"."get-url"
af60 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 28 .(oref.repo.remote)))).........(
af80 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 64 magit-git.........."remote"."add
afa0 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 22 "."-f"."--no-tags".........."-t"
afc0 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 63 .pr-branch.pr-remote..........(c
afe0 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 22 ond.((or.(string-prefix-p."git@"
b000 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 6e .url).....................(strin
b020 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 20 g-prefix-p."ssh://git@".url))...
b040 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 73 ..............(format."git@%s:%s
b060 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 20 .git".host.fork))...............
b080 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 72 .((string-prefix-p."https://".ur
b0a0 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 70 l).................(format."http
b0c0 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 20 s://%s/%s.git".host.fork))......
b0e0 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 74 ..........((string-prefix-p."git
b100 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 61 ://".url).................(forma
b120 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 0a t."git://%s/%s.git".host.fork)).
b140 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 70 ...............((string-prefix-p
b160 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 20 ."http://".url).................
b180 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 20 (format."http://%s/%s.git".host.
b1a0 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 25 fork))................((error."%
b1c0 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 29 s.has.an.unexpected.format".url)
b1e0 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 66 )))))))..;;;###autoload.(defun.f
b200 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 0a orge-checkout-pullreq.(pullreq).
b220 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 75 .."Create,.configure.and.checkou
b240 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 65 t.a.new.branch.from.a.pull-reque
b260 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 6f st..Please.see.the.manual.for.mo
b280 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 20 re.information."...(interactive.
b2a0 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 6b (list.(forge-read-pullreq."Check
b2c0 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 63 out.pull.request")))...(magit--c
b2e0 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 28 heckout.(forge--branch-pullreq.(
b300 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 28 forge-get-pullreq.pullreq)))...(
b320 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 75 forge-refresh-buffer))..;;;###au
b340 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 77 6f 72 toload.(defun.forge-checkout-wor
b360 6b 74 72 65 65 20 28 70 61 74 68 20 70 75 6c 6c 72 65 71 29 0a 20 20 22 43 72 65 61 74 65 2c 20 ktree.(path.pullreq)..."Create,.
b380 63 6f 6e 66 69 67 75 72 65 20 61 6e 64 20 63 68 65 63 6b 6f 75 74 20 61 20 6e 65 77 20 77 6f 72 configure.and.checkout.a.new.wor
b3a0 6b 74 72 65 65 20 66 72 6f 6d 20 61 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 0a 54 68 69 73 20 ktree.from.a.pull-request..This.
b3c0 69 73 20 6c 69 6b 65 20 60 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 70 75 6c 6c 72 65 71 27 is.like.`forge-checkout-pullreq'
b3e0 2c 20 65 78 63 65 70 74 20 74 68 61 74 20 69 74 20 61 6c 73 6f 0a 63 72 65 61 74 65 73 20 61 20 ,.except.that.it.also.creates.a.
b400 6e 65 77 20 77 6f 72 6b 74 72 65 65 2e 20 50 6c 65 61 73 65 20 73 65 65 20 74 68 65 20 6d 61 6e new.worktree..Please.see.the.man
b420 75 61 6c 20 66 6f 72 20 6d 6f 72 65 0a 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 22 0a 20 20 28 69 6e ual.for.more.information."...(in
b440 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c 65 74 20 28 28 69 64 20 28 66 6f 72 67 65 2d 72 65 teractive....(let.((id.(forge-re
b460 61 64 2d 70 75 6c 6c 72 65 71 20 22 43 68 65 63 6b 6f 75 74 20 70 75 6c 6c 20 72 65 71 75 65 73 ad-pullreq."Checkout.pull.reques
b480 74 22 29 29 29 0a 20 20 20 20 20 28 6c 69 73 74 20 28 66 75 6e 63 61 6c 6c 20 66 6f 72 67 65 2d t")))......(list.(funcall.forge-
b4a0 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 63 74 6f 72 79 checkout-worktree-read-directory
b4c0 2d 66 75 6e 63 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 28 66 -function.....................(f
b4e0 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 orge-get-pullreq.id))...........
b500 20 69 64 29 29 29 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 66 69 6c 65 2d 65 78 69 73 74 73 .id)))...(when.(and.(file-exists
b520 2d 70 20 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 61 6e 64 20 -p.path)..............(not.(and.
b540 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 (file-directory-p.path).........
b560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 6e 67 74 68 3d 20 28 64 69 72 65 63 74 6f ...............(length=.(directo
b580 72 79 2d 66 69 6c 65 73 20 70 61 74 68 29 20 32 29 29 29 29 0a 20 20 20 20 28 75 73 65 72 2d 65 ry-files.path).2)))).....(user-e
b5a0 72 72 6f 72 20 22 25 73 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 20 61 6e 64 20 69 73 6e 27 rror."%s.already.exists.and.isn'
b5c0 74 20 65 6d 70 74 79 22 20 70 61 74 68 29 29 0a 20 20 28 6d 61 67 69 74 2d 77 6f 72 6b 74 72 65 t.empty".path))...(magit-worktre
b5e0 65 2d 63 68 65 63 6b 6f 75 74 20 70 61 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-checkout.path.................
b600 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 75 6c 6c 72 65 ...........(forge--branch-pullre
b620 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 29 29 q.(forge-get-pullreq.pullreq))))
b640 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 77 6f 72 6b 74 72 65 65 ..(defun.forge-checkout-worktree
b660 2d 64 65 66 61 75 6c 74 2d 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 66 75 6e 63 74 69 6f 6e -default-read-directory-function
b680 20 28 70 75 6c 6c 72 65 71 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 28 65 69 65 69 .(pullreq)...(pcase-let*.(((eiei
b6a0 6f 20 6e 75 6d 62 65 72 20 68 65 61 64 2d 72 65 66 29 20 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 o.number.head-ref).pullreq).....
b6c0 20 20 20 20 20 20 20 20 20 20 20 28 70 61 74 68 20 28 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 ...........(path.(read-directory
b6e0 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 20 20 20 28 66 6f 72 -name.......................(for
b700 6d 61 74 20 22 43 68 65 63 6b 6f 75 74 20 23 25 73 20 69 6e 20 6e 65 77 20 77 6f 72 6b 74 72 65 mat."Checkout.#%s.in.new.worktre
b720 65 3a 20 22 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 e:.".number)....................
b740 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 ...(file-name-directory.........
b760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 2d 6e ...............(directory-file-n
b780 61 6d 65 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 20 20 20 20 ame.default-directory)).........
b7a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 ..............nil.nil...........
b7c0 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 72 61 6e 63 68 20 28 66 6f 72 67 65 ............(let.((branch.(forge
b7e0 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 20 70 75 6c 6c 72 65 --pullreq-branch-internal.pullre
b800 71 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 28 69 66 q))).........................(if
b820 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 60 70 72 2d 5b 30 2d 39 5d 2b 5c 5c .(string-match-p."\\`pr-[0-9]+\\
b840 27 22 20 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 20 20 20 '".branch)......................
b860 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 6e 75 6d 62 65 72 29 .......(number-to-string.number)
b880 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 66 6f 72 6d ...........................(form
b8a0 61 74 20 22 25 73 2d 25 73 22 20 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 at."%s-%s".number...............
b8c0 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 72 65 70 6c ....................(string-repl
b8e0 61 63 65 20 22 2f 22 20 22 2d 22 20 68 65 61 64 2d 72 65 66 29 29 29 29 29 29 29 0a 20 20 20 20 ace."/"."-".head-ref))))))).....
b900 28 77 68 65 6e 20 28 65 71 75 61 6c 20 70 61 74 68 20 22 22 29 0a 20 20 20 20 20 20 28 75 73 65 (when.(equal.path."").......(use
b920 72 2d 65 72 72 6f 72 20 22 54 68 65 20 65 6d 70 74 79 20 73 74 72 69 6e 67 20 69 73 6e 27 74 20 r-error."The.empty.string.isn't.
b940 61 20 76 61 6c 69 64 20 70 61 74 68 22 29 29 0a 20 20 20 20 70 61 74 68 29 29 0a 0a 3b 3b 3b 20 a.valid.path")).....path))..;;;.
b960 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 72 6b 20 Marks..(defun.forge-create-mark.
b980 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 66 69 6e (name.face.description)..."Defin
b9a0 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 62 65 20 e.a.new.mark.that.topics.can.be.
b9c0 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 20 20 20 marked.with."...(interactive....
b9e0 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 20 20 20 (list.(read-string."Name:.")....
ba00 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 53 65 74 ......(magit-read-char-case."Set
ba20 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 20 20 20 .appearance.using.".nil.........
ba40 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 20 20 20 ...(?n."a.face.[n]ame"..........
ba60 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 61 6d 65 ......(read-face-name."Face.name
ba80 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 5d 65 78 :."))............(?s."face.[s]ex
baa0 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 6d 69 6e p"................(read-from-min
bac0 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 20 73 65 ibuffer................."Face.se
bae0 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 67 72 6f xp:."................."(:backgro
bb00 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 78 20 74 und.\"\".:foreground.\"\".:box.t
bb20 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 73 73 69 )".................read-expressi
bb40 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 74 72 20 on-map.t)))..........(let.((str.
bb60 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 29 29 0a (read-string."Description:."))).
bb80 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 74 72 20 ...........(and.(not.(equal.str.
bba0 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 6e 73 65 "")).str))))...(forge-sql.[:inse
bbc0 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 20 20 20 rt-into.mark.:values.$v1].......
bbe0 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 69 64 29 .......(vector.nil.(forge--uuid)
bc00 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 65 66 75 .name.face.description)))..(defu
bc20 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 63 65 20 n.forge-edit-mark.(id.name.face.
bc40 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 6d 61 72 description)..."Define.a.new.mar
bc60 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 69 74 68 k.that.topics.can.be.marked.with
bc80 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 65 74 20 ."...(interactive....(pcase-let.
bca0 28 28 60 28 2c 69 64 20 2c 6e 61 6d 65 20 2c 66 61 63 65 20 2c 64 65 73 63 72 69 70 74 69 6f 6e ((`(,id.,name.,face.,description
bcc0 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 61 64 2d 6d 61 ).................(forge-read-ma
bce0 72 6b 20 22 45 64 69 74 20 6d 61 72 6b 22 29 29 29 0a 20 20 20 20 20 28 6c 69 73 74 20 69 64 0a rk."Edit.mark")))......(list.id.
bd00 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 4e 61 6d 65 3a 20 22 ...........(read-string."Name:."
bd20 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 72 65 61 64 2d 63 68 .name)............(magit-read-ch
bd40 61 72 2d 63 61 73 65 20 22 53 65 74 20 61 70 70 65 61 72 61 6e 63 65 20 75 73 69 6e 67 20 22 20 ar-case."Set.appearance.using.".
bd60 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 6e 20 22 61 20 66 61 63 65 20 5b 6e 5d nil..............(?n."a.face.[n]
bd80 61 6d 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 66 61 63 65 ame"..................(read-face
bda0 2d 6e 61 6d 65 20 22 46 61 63 65 20 6e 61 6d 65 3a 20 22 20 28 61 6e 64 20 28 73 79 6d 62 6f 6c -name."Face.name:.".(and.(symbol
bdc0 70 20 66 61 63 65 29 20 66 61 63 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 73 p.face).face)))..............(?s
bde0 20 22 66 61 63 65 20 5b 73 5d 65 78 70 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ."face.[s]exp"..................
be00 28 72 65 61 64 2d 66 72 6f 6d 2d 6d 69 6e 69 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 (read-from-minibuffer...........
be20 20 20 20 20 20 20 20 20 22 46 61 63 65 20 73 65 78 70 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 ........"Face.sexp:."...........
be40 20 20 20 20 20 20 20 20 28 69 66 20 28 6c 69 73 74 70 20 66 61 63 65 29 0a 20 20 20 20 20 20 20 ........(if.(listp.face)........
be60 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 53 22 20 66 61 63 65 ...............(format."%S".face
be80 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 28 3a 62 61 63 6b 67 72 6f )....................."(:backgro
bea0 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 78 20 74 und.\"\".:foreground.\"\".:box.t
bec0 29 22 29 0a 20 20 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 )")...................read-expre
bee0 73 73 69 6f 6e 2d 6d 61 70 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 ssion-map.t)))............(let.(
bf00 28 73 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 (str.(read-string."Description:.
bf20 22 20 6e 69 6c 20 6e 69 6c 20 64 65 73 63 72 69 70 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 ".nil.nil.description)))........
bf40 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 73 74 72 20 22 22 29 29 20 ......(and.(not.(equal.str."")).
bf60 73 74 72 29 29 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 75 70 64 61 74 65 20 6d str)))))...(forge-sql.[:update.m
bf80 61 72 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 74 20 28 3d 20 5b 6e 61 6d 65 20 ark...............:set.(=.[name.
bfa0 66 61 63 65 20 64 65 73 63 72 69 70 74 69 6f 6e 5d 20 24 76 31 29 0a 20 20 20 20 20 20 20 20 20 face.description].$v1)..........
bfc0 20 20 20 20 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 .....:where.(=.id.$s2)].........
bfe0 20 20 20 20 20 28 76 65 63 74 6f 72 20 6e 61 6d 65 20 66 61 63 65 20 64 65 73 63 72 69 70 74 69 .....(vector.name.face.descripti
c000 6f 6e 29 20 69 64 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 6d 61 72 6b on).id))..(defun.forge-read-mark
c020 20 28 70 72 6f 6d 70 74 29 0a 20 20 22 52 65 61 64 20 61 20 74 6f 70 69 63 2e 20 20 52 65 74 75 .(prompt)..."Read.a.topic...Retu
c040 72 6e 20 28 49 44 20 4e 41 4d 45 20 46 41 43 45 20 44 45 53 43 52 49 50 54 49 4f 4e 29 2e 22 0a rn.(ID.NAME.FACE.DESCRIPTION).".
c060 20 20 28 6c 65 74 2a 20 28 28 6d 61 72 6b 73 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c ..(let*.((marks.(forge-sql.[:sel
c080 65 63 74 20 5b 69 64 20 6e 61 6d 65 20 66 61 63 65 20 64 65 73 63 72 69 70 74 69 6f 6e 5d 20 3a ect.[id.name.face.description].:
c0a0 66 72 6f 6d 20 6d 61 72 6b 5d 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 61 6d 65 20 28 63 6f 6d from.mark]))..........(name.(com
c0c0 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 70 72 6f 6d 70 74 20 28 6d 61 70 63 61 72 20 23 27 63 61 pleting-read.prompt.(mapcar.#'ca
c0e0 64 72 20 6d 61 72 6b 73 29 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 28 2d 2d 66 69 72 73 74 20 dr.marks).nil.t))).....(--first.
c100 28 65 71 75 61 6c 20 28 63 61 64 72 20 69 74 29 20 6e 61 6d 65 29 20 6d 61 72 6b 73 29 29 29 0a (equal.(cadr.it).name).marks))).
c120 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 6d 61 72 6b 73 20 28 70 72 6f 6d 70 74 .(defun.forge-read-marks.(prompt
c140 20 26 6f 70 74 69 6f 6e 61 6c 20 74 6f 70 69 63 29 0a 20 20 22 52 65 61 64 20 6d 75 6c 74 69 70 .&optional.topic)..."Read.multip
c160 6c 65 20 6d 61 72 6b 20 6e 61 6d 65 73 20 61 6e 64 20 72 65 74 75 72 6e 20 74 68 65 20 72 65 73 le.mark.names.and.return.the.res
c180 70 65 63 74 69 76 65 20 69 64 73 2e 22 0a 20 20 28 6c 65 74 20 28 28 6d 61 72 6b 73 20 28 66 6f pective.ids."...(let.((marks.(fo
c1a0 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 5b 6e 61 6d 65 20 69 64 5d 20 3a 66 72 6f 6d rge-sql.[:select.[name.id].:from
c1c0 20 6d 61 72 6b 5d 29 29 0a 20 20 20 20 20 20 20 20 28 63 72 6d 2d 73 65 70 61 72 61 74 6f 72 20 .mark])).........(crm-separator.
c1e0 22 2c 22 29 29 0a 20 20 20 20 28 2d 2d 6d 61 70 20 28 63 61 64 72 20 28 61 73 73 6f 63 20 69 74 ",")).....(--map.(cadr.(assoc.it
c200 20 6d 61 72 6b 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c .marks))............(magit-compl
c220 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 20 20 20 20 20 20 20 eting-read-multiple.............
c240 70 72 6f 6d 70 74 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 prompt.(mapcar.#'car.marks).nil.
c260 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 74 6f 70 69 63 0a 20 20 20 20 20 20 20 t.............(and.topic........
c280 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 63 61 72 20 28 63 6c 6f 73 ..........(mapconcat.#'car.(clos
c2a0 71 6c 2d 2d 69 72 65 66 20 74 6f 70 69 63 20 27 6d 61 72 6b 73 29 20 22 2c 22 29 29 29 29 29 29 ql--iref.topic.'marks).","))))))
c2c0 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 6d 61 72 6b 20 28 6d 61 72 6b ..(defun.forge-toggle-mark.(mark
c2e0 29 0a 20 20 22 54 6f 67 67 6c 65 20 4d 41 52 4b 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 )..."Toggle.MARK.for.the.current
c300 20 74 6f 70 69 63 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d .topic."...(let*.((topic.(forge-
c320 63 75 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 28 76 61 6c 75 current-topic.t))..........(valu
c340 65 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 28 63 6c 6f 73 71 6c 2d 2d 69 72 65 66 20 74 6f e.(mapcar.#'car.(closql--iref.to
c360 70 69 63 20 27 6d 61 72 6b 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 76 61 6c 75 65 20 28 69 pic.'marks)))..........(value.(i
c380 66 20 28 6d 65 6d 62 65 72 20 6d 61 72 6b 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 f.(member.mark.value)...........
c3a0 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 20 6d 61 72 6b 20 76 61 6c 75 65 29 0a 20 20 ..........(delete.mark.value)...
c3c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 6d 61 72 6b 20 76 61 6c 75 65 ................(cons.mark.value
c3e0 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 61 72 6b 73 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b )))..........(marks.(forge-sql.[
c400 3a 73 65 6c 65 63 74 20 5b 6e 61 6d 65 20 69 64 5d 20 3a 66 72 6f 6d 20 6d 61 72 6b 5d 29 29 29 :select.[name.id].:from.mark])))
c420 0a 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 63 20 6d 61 72 6b 73 20 28 2d 2d 6d 61 70 20 28 63 .....(oset.topic.marks.(--map.(c
c440 61 64 72 20 28 61 73 73 6f 63 20 69 74 20 6d 61 72 6b 73 29 29 20 76 61 6c 75 65 29 29 0a 20 20 adr.(assoc.it.marks)).value))...
c460 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 0a 3b 3b 3b 20 ..(forge-refresh-buffer)))..;;;.
c480 52 65 6d 6f 74 65 6c 79 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 Remotely..;;;###autoload.(defun.
c4a0 66 6f 72 67 65 2d 66 6f 72 6b 20 28 66 6f 72 6b 20 72 65 6d 6f 74 65 29 0a 20 20 22 46 6f 72 6b forge-fork.(fork.remote)..."Fork
c4c0 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 20 46 4f 52 4b 20 .the.current.repository.to.FORK.
c4e0 61 6e 64 20 61 64 64 20 69 74 20 61 73 20 61 20 52 45 4d 4f 54 45 2e 0a 49 66 20 74 68 65 20 66 and.add.it.as.a.REMOTE..If.the.f
c500 6f 72 6b 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 2c 20 74 68 65 6e 20 74 68 61 74 20 69 73 ork.already.exists,.then.that.is
c520 6e 27 74 20 61 6e 20 65 72 72 6f 72 3b 20 74 68 65 20 72 65 6d 6f 74 65 0a 69 73 20 61 64 64 65 n't.an.error;.the.remote.is.adde
c540 64 20 61 6e 79 77 61 79 2e 20 20 43 75 72 72 65 6e 74 6c 79 20 74 68 69 73 20 6f 6e 6c 79 20 73 d.anyway...Currently.this.only.s
c560 75 70 70 6f 72 74 73 20 47 69 74 68 75 62 20 61 6e 64 20 47 69 74 6c 61 62 2e 22 0a 20 20 28 69 upports.Github.and.Gitlab."...(i
c580 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c 65 74 20 28 28 66 6f 72 6b 20 28 6d 61 67 69 74 nteractive....(let.((fork.(magit
c5a0 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 46 6f 72 6b 20 74 6f 22 0a 20 20 20 20 20 -completing-read."Fork.to"......
c5c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
c5e0 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 .(mapcar.#'car.forge-owned-accou
c600 6e 74 73 29 29 29 29 0a 20 20 20 20 20 28 6c 69 73 74 20 66 6f 72 6b 0a 20 20 20 20 20 20 20 20 nts))))......(list.fork.........
c620 20 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 52 65 6d 6f 74 65 20 6e 61 6d 65 3a 20 22 0a ...(read-string."Remote.name:.".
c640 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 28 70 6c 69 ........................(or.(pli
c660 73 74 2d 67 65 74 20 28 63 64 72 20 28 61 73 73 6f 63 20 66 6f 72 6b 20 66 6f 72 67 65 2d 6f 77 st-get.(cdr.(assoc.fork.forge-ow
c680 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 20 20 20 20 20 ned-accounts))..................
c6a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 72 65 6d 6f 74 65 2d 6e 61 ......................'remote-na
c6c0 6d 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 20 me).............................
c6e0 66 6f 72 6b 29 29 29 29 29 0a 20 20 28 6c 65 74 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 fork)))))...(let.((repo.(forge-g
c700 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 20 20 28 66 6f 72 67 et-repository.:stub))).....(forg
c720 65 2d 2d 66 6f 72 6b 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 66 6f 72 6b 29 0a 20 20 e--fork-repository.repo.fork)...
c740 20 20 28 6d 61 67 69 74 2d 72 65 6d 6f 74 65 2d 61 64 64 20 72 65 6d 6f 74 65 0a 20 20 20 20 20 ..(magit-remote-add.remote......
c760 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 6c 6f 6e 65 2d 2d 66 .................(magit-clone--f
c780 6f 72 6d 61 74 2d 75 72 6c 20 28 6f 72 65 66 20 72 65 70 6f 20 67 69 74 68 6f 73 74 29 20 66 6f ormat-url.(oref.repo.githost).fo
c7a0 72 6b 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 rk..............................
c7c0 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 6e 61 6d ..................(oref.repo.nam
c7e0 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 28 6c 69 73 74 20 e)).......................(list.
c800 22 2d 2d 66 65 74 63 68 22 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 "--fetch"))))..;;;###autoload.(d
c820 65 66 75 6e 20 66 6f 72 67 65 2d 6d 65 72 67 65 20 28 70 75 6c 6c 72 65 71 20 6d 65 74 68 6f 64 efun.forge-merge.(pullreq.method
c840 29 0a 20 20 22 4d 65 72 67 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 75 6c 6c 2d 72 65 71 75 )..."Merge.the.current.pull-requ
c860 65 73 74 20 75 73 69 6e 67 20 4d 45 54 48 4f 44 20 75 73 69 6e 67 20 74 68 65 20 66 6f 72 67 65 est.using.METHOD.using.the.forge
c880 27 73 20 41 50 49 2e 0a 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 63 75 72 72 65 6e 74 20 's.API...If.there.is.no.current.
c8a0 70 75 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 pull-request.or.with.a.prefix.ar
c8c0 67 75 6d 65 6e 74 2c 0a 74 68 65 6e 20 72 65 61 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 50 gument,.then.read.pull-request.P
c8e0 55 4c 4c 52 45 51 20 74 6f 20 76 69 73 69 74 20 69 6e 73 74 65 61 64 2e 0a 0a 55 73 65 20 6f 66 ULLREQ.to.visit.instead...Use.of
c900 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 55 .this.command.is.discouraged...U
c920 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 69 73 20 63 nless.the.remote.repository.is.c
c940 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 2c 20 79 6f 75 20 onfigured.to.disallow.that,.you.
c960 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 6c 79 0a 61 6e 64 should.instead.merge.locally.and
c980 20 74 68 65 6e 20 70 75 73 68 20 74 68 65 20 74 61 72 67 65 74 20 62 72 61 6e 63 68 2e 20 20 46 .then.push.the.target.branch...F
c9a0 6f 72 67 65 73 20 64 65 74 65 63 74 20 74 68 61 74 20 79 6f 75 20 68 61 76 65 0a 64 6f 6e 65 20 orges.detect.that.you.have.done.
c9c0 74 68 61 74 20 61 6e 64 20 72 65 73 70 6f 6e 64 20 62 79 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c that.and.respond.by.automaticall
c9e0 79 20 6d 61 72 6b 69 6e 67 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 0a 61 73 20 6d 65 y.marking.the.pull-request.as.me
ca00 72 67 65 64 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 rged."...(interactive....(list.(
ca20 66 6f 72 67 65 2d 72 65 61 64 2d 70 75 6c 6c 72 65 71 20 22 4d 65 72 67 65 20 70 75 6c 6c 2d 72 forge-read-pullreq."Merge.pull-r
ca40 65 71 75 65 73 74 22 29 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 6f 72 67 65 2d 2d 63 68 equest")..........(if.(forge--ch
ca60 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 3a 74 72 61 63 ildp.(forge-get-repository.:trac
ca80 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 20 20 20 ked)............................
caa0 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 20 20 20 20 20 .'forge-gitlab-repository)......
cac0 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 4d ........(magit-read-char-case."M
cae0 65 72 67 65 20 6d 65 74 68 6f 64 20 22 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 erge.method.".t................(
cb00 3f 6d 20 22 5b 6d 5d 65 72 67 65 22 20 20 27 6d 65 72 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 ?m."[m]erge"..'merge)...........
cb20 20 20 20 20 20 28 3f 73 20 22 5b 73 5d 71 75 61 73 68 22 20 27 73 71 75 61 73 68 29 29 0a 20 20 .....(?s."[s]quash".'squash))...
cb40 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."
cb60 4d 65 72 67 65 20 6d 65 74 68 6f 64 20 22 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3f Merge.method.".t..............(?
cb80 6d 20 22 5b 6d 5d 65 72 67 65 22 20 20 27 6d 65 72 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 m."[m]erge"..'merge)............
cba0 20 20 28 3f 73 20 22 5b 73 5d 71 75 61 73 68 22 20 27 73 71 75 61 73 68 29 0a 20 20 20 20 20 20 ..(?s."[s]quash".'squash).......
cbc0 20 20 20 20 20 20 20 28 3f 72 20 22 5b 72 5d 65 62 61 73 65 22 20 27 72 65 62 61 73 65 29 29 29 .......(?r."[r]ebase".'rebase)))
cbe0 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
cc00 75 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 65 ullreq.pullreq))).....(forge--me
cc20 72 67 65 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 72 rge-pullreq.(forge-get-repositor
cc40 79 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 20 20 20 20 20 20 y.pullreq)......................
cc60 20 20 20 20 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 .....pullreq....................
cc80 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 72 65 76 2d 68 61 73 68 0a 20 20 20 20 20 20 20 20 20 .......(magit-rev-hash..........
cca0 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 72 65 ..................(forge--pullre
ccc0 71 2d 62 72 61 6e 63 68 2d 69 6e 74 65 72 6e 61 6c 20 70 75 6c 6c 72 65 71 29 29 0a 20 20 20 20 q-branch-internal.pullreq)).....
cce0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 65 74 68 6f 64 29 29 0a 20 ......................method))..
cd00 20 28 66 6f 72 67 65 2d 70 75 6c 6c 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 .(forge-pull))..;;;###autoload.(
cd20 64 65 66 75 6e 20 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 defun.forge-rename-default-branc
cd40 68 20 28 29 0a 20 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 h.()..."Rename.the.default.branc
cd60 68 20 74 6f 20 4e 45 57 4e 41 4d 45 2e 0a 43 68 61 6e 67 65 20 74 68 65 20 6e 61 6d 65 20 6f 6e h.to.NEWNAME..Change.the.name.on
cd80 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 79 .the.upstream.remote.and.locally
cda0 2c 20 61 6e 64 20 75 70 64 61 74 65 0a 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 6d 6f 74 65 ,.and.update.the.upstream.remote
cdc0 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.
cde0 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 70 6f "...(interactive)...(let*.((repo
ce00 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?
ce20 29 29 0a 20 20 20 20 20 20 20 20 20 28 5f 20 28 75 6e 6c 65 73 73 20 28 66 6f 72 67 65 2d 67 69 ))..........(_.(unless.(forge-gi
ce40 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 2d 70 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 thub-repository-p.repo).........
ce60 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 55 70 64 61 74 69 6e 67 20 64 65 66 61 ......(user-error."Updating.defa
ce80 75 6c 74 20 62 72 61 6e 63 68 20 6e 6f 74 20 73 75 70 70 6f 72 74 65 64 20 66 6f 72 20 66 6f 72 ult.branch.not.supported.for.for
cea0 67 65 20 60 25 73 27 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 ge.`%s'"........................
cec0 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 66 6f 72 67 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 ...(oref.repo.forge)))).........
cee0 20 28 72 65 6d 6f 74 65 20 28 6f 72 20 28 61 6e 64 20 28 66 62 6f 75 6e 64 70 20 27 66 6f 72 67 .(remote.(or.(and.(fboundp.'forg
cf00 65 2d 2d 67 65 74 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 e--get-remote)..................
cf20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 6d 6f 74 65 29 29 0a 20 20 .........(forge--get-remote))...
cf40 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 2d 73 6f ...................(magit-get-so
cf60 6d 65 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 20 20 20 me-remote)......................
cf80 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 20 72 65 6d 6f 74 65 20 63 6f 6e 66 69 67 75 72 65 (user-error."No.remote.configure
cfa0 64 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 79 6d 72 65 66 20 28 66 6f 72 6d 61 74 20 22 d")))..........(symref.(format."
cfc0 72 65 66 73 2f 72 65 6d 6f 74 65 73 2f 25 73 2f 48 45 41 44 22 20 72 65 6d 6f 74 65 29 29 0a 20 refs/remotes/%s/HEAD".remote))..
cfe0 20 20 20 20 20 20 20 20 28 6f 6c 64 68 65 61 64 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 ........(oldhead.(progn.........
d000 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 44 65 74 65 72 6d 69 6e 69 6e ............(message."Determinin
d020 67 20 6f 6c 64 20 64 65 66 61 75 6c 74 20 62 72 61 6e 63 68 2e 2e 2e 22 29 0a 20 20 20 20 20 20 g.old.default.branch...").......
d040 20 20 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 ..............(magit-git."fetch"
d060 20 22 2d 2d 70 72 75 6e 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ."--prune").....................
d080 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 68 65 61 64 22 20 22 (magit-git."remote"."set-head"."
d0a0 2d 2d 61 75 74 6f 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 --auto".remote).................
d0c0 20 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 ....(message."Determining.old.de
d0e0 66 61 75 6c 74 20 62 72 61 6e 63 68 2e 2e 2e 64 6f 6e 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 fault.branch...done")...........
d100 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 2d 73 74 72 69 6e 67 20 22 73 79 6d ..........(magit-git-string."sym
d120 62 6f 6c 69 63 2d 72 65 66 22 20 22 2d 2d 73 68 6f 72 74 22 20 73 79 6d 72 65 66 29 29 29 0a 20 bolic-ref"."--short".symref)))..
d140 20 20 20 20 20 20 20 20 28 6f 6c 64 6e 61 6d 65 20 28 69 66 20 6f 6c 64 68 65 61 64 0a 20 20 20 ........(oldname.(if.oldhead....
d160 20 20 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 ...................(cdr.(magit-s
d180 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 6f 6c 64 68 65 61 64 29 29 0a 20 20 20 20 20 plit-branch-name.oldhead))......
d1a0 20 20 20 20 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 64 65 ...............(error."Cannot.de
d1c0 74 65 72 6d 69 6e 65 20 6f 6c 64 20 64 65 66 61 75 6c 74 20 62 72 61 6e 63 68 22 29 29 29 0a 20 termine.old.default.branch")))..
d1e0 20 20 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 ........(default.(and.(not.(equa
d200 6c 20 6f 6c 64 6e 61 6d 65 20 22 6d 61 69 6e 22 29 29 20 22 6d 61 69 6e 22 29 29 0a 20 20 20 20 l.oldname."main"))."main")).....
d220 20 20 20 20 20 28 6e 65 77 6e 61 6d 65 20 28 72 65 61 64 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 .....(newname.(read-string......
d240 20 20 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 ..............(format."Rename.de
d260 66 61 75 6c 74 20 62 72 61 6e 63 68 20 60 25 73 27 20 74 6f 25 73 3a 20 22 0a 20 20 20 20 20 20 fault.branch.`%s'.to%s:.".......
d280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 6c 64 6e 61 6d 65 0a 20 20 20 .....................oldname....
d2a0 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 61 ........................(if.defa
d2c0 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 66 ult.(format.".(default:.%s)".def
d2e0 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 6e 69 ault).""))....................ni
d300 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 20 22 52 l.nil.default))).....(message."R
d320 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 20 20 20 enaming.default.branch...").....
d340 28 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 20 72 65 70 6f 20 (forge--set-default-branch.repo.
d360 6e 65 77 6e 61 6d 65 20 6f 6c 64 6e 61 6d 65 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 newname.oldname).....(forge-refr
d380 65 73 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 esh-buffer).....(message."Renami
d3a0 6e 67 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 3b 3b ng.default.branch...done")))..;;
d3c0 3b 20 43 6f 6e 66 69 67 75 72 61 74 69 6f 6e 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 ;.Configuration..(transient-defi
d3e0 6e 65 2d 69 6e 66 69 78 20 66 6f 72 67 65 2d 66 6f 72 67 65 2e 72 65 6d 6f 74 65 20 28 29 0a 20 ne-infix.forge-forge.remote.()..
d400 20 22 43 68 61 6e 67 65 20 74 68 65 20 6c 6f 63 61 6c 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20 ."Change.the.local.value.of.the.
d420 60 66 6f 72 67 65 2e 72 65 6d 6f 74 65 27 20 47 69 74 20 76 61 72 69 61 62 6c 65 2e 22 0a 20 20 `forge.remote'.Git.variable."...
d440 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 3a 63 68 6f 69 :class.'magit--git-variable:choi
d460 63 65 73 0a 20 20 3a 76 61 72 69 61 62 6c 65 20 22 66 6f 72 67 65 2e 72 65 6d 6f 74 65 22 0a 20 ces...:variable."forge.remote"..
d480 20 3a 63 68 6f 69 63 65 73 20 23 27 6d 61 67 69 74 2d 6c 69 73 74 2d 72 65 6d 6f 74 65 73 0a 20 .:choices.#'magit-list-remotes..
d4a0 20 3a 64 65 66 61 75 6c 74 20 28 6c 61 6d 62 64 61 20 28 5f 29 20 28 66 6f 72 67 65 2d 2d 67 65 .:default.(lambda.(_).(forge--ge
d4c0 74 2d 72 65 6d 6f 74 65 20 74 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 t-remote.t)))..(transient-define
d4e0 2d 69 6e 66 69 78 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 -infix.forge-forge.graphqlItemLi
d500 6d 69 74 20 28 29 0a 20 20 22 43 68 61 6e 67 65 20 74 68 65 20 6d 61 78 69 6d 75 6d 20 6e 75 6d mit.()..."Change.the.maximum.num
d520 62 65 72 20 6f 66 20 47 72 61 70 68 51 4c 20 65 6e 74 69 74 69 65 73 20 74 6f 20 70 75 6c 6c 20 ber.of.GraphQL.entities.to.pull.
d540 61 74 20 6f 6e 63 65 2e 22 0a 20 20 3a 69 66 20 23 27 66 6f 72 67 65 2d 2d 67 65 74 2d 67 69 74 at.once."...:if.#'forge--get-git
d560 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 3a 63 6c 61 73 73 20 27 6d 61 67 69 74 2d 2d hub-repository...:class.'magit--
d580 67 69 74 2d 76 61 72 69 61 62 6c 65 0a 20 20 3a 76 61 72 69 61 62 6c 65 20 22 66 6f 72 67 65 2e git-variable...:variable."forge.
d5a0 67 72 61 70 68 71 6c 49 74 65 6d 4c 69 6d 69 74 22 0a 20 20 3a 72 65 61 64 65 72 20 23 27 72 65 graphqlItemLimit"...:reader.#'re
d5c0 61 64 2d 73 74 72 69 6e 67 0a 20 20 3a 64 65 66 61 75 6c 74 20 28 6c 61 6d 62 64 61 20 28 29 20 ad-string...:default.(lambda.().
d5e0 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 67 68 75 62 2d 67 72 61 70 68 71 6c 2d 69 (number-to-string.ghub-graphql-i
d600 74 65 6d 73 2d 70 65 72 2d 72 65 71 75 65 73 74 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d tems-per-request)))..(transient-
d620 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 64 69 73 70 6c define-suffix.forge-toggle-displ
d640 61 79 2d 69 6e 2d 73 74 61 74 75 73 2d 62 75 66 66 65 72 20 28 29 0a 20 20 22 54 6f 67 67 6c 65 ay-in-status-buffer.()..."Toggle
d660 20 77 68 65 74 68 65 72 20 74 6f 20 64 69 73 70 6c 61 79 20 74 6f 70 69 63 73 20 69 6e 20 74 68 .whether.to.display.topics.in.th
d680 65 20 63 75 72 72 65 6e 74 20 73 74 61 74 75 73 20 62 75 66 66 65 72 2e 22 0a 20 20 3a 69 6e 61 e.current.status.buffer."...:ina
d6a0 70 74 2d 69 66 2d 6e 6f 74 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 pt-if-not.(lambda.()............
d6c0 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 6d 61 67 69 .......(and.(eq.major-mode.'magi
d6e0 74 2d 73 74 61 74 75 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 t-status-mode)..................
d700 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 6b 6e 6f ......(forge-get-repository.:kno
d720 77 6e 3f 29 29 29 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 wn?)))...:description.(lambda.()
d740 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 66 6f 72 67 65 2d 64 69 73 70 ..................(if.forge-disp
d760 6c 61 79 2d 69 6e 2d 73 74 61 74 75 73 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 lay-in-status-buffer............
d780 20 20 20 20 20 20 20 20 20 20 22 68 69 64 65 20 61 6c 6c 20 74 6f 70 69 63 73 22 0a 20 20 20 20 .........."hide.all.topics".....
d7a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 64 69 73 70 6c 61 79 20 74 6f 70 69 63 73 22 29 ..............."display.topics")
d7c0 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 69 76 65 29 )...:transient.t...(interactive)
d7e0 0a 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 64 69 73 70 6c 61 79 2d 69 6e 2d 73 74 61 74 75 73 ...(setq.forge-display-in-status
d800 2d 62 75 66 66 65 72 20 28 6e 6f 74 20 66 6f 72 67 65 2d 64 69 73 70 6c 61 79 2d 69 6e 2d 73 74 -buffer.(not.forge-display-in-st
d820 61 74 75 73 2d 62 75 66 66 65 72 29 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 atus-buffer))...(forge-refresh-b
d840 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 69 uffer))..(transient-define-suffi
d860 78 20 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 63 6c 6f 73 65 64 2d 76 69 73 69 62 69 6c 69 74 79 x.forge-toggle-closed-visibility
d880 20 28 29 0a 20 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 .()..."Toggle.whether.to.display
d8a0 20 72 65 63 65 6e 74 6c 79 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 73 2e 0a 54 68 69 73 20 6f 6e .recently.closed.topics..This.on
d8c0 6c 79 20 61 66 66 65 63 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 73 74 61 74 75 73 20 62 75 66 ly.affect.the.current.status.buf
d8e0 66 65 72 2e 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 20 28 6c 61 6d 62 64 61 20 28 29 fer."...:inapt-if-not.(lambda.()
d900 0a 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 72 67 65 2d 64 69 ...................(and.forge-di
d920 73 70 6c 61 79 2d 69 6e 2d 73 74 61 74 75 73 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 splay-in-status-buffer..........
d940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 6d 61 ..............(eq.major-mode.'ma
d960 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 20 20 20 20 20 20 git-status-mode)................
d980 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 6b ........(forge-get-repository.:k
d9a0 6e 6f 77 6e 3f 29 29 29 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 nown?)))...:description.(lambda.
d9c0 28 29 0a 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 28 61 74 6f ()..................(if.(or.(ato
d9e0 6d 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6c 69 6d 69 74 29 0a 20 20 20 20 20 20 m.forge-topic-list-limit).......
da00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3e 20 28 63 64 72 20 66 6f 72 67 65 ...................(>.(cdr.forge
da20 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6c 69 6d 69 74 29 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 -topic-list-limit).0))..........
da40 20 20 20 20 20 20 20 20 20 20 20 20 22 68 69 64 65 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 73 22 ............"hide.closed.topics"
da60 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 64 69 73 70 6c 61 79 20 72 65 63 ...................."display.rec
da80 65 6e 74 6c 79 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 73 22 29 29 0a 20 20 3a 74 72 61 6e 73 69 ently.closed.topics"))...:transi
daa0 65 6e 74 20 74 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6d 61 6b 65 2d 6c 6f ent.t...(interactive)...(make-lo
dac0 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6c cal-variable.'forge-topic-list-l
dae0 69 6d 69 74 29 0a 20 20 28 69 66 20 28 61 74 6f 6d 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 imit)...(if.(atom.forge-topic-li
db00 73 74 2d 6c 69 6d 69 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 74 6f 70 69 st-limit).......(setq.forge-topi
db20 63 2d 6c 69 73 74 2d 6c 69 6d 69 74 20 28 63 6f 6e 73 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c c-list-limit.(cons.forge-topic-l
db40 69 73 74 2d 6c 69 6d 69 74 20 35 29 29 0a 20 20 20 20 28 73 65 74 63 64 72 20 66 6f 72 67 65 2d ist-limit.5)).....(setcdr.forge-
db60 74 6f 70 69 63 2d 6c 69 73 74 2d 6c 69 6d 69 74 20 28 2a 20 2d 31 20 28 63 64 72 20 66 6f 72 67 topic-list-limit.(*.-1.(cdr.forg
db80 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6c 69 6d 69 74 29 29 29 29 0a 20 20 28 66 6f 72 67 65 2d e-topic-list-limit))))...(forge-
dba0 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 75 74 6f 6c 6f 61 64 refresh-buffer))..;;;###autoload
dbc0 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 61 64 64 2d 70 75 6c 6c 72 65 71 2d 72 65 .(autoload.'forge-add-pullreq-re
dbe0 66 73 70 65 63 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 fspec."forge-commands".nil.t).(t
dc00 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 61 64 64 ransient-define-suffix.forge-add
dc20 2d 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 65 63 20 28 29 0a 20 20 22 43 6f 6e 66 69 67 75 72 65 -pullreq-refspec.()..."Configure
dc40 20 47 69 74 20 74 6f 20 66 65 74 63 68 20 61 6c 6c 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e .Git.to.fetch.all.pull-requests.
dc60 0a 54 68 69 73 20 69 73 20 64 6f 6e 65 20 62 79 20 61 64 64 69 6e 67 20 5c 22 2b 72 65 66 73 2f .This.is.done.by.adding.\"+refs/
dc80 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 5c 22 0a 74 6f pull/*/head:refs/pullreqs/*\".to
dca0 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 60 72 65 6d 6f 74 65 2e 52 45 4d 4f 54 45 2e 66 65 74 .the.value.of.`remote.REMOTE.fet
dcc0 63 68 27 2c 20 77 68 65 72 65 20 52 45 4d 4f 54 45 20 69 73 20 74 68 65 0a 75 70 73 74 72 65 61 ch',.where.REMOTE.is.the.upstrea
dce0 6d 20 72 65 6d 6f 74 65 2e 20 20 41 6c 73 6f 20 66 65 74 63 68 20 66 72 6f 6d 20 52 45 4d 4f 54 m.remote...Also.fetch.from.REMOT
dd00 45 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 E."...:if-not.'forge--pullreq-re
dd20 66 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 fspec...:description."add.pull-r
dd40 65 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 equest.refspec"...(interactive).
dd60 20 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 ..(let*.((repo....(forge-get-rep
dd80 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 72 65 6d 6f 74 65 ository.:stub))..........(remote
dda0 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 20 28 ..(oref.repo.remote))..........(
ddc0 66 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 fetch...(magit-get-all."remote".
dde0 72 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 remote."fetch"))..........(refsp
de00 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 73 70 65 63 29 29 29 ec.(oref.repo.pullreq-refspec)))
de20 0a 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 .....(if.(member.refspec.fetch).
de40 20 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 ........(message."Pull-request.r
de60 65 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 efspec.is.already.active")......
de80 20 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 .(magit-call-git."config"."--add
dea0 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 66 6f 72 6d 61 74 20 ".......................(format.
dec0 22 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 "remote.%s.fetch".remote).......
dee0 20 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 ................refspec).......(
df00 6d 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 magit-git-fetch.remote.(magit-fe
df20 74 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 tch-arguments)))))..(defun.forge
df40 2d 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 --pullreq-refspec.()...(let*.((r
df60 65 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 epo....(forge-get-repository.:st
df80 75 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 ub))..........(remote..(oref.rep
dfa0 6f 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 o.remote))..........(fetch...(ma
dfc0 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 65 20 22 66 65 74 git-get-all."remote".remote."fet
dfe0 63 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 ch"))..........(refspec.(oref.re
e000 70 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 po.pullreq-refspec))).....(car.(
e020 6d 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 member.refspec.fetch))))..;;;.Ad
e040 64 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 20 28 d.repositories..;;;###autoload.(
e060 61 75 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 autoload.'forge-add-repository."
e080 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 6e forge-commands".nil.t).(transien
e0a0 74 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 72 65 70 6f 73 69 t-define-suffix.forge-add-reposi
e0c0 74 6f 72 79 20 28 75 72 6c 29 0a 20 20 22 41 64 64 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 74 tory.(url)..."Add.a.repository.t
e0e0 6f 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 0a 4f 66 66 65 72 20 74 6f 20 65 69 74 68 65 72 20 o.the.database..Offer.to.either.
e100 70 75 6c 6c 20 74 6f 70 69 63 73 20 28 6e 6f 77 20 61 6e 64 20 69 6e 20 74 68 65 20 66 75 74 75 pull.topics.(now.and.in.the.futu
e120 72 65 29 20 6f 72 20 74 6f 20 6f 6e 6c 79 0a 70 75 6c 6c 20 69 6e 64 69 76 69 64 75 61 6c 20 74 re).or.to.only.pull.individual.t
e140 6f 70 69 63 73 20 77 68 65 6e 20 74 68 65 20 75 73 65 72 20 69 6e 76 6f 6b 65 73 20 60 66 6f 72 opics.when.the.user.invokes.`for
e160 67 65 2d 70 75 6c 6c 2d 74 6f 70 69 63 27 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 ge-pull-topic'."...:description.
e180 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
e1a0 6d 61 74 20 22 61 64 64 20 25 73 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 20 64 61 74 61 62 61 73 mat."add.%srepository.to.databas
e1c0 65 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 28 69 66 20 e"..........................(if.
e1e0 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 3f 29 20 22 (forge-get-repository.:known?)."
e200 61 6e 6f 74 68 65 72 20 22 20 22 22 29 29 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 another."."")))...(interactive..
e220 20 20 28 6c 65 74 20 28 28 73 74 72 20 28 6d 61 67 69 74 2d 72 65 61 64 2d 73 74 72 69 6e 67 2d ..(let.((str.(magit-read-string-
e240 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 41 64 64 20 72 65 70 6f 73 69 74 6f 72 ns................"Add.repositor
e260 79 20 74 6f 20 64 61 74 61 62 61 73 65 20 28 75 72 6c 20 6f 72 20 6e 61 6d 65 29 22 0a 20 20 20 y.to.database.(url.or.name)"....
e280 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 72 65 70 6f 20 28 66 6f ............(and-let*.((repo.(fo
e2a0 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 0a 20 20 20 20 20 rge-get-repository.:stub))......
e2c0 20 20 20 20 20 20 20 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 .....................(remote.(or
e2e0 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ef.repo.remote)))...............
e300 20 20 20 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 ...(magit-git-string."remote"."g
e320 65 74 2d 75 72 6c 22 20 72 65 6d 6f 74 65 29 29 29 29 29 0a 20 20 20 20 20 28 69 66 20 28 73 74 et-url".remote)))))......(if.(st
e340 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 28 3a 2f 2f 5c 5c 7c 40 5c 5c 29 22 20 73 74 72 ring-match-p."\\(://\\|@\\)".str
e360 29 0a 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 73 74 72 29 0a 20 20 20 20 20 20 20 28 6c 69 )..........(list.str)........(li
e380 73 74 20 28 6d 61 67 69 74 2d 63 6c 6f 6e 65 2d 2d 6e 61 6d 65 2d 74 6f 2d 75 72 6c 20 73 74 72 st.(magit-clone--name-to-url.str
e3a0 29 29 29 29 29 0a 20 20 28 69 66 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 )))))...(if.(forge-get-repositor
e3c0 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 28 75 73 65 72 y.url.nil.:tracked?).......(user
e3e0 2d 65 72 72 6f 72 20 22 25 73 20 69 73 20 61 6c 72 65 61 64 79 20 74 72 61 63 6b 65 64 20 69 6e -error."%s.is.already.tracked.in
e400 20 46 6f 72 67 65 20 64 61 74 61 62 61 73 65 22 20 75 72 6c 29 0a 20 20 20 20 28 6c 65 74 20 28 .Forge.database".url).....(let.(
e420 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 75 72 6c 20 (repo.(forge-get-repository.url.
e440 6e 69 6c 20 3a 69 6e 73 65 72 74 21 29 29 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 72 65 61 nil.:insert!))).......(magit-rea
e460 64 2d 63 68 61 72 2d 63 61 73 65 20 22 50 75 6c 6c 20 22 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 d-char-case."Pull.".nil.........
e480 28 3f 61 20 22 5b 61 5d 6c 6c 20 74 6f 70 69 63 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 (?a."[a]ll.topics".............(
e4a0 66 6f 72 67 65 2d 70 75 6c 6c 20 72 65 70 6f 29 29 0a 20 20 20 20 20 20 20 20 28 3f 69 20 22 5b forge-pull.repo)).........(?i."[
e4c0 69 5d 6e 64 69 76 69 64 75 61 6c 20 74 6f 70 69 63 73 20 28 75 73 65 66 75 6c 20 66 6f 72 20 63 i]ndividual.topics.(useful.for.c
e4e0 61 73 75 61 6c 20 63 6f 6e 74 72 69 62 75 74 6f 72 73 29 22 0a 20 20 20 20 20 20 20 20 20 20 20 asual.contributors)"............
e500 20 28 6f 73 65 74 20 72 65 70 6f 20 73 65 6c 65 63 74 69 76 65 2d 70 20 74 29 0a 20 20 20 20 20 .(oset.repo.selective-p.t)......
e520 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 20 72 65 70 6f 29 29 29 29 29 29 0a 0a .......(forge--pull.repo))))))..
e540 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 61 64 64 2d ;;;###autoload.(defun.forge-add-
e560 75 73 65 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 user-repositories.(host.user)...
e580 22 41 64 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 "Add.all.of.USER's.repositories.
e5a0 66 72 6f 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 from.HOST.to.the.database..This.
e5c0 6d 61 79 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 may.take.a.while...Only.Github.i
e5e0 73 20 73 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 s.supported.at.the.moment."...(i
e600 6e 74 65 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 nteractive....(list.(forge-read-
e620 68 6f 73 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 host."Add.repositories.from.Gith
e640 75 62 20 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 ub.host"........................
e660 20 20 20 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 ...'forge-github-repository)....
e680 20 20 20 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 ......(read-string."User:.")))..
e6a0 20 28 66 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 .(forge--add-user-repos.'forge-g
e6c0 69 74 68 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 ithub-repository.host.user))..;;
e6e0 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 61 64 64 2d 6f 72 ;###autoload.(defun.forge-add-or
e700 67 61 6e 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 ganization-repositories.(host.or
e720 67 61 6e 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 ganization)..."Add.all.of.ORGANI
e740 5a 41 54 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 ZATION's.repositories.from.HOST.
e760 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 20 74 61 6b 65 20 61 to.the.database..This.may.take.a
e780 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 75 70 70 6f 72 74 65 .while...Only.Github.is.supporte
e7a0 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 72 61 63 74 69 76 65 d.at.the.moment."...(interactive
e7c0 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 74 20 22 41 64 64 20 ....(list.(forge-read-host."Add.
e7e0 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 68 6f 73 74 22 0a 20 repositories.from.Github.host"..
e800 20 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 67 65 2d .........................'forge-
e820 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 28 72 65 61 github-repository)..........(rea
e840 64 2d 73 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 d-string."Organization:.")))...(
e860 66 6f 72 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 forge--add-organization-repos.'f
e880 6f 72 67 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 orge-github-repository.host.orga
e8a0 6e 69 7a 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 nization))..;;;.Cleanup..;;;###a
e8c0 75 74 6f 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 utoload.(defun.forge-remove-repo
e8e0 73 69 74 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 sitory.(repository)..."Remove.a.
e900 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 73 65 2e 22 0a 20 repository.from.the.database."..
e920 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 65 74 2a 20 28 28 72 .(interactive....(pcase-let*.((r
e940 65 70 6f 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 epo.(forge-read-repository."Remo
e960 76 65 20 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 ve.repository.from.db"))........
e980 20 20 20 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 .........((eieio.githost.owner.n
e9a0 61 6d 65 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 ame).repo))......(if.(yes-or-no-
e9c0 70 20 28 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 p.(format."Do.you.really.want.to
e9e0 20 72 65 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 .remove.\"%s/%s.@%s\".%s?.".....
ea00 20 20 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 65 72 20 ..........................owner.
ea20 6e 61 6d 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 name.githost."from.the.database"
ea40 29 29 0a 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 ))..........(list.repo)........(
ea60 75 73 65 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 user-error."Abort"))))...(closql
ea80 2d 64 65 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 -delete.repository)...(forge-ref
eaa0 72 65 73 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 resh-buffer))..;;;###autoload.(d
eac0 65 66 75 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 efun.forge-remove-topic-locally.
eae0 28 74 6f 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 (topic)..."Remove.a.topic.from.t
eb00 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 20 6f 6e 6c 79 2e 0a 44 75 65 20 74 6f 20 68 he.local.database.only..Due.to.h
eb20 6f 77 20 74 68 65 20 73 75 70 70 6f 72 74 65 64 20 41 50 49 73 20 77 6f 72 6b 2c 20 69 74 20 77 ow.the.supported.APIs.work,.it.w
eb40 6f 75 6c 64 20 62 65 20 74 6f 6f 20 65 78 70 65 6e 73 69 76 65 20 74 6f 0a 61 75 74 6f 6d 61 74 ould.be.too.expensive.to.automat
eb60 69 63 61 6c 6c 79 20 72 65 6d 6f 76 65 20 74 6f 70 69 63 73 20 66 72 6f 6d 20 74 68 65 20 6c 6f ically.remove.topics.from.the.lo
eb80 63 61 6c 20 64 61 74 61 62 61 73 65 20 74 68 61 74 20 77 65 72 65 0a 72 65 6d 6f 76 65 64 20 66 cal.database.that.were.removed.f
eba0 72 6f 6d 20 74 68 65 20 66 6f 72 67 65 2e 20 20 54 68 65 20 70 75 72 70 6f 73 65 20 6f 66 20 74 rom.the.forge...The.purpose.of.t
ebc0 68 69 73 20 63 6f 6d 6d 61 6e 64 20 69 73 20 74 6f 20 61 6c 6c 6f 77 0a 79 6f 75 20 74 6f 20 6d his.command.is.to.allow.you.to.m
ebe0 61 6e 75 61 6c 6c 79 20 63 6c 65 61 6e 20 75 70 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 anually.clean.up.the.local.datab
ec00 61 73 65 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 ase."...(interactive.(list.(forg
ec20 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 20 4c 4f 43 41 4c e-read-topic."Delete.topic.LOCAL
ec40 4c 59 20 6f 6e 6c 79 22 29 29 29 0a 20 20 28 73 65 74 71 20 74 6f 70 69 63 20 28 66 6f 72 67 65 LY.only")))...(setq.topic.(forge
ec60 2d 67 65 74 2d 74 6f 70 69 63 20 74 6f 70 69 63 29 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 64 65 6c -get-topic.topic))...(closql-del
ec80 65 74 65 20 74 6f 70 69 63 29 0a 20 20 28 69 66 20 28 61 6e 64 20 28 64 65 72 69 76 65 64 2d 6d ete.topic)...(if.(and.(derived-m
eca0 6f 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 ode-p.'forge-topic-mode)........
ecc0 20 20 20 20 28 65 71 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 ....(eq.(oref.topic.id).........
ece0 20 20 20 20 20 20 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 .......(oref.forge-buffer-topic.
ed00 69 64 29 29 29 0a 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 id))).......(kill-buffer.(curren
ed20 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 t-buffer)).....(forge-refresh-bu
ed40 66 66 65 72 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 ffer)))..;;;###autoload.(defun.f
ed60 6f 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 orge-reset-database.()..."Move.t
ed80 68 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 he.current.database.file.to.the.
eda0 74 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 trash..This.is.useful.after.the.
edc0 64 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 database.scheme.has.changed,.whi
ede0 63 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 ch.will.happen.a.few.times.while
ee00 20 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 .the.forge.functionality.is.stil
ee20 6c 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 l.under.heavy.development."...(i
ee40 6e 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 nteractive)...(when.(and.(file-e
ee60 78 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 xists-p.forge-database-file)....
ee80 20 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 ..........(yes-or-no-p."Really.t
eea0 72 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 rash.Forge's.database.file?.")).
eec0 20 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 ....(when-let.((db.(forge-db.t))
eee0 29 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 ).......(emacsql-close.db)).....
ef00 28 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 (delete-file.forge-database-file
ef20 20 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 .t).....(forge-refresh-buffer)))
ef40 0a 0a 3b 3b 3b 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 0a 0a 28 6d 61 67 69 74 2d 64 65 66 69 ..;;;.Miscellaneous..(magit-defi
ef60 6e 65 2d 73 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 ne-section-jumper.forge-jump-to-
ef80 70 75 6c 6c 72 65 71 73 20 22 50 75 6c 6c 20 72 65 71 75 65 73 74 73 22 20 70 75 6c 6c 72 65 71 pullreqs."Pull.requests".pullreq
efa0 73 29 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 s).(magit-define-section-jumper.
efc0 66 6f 72 67 65 2d 6a 75 6d 70 2d 74 6f 2d 69 73 73 75 65 73 20 22 49 73 73 75 65 73 22 20 69 73 forge-jump-to-issues."Issues".is
efe0 73 75 65 73 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 63 6f 6d sues)..;;;._.(provide.'forge-com
f000 6d 61 6e 64 73 29 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 mands).;;;.forge-commands.el.end
f020 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 00 00 s.here..........................
f040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f0a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f0c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f0e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f1a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f1c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f1e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f200 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 67 69 74 6c 61 62 forge-20240405.1509/forge-gitlab
f220 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.............................
f240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f260 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
f280 30 30 37 33 35 34 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 31 31 00 20 30 00 00 00 0073542.00000000000.015011..0...
f2a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f2c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f2e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f300 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...................
f320 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...................
f340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
f400 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
f420 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.-*
f440 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 34 20 4a 6f -..;;.Copyright.(C).2018-2024.Jo
f460 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.
f480 42 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 3b 3b 20 Bernoulli.<jonas@bernoul.li>.;;.
f4a0 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e Maintainer:.Jonas.Bernoulli.<jon
f4c0 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d as@bernoul.li>..;;.SPDX-License-
f4e0 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..;;
f500 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
f520 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
f540 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.
f560 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
f580 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.
f5a0 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.
f5c0 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
f5e0 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
f600 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
f620 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
f640 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
f660 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
f680 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.
f6a0 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.;;.
f6c0 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
f6e0 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
f700 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
f720 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
f740 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
f760 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/>...;;;
f780 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 67 6c 61 62 29 0a 0a 28 72 65 71 75 69 72 .Code:..(require.'glab)..(requir
f7a0 65 20 27 66 6f 72 67 65 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 e.'forge).(require.'forge-issue)
f7c0 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 0a 3b 3b 3b 20 43 .(require.'forge-pullreq)..;;;.C
f7e0 6c 61 73 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 lass..(defclass.forge-gitlab-rep
f800 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 0a 20 20 28 28 69 ository.(forge-repository)...((i
f820 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 6f ssues-url-format.........:initfo
f840 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 20 rm."https://%h/%o/%n/issues")...
f860 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 69 .(issue-url-format..........:ini
f880 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 25 tform."https://%h/%o/%n/issues/%
f8a0 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 20 i")....(issue-post-url-format...
f8c0 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 73 ..:initform."https://%h/%o/%n/is
f8e0 73 75 65 73 2f 25 69 23 6e 6f 74 65 5f 25 49 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 73 2d 75 sues/%i#note_%I")....(pullreqs-u
f900 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 68 74 74 70 73 rl-format.......:initform."https
f920 3a 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 22 29 0a 20 20 20 ://%h/%o/%n/merge_requests")....
f940 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
f960 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 65 71 form."https://%h/%o/%n/merge_req
f980 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 74 2d 75 72 6c 2d uests/%i")....(pullreq-post-url-
f9a0 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 2f 25 format...:initform."https://%h/%
f9c0 6f 2f 25 6e 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 2f 25 69 23 6e 6f 74 65 5f 25 49 22 29 o/%n/merge_requests/%i#note_%I")
f9e0 0a 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 3a ....(commit-url-format.........:
fa00 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
fa20 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....
fa40 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
fa60 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 72 /commits/%r")....(remote-url-for
fa80 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 25 mat.........:initform."https://%
faa0 68 2f 25 6f 2f 25 6e 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 h/%o/%n")....(create-issue-url-f
fac0 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 6f ormat...:initform."https://%h/%o
fae0 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 2d 70 75 6c 6c /%n/issues/new")....(create-pull
fb00 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 74 74 70 73 3a req-url-format.:initform."https:
fb20 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 6e 65 77 22 29 0a //%h/%o/%n/merge_requests/new").
fb40 20 20 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 ...(pullreq-refspec.:initform."+
fb60 72 65 66 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 refs/merge-requests/*/head:refs/
fb80 70 75 6c 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 pullreqs/*")))..;;;.Pull.;;;;.Re
fba0 70 6f 73 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 pository..(cl-defmethod.forge--p
fbc0 75 6c 6c 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 ull.((repo.forge-gitlab-reposito
fbe0 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 26 ry)............................&
fc00 6f 70 74 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 optional.callback.since)...(cl-a
fc20 73 73 65 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 ssert.(not.(and.since.(forge-get
fc40 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 3a 74 72 61 63 6b 65 64 3f 29 29 29 29 0a 20 -repository.repo.:tracked?))))..
fc60 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 28 .(setq.forge--mode-line-buffer.(
fc80 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 72 current-buffer))...(forge--msg.r
fca0 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 74 epo.t.nil."Pulling.REPO")...(let
fcc0 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 72 .((cb.(let.((buf.(current-buffer
fce0 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 0a ))...................(val.nil)).
fd00 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 6f ..............(lambda.(cb.&optio
fd20 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 28 nal.v).................(when.v.(
fd40 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 29 if.val.(push.v.val).(setq.val.v)
fd60 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 61 )).................(let-alist.va
fd80 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 20 l...................(cond.......
fda0 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 20 .............((not.val).........
fdc0 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 69 ............(forge--fetch-reposi
fde0 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 20 tory.repo.cb))..................
fe00 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 20 ..((not.(assq.'assignees.val))..
fe20 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 68 ...................(forge--fetch
fe40 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 20 -assignees.repo.cb))............
fe60 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 29 ........((not.(assq.'forks.val))
fe80 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
fea0 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 20 ch-forks.repo.cb))..............
fec0 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 0a ......((not.(assq.'labels.val)).
fee0 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
ff00 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 20 h-labels.repo.cb))..............
ff20 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 20 ......((and..issues_enabled.....
ff40 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 20 .....................(not.(assq.
ff60 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 20 'issues.val)))..................
ff80 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 20 ...(forge--fetch-issues.repo.cb.
ffa0 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 64 since))....................((and
ffc0 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 20 ..merge_requests_enabled........
ffe0 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 75 ..................(not.(assq.'pu
10000 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 20 llreqs.val)))...................
10020 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 62 ..(forge--fetch-pullreqs.repo.cb
10040 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 20 .since))....................(t..
10060 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 72 ...................(forge--msg.r
10080 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 20 epo.t.t..."Pulling.REPO").......
100a0 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 74 ..............(forge--msg.repo.t
100c0 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 20 .nil."Storing.REPO")............
100e0 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 6f .........(closql-with-transactio
10100 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 20 n.(forge-db)....................
10120 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 70 ...(forge--update-repository.rep
10140 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 6f o.val).......................(fo
10160 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 73 rge--update-assignees..repo..ass
10180 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 66 ignees).......................(f
101a0 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 61 orge--update-labels.....repo..la
101c0 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 6c bels).......................(dol
101e0 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 65 ist.(v..issues)...(forge--update
10200 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 20 -issue.repo.v)).................
10220 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 72 ......(dolist.(v..pullreqs).(for
10240 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 20 ge--update-pullreq.repo.v)).....
10260 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 6e ..................(oset.repo.con
10280 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 20 dition.:tracked))...............
102a0 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 72 ......(forge--msg.repo.t.t."Stor
102c0 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 28 ing.REPO").....................(
102e0 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 66 cond......................((oref
10300 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 20 .repo.selective-p)).............
10320 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 6c .........(callback.(funcall.call
10340 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 6f back))......................((fo
10360 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 29 rge--maybe-git-fetch.repo.buf)))
10380 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 28 ))))))).....(funcall.cb.cb)))..(
103a0 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 69 cl-defmethod.forge--fetch-reposi
103c0 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 74 tory.((repo.forge-gitlab-reposit
103e0 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 65 ory).callback)...(forge--glab-ge
10400 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 0a t.repo."/projects/:project".nil.
10420 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 65 ....:callback.(lambda.(value._he
10440 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 20 aders._status._req).............
10460 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 2d ....(cond.((oref.repo.selective-
10480 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 20 p)........................(setq.
104a0 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 72 value.(append.'((assignees).(for
104c0 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 20 ks).(labels)....................
104e0 20 20 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 ..........................(issue
10500 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 20 s).(pullreqs))..................
10520 20 20 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 29 ..........................value)
10540 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 74 )).......................((magit
10560 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 76 -get-boolean."forge.omitExpensiv
10580 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 71 e")........................(setq
105a0 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
105c0 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 20 rks).(labels))..................
105e0 20 20 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 29 ..........................value)
10600 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 6c ))).................(funcall.cal
10620 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 65 lback.callback.value))))..(cl-de
10640 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 79 fmethod.forge--update-repository
10660 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)
10680 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 73 .data)...(let-alist.data.....(os
106a0 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 5f et.repo.created.........created_
106c0 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 20 at).....(oset.repo.updated......
106e0 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 72 ...last_activity_at).....(oset.r
10700 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 65 epo.pushed.........nil).....(ose
10720 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 72 t.repo.parent..........forked_fr
10740 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 0a om_project.path_with_namespace).
10760 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 64 ....(oset.repo.description.....d
10780 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 70 escription).....(oset.repo.homep
107a0 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 65 age.......nil).....(oset.repo.de
107c0 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 20 fault-branch..default_branch)...
107e0 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 63 ..(oset.repo.archived-p......arc
10800 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 20 hived).....(oset.repo.fork-p....
10820 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 70 .....(and..forked_from_project.p
10840 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 74 ath_with_namespace.t)).....(oset
10860 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 6f .repo.locked-p.......nil).....(o
10880 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 29 set.repo.mirror-p........mirror)
108a0 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 28 .....(oset.repo.private-p......(
108c0 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 20 equal..visibility."private"))...
108e0 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 73 ..(oset.repo.issues-p........iss
10900 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 69 ues_enabled).....(oset.repo.wiki
10920 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 6f -p..........wiki_enabled).....(o
10940 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 6f set.repo.stars...........star_co
10960 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 20 unt).....(oset.repo.watchers....
10980 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 0a ....star_count)))..;;;;.Topics..
109a0 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 20 (cl-defmethod.forge--pull-topic.
109c0 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 20 ((repo.forge-gitlab-repository).
109e0 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 20 _topic..........................
10a00 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 6b ........&key.callback._errorback
10a20 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 29 )...(forge--pull.repo.callback))
10a40 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 2e .;.TODO.Pull.only.the.one.topic.
10a60 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 72 ..;;;;.Issues..(cl-defmethod.for
10a80 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 69 ge--fetch-issues.((repo.forge-gi
10aa0 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 29 tlab-repository).callback.since)
10ac0 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 70 ...(let.((cb.(let.(val.cur.cnt.p
10ae0 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 6f os)...............(lambda.(cb.&o
10b00 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 64 ptional.v).................(cond
10b20 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 20 ..................((not.pos)....
10b40 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 65 ...............(if.(setq.cur.(se
10b60 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 20 tq.val.v))......................
10b80 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 20 .(progn.........................
10ba0 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 20 (setq.pos.1)....................
10bc0 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 20 .....(setq.cnt.(length.val))....
10be0 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 67 .....................(forge--msg
10c00 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 25 .nil.nil.nil."Pulling.issue.%s/%
10c20 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 20 s".pos.cnt).....................
10c40 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 65 ....(forge--fetch-issue-posts.re
10c60 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)).....................
10c80 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
10ca0 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 20 PO.issues").....................
10cc0 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 73 (funcall.callback.callback.(cons
10ce0 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 20 .'issues.val))))................
10d00 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 71 ..(t...................(if.(setq
10d20 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 20 .cur.(cdr.cur)).................
10d40 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 20 ......(progn....................
10d60 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 20 .....(cl-incf.pos)..............
10d80 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 6e ...........(forge--msg.nil.nil.n
10da0 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 74 il."Pulling.issue.%s/%s".pos.cnt
10dc0 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
10de0 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 29 --fetch-issue-posts.repo.cur.cb)
10e00 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 73 ).....................(forge--ms
10e20 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 22 g.repo.t.t."Pulling.REPO.issues"
10e40 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 63 ).....................(funcall.c
10e60 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 76 allback.callback.(cons.'issues.v
10e80 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 6f al))))))))).....(forge--msg.repo
10ea0 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 20 .t.nil."Pulling.REPO.issues")...
10ec0 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 63 ..(forge--glab-get.repo."/projec
10ee0 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 72 ts/:project/issues".......`((per
10f00 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 2e _page...100).........(order_by..
10f20 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 65 ."updated_at").........,@(and-le
10f40 74 2a 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 t*.((after.(or.since.(oref.repo.
10f60 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)))).............`((
10f80 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))))......
10fa0 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.(
10fc0 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._
10fe0 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.
11000 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.
11020 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.
11040 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)
11060 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
11080 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.
110a0 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"..
110c0 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
110e0 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..
11100 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
11120 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)............
11140 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.(
11160 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)................
11180 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
111a0 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
111c0 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).
111e0 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
11200 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.......
11220 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-
11240 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)).....
11260 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
11280 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...
112a0 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................
112c0 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..............
112e0 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............
11300 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".
11320 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
11340 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)...............
11360 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
11380 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.........
113a0 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..
113c0 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....
113e0 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
11400 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.............
11420 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
11440 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)........................
11460 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)).......
11480 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
114a0 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...
114c0 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
114e0 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............
11500 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...
11520 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
11540 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
11560 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.
11580 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
115a0 6c 6f 74 73 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 lots................;;.at.least.
115c0 63 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 can.serve.as.a.boolean..........
115e0 20 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 .......:closed.......(or..closed
11600 5f 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 _at.(and.(equal..state."closed")
11620 20 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 .1))................:locked-p...
11640 20 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 ...discussion_locked............
11660 20 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 ....:milestone.....milestone.iid
11680 0a 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 ................:body.........(f
116a0 6f 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 orge--sanitize-string..descripti
116c0 6f 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 on)))).........(closql-insert.(f
116e0 6f 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 orge-db).issue.t).........(unles
11700 73 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 s.(magit-get-boolean."forge.omit
11720 45 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 Expensive")...........(forge--se
11740 74 2d 69 64 2d 73 6c 6f 74 20 72 65 70 6f 20 69 73 73 75 65 20 27 61 73 73 69 67 6e 65 65 73 20 t-id-slot.repo.issue.'assignees.
11760 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 73 65 .assignees)...........(forge--se
11780 74 2d 69 64 2d 73 6c 6f 74 20 72 65 70 6f 20 69 73 73 75 65 20 27 6c 61 62 65 6c 73 20 2e 6c 61 t-id-slot.repo.issue.'labels..la
117a0 62 65 6c 73 29 29 0a 20 20 20 20 20 20 20 20 2e 62 6f 64 79 20 2e 69 64 20 3b 20 53 69 6c 65 6e bels))..........body..id.;.Silen
117c0 63 65 20 45 6d 61 63 73 20 32 35 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 72 2e 0a 20 20 20 20 20 ce.Emacs.25.byte-compiler.......
117e0 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)...........
11800 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.((
11820 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 69 post....................(forge-i
11840 73 73 75 65 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 3a 69 ssue-post.....................:i
11860 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 2d 69 d......(forge--object-id.issue-i
11880 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 69 73 73 75 d..id).....................:issu
118a0 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 20 20 20 20 20 e...issue-id....................
118c0 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 20 20 20 20 20 20 .:number...id...................
118e0 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 65 0a 20 20 20 20 ..:author...author.username.....
11900 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 63 72 65 61 74 65 ................:created..create
11920 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 75 70 64 61 74 65 d_at.....................:update
11940 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 20 20 20 20 20 20 d..updated_at...................
11960 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 65 2d 73 74 72 69 ..:body....(forge--sanitize-stri
11980 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 20 28 63 6c 6f 73 ng..body))))...............(clos
119a0 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 74 29 29 29 29 0a ql-insert.(forge-db).post.t)))).
119c0 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 3e 20 2e 75 70 64 61 74 65 64 5f ........(when.(string>..updated_
119e0 61 74 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 29 0a 20 20 20 at.(oref.repo.issues-until))....
11a00 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 74 69 6c 20 2e .......(oset.repo.issues-until..
11a20 75 70 64 61 74 65 64 5f 61 74 29 29 0a 20 20 20 20 20 20 20 20 69 73 73 75 65 29 29 29 29 0a 0a updated_at)).........issue))))..
11a40 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 6f 64 20 66 6f 72 ;;;;.Pullreqs..(cl-defmethod.for
11a60 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 66 6f 72 67 65 2d ge--fetch-pullreqs.((repo.forge-
11a80 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 20 73 69 6e 63 gitlab-repository).callback.sinc
11aa0 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 75 72 20 63 6e 74 e)...(let.((cb.(let.(val.cur.cnt
11ac0 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 61 20 28 63 62 20 .pos)...............(lambda.(cb.
11ae0 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 20 20 20 28 63 6f &optional.v).................(co
11b00 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 70 6f 73 29 0a 20 nd..................((not.pos)..
11b20 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 20 63 75 72 20 28 .................(if.(setq.cur.(
11b40 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 20 20 20 20 20 20 setq.val.v))....................
11b60 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 20 20 20 20 ...(progn.......................
11b80 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 20 20 20 20 20 20 ..(setq.pos.1)..................
11ba0 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 61 6c 29 29 0a 20 .......(setq.cnt.(length.val))..
11bc0 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 6d .......................(forge--m
11be0 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 6c 6c 72 65 71 20 sg.nil.nil.nil."Pulling.pullreq.
11c00 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 20 20 20 20 20 20 %s/%s".pos.cnt).................
11c20 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 71 2d 70 6f ........(forge--fetch-pullreq-po
11c40 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 20 20 20 20 20 20 sts.repo.cur.cb))...............
11c60 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 50 75 6c 6c ......(forge--msg.repo.t.t."Pull
11c80 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 20 20 20 20 20 20 ing.REPO.pullreqs").............
11ca0 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 63 61 6c 6c 62 61 ........(funcall.callback.callba
11cc0 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 0a 20 20 20 20 20 ck.(cons.'pullreqs.val))))......
11ce0 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 6f 75 72 63 65 5f ............((not.(assq.'source_
11d00 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 20 project.(car.cur))).............
11d20 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 73 6f 75 72 ......(forge--fetch-pullreq-sour
11d40 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 20 20 20 20 20 20 ce-repo.repo.cur.cb))...........
11d60 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 5f 70 72 6f 6a 65 .......((not.(assq.'target_proje
11d80 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 20 20 20 20 20 20 ct.(car.cur)))..................
11da0 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 67 65 74 2d 72 65 .(forge--fetch-pullreq-target-re
11dc0 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 20 20 20 20 20 20 po.repo.cur.cb))................
11de0 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 71 ..(t...................(if.(setq
11e00 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 20 .cur.(cdr.cur)).................
11e20 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 20 ......(progn....................
11e40 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 20 .....(cl-incf.pos)..............
11e60 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 6e ...........(forge--msg.nil.nil.n
11e80 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 20 70 6f 73 20 63 il."Pulling.pullreq.%s/%s".pos.c
11ea0 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 28 66 6f 72 nt).........................(for
11ec0 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 70 6f 20 63 75 72 ge--fetch-pullreq-posts.repo.cur
11ee0 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 28 66 6f 72 67 65 .cb)).....................(forge
11f00 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 50 4f 20 70 75 6c --msg.repo.t.t."Pulling.REPO.pul
11f20 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 20 20 28 66 75 6e lreqs").....................(fun
11f40 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 70 75 call.callback.callback.(cons.'pu
11f60 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 6f 72 67 65 2d 2d llreqs.val))))))))).....(forge--
11f80 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 50 4f 20 70 75 6c msg.repo.t.nil."Pulling.REPO.pul
11fa0 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 65 74 20 72 65 70 lreqs").....(forge--glab-get.rep
11fc0 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 65 5f 72 65 71 75 o."/projects/:project/merge_requ
11fe0 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 31 30 30 29 0a 20 ests".......`((per_page...100)..
12000 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 64 5f 61 74 22 29 .......(order_by..."updated_at")
12020 0a 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 2d 6c 65 74 2a 20 28 28 61 66 74 65 72 20 28 6f 72 .........,@(and-let*.((after.(or
12040 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 75 6e 74 69 6c .since.(oref.repo.pullreqs-until
12060 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 5f 61 66 74 65 )))).............`((updated_afte
12080 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 69 6e 61 74 65 r...,after)))).......:unpaginate
120a0 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 28 76 61 6c 75 .t.......:callback.(lambda.(valu
120c0 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 20 20 20 20 20 e._headers._status._req)........
120e0 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 61 6c 75 65 29 ...........(funcall.cb.cb.value)
12100 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 66 65 74 63 68 ))))..(cl-defmethod.forge--fetch
12120 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 67 65 2d 67 69 -pullreq-posts...((repo.forge-gi
12140 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 74 2d tlab-repository).cur.cb)...(let-
12160 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 61 62 alist.(car.cur).....(forge--glab
12180 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 72 6f 6a 65 63 -get.repo.......(format."/projec
121a0 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 65 73 22 20 2e ts/%s/merge_requests/%s/notes"..
121c0 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 20 20 20 27 28 target_project_id..iid).......'(
121e0 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 70 61 67 69 6e (per_page...100)).......:unpagin
12200 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 28 76 ate.t.......:callback.(lambda.(v
12220 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 20 20 alue._headers._status._req).....
12240 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 67 65 74 20 27 ..............(setf.(alist-get.'
12260 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 20 20 20 20 20 notes.(car.cur)).value).........
12280 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 29 29 0a 0a 28 ..........(funcall.cb.cb)))))..(
122a0 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 6c 72 65 cl-defmethod.forge--fetch-pullre
122c0 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 65 2d 67 69 74 q-source-repo...((repo.forge-git
122e0 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 3b 20 49 66 20 lab-repository).cur.cb)...;;.If.
12300 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 74 68 65 6e 20 the.fork.no.longer.exists,.then.
12320 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 2e 0a 20 20 3b `.source_project_id'.is.nil....;
12340 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 6c 74 69 65 73 ;.This.will.lead.to.difficulties
12360 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 69 6e 67 20 77 .later.on.but.there.is.nothing.w
12380 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 6c 65 74 2d 61 e...;;.can.do.about.it....(let-a
123a0 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 72 63 65 5f 70 list.(car.cur).....(if..source_p
123c0 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 6c 61 62 2d 67 roject_id.........(forge--glab-g
123e0 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 73 22 20 2e et.repo.(format."/projects/%s"..
12400 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 20 20 20 20 20 source_project_id).nil..........
12420 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
12440 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)................
12460 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 6f 75 72 63 65 ........(setf.(alist-get.'source
12480 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 20 20 20 20 20 _project.(car.cur)).nil)........
124a0 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 29 29 ................(funcall.cb.cb))
124c0 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 61 20 28 76 61 ...........:callback.(lambda.(va
124e0 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 20 20 20 lue._headers._status._req)......
12500 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 67 65 .................(setf.(alist-ge
12520 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 29 20 76 61 6c t.'source_project.(car.cur)).val
12540 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 66 75 6e 63 61 ue).......................(funca
12560 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 69 73 74 2d 67 ll.cb.cb))).......(setf.(alist-g
12580 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 29 20 6e 69 et.'source_project.(car.cur)).ni
125a0 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 0a 0a 28 63 6c l).......(funcall.cb.cb))))..(cl
125c0 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 6c 72 65 71 2d -defmethod.forge--fetch-pullreq-
125e0 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 67 69 74 6c 61 target-repo...((repo.forge-gitla
12600 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 74 2d 61 6c 69 b-repository).cur.cb)...(let-ali
12620 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 61 62 2d 67 65 st.(car.cur).....(forge--glab-ge
12640 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 73 22 20 2e 74 t.repo.(format."/projects/%s"..t
12660 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 20 3a 65 72 72 arget_project_id).nil.......:err
12680 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 72 73 20 5f 73 orback.(lambda.(_err._headers._s
126a0 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 20 20 28 tatus._req)....................(
126c0 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 74 20 setf.(alist-get.'target_project.
126e0 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 20 20 20 20 20 (car.cur)).nil).................
12700 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 63 61 6c 6c 62 ...(funcall.cb.cb)).......:callb
12720 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 73 74 61 ack.(lambda.(value._headers._sta
12740 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 20 28 73 65 74 tus._req)...................(set
12760 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 74 20 28 63 61 f.(alist-get.'target_project.(ca
12780 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 20 20 r.cur)).value)..................
127a0 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 65 74 .(funcall.cb.cb)))))..(cl-defmet
127c0 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 65 70 6f hod.forge--update-pullreq.((repo
127e0 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).
12800 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
12820 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.......
12840 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 6f 62 6a 65 63 (let*.((pullreq-id.(forge--objec
12860 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 69 64 29 29 0a t-id.'forge-pullreq.repo..iid)).
12880 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 20 20 20 20 20 .............(pullreq...........
128a0 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 20 20 20 20 20 ....(forge-pullreq..............
128c0 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 20 20 20 20 20 ..:id...........pullreq-id......
128e0 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 64 0a 20 20 20 ..........:their-id......iid....
12900 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 69 69 64 0a 20 ............:number........iid..
12920 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 20 28 66 6f 72 ..............:slug.........(for
12940 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 20 20 20 20 3a mat."!%s"..iid)................:
12960 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 0a 20 20 20 20 repository...(oref.repo.id).....
12980 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 65 2d ...........:state........(pcase-
129a0 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...............
129c0 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 27 6d 65 72 67 .................("merged".'merg
129e0 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).............................
12a00 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 20 20 20 20 20 ...("closed".'rejected).........
12a20 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 65 6e 65 64 22 .......................("opened"
12a40 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 74 68 6f 72 20 .'open))................:author.
12a60 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 20 20 20 20 20 .......author.username..........
12a80 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 20 20 20 20 20 ......:title.........title......
12aa0 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 65 61 74 65 64 ..........:created.......created
12ac0 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 20 20 20 20 20 _at................:updated.....
12ae0 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 20 3b 3b 20 60 ..updated_at................;;.`
12b00 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 27 20 6d 61 79 .merged_at'.and.`.closed_at'.may
12b20 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 20 20 20 20 20 .both.be.nil.even...............
12b40 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 65 72 67 65 64 .;;.though.the.pullreq.is.merged
12b60 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 20 20 20 20 20 .or.otherwise.closed............
12b80 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 2c 20 73 6f 20 .....;;.In.such.cases.use.1,.so.
12ba0 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 20 20 20 20 20 that.these.slots.at.least.......
12bc0 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 6f 6c 65 61 6e .........;;.can.serve.as.boolean
12be0 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 20 20 20 20 20 s.................:closed.......
12c00 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 20 20 20 20 20 (or..closed_at..................
12c20 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 72 20 2e 73 74 ................(and.(member..st
12c40 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 29 29 0a 20 20 ate.'("closed"."merged")).1))...
12c60 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 28 6f 72 20 2e .............:merged.......(or..
12c80 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 20 20 20 20 20 merged_at.......................
12ca0 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 74 65 20 22 6d ...........(and.(equal..state."m
12cc0 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 3a 64 72 61 66 erged").1))................:draf
12ce0 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 20 20 20 20 3a t-p.......draft................:
12d00 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 63 6b 65 64 0a locked-p......discussion_locked.
12d20 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 20 20 2e 61 6c ...............:editable-p....al
12d40 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 20 20 20 20 20 low_maintainer_to_push..........
12d60 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 71 75 61 6c 20 ......:cross-repo-p.(not.(equal.
12d80 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 20 20 20 20 20 .source_project_id..............
12da0 20 20 20 20 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 74 61 72 .............................tar
12dc0 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 20 20 20 20 20 get_project_id))................
12de0 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 68 0a 20 20 20 :base-ref......target_branch....
12e00 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 64 69 66 66 5f ............:base-rev......diff_
12e20 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 20 20 20 3a 62 refs.start_sha................:b
12e40 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 2e 70 61 74 68 ase-repo.....target_project.path
12e60 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 20 20 20 20 3a _with_namespace................:
12e80 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 0a 20 20 20 20 head-ref......source_branch.....
12ea0 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 69 66 66 5f 72 ...........:head-rev......diff_r
12ec0 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 20 3a 68 65 61 efs.head_sha................:hea
12ee0 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 77 6e 65 72 2e d-user.....source_project.owner.
12f00 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 61 64 2d 72 65 username................:head-re
12f20 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 77 69 74 68 5f po.....source_project.path_with_
12f40 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 69 6c 65 73 74 namespace................:milest
12f60 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 20 20 20 20 20 one.....milestone.iid...........
12f80 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 73 61 6e 69 74 .....:body.........(forge--sanit
12fa0 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 0a 20 20 20 20 ize-string..description)))).....
12fc0 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 20 70 75 ....(closql-insert.(forge-db).pu
12fe0 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 61 67 69 74 2d llreq.t).........(unless.(magit-
13000 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 76 65 get-boolean."forge.omitExpensive
13020 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 69 64 2d 73 6c 6f 74 ")...........(forge--set-id-slot
13040 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 20 27 61 73 73 69 67 6e 65 65 73 20 2e 61 73 73 69 67 6e .repo.pullreq.'assignees..assign
13060 65 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 69 64 2d 73 6c ees)...........(forge--set-id-sl
13080 6f 74 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 20 27 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 ot.repo.pullreq.'review-requests
130a0 20 2e 72 65 76 69 65 77 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 ..reviewers)...........(forge--s
130c0 65 74 2d 69 64 2d 73 6c 6f 74 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 20 27 6c 61 62 65 6c 73 20 et-id-slot.repo.pullreq.'labels.
130e0 2e 6c 61 62 65 6c 73 29 29 0a 20 20 20 20 20 20 20 20 2e 62 6f 64 79 20 2e 69 64 20 3b 20 53 69 .labels))..........body..id.;.Si
13100 6c 65 6e 63 65 20 45 6d 61 63 73 20 32 35 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 72 2e 0a 20 20 lence.Emacs.25.byte-compiler....
13120 20 20 20 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 ......(dolist.(c..notes)........
13140 20 20 20 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 ...(let-alist.c.............(let
13160 20 28 28 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 .((post....................(forg
13180 65 2d 70 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 e-pullreq-post..................
131a0 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 69 64 20 70 75 ...:id......(forge--object-id.pu
131c0 6c 6c 72 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 llreq-id..id)...................
131e0 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 20 20 20 20 20 20 20 ..:pullreq.pullreq-id...........
13200 20 20 20 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 ..........:number...id..........
13220 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 75 73 65 72 ...........:author...author.user
13240 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 3a 63 72 65 61 74 65 name.....................:create
13260 64 20 2e 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 d..created_at...................
13280 20 20 3a 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 ..:updated..updated_at..........
132a0 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
132c0 74 69 7a 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 tize-string..body))))...........
132e0 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 20 70 6f ....(closql-insert.(forge-db).po
13300 73 74 20 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 3e 20 st.t)))).........(when.(string>.
13320 2e 75 70 64 61 74 65 64 5f 61 74 20 28 6f 72 65 66 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 73 2d .updated_at.(oref.repo.pullreqs-
13340 75 6e 74 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 70 75 6c until))...........(oset.repo.pul
13360 6c 72 65 71 73 2d 75 6e 74 69 6c 20 2e 75 70 64 61 74 65 64 5f 61 74 29 29 0a 20 20 20 20 20 20 lreqs-until..updated_at)).......
13380 20 20 70 75 6c 6c 72 65 71 29 29 29 29 0a 0a 3b 3b 3b 3b 20 4f 74 68 65 72 0a 0a 3b 3b 20 54 68 ..pullreq))))..;;;;.Other..;;.Th
133a0 65 20 65 78 74 65 6e 64 20 6f 66 20 74 68 65 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 66 6f e.extend.of.the.documentation.fo
133c0 72 20 22 47 45 54 20 2f 70 72 6f 6a 65 63 74 73 2f 3a 69 64 2f 75 73 65 72 73 22 20 69 73 0a 3b r."GET./projects/:id/users".is.;
133e0 3b 20 22 47 65 74 20 74 68 65 20 75 73 65 72 73 20 6c 69 73 74 20 6f 66 20 61 20 70 72 6f 6a 65 ;."Get.the.users.list.of.a.proje
13400 63 74 2e 22 20 20 49 20 64 6f 6e 27 74 20 6b 6e 6f 77 20 77 68 61 74 20 74 68 61 74 20 6d 65 61 ct."..I.don't.know.what.that.mea
13420 6e 73 2c 0a 3b 3b 20 62 75 74 20 69 74 20 73 74 61 6e 64 73 20 74 6f 20 72 65 61 73 6f 6e 20 74 ns,.;;.but.it.stands.to.reason.t
13440 68 61 74 20 74 68 69 73 20 6d 75 73 74 20 61 74 20 6c 65 61 73 74 20 6f 76 65 72 6c 61 70 20 77 hat.this.must.at.least.overlap.w
13460 69 74 68 20 74 68 65 0a 3b 3b 20 73 65 74 20 6f 66 20 75 73 65 72 73 20 74 68 61 74 20 63 61 6e ith.the.;;.set.of.users.that.can
13480 20 62 65 20 61 73 73 69 67 6e 65 64 20 74 6f 20 74 6f 70 69 63 73 2e 0a 0a 28 63 6c 2d 64 65 66 .be.assigned.to.topics...(cl-def
134a0 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 61 73 73 69 67 6e 65 65 73 20 28 28 method.forge--fetch-assignees.((
134c0 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 63 61 repo.forge-gitlab-repository).ca
134e0 6c 6c 62 61 63 6b 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 67 65 74 20 72 65 70 6f 20 llback)...(forge--glab-get.repo.
13500 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 75 73 65 72 73 22 0a 20 20 20 20 27 "/projects/:project/users".....'
13520 28 28 70 65 72 5f 70 61 67 65 20 2e 20 31 30 30 29 29 0a 20 20 20 20 3a 75 6e 70 61 67 69 6e 61 ((per_page...100)).....:unpagina
13540 74 65 20 74 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 te.t.....:callback.(lambda.(valu
13560 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 20 20 20 20 20 e._headers._status._req)........
13580 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 63 61 6c 6c 62 .........(funcall.callback.callb
135a0 61 63 6b 20 28 63 6f 6e 73 20 27 61 73 73 69 67 6e 65 65 73 20 76 61 6c 75 65 29 29 29 29 29 0a ack.(cons.'assignees.value))))).
135c0 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 61 73 73 .(cl-defmethod.forge--update-ass
135e0 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 62 2d 72 65 70 6f 73 ignees.((repo.forge-gitlab-repos
13600 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 61 73 73 69 67 6e itory).data)...(oset.repo.assign
13620 65 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 65 70 ees.........(with-slots.(id).rep
13640 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 6f 77 o...........(mapcar.(lambda.(row
13660 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 73 74 ).....................(let-alist
13680 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 3b 3b 20 46 6f .row.......................;;.Fo
136a0 72 20 6f 74 68 65 72 20 66 6f 72 67 65 73 20 77 65 20 64 6f 6e 27 74 20 6e 65 65 64 20 74 6f 20 r.other.forges.we.don't.need.to.
136c0 73 74 6f 72 65 20 60 69 64 27 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 store.`id'......................
136e0 20 3b 3b 20 62 75 74 20 68 65 72 65 20 77 65 20 64 6f 20 62 65 63 61 75 73 65 20 74 68 61 74 27 .;;.but.here.we.do.because.that'
13700 73 20 77 68 61 74 20 68 61 73 20 74 6f 20 62 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s.what.has.to.be................
13720 20 20 20 20 20 20 20 3b 3b 20 75 73 65 64 20 77 68 65 6e 20 61 73 73 69 67 6e 69 6e 67 20 69 73 .......;;.used.when.assigning.is
13740 73 75 65 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 28 6c 69 73 sues........................(lis
13760 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 20 t.(forge--object-id.id..id).....
13780 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 75 73 65 72 6e 61 6d .........................usernam
137a0 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 2e 6e e..............................n
137c0 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 20 20 20 20 ame.............................
137e0 2e 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 61 74 61 29 29 29 .id)))...................data)))
13800 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 66 6f )..(cl-defmethod.forge--fetch-fo
13820 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 73 69 74 6f rks.((repo.forge-gitlab-reposito
13840 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 65 74 ry).callback)...(forge--glab-get
13860 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 66 6f 72 6b 73 22 .repo."/projects/:project/forks"
13880 0a 20 20 20 20 27 28 28 70 65 72 5f 70 61 67 65 20 2e 20 31 30 30 29 0a 20 20 20 20 20 20 28 73 .....'((per_page...100).......(s
138a0 69 6d 70 6c 65 20 2e 20 74 29 29 0a 20 20 20 20 3a 75 6e 70 61 67 69 6e 61 74 65 20 74 0a 20 20 imple...t)).....:unpaginate.t...
138c0 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 65 61 64 ..:callback.(lambda.(value._head
138e0 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 20 ers._status._req)...............
13900 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
13920 6e 73 20 27 66 6f 72 6b 73 20 76 61 6c 75 65 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 ns.'forks.value)))))..(cl-defmet
13940 68 6f 64 20 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 66 6f 72 6b 73 20 28 28 72 65 70 6f 20 66 hod.forge--update-forks.((repo.f
13960 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 20 20 orge-gitlab-repository).data)...
13980 28 6f 73 65 74 20 72 65 70 6f 20 66 6f 72 6b 73 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 (oset.repo.forks.........(with-s
139a0 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
139c0 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)..................
139e0 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...............
13a00 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 66 6f 72 67 65 2d 2d 72 65 70 6f 73 69 74 6f 72 ........(nconc.(forge--repositor
13a20 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 20 20 20 y-ids...........................
13a40 20 20 20 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 0a 20 20 ....(eieio-object-class.repo)...
13a60 20 20 20 20 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 ............................(ore
13a80 66 20 72 65 70 6f 20 67 69 74 68 6f 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 f.repo.githost).................
13aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6e 61 6d 65 73 70 61 63 65 2e 70 61 74 68 0a 20 20 ...............namespace.path...
13ac0 20 20 20 20 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 70 61 74 .............................pat
13ae0 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 20 20 h)..............................
13b00 28 6c 69 73 74 20 2e 6e 61 6d 65 73 70 61 63 65 2e 70 61 74 68 0a 20 20 20 20 20 20 20 20 20 20 (list..namespace.path...........
13b20 20 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 70 61 74 68 29 29 ..........................path))
13b40 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 61 74 61 29 29 29 29 0a 0a 28 ))...................data))))..(
13b60 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 6c 61 62 65 6c 73 cl-defmethod.forge--fetch-labels
13b80 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)
13ba0 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 65 74 20 72 65 .callback)...(forge--glab-get.re
13bc0 70 6f 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 6c 61 62 65 6c 73 22 0a 20 po."/projects/:project/labels"..
13be0 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 3a 75 6e 70 61 ...'((per_page...100)).....:unpa
13c00 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 62 64 61 20 28 ginate.t.....:callback.(lambda.(
13c20 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 20 value._headers._status._req)....
13c40 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 63 .............(funcall.callback.c
13c60 61 6c 6c 62 61 63 6b 20 28 63 6f 6e 73 20 27 6c 61 62 65 6c 73 20 76 61 6c 75 65 29 29 29 29 29 allback.(cons.'labels.value)))))
13c80 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 6c 61 ..(cl-defmethod.forge--update-la
13ca0 62 65 6c 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 73 69 74 bels.((repo.forge-gitlab-reposit
13cc0 6f 72 79 29 20 64 61 74 61 29 0a 20 20 28 6f 73 65 74 20 72 65 70 6f 20 6c 61 62 65 6c 73 0a 20 ory).data)...(oset.repo.labels..
13ce0 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 20 .......(with-slots.(id).repo....
13d00 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 20 .......(mapcar.(lambda.(row)....
13d20 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 0a .................(let-alist.row.
13d40 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 57 65 20 73 68 6f 75 ......................;;.We.shou
13d60 6c 64 20 75 73 65 20 74 68 65 20 6c 61 62 65 6c 27 73 20 60 69 64 27 20 69 6e 73 74 65 61 64 20 ld.use.the.label's.`id'.instead.
13d80 6f 66 20 69 74 73 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 of.its.......................;;.
13da0 60 6e 61 6d 65 27 20 62 75 74 20 61 20 74 6f 70 69 63 27 73 20 60 6c 61 62 65 6c 73 27 20 66 69 `name'.but.a.topic's.`labels'.fi
13dc0 65 6c 64 20 69 73 20 61 20 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eld.is.a.list...................
13de0 20 20 20 20 3b 3b 20 6f 66 20 6e 61 6d 65 73 20 69 6e 73 74 65 61 64 20 6f 66 20 61 20 6c 69 73 ....;;.of.names.instead.of.a.lis
13e00 74 20 6f 66 20 69 64 73 20 6f 72 20 61 6e 20 61 6c 69 73 74 2e 0a 20 20 20 20 20 20 20 20 20 20 t.of.ids.or.an.alist............
13e20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 73 20 61 20 72 65 73 75 6c 74 20 6f 66 20 74 68 ............;;.As.a.result.of.th
13e40 69 73 20 77 65 20 63 61 6e 6e 6f 74 20 72 65 63 6f 67 6e 69 7a 65 20 77 68 65 6e 0a 20 20 20 20 is.we.cannot.recognize.when.....
13e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 20 6c 61 62 65 6c 20 69 73 20 ..................;;.a.label.is.
13e80 72 65 6e 61 6d 65 64 20 61 6e 64 20 61 20 74 6f 70 69 63 20 63 6f 6e 74 69 6e 75 65 73 20 74 6f renamed.and.a.topic.continues.to
13ea0 20 62 65 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 74 61 67 .be.......................;;.tag
13ec0 67 65 64 20 77 69 74 68 20 74 68 65 20 6f 6c 64 20 6c 61 62 65 6c 20 6e 61 6d 65 20 75 6e 74 69 ged.with.the.old.label.name.unti
13ee0 6c 20 69 74 20 69 74 73 65 6c 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l.it.itself.....................
13f00 20 20 3b 3b 20 69 73 20 6d 6f 64 69 66 69 65 64 20 73 6f 6d 65 68 6f 77 2e 20 20 41 64 64 69 74 ..;;.is.modified.somehow...Addit
13f20 69 6f 6e 61 6c 6c 79 20 69 74 20 6c 65 61 64 73 20 74 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 ionally.it.leads.to.............
13f40 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6e 61 6d 65 20 63 6f 6e 66 6c 69 63 74 73 20 62 65 74 77 ..........;;.name.conflicts.betw
13f60 65 65 6e 20 67 72 6f 75 70 20 61 6e 64 20 70 72 6f 6a 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 een.group.and.project...........
13f80 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6c 61 62 65 6c 73 2e 20 20 53 65 65 20 23 31 36 30 ............;;.labels...See.#160
13fa0 2e 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 ........................(list.(f
13fc0 6f 72 67 65 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 orge--object-id.id..name).......
13fe0 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 20 20 20 .......................name.....
14000 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 64 6f 77 6e 63 61 73 ........................(downcas
14020 65 20 2e 63 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 e..color).......................
14040 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 20 20 .......description)))...........
14060 20 20 20 20 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 ........;;.For.now.simply.remove
14080 20 6f 6e 65 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 .one.of.the.duplicates..........
140a0 20 20 20 20 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 ..........(cl-delete-duplicates.
140c0 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............................
140e0 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 65 79 20 28 61 70 70 6c 79 2d 70 61 72 74 69 61 6c .............:key.(apply-partial
14100 6c 79 20 23 27 61 6c 69 73 74 2d 67 65 74 20 27 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 ly.#'alist-get.'name)...........
14120 20 20 20 20 20 20 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 ..............................:t
14140 65 73 74 20 23 27 65 71 75 61 6c 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 4e 6f 74 69 66 69 63 61 74 est.#'equal)))))..;;;;.Notificat
14160 69 6f 6e 73 0a 0a 3b 3b 20 54 68 65 20 63 6c 6f 73 65 73 74 20 74 6f 20 6e 6f 74 69 66 69 63 61 ions..;;.The.closest.to.notifica
14180 74 69 6f 6e 73 20 74 68 61 74 20 47 69 74 6c 61 62 20 70 72 6f 76 69 64 65 73 20 61 72 65 20 22 tions.that.Gitlab.provides.are."
141a0 65 76 65 6e 74 73 22 20 61 73 0a 3b 3b 20 64 65 73 63 72 69 62 65 64 20 61 74 20 68 74 74 70 73 events".as.;;.described.at.https
141c0 3a 2f 2f 64 6f 63 73 2e 67 69 74 6c 61 62 2e 63 6f 6d 2f 65 65 2f 61 70 69 2f 65 76 65 6e 74 73 ://docs.gitlab.com/ee/api/events
141e0 2e 68 74 6d 6c 2e 20 20 54 68 69 73 0a 3b 3b 20 61 6c 6c 6f 77 73 20 75 73 20 74 6f 20 73 65 65 .html...This.;;.allows.us.to.see
14200 20 74 68 65 20 6c 61 73 74 20 65 76 65 6e 74 73 20 74 68 61 74 20 74 6f 6f 6b 20 70 6c 61 63 65 .the.last.events.that.took.place
14220 2c 20 62 75 74 20 74 68 61 74 20 69 73 20 6e 6f 74 0a 3b 3b 20 67 6f 6f 64 20 65 6e 6f 75 67 68 ,.but.that.is.not.;;.good.enough
14240 20 62 65 63 61 75 73 65 20 77 65 20 61 72 65 20 6d 6f 73 74 6c 79 20 69 6e 74 65 72 65 73 74 65 .because.we.are.mostly.intereste
14260 64 20 69 6e 20 65 76 65 6e 74 73 20 77 65 20 68 61 76 65 6e 27 74 0a 3b 3b 20 6c 6f 6f 6b 65 64 d.in.events.we.haven't.;;.looked
14280 20 61 74 20 79 65 74 2e 20 20 47 69 74 6c 61 62 20 64 6f 65 73 6e 27 74 20 6d 61 6b 65 20 61 20 .at.yet...Gitlab.doesn't.make.a.
142a0 64 69 73 74 69 6e 63 74 69 6f 6e 20 62 65 74 77 65 65 6e 20 75 6e 72 65 61 64 0a 3b 3b 20 61 6e distinction.between.unread.;;.an
142c0 64 20 72 65 61 64 20 65 76 65 6e 74 73 2c 20 73 6f 20 74 68 69 73 20 69 73 20 72 61 74 68 65 72 d.read.events,.so.this.is.rather
142e0 20 75 73 65 6c 65 73 73 20 61 6e 64 20 77 65 20 64 6f 6e 27 74 20 75 73 65 20 69 74 20 66 6f 72 .useless.and.we.don't.use.it.for
14300 0a 3b 3b 20 74 68 65 20 74 69 6d 65 20 62 65 69 6e 67 2e 0a 0a 3b 3b 3b 20 4d 75 74 61 74 69 6f .;;.the.time.being...;;;.Mutatio
14320 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 73 75 62 6d 69 74 2d ns..(cl-defmethod.forge--submit-
14340 63 72 65 61 74 65 2d 69 73 73 75 65 20 28 28 5f 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 create-issue.((_.forge-gitlab-re
14360 70 6f 73 69 74 6f 72 79 29 20 72 65 70 6f 29 0a 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 28 66 6f pository).repo)...(let-alist.(fo
14380 72 67 65 2d 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 28 66 6f rge--topic-parse-buffer).....(fo
143a0 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 73 2f 3a rge--glab-post.repo."/projects/:
143c0 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 74 69 74 6c 65 20 20 project/issues".......`((title..
143e0 20 20 20 20 20 2e 20 2c 20 2e 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 28 64 65 73 63 72 69 .......,..title).........(descri
14400 70 74 69 6f 6e 20 2e 20 2c 20 2e 62 6f 64 79 29 29 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 ption...,..body)).......:callbac
14420 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)
14440 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
14460 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
14480 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 75 6c 6c 72 65 71 20 od.forge--submit-create-pullreq.
144a0 28 28 5f 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 62 61 73 ((_.forge-gitlab-repository).bas
144c0 65 2d 72 65 70 6f 29 0a 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 28 66 6f 72 67 65 2d 2d 74 6f 70 e-repo)...(let-alist.(forge--top
144e0 69 63 2d 70 61 72 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 2a ic-parse-buffer).....(pcase-let*
14500 20 28 28 60 28 2c 62 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 .((`(,base-remote...,base-branch
14520 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 73 70 6c 69 74 )...................(magit-split
14540 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 62 61 73 65 2d -branch-name.forge--buffer-base-
14560 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 20 28 60 28 2c 68 65 branch))..................(`(,he
14580 61 64 2d 72 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 ad-remote...,head-branch).......
145a0 20 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 ............(magit-split-branch-
145c0 6e 61 6d 65 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 29 name.forge--buffer-head-branch))
145e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 65 61 64 2d 72 65 70 6f 20 28 66 6f ..................(head-repo.(fo
14600 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 61 64 2d 72 65 rge-get-repository.:stub.head-re
14620 6d 6f 74 65 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 70 6f 73 74 20 mote))).......(forge--glab-post.
14640 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 63 74 2f 6d 65 head-repo."/projects/:project/me
14660 72 67 65 5f 72 65 71 75 65 73 74 73 22 0a 20 20 20 20 20 20 20 20 60 28 28 74 69 74 6c 65 20 2e rge_requests".........`((title..
14680 20 2c 28 69 66 20 28 69 66 20 28 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 2d 70 20 27 66 6f 72 .,(if.(if.(local-variable-p.'for
146a0 67 65 2d 62 75 66 66 65 72 2d 64 72 61 66 74 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ge-buffer-draft-p)..............
146c0 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 64 72 61 66 ...............forge-buffer-draf
146e0 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 2e 64 t-p............................d
14700 72 61 66 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 63 raft).........................(c
14720 6f 6e 63 61 74 20 22 44 72 61 66 74 3a 20 22 20 2e 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 oncat."Draft:."..title).........
14740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 74 69 74 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 ...............title))..........
14760 20 28 64 65 73 63 72 69 70 74 69 6f 6e 20 2e 20 2c 20 2e 62 6f 64 79 29 0a 20 20 20 20 20 20 20 .(description...,..body)........
14780 20 20 20 2c 40 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 68 65 61 64 2d 72 65 6d 6f 74 ...,@(and.(not.(equal.head-remot
147a0 65 20 62 61 73 65 2d 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 e.base-remote)).................
147c0 20 60 28 28 74 61 72 67 65 74 5f 70 72 6f 6a 65 63 74 5f 69 64 20 2e 20 2c 28 6f 72 65 66 20 62 .`((target_project_id...,(oref.b
147e0 61 73 65 2d 72 65 70 6f 20 66 6f 72 67 65 2d 69 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 ase-repo.forge-id))))...........
14800 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 20 (target_branch...,base-branch)..
14820 20 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 .........(source_branch...,head-
14840 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 28 61 6c 6c 6f 77 5f 63 6f 6c 6c 61 62 6f branch)...........(allow_collabo
14860 72 61 74 69 6f 6e 20 2e 20 74 29 29 0a 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 20 ration...t)).........:callback..
14880 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 20 20 (forge--post-submit-callback)...
148a0 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 75 ......:errorback.(forge--post-su
148c0 62 6d 69 74 2d 65 72 72 6f 72 62 61 63 6b 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 bmit-errorback)))))..(cl-defmeth
148e0 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 20 28 28 5f od.forge--submit-create-post.((_
14900 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 74 6f 70 69 63 29 .forge-gitlab-repository).topic)
14920 0a 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 70 6f 73 74 20 74 6f 70 69 63 0a 20 20 20 20 28 ...(forge--glab-post.topic.....(
14940 69 66 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 if.(forge-issue-p.topic)........
14960 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 2f 3a 6e 75 6d ."/projects/:project/issues/:num
14980 62 65 72 2f 6e 6f 74 65 73 22 0a 20 20 20 20 20 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f ber/notes"......."/projects/:pro
149a0 6a 65 63 74 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 2f 3a 6e 75 6d 62 65 72 2f 6e 6f 74 65 ject/merge_requests/:number/note
149c0 73 22 29 0a 20 20 20 20 60 28 28 62 6f 64 79 20 2e 20 2c 28 73 74 72 69 6e 67 2d 74 72 69 6d 20 s").....`((body...,(string-trim.
149e0 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b (buffer-string)))).....:callback
14a00 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).
14a20 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
14a40 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
14a60 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 65 64 69 74 2d 70 6f 73 74 20 28 28 5f 20 66 6f 72 67 65 orge--submit-edit-post.((_.forge
14a80 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 70 6f 73 74 29 0a 20 20 28 66 6f 72 -gitlab-repository).post)...(for
14aa0 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 63 ge--glab-put.post.....(cl-etypec
14ac0 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 22 2f ase.post.......(forge-pullreq."/
14ae0 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 74 73 projects/:project/merge_requests
14b00 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 75 65 20 20 20 /:number").......(forge-issue...
14b20 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 2f 3a 6e 75 6d 62 "/projects/:project/issues/:numb
14b40 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 20 22 2f 70 er").......(forge-issue-post."/p
14b60 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 69 73 73 75 65 73 2f 3a 74 6f 70 69 63 2f 6e rojects/:project/issues/:topic/n
14b80 6f 74 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 70 75 6c 6c otes/:number").......(forge-pull
14ba0 72 65 71 2d 70 6f 73 74 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 6d 65 72 req-post."/projects/:project/mer
14bc0 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 6d 62 65 72 ge_requests/:topic/notes/:number
14be0 22 29 29 0a 20 20 20 20 28 69 66 20 28 63 6c 2d 74 79 70 65 70 20 70 6f 73 74 20 27 66 6f 72 67 ")).....(if.(cl-typep.post.'forg
14c00 65 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 28 66 6f 72 e-topic).........(let-alist.(for
14c20 67 65 2d 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 ge--topic-parse-buffer).........
14c40 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
14c60 68 61 74 20 74 68 65 20 75 73 65 72 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 63 68 61 6e 67 65 hat.the.user...........;;.change
14c80 64 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 6e 27 d.the.description.when.that.isn'
14ca0 74 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 72 75 65 2e 20 20 54 68 65 20 73 61 6d 65 20 69 t...........;;.true...The.same.i
14cc0 73 6e 27 74 20 6e 65 63 65 73 73 61 72 79 20 66 6f 72 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 sn't.necessary.for.the..........
14ce0 20 3b 3b 20 74 69 74 6c 65 3b 20 69 6e 20 74 68 61 74 20 63 61 73 65 20 47 69 74 6c 61 62 20 70 .;;.title;.in.that.case.Gitlab.p
14d00 65 72 66 6f 72 6d 73 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6e 65 63 65 73 73 61 erforms.the...........;;.necessa
14d20 72 79 20 63 68 65 63 6b 20 69 74 73 65 6c 66 2e 0a 20 20 20 20 20 20 20 20 20 20 60 28 28 74 69 ry.check.itself............`((ti
14d40 74 6c 65 20 2e 20 2c 20 2e 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 61 tle...,..title).............,@(a
14d60 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 2e 62 6f 64 79 20 28 6f 72 65 66 20 70 6f 73 74 20 nd.(not.(equal..body.(oref.post.
14d80 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 20 60 28 28 64 65 body)))....................`((de
14da0 73 63 72 69 70 74 69 6f 6e 20 2e 20 2c 20 2e 62 6f 64 79 29 29 29 29 29 0a 20 20 20 20 20 20 60 scription...,..body))))).......`
14dc0 28 28 62 6f 64 79 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 ((body...,(string-trim.(buffer-s
14de0 74 72 69 6e 67 29 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 tring))))).....:callback..(forge
14e00 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 3a 65 72 72 --post-submit-callback).....:err
14e20 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 72 orback.(forge--post-submit-error
14e40 62 61 63 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 65 back)))..(cl-defmethod.forge--se
14e60 74 2d 74 6f 70 69 63 2d 66 69 65 6c 64 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 t-topic-field...((_repo.forge-gi
14e80 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 20 66 69 65 6c 64 20 76 61 6c tlab-repository).topic.field.val
14ea0 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 63 0a 20 20 20 ue)...(forge--glab-put.topic....
14ec0 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 66 6f 72 67 65 .(cl-typecase.topic.......(forge
14ee0 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 74 2f 6d 65 72 -pullreq."/projects/:project/mer
14f00 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 20 28 66 6f 72 ge_requests/:number").......(for
14f20 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 65 63 74 2f 69 ge-issue..."/projects/:project/i
14f40 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 65 6c 64 20 2e ssues/:number")).....`((,field..
14f60 20 2c 76 61 6c 75 65 29 29 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d .,value)).....:callback.(forge--
14f80 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 6c set-field-callback.topic)))..(cl
14fa0 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 74 69 74 6c -defmethod.forge--set-topic-titl
14fc0 65 0a 20 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 e...((repo.forge-gitlab-reposito
14fe0 72 79 29 20 74 6f 70 69 63 20 74 69 74 6c 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 74 ry).topic.title)...(forge--set-t
15000 6f 70 69 63 2d 66 69 65 6c 64 20 72 65 70 6f 20 74 6f 70 69 63 20 27 74 69 74 6c 65 20 74 69 74 opic-field.repo.topic.'title.tit
15020 6c 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 2d 73 65 74 2d 74 le))..(cl-defmethod.forge--set-t
15040 6f 70 69 63 2d 73 74 61 74 65 0a 20 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 opic-state...((repo.forge-gitlab
15060 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 20 73 74 61 74 65 29 0a 20 20 28 66 6f 72 -repository).topic.state)...(for
15080 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.'
150a0 73 74 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 state_event.....................
150c0 20 20 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 ......(pcase-exhaustive.state...
150e0 20 20 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 ..........................;;.Mer
15100 67 69 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 ging.isn't.done.through.here....
15120 20 20 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 ..........................('comp
15140 6c 65 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 leted."close")..................
15160 20 20 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 ...........('unplanned."close").
15180 20 20 20 20 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 ............................('re
151a0 6a 65 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 jected.."close")................
151c0 20 20 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 .............('open......"reopen
151e0 22 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 "))))..(cl-defmethod.forge--set-
15200 74 6f 70 69 63 2d 64 72 61 66 74 0a 20 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 topic-draft...((repo.forge-gitla
15220 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 20 76 61 6c 75 65 29 0a 20 20 28 6c 65 b-repository).topic.value)...(le
15240 74 20 28 28 62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 t.((buffer.(current-buffer)))...
15260 20 20 28 67 6c 61 62 2d 67 72 61 70 68 71 6c 0a 20 20 20 20 20 60 28 6d 75 74 61 74 69 6f 6e 20 ..(glab-graphql......`(mutation.
15280 28 6d 65 72 67 65 52 65 71 75 65 73 74 53 65 74 44 72 61 66 74 0a 20 20 20 20 20 20 20 20 20 20 (mergeRequestSetDraft...........
152a0 20 20 20 20 20 20 20 5b 28 69 6e 70 75 74 20 24 69 6e 70 75 74 20 4d 65 72 67 65 52 65 71 75 65 .......[(input.$input.MergeReque
152c0 73 74 53 65 74 44 72 61 66 74 49 6e 70 75 74 21 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 stSetDraftInput!)]..............
152e0 20 20 20 20 28 6d 65 72 67 65 52 65 71 75 65 73 74 20 69 69 64 20 64 72 61 66 74 29 29 29 0a 20 ....(mergeRequest.iid.draft)))..
15300 20 20 20 20 60 28 28 69 6e 70 75 74 20 28 70 72 6f 6a 65 63 74 50 61 74 68 20 2e 20 2c 28 66 6f ....`((input.(projectPath...,(fo
15320 72 6d 61 74 20 22 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 rmat."%s/%s"....................
15340 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 6f 77 ...................(oref.repo.ow
15360 6e 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 ner)............................
15380 20 20 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 29 0a 20 20 ...........(oref.repo.name)))...
153a0 20 20 20 20 20 20 20 20 20 20 20 20 28 69 69 64 20 2e 20 2c 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 ............(iid...,(number-to-s
153c0 74 72 69 6e 67 20 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 tring.(oref.topic.number))).....
153e0 20 20 20 20 20 20 20 20 20 20 28 64 72 61 66 74 20 2e 20 2c 76 61 6c 75 65 29 29 29 0a 20 20 20 ..........(draft...,value)))....
15400 20 20 3a 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 ..:host.(oref.(forge-get-reposit
15420 6f 72 79 20 74 6f 70 69 63 29 20 61 70 69 68 6f 73 74 29 0a 20 20 20 20 20 3a 61 75 74 68 20 27 ory.topic).apihost)......:auth.'
15440 66 6f 72 67 65 0a 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 forge......:callback.(lambda.(da
15460 74 61 20 26 72 65 73 74 20 5f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 ta.&rest._)..................(if
15480 20 28 61 73 73 71 20 27 65 72 72 6f 72 20 64 61 74 61 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .(assq.'error.data).............
154a0 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 70 2d 72 65 73 70 6f .........(ghub--graphql-pp-respo
154c0 6e 73 65 20 64 61 74 61 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 nse.data)....................(os
154e0 65 74 20 74 6f 70 69 63 20 64 72 61 66 74 2d 70 20 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 et.topic.draft-p.value).........
15500 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 72 ...........(forge-refresh-buffer
15520 20 62 75 66 66 65 72 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 .buffer))))))..(cl-defmethod.for
15540 67 65 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 66 6f ge--set-topic-labels...((repo.fo
15560 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 20 6c 61 62 rge-gitlab-repository).topic.lab
15580 65 6c 73 29 0a 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 66 69 65 6c 64 20 72 els)...(forge--set-topic-field.r
155a0 65 70 6f 20 74 6f 70 69 63 20 27 6c 61 62 65 6c 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 epo.topic.'labels...............
155c0 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 ............(mapconcat.#'identit
155e0 79 20 6c 61 62 65 6c 73 20 22 2c 22 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 y.labels.",")))..(cl-defmethod.f
15600 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 61 73 73 69 67 6e 65 65 73 0a 20 20 28 28 72 65 orge--set-topic-assignees...((re
15620 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 74 6f 70 69 po.forge-gitlab-repository).topi
15640 63 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 c.assignees)...(let.((users.(map
15660 63 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 car.#'cdr.(oref.repo.assignees))
15680 29 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 )).....(cl-typecase.topic.......
156a0 28 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 (forge-pullreq.;.Can.only.be.ass
156c0 69 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 igned.to.a.single.user.........(
156e0 66 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 forge--set-topic-field.repo.topi
15700 63 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 c.'assignee_id..................
15720 20 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 ..............(or.(caddr.(assoc.
15740 28 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 (car.assignees).users)).........
15760 20 20 20 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 ...........................0))).
15780 20 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 ......(forge-issue........(forge
157a0 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 61 73 --set-topic-field.repo.topic.'as
157c0 73 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 signee_ids......................
157e0 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 2d 2d 6d 61 70 20 28 63 61 64 64 72 20 28 61 73 73 ..........(or.(--map.(caddr.(ass
15800 6f 63 20 69 74 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 20 oc.it.users)).assignees)........
15820 20 20 20 20 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 ............................0)))
15840 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
15860 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 66 6f 72 pic-review-requests...((repo.for
15880 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 20 72 65 76 69 ge-gitlab-repository).topic.revi
158a0 65 77 65 72 73 29 0a 20 20 28 6c 65 74 20 28 28 75 73 65 72 73 20 28 6d 61 70 63 61 72 20 23 27 ewers)...(let.((users.(mapcar.#'
158c0 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 29 0a 20 20 20 cdr.(oref.repo.assignees))))....
158e0 20 28 66 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 .(forge--set-topic-field.repo.to
15900 70 69 63 20 27 72 65 76 69 65 77 65 72 5f 69 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pic.'reviewer_ids...............
15920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 2d 2d 6d 61 70 20 28 63 61 64 64 72 20 ..............(or.(--map.(caddr.
15940 28 61 73 73 6f 63 20 69 74 20 75 73 65 72 73 29 29 20 72 65 76 69 65 77 65 72 73 29 0a 20 20 20 (assoc.it.users)).reviewers)....
15960 20 20 20 20 20 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))
15980 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 64 65 6c 65 74 65 2d ))..(cl-defmethod.forge--delete-
159a0 63 6f 6d 6d 65 6e 74 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 comment...((_repo.forge-gitlab-r
159c0 65 70 6f 73 69 74 6f 72 79 29 20 70 6f 73 74 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 62 2d epository).post)...(forge--glab-
159e0 64 65 6c 65 74 65 20 70 6f 73 74 0a 20 20 20 20 28 63 6c 2d 65 74 79 70 65 63 61 73 65 20 70 6f delete.post.....(cl-etypecase.po
15a00 73 74 0a 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 st.......(forge-pullreq-post....
15a20 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
15a40 71 75 65 73 74 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 quests/:topic/notes/:number")...
15a60 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 20 20 20 20 22 2f 70 ....(forge-issue-post........"/p
15a80 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a 65 63 74 2f 69 73 73 75 65 73 2f 3a 74 6f 70 69 63 2f 6e rojects/:project/issues/:topic/n
15aa0 6f 74 65 73 2f 3a 6e 75 6d 62 65 72 22 29 29 29 0a 20 20 28 63 6c 6f 73 71 6c 2d 64 65 6c 65 74 otes/:number")))...(closql-delet
15ac0 65 20 70 6f 73 74 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 e.post)...(forge-refresh-buffer)
15ae0 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 74 65 )..(cl-defmethod.forge--topic-te
15b00 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 61 62 mplate-files.((repo.forge-gitlab
15b20 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 20 20 -repository)....................
15b40 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 62 63 ........................(_.(subc
15b60 6c 61 73 73 20 66 6f 72 67 65 2d 69 73 73 75 65 29 29 29 0a 20 20 28 2d 2d 66 69 6c 74 65 72 20 lass.forge-issue)))...(--filter.
15b80 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 60 5c 5c 2e 67 69 74 6c 61 62 2f 69 73 (string-match-p."\\`\\.gitlab/is
15ba0 73 75 65 5f 74 65 6d 70 6c 61 74 65 73 2f 2e 2b 5c 5c 2e 6d 64 5c 5c 27 22 20 69 74 29 0a 20 20 sue_templates/.+\\.md\\'".it)...
15bc0 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 72 65 76 69 73 69 6f 6e 2d 66 69 6c 65 73 20 ..........(magit-revision-files.
15be0 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 29 29 29 0a 0a 28 (oref.repo.default-branch))))..(
15c00 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 74 65 6d 70 6c 61 cl-defmethod.forge--topic-templa
15c20 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 61 62 2d 72 65 70 te-files.((repo.forge-gitlab-rep
15c40 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 20 20 20 ository)........................
15c60 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 62 63 6c 61 73 73 ....................(_.(subclass
15c80 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 29 0a 20 20 28 2d 2d 66 69 6c 74 65 72 20 28 73 .forge-pullreq)))...(--filter.(s
15ca0 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 60 5c 5c 2e 67 69 74 6c 61 62 2f 6d 65 72 67 tring-match-p."\\`\\.gitlab/merg
15cc0 65 5f 72 65 71 75 65 73 74 5f 74 65 6d 70 6c 61 74 65 73 2f 2e 2b 5c 5c 2e 6d 64 5c 5c 27 22 20 e_request_templates/.+\\.md\\'".
15ce0 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 72 65 76 69 73 69 6f 6e 2d it).............(magit-revision-
15d00 66 69 6c 65 73 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 files.(oref.repo.default-branch)
15d20 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 66 6f 72 6b 2d 72 )))..(cl-defmethod.forge--fork-r
15d40 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 2d 72 65 epository.((repo.forge-gitlab-re
15d60 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 20 28 6f pository).fork)...(with-slots.(o
15d80 77 6e 65 72 20 6e 61 6d 65 29 20 72 65 70 6f 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 62 wner.name).repo.....(forge--glab
15da0 2d 70 6f 73 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 73 -post.repo.(format."/projects/%s
15dc0 25 25 32 46 25 73 2f 66 6f 72 6b 22 20 6f 77 6e 65 72 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 28 %%2F%s/fork".owner.name).......(
15de0 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 66 6f 72 6b 20 28 67 68 75 62 2d 2d 75 73 65 72 and.(not.(equal.fork.(ghub--user
15e00 6e 61 6d 65 20 28 67 68 75 62 2d 2d 68 6f 73 74 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 name.(ghub--host.nil))))........
15e20 20 20 20 20 60 28 28 6e 61 6d 65 73 70 61 63 65 20 2e 20 2c 66 6f 72 6b 29 29 29 0a 20 20 20 20 ....`((namespace...,fork))).....
15e40 20 20 3a 6e 6f 65 72 72 6f 72 20 74 29 0a 20 20 20 20 28 67 68 75 62 2d 77 61 69 74 20 28 66 6f ..:noerror.t).....(ghub-wait.(fo
15e60 72 6d 61 74 20 22 2f 70 72 6f 6a 65 63 74 73 2f 25 73 25 25 32 46 25 73 22 20 66 6f 72 6b 20 6e rmat."/projects/%s%%2F%s".fork.n
15e80 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 3a 61 75 74 68 20 27 66 ame)................nil.:auth.'f
15ea0 6f 72 67 65 20 3a 66 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 orge.:forge.'gitlab)))..(cl-defm
15ec0 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 6d 65 72 67 65 2d 70 75 6c 6c 72 65 71 20 28 28 5f 72 65 ethod.forge--merge-pullreq.((_re
15ee0 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 0a 20 20 20 20 po.forge-gitlab-repository).....
15f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
15f20 74 6f 70 69 63 20 68 61 73 68 20 6d 65 74 68 6f 64 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 6c 61 topic.hash.method)...(forge--gla
15f40 62 2d 70 75 74 20 74 6f 70 69 63 0a 20 20 20 20 22 2f 70 72 6f 6a 65 63 74 73 2f 3a 70 72 6f 6a b-put.topic....."/projects/:proj
15f60 65 63 74 2f 6d 65 72 67 65 5f 72 65 71 75 65 73 74 73 2f 3a 6e 75 6d 62 65 72 2f 6d 65 72 67 65 ect/merge_requests/:number/merge
15f80 22 0a 20 20 20 20 60 28 28 73 71 75 61 73 68 20 2e 20 2c 28 65 71 20 6d 65 74 68 6f 64 20 27 73 ".....`((squash...,(eq.method.'s
15fa0 71 75 61 73 68 29 29 0a 20 20 20 20 20 20 2c 40 28 61 6e 64 20 68 61 73 68 20 60 28 28 73 68 61 quash)).......,@(and.hash.`((sha
15fc0 20 2e 20 2c 68 61 73 68 29 29 29 29 29 29 0a 0a 3b 3b 3b 20 57 72 61 70 70 65 72 73 0a 0a 28 63 ...,hash))))))..;;;.Wrappers..(c
15fe0 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 6c 61 62 2d 67 65 74 20 28 6f 62 6a 20 72 65 73 l-defun.forge--glab-get.(obj.res
16000 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 20 ource...........................
16020 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 20 .....&optional.params...........
16040 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 20 .....................&key.query.
16060 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 20 payload.headers.................
16080 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 65 ...............silent.unpaginate
160a0 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 20 .noerror.reader.................
160c0 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 72 ...............host.callback.err
160e0 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 6e orback)...(declare.(indent.defun
16100 29 29 0a 20 20 28 67 6c 61 62 2d 67 65 74 20 28 69 66 20 6f 62 6a 20 28 66 6f 72 67 65 2d 2d 66 ))...(glab-get.(if.obj.(forge--f
16120 6f 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 20 72 65 73 ormat-resource.obj.resource).res
16140 6f 75 72 63 65 29 0a 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 ource).............params.......
16160 20 20 20 20 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 ......:host.(or.host.(oref.(forg
16180 65 2d 67 65 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 e-get-repository.obj).apihost)).
161a0 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........
161c0 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 61 79 6c 6f .....:query.query.:payload.paylo
161e0 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 20 20 20 20 ad.:headers.headers.............
16200 3a 73 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 :silent.silent.:unpaginate.unpag
16220 69 6e 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 65 72 72 6f 72 20 6e 6f 65 72 72 inate.............:noerror.noerr
16240 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 3a 63 or.:reader.reader.............:c
16260 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 20 20 20 3a 65 72 allback.callback.............:er
16280 72 6f 72 62 61 63 6b 20 28 6f 72 20 65 72 72 6f 72 62 61 63 6b 20 28 61 6e 64 20 63 61 6c 6c 62 rorback.(or.errorback.(and.callb
162a0 61 63 6b 20 74 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 6c 61 62 ack.t))))..(cl-defun.forge--glab
162c0 2d 70 75 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 -put.(obj.resource..............
162e0 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 6c 20 70 61 72 61 ..................&optional.para
16300 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 20 20 20 20 20 20 20 ms..............................
16320 20 20 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 ..&key.query.payload.headers....
16340 20 20 20 20 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
16360 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....
16380 20 20 20 20 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 ............................host
163a0 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 72 65 20 .callback.errorback)...(declare.
163c0 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 67 6c 61 62 2d 70 75 74 20 28 69 66 20 (indent.defun))...(glab-put.(if.
163e0 6f 62 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 obj.(forge--format-resource.obj.
16400 72 65 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 resource).resource).............
16420 70 61 72 61 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 6f 73 74 20 28 6f 72 20 68 6f 73 params.............:host.(or.hos
16440 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 72 79 20 6f 62 t.(oref.(forge-get-repository.ob
16460 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 3a 61 75 74 68 20 27 j).apihost)).............:auth.'
16480 66 6f 72 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 71 75 65 72 79 20 71 75 65 72 79 20 3a forge.............:query.query.:
164a0 70 61 79 6c 6f 61 64 20 70 61 79 6c 6f 61 64 20 3a 68 65 61 64 65 72 73 20 68 65 61 64 65 72 73 payload.payload.:headers.headers
164c0 0a 20 20 20 20 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 .............:silent.silent.:unp
164e0 61 67 69 6e 61 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 3a aginate.unpaginate.............:
16500 6e 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 noerror.noerror.:reader.reader..
16520 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 0a 20 20 ...........:callback.callback...
16540 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 65 72 72 6f 72 62 61 ..........:errorback.(or.errorba
16560 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 63 6c 2d 64 65 66 75 ck.(and.callback.t))))..(cl-defu
16580 6e 20 66 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 n.forge--glab-post.(obj.resource
165a0 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 ................................
165c0 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 20 20 20 .&optional.params...............
165e0 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 20 70 61 79 ..................&key.query.pay
16600 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 20 20 20 20 load.headers....................
16620 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 65 20 6e .............silent.unpaginate.n
16640 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 20 20 20 oerror.reader...................
16660 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 72 6f ..............host.callback.erro
16680 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 6e 29 rback)...(declare.(indent.defun)
166a0 29 0a 20 20 28 67 6c 61 62 2d 70 6f 73 74 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 72 65 )...(glab-post.(forge--format-re
166c0 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 20 20 20 20 20 20 20 source.obj.resource)............
166e0 20 20 70 61 72 61 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 6f 73 74 20 28 6f 72 20 ..params..............:host.(or.
16700 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 72 79 host.(oref.(forge-get-repository
16720 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 3a 61 75 .obj).apihost))..............:au
16740 74 68 20 27 66 6f 72 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 71 75 65 72 79 20 71 75 th.'forge..............:query.qu
16760 65 72 79 20 3a 70 61 79 6c 6f 61 64 20 70 61 79 6c 6f 61 64 20 3a 68 65 61 64 65 72 73 20 68 65 ery.:payload.payload.:headers.he
16780 61 64 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 69 6c 65 6e 74 20 73 69 6c 65 6e aders..............:silent.silen
167a0 74 20 3a 75 6e 70 61 67 69 6e 61 74 65 20 75 6e 70 61 67 69 6e 61 74 65 0a 20 20 20 20 20 20 20 t.:unpaginate.unpaginate........
167c0 20 20 20 20 20 20 3a 6e 6f 65 72 72 6f 72 20 6e 6f 65 72 72 6f 72 20 3a 72 65 61 64 65 72 20 72 ......:noerror.noerror.:reader.r
167e0 65 61 64 65 72 0a 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 eader..............:callback.cal
16800 6c 62 61 63 6b 0a 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 lback..............:errorback.(o
16820 72 20 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 r.errorback.(and.callback.t)))).
16840 0a 28 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 .(cl-defun.forge--glab-delete.(o
16860 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 20 20 20 20 20 bj.resource.....................
16880 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 0a 20 ..............&optional.params..
168a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
168c0 20 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 .&key.query.payload.headers.....
168e0 20 20 20 20 20 20 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 ..............................si
16900 6c 65 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 lent.unpaginate.noerror.reader..
16920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
16940 20 68 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 .host.callback.errorback)...(dec
16960 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 67 6c 61 62 2d 64 65 6c lare.(indent.defun))...(glab-del
16980 65 74 65 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 ete.(forge--format-resource.obj.
169a0 72 65 73 6f 75 72 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 72 61 6d 73 0a resource)................params.
169c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 6f 73 74 20 28 6f 72 20 68 6f 73 74 20 28 6f ...............:host.(or.host.(o
169e0 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 6f 62 6a 29 20 61 ref.(forge-get-repository.obj).a
16a00 70 69 68 6f 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 75 74 68 20 27 66 pihost))................:auth.'f
16a20 6f 72 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 71 75 65 72 79 20 71 75 65 72 79 orge................:query.query
16a40 20 3a 70 61 79 6c 6f 61 64 20 70 61 79 6c 6f 61 64 20 3a 68 65 61 64 65 72 73 20 68 65 61 64 65 .:payload.payload.:headers.heade
16a60 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 69 6c 65 6e 74 20 73 69 6c 65 6e 74 rs................:silent.silent
16a80 20 3a 75 6e 70 61 67 69 6e 61 74 65 20 75 6e 70 61 67 69 6e 61 74 65 0a 20 20 20 20 20 20 20 20 .:unpaginate.unpaginate.........
16aa0 20 20 20 20 20 20 20 3a 6e 6f 65 72 72 6f 72 20 6e 6f 65 72 72 6f 72 20 3a 72 65 61 64 65 72 20 .......:noerror.noerror.:reader.
16ac0 72 65 61 64 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 reader................:callback.
16ae0 63 61 6c 6c 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 callback................:errorba
16b00 63 6b 20 28 6f 72 20 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 ck.(or.errorback.(and.callback.t
16b20 29 29 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 67 69 74 6c ))))..;;;._.(provide.'forge-gitl
16b40 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 20 68 65 72 ab).;;;.forge-gitlab.el.ends.her
16b60 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...............................
16b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16c00 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 74 6f 70 69 63 2e forge-20240405.1509/forge-topic.
16c20 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..............................
16c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16c60 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
16c80 30 31 36 37 31 34 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 36 36 35 00 20 30 00 00 00 0167142.00000000000.014665..0...
16ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16d00 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...................
16d20 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...................
16d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
16e00 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
16e20 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.-*-
16e40 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 34 20 4a 6f 6e ..;;.Copyright.(C).2018-2024.Jon
16e60 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
16e80 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 3b 3b 20 4d ernoulli.<jonas@bernoul.li>.;;.M
16ea0 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 aintainer:.Jonas.Bernoulli.<jona
16ec0 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 s@bernoul.li>..;;.SPDX-License-I
16ee0 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 20 dentifier:.GPL-3.0-or-later..;;.
16f00 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 20 This.file.is.free.software:.you.
16f20 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 66 can.redistribute.it.and/or.modif
16f40 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 47 y.;;.it.under.the.terms.of.the.G
16f60 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 62 NU.General.Public.License.as.pub
16f80 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 46 lished.;;.by.the.Free.Software.F
16fa0 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 74 oundation,.either.version.3.of.t
16fc0 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 6f he.License,.;;.or.(at.your.optio
16fe0 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 73 n).any.later.version..;;.;;.This
17000 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 65 .file.is.distributed.in.the.hope
17020 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 20 .that.it.will.be.useful,.;;.but.
17040 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 76 WITHOUT.ANY.WARRANTY;.without.ev
17060 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 45 en.the.implied.warranty.of.;;.ME
17080 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 50 RCHANTABILITY.or.FITNESS.FOR.A.P
170a0 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 47 ARTICULAR.PURPOSE...See.the.;;.G
170c0 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 6f NU.General.Public.License.for.mo
170e0 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 76 re.details..;;.;;.You.should.hav
17100 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 6e e.received.a.copy.of.the.GNU.Gen
17120 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 74 eral.Public.License.;;.along.wit
17140 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 73 h.this.file...If.not,.see.<https
17160 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 20 ://www.gnu.org/licenses/>...;;;.
17180 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 62 75 67 2d 72 65 66 65 72 65 6e 63 65 29 0a Code:..(require.'bug-reference).
171a0 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 28 72 65 71 75 69 72 (require.'markdown-mode).(requir
171c0 65 20 27 70 61 72 73 65 2d 74 69 6d 65 29 0a 28 72 65 71 75 69 72 65 20 27 79 61 6d 6c 29 0a 0a e.'parse-time).(require.'yaml)..
171e0 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 6f 72 67 65 (require.'forge).(require.'forge
17200 2d 70 6f 73 74 29 0a 0a 28 64 65 66 76 61 72 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 61 75 -post)..(defvar.bug-reference-au
17220 74 6f 2d 73 65 74 75 70 2d 66 75 6e 63 74 69 6f 6e 73 29 0a 0a 3b 3b 3b 20 4f 70 74 69 6f 6e 73 to-setup-functions)..;;;.Options
17240 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6f 72 ..(defcustom.forge-topic-list-or
17260 64 65 72 20 27 28 75 70 64 61 74 65 64 20 2e 20 73 74 72 69 6e 67 3e 29 0a 20 20 22 4f 72 64 65 der.'(updated...string>)..."Orde
17280 72 20 6f 66 20 74 6f 70 69 63 73 20 6c 69 73 74 65 64 20 69 6e 20 74 68 65 20 73 74 61 74 75 73 r.of.topics.listed.in.the.status
172a0 20 62 75 66 66 65 72 2e 0a 0a 54 68 65 20 76 61 6c 75 65 20 68 61 73 20 74 68 65 20 66 6f 72 6d .buffer...The.value.has.the.form
172c0 20 28 53 4c 4f 54 20 2e 20 50 52 45 44 49 43 41 54 45 29 2c 20 77 68 65 72 65 20 53 4c 4f 54 20 .(SLOT...PREDICATE),.where.SLOT.
172e0 69 73 20 61 0a 73 6c 6f 74 20 6f 66 20 69 73 73 75 65 20 6f 72 20 70 75 6c 6c 72 65 71 20 6f 62 is.a.slot.of.issue.or.pullreq.ob
17300 6a 65 63 74 73 2c 20 61 6e 64 20 50 52 45 44 49 43 41 54 45 20 69 73 20 61 20 66 75 6e 63 74 69 jects,.and.PREDICATE.is.a.functi
17320 6f 6e 0a 75 73 65 64 20 74 6f 20 6f 72 64 65 72 20 74 68 65 20 74 6f 70 69 63 73 20 62 79 20 74 on.used.to.order.the.topics.by.t
17340 68 61 74 20 73 6c 6f 74 2e 20 20 52 65 61 73 6f 6e 61 62 6c 65 20 76 61 6c 75 65 73 0a 69 6e 63 hat.slot...Reasonable.values.inc
17360 6c 75 64 65 20 28 6e 75 6d 62 65 72 20 2e 20 3e 29 20 61 6e 64 20 28 75 70 64 61 74 65 64 20 2e lude.(number...>).and.(updated..
17380 20 73 74 72 69 6e 67 3e 29 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 .string>)."...:package-version.'
173a0 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 20 27 66 6f 72 67 (forge..."0.1.0")...:group.'forg
173c0 65 0a 20 20 3a 74 79 70 65 20 27 28 63 6f 6e 73 20 28 73 79 6d 62 6f 6c 20 20 20 3a 74 61 67 20 e...:type.'(cons.(symbol...:tag.
173e0 22 53 6c 6f 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e "Slot")................(function
17400 20 3a 74 61 67 20 22 50 72 65 64 69 63 61 74 65 22 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d .:tag."Predicate")))..(defcustom
17420 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6c 69 6d 69 74 20 27 28 36 30 20 2e 20 35 .forge-topic-list-limit.'(60...5
17440 29 0a 20 20 22 4c 69 6d 69 74 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 74 6f 70 69 63 73 20 )..."Limit.the.number.of.topics.
17460 6c 69 73 74 65 64 20 69 6e 20 74 68 65 20 73 74 61 74 75 73 20 62 75 66 66 65 72 2e 0a 0a 41 6c listed.in.the.status.buffer...Al
17480 6c 20 75 6e 72 65 61 64 20 74 6f 70 69 63 73 20 61 72 65 20 61 6c 77 61 79 73 20 73 68 6f 77 6e l.unread.topics.are.always.shown
174a0 2e 20 20 49 66 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 69 73 20 6f 70 74 69 6f 6e 0a 68 ...If.the.value.of.this.option.h
174c0 61 73 20 74 68 65 20 66 6f 72 6d 20 28 4f 50 45 4e 20 2e 20 43 4c 4f 53 45 44 29 2c 20 74 68 65 as.the.form.(OPEN...CLOSED),.the
174e0 6e 20 74 68 65 20 69 6e 74 65 67 65 72 20 4f 50 45 4e 20 73 70 65 63 69 66 69 65 73 20 74 68 65 n.the.integer.OPEN.specifies.the
17500 0a 6d 61 78 69 6d 61 6c 20 6e 75 6d 62 65 72 20 6f 66 20 74 6f 70 69 63 73 20 61 6e 64 20 43 4c .maximal.number.of.topics.and.CL
17520 4f 53 45 44 20 73 70 65 63 69 66 69 65 73 20 74 68 65 20 6d 61 78 69 6d 61 6c 20 6e 75 6d 62 65 OSED.specifies.the.maximal.numbe
17540 72 0a 6f 66 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 73 2e 20 20 49 46 20 43 4c 4f 53 45 44 20 69 r.of.closed.topics...IF.CLOSED.i
17560 73 20 6e 65 67 61 74 69 76 65 20 74 68 65 6e 20 73 68 6f 77 20 6e 6f 20 63 6c 6f 73 65 64 0a 74 s.negative.then.show.no.closed.t
17580 6f 70 69 63 73 20 75 6e 74 69 6c 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 60 66 6f 72 67 65 2d 74 opics.until.the.command.`forge-t
175a0 6f 67 67 6c 65 2d 63 6c 6f 73 65 64 2d 76 69 73 69 62 69 6c 69 74 79 27 20 63 68 61 6e 67 65 73 oggle-closed-visibility'.changes
175c0 0a 74 68 65 20 73 69 67 6e 2e 0a 0a 54 68 65 20 76 61 6c 75 65 20 63 61 6e 20 61 6c 73 6f 20 62 .the.sign...The.value.can.also.b
175e0 65 20 61 6e 20 69 6e 74 65 67 65 72 2c 20 69 6e 20 77 68 69 63 68 20 63 61 73 65 20 69 74 20 6c e.an.integer,.in.which.case.it.l
17600 69 6d 69 74 73 20 74 68 65 0a 6e 75 6d 62 65 72 20 6f 66 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 imits.the.number.of.closed.topic
17620 73 20 6f 6e 6c 79 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 s.only."...:package-version.'(fo
17640 72 67 65 20 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 rge..."0.1.0")...:group.'forge..
17660 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 6e 75 6d 62 65 72 20 3a 74 61 67 20 22 4d 61 .:type.'(choice.(number.:tag."Ma
17680 78 69 6d 61 6c 20 6e 75 6d 62 65 72 20 6f 66 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 73 22 29 0a ximal.number.of.closed.topics").
176a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 6e 75 6d 62 65 72 20 3a .................(cons.(number.:
176c0 74 61 67 20 22 4d 61 78 69 6d 61 6c 20 6e 75 6d 62 65 72 20 6f 66 20 6f 70 65 6e 20 74 6f 70 69 tag."Maximal.number.of.open.topi
176e0 63 73 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 6e 75 6d cs")........................(num
17700 62 65 72 20 3a 74 61 67 20 22 4d 61 78 69 6d 61 6c 20 6e 75 6d 62 65 72 20 6f 66 20 63 6c 6f 73 ber.:tag."Maximal.number.of.clos
17720 65 64 20 74 6f 70 69 63 73 22 29 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 ed.topics"))))..(defcustom.forge
17740 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 63 65 73 20 74 0a 20 20 22 57 68 65 74 68 65 -limit-topic-choices.t..."Whethe
17760 72 20 74 6f 20 69 6e 69 74 69 61 6c 6c 79 20 6c 69 6d 69 74 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 r.to.initially.limit.completion.
17780 63 61 6e 64 69 64 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 candidates.to.active.topics."...
177a0 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 34 2e :package-version.'(forge..."0.4.
177c0 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 62 6f 6f 0")...:group.'forge...:type.'boo
177e0 6c 65 61 6e 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 68 65 61 lean)..(defcustom.forge-post-hea
17800 64 69 6e 67 2d 66 6f 72 6d 61 74 20 22 25 61 20 25 43 5c 6e 22 0a 20 20 22 46 6f 72 6d 61 74 20 ding-format."%a.%C\n"..."Format.
17820 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 20 76 69 65 77 2e for.post.headings.in.topic.view.
17840 0a 0a 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 25 2d 73 65 71 75 65 6e 63 65 73 20 61 72 65 20 ..The.following.%-sequences.are.
17860 73 75 70 70 6f 72 74 65 64 3a 0a 0a 60 25 61 27 20 54 68 65 20 66 6f 72 67 65 20 6e 69 63 6b 6e supported:..`%a'.The.forge.nickn
17880 61 6d 65 20 6f 66 20 74 68 65 20 61 75 74 68 6f 72 2e 0a 60 25 63 27 20 54 68 65 20 61 62 73 6f ame.of.the.author..`%c'.The.abso
178a0 6c 75 74 65 20 63 72 65 61 74 69 6f 6e 20 64 61 74 65 2e 0a 60 25 43 27 20 54 68 65 20 72 65 6c lute.creation.date..`%C'.The.rel
178c0 61 74 69 76 65 20 63 72 65 61 74 69 6f 6e 20 64 61 74 65 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 ative.creation.date."...:package
178e0 2d 76 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 -version.'(forge..."0.1.0")...:g
17900 72 6f 75 70 20 27 66 6f 72 67 65 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 roup.'forge...:type.'string)..(d
17920 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 70 6f 73 74 2d 66 69 6c 6c 2d 72 65 67 69 6f 6e 20 efcustom.forge-post-fill-region.
17940 74 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 63 61 6c 6c 20 60 66 69 6c 6c 2d 72 65 67 69 6f t..."Whether.to.call.`fill-regio
17960 6e 27 20 62 65 66 6f 72 65 20 64 69 73 70 6c 61 79 69 6e 67 20 66 6f 72 67 65 20 70 6f 73 74 73 n'.before.displaying.forge.posts
17980 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...
179a0 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 70 65 "0.1.0")...:group.'forge...:type
179c0 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 62 75 67 .'boolean)..(defcustom.forge-bug
179e0 2d 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 -reference-hooks...'(find-file-h
17a00 6f 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 ook.....forge-post-mode-hook....
17a20 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 6d 61 67 69 74 .git-commit-setup-hook.....magit
17a40 2d 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 -mode-hook)..."Hooks.to.which.`f
17a60 6f 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 orge-bug-reference-setup'.is.add
17a80 65 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 ed..This.variable.has.to.be.cust
17aa0 6f 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 omized.before.`forge'.is.loaded.
17ac0 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..."
17ae0 30 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 0.2.0")...:group.'forge...:optio
17b00 6e 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 ns.'(find-file-hook.............
17b20 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 20 20 20 20 20 20 .forge-post-mode-hook...........
17b40 20 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 ...git-commit-setup-hook........
17b60 20 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 ......magit-mode-hook)...:type.'
17b80 28 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 (list.:convert-widget.custom-hoo
17ba0 6b 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 2d 6c 6f 63 61 k-convert-widget))..(defvar-loca
17bc0 6c 20 66 6f 72 67 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 l.forge-display-in-status-buffer
17be0 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 64 69 73 70 6c 61 79 20 74 6f 70 69 63 73 20 .t..."Whether.to.display.topics.
17c00 69 6e 20 74 68 65 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 in.the.current.Magit.status.buff
17c20 65 72 2e 22 29 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 64 69 73 70 6c 61 79 2d 69 6e 2d 73 74 61 er.").(put.'forge-display-in-sta
17c40 74 75 73 2d 62 75 66 66 65 72 20 27 70 65 72 6d 61 6e 65 6e 74 2d 6c 6f 63 61 6c 20 74 29 0a 0a tus-buffer.'permanent-local.t)..
17c60 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 66 6f 72 6d 61 74 2d 61 76 61 74 61 72 2d 66 75 6e 63 (defvar.forge-format-avatar-func
17c80 74 69 6f 6e 20 6e 69 6c 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 6f 20 69 6e 73 tion.nil..."Function.used.to.ins
17ca0 65 72 74 20 61 76 61 74 61 72 73 20 69 6e 20 63 65 72 74 61 69 6e 20 6c 6f 63 61 74 69 6f 6e 73 ert.avatars.in.certain.locations
17cc0 2e 0a 54 68 69 73 20 69 73 20 65 78 70 65 72 69 6d 65 6e 74 61 6c 20 61 6e 64 20 69 6e 74 65 6e ..This.is.experimental.and.inten
17ce0 64 65 64 20 66 6f 72 20 75 73 65 72 73 20 77 68 6f 20 77 69 73 68 20 74 6f 0a 69 6d 70 6c 65 6d ded.for.users.who.wish.to.implem
17d00 65 6e 74 20 73 75 63 68 20 61 20 66 75 6e 63 74 69 6f 6e 20 74 68 65 6d 73 65 6c 76 65 73 2e 20 ent.such.a.function.themselves..
17d20 20 53 65 65 20 23 34 34 37 2e 22 29 0a 0a 3b 3b 3b 20 46 61 63 65 73 0a 3b 3b 3b 3b 20 43 6f 6d .See.#447.")..;;;.Faces.;;;;.Com
17d40 6d 6f 6e 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 64 69 6d 6d 65 64 20 27 28 28 74 20 mon..(defface.forge-dimmed.'((t.
17d60 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 39 33 61 31 61 31 22 29 29 0a 20 20 22 50 61 72 65 6e :foreground."#93a1a1"))..."Paren
17d80 74 20 66 61 63 65 20 6f 72 20 66 61 63 65 73 20 75 73 65 64 20 66 6f 72 20 74 65 78 74 20 74 68 t.face.or.faces.used.for.text.th
17da0 61 74 20 73 68 6f 75 6c 64 6e 27 74 20 73 74 61 6e 64 20 6f 75 74 2e 0a 0a 54 68 69 73 20 66 61 at.shouldn't.stand.out...This.fa
17dc0 63 65 20 69 73 20 6e 6f 74 20 64 69 72 65 63 74 6c 79 2c 20 69 6e 73 74 65 61 64 20 73 65 76 65 ce.is.not.directly,.instead.seve
17de0 72 61 6c 20 66 61 63 65 73 20 69 6e 68 65 72 69 74 20 66 72 6f 6d 20 69 74 0a 65 69 74 68 65 72 ral.faces.inherit.from.it.either
17e00 20 64 69 72 65 63 74 6c 79 20 6f 72 20 76 69 61 20 61 6e 20 69 6e 74 65 72 6d 65 64 69 61 74 65 .directly.or.via.an.intermediate
17e20 20 66 61 63 65 2e 20 20 54 68 69 73 20 66 61 63 65 20 73 68 6f 75 6c 64 0a 6f 6e 6c 79 20 73 70 .face...This.face.should.only.sp
17e40 65 63 69 66 79 20 74 68 65 20 60 3a 66 6f 72 65 67 72 6f 75 6e 64 27 20 61 74 74 72 69 62 75 74 ecify.the.`:foreground'.attribut
17e60 65 2c 20 77 68 69 63 68 20 69 73 20 77 68 79 20 74 68 69 73 20 66 61 63 65 0a 64 6f 65 73 20 6e e,.which.is.why.this.face.does.n
17e80 6f 74 20 69 6e 68 65 72 69 74 20 66 72 6f 6d 20 60 6d 61 67 69 74 2d 64 69 6d 6d 65 64 27 2e 22 ot.inherit.from.`magit-dimmed'."
17ea0 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 28 64 65 66 66 61 63 ...:group.'magit-faces)..(deffac
17ec0 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 68 65 61 64 65 72 2d 6c 69 6e 65 0a 20 20 60 28 28 74 e.forge-topic-header-line...`((t
17ee0 20 3a 69 6e 68 65 72 69 74 20 6d 61 67 69 74 2d 68 65 61 64 65 72 2d 6c 69 6e 65 0a 20 20 20 20 .:inherit.magit-header-line.....
17f00 20 20 20 2c 40 28 61 6e 64 20 28 3e 3d 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f ...,@(and.(>=.emacs-major-versio
17f20 6e 20 32 39 29 20 27 28 3a 66 6f 72 65 67 72 6f 75 6e 64 20 72 65 73 65 74 29 29 29 29 0a 20 20 n.29).'(:foreground.reset))))...
17f40 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 20 69 6e 20 60 "Face.for.the.`header-line'.in.`
17f60 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 0a 20 20 3a 67 forge-topic-mode'.buffers."...:g
17f80 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 54 6f 70 69 63 20 61 roup.'forge-faces)..;;;;.Topic.a
17fa0 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 20 53 6c 75 67 73 0a 0a 28 64 65 66 66 61 63 65 20 nd.Notification.Slugs..(defface.
17fc0 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 67 2d 6f 70 65 6e 0a 20 20 27 28 28 74 20 3a 69 6e forge-topic-slug-open...'((t.:in
17fe0 68 65 72 69 74 20 66 6f 72 67 65 2d 64 69 6d 6d 65 64 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 herit.forge-dimmed))..."Face.use
18000 73 20 66 6f 72 20 73 6c 75 67 73 20 6f 66 20 6f 70 65 6e 20 74 6f 70 69 63 73 2e 22 0a 20 20 3a s.for.slugs.of.open.topics."...:
18020 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
18040 72 67 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 27 28 28 74 20 rge-topic-slug-completed...'((t.
18060 3a 69 6e 68 65 72 69 74 20 66 6f 72 67 65 2d 64 69 6d 6d 65 64 29 29 0a 20 20 22 46 61 63 65 20 :inherit.forge-dimmed))..."Face.
18080 75 73 65 64 20 66 6f 72 20 73 6c 75 67 73 20 6f 66 20 63 6f 6d 70 6c 65 74 65 64 20 74 6f 70 69 used.for.slugs.of.completed.topi
180a0 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 28 64 65 cs."...:group.'forge-faces)..(de
180c0 66 66 61 63 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 67 2d 75 6e 70 6c 61 6e 6e 65 64 fface.forge-topic-slug-unplanned
180e0 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 20 3a 73 ...'((t.:inherit.forge-dimmed.:s
18100 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 66 trike-through.t))..."Face.used.f
18120 6f 72 20 73 6c 75 67 73 20 6f 66 20 75 6e 70 6c 61 6e 6e 65 64 20 74 6f 70 69 63 73 2e 0a 45 2e or.slugs.of.unplanned.topics..E.
18140 67 2e 2c 20 66 6f 72 20 69 73 73 75 65 73 20 63 6c 6f 73 65 73 20 61 73 20 5c 22 75 6e 70 6c 61 g.,.for.issues.closes.as.\"unpla
18160 6e 6e 65 64 5c 22 20 61 6e 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 74 68 61 74 0a 77 65 nned\".and.pull-requests.that.we
18180 72 65 20 63 6c 6f 73 65 64 20 77 69 74 68 6f 75 74 20 62 65 69 6e 67 20 6d 65 72 67 65 64 2e 22 re.closed.without.being.merged."
181a0 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
181c0 65 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 67 2d 73 61 76 65 64 0a 20 20 27 28 28 74 20 e.forge-topic-slug-saved...'((t.
181e0 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 6f 72 61 6e 67 65 22 29 29 0a 20 20 22 46 61 63 65 20 75 :foreground."orange"))..."Face.u
18200 73 65 64 20 66 6f 72 20 73 6c 75 67 73 20 6f 66 20 74 6f 70 69 63 73 20 77 69 74 68 20 73 61 76 sed.for.slugs.of.topics.with.sav
18220 65 64 20 6e 6f 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 ed.notifications."...:group.'for
18240 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 2d ge-faces)..(defface.forge-topic-
18260 73 6c 75 67 2d 75 6e 72 65 61 64 0a 20 20 27 28 28 74 20 3a 77 65 69 67 68 74 20 62 6f 6c 64 29 slug-unread...'((t.:weight.bold)
18280 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 74 6f 70 69 )..."Face.used.for.slugs.of.topi
182a0 63 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 6e 73 2e 22 0a 20 cs.with.unread.notifications."..
182c0 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 20 54 6f 70 69 .:group.'forge-faces)..;;;;.Topi
182e0 63 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 20 53 75 6d 6d 61 72 69 65 73 0a 3b 3b 3b c.and.Notification.Summaries.;;;
18300 3b 3b 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 ;;.Notifications..(defface.forge
18320 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 2d 75 6e 72 65 61 64 0a 20 20 60 28 28 74 20 3a 77 65 69 -notification-unread...`((t.:wei
18340 67 68 74 20 62 6f 6c 64 0a 20 20 20 20 20 20 20 3a 62 6f 78 20 28 20 3a 6c 69 6e 65 2d 77 69 64 ght.bold........:box.(.:line-wid
18360 74 68 20 2c 28 69 66 20 28 3e 3d 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f 6e 20 th.,(if.(>=.emacs-major-version.
18380 32 38 29 20 28 63 6f 6e 73 20 2d 31 20 2d 31 29 20 2d 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 28).(cons.-1.-1).-1)............
183a0 20 20 20 3a 73 74 79 6c 65 20 6e 69 6c 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f ...:style.nil)))..."Face.used.fo
183c0 72 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 75 6e 72 r.summaries.of.entities.with.unr
183e0 65 61 64 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 54 68 69 73 20 66 61 63 65 20 69 73 20 ead.notifications..This.face.is.
18400 61 6c 77 61 79 73 20 75 73 65 64 20 74 6f 67 65 74 68 65 72 20 77 69 74 68 2c 20 61 6e 64 20 74 always.used.together.with,.and.t
18420 61 6b 65 73 20 70 72 65 66 65 72 65 6e 63 65 0a 6f 76 65 72 2c 20 61 20 60 66 6f 72 67 65 5b 2d akes.preference.over,.a.`forge[-
18440 66 61 6e 63 79 5d 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 61 fancy]-{issue,pullreq}-STATE'.fa
18460 63 65 20 61 6e 64 20 73 68 6f 75 6c 64 20 6e 6f 74 0a 73 70 65 63 69 66 79 20 61 6e 79 20 61 74 ce.and.should.not.specify.any.at
18480 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 79 tribute.that.is.specified.by.any
184a0 20 6f 66 20 74 68 6f 73 65 20 66 61 63 65 73 2e 0a 4c 69 6b 65 77 69 73 65 20 74 68 6f 73 65 20 .of.those.faces..Likewise.those.
184c0 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 20 6f faces.should.not.set.`:weight'.o
184e0 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 61 63 r.`:slant'."...:group.'forge-fac
18500 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e es)..(defface.forge-notification
18520 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 29 0a 20 -pending...'((t.:weight.bold))..
18540 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 65 6e 74 ."Face.used.for.summaries.of.ent
18560 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 2e 0a 54 ities.with.open.notifications..T
18580 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 68 65 72 his.face.is.always.used.together
185a0 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 0a 6f 76 65 72 .with,.and.takes.preference.over
185c0 2c 20 61 20 60 66 6f 72 67 65 5b 2d 66 61 6e 63 79 5d 2d 7b 69 73 73 75 65 2c 70 75 6c 6c 72 65 ,.a.`forge[-fancy]-{issue,pullre
185e0 71 7d 2d 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 0a 73 70 q}-STATE'.face.and.should.not.sp
18600 65 63 69 66 79 20 61 6e 79 20 61 74 74 72 69 62 75 74 65 20 74 68 61 74 20 69 73 20 73 70 65 63 ecify.any.attribute.that.is.spec
18620 69 66 69 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 0a 4c 69 6b ified.by.any.of.those.faces..Lik
18640 65 77 69 73 65 20 74 68 6f 73 65 20 66 61 63 65 73 20 73 68 6f 75 6c 64 20 6e 6f 74 20 73 65 74 ewise.those.faces.should.not.set
18660 20 60 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 .`:weight'.or.`:slant'."...:grou
18680 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 72 67 65 2d p.'forge-faces)..(defface.forge-
186a0 6e 6f 74 69 66 69 63 61 74 69 6f 6e 2d 64 6f 6e 65 0a 20 20 27 28 28 74 20 3a 73 6c 61 6e 74 20 notification-done...'((t.:slant.
186c0 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 72 italic))..."Face.used.for.summar
186e0 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 6e 72 65 61 64 20 6f ies.of.entities.with.no.unread.o
18700 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 20 66 61 63 65 20 69 r.open.notification..This.face.i
18720 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 74 68 2c 20 61 6e 64 s.always.used.together.with,.and
18740 20 74 61 6b 65 73 20 70 72 65 66 65 72 65 6e 63 65 0a 6f 76 65 72 2c 20 61 20 60 66 6f 72 67 65 .takes.preference.over,.a.`forge
18760 5b 2d 66 61 6e 63 79 5d 2d 7b 69 73 73 75 65 2c 70 75 6c 6c 72 65 71 7d 2d 53 54 41 54 45 27 20 [-fancy]-{issue,pullreq}-STATE'.
18780 66 61 63 65 20 61 6e 64 20 73 68 6f 75 6c 64 20 6e 6f 74 0a 73 70 65 63 69 66 79 20 61 6e 79 20 face.and.should.not.specify.any.
187a0 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 20 62 79 20 61 attribute.that.is.specified.by.a
187c0 6e 79 20 6f 66 20 74 68 6f 73 65 20 66 61 63 65 73 2e 0a 4c 69 6b 65 77 69 73 65 20 74 68 6f 73 ny.of.those.faces..Likewise.thos
187e0 65 20 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'
18800 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
18820 61 63 65 73 29 0a 0a 3b 3b 3b 3b 3b 20 49 73 73 75 65 73 0a 0a 28 64 65 66 66 61 63 65 20 66 6f aces)..;;;;;.Issues..(defface.fo
18840 72 67 65 2d 69 73 73 75 65 2d 6f 70 65 6e 0a 20 20 27 28 28 74 29 29 0a 20 20 22 46 61 63 65 20 rge-issue-open...'((t))..."Face.
18860 75 73 65 64 20 66 6f 72 20 73 75 6d 6d 61 72 69 65 73 20 6f 66 20 6f 70 65 6e 20 69 73 73 75 65 used.for.summaries.of.open.issue
18880 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 66 s."...:group.'forge-faces)..(def
188a0 66 61 63 65 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 63 6f 6d 70 6c 65 74 65 64 0a 20 20 27 28 28 face.forge-issue-completed...'((
188c0 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 20 20 22 46 61 63 t.:inherit.forge-dimmed))..."Fac
188e0 65 20 75 73 65 64 20 66 6f 72 20 73 75 6d 6d 61 72 69 65 73 20 6f 66 20 69 73 73 75 65 73 20 63 e.used.for.summaries.of.issues.c
18900 6c 6f 73 65 64 20 61 73 20 63 6f 6d 70 6c 65 74 65 64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 losed.as.completed."...:group.'f
18920 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 73 75 orge-faces)..(defface.forge-issu
18940 65 2d 75 6e 70 6c 61 6e 6e 65 64 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f 72 67 e-unplanned...'((t.:inherit.forg
18960 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 29 0a 20 20 22 e-dimmed.:strike-through.t))..."
18980 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 69 73 73 75 65 Face.used.for.summaries.of.issue
189a0 73 20 63 6c 6f 73 65 64 20 61 73 20 75 6e 70 6c 61 6e 6e 65 64 2e 22 0a 20 20 3a 67 72 6f 75 70 s.closed.as.unplanned."...:group
189c0 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 65 .'forge-faces)..;;;;;.Pull-Reque
189e0 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 6e sts..(defface.forge-pullreq-open
18a00 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 29 ...'((t.:foreground."LimeGreen")
18a20 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.
18a40 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 66 open.pull-requests."...:group.'f
18a60 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 6c orge-faces)..(defface.forge-pull
18a80 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 4d req-merged...'((t.:foreground."M
18aa0 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 20 ediumPurple"))..."Face.used.for.
18ac0 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 74 summaries.of.merged.pull-request
18ae0 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 66 s."...:group.'forge-faces)..(def
18b00 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 28 face.forge-pullreq-rejected...'(
18b20 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 73 (t.:foreground."MediumPurple".:s
18b40 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 66 trike-through.t))..."Face.used.f
18b60 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 75 or.summaries.of.closed.pull-requ
18b80 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 67 ests,.that.weren't.merged."...:g
18ba0 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 73 0a roup.'forge-faces)..;;;;.Labels.
18bc0 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 60 28 .(defface.forge-topic-label...`(
18be0 28 74 20 3a 62 6f 78 20 28 20 3a 6c 69 6e 65 2d 77 69 64 74 68 20 2c 28 69 66 20 28 3e 3d 20 65 (t.:box.(.:line-width.,(if.(>=.e
18c00 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f 6e 20 32 38 29 20 28 63 6f 6e 73 20 2d 31 20 macs-major-version.28).(cons.-1.
18c20 2d 31 29 20 2d 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 74 79 6c 65 20 72 65 6c -1).-1)...............:style.rel
18c40 65 61 73 65 64 2d 62 75 74 74 6f 6e 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 eased-button)))..."Face.used.for
18c60 20 74 6f 70 69 63 20 6c 61 62 65 6c 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d .topic.labels."...:group.'forge-
18c80 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 28 64 65 66 66 faces)..;;;;.Post.Details..(deff
18ca0 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 74 20 3a 69 6e ace.forge-post-author...'((t.:in
18cc0 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 6f 72 20 70 6f herit.bold))..."Face.used.for.po
18ce0 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 20 3a 67 72 6f st.author.in.topic.view."...:gro
18d00 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 72 67 65 up.'forge-faces)..(defface.forge
18d20 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 69 74 61 6c 69 -post-date...'((t.:inherit.itali
18d40 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 61 74 65 20 69 c))..."Face.used.for.post.date.i
18d60 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 72 67 65 2d 66 n.topic.view."...:group.'forge-f
18d80 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 20 66 6f 72 67 aces)..;;;.Class..(defclass.forg
18da0 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 73 74 72 61 63 e-topic.(forge-post).().:abstrac
18dc0 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 6f 62 6a 65 63 t.t)..(cl-defmethod.forge--objec
18de0 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 65 2d 74 6f 70 t-id.((class.(subclass.forge-top
18e00 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 20 74 68 65 20 ic)).repo.number)..."Return.the.
18e20 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 50 4f 20 69 64 id.for.a.CLASS.object.in.REPO.id
18e40 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 62 61 73 65 36 entified.by.id.NUMBER."...(base6
18e60 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 63 6f 64 69 6e 4-encode-string....(encode-codin
18e80 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 25 73 22 0a 20 g-string.....(format."%s:%s%s"..
18ea0 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 74 72 69 6e 67 ...........(base64-decode-string
18ec0 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 28 73 75 .(oref.repo.id)).............(su
18ee0 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 0a 20 20 20 20 bstring.(symbol-name.class).....
18f00 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 28 6f 72 65 66 ...................(length.(oref
18f20 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 2d 70 72 65 66 -default.class.closql-class-pref
18f40 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 20 20 20 27 75 ix))).............number).....'u
18f60 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 20 66 6f 72 67 tf-8)....t))..(cl-defmethod.forg
18f80 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 67 29 20 6e 75 e--object-id.((prefix.string).nu
18fa0 6d 62 65 72 2d 6f 72 2d 69 64 29 0a 20 20 28 62 61 73 65 36 34 2d 65 6e 63 6f 64 65 2d 73 74 72 mber-or-id)...(base64-encode-str
18fc0 69 6e 67 0a 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 20 20 20 ing....(encode-coding-string....
18fe0 20 28 66 6f 72 6d 61 74 20 22 25 73 3a 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 62 61 .(format."%s:%s".............(ba
19000 73 65 36 34 2d 64 65 63 6f 64 65 2d 73 74 72 69 6e 67 20 70 72 65 66 69 78 29 0a 20 20 20 20 20 se64-decode-string.prefix)......
19020 20 20 20 20 20 20 20 28 69 66 20 28 6e 75 6d 62 65 72 70 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 .......(if.(numberp.number-or-id
19040 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 0a 20 ).................number-or-id..
19060 20 20 20 20 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 .............;;.Currently.every.
19080 49 44 20 69 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 ID.is.base64.encoded...Unfortuna
190a0 74 65 6c 79 0a 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 20 tely...............;;.we.cannot.
190c0 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 65 use.the.IDs.of.Gitlab.labels.(se
190e0 65 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 69 6e 20 74 68 e.comment...............;;.in.th
19100 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 65 2d 6c 61 62 65 e.respective.`forge--update-labe
19120 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 20 3b 3b 20 61 6e ls'.method),...............;;.an
19140 64 20 68 61 76 65 20 74 6f 20 75 73 65 20 74 68 65 69 72 20 6e 61 6d 65 73 2c 20 77 68 69 63 68 d.have.to.use.their.names,.which
19160 20 61 72 65 20 6e 6f 74 20 65 6e 63 6f 64 65 64 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .are.not.encoded................
19180 28 6f 72 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 62 61 73 65 36 34 2d 64 65 63 6f 64 (or.(ignore-errors.(base64-decod
191a0 65 2d 73 74 72 69 6e 67 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 29 0a 20 20 20 20 20 20 20 20 e-string.number-or-id)).........
191c0 20 20 20 20 20 20 20 20 20 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 29 29 0a 20 20 20 20 27 75 ..........number-or-id))).....'u
191e0 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 20 66 6f 72 67 tf-8)....t))..(cl-defmethod.forg
19200 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-
19220 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.
19240 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
19260 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
19280 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
192a0 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)
192c0 0a 20 20 28 6f 73 65 74 20 74 6f 70 69 63 20 6d 61 72 6b 73 20 6d 61 72 6b 73 29 0a 20 20 28 66 ...(oset.topic.marks.marks)...(f
192e0 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 20 51 75 65 72 79 orge-refresh-buffer))..;;;.Query
19300 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
19320 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 70 69 63 29 29 0a et-parent.((topic.forge-topic)).
19340 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 70 69 63 29 29 0a ..(forge-get-repository.topic)).
19360 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 74 .(cl-defmethod.forge-get-reposit
19380 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 20 20 28 63 6c 6f ory.((topic.forge-topic))...(clo
193a0 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)..............
193c0 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 20 20 20 20 20 20 .(oref.topic.repository)........
193e0 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 0a 0a 28 63 6c 2d .......'forge-repository))..(cl-
19400 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 74 6f 70 69 defmethod.forge-get-topic.((topi
19420 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 28 63 6c 2d 64 65 c.forge-topic))...topic)..(cl-de
19440 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 72 65 70 6f 20 66 fmethod.forge-get-topic.((repo.f
19460 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 2d 69 64 29 0a 20 orge-repository).number-or-id)..
19480 20 28 69 66 20 28 6e 75 6d 62 65 72 70 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 0a 20 20 20 20 .(if.(numberp.number-or-id).....
194a0 20 20 28 69 66 20 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 ..(if.(<.number-or-id.0)........
194c0 20 20 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 28 61 62 73 20 ...(forge-get-pullreq.repo.(abs.
194e0 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 6f 72 20 28 66 6f 72 67 number-or-id)).........(or.(forg
19500 65 2d 67 65 74 2d 69 73 73 75 65 20 72 65 70 6f 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 0a 20 e-get-issue.repo.number-or-id)..
19520 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 71 20 72 65 ...........(forge-get-pullreq.re
19540 70 6f 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 29 29 0a 20 20 20 20 28 6f 72 20 28 66 6f 72 67 po.number-or-id))).....(or.(forg
19560 65 2d 67 65 74 2d 69 73 73 75 65 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 64 29 0a 20 20 20 20 20 20 e-get-issue.number-or-id).......
19580 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 6e 75 6d 62 65 72 2d 6f 72 2d 69 ..(forge-get-pullreq.number-or-i
195a0 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 74 d))))..(cl-defmethod.forge-get-t
195c0 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 3c opic.((number.integer))...(if.(<
195e0 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 6c .number.0).......(forge-get-pull
19600 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 65 req.(abs.number)).....(or.(forge
19620 2d 67 65 74 2d 69 73 73 75 65 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 -get-issue.number).........(forg
19640 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 6e 75 6d 62 65 72 29 29 29 29 0a 0a 28 63 6c 2d 64 65 e-get-pullreq.number))))..(cl-de
19660 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 69 64 20 73 74 72 fmethod.forge-get-topic.((id.str
19680 69 6e 67 29 29 0a 20 20 28 6f 72 20 28 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 69 64 29 ing))...(or.(forge-get-issue.id)
196a0 0a 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 69 64 29 29 29 0a .......(forge-get-pullreq.id))).
196c0 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 72 .;;;;.Current..(defun.forge-curr
196e0 65 6e 74 2d 74 6f 70 69 63 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 6d 61 6e 64 29 0a 20 20 22 ent-topic.(&optional.demand)..."
19700 52 65 74 75 72 6e 20 74 68 65 20 74 6f 70 69 63 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 62 65 69 Return.the.topic.at.point.or.bei
19720 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 20 ng.visited..If.there.is.no.such.
19740 74 6f 70 69 63 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 topic.and.DEMAND.is.non-nil,.the
19760 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 65 n.signal.an.error."...(or.(forge
19780 2d 74 6f 70 69 63 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 64 65 72 -topic-at-point).......(and.(der
197a0 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 0a 20 ived-mode-p.'forge-topic-mode)..
197c0 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 20 ..........forge-buffer-topic)...
197e0 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 20 ....(and.demand.(user-error."No.
19800 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 72 67 65 current.topic"))))..(defun.forge
19820 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 6d 61 6e -topic-at-point.(&optional.deman
19840 64 20 6e 6f 74 2d 74 68 69 6e 67 61 74 70 74 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 74 d.not-thingatpt)..."Return.the.t
19860 6f 70 69 63 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 opic.at.point..If.there.is.no.su
19880 63 68 20 74 6f 70 69 63 20 61 6e 64 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 ch.topic.and.DEMAND.is.non-nil,.
198a0 74 68 65 6e 20 73 69 67 6e 61 6c 0a 61 6e 20 65 72 72 6f 72 2e 20 20 49 66 20 4e 4f 54 2d 54 48 then.signal.an.error...If.NOT-TH
198c0 49 4e 47 41 54 50 54 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 64 6f 6e 27 74 20 75 INGATPT.is.non-nil,.then.don't.u
198e0 73 65 0a 60 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 27 2e 22 0a 20 20 28 6f 72 20 28 61 6e 64 se.`thing-at-point'."...(or.(and
19900 20 28 6e 6f 74 20 6e 6f 74 2d 74 68 69 6e 67 61 74 70 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 .(not.not-thingatpt)............
19920 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 29 0a 20 (thing-at-point.'forge-topic))..
19940 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 28 69 .....(magit-section-value-if.'(i
19960 73 73 75 65 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 ssue.pullreq)).......(forge-get-
19980 70 75 6c 6c 72 65 71 20 3a 62 72 61 6e 63 68 20 28 6d 61 67 69 74 2d 62 72 61 6e 63 68 2d 61 74 pullreq.:branch.(magit-branch-at
199a0 2d 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 -point)).......(and.(derived-mod
199c0 65 2d 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 29 0a 20 20 20 20 e-p.'forge-topic-list-mode).....
199e0 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 69 64 20 28 74 61 62 75 6c 61 74 65 64 .......(and-let*.((id.(tabulated
19a00 2d 6c 69 73 74 2d 67 65 74 2d 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f -list-get-id)))..............(fo
19a20 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 69 64 29 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 64 rge-get-topic.id))).......(and.d
19a40 65 6d 61 6e 64 20 28 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 emand.(user-error."No.topic.at.p
19a60 6f 69 6e 74 22 29 29 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 oint"))))..(put.'forge-topic.'th
19a80 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--
19aa0 74 6f 70 69 63 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 74 topic).(defun.forge-thingatpt--t
19ac0 6f 70 69 63 20 28 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 72 65 70 6f 20 28 66 6f 72 67 opic.()...(and-let*.((repo.(forg
19ae0 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 61 6e e--repo-for-thingatpt))).....(an
19b00 64 20 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 0a 20 20 20 d.(thing-at-point-looking-at....
19b20 20 20 20 20 20 20 20 28 69 66 20 28 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 .......(if.(forge-gitlab-reposit
19b40 6f 72 79 2d 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 ory--eieio-childp.repo).........
19b60 20 20 20 20 20 20 22 5b 23 21 5d 5c 5c 28 5b 30 2d 39 5d 2b 5c 5c 29 5c 5c 5f 3e 22 0a 20 20 20 ......"[#!]\\([0-9]+\\)\\_>"....
19b80 20 20 20 20 20 20 20 20 20 22 23 5c 5c 28 5b 30 2d 39 5d 2b 5c 5c 29 5c 5c 5f 3e 22 29 29 0a 20 ........."#\\([0-9]+\\)\\_>"))..
19ba0 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 72 65 70 6f 20 28 73 ........(forge-get-topic.repo.(s
19bc0 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 31 29 tring-to-number.(match-string.1)
19be0 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 72 65 70 6f 2d 66 6f 72 2d 74 68 )))))..(defun.forge--repo-for-th
19c00 69 6e 67 61 74 70 74 20 28 29 0a 20 20 28 6f 72 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f ingatpt.()...(or.(forge-reposito
19c20 72 79 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 74 ry-at-point).......(and-let*.((t
19c40 6f 70 69 63 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 61 74 2d 70 6f 69 6e 74 20 6e 69 6c 20 27 opic.(forge-topic-at-point.nil.'
19c60 6e 6f 74 2d 74 68 69 6e 67 61 74 70 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d not-thingatpt))).........(forge-
19c80 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 28 61 6e get-repository.topic)).......(an
19ca0 64 20 28 6e 6f 74 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 75 6e 61 73 73 6f 63 69 61 74 65 64 d.(not.forge-buffer-unassociated
19cc0 2d 70 29 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 -p)............(forge-get-reposi
19ce0 74 6f 72 79 20 3a 6b 6e 6f 77 6e 3f 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 tory.:known?))))..(defun.forge-r
19d00 65 67 69 6f 6e 2d 74 6f 70 69 63 73 20 28 29 0a 20 20 28 63 6f 6e 64 0a 20 20 20 28 28 64 65 72 egion-topics.()...(cond....((der
19d20 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 6f 6e 73 ived-mode-p.'forge-notifications
19d40 2d 6d 6f 64 65 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 72 65 67 69 6f 6e 2d 76 61 6c 75 65 73 20 -mode).....(magit-region-values.
19d60 27 28 69 73 73 75 65 20 70 75 6c 6c 72 65 71 29 29 29 0a 20 20 20 28 28 61 6e 64 20 28 64 65 72 '(issue.pullreq)))....((and.(der
19d80 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 6c 69 73 74 2d 6d 6f ived-mode-p.'forge-topic-list-mo
19da0 64 65 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 67 69 6f 6e 2d 61 63 74 69 76 65 2d 70 29 29 0a de)..........(region-active-p)).
19dc0 20 20 20 20 28 6c 65 74 20 28 28 62 65 67 20 28 72 65 67 69 6f 6e 2d 62 65 67 69 6e 6e 69 6e 67 ....(let.((beg.(region-beginning
19de0 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 6e 64 20 28 72 65 67 69 6f 6e 2d 65 6e 64 29 29 0a ))...........(end.(region-end)).
19e00 20 20 20 20 20 20 20 20 20 20 28 74 6f 70 69 63 73 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 28 73 ..........(topics.nil)).......(s
19e20 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 ave-excursion.........(goto-char
19e40 20 62 65 67 29 0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 3c 20 28 70 6f 69 6e 74 29 20 .beg).........(while.(<.(point).
19e60 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 69 64 20 28 end)...........(when-let*.((id.(
19e80 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 20 20 20 20 20 20 tabulated-list-get-id)))........
19ea0 20 20 20 20 20 28 70 75 73 68 20 28 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 69 64 29 20 .....(push.(forge-get-topic.id).
19ec0 74 6f 70 69 63 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 topics))...........(forward-line
19ee0 20 31 29 29 0a 20 20 20 20 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 74 6f 70 69 63 73 29 29 29 .1)).........(nreverse.topics)))
19f00 29 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 6c 73 2d )))..;;;;.List..(defun.forge-ls-
19f20 72 65 63 65 6e 74 2d 74 6f 70 69 63 73 20 28 72 65 70 6f 20 74 61 62 6c 65 29 0a 20 20 28 6c 65 recent-topics.(repo.table)...(le
19f40 74 2a 20 28 28 69 64 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 t*.((id.(oref.repo.id)).........
19f60 20 28 6c 69 6d 69 74 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6c 69 6d 69 74 29 0a .(limit.forge-topic-list-limit).
19f80 20 20 20 20 20 20 20 20 20 28 6f 70 65 6e 2d 6c 69 6d 69 74 20 20 20 28 69 66 20 28 63 6f 6e 73 .........(open-limit...(if.(cons
19fa0 70 20 6c 69 6d 69 74 29 20 28 63 61 72 20 6c 69 6d 69 74 29 20 6c 69 6d 69 74 29 29 0a 20 20 20 p.limit).(car.limit).limit))....
19fc0 20 20 20 20 20 20 28 63 6c 6f 73 65 64 2d 6c 69 6d 69 74 20 28 69 66 20 28 63 6f 6e 73 70 20 6c ......(closed-limit.(if.(consp.l
19fe0 69 6d 69 74 29 20 28 63 64 72 20 6c 69 6d 69 74 29 20 6c 69 6d 69 74 29 29 0a 20 20 20 20 20 20 imit).(cdr.limit).limit)).......
1a000 20 20 20 28 74 6f 70 69 63 73 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 2a ...(topics.(forge-sql.[:select.*
1a020 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 20 20 20 20 .:from.$i1......................
1a040 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 74 6f 72 ........:where.(and.(=.repositor
1a060 79 20 24 73 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 y.$s2)..........................
1a080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 73 74 61 74 75 73 20 27 75 6e 72 65 61 ................(=.status.'unrea
1a0a0 64 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 20 20 20 d))]............................
1a0c0 20 74 61 62 6c 65 20 69 64 29 29 29 0a 20 20 20 20 28 6d 61 70 63 20 28 6c 61 6d 62 64 61 20 28 .table.id))).....(mapc.(lambda.(
1a0e0 72 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 72 6f 77 row).............(cl-pushnew.row
1a100 20 74 6f 70 69 63 73 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 .topics.:test.#'equal)).........
1a120 20 20 28 69 66 20 28 63 6f 6e 73 70 20 6c 69 6d 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ..(if.(consp.limit).............
1a140 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 72 6f 6d 20 24 69 ..(forge-sql.[:select.*.:from.$i
1a160 31 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 3a 77 68 65 1...........................:whe
1a180 72 65 20 28 61 6e 64 20 28 3d 20 72 65 70 6f 73 69 74 6f 72 79 20 24 73 32 29 0a 20 20 20 20 20 re.(and.(=.repository.$s2)......
1a1a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1a1c0 20 28 69 73 6e 75 6c 6c 20 63 6c 6f 73 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(isnull.closed))...............
1a1e0 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 75 70 64 ............:order-by.[(desc.upd
1a200 61 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 20 ated)]..........................
1a220 20 3a 6c 69 6d 69 74 20 24 73 33 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .:limit.$s3]....................
1a240 20 20 20 20 20 20 74 61 62 6c 65 20 69 64 20 6f 70 65 6e 2d 6c 69 6d 69 74 29 0a 20 20 20 20 20 ......table.id.open-limit)......
1a260 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 72 .......(forge-sql.[:select.*.:fr
1a280 6f 6d 20 24 69 31 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 om.$i1.........................:
1a2a0 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 32 29 0a 20 20 where.(and.(=.repository.$s2)...
1a2c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1a2e0 20 20 28 69 73 6e 75 6c 6c 20 63 6c 6f 73 65 64 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 ..(isnull.closed))].............
1a300 20 20 20 20 20 20 20 20 20 20 20 74 61 62 6c 65 20 69 64 29 29 29 0a 20 20 20 20 28 77 68 65 6e ...........table.id))).....(when
1a320 20 28 3e 20 63 6c 6f 73 65 64 2d 6c 69 6d 69 74 20 30 29 0a 20 20 20 20 20 20 28 6d 61 70 63 20 .(>.closed-limit.0).......(mapc.
1a340 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 28 63 6c 2d (lambda.(row)...............(cl-
1a360 70 75 73 68 6e 65 77 20 72 6f 77 20 74 6f 70 69 63 73 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c pushnew.row.topics.:test.#'equal
1a380 29 29 0a 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 )).............(forge-sql.[:sele
1a3a0 63 74 20 2a 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 ct.*.:from.$i1..................
1a3c0 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 74 6f 72 79 .......:where.(and.(=.repository
1a3e0 20 24 73 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 .$s2)...........................
1a400 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 6e 75 6c 6c 20 63 6c 6f 73 65 64 29 29 0a 20 20 20 20 ..........(notnull.closed)).....
1a420 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 20 5b 28 ....................:order-by.[(
1a440 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 20 20 20 20 20 desc.updated)]..................
1a460 20 20 20 20 20 20 20 3a 6c 69 6d 69 74 20 24 73 33 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .......:limit.$s3]..............
1a480 20 20 20 20 20 20 20 20 20 20 74 61 62 6c 65 20 69 64 20 63 6c 6f 73 65 64 2d 6c 69 6d 69 74 29 ..........table.id.closed-limit)
1a4a0 29 29 0a 20 20 20 20 28 63 6c 2d 73 6f 72 74 20 28 6d 61 70 63 61 72 20 28 6c 65 74 20 28 28 63 )).....(cl-sort.(mapcar.(let.((c
1a4c0 6c 61 73 73 20 28 69 66 20 28 65 71 20 74 61 62 6c 65 20 27 70 75 6c 6c 72 65 71 29 0a 20 20 20 lass.(if.(eq.table.'pullreq)....
1a4e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1a500 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...'forge-pullreq...............
1a520 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 69 73 73 ......................'forge-iss
1a540 75 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 20 20 28 6c 61 ue)))........................(la
1a560 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 20 20 mbda.(row)......................
1a580 20 20 20 20 28 63 6c 6f 73 71 6c 2d 2d 72 65 6d 61 6b 65 2d 69 6e 73 74 61 6e 63 65 20 63 6c 61 ....(closql--remake-instance.cla
1a5a0 73 73 20 28 66 6f 72 67 65 2d 64 62 29 20 72 6f 77 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 ss.(forge-db).row)))............
1a5c0 20 20 20 20 20 20 20 20 20 20 74 6f 70 69 63 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ..........topics)..............(
1a5e0 63 64 72 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6f 72 64 65 72 29 0a 20 20 20 20 cdr.forge-topic-list-order).....
1a600 20 20 20 20 20 20 20 20 20 3a 6b 65 79 20 28 6c 61 6d 62 64 61 20 28 69 74 29 20 28 65 69 65 69 .........:key.(lambda.(it).(eiei
1a620 6f 2d 6f 72 65 66 20 69 74 20 28 63 61 72 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d o-oref.it.(car.forge-topic-list-
1a640 6f 72 64 65 72 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 74 6f order))))))..(defun.forge--ls-to
1a660 70 69 63 73 20 28 72 65 70 6f 29 0a 20 20 28 63 6c 2d 73 6f 72 74 20 28 6e 63 6f 6e 63 20 28 66 pics.(repo)...(cl-sort.(nconc.(f
1a680 6f 72 67 65 2d 2d 6c 73 2d 69 73 73 75 65 73 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 orge--ls-issues.repo)...........
1a6a0 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6c 73 2d 70 75 6c 6c 72 65 71 73 20 72 65 70 6f ........(forge--ls-pullreqs.repo
1a6c0 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 23 27 3e 20 3a 6b 65 79 20 28 2d 63 75 74 20 6f 72 65 ))............#'>.:key.(-cut.ore
1a6e0 66 20 3c 3e 20 6e 75 6d 62 65 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 f.<>.number)))..(defun.forge--ls
1a700 2d 61 63 74 69 76 65 2d 74 6f 70 69 63 73 20 28 72 65 70 6f 29 0a 20 20 28 63 6c 2d 73 6f 72 74 -active-topics.(repo)...(cl-sort
1a720 20 28 6e 63 6f 6e 63 20 28 66 6f 72 67 65 2d 2d 6c 73 2d 61 63 74 69 76 65 2d 69 73 73 75 65 73 .(nconc.(forge--ls-active-issues
1a740 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 28 66 6f 72 67 65 2d .repo)...................(forge-
1a760 2d 6c 73 2d 61 63 74 69 76 65 2d 70 75 6c 6c 72 65 71 73 20 72 65 70 6f 29 29 0a 20 20 20 20 20 -ls-active-pullreqs.repo))......
1a780 20 20 20 20 20 20 23 27 3e 20 3a 6b 65 79 20 28 2d 63 75 74 20 6f 72 65 66 20 3c 3e 20 6e 75 6d ......#'>.:key.(-cut.oref.<>.num
1a7a0 62 65 72 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 ber)))..;;;.Read..(defun.forge-r
1a7c0 65 61 64 2d 74 6f 70 69 63 20 28 70 72 6f 6d 70 74 29 0a 20 20 22 52 65 61 64 20 61 6e 20 61 63 ead-topic.(prompt)..."Read.an.ac
1a7e0 74 69 76 65 20 74 6f 70 69 63 20 77 69 74 68 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 75 73 69 6e 67 tive.topic.with.completion.using
1a800 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
1a820 6e 67 20 74 6f 70 69 63 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 61 63 74 69 76 65 2e ng.topics.are.considered.active.
1a840 0a 44 65 66 61 75 6c 74 20 74 6f 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 20 65 76 .Default.to.the.current.topic.ev
1a860 65 6e 20 69 66 20 69 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 en.if.it.isn't.active...\\<forge
1a880 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 3e 57 68 69 6c 65 -read-topic-minibuffer-map>While
1a8a0 20 63 6f 6d 70 6c 65 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 .completion.is.in.\.progress,.\\
1a8c0 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 5d 20 6c 69 [forge-read-topic-lift-limit].li
1a8e0 66 74 73 20 74 68 65 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 fts.the.limit,.extending.the.com
1a900 70 6c 65 74 69 6f 6e 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 pletion.candidates.to.include.al
1a920 6c 20 74 6f 70 69 63 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 l.topics...If.`forge-limit-topic
1a940 2d 63 68 6f 69 63 65 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 -choices'.is.nil,.then.all.candi
1a960 64 61 74 65 73 0a 63 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 dates.can.be.selected.from.the.s
1a980 74 61 72 74 2e 22 0a 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 tart."...(forge--read-topic.prom
1a9a0 70 74 0a 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 pt......................#'forge-
1a9c0 63 75 72 72 65 6e 74 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 current-topic...................
1a9e0 20 20 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 61 63 74 69 76 65 2d 74 6f 70 69 63 73 0a 20 20 20 ...#'forge--ls-active-topics....
1aa00 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 2d 6c 73 2d 74 6f ..................#'forge--ls-to
1aa20 70 69 63 73 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 72 65 61 64 2d 74 6f 70 69 63 pics))..(defun.forge--read-topic
1aa40 20 28 70 72 6f 6d 70 74 20 63 75 72 72 65 6e 74 20 61 63 74 69 76 65 20 61 6c 6c 29 0a 20 20 28 .(prompt.current.active.all)...(
1aa60 6c 65 74 2a 20 28 28 63 75 72 72 65 6e 74 20 28 66 75 6e 63 61 6c 6c 20 63 75 72 72 65 6e 74 29 let*.((current.(funcall.current)
1aa80 29 0a 20 20 20 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 )..........(repo....(forge-get-r
1aaa0 65 70 6f 73 69 74 6f 72 79 20 28 6f 72 20 63 75 72 72 65 6e 74 20 3a 74 72 61 63 6b 65 64 29 29 epository.(or.current.:tracked))
1aac0 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 61 75 6c 74 20 28 61 6e 64 20 63 75 72 72 65 6e 74 )..........(default.(and.current
1aae0 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 63 75 72 72 65 .(forge--format-topic-line.curre
1ab00 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 6c 69 73 74 20 20 20 28 66 6f 72 67 65 2d 2d nt)))..........(alist...(forge--
1ab20 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 20 20 20 20 20 topic-collection................
1ab40 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 69 66 20 66 6f 72 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 ....(funcall.(if.forge-limit-top
1ab60 69 63 2d 63 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 ic-choices.active.all)..........
1ab80 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 29 0a 20 20 20 20 20 ...................repo)))......
1aba0 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 72 20 61 6c 69 73 74 ....(choices.(mapcar.#'car.alist
1abc0 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 64 20 28 28 61 6e 64 ))..........(choices.(cond.((and
1abe0 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......
1ac00 20 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 65 66 61 75 6c 74 .........................default
1ac20 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 28 ...............................(
1ac40 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 65 73 29 29 29 0a 20 not.(member.default.choices)))..
1ac60 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 75 73 68 20 28 63 ........................(push.(c
1ac80 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 20 69 64 29 29 20 61 ons.default.(oref.current.id)).a
1aca0 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 20 20 20 20 20 20 28 list)..........................(
1acc0 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 20 20 20 20 20 20 20 cons.default.choices))..........
1ace0 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 29 0a 20 20 20 20 20 ...............(choices)))......
1ad00 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 20 66 6f 72 67 65 2d ....(choice...........(if.forge-
1ad20 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 20 20 20 20 20 20 20 limit-topic-choices.............
1ad40 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 68 6f 6f 6b 0a 20 20 ..(minibuffer-with-setup-hook...
1ad60 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 29 0a 20 20 20 20 20 ................(lambda.()......
1ad80 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 2d 6d 61 70 20 28 6d ...............(use-local-map.(m
1ada0 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 20 20 20 20 20 20 20 ake-composed-keymap.............
1adc0 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 65 2d 72 65 ........................forge-re
1ade0 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 20 20 20 20 20 20 20 ad-topic-minibuffer-map.........
1ae00 20 20 20 20 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 75 72 ............................(cur
1ae20 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 20 20 20 20 20 20 20 rent-local-map))))..............
1ae40 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 0a 20 20 20 20 20 20 ...(magit-completing-read.......
1ae60 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 6d 6d 61 6e 64 2d 6b ...........(substitute-command-k
1ae80 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 72 6d 61 74 20 22 25 eys...................(format."%
1aea0 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 22 20 70 72 6f 6d 70 s.\\<%s>.(\\[%s].for.all)".promp
1aec0 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 27 66 6f 72 t...........................'for
1aee0 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 20 20 ge-read-topic-minibuffer-map....
1af00 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 67 65 2d 72 65 .......................'forge-re
1af20 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 20 20 20 20 20 20 20 ad-topic-lift-limit))...........
1af40 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 64 79 6e 61 6d 69 63 .......(completion-table-dynamic
1af60 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 61 6c 6c 2d 63 68 6f ...................(let.(all-cho
1af80 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 20 28 6c 61 6d 62 64 ices).....................(lambd
1afa0 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 20 20 20 20 20 20 20 a.(_string).....................
1afc0 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 20 20 20 20 20 20 28 ..(cond........................(
1afe0 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)....................
1b000 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 6f 69 63 65 73 20 63 ....(forge-limit-topic-choices.c
1b020 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 20 20 20 20 28 hoices)........................(
1b040 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
1b060 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 28 63 6f 6e --replace-minibuffer-prompt.(con
1b080 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 20 20 20 20 20 20 20 cat.prompt.":."))...............
1b0a0 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 72 67 65 2d 2d 74 6f ..........(setq.alist.(forge--to
1b0c0 70 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 28 66 75 6e 63 61 6c 6c 20 61 6c 6c 20 72 65 70 6f pic-collection.(funcall.all.repo
1b0e0 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 28 73 65 74 ))).........................(set
1b100 71 20 61 6c 6c 2d 63 68 6f 69 63 65 73 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 61 6c 69 73 q.all-choices.(mapcar.#'car.alis
1b120 74 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 74 20 t)))))))..................nil.t.
1b140 6e 69 6c 20 6e 69 6c 20 64 65 66 61 75 6c 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d nil.nil.default)).............(m
1b160 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 68 6f 69 agit-completing-read.prompt.choi
1b180 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 29 0a 20 20 ces.nil.t.nil.nil.default))))...
1b1a0 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 0a 0a ..(cdr.(assoc.choice.alist))))..
1b1c0 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 28 (defun.forge--topic-collection.(
1b1e0 74 6f 70 69 63 73 29 0a 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 74 6f 70 69 63 topics)...(mapcar.(lambda.(topic
1b200 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d ).............(cons.(forge--form
1b220 61 74 2d 74 6f 70 69 63 2d 6c 69 6e 65 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 at-topic-line.topic)............
1b240 20 20 20 20 20 20 20 28 6f 72 65 66 20 74 6f 70 69 63 20 69 64 29 29 29 0a 20 20 20 20 20 20 20 .......(oref.topic.id)))........
1b260 20 20 20 74 6f 70 69 63 73 29 29 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 6f 72 67 ...topics))..(defvar-keymap.forg
1b280 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 20 22 2b e-read-topic-minibuffer-map..."+
1b2a0 22 20 23 27 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 29 ".#'forge-read-topic-lift-limit)
1b2c0 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 6c 69 66 74 2d 6c ..(defun.forge-read-topic-lift-l
1b2e0 69 6d 69 74 20 28 29 0a 20 20 22 4e 6f 20 6c 6f 6e 67 65 72 20 6c 69 6d 69 74 20 63 6f 6d 70 6c imit.()..."No.longer.limit.compl
1b300 65 74 69 6f 6e 20 63 61 6e 64 69 64 61 74 65 73 20 74 6f 20 61 63 74 69 76 65 20 74 6f 70 69 63 etion.candidates.to.active.topic
1b320 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 s."...(interactive)...(when.(and
1b340 20 28 6d 69 6e 69 62 75 66 66 65 72 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 .(minibufferp)..............forg
1b360 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 63 2d 63 68 6f 69 63 65 73 29 0a 20 20 20 20 28 73 65 74 71 e-limit-topic-choices).....(setq
1b380 2d 6c 6f 63 61 6c 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 -local.forge-limit-topic-choices
1b3a0 20 6e 69 6c 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 62 6f 75 6e 64 2d 61 6e 64 2d .nil).....(when.(and.(bound-and-
1b3c0 74 72 75 65 2d 70 20 76 65 72 74 69 63 6f 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 true-p.vertico-mode)............
1b3e0 20 20 20 20 28 62 6f 75 6e 64 70 20 27 76 65 72 74 69 63 6f 2d 2d 69 6e 70 75 74 29 0a 20 20 20 ....(boundp.'vertico--input)....
1b400 20 20 20 20 20 20 20 20 20 20 20 20 28 66 62 6f 75 6e 64 70 20 27 76 65 72 74 69 63 6f 2d 2d 65 ............(fboundp.'vertico--e
1b420 78 68 69 62 69 74 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 76 65 72 74 69 63 6f 2d 2d 69 6e xhibit)).......(setq.vertico--in
1b440 70 75 74 20 74 29 0a 20 20 20 20 20 20 28 76 65 72 74 69 63 6f 2d 2d 65 78 68 69 62 69 74 29 29 put.t).......(vertico--exhibit))
1b460 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 72 65 70 6c 61 63 65 2d 6d 69 6e 69 62 75 ))..(defun.forge--replace-minibu
1b480 66 66 65 72 2d 70 72 6f 6d 70 74 20 28 70 72 6f 6d 70 74 29 0a 20 20 28 73 61 76 65 2d 65 78 63 ffer-prompt.(prompt)...(save-exc
1b4a0 75 72 73 69 6f 6e 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e ursion.....(goto-char.(point-min
1b4c0 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 )).....(let.((inhibit-read-only.
1b4e0 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 6e 64 20 28 6c 65 6e 67 74 68 20 70 72 6f 6d 70 74 t)...........(end.(length.prompt
1b500 29 29 29 0a 20 20 20 20 20 20 3b 3b 20 28 69 6e 73 65 72 74 2d 61 6e 64 2d 69 6e 68 65 72 69 74 ))).......;;.(insert-and-inherit
1b520 20 70 72 6f 6d 70 74 29 20 77 6f 75 6c 64 20 64 69 73 63 61 72 64 20 61 6c 6c 20 66 61 63 65 73 .prompt).would.discard.all.faces
1b540 20 61 6c 72 65 61 64 79 0a 20 20 20 20 20 20 3b 3b 20 70 72 65 73 65 6e 74 20 69 6e 20 50 52 4f .already.......;;.present.in.PRO
1b560 4d 50 54 2c 20 73 6f 20 69 6e 73 74 65 61 64 20 77 65 20 64 6f 20 69 74 20 6c 69 6b 65 20 60 72 MPT,.so.instead.we.do.it.like.`r
1b580 65 61 64 5f 6d 69 6e 69 62 75 66 27 2e 0a 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 ead_minibuf'........(put-text-pr
1b5a0 6f 70 65 72 74 79 20 30 20 65 6e 64 20 27 66 72 6f 6e 74 2d 73 74 69 63 6b 79 20 74 20 70 72 6f operty.0.end.'front-sticky.t.pro
1b5c0 6d 70 74 29 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 mpt).......(put-text-property.0.
1b5e0 65 6e 64 20 27 72 65 61 72 2d 6e 6f 6e 73 74 69 63 6b 79 20 74 20 70 72 6f 6d 70 74 29 0a 20 20 end.'rear-nonsticky.t.prompt)...
1b600 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 20 27 66 69 ....(put-text-property.0.end.'fi
1b620 65 6c 64 20 74 20 70 72 6f 6d 70 74 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 72 6f 70 73 eld.t.prompt).......(let.((props
1b640 20 6d 69 6e 69 62 75 66 66 65 72 2d 70 72 6f 6d 70 74 2d 70 72 6f 70 65 72 74 69 65 73 29 29 0a .minibuffer-prompt-properties)).
1b660 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 70 72 6f 70 73 0a 20 20 20 20 20 20 20 20 20 20 28 ........(while.props...........(
1b680 6c 65 74 20 28 28 6b 65 79 20 28 70 6f 70 20 70 72 6f 70 73 29 29 0a 20 20 20 20 20 20 20 20 20 let.((key.(pop.props))..........
1b6a0 20 20 20 20 20 20 20 28 76 61 6c 20 28 70 6f 70 20 70 72 6f 70 73 29 29 29 0a 20 20 20 20 20 20 .......(val.(pop.props))).......
1b6c0 20 20 20 20 20 20 28 69 66 20 28 65 71 20 6b 65 79 20 27 66 61 63 65 29 0a 20 20 20 20 20 20 20 ......(if.(eq.key.'face)........
1b6e0 20 20 20 20 20 20 20 20 20 28 61 64 64 2d 66 61 63 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 .........(add-face-text-property
1b700 20 30 20 65 6e 64 20 76 61 6c 20 74 20 70 72 6f 6d 70 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 .0.end.val.t.prompt)............
1b720 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 20 6b 65 79 20 ...(put-text-property.0.end.key.
1b740 76 61 6c 20 70 72 6f 6d 70 74 29 29 29 29 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 70 72 val.prompt))))).......(insert.pr
1b760 6f 6d 70 74 29 0a 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e ompt).......(delete-region.(poin
1b780 74 29 20 28 6d 69 6e 69 62 75 66 66 65 72 2d 70 72 6f 6d 70 74 2d 65 6e 64 29 29 29 29 29 0a 0a t).(minibuffer-prompt-end)))))..
1b7a0 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 61 74 (defun.forge-topic-completion-at
1b7c0 2d 70 6f 69 6e 74 20 28 29 0a 20 20 28 6c 65 74 20 28 28 62 6f 6c 20 28 6c 69 6e 65 2d 62 65 67 -point.()...(let.((bol.(line-beg
1b7e0 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 72 65 70 6f 29 0a inning-position)).........repo).
1b800 20 20 20 20 28 61 6e 64 20 28 6c 6f 6f 6b 69 6e 67 2d 62 61 63 6b 20 22 5b 21 23 5d 5b 30 2d 39 ....(and.(looking-back."[!#][0-9
1b820 5d 2a 22 20 62 6f 6c 29 0a 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 6e 6f 74 20 62 75 67 2d 72 ]*".bol)..........(or.(not.bug-r
1b840 65 66 65 72 65 6e 63 65 2d 70 72 6f 67 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 eference-prog-mode).............
1b860 20 28 6e 74 68 20 38 20 28 73 79 6e 74 61 78 2d 70 70 73 73 29 29 29 20 3b 20 69 6e 73 69 64 65 .(nth.8.(syntax-ppss))).;.inside
1b880 20 63 6f 6d 6d 65 6e 74 20 6f 72 20 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 .comment.or.string..........(set
1b8a0 71 20 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 q.repo.(forge-get-repository.:tr
1b8c0 61 63 6b 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 6f 6b 69 6e 67 2d 62 61 63 6b 20 28 acked))..........(looking-back.(
1b8e0 69 66 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 if.(forge--childp.repo.'forge-gi
1b900 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 20 20 20 20 20 tlab-repository)................
1b920 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 28 3f 33 3a 5b 21 23 5d 5c 5c 29 5c 5c 28 3f 32 3a ............"\\(?3:[!#]\\)\\(?2:
1b940 5b 30 2d 39 5d 2a 5c 5c 29 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 [0-9]*\\)"......................
1b960 20 20 20 20 22 23 5c 5c 28 3f 32 3a 5b 30 2d 39 5d 2a 5c 5c 29 22 29 0a 20 20 20 20 20 20 20 20 ...."#\\(?2:[0-9]*\\)").........
1b980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 6f 6c 29 0a 20 20 20 20 20 20 20 20 20 28 6c 69 ...............bol)..........(li
1b9a0 73 74 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 32 29 0a 20 20 20 20 20 20 20 20 20 st.(match-beginning.2)..........
1b9c0 20 20 20 20 20 20 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ......(match-end.0).............
1b9e0 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 20 20 20 ...(mapcar.(lambda.(row)........
1ba00 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 6e ..................(propertize.(n
1ba20 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 28 63 61 72 20 72 6f 77 29 29 0a 20 20 20 20 20 umber-to-string.(car.row))......
1ba40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1ba60 3a 74 69 74 6c 65 20 28 66 6f 72 6d 61 74 20 22 20 25 73 22 20 28 63 61 64 72 20 72 6f 77 29 29 :title.(format.".%s".(cadr.row))
1ba80 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 69 66 20 28 66 ))........................(if.(f
1baa0 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 61 62 2d orge--childp.repo.'forge-gitlab-
1bac0 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 20 20 20 repository).....................
1bae0 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 5b 6e 75 6d 62 .......(forge-sql.[:select.[numb
1bb00 65 72 20 74 69 74 6c 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 er.title].......................
1bb20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 24 69 31 0a 20 20 20 20 20 .................:from.$i1......
1bb40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1bb60 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 32 29 0a 20 20 20 20 ..:where.(=.repository.$s2).....
1bb80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1bba0 20 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 64 65 73 63 20 75 70 64 61 74 65 64 29 5d 5d 0a 20 ...:order-by.[(desc.updated)]]..
1bbc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1bbe0 20 20 20 20 20 28 69 66 20 28 65 71 75 61 6c 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 33 29 .....(if.(equal.(match-string.3)
1bc00 20 22 23 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 ."#")...........................
1bc20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 69 73 73 75 65 0a 20 20 20 20 20 20 20 20 20 ................'issue..........
1bc40 20 20 20 20 20 20 20 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 ...............................'
1bc60 70 75 6c 6c 72 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 pullreq)........................
1bc80 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 29 0a 20 ...............(oref.repo.id))..
1bca0 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 73 ........................(forge-s
1bcc0 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 20 75 70 64 61 74 65 ql.[:select.[number.title.update
1bce0 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 20 20 20 20 20 20 d]..............................
1bd00 20 20 20 20 20 20 20 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 ........:from.pullreq...........
1bd20 20 20 20 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 ...........................:wher
1bd40 65 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 20 20 20 20 e.(=.repository.$s1)............
1bd60 20 20 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 6e 69 6f 6e ..........................:union
1bd80 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 ................................
1bda0 20 20 20 20 20 20 3a 73 65 6c 65 63 74 20 5b 6e 75 6d 62 65 72 20 74 69 74 6c 65 20 75 70 64 61 ......:select.[number.title.upda
1bdc0 74 65 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 20 20 20 20 ted]............................
1bde0 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 20 20 20 20 20 20 ..........:from.issue...........
1be00 20 20 20 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 ...........................:wher
1be20 65 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 20 20 20 20 e.(=.repository.$s1)............
1be40 20 20 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 ..........................:order
1be60 2d 62 79 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 -by.[(desc.updated)]]...........
1be80 20 20 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.
1bea0 72 65 70 6f 20 69 64 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 repo.id))))................:anno
1bec0 74 61 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 63 29 20 28 67 65 74 tation-function.(lambda.(c).(get
1bee0 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 3a 74 69 74 6c 65 20 63 29 29 29 29 29 29 0a -text-property.0.:title.c)))))).
1bf00 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 64 72 61 66 74 20 28 .(defun.forge-read-topic-draft.(
1bf20 74 6f 70 69 63 29 0a 20 20 28 6e 6f 74 20 28 6f 72 65 66 20 74 6f 70 69 63 20 64 72 61 66 74 2d topic)...(not.(oref.topic.draft-
1bf40 70 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 74 69 p)))..(defun.forge-read-topic-ti
1bf60 74 6c 65 20 28 74 6f 70 69 63 29 0a 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 54 69 74 6c tle.(topic)...(read-string."Titl
1bf80 65 3a 20 22 20 28 6f 72 65 66 20 74 6f 70 69 63 20 74 69 74 6c 65 29 29 29 0a 0a 28 64 65 66 75 e:.".(oref.topic.title)))..(defu
1bfa0 6e 20 66 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 20 28 74 6f n.forge-read-topic-milestone.(to
1bfc0 70 69 63 29 0a 20 20 28 66 6f 72 67 65 2d 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 0a 20 pic)...(forge--completing-read..
1bfe0 20 20 22 4d 69 6c 65 73 74 6f 6e 65 22 0a 20 20 20 28 6d 61 70 63 61 72 20 23 27 63 61 64 64 72 .."Milestone"....(mapcar.#'caddr
1c000 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 70 .(oref.(forge-get-repository.top
1c020 69 63 29 20 6d 69 6c 65 73 74 6f 6e 65 73 29 29 0a 20 20 20 6e 69 6c 20 74 20 28 66 6f 72 67 65 ic).milestones))....nil.t.(forge
1c040 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 74 6f 70 69 63 29 29 --format-topic-milestone.topic))
1c060 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 6c 61 62 65 6c )..(defun.forge-read-topic-label
1c080 20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 72 6f 6d 70 74 20 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 .(&optional.prompt.repository)..
1c0a0 20 28 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 28 6f 72 20 70 72 6f 6d .(magit-completing-read.(or.prom
1c0c0 70 74 20 22 4c 61 62 65 6c 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pt."Label").....................
1c0e0 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 6c 61 62 65 6c 2d .....(forge--format-topic-label-
1c100 63 68 6f 69 63 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 choices.........................
1c120 20 20 28 6f 72 20 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f ..(or.repository.(forge-get-repo
1c140 73 69 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 sitory.:tracked)))..............
1c160 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 74 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 ............nil.t))..(defun.forg
1c180 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 73 20 28 74 6f 70 69 63 29 0a 20 20 28 6c e-read-topic-labels.(topic)...(l
1c1a0 65 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 et*.((repo.(forge-get-repository
1c1c0 20 74 6f 70 69 63 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 72 6d 2d 73 65 70 61 72 61 74 6f 72 .topic))..........(crm-separator
1c1e0 20 22 2c 22 29 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 .",")).....(magit-completing-rea
1c200 64 2d 6d 75 6c 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 d-multiple......"Labels:."......
1c220 28 6d 61 70 63 61 72 20 23 27 63 61 64 72 20 28 6f 72 65 66 20 72 65 70 6f 20 6c 61 62 65 6c 73 (mapcar.#'cadr.(oref.repo.labels
1c240 29 29 0a 20 20 20 20 20 6e 69 6c 20 74 0a 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 ))......nil.t......(mapconcat.#'
1c260 63 61 72 20 28 63 6c 6f 73 71 6c 2d 2d 69 72 65 66 20 74 6f 70 69 63 20 27 6c 61 62 65 6c 73 29 car.(closql--iref.topic.'labels)
1c280 20 22 2c 22 29 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 .","))))..(defun.forge-read-topi
1c2a0 63 2d 6d 61 72 6b 73 20 28 74 6f 70 69 63 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 6d 61 c-marks.(topic)...(forge-read-ma
1c2c0 72 6b 73 20 22 4d 61 72 6b 73 3a 20 22 20 74 6f 70 69 63 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f rks."Marks:.".topic))..(defun.fo
1c2e0 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 74 6f 70 69 63 29 rge-read-topic-assignees.(topic)
1c300 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 70 6f 73 ...(let*.((repo.(forge-get-repos
1c320 69 74 6f 72 79 20 74 6f 70 69 63 29 29 0a 20 20 20 20 20 20 20 20 20 28 76 61 6c 75 65 20 28 63 itory.topic))..........(value.(c
1c340 6c 6f 73 71 6c 2d 2d 69 72 65 66 20 74 6f 70 69 63 20 27 61 73 73 69 67 6e 65 65 73 29 29 0a 20 losql--iref.topic.'assignees))..
1c360 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 64 72 20 ........(choices.(mapcar.#'cadr.
1c380 28 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 (oref.repo.assignees))).........
1c3a0 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 61 67 69 74 .(crm-separator.",")).....(magit
1c3c0 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 20 20 20 22 -completing-read-multiple......"
1c3e0 41 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 Assignees:.".choices.nil......(i
1c400 66 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 f.(forge--childp.repo.'forge-git
1c420 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 74 20 3b 20 53 65 6c lab-repository)..........t.;.Sel
1c440 65 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 ecting.something.else.would.fail
1c460 20 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 .later.on.........'confirm).....
1c480 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 63 61 72 20 76 61 6c 75 65 20 22 2c 22 29 29 29 29 0a .(mapconcat.#'car.value.",")))).
1c4a0 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-
1c4c0 72 65 71 75 65 73 74 73 20 28 74 6f 70 69 63 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 70 6f 20 requests.(topic)...(let*.((repo.
1c4e0 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 20 20 (forge-get-repository.topic))...
1c500 20 20 20 20 20 20 20 28 76 61 6c 75 65 20 28 63 6c 6f 73 71 6c 2d 2d 69 72 65 66 20 74 6f 70 69 .......(value.(closql--iref.topi
1c520 63 20 27 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 c.'review-requests))..........(c
1c540 68 6f 69 63 65 73 20 28 6d 61 70 63 61 72 20 23 27 63 61 64 72 20 28 6f 72 65 66 20 72 65 70 6f hoices.(mapcar.#'cadr.(oref.repo
1c560 20 61 73 73 69 67 6e 65 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 72 6d 2d 73 65 70 61 .assignees)))..........(crm-sepa
1c580 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 74 69 6e rator.",")).....(magit-completin
1c5a0 67 2d 72 65 61 64 2d 6d 75 6c 74 69 70 6c 65 0a 20 20 20 20 20 22 52 65 71 75 65 73 74 20 72 65 g-read-multiple......"Request.re
1c5c0 76 69 65 77 20 66 72 6f 6d 3a 20 22 20 63 68 6f 69 63 65 73 20 6e 69 6c 0a 20 20 20 20 20 27 63 view.from:.".choices.nil......'c
1c5e0 6f 6e 66 69 72 6d 0a 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 63 61 72 20 76 61 6c onfirm......(mapconcat.#'car.val
1c600 75 65 20 22 2c 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 63 6f 6d 70 6c 65 ue.","))))..(defun.forge--comple
1c620 74 69 6e 67 2d 72 65 61 64 20 28 20 70 72 6f 6d 70 74 20 63 6f 6c 6c 65 63 74 69 6f 6e 20 26 6f ting-read.(.prompt.collection.&o
1c640 70 74 69 6f 6e 61 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 ptional.........................
1c660 20 20 20 20 20 20 20 20 70 72 65 64 69 63 61 74 65 20 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 ........predicate.require-match.
1c680 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 initial-input...................
1c6a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 68 69 73 74 20 64 65 66 29 0a 20 20 3b 3b 20 4e 4f 54 ..............hist.def)...;;.NOT
1c6c0 45 20 4f 6e 6c 79 20 72 65 71 75 69 72 65 64 20 75 6e 74 69 6c 20 60 6d 61 67 69 74 2d 63 6f 6d E.Only.required.until.`magit-com
1c6e0 70 6c 65 74 69 6e 67 2d 72 65 61 64 27 20 68 61 73 20 62 65 65 6e 0a 20 20 3b 3b 20 75 70 64 61 pleting-read'.has.been...;;.upda
1c700 74 65 64 20 74 6f 20 61 6c 6c 6f 77 20 65 6d 70 74 79 20 69 6e 70 75 74 20 69 66 20 72 65 71 75 ted.to.allow.empty.input.if.requ
1c720 69 72 65 2d 6d 61 74 63 68 20 69 73 20 74 2e 0a 20 20 28 6c 65 74 20 28 28 72 65 70 6c 79 20 28 ire-match.is.t....(let.((reply.(
1c740 66 75 6e 63 61 6c 6c 20 6d 61 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 2d 66 75 funcall.magit-completing-read-fu
1c760 6e 63 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 20 28 nction.........................(
1c780 63 6f 6e 63 61 74 20 70 72 6f 6d 70 74 20 22 3a 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 concat.prompt.":.").............
1c7a0 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 64 65 66 20 28 6e 6f 74 20 28 6d ............(if.(and.def.(not.(m
1c7c0 65 6d 62 65 72 20 64 65 66 20 63 6f 6c 6c 65 63 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 ember.def.collection))).........
1c7e0 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 20 64 65 66 20 63 6f ....................(cons.def.co
1c800 6c 6c 65 63 74 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 llection).......................
1c820 20 20 20 20 63 6f 6c 6c 65 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....collection).................
1c840 20 20 20 20 20 20 20 20 70 72 65 64 69 63 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ........predicate...............
1c860 20 20 20 20 20 20 20 20 20 20 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 69 6e 69 74 69 61 6c 2d ..........require-match.initial-
1c880 69 6e 70 75 74 20 68 69 73 74 20 64 65 66 29 29 29 0a 20 20 20 20 28 69 66 20 28 65 71 75 61 6c input.hist.def))).....(if.(equal
1c8a0 20 72 65 70 6c 79 20 22 22 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 72 65 71 75 .reply."").........(if.(and.requ
1c8c0 69 72 65 2d 6d 61 74 63 68 20 28 6e 6f 74 20 28 65 71 20 72 65 71 75 69 72 65 2d 6d 61 74 63 68 ire-match.(not.(eq.require-match
1c8e0 20 74 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 6f 72 20 22 4e .t))).............(user-error."N
1c900 6f 74 68 69 6e 67 20 73 65 6c 65 63 74 65 64 22 29 0a 20 20 20 20 20 20 20 20 20 20 6e 69 6c 29 othing.selected")...........nil)
1c920 0a 20 20 20 20 20 20 72 65 70 6c 79 29 29 29 0a 0a 3b 3b 3b 20 46 6f 72 6d 61 74 0a 0a 28 63 6c .......reply)))..;;;.Format..(cl
1c940 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 28 28 74 6f 70 69 63 -defmethod.forge--format.((topic
1c960 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 20 73 6c 6f 74 20 26 6f 70 74 69 6f 6e 61 6c 20 73 70 65 .forge-topic).slot.&optional.spe
1c980 63 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 72 c)...(forge--format.(forge-get-r
1c9a0 65 70 6f 73 69 74 6f 72 79 20 74 6f 70 69 63 29 20 73 6c 6f 74 0a 20 20 20 20 20 20 20 20 20 20 epository.topic).slot...........
1c9c0 20 20 20 20 20 20 20 60 28 2c 40 73 70 65 63 20 28 3f 69 20 2e 20 2c 28 6f 72 65 66 20 74 6f 70 .......`(,@spec.(?i...,(oref.top
1c9e0 69 63 20 6e 75 6d 62 65 72 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 66 6f ic.number)))))..(defun.forge--fo
1ca00 72 6d 61 74 2d 74 6f 70 69 63 2d 6c 69 6e 65 20 28 74 6f 70 69 63 20 26 6f 70 74 69 6f 6e 61 6c rmat-topic-line.(topic.&optional
1ca20 20 77 69 64 74 68 29 0a 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 28 61 6e 64 20 28 64 65 72 69 76 .width)...(concat....(and.(deriv
1ca40 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 6f 6e 73 2d 6d ed-mode-p.'forge-notifications-m
1ca60 6f 64 65 29 0a 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 ode).........(eq.forge-notificat
1ca80 69 6f 6e 73 2d 64 69 73 70 6c 61 79 2d 73 74 79 6c 65 20 27 66 6c 61 74 29 0a 20 20 20 20 20 20 ions-display-style.'flat).......
1caa0 20 20 28 63 6f 6e 63 61 74 20 28 74 72 75 6e 63 61 74 65 2d 73 74 72 69 6e 67 2d 74 6f 2d 77 69 ..(concat.(truncate-string-to-wi
1cac0 64 74 68 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 67 dth..................(oref.(forg
1cae0 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 75 67 29 0a 20 20 e-get-repository.topic).slug)...
1cb00 20 20 20 20 20 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 ...............forge-notificatio
1cb20 6e 73 2d 72 65 70 6f 2d 73 6c 75 67 2d 77 69 64 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ns-repo-slug-width..............
1cb40 20 20 20 20 6e 69 6c 20 3f 5c 73 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 ....nil.?\s.t)................."
1cb60 20 22 29 29 0a 20 20 20 3b 3b 20 4d 41 59 42 45 20 62 72 69 6e 67 20 74 68 69 73 20 62 61 63 6b ."))....;;.MAYBE.bring.this.back
1cb80 20 6f 6e 63 65 20 77 65 20 73 75 70 70 6f 72 74 20 64 69 73 63 75 73 73 69 6f 6e 73 2e 0a 20 20 .once.we.support.discussions....
1cba0 20 3b 3b 20 28 63 6f 6e 64 20 28 6e 6f 2d 69 6e 64 69 63 61 74 6f 72 20 6e 69 6c 29 0a 20 20 20 .;;.(cond.(no-indicator.nil)....
1cbc0 3b 3b 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 20 20 20 74 6f 70 69 63 ;;.......((forge-issue-p...topic
1cbe0 29 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 49 20 22 20 27 ).(magit--propertize-face."I.".'
1cc00 6d 61 67 69 74 2d 64 69 6d 6d 65 64 29 29 0a 20 20 20 3b 3b 20 20 20 20 20 20 20 28 28 66 6f 72 magit-dimmed))....;;.......((for
1cc20 67 65 2d 70 75 6c 6c 72 65 71 2d 70 20 74 6f 70 69 63 29 20 28 6d 61 67 69 74 2d 2d 70 72 6f 70 ge-pullreq-p.topic).(magit--prop
1cc40 65 72 74 69 7a 65 2d 66 61 63 65 20 22 50 20 22 20 27 6d 61 67 69 74 2d 64 69 6d 6d 65 64 29 29 ertize-face."P.".'magit-dimmed))
1cc60 0a 20 20 20 3b 3b 20 20 20 20 20 20 20 28 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....;;.......(t.................
1cc80 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 22 2a ......(magit--propertize-face."*
1cca0 20 22 20 27 65 72 72 6f 72 29 29 29 0a 20 20 20 28 73 74 72 69 6e 67 2d 70 61 64 20 28 66 6f 72 .".'error)))....(string-pad.(for
1ccc0 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 28 6f 72 ge--format-topic-slug.topic).(or
1cce0 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 66 6f 72 .width.5))...."."....(forge--for
1cd00 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 66 75 6e mat-topic-title.topic)))..(defun
1cd20 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 70 69 63 .forge--format-topic-slug.(topic
1cd40 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 74 61 74 )...(with-slots.(slug.state.stat
1cd60 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 2d 70 72 us.saved-p).topic.....(magit--pr
1cd80 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 60 28 2c opertize-face......slug......`(,
1cda0 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 28 66 6f @(and.saved-p...............'(fo
1cdc0 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 20 2c 40 rge-topic-slug-saved))........,@
1cde0 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 66 6f 72 (and.(eq.status.'unread)...'(for
1ce00 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 20 2c 28 ge-topic-slug-unread))........,(
1ce20 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 20 20 20 pcase.state...........('open....
1ce40 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 6c .................'forge-topic-sl
1ce60 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 65 74 ug-open)...........((or.'complet
1ce80 65 64 20 27 6d 65 72 67 65 64 29 20 20 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 67 2d ed.'merged)...'forge-topic-slug-
1cea0 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 61 completed)...........((or.'unpla
1cec0 6e 6e 65 64 20 27 72 65 6a 65 63 74 65 64 29 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 6c 75 nned.'rejected).'forge-topic-slu
1cee0 67 2d 75 6e 70 6c 61 6e 6e 65 64 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d g-unplanned))))))..(defun.forge-
1cf00 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
1cf20 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
1cf40 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
1cf60 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
1cf80 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.":".
1cfa0 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.
1cfc0 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
1cfe0 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
1d000 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...............
1d020 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
1d040 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).
1d060 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
1d080 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)........
1d0a0 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...........
1d0c0 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
1d0e0 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
1d100 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)....
1d120 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).........
1d140 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))))).
1d160 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
1d180 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
1d1a0 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
1d1c0 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
1d1e0 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))
1d200 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 74 69 )..(defun.forge--format-topic-ti
1d220 74 6c 65 20 28 74 6f 70 69 63 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 74 69 74 6c 65 tle.(topic)...(with-slots.(title
1d240 20 73 74 61 74 75 73 20 73 74 61 74 65 29 20 74 6f 70 69 63 0a 20 20 20 20 28 6d 61 67 69 74 2d .status.state).topic.....(magit-
1d260 6c 6f 67 2d 70 72 6f 70 65 72 74 69 7a 65 2d 6b 65 79 77 6f 72 64 73 0a 20 20 20 20 20 6e 69 6c log-propertize-keywords......nil
1d280 0a 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 0a 20 20 ......(magit--propertize-face...
1d2a0 20 20 20 20 74 69 74 6c 65 0a 20 20 20 20 20 20 60 28 2c 28 70 63 61 73 65 20 73 74 61 74 75 73 ....title.......`(,(pcase.status
1d2c0 0a 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 6e 6f 74 ............('unread..'forge-not
1d2e0 69 66 69 63 61 74 69 6f 6e 2d 75 6e 72 65 61 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 27 70 ification-unread)............('p
1d300 65 6e 64 69 6e 67 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 2d 70 65 6e 64 69 ending.'forge-notification-pendi
1d320 6e 67 29 0a 20 20 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 ng)............('done....'forge-
1d340 6e 6f 74 69 66 69 63 61 74 69 6f 6e 2d 64 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 2c 28 70 63 notification-done)).........,(pc
1d360 61 73 65 20 28 6c 69 73 74 20 28 65 69 65 69 6f 2d 6f 62 6a 65 63 74 2d 63 6c 61 73 73 20 74 6f ase.(list.(eieio-object-class.to
1d380 70 69 63 29 20 73 74 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 60 28 66 6f 72 67 65 2d pic).state)............(`(forge-
1d3a0 69 73 73 75 65 20 20 20 6f 70 65 6e 29 20 20 20 20 20 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d issue...open)......'forge-issue-
1d3c0 6f 70 65 6e 29 0a 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 open)............(`(forge-issue.
1d3e0 20 20 63 6f 6d 70 6c 65 74 65 64 29 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 63 6f 6d 70 6c 65 ..completed).'forge-issue-comple
1d400 74 65 64 29 0a 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 20 ted)............(`(forge-issue..
1d420 20 75 6e 70 6c 61 6e 6e 65 64 29 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 75 6e 70 6c 61 6e 6e .unplanned).'forge-issue-unplann
1d440 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 60 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 ed)............(`(forge-pullreq.
1d460 6f 70 65 6e 29 20 20 20 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 6f 70 65 6e 29 0a open)......'forge-pullreq-open).
1d480 20 20 20 20 20 20 20 20 20 20 20 28 60 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 6d 65 72 67 ...........(`(forge-pullreq.merg
1d4a0 65 64 29 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 29 0a 20 20 ed)....'forge-pullreq-merged)...
1d4c0 20 20 20 20 20 20 20 20 20 28 60 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 72 65 6a 65 63 74 .........(`(forge-pullreq.reject
1d4e0 65 64 29 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 ed)..'forge-pullreq-rejected))))
1d500 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-
1d520 74 69 74 6c 65 2b 6c 61 62 65 6c 73 20 28 74 6f 70 69 63 29 0a 20 20 28 63 6f 6e 63 61 74 20 28 title+labels.(topic)...(concat.(
1d540 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 74 69 74 6c 65 20 20 74 6f 70 69 63 forge--format-topic-title..topic
1d560 29 20 22 20 22 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 74 )."."...........(forge--format-t
1d580 6f 70 69 63 2d 6c 61 62 65 6c 73 20 74 6f 70 69 63 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 opic-labels.topic)))..(defun.for
1d5a0 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 70 69 ge--format-topic-milestone.(topi
1d5c0 63 29 0a 20 20 28 6f 72 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 69 64 20 28 6f 72 65 66 20 74 6f c)...(or.(and-let*.((id.(oref.to
1d5e0 70 69 63 20 6d 69 6c 65 73 74 6f 6e 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 61 61 72 20 28 pic.milestone))).........(caar.(
1d600 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 5b 74 69 74 6c 65 5d 20 3a 66 72 6f 6d forge-sql.[:select.[title].:from
1d620 20 6d 69 6c 65 73 74 6f 6e 65 20 3a 77 68 65 72 65 20 28 3d 20 69 64 20 24 73 31 29 5d 0a 20 20 .milestone.:where.(=.id.$s1)]...
1d640 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 0a 20 20 20 .......................id)))....
1d660 20 20 20 3b 3b 20 49 66 20 74 68 65 20 75 73 65 72 20 68 61 73 6e 27 74 20 70 75 6c 6c 65 64 20 ...;;.If.the.user.hasn't.pulled.
1d680 74 68 69 73 20 72 65 70 6f 73 69 74 6f 72 79 20 79 65 74 20 61 66 74 65 72 0a 20 20 20 20 20 20 this.repository.yet.after.......
1d6a0 3b 3b 20 75 70 64 61 74 69 6e 67 20 74 6f 20 64 62 20 76 37 2c 20 74 68 65 6e 20 6f 6e 6c 79 20 ;;.updating.to.db.v7,.then.only.
1d6c0 74 68 65 20 69 64 20 69 73 20 61 76 61 69 6c 61 62 6c 65 2e 0a 20 20 20 20 20 20 28 6f 72 65 66 the.id.is.available........(oref
1d6e0 20 74 6f 70 69 63 20 6d 69 6c 65 73 74 6f 6e 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 .topic.milestone)))..(defun.forg
1d700 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 73 20 28 74 6f 70 69 63 29 0a 20 e--format-topic-labels.(topic)..
1d720 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 6c 61 62 65 6c 73 20 28 63 6c 6f 73 71 6c 2d 2d 69 72 65 .(and-let*.((labels.(closql--ire
1d740 66 20 74 6f 70 69 63 20 27 6c 61 62 65 6c 73 29 29 29 0a 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 f.topic.'labels))).....(mapconca
1d760 74 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 63 6f 6c 6f 72 20 t.(pcase-lambda.(`(,name.,color.
1d780 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 20 20 20 20 20 ,_description)).................
1d7a0 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 65 2d 2d 73 61 6e 69 .(let*.((background.(forge--sani
1d7c0 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 20 20 20 20 20 20 20 tize-color.color))..............
1d7e0 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 65 67 72 6f 75 6e 64 20 28 66 6f 72 67 65 2d 2d 63 ...........(foreground.(forge--c
1d800 6f 6e 74 72 61 73 74 2d 63 6f 6c 6f 72 20 62 61 63 6b 67 72 6f 75 6e 64 29 29 29 0a 20 20 20 20 ontrast-color.background))).....
1d820 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 7a ...............(magit--propertiz
1d840 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 6e 61 6d 65 20 e-face.....................name.
1d860 60 28 66 6f 72 67 65 2d 74 61 62 6c 69 73 74 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 0a 20 20 20 20 `(forge-tablist-topic-label.....
1d880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 20 3a 62 61 63 6b 67 72 .......................(.:backgr
1d8a0 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 20 20 20 20 ound.,background................
1d8c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 2c 66 6f 72 65 67 ..............:foreground.,foreg
1d8e0 72 6f 75 6e 64 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6c 61 62 65 6c 73 round)))))................labels
1d900 20 22 20 22 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 .".")))..(defun.forge--format-to
1d920 70 69 63 2d 6c 61 62 65 6c 2d 63 68 6f 69 63 65 73 20 28 72 65 70 6f 29 0a 20 20 28 6d 61 70 63 pic-label-choices.(repo)...(mapc
1d940 61 72 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 ar.(pcase-lambda.(`(,_id.,name.,
1d960 63 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 color.,_description))...........
1d980 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 65 2d 2d 73 61 6e ..(let*.((background.(forge--san
1d9a0 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 20 20 20 20 20 20 itize-color.color)).............
1d9c0 20 20 20 20 20 20 20 28 66 6f 72 65 67 72 6f 75 6e 64 20 28 66 6f 72 67 65 2d 2d 63 6f 6e 74 72 .......(foreground.(forge--contr
1d9e0 61 73 74 2d 63 6f 6c 6f 72 20 62 61 63 6b 67 72 6f 75 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 ast-color.background))).........
1da00 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 0a 20 20 ......(magit--propertize-face...
1da20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 60 28 20 3a 62 61 63 6b 67 72 6f 75 6e 64 .............name.`(.:background
1da40 20 2c 62 61 63 6b 67 72 6f 75 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .,background....................
1da60 20 20 20 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 29 29 29 0a ....:foreground.,foreground)))).
1da80 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 6c 61 62 65 6c 73 29 29 29 0a 0a ..........(oref.repo.labels)))..
1daa0 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 6d 61 72 6b 73 (defun.forge--format-topic-marks
1dac0 20 28 74 6f 70 69 63 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 6d 61 72 6b 73 20 28 63 6c .(topic)...(and-let*.((marks.(cl
1dae0 6f 73 71 6c 2d 2d 69 72 65 66 20 74 6f 70 69 63 20 27 6d 61 72 6b 73 29 29 29 0a 20 20 20 20 28 osql--iref.topic.'marks))).....(
1db00 6d 61 70 63 6f 6e 63 61 74 20 28 70 63 61 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 6e 61 6d 65 mapconcat.(pcase-lambda.(`(,name
1db20 20 2c 66 61 63 65 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 .,face.,_description))..........
1db40 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 61 63 65 0a ........(magit--propertize-face.
1db60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 28 6c 69 73 74 20 27 66 6f ..................name.(list.'fo
1db80 72 67 65 2d 74 61 62 6c 69 73 74 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 20 66 61 63 65 29 29 29 0a rge-tablist-topic-label.face))).
1dba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 61 72 6b 73 20 22 20 22 29 29 29 0a 0a 28 64 65 ...............marks.".")))..(de
1dbc0 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 74 fun.forge--format-topic-state.(t
1dbe0 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 69 opic)...(with-slots.(state).topi
1dc00 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 20 c.....(magit--propertize-face...
1dc20 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 61 ...(symbol-name.state)......(pca
1dc40 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 69 se.(list.(if.(forge-issue-p.topi
1dc60 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 20 c).'issue.'pullreq).state)......
1dc80 20 20 28 27 28 69 73 73 75 65 20 20 20 6f 70 65 6e 29 20 20 20 20 20 20 27 66 6f 72 67 65 2d 69 ..('(issue...open)......'forge-i
1dca0 73 73 75 65 2d 6f 70 65 6e 29 0a 20 20 20 20 20 20 20 28 27 28 69 73 73 75 65 20 20 20 63 6c 6f ssue-open)........('(issue...clo
1dcc0 73 65 64 29 20 20 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 sed)....'forge-issue-completed).
1dce0 20 20 20 20 20 20 20 28 27 28 69 73 73 75 65 20 20 20 63 6f 6d 70 6c 65 74 65 64 29 20 27 66 6f .......('(issue...completed).'fo
1dd00 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 20 20 28 27 28 69 rge-issue-completed)........('(i
1dd20 73 73 75 65 20 20 20 75 6e 70 6c 61 6e 6e 65 64 29 20 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 75 ssue...unplanned).'forge-issue-u
1dd40 6e 70 6c 61 6e 6e 65 64 29 0a 20 20 20 20 20 20 20 28 27 28 70 75 6c 6c 72 65 71 20 6f 70 65 6e nplanned)........('(pullreq.open
1dd60 29 20 20 20 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 6f 70 65 6e 29 0a 20 20 20 20 )......'forge-pullreq-open).....
1dd80 20 20 20 28 27 28 70 75 6c 6c 72 65 71 20 6d 65 72 67 65 64 29 20 20 20 20 27 66 6f 72 67 65 2d ...('(pullreq.merged)....'forge-
1dda0 70 75 6c 6c 72 65 71 2d 6d 65 72 67 65 64 29 0a 20 20 20 20 20 20 20 28 27 28 70 75 6c 6c 72 65 pullreq-merged)........('(pullre
1ddc0 71 20 63 6c 6f 73 65 64 29 20 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 72 65 6a 65 q.closed)....'forge-pullreq-reje
1dde0 63 74 65 64 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 cted)))))..(defun.forge--format-
1de00 74 6f 70 69 63 2d 73 74 61 74 75 73 20 28 74 6f 70 69 63 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f topic-status.(topic)...(with-slo
1de20 74 73 20 28 73 74 61 74 75 73 29 20 74 6f 70 69 63 0a 20 20 20 20 28 6d 61 67 69 74 2d 2d 70 72 ts.(status).topic.....(magit--pr
1de40 6f 70 65 72 74 69 7a 65 2d 66 61 63 65 0a 20 20 20 20 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 opertize-face......(symbol-name.
1de60 73 74 61 74 75 73 29 0a 20 20 20 20 20 28 70 63 61 73 65 20 73 74 61 74 75 73 0a 20 20 20 20 20 status)......(pcase.status......
1de80 20 20 28 27 75 6e 72 65 61 64 20 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 2d ..('unread..'forge-notification-
1dea0 75 6e 72 65 61 64 29 0a 20 20 20 20 20 20 20 28 27 70 65 6e 64 69 6e 67 20 27 66 6f 72 67 65 2d unread)........('pending.'forge-
1dec0 6e 6f 74 69 66 69 63 61 74 69 6f 6e 2d 70 65 6e 64 69 6e 67 29 0a 20 20 20 20 20 20 20 28 27 64 notification-pending)........('d
1dee0 6f 6e 65 20 20 20 20 27 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 2d 64 6f 6e 65 29 one....'forge-notification-done)
1df00 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 69 63 ))))..(defun.forge--format-topic
1df20 2d 61 73 73 69 67 6e 65 65 73 20 28 74 6f 70 69 63 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 -assignees.(topic)...(and-let*.(
1df40 28 61 73 73 69 67 6e 65 65 73 20 28 63 6c 6f 73 71 6c 2d 2d 69 72 65 66 20 74 6f 70 69 63 20 27 (assignees.(closql--iref.topic.'
1df60 61 73 73 69 67 6e 65 65 73 29 29 29 0a 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 66 6f assignees))).....(mapconcat.#'fo
1df80 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 70 65 72 73 6f 6e 20 61 73 73 69 67 6e 65 65 73 20 22 2c 20 rge--format-person.assignees.",.
1dfa0 22 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 ")))..(defun.forge--format-topic
1dfc0 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 20 28 74 6f 70 69 63 29 0a 20 20 28 61 6e 64 2d -review-requests.(topic)...(and-
1dfe0 6c 65 74 2a 20 28 28 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 20 28 63 6c 6f 73 71 6c 2d 2d let*.((review-requests.(closql--
1e000 69 72 65 66 20 74 6f 70 69 63 20 27 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 29 29 29 0a 20 iref.topic.'review-requests)))..
1e020 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 70 65 ...(mapconcat.#'forge--format-pe
1e040 72 73 6f 6e 20 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 20 22 2c 20 22 29 29 29 0a 0a 28 64 rson.review-requests.",.")))..(d
1e060 65 66 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 efun.forge--format-person.(perso
1e080 6e 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 6c 6f 67 69 6e 20 2c 6e 61 6d 65 n)...(pcase-let.((`(,login.,name
1e0a0 29 20 70 65 72 73 6f 6e 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 20 28 40 25 ).person)).....(format."%s%s.(@%
1e0c0 73 29 22 0a 20 20 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 61 s)".............(forge--format-a
1e0e0 76 61 74 61 72 20 6c 6f 67 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 6c 6f vatar.login).............name.lo
1e100 67 69 6e 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 61 76 61 gin)))..(defun.forge--format-ava
1e120 74 61 72 20 28 70 65 72 73 6f 6e 29 0a 20 20 28 69 66 20 66 6f 72 67 65 2d 66 6f 72 6d 61 74 2d tar.(person)...(if.forge-format-
1e140 61 76 61 74 61 72 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 avatar-function.......(funcall.f
1e160 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 20 70 65 72 73 orge-format-avatar-function.pers
1e180 6f 6e 29 0a 20 20 20 20 22 22 29 29 0a 0a 3b 3b 3b 20 49 6e 73 65 72 74 0a 0a 28 64 65 66 75 6e on).....""))..;;;.Insert..(defun
1e1a0 20 66 6f 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 .forge--insert-topics.(type.head
1e1c0 69 6e 67 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 ing.topics)...(when.topics.....(
1e1e0 6c 65 74 20 28 28 77 69 64 74 68 20 28 61 70 70 6c 79 20 23 27 6d 61 78 20 28 2d 2d 6d 61 70 20 let.((width.(apply.#'max.(--map.
1e200 28 6c 65 6e 67 74 68 20 28 6f 72 65 66 20 69 74 20 73 6c 75 67 29 29 20 74 6f 70 69 63 73 29 29 (length.(oref.it.slug)).topics))
1e220 29 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 )).......(magit-insert-section.(
1e240 28 65 76 61 6c 20 74 79 70 65 29 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 28 6d 61 67 69 (eval.type).nil.t).........(magi
1e260 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 6f 6e 63 t-insert-heading...........(conc
1e280 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 6f 6e 63 at.(magit--propertize-face.(conc
1e2a0 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 20 20 20 at.heading.".").................
1e2c0 20 20 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 67 69 74 ..........................'magit
1e2e0 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 20 20 20 -section-heading)...............
1e300 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 66 6f 72 ....(magit--propertize-face.(for
1e320 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 20 20 20 mat."(%s)".(length.topics)).....
1e340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1e360 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 75 6e 74 ......'magit-section-child-count
1e380 29 29 29 0a 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 6d 61 6b 65 2d 6d 61 72 67 69 6e 2d 6f ))).........(magit-make-margin-o
1e3a0 76 65 72 6c 61 79 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 verlay.nil.t).........(magit-ins
1e3c0 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 64 6f 6c 69 ert-section-body...........(doli
1e3e0 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 28 66 st.(topic.topics).............(f
1e400 6f 72 67 65 2d 2d 69 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 orge--insert-topic.topic.width))
1e420 0a 20 20 20 20 20 20 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 ...........(insert.?\n).........
1e440 20 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 ..(magit-make-margin-overlay.nil
1e460 20 74 29 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 74 2d 74 .t))))))..(defun.forge--insert-t
1e480 6f 70 69 63 20 28 74 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 opic.(topic.&optional.width)...(
1e4a0 6d 61 67 69 74 2d 69 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 magit-insert-section.((eval.(ore
1e4c0 66 20 74 6f 70 69 63 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 f.topic.closql-table)).topic.t).
1e4e0 20 20 20 20 28 69 6e 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 ....(insert.(forge--format-topic
1e500 2d 6c 69 6e 65 20 74 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 -line.topic.(or.width.5))).....(
1e520 66 6f 72 67 65 2d 2d 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 forge--insert-topic-marks.topic.
1e540 74 29 0a 20 20 20 20 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 t).....(forge--insert-topic-labe
1e560 6c 73 20 74 6f 70 69 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 ls.topic.t).....(insert."\n")...
1e580 20 20 28 6d 61 67 69 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 ..(magit-log-format-author-margi
1e5a0 6e 0a 20 20 20 20 20 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 n......(oref.topic.author)......
1e5c0 28 66 6f 72 6d 61 74 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 (format-time-string."%s".(parse-
1e5e0 69 73 6f 38 36 30 31 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 iso8601-time-string.(oref.topic.
1e600 63 72 65 61 74 65 64 29 29 29 0a 20 20 20 20 20 74 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e created)))......t).....(when.(an
1e620 64 20 28 73 6c 6f 74 2d 65 78 69 73 74 73 2d 70 20 74 6f 70 69 63 20 27 6d 65 72 67 65 64 29 0a d.(slot-exists-p.topic.'merged).
1e640 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 20 74 6f 70 69 63 20 ...............(not.(oref.topic.
1e660 6d 65 72 67 65 64 29 29 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 68 65 merged))).......(magit-insert-he
1e680 61 64 69 6e 67 29 0a 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 ading).......(forge--insert-pull
1e6a0 72 65 71 2d 63 6f 6d 6d 69 74 73 20 74 6f 70 69 63 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f req-commits.topic))))..(defun.fo
1e6c0 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 28 74 6f 70 69 63 20 rge--insert-topic-labels.(topic.
1e6e0 26 6f 70 74 69 6f 6e 61 6c 20 73 65 70 61 72 61 74 65 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 &optional.separate)...(and-let*.
1e700 28 28 6c 61 62 65 6c 73 20 28 63 6c 6f 73 71 6c 2d 2d 69 72 65 66 20 74 6f 70 69 63 20 27 6c 61 ((labels.(closql--iref.topic.'la
1e720 62 65 6c 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 bels))).....(prog1.t.......(pcas
1e740 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 6e 61 6d 65 20 2c 63 6f 6c 6f 72 20 2c 64 65 73 63 72 69 e-dolist.(`(,name.,color.,descri
1e760 70 74 69 6f 6e 29 20 6c 61 62 65 6c 73 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 62 ption).labels).........(let*.((b
1e780 61 63 6b 67 72 6f 75 6e 64 20 28 66 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 63 6f 6c 6f 72 ackground.(forge--sanitize-color
1e7a0 20 63 6f 6c 6f 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 65 67 72 6f .color))................(foregro
1e7c0 75 6e 64 20 28 66 6f 72 67 65 2d 2d 63 6f 6e 74 72 61 73 74 2d 63 6f 6c 6f 72 20 62 61 63 6b 67 und.(forge--contrast-color.backg
1e7e0 72 6f 75 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 65 70 61 72 61 74 65 20 round)))...........(if.separate.
1e800 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 74 65 20 74 29 29 0a (insert.".").(setq.separate.t)).
1e820 20 20 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 20 20 20 20 20 ..........(insert.name).........
1e840 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 70 6f 69 ..(let.((o.(make-overlay.(-.(poi
1e860 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 0a 20 20 nt).(length.name)).(point))))...
1e880 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 69 ..........(overlay-put.o.'priori
1e8a0 74 79 20 32 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 ty.2).............(overlay-put.o
1e8c0 20 27 65 76 61 70 6f 72 61 74 65 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 .'evaporate.t).............(over
1e8e0 6c 61 79 2d 70 75 74 20 6f 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 0a 20 20 20 20 20 20 lay-put.o.'font-lock-face.......
1e900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 20 3a 62 61 63 6b 67 72 6f 75 ...................`((.:backgrou
1e920 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 20 20 20 20 20 20 nd.,background..................
1e940 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 2c 66 6f 72 65 67 72 6f ............:foreground.,foregro
1e960 75 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 und)............................
1e980 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 20 20 20 forge-topic-label)).............
1e9a0 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 20 20 (when.description...............
1e9c0 28 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 (overlay-put.o.'help-echo.descri
1e9e0 70 74 69 6f 6e 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 69 6e 73 ption))))))))..(defun.forge--ins
1ea00 65 72 74 2d 74 6f 70 69 63 2d 6d 61 72 6b 73 20 28 74 6f 70 69 63 20 26 6f 70 74 69 6f 6e 61 6c ert-topic-marks.(topic.&optional
1ea20 20 73 65 70 61 72 61 74 65 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 6d 61 72 6b 73 20 28 .separate)...(and-let*.((marks.(
1ea40 63 6c 6f 73 71 6c 2d 2d 69 72 65 66 20 74 6f 70 69 63 20 27 6d 61 72 6b 73 29 29 29 0a 20 20 20 closql--iref.topic.'marks)))....
1ea60 20 28 70 72 6f 67 31 20 74 0a 20 20 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 .(prog1.t.......(pcase-dolist.(`
1ea80 28 2c 6e 61 6d 65 20 2c 66 61 63 65 20 2c 64 65 73 63 72 69 70 74 69 6f 6e 29 20 6d 61 72 6b 73 (,name.,face.,description).marks
1eaa0 29 0a 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 ).........(if.separate.(insert."
1eac0 20 22 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 28 .").(setq.separate.t)).........(
1eae0 69 6e 73 65 72 74 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6f 20 28 6d insert.name).........(let.((o.(m
1eb00 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 20 6e ake-overlay.(-.(point).(length.n
1eb20 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 28 6f 76 65 72 ame)).(point))))...........(over
1eb40 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 20 20 20 20 lay-put.o.'priority.2)..........
1eb60 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 20 74 29 0a 20 20 .(overlay-put.o.'evaporate.t)...
1eb80 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 20 27 66 6f 6e 74 2d 6c 6f 63 ........(overlay-put.o.'font-loc
1eba0 6b 2d 66 61 63 65 20 28 6c 69 73 74 20 66 61 63 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c k-face.(list.face.'forge-topic-l
1ebc0 61 62 65 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 64 65 73 63 72 69 70 74 69 abel))...........(when.descripti
1ebe0 6f 6e 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 68 on.............(overlay-put.o.'h
1ec00 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 29 0a 0a 28 64 65 elp-echo.description)))))))..(de
1ec20 66 75 6e 20 66 6f 72 67 65 2d 2d 61 73 73 65 72 74 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 73 2d fun.forge--assert-insert-topics-
1ec40 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 73 73 75 65 73 get-repository.(&optional.issues
1ec60 2d 70 29 0a 20 20 28 61 6e 64 20 28 66 6f 72 67 65 2d 64 62 20 74 29 0a 20 20 20 20 20 20 20 28 -p)...(and.(forge-db.t)........(
1ec80 6f 72 20 66 6f 72 67 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 or.forge-display-in-status-buffe
1eca0 72 0a 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 r............(not.(eq.major-mode
1ecc0 20 27 6d 61 67 69 74 2d 73 74 61 74 75 73 2d 6d 6f 64 65 29 29 29 0a 20 20 20 20 20 20 20 28 61 .'magit-status-mode)))........(a
1ece0 6e 64 2d 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 70 6f 73 69 nd-let*.((repo.(forge-get-reposi
1ed00 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 3f 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 tory.:tracked?)))..........(and.
1ed20 28 6f 72 20 28 6e 6f 74 20 69 73 73 75 65 73 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 (or.(not.issues-p)..............
1ed40 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 69 73 73 75 65 73 2d 70 29 29 0a 20 20 20 20 20 .....(oref.repo.issues-p))......
1ed60 20 20 20 20 20 20 20 20 20 72 65 70 6f 29 29 29 29 0a 0a 3b 3b 3b 20 4d 6f 64 65 73 0a 0a 28 64 .........repo))))..;;;.Modes..(d
1ed80 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 65 63 74 69 6f 6e 2d efvar-keymap.forge-post-section-
1eda0 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 74 2d 74 68 69 6e 67 map..."<remap>.<magit-edit-thing
1edc0 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 22 43 2d 63 20 43 2d >"...#'forge-edit-post..."C-c.C-
1ede0 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 27 66 6f 72 67 65 2d k"......................#'forge-
1ee00 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 6b 65 79 6d 61 70 20 delete-comment)..(defvar-keymap.
1ee20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 22 3c 72 65 6d 61 70 3e 20 forge-topic-mode-map..."<remap>.
1ee40 3c 6d 61 67 69 74 2d 76 69 73 69 74 2d 74 68 69 6e 67 3e 22 20 20 23 27 6d 61 72 6b 64 6f 77 6e <magit-visit-thing>"..#'markdown
1ee60 2d 66 6f 6c 6c 6f 77 2d 6c 69 6e 6b 2d 61 74 2d 70 6f 69 6e 74 0a 20 20 22 3c 6d 6f 75 73 65 2d -follow-link-at-point..."<mouse-
1ee80 32 3e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 6d 61 72 6b 64 6f 77 2>"....................#'markdow
1eea0 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 22 43 2d 63 20 43 2d n-follow-link-at-point..."C-c.C-
1eec0 6d 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 2d m"......................#'forge-
1eee0 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 20 20 20 20 20 20 20 topic-menu..."C-c.C-n"..........
1ef00 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 65 2d 70 6f 73 74 0a ............#'forge-create-post.
1ef20 20 20 22 43 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 .."C-c.C-r".....................
1ef40 20 23 27 66 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 .#'forge-create-post)..(define-d
1ef60 65 72 69 76 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 erived-mode.forge-topic-mode.mag
1ef80 69 74 2d 6d 6f 64 65 20 22 54 6f 70 69 63 22 0a 20 20 22 50 61 72 65 6e 74 20 6d 6f 64 65 20 6f it-mode."Topic"..."Parent.mode.o
1efa0 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 2e 0a f.`forge-{issue,pullreq}-mode'..
1efc0 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 20 64 This.mode.itself.is.never.used.d
1efe0 69 72 65 63 74 6c 79 2e 22 0a 20 20 28 66 61 63 65 2d 72 65 6d 61 70 2d 61 64 64 2d 72 65 6c 61 irectly."...(face-remap-add-rela
1f000 74 69 76 65 20 27 68 65 61 64 65 72 2d 6c 69 6e 65 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 68 tive.'header-line.'forge-topic-h
1f020 65 61 64 65 72 2d 6c 69 6e 65 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 6d 61 72 6b 64 6f eader-line)...(setq-local.markdo
1f040 77 6e 2d 74 72 61 6e 73 6c 61 74 65 2d 66 69 6c 65 6e 61 6d 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 wn-translate-filename-function..
1f060 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 2d 6d 61 72 6b 64 6f 77 6e 2d 74 .............#'forge--markdown-t
1f080 72 61 6e 73 6c 61 74 65 2d 66 69 6c 65 6e 61 6d 65 2d 66 75 6e 63 74 69 6f 6e 29 29 0a 0a 28 64 ranslate-filename-function))..(d
1f0a0 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 65 2d 6d efine-derived-mode.forge-issue-m
1f0c0 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 20 20 22 ode.forge-topic-mode."Issue"..."
1f0e0 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 65 20 69 73 73 75 Mode.for.looking.at.a.Forge.issu
1f100 65 2e 22 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 73 65 74 75 e.").(defalias.'forge-issue-setu
1f120 70 2d 62 75 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 p-buffer...#'forge-topic-setup-b
1f140 75 66 66 65 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 uffer).(defalias.'forge-issue-re
1f160 66 72 65 73 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 fresh-buffer.#'forge-topic-refre
1f180 73 68 2d 62 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 sh-buffer).(defvar.forge-issue-h
1f1a0 65 61 64 65 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 eaders-hook...'(forge-insert-top
1f1c0 69 63 2d 73 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 ic-state.....forge-insert-topic-
1f1e0 73 74 61 74 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 status.....forge-insert-topic-mi
1f200 6c 65 73 74 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 lestone.....forge-insert-topic-l
1f220 61 62 65 6c 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 abels.....forge-insert-topic-mar
1f240 6b 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 61 73 73 69 67 6e ks.....forge-insert-topic-assign
1f260 65 65 73 29 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 ees))..(define-derived-mode.forg
1f280 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.
1f2a0 22 50 75 6c 6c 2d 72 65 71 75 65 73 74 22 0a 20 20 22 4d 6f 64 65 20 66 6f 72 20 6c 6f 6f 6b 69 "Pull-request"..."Mode.for.looki
1f2c0 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 2e 22 29 0a 28 64 ng.at.a.Forge.pull-request.").(d
1f2e0 65 66 61 6c 69 61 73 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 efalias.'forge-pullreq-setup-buf
1f300 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 72 fer...#'forge-topic-setup-buffer
1f320 29 0a 28 64 65 66 61 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 ).(defalias.'forge-pullreq-refre
1f340 73 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 sh-buffer.#'forge-topic-refresh-
1f360 62 75 66 66 65 72 29 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 buffer).(defvar.forge-pullreq-he
1f380 61 64 65 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 aders-hook...'(forge-insert-topi
1f3a0 63 2d 73 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 c-state.....forge-insert-topic-s
1f3c0 74 61 74 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 64 72 61 tatus.....forge-insert-topic-dra
1f3e0 66 74 0a 20 20 20 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 72 65 66 73 0a 20 ft.....forge-insert-topic-refs..
1f400 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 6f 6e 65 0a ...forge-insert-topic-milestone.
1f420 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 20 ....forge-insert-topic-labels...
1f440 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 20 20 20 66 ..forge-insert-topic-marks.....f
1f460 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 0a 20 20 20 20 orge-insert-topic-assignees.....
1f480 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 forge-insert-topic-review-reques
1f4a0 74 73 29 29 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 ts))..(defvar-local.forge-buffer
1f4c0 2d 74 6f 70 69 63 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d -topic.nil)..(defun.forge-topic-
1f4e0 73 65 74 75 70 2d 62 75 66 66 65 72 20 28 74 6f 70 69 63 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 setup-buffer.(topic)...(let*.((r
1f500 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 74 6f 70 69 63 29 epo.(forge-get-repository.topic)
1f520 29 0a 20 20 20 20 20 20 20 20 20 28 6e 61 6d 65 20 28 66 6f 72 6d 61 74 20 22 2a 66 6f 72 67 65 )..........(name.(format."*forge
1f540 3a 20 25 73 20 25 73 2a 22 20 28 6f 72 65 66 20 72 65 70 6f 20 73 6c 75 67 29 20 28 6f 72 65 66 :.%s.%s*".(oref.repo.slug).(oref
1f560 20 74 6f 70 69 63 20 73 6c 75 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 .topic.slug)))..........(magit-g
1f580 65 6e 65 72 61 74 65 2d 62 75 66 66 65 72 2d 6e 61 6d 65 2d 66 75 6e 63 74 69 6f 6e 20 28 6c 61 enerate-buffer-name-function.(la
1f5a0 6d 62 64 61 20 28 5f 6d 6f 64 65 20 5f 76 61 6c 75 65 29 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 mbda.(_mode._value).name))......
1f5c0 20 20 20 20 28 63 75 72 72 65 6e 74 2d 72 65 70 6f 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 ....(current-repo.(forge-get-rep
1f5e0 6f 73 69 74 6f 72 79 20 3a 6b 6e 6f 77 6e 3f 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 61 ository.:known?))..........(defa
1f600 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 69 66 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 ult-directory.(if.(forge-reposit
1f620 6f 72 79 2d 65 71 75 61 6c 20 63 75 72 72 65 6e 74 2d 72 65 70 6f 20 72 65 70 6f 29 0a 20 20 20 ory-equal.current-repo.repo)....
1f640 20 20 20 20 20 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 65 66 .............................def
1f660 61 75 6c 74 2d 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 ault-directory..................
1f680 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 66 6f 72 67 65 2d 67 65 74 2d 77 6f 72 6b .............(or.(forge-get-work
1f6a0 74 72 65 65 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 tree.repo)......................
1f6c0 20 20 20 20 20 20 20 20 20 20 20 20 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 .............default-directory))
1f6e0 29 29 0a 20 20 20 20 28 6d 61 67 69 74 2d 73 65 74 75 70 2d 62 75 66 66 65 72 2d 69 6e 74 65 72 )).....(magit-setup-buffer-inter
1f700 6e 61 6c 0a 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 69 nal......(if.(forge-issue-p.topi
1f720 63 29 20 23 27 66 6f 72 67 65 2d 69 73 73 75 65 2d 6d 6f 64 65 20 23 27 66 6f 72 67 65 2d 70 75 c).#'forge-issue-mode.#'forge-pu
1f740 6c 6c 72 65 71 2d 6d 6f 64 65 29 0a 20 20 20 20 20 74 20 60 28 28 66 6f 72 67 65 2d 62 75 66 66 llreq-mode)......t.`((forge-buff
1f760 65 72 2d 74 6f 70 69 63 20 2c 74 6f 70 69 63 29 29 20 6e 61 6d 65 29 0a 20 20 20 20 28 66 6f 72 er-topic.,topic)).name).....(for
1f780 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 29 29 0a 0a 28 64 65 ge-topic-mark-read.topic)))..(de
1f7a0 66 75 6e 20 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 20 28 fun.forge-topic-refresh-buffer.(
1f7c0 29 0a 20 20 28 6c 65 74 20 28 28 74 6f 70 69 63 20 28 63 6c 6f 73 71 6c 2d 72 65 6c 6f 61 64 20 )...(let.((topic.(closql-reload.
1f7e0 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 73 65 74 71 20 forge-buffer-topic))).....(setq.
1f800 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 74 6f 70 69 63 20 74 6f 70 69 63 29 0a 20 20 20 20 28 6d forge-buffer-topic.topic).....(m
1f820 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 28 66 6f 72 agit-set-header-line-format.(for
1f840 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 29 29 0a 20 20 ge--format-topic-line.topic))...
1f860 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 70 69 63 62 75 ..(magit-insert-section.(topicbu
1f880 66 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e 73 65 72 74 2d 68 65 61 64 65 72 73 0a 20 f).......(magit-insert-headers..
1f8a0 20 20 20 20 20 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 2d 68 65 61 64 65 72 ......(intern.(format."%s-header
1f8c0 73 2d 68 6f 6f 6b 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 28 s-hook"........................(
1f8e0 73 75 62 73 74 72 69 6e 67 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 6d 61 6a 6f 72 2d 6d 6f 64 substring.(symbol-name.major-mod
1f900 65 29 20 30 20 2d 35 29 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 6f 72 67 65 2d 70 e).0.-5)))).......(when.(forge-p
1f920 75 6c 6c 72 65 71 2d 70 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 ullreq-p.topic).........(magit-i
1f940 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 20 28 70 75 6c 6c 72 65 71 20 74 6f 70 69 63 29 0a 20 20 nsert-section.(pullreq.topic)...
1f960 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 64 69 6e 67 20 22 43 ........(magit-insert-heading."C
1f980 6f 6d 6d 69 74 73 22 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 ommits")...........(forge--inser
1f9a0 74 2d 70 75 6c 6c 72 65 71 2d 63 6f 6d 6d 69 74 73 20 74 6f 70 69 63 20 74 29 29 29 0a 20 20 20 t-pullreq-commits.topic.t)))....
1f9c0 20 20 20 28 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 ...(when-let.((note.(oref.topic.
1f9e0 6e 6f 74 65 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 note))).........(magit-insert-se
1fa00 63 74 69 6f 6e 20 28 6e 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 69 6e ction.(note)...........(magit-in
1fa20 73 65 72 74 2d 68 65 61 64 69 6e 67 20 22 4e 6f 74 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 sert-heading."Note")...........(
1fa40 69 6e 73 65 72 74 20 28 66 6f 72 67 65 2d 2d 66 6f 6e 74 69 66 79 2d 6d 61 72 6b 64 6f 77 6e 20 insert.(forge--fontify-markdown.
1fa60 6e 6f 74 65 29 20 22 5c 6e 5c 6e 22 29 29 29 0a 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 70 note)."\n\n"))).......(dolist.(p
1fa80 6f 73 74 20 28 63 6f 6e 73 20 74 6f 70 69 63 20 28 6f 72 65 66 20 74 6f 70 69 63 20 70 6f 73 74 ost.(cons.topic.(oref.topic.post
1faa0 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 61 75 74 68 6f 72 s))).........(with-slots.(author
1fac0 20 63 72 65 61 74 65 64 20 62 6f 64 79 29 20 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 28 6d .created.body).post...........(m
1fae0 61 67 69 74 2d 69 6e 73 65 72 74 2d 73 65 63 74 69 6f 6e 20 73 65 63 74 69 6f 6e 20 28 70 6f 73 agit-insert-section.section.(pos
1fb00 74 20 70 6f 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 73 65 63 74 69 6f t.post).............(oset.sectio
1fb20 6e 20 68 65 61 64 69 6e 67 2d 68 69 67 68 6c 69 67 68 74 2d 66 61 63 65 0a 20 20 20 20 20 20 20 n.heading-highlight-face........
1fb40 20 20 20 20 20 20 20 20 20 20 20 27 6d 61 67 69 74 2d 64 69 66 66 2d 68 75 6e 6b 2d 68 65 61 64 ...........'magit-diff-hunk-head
1fb60 69 6e 67 2d 68 69 67 68 6c 69 67 68 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 ing-highlight).............(let.
1fb80 28 28 68 65 61 64 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f ((heading....................(fo
1fba0 72 6d 61 74 2d 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 66 6f rmat-spec.....................fo
1fbc0 72 67 65 2d 70 6f 73 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 rge-post-heading-format.........
1fbe0 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 3f 61 20 2e 20 2c 28 70 72 6f 70 65 72 74 69 7a 65 ............`((?a...,(propertize
1fc00 20 28 63 6f 6e 63 61 74 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 61 76 61 74 61 72 20 61 .(concat.(forge--format-avatar.a
1fc20 75 74 68 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 uthor)..........................
1fc40 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 61 75 74 68 ........................(or.auth
1fc60 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 20 20 20 20 20 20 20 or."(ghost)"))..................
1fc80 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 6e 74 2d 6c 6f ........................'font-lo
1fca0 63 6b 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 ck-face.'forge-post-author))....
1fcc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 63 20 2e 20 2c 28 70 72 6f 70 65 ...................(?c...,(prope
1fce0 72 74 69 7a 65 20 63 72 65 61 74 65 64 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 20 27 66 rtize.created.'font-lock-face.'f
1fd00 6f 72 67 65 2d 70 6f 73 74 2d 64 61 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 orge-post-date))................
1fd20 20 20 20 20 20 20 20 28 3f 43 20 2e 20 2c 28 70 72 6f 70 65 72 74 69 7a 65 20 28 61 70 70 6c 79 .......(?C...,(propertize.(apply
1fd40 20 23 27 66 6f 72 6d 61 74 20 22 25 73 20 25 73 20 61 67 6f 22 0a 20 20 20 20 20 20 20 20 20 20 .#'format."%s.%s.ago"...........
1fd60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1fd80 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 20 20 20 ......(magit--age...............
1fda0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1fdc0 20 20 20 28 66 6c 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 ...(float-time..................
1fde0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1fe00 20 28 64 61 74 65 2d 74 6f 2d 74 69 6d 65 20 63 72 65 61 74 65 64 29 29 29 29 0a 20 20 20 20 20 .(date-to-time.created))))......
1fe20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1fe40 20 20 20 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 ....'font-lock-face.'forge-post-
1fe60 64 61 74 65 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 6e 74 2d 6c date))))))...............(font-l
1fe80 6f 63 6b 2d 61 70 70 65 6e 64 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 0a 20 20 20 20 20 20 20 ock-append-text-property........
1fea0 20 20 20 20 20 20 20 20 30 20 28 6c 65 6e 67 74 68 20 68 65 61 64 69 6e 67 29 0a 20 20 20 20 20 ........0.(length.heading)......
1fec0 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 6d 61 67 69 74 ..........'font-lock-face.'magit
1fee0 2d 64 69 66 66 2d 68 75 6e 6b 2d 68 65 61 64 69 6e 67 20 68 65 61 64 69 6e 67 29 0a 20 20 20 20 -diff-hunk-heading.heading).....
1ff00 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 64 69 6e 67 20 ..........(magit-insert-heading.
1ff20 68 65 61 64 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 heading)).............(insert.(f
1ff40 6f 72 67 65 2d 2d 66 6f 6e 74 69 66 79 2d 6d 61 72 6b 64 6f 77 6e 20 62 6f 64 79 29 20 22 5c 6e orge--fontify-markdown.body)."\n
1ff60 5c 6e 22 29 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 64 69 73 70 6c 61 \n")))).......(when.(and.(displa
1ff80 79 2d 69 6d 61 67 65 73 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 62 y-images-p)..................(fb
1ffa0 6f 75 6e 64 70 20 27 6d 61 72 6b 64 6f 77 6e 2d 64 69 73 70 6c 61 79 2d 69 6e 6c 69 6e 65 2d 69 oundp.'markdown-display-inline-i
1ffc0 6d 61 67 65 73 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 61 72 6b 64 6f 77 6e 2d mages)).........(let.((markdown-
1ffe0 64 69 73 70 6c 61 79 2d 72 65 6d 6f 74 65 2d 69 6d 61 67 65 73 20 74 29 29 0a 20 20 20 20 20 20 display-remote-images.t)).......
20000 20 20 20 20 28 6d 61 72 6b 64 6f 77 6e 2d 64 69 73 70 6c 61 79 2d 69 6e 6c 69 6e 65 2d 69 6d 61 ....(markdown-display-inline-ima
20020 67 65 73 29 29 29 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 ges))))))..(cl-defmethod.magit-b
20040 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 6d 6f 64 uffer-value.(&context.(major-mod
20060 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 66 6f 72 e.forge-topic-mode))...(oref.for
20080 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 48 65 61 64 ge-buffer-topic.slug))..;;;.Head
200a0 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 65 2d ers..(cl-defmacro.forge--define-
200c0 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 73 65 topic-header.....(name.&key.inse
200e0 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 3f 29 rt.format.(command.nil.command?)
20100 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 20 28 )...(declare.(indent.defun))...(
20120 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 67 65 let.((fun.(intern.(format."forge
20140 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 20 20 -insert-topic-%s".name))).......
20160 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 74 6f ..(map.(intern.(format."forge-to
20180 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 20 20 pic-%s-section-map".name))).....
201a0 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 65 2d ....(cmd.(intern.(format."forge-
201c0 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 72 6f topic-set-%s".name)))).....`(pro
201e0 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 69 6f gn........(cl-defun.,fun.(&optio
20200 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 29 0a nal.(topic.forge-buffer-topic)).
20220 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 20 28 .........(magit-insert-section.(
20240 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 6d 65 ,(intern.(format."topic-%s".name
20260 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 61 6c )))............(insert.,(capital
20280 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 20 6e ize.(string-pad.(format."%s:.".n
202a0 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 20 20 ame).11)))............,(cond....
202c0 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 20 20 ..........(insert...............
202e0 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 63 29 `(unless.(funcall.,insert.topic)
20300 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 69 74 ..................(insert.(magit
20320 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 74 2d --propertize-face."none".'magit-
20340 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 74 0a dimmed))))..............(format.
20360 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 6e 63 ..............`(insert.(or.(func
20380 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 20 20 all.,format.topic)..............
203a0 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 7a 65 ..............(magit--propertize
203c0 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 29 0a -face."none".'magit-dimmed))))).
203e0 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 20 20 ...........(insert.?\n))).......
20400 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 29 0a .,@(and.(if.command?.command.t).
20420 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 20 2c ..............`((defvar-keymap.,
20440 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 3e 22 map."<remap>.<magit-edit-thing>"
20460 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 ................................
20480 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 29 0a ,(or.command.`(function.,cmd))).
204a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 74 20 27 2c 66 75 6e 20 27 64 65 66 69 ................(put.',fun.'defi
204c0 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 70 75 nition-name.',name)))........(pu
204e0 74 20 27 2c 6d 61 70 20 27 64 65 66 69 6e 69 74 69 6f 6e 2d 6e 61 6d 65 20 27 2c 6e 61 6d 65 29 t.',map.'definition-name.',name)
20500 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 65 72 )))..(forge--define-topic-header
20520 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 20 23 .refs...:command.nil...:format.#
20540 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 6f 72 'forge--format-topic-refs)..(for
20560 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 20 20 ge--define-topic-header.draft...
20580 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 64 72 :command.#'forge-topic-toggle-dr
205a0 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 74 6f aft...:format.#'forge--format-to
205c0 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 69 63 pic-draft)..(forge--define-topic
205e0 2d 68 65 61 64 65 72 20 73 74 61 74 65 0a 20 20 3a 63 6f 6d 6d 61 6e 64 20 23 27 66 6f 72 67 65 -header.state...:command.#'forge
20600 2d 74 6f 70 69 63 2d 73 74 61 74 65 2d 6d 65 6e 75 0a 20 20 3a 66 6f 72 6d 61 74 20 23 27 66 6f -topic-state-menu...:format.#'fo
20620 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 73 74 61 74 65 29 0a 0a 28 66 6f 72 67 65 rge--format-topic-state)..(forge
20640 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 75 73 0a 20 20 3a --define-topic-header.status...:
20660 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 75 73 2d 6d 65 6e command.#'forge-topic-status-men
20680 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 70 69 u...:format.#'forge--format-topi
206a0 63 2d 73 74 61 74 75 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-status)..(forge--define-topic-
206c0 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 6f 72 header.milestone...:format.#'for
206e0 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 66 6f ge--format-topic-milestone)..(fo
20700 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 73 0a rge--define-topic-header.labels.
20720 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 63 2d ..:insert.#'forge--insert-topic-
20740 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 68 65 labels)..(forge--define-topic-he
20760 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 69 6e ader.marks...:insert.#'forge--in
20780 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 69 6e sert-topic-marks)..(forge--defin
207a0 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 72 6d e-topic-header.assignees...:form
207c0 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 6e 65 at.#'forge--format-topic-assigne
207e0 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 65 72 es)..(forge--define-topic-header
20800 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 6f 72 .review-requests...:format.#'for
20820 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 74 73 ge--format-topic-review-requests
20840 29 0a 0a 3b 3b 3b 20 43 6f 6d 6d 61 6e 64 73 0a 3b 3b 3b 3b 20 4d 65 6e 75 73 0a 0a 28 64 65 66 )..;;;.Commands.;;;;.Menus..(def
20860 63 6f 6e 73 74 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 const.forge--topic-set-state-gro
20880 75 70 0a 20 20 5b 22 53 65 74 20 73 74 61 74 65 22 0a 20 20 20 28 22 73 20 6f 22 20 66 6f 72 67 up...["Set.state"....("s.o".forg
208a0 65 2d 74 6f 70 69 63 2d 73 74 61 74 65 2d 73 65 74 2d 6f 70 65 6e 29 0a 20 20 20 28 22 73 20 63 e-topic-state-set-open)....("s.c
208c0 22 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 73 74 61 74 65 2d 73 65 74 2d 63 6f 6d 70 6c 65 74 65 ".forge-issue-state-set-complete
208e0 64 29 0a 20 20 20 28 22 73 20 75 22 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 73 74 61 74 65 2d 73 d)....("s.u".forge-issue-state-s
20900 65 74 2d 75 6e 70 6c 61 6e 6e 65 64 29 0a 20 20 20 28 22 73 20 6d 22 20 66 6f 72 67 65 2d 70 75 et-unplanned)....("s.m".forge-pu
20920 6c 6c 72 65 71 2d 73 74 61 74 65 2d 73 65 74 2d 6d 65 72 67 65 64 29 0a 20 20 20 28 22 73 20 72 llreq-state-set-merged)....("s.r
20940 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 72 65 6a 65 63 74 ".forge-pullreq-state-set-reject
20960 65 64 29 0a 20 20 20 22 22 5d 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 66 6f 72 67 65 2d 2d 74 6f ed)....""])..(defconst.forge--to
20980 70 69 63 2d 73 65 74 2d 73 74 61 74 75 73 2d 67 72 6f 75 70 0a 20 20 5b 22 53 65 74 20 73 74 61 pic-set-status-group...["Set.sta
209a0 74 75 73 22 0a 20 20 20 28 22 73 20 69 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 75 tus"....("s.i".forge-topic-statu
209c0 73 2d 73 65 74 2d 75 6e 72 65 61 64 29 0a 20 20 20 28 22 73 20 70 22 20 66 6f 72 67 65 2d 74 6f s-set-unread)....("s.p".forge-to
209e0 70 69 63 2d 73 74 61 74 75 73 2d 73 65 74 2d 70 65 6e 64 69 6e 67 29 0a 20 20 20 28 22 73 20 64 pic-status-set-pending)....("s.d
20a00 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 64 6f 6e 65 29 5d 29 ".forge-topic-status-set-done)])
20a20 0a 0a 28 64 65 66 63 6f 6e 73 74 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f ..(defconst.forge--topic-set-slo
20a40 74 73 2d 67 72 6f 75 70 0a 20 20 5b 22 53 65 74 22 0a 20 20 20 28 22 65 20 74 22 20 66 6f 72 67 ts-group...["Set"....("e.t".forg
20a60 65 2d 74 6f 70 69 63 2d 73 65 74 2d 74 69 74 6c 65 29 0a 20 20 20 28 22 65 20 6d 22 20 66 6f 72 e-topic-set-title)....("e.m".for
20a80 67 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 28 22 65 20 6c ge-topic-set-milestone)....("e.l
20aa0 22 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 28 22 65 ".forge-topic-set-labels)....("e
20ac0 20 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)..
20ae0 20 20 28 22 65 20 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 ..("e.r".forge-topic-set-review-
20b00 72 65 71 75 65 73 74 73 29 0a 20 20 20 28 22 65 20 64 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d requests)....("e.d".forge-topic-
20b20 74 6f 67 67 6c 65 2d 64 72 61 66 74 29 5d 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 66 6f 72 67 65 toggle-draft)])..(defconst.forge
20b40 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 6c 6f 63 61 6c 2d 67 72 6f 75 70 0a 20 20 5b 22 53 65 74 20 --topic-set-local-group...["Set.
20b60 6c 6f 63 61 6c 22 0a 20 20 20 28 22 6c 20 73 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 74 6f 67 local"....("l.s".forge-topic-tog
20b80 67 6c 65 2d 73 61 76 65 64 29 0a 20 20 20 28 22 6c 20 6d 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 gle-saved)....("l.m".forge-topic
20ba0 2d 73 65 74 2d 6d 61 72 6b 73 29 0a 20 20 20 28 22 6c 20 6e 22 20 66 6f 72 67 65 2d 65 64 69 74 -set-marks)....("l.n".forge-edit
20bc0 2d 74 6f 70 69 63 2d 6e 6f 74 65 29 5d 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 66 6f 72 67 65 2d -topic-note)])..(defconst.forge-
20be0 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 27 28 31 39 29 -topic-menus-column-widths.'(19)
20c00 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 )..;;;###autoload.(autoload.'for
20c20 67 65 2d 74 6f 70 69 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 ge-topic-menu."forge-topic".nil.
20c40 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 78 20 66 6f 72 67 t).(transient-define-prefix.forg
20c60 65 2d 74 6f 70 69 63 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 e-topic-menu.()..."Edit.the.topi
20c80 63 20 61 74 20 70 6f 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 c.at.point."...:transient-suffix
20ca0 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 74 0a 20 20 3a .t...:transient-non-suffix.t...:
20cc0 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
20ce0 66 72 65 73 68 2d 73 75 66 66 69 78 65 73 20 74 0a 20 20 3a 63 6f 6c 75 6d 6e 2d 77 69 64 74 68 fresh-suffixes.t...:column-width
20d00 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 74 s.forge--topic-menus-column-widt
20d20 68 73 0a 20 20 5b 3a 68 69 64 65 20 61 6c 77 61 79 73 0a 20 20 20 28 22 71 22 20 66 6f 72 67 65 hs...[:hide.always....("q".forge
20d40 2d 6d 65 6e 75 2d 71 75 69 74 2d 6c 69 73 74 29 5d 0a 20 20 5b 5b 22 41 63 74 69 6f 6e 73 22 0a -menu-quit-list)]...[["Actions".
20d60 20 20 20 20 28 22 66 22 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 74 68 69 73 2d 74 6f 70 69 63 29 0a ....("f".forge-pull-this-topic).
20d80 20 20 20 20 28 22 62 22 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 74 68 69 73 2d 74 6f 70 69 63 ....("b".forge-browse-this-topic
20da0 29 0a 20 20 20 20 28 22 6b 22 20 66 6f 72 67 65 2d 64 65 6c 65 74 65 2d 63 6f 6d 6d 65 6e 74 29 ).....("k".forge-delete-comment)
20dc0 0a 20 20 20 20 28 22 70 22 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 2d 66 .....("p".forge-create-pullreq-f
20de0 72 6f 6d 2d 69 73 73 75 65 29 0a 20 20 20 20 28 22 6d 22 20 22 73 68 6f 77 20 6d 6f 72 65 20 61 rom-issue).....("m"."show.more.a
20e00 63 74 69 6f 6e 73 22 20 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 29 5d 5d 0a 20 20 5b 66 6f 72 ctions".forge-dispatch)]]...[for
20e20 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 20 66 6f 72 ge--topic-set-state-group....for
20e40 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 73 6c 6f 74 73 2d 67 72 6f 75 70 5d 0a 20 20 5b 66 6f ge--topic-set-slots-group]...[fo
20e60 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 0a 20 20 20 66 rge--topic-set-status-group....f
20e80 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 74 2d 6c 6f 63 61 6c 2d 67 72 6f 75 70 5d 0a 20 20 28 orge--topic-set-local-group]...(
20ea0 69 6e 74 65 72 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 interactive)...(unless.(derived-
20ec0 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 0a 20 20 20 20 28 69 mode-p.'forge-topic-mode).....(i
20ee0 66 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 74 2d 70 6f f-let.((topic.(forge-topic-at-po
20f00 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 75 int))).........(forge-topic-setu
20f20 70 2d 62 75 66 66 65 72 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f p-buffer.topic).......(user-erro
20f40 72 20 22 4e 6f 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 22 29 29 29 0a 20 20 28 74 72 61 6e 73 r."No.current.topic")))...(trans
20f60 69 65 6e 74 2d 73 65 74 75 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 29 0a 0a ient-setup.'forge-topic-menu))..
20f80 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d ;;;###autoload.(autoload.'forge-
20fa0 74 6f 70 69 63 2d 73 74 61 74 65 2d 6d 65 6e 75 20 22 66 6f 72 67 65 2d 74 6f 70 69 63 22 20 6e topic-state-menu."forge-topic".n
20fc0 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 78 20 66 il.t).(transient-define-prefix.f
20fe0 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 65 2d 6d 65 6e 75 20 28 29 0a 20 20 22 53 65 74 20 orge-topic-state-menu.()..."Set.
21000 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 2e 22 0a 20 20 5b state.of.the.current.topic."...[
21020 28 22 6f 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 65 2d 73 65 74 2d 6f 70 65 6e 29 ("o".forge-topic-state-set-open)
21040 0a 20 20 20 28 22 63 22 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 73 74 61 74 65 2d 73 65 74 2d 63 ....("c".forge-issue-state-set-c
21060 6f 6d 70 6c 65 74 65 64 29 0a 20 20 20 28 22 75 22 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 73 74 ompleted)....("u".forge-issue-st
21080 61 74 65 2d 73 65 74 2d 75 6e 70 6c 61 6e 6e 65 64 29 0a 20 20 20 28 22 6d 22 20 66 6f 72 67 65 ate-set-unplanned)....("m".forge
210a0 2d 70 75 6c 6c 72 65 71 2d 73 74 61 74 65 2d 73 65 74 2d 6d 65 72 67 65 64 29 0a 20 20 20 28 22 -pullreq-state-set-merged)....("
210c0 72 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 72 65 6a 65 63 r".forge-pullreq-state-set-rejec
210e0 74 65 64 29 5d 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 ted)])..;;;###autoload.(autoload
21100 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 75 73 2d 6d 65 6e 75 20 22 66 6f 72 67 65 .'forge-topic-status-menu."forge
21120 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 66 69 6e 65 -topic".nil.t).(transient-define
21140 2d 70 72 65 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 75 73 2d 6d 65 6e 75 20 -prefix.forge-topic-status-menu.
21160 28 29 0a 20 20 22 53 65 74 20 73 74 61 74 75 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 ()..."Set.status.of.the.current.
21180 74 6f 70 69 63 2e 22 0a 20 20 5b 28 22 69 22 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 topic."...[("i".forge-topic-stat
211a0 75 73 2d 73 65 74 2d 75 6e 72 65 61 64 29 0a 20 20 20 28 22 70 22 20 66 6f 72 67 65 2d 74 6f 70 us-set-unread)....("p".forge-top
211c0 69 63 2d 73 74 61 74 75 73 2d 73 65 74 2d 70 65 6e 64 69 6e 67 29 0a 20 20 20 28 22 64 22 20 66 ic-status-set-pending)....("d".f
211e0 6f 72 67 65 2d 74 6f 70 69 63 2d 73 74 61 74 75 73 2d 73 65 74 2d 64 6f 6e 65 29 5d 29 0a 0a 3b orge-topic-status-set-done)])..;
21200 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 2d 74 6f 70 69 ;;;.State..(defclass.forge--topi
21220 63 2d 73 65 74 2d 73 74 61 74 65 2d 63 6f 6d 6d 61 6e 64 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 c-set-state-command.(transient-s
21240 75 66 66 69 78 29 0a 20 20 28 28 73 74 61 74 65 20 3a 69 6e 69 74 61 72 67 20 3a 73 74 61 74 65 uffix)...((state.:initarg.:state
21260 29 0a 20 20 20 28 67 65 74 74 65 72 20 3a 69 6e 69 74 61 72 67 20 3a 67 65 74 74 65 72 29 0a 20 )....(getter.:initarg.:getter)..
21280 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 6c 61 6d ..(definition.....:initform.(lam
212a0 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 61 63 74 bda.().................(interact
212c0 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 6f 74 73 ive).................(with-slots
212e0 20 28 67 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 .(getter.state).(transient-suffi
21300 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 6c 65 74 x-object)...................(let
21320 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 29 29 29 0a 20 20 .((topic.(funcall.getter.t)))...
21340 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 2d 74 6f ..................(forge--set-to
21360 70 69 63 2d 73 74 61 74 65 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 pic-state.(forge-get-repository.
21380 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 20 topic)..........................
213a0 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 73 74 61 74 65 29 29 ...................topic.state))
213c0 29 29 29 0a 20 20 20 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 )))....(description.....:initfor
213e0 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 20 m.(lambda.(obj).................
21400 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 6f 72 65 66 20 6f 62 6a 20 73 74 61 74 65 29 29 29 29 (symbol-name.(oref.obj.state))))
21420 0a 20 20 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 ....(inapt-if.....:initform.(lam
21440 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 66 6f 72 67 bda.().................(or.(forg
21460 65 2d 72 65 67 69 6f 6e 2d 74 6f 70 69 63 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-region-topics)................
21480 20 20 20 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 .....(with-slots.(getter.state).
214a0 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 20 20 20 20 (transient-suffix-object).......
214c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 74 6f 70 69 63 20 ................(if-let.((topic.
214e0 28 66 75 6e 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 (funcall.getter)))..............
21500 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4f 6e 63 65 20 61 20 70 75 6c 6c 2d 72 65 71 75 .............;;.Once.a.pull-requ
21520 65 73 74 20 69 73 20 6d 65 72 67 65 64 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 est.is.merged,..................
21540 20 20 20 20 20 20 20 20 20 3b 3b 20 69 74 73 20 73 74 61 74 65 20 63 61 6e 6e 6f 74 20 62 65 20 .........;;.its.state.cannot.be.
21560 63 68 61 6e 67 65 64 20 61 6e 79 6d 6f 72 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 changed.anymore.................
21580 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 28 6f 72 65 66 20 74 6f 70 69 63 20 73 74 61 ...........(memq.(oref.topic.sta
215a0 74 65 29 20 28 6c 69 73 74 20 73 74 61 74 65 20 27 6d 65 72 67 65 64 29 29 0a 20 20 20 20 20 20 te).(list.state.'merged)).......
215c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 29 29 29 29 29 0a 20 20 20 28 69 6e 61 ..................t)))))....(ina
215e0 70 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 6f pt-face.....:initform.(lambda.(o
21600 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 6f 74 73 20 bj).................(with-slots.
21620 28 67 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 (getter.state).(transient-suffix
21640 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 20 28 -object)...................(if.(
21660 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 70 69 63 73 29 29 0a and.(not.(forge-region-topics)).
21680 20 20 20 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 2d ...........................(and-
216a0 6c 65 74 2a 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))).
216c0 20 20 20 20 20 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
216e0 20 28 6f 72 65 66 20 74 6f 70 69 63 20 73 74 61 74 65 29 20 73 74 61 74 65 29 29 29 0a 20 20 20 .(oref.topic.state).state)))....
21700 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 61 63 74 69 76 65 ...................'forge-active
21720 2d 73 75 66 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 74 72 61 -suffix.....................'tra
21740 6e 73 69 65 6e 74 2d 69 6e 61 70 74 2d 73 75 66 66 69 78 29 29 29 29 29 29 0a 0a 28 74 72 61 6e nsient-inapt-suffix))))))..(tran
21760 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-
21780 73 74 61 74 65 2d 73 65 74 2d 6f 70 65 6e 20 28 29 0a 20 20 22 53 65 74 20 74 68 65 20 73 74 61 state-set-open.()..."Set.the.sta
217a0 74 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 20 74 6f 20 60 6f 70 65 6e te.of.the.current.topic.to.`open
217c0 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 2d 73 65 74 2d 73 '."...:class.'forge--topic-set-s
217e0 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 0a 20 20 3a 67 tate-command...:state.'open...:g
21800 65 74 74 65 72 20 23 27 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 29 0a 0a 28 74 etter.#'forge-current-topic)..(t
21820 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 69 73 73 ransient-define-suffix.forge-iss
21840 75 65 2d 73 74 61 74 65 2d 73 65 74 2d 63 6f 6d 70 6c 65 74 65 64 20 28 29 0a 20 20 22 53 65 74 ue-state-set-completed.()..."Set
21860 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 69 73 73 75 65 20 .the.state.of.the.current.issue.
21880 74 6f 20 60 63 6f 6d 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 to.`completed'."...:class.'forge
218a0 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 0a 20 20 3a 73 74 61 --topic-set-state-command...:sta
218c0 74 65 20 27 63 6f 6d 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 te.'completed...:getter.#'forge-
218e0 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 74 2d 64 65 66 69 6e current-issue)..(transient-defin
21900 65 2d 73 75 66 66 69 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 e-suffix.forge-issue-state-set-u
21920 6e 70 6c 61 6e 6e 65 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 nplanned.()..."Set.the.state.of.
21940 74 68 65 20 63 75 72 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 the.current.issue.to.`unplanned'
21960 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 74 ."...:class.'forge--topic-set-st
21980 61 74 65 2d 63 6f 6d 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 ate-command...:state.'unplanned.
219a0 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 69 73 73 75 65 29 ..:getter.#'forge-current-issue)
219c0 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
219e0 2d 70 75 6c 6c 72 65 71 2d 73 74 61 74 65 2d 73 65 74 2d 6d 65 72 67 65 64 20 28 29 0a 20 20 22 -pullreq-state-set-merged.()..."
21a00 49 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 20 69 73 20 6d If.the.current.pull-request.is.m
21a20 65 72 67 65 64 2c 20 74 68 65 6e 20 76 69 73 75 61 6c 69 7a 65 20 74 68 61 74 2e 22 0a 20 20 3a erged,.then.visualize.that."...:
21a40 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 2d 63 6f class.'forge--topic-set-state-co
21a60 6d 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 mmand...:state.'merged...:getter
21a80 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 28 69 6e 74 65 .#'forge-current-pullreq...(inte
21aa0 72 61 63 74 69 76 65 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 50 6c 65 61 73 65 20 75 73 65 20 ractive)...(message."Please.use.
21ac0 61 20 6d 65 72 67 65 20 63 6f 6d 6d 61 6e 64 20 66 6f 72 20 74 68 69 73 22 29 29 0a 0a 28 74 72 a.merge.command.for.this"))..(tr
21ae0 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 6c 6c ansient-define-suffix.forge-pull
21b00 72 65 71 2d 73 74 61 74 65 2d 73 65 74 2d 72 65 6a 65 63 74 65 64 20 28 29 0a 20 20 22 53 65 74 req-state-set-rejected.()..."Set
21b20 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 70 75 6c 6c 2d 72 .the.state.of.the.current.pull-r
21b40 65 71 75 65 73 74 20 74 6f 20 60 72 65 6a 65 63 74 65 64 27 2e 22 0a 20 20 3a 63 6c 61 73 73 20 equest.to.`rejected'."...:class.
21b60 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 6e 64 0a 'forge--topic-set-state-command.
21b80 20 20 3a 73 74 61 74 65 20 27 72 65 6a 65 63 74 65 64 0a 20 20 3a 67 65 74 74 65 72 20 23 27 66 ..:state.'rejected...:getter.#'f
21ba0 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 3b 3b 20 53 74 61 74 orge-current-pullreq)..;;;;.Stat
21bc0 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 63 2d 73 65 74 2d 73 us..(defclass.forge--topic-set-s
21be0 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 73 75 66 66 69 78 29 tatus-command.(transient-suffix)
21c00 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 74 75 73 29 0a 20 20 ...((status.:initarg.:status)...
21c20 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 6c 61 6d 62 .(definition.....:initform.(lamb
21c40 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 61 63 74 69 da.().................(interacti
21c60 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 6f 74 73 20 ve).................(with-slots.
21c80 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 78 2d 6f 62 6a 65 63 (status).(transient-suffix-objec
21ca0 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 6c 65 74 20 28 28 74 t)...................(if-let.((t
21cc0 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 73 29 29 29 0a 20 20 opics.(forge-region-topics)))...
21ce0 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 73 74 20 28 74 6f 70 ....................(dolist.(top
21d00 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 20 20 20 20 20 20 20 ic.topics)......................
21d20 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 74 75 73 29 29 0a 20 ...(oset.topic.status.status))..
21d40 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 28 66 6f 72 67 65 2d ...................(oset.(forge-
21d60 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 74 61 74 75 73 29 29 current-topic.t).status.status))
21d80 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 72 65 73 68 ).................(forge-refresh
21da0 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 6e 0a 20 20 20 20 3a -buffer)))....(description.....:
21dc0 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 20 20 20 20 20 20 initform.(lambda.(obj)..........
21de0 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 6f 62 6a 20 73 74 .......(symbol-name.(oref.obj.st
21e00 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 20 3a 69 6e 69 74 66 atus))))....(inapt-if.....:initf
21e20 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 20 20 20 28 orm.(lambda.().................(
21e40 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 70 69 63 73 29 29 0a and.(not.(forge-region-topics)).
21e60 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 6c 65 74 20 28 28 74 .....................(if-let.((t
21e80 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 29 29 29 0a 20 20 20 opic.(forge-current-topic)))....
21ea0 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 20 28 6f 72 65 66 20 ......................(eq.(oref.
21ec0 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 20 20 20 20 20 20 20 topic.status)...................
21ee0 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 6e 74 2d 73 75 66 66 ...........(oref.(transient-suff
21f00 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 20 20 20 20 20 20 20 ix-object).status)).............
21f20 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 74 2d 66 61 63 65 0a ...........t))))....(inapt-face.
21f40 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 20 20 20 20 20 ....:initform.(lambda.()........
21f60 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 6e 74 2d 74 6f 70 69 .........(if.(forge-current-topi
21f80 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 6f 72 67 65 2d 61 63 c).....................'forge-ac
21fa0 74 69 76 65 2d 73 75 66 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 74 tive-suffix...................'t
21fc0 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 29 0a 0a 28 74 72 61 ransient-inapt-suffix)))))..(tra
21fe0 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
22000 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 53 65 74 20 74 68 65 -status-set-unread.()..."Set.the
22020 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
22040 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 20 3a 63 6c 61 73 73 ent.topic.to.`unread'."...:class
22060 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 6e .'forge--topic-set-status-comman
22080 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 73 69 65 6e 74 2d 64 d.:status.'unread)..(transient-d
220a0 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 73 2d efine-suffix.forge-topic-status-
220c0 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 20 6e 6f 74 69 66 69 set-pending.()..."Set.the.notifi
220e0 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 65 6e 74 20 74 6f 70 cation.status.of.the.current.top
22100 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 73 20 27 66 6f 72 67 ic.to.`pending'."...:class.'forg
22120 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 6e 64 20 3a 73 74 61 e--topic-set-status-command.:sta
22140 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 2d 64 65 66 69 6e 65 tus.'pending)..(transient-define
22160 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 73 2d 73 65 74 2d 64 -suffix.forge-topic-status-set-d
22180 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 61 74 69 6f 6e 20 73 one.()..."Set.the.notification.s
221a0 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 63 20 74 6f 20 60 64 tatus.of.the.current.topic.to.`d
221c0 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 6f 70 69 63 2d 73 65 one'."...:class.'forge--topic-se
221e0 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 27 64 6f 6e 65 29 0a t-status-command.:status.'done).
22200 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 65 2d 2d 74 6f 70 69 .;;;;.Set..(defclass.forge--topi
22220 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 69 65 6e 74 2d 73 75 c-set-slot-command.(transient-su
22240 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 73 6c 6f 74 29 0a 20 ffix)...((slot.:initarg.:slot)..
22260 20 20 28 73 65 74 74 65 72 29 0a 20 20 20 28 72 65 61 64 65 72 29 0a 20 20 20 28 66 6f 72 6d 61 ..(setter)....(reader)....(forma
22280 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 28 64 65 tter.:initarg.:formatter)....(de
222a0 66 69 6e 69 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 finition.....:initform.(lambda.(
222c0 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 value).................(interact
222e0 69 76 65 0a 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 75 6e 63 ive..................(list.(func
22300 61 6c 6c 20 28 6f 72 65 66 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 69 78 2d 6f 62 6a 65 all.(oref.(transient-suffix-obje
22320 63 74 29 20 72 65 61 64 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ct).reader).....................
22340 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 74 2d 74 6f 70 69 63 ............(forge-current-topic
22360 20 74 29 29 29 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 74 6f .t)))).................(let.((to
22380 70 69 63 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 0a 20 20 pic.(forge-current-topic.t)))...
223a0 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 28 6f 72 65 66 20 28 ................(funcall.(oref.(
223c0 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 65 74 74 65 72 29 transient-suffix-object).setter)
223e0 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
22400 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 20 20 20 20 20 20 ge-get-repository.topic)........
22420 20 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 76 61 6c 75 65 29 ....................topic.value)
22440 29 29 29 0a 20 20 20 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 )))....(description.....:initfor
22460 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 20 m.(lambda.(obj).................
22480 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 73 6c 6f 74 20 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 29 20 (with-slots.(slot.inapt-if-not).
224a0 6f 62 6a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 2d 6c 65 74 2a 20 28 obj...................(if-let*.(
224c0 28 74 6f 70 69 63 20 28 69 66 20 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 0a 20 20 20 20 20 20 20 20 (topic.(if.inapt-if-not.........
224e0 20 20 20 20 20 20 20 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 ...............................(
22500 66 75 6e 63 61 6c 6c 20 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 29 0a 20 20 20 20 20 20 20 20 20 20 funcall.inapt-if-not)...........
22520 20 20 20 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
22540 65 2d 63 75 72 72 65 6e 74 2d 74 6f 70 69 63 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 e-current-topic)))).............
22560 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 0a 20 ..........(format."%s.%s".slot..
22580 20 20 20 20 20 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 .............................(or
225a0 20 28 66 75 6e 63 61 6c 6c 20 28 6f 72 65 66 20 6f 62 6a 20 66 6f 72 6d 61 74 74 65 72 29 20 74 .(funcall.(oref.obj.formatter).t
225c0 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 20 20 opic)...........................
225e0 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 6e 6f 6e 65 22 20 27 66 61 63 65 ........(propertize."none".'face
22600 20 27 6d 61 67 69 74 2d 64 69 6d 6d 65 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .'magit-dimmed)))...............
22620 20 20 20 20 20 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 0a 0a ......(format."%s".slot)))))))..
22640 28 63 6c 2d 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 (cl-defmethod.initialize-instanc
22660 65 20 3a 61 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 2d 73 65 e.:after...((obj.forge--topic-se
22680 74 2d 73 6c 6f 74 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 t-slot-command).&optional._slots
226a0 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 73 6c 6f 74 29 20 6f 62 6a 0a 20 20 20 20 28 )...(with-slots.(slot).obj.....(
226c0 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 6f 72 6d 61 74 20 oset.obj.reader.(intern.(format.
226e0 22 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 25 73 22 20 73 6c 6f 74 29 29 29 0a 20 20 "forge-read-topic-%s".slot)))...
22700 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 6f 72 6d ..(oset.obj.setter.(intern.(form
22720 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 73 6c 6f 74 29 29 29 at."forge--set-topic-%s".slot)))
22740 0a 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 62 6a 20 27 66 .....(unless.(slot-boundp.obj.'f
22760 6f 72 6d 61 74 74 65 72 29 0a 20 20 20 20 20 20 28 6f 73 65 74 20 6f 62 6a 20 66 6f 72 6d 61 74 ormatter).......(oset.obj.format
22780 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 65 2d 2d 66 6f 72 6d ter.(intern.(format."forge--form
227a0 61 74 2d 74 6f 70 69 63 2d 25 73 22 20 73 6c 6f 74 29 29 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 at-topic-%s".slot))))))..(transi
227c0 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 73 65 ent-define-suffix.forge-topic-se
227e0 74 2d 74 69 74 6c 65 20 28 74 69 74 6c 65 29 0a 20 20 22 45 64 69 74 20 74 68 65 20 54 49 54 4c t-title.(title)..."Edit.the.TITL
22800 45 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 61 73 E.of.the.current.topic."...:clas
22820 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 6e 64 s.'forge--topic-set-slot-command
22840 20 3a 73 6c 6f 74 20 27 74 69 74 6c 65 0a 20 20 3a 66 6f 72 6d 61 74 74 65 72 20 28 6c 61 6d 62 .:slot.'title...:formatter.(lamb
22860 64 61 20 28 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 da.(topic)................(prope
22880 72 74 69 7a 65 20 28 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 74 69 74 6c 65 rtize.(forge--format-topic-title
228a0 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).........................
228c0 20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 74 72 69 6e 67 2d 66 61 63 65 29 ...'face.'font-lock-string-face)
228e0 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
22900 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 65 73 74 6f 6e ge-topic-set-milestone.(mileston
22920 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 68 65 20 63 75 e)..."Edit.what.MILESTONE.the.cu
22940 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 3a 63 6c 61 73 rrent.topic.belongs.to."...:clas
22960 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 6e 64 s.'forge--topic-set-slot-command
22980 20 3a 73 6c 6f 74 20 27 6d 69 6c 65 73 74 6f 6e 65 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 .:slot.'milestone)..(transient-d
229a0 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 6c 61 62 efine-suffix.forge-topic-set-lab
229c0 65 6c 73 20 28 6c 61 62 65 6c 73 29 0a 20 20 22 45 64 69 74 20 74 68 65 20 4c 41 42 45 4c 53 20 els.(labels)..."Edit.the.LABELS.
229e0 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 61 73 73 20 of.the.current.topic."...:class.
22a00 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 6e 64 20 3a 'forge--topic-set-slot-command.:
22a20 73 6c 6f 74 20 27 6c 61 62 65 6c 73 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 slot.'labels)..(transient-define
22a40 2d 73 75 66 66 69 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 -suffix.forge-topic-set-marks.(m
22a60 61 72 6b 73 29 0a 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 arks)..."Edit.the.MARKS.of.the.c
22a80 75 72 72 65 6e 74 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 urrent.topic."...:class.'forge--
22aa0 74 6f 70 69 63 2d 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 topic-set-slot-command.:slot.'ma
22ac0 72 6b 73 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 rks)..(transient-define-suffix.f
22ae0 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 2d 61 73 73 69 67 6e 65 65 73 20 28 61 73 73 69 67 6e orge-topic-set-assignees.(assign
22b00 65 65 73 29 0a 20 20 22 45 64 69 74 20 74 68 65 20 41 53 53 49 47 4e 45 45 53 20 6f 66 20 74 68 ees)..."Edit.the.ASSIGNEES.of.th
22b20 65 20 63 75 72 72 65 6e 74 20 74 6f 70 69 63 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 e.current.topic."...:class.'forg
22b40 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 3a 73 6c 6f 74 20 e--topic-set-slot-command.:slot.
22b60 27 61 73 73 69 67 6e 65 65 73 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 73 'assignees)..(transient-define-s
22b80 75 66 66 69 78 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 73 65 74 2d 72 65 76 69 65 77 2d 72 65 71 uffix.forge-topic-set-review-req
22ba0 75 65 73 74 73 20 28 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 29 0a 20 20 22 45 64 69 74 20 uests.(review-requests)..."Edit.
22bc0 74 68 65 20 52 45 56 49 45 57 2d 52 45 51 55 45 53 54 53 20 6f 66 20 74 68 65 20 63 75 72 72 65 the.REVIEW-REQUESTS.of.the.curre
22be0 6e 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 nt.pull-request."...:class.'forg
22c00 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 3a 73 6c 6f 74 20 e--topic-set-slot-command.:slot.
22c20 27 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f 74 'review-requests...:inapt-if-not
22c40 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 28 74 72 61 6e .#'forge-current-pullreq)..(tran
22c60 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-
22c80 74 6f 67 67 6c 65 2d 64 72 61 66 74 20 28 29 0a 20 20 22 54 6f 67 67 6c 65 20 77 68 65 74 68 65 toggle-draft.()..."Toggle.whethe
22ca0 72 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 69 73 20 61 20 r.the.current.pull-request.is.a.
22cc0 64 72 61 66 74 2e 22 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 draft."...:inapt-if-not.#'forge-
22ce0 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 current-pullreq...:description..
22d00 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 70 75 6c 6c 72 65 .(lambda.().....(if-let.((pullre
22d20 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 29 0a 20 20 20 20 q.(forge-current-pullreq))).....
22d40 20 20 20 20 28 66 6f 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 ....(format.(propertize."[%s]".'
22d60 66 61 63 65 20 27 74 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 face.'transient-delimiter)......
22d80 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 27 ...........(propertize."draft".'
22da0 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 20 face............................
22dc0 20 28 69 66 20 28 6f 72 65 66 20 70 75 6c 6c 72 65 71 20 64 72 61 66 74 2d 70 29 0a 20 20 20 20 .(if.(oref.pullreq.draft-p).....
22de0 20 20 20 20 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 74 72 61 ............................'tra
22e00 6e 73 69 65 6e 74 2d 76 61 6c 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nsient-value....................
22e20 20 20 20 20 20 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 ...........'transient-inactive-v
22e40 61 6c 75 65 29 29 29 0a 20 20 20 20 20 20 22 5b 64 72 61 66 74 5d 22 29 29 0a 20 20 28 69 6e 74 alue)))......."[draft]"))...(int
22e60 65 72 61 63 74 69 76 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 eractive)...(let.((pullreq.(forg
22e80 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 20 74 29 29 29 0a 20 20 20 20 28 6f 73 65 74 e-current-pullreq.t))).....(oset
22ea0 20 70 75 6c 6c 72 65 71 20 64 72 61 66 74 2d 70 20 28 6e 6f 74 20 28 6f 72 65 66 20 70 75 6c 6c .pullreq.draft-p.(not.(oref.pull
22ec0 72 65 71 20 64 72 61 66 74 2d 70 29 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 68 req.draft-p))))...(forge-refresh
22ee0 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
22f00 66 69 78 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 20 28 29 0a fix.forge-topic-toggle-saved.().
22f20 20 20 22 54 6f 67 67 6c 65 20 77 68 65 74 68 65 72 20 74 68 69 73 20 74 6f 70 69 63 20 69 73 20 .."Toggle.whether.this.topic.is.
22f40 6d 61 72 6b 65 64 20 61 73 20 73 61 76 65 64 2e 22 0a 20 20 3a 69 6e 61 70 74 2d 69 66 2d 6e 6f marked.as.saved."...:inapt-if-no
22f60 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 63 72 t.#'forge-current-topic...:descr
22f80 69 70 74 69 6f 6e 0a 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 28 69 66 2d 6c 65 74 20 iption...(lambda.().....(if-let.
22fa0 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 29 29 29 0a ((topic.(forge-current-topic))).
22fc0 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 5b 25 73 ........(format.(propertize."[%s
22fe0 5d 22 20 27 66 61 63 65 20 27 74 72 61 6e 73 69 65 6e 74 2d 64 65 6c 69 6d 69 74 65 72 29 0a 20 ]".'face.'transient-delimiter)..
23000 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 22 73 61 76 65 ...............(propertize."save
23020 64 22 20 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 d".'face........................
23040 20 20 20 20 20 28 69 66 20 28 6f 72 65 66 20 74 6f 70 69 63 20 73 61 76 65 64 2d 70 29 0a 20 20 .....(if.(oref.topic.saved-p)...
23060 20 20 20 20 20 20 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 74 ..............................'t
23080 72 61 6e 73 69 65 6e 74 2d 76 61 6c 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ransient-value..................
230a0 20 20 20 20 20 20 20 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 .............'transient-inactive
230c0 2d 76 61 6c 75 65 29 29 29 0a 20 20 20 20 20 20 22 5b 73 61 76 65 64 5d 22 29 29 0a 20 20 28 69 -value)))......."[saved]"))...(i
230e0 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
23100 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 6f 73 65 74 20 74 e-current-topic.t))).....(oset.t
23120 6f 70 69 63 20 73 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 opic.saved-p.(not.(oref.topic.sa
23140 76 65 64 2d 70 29 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 ved-p))))...(forge-refresh-buffe
23160 72 29 29 0a 0a 3b 3b 3b 20 43 6f 6c 6f 72 20 55 74 69 6c 69 74 69 65 73 0a 0a 28 64 65 66 75 6e r))..;;;.Color.Utilities..(defun
23180 20 66 6f 72 67 65 2d 2d 73 61 6e 69 74 69 7a 65 2d 63 6f 6c 6f 72 20 28 63 6f 6c 6f 72 29 0a 20 .forge--sanitize-color.(color)..
231a0 20 28 63 6f 6e 64 20 28 28 63 6f 6c 6f 72 2d 76 61 6c 75 65 73 20 63 6f 6c 6f 72 29 20 63 6f 6c .(cond.((color-values.color).col
231c0 6f 72 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 44 69 73 63 61 72 64 20 61 6c 70 68 61 20 69 6e 66 or).........;;.Discard.alpha.inf
231e0 6f 72 6d 61 74 69 6f 6e 2e 0a 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 ormation..........((string-match
23200 2d 70 20 22 5c 5c 60 23 2e 5c 5c 7b 34 5c 5c 7d 5c 5c 27 22 20 63 6f 6c 6f 72 29 20 28 73 75 62 -p."\\`#.\\{4\\}\\'".color).(sub
23220 73 74 72 69 6e 67 20 63 6f 6c 6f 72 20 30 20 33 29 29 0a 20 20 20 20 20 20 20 20 28 28 73 74 72 string.color.0.3)).........((str
23240 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 60 23 2e 5c 5c 7b 38 5c 5c 7d 5c 5c 27 22 20 63 6f ing-match-p."\\`#.\\{8\\}\\'".co
23260 6c 6f 72 29 20 28 73 75 62 73 74 72 69 6e 67 20 63 6f 6c 6f 72 20 30 20 36 29 29 0a 20 20 20 20 lor).(substring.color.0.6)).....
23280 20 20 20 20 28 74 20 22 23 30 30 30 30 30 30 22 29 29 29 20 3b 20 55 73 65 20 66 61 6c 6c 62 61 ....(t."#000000"))).;.Use.fallba
232a0 63 6b 20 69 6e 73 74 65 61 64 20 6f 66 20 69 6e 76 61 6c 69 64 20 63 6f 6c 6f 72 2e 0a 0a 28 64 ck.instead.of.invalid.color...(d
232c0 65 66 75 6e 20 66 6f 72 67 65 2d 2d 63 6f 6e 74 72 61 73 74 2d 63 6f 6c 6f 72 20 28 63 6f 6c 6f efun.forge--contrast-color.(colo
232e0 72 29 0a 20 20 22 52 65 74 75 72 6e 20 62 6c 61 63 6b 20 6f 72 20 77 68 69 74 65 20 64 65 70 65 r)..."Return.black.or.white.depe
23300 6e 64 69 6e 67 20 6f 6e 20 74 68 65 20 6c 75 6d 69 6e 61 6e 63 65 20 6f 66 20 43 4f 4c 4f 52 2e nding.on.the.luminance.of.COLOR.
23320 22 0a 20 20 28 69 66 20 28 3e 20 28 66 6f 72 67 65 2d 2d 78 2d 63 6f 6c 6f 72 2d 6c 75 6d 69 6e "...(if.(>.(forge--x-color-lumin
23340 61 6e 63 65 20 63 6f 6c 6f 72 29 20 30 2e 35 29 20 22 62 6c 61 63 6b 22 20 22 77 68 69 74 65 22 ance.color).0.5)."black"."white"
23360 29 29 0a 0a 3b 3b 20 43 6f 70 79 20 6f 66 20 60 72 61 69 6e 62 6f 77 2d 78 2d 63 6f 6c 6f 72 2d ))..;;.Copy.of.`rainbow-x-color-
23380 6c 75 6d 69 6e 61 6e 63 65 27 2e 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 78 2d 63 6f 6c 6f luminance'..(defun.forge--x-colo
233a0 72 2d 6c 75 6d 69 6e 61 6e 63 65 20 28 63 6f 6c 6f 72 29 0a 20 20 22 43 61 6c 63 75 6c 61 74 65 r-luminance.(color)..."Calculate
233c0 20 74 68 65 20 6c 75 6d 69 6e 61 6e 63 65 20 6f 66 20 61 20 63 6f 6c 6f 72 20 73 74 72 69 6e 67 .the.luminance.of.a.color.string
233e0 20 28 65 2e 67 2e 2c 20 5c 22 23 66 66 61 61 30 30 5c 22 2c 20 5c 22 62 6c 75 65 5c 22 29 2e 0a .(e.g.,.\"#ffaa00\",.\"blue\")..
23400 52 65 74 75 72 6e 20 61 20 76 61 6c 75 65 20 62 65 74 77 65 65 6e 20 30 20 61 6e 64 20 31 2e 22 Return.a.value.between.0.and.1."
23420 0a 20 20 28 6c 65 74 20 28 28 76 61 6c 75 65 73 20 28 63 6f 6c 6f 72 2d 76 61 6c 75 65 73 20 63 ...(let.((values.(color-values.c
23440 6f 6c 6f 72 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 63 6f 6c 6f 72 2d 6c 75 6d 69 6e 61 olor))).....(forge--color-lumina
23460 6e 63 65 20 28 2f 20 28 6e 74 68 20 30 20 76 61 6c 75 65 73 29 20 32 35 36 2e 30 29 0a 20 20 20 nce.(/.(nth.0.values).256.0)....
23480 20 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 2f 20 28 6e 74 68 .........................(/.(nth
234a0 20 31 20 76 61 6c 75 65 73 29 20 32 35 36 2e 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .1.values).256.0)...............
234c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2f 20 28 6e 74 68 20 32 20 76 61 6c 75 65 73 29 20 ..............(/.(nth.2.values).
234e0 32 35 36 2e 30 29 29 29 29 0a 0a 3b 3b 20 43 6f 70 79 20 6f 66 20 60 72 61 69 6e 62 6f 77 2d 63 256.0))))..;;.Copy.of.`rainbow-c
23500 6f 6c 6f 72 2d 6c 75 6d 69 6e 61 6e 63 65 27 2e 0a 3b 3b 20 41 6c 73 6f 20 73 65 65 20 68 74 74 olor-luminance'..;;.Also.see.htt
23520 70 73 3a 2f 2f 65 6e 2e 77 69 6b 69 70 65 64 69 61 2e 6f 72 67 2f 77 69 6b 69 2f 52 65 6c 61 74 ps://en.wikipedia.org/wiki/Relat
23540 69 76 65 5f 6c 75 6d 69 6e 61 6e 63 65 2e 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 63 6f 6c ive_luminance..(defun.forge--col
23560 6f 72 2d 6c 75 6d 69 6e 61 6e 63 65 20 28 72 65 64 20 67 72 65 65 6e 20 62 6c 75 65 29 0a 20 20 or-luminance.(red.green.blue)...
23580 22 43 61 6c 63 75 6c 61 74 65 20 74 68 65 20 6c 75 6d 69 6e 61 6e 63 65 20 6f 66 20 63 6f 6c 6f "Calculate.the.luminance.of.colo
235a0 72 20 63 6f 6d 70 6f 73 65 64 20 6f 66 20 52 45 44 2c 20 47 52 45 45 4e 20 61 6e 64 20 42 4c 55 r.composed.of.RED,.GREEN.and.BLU
235c0 45 2e 0a 52 65 74 75 72 6e 20 61 20 76 61 6c 75 65 20 62 65 74 77 65 65 6e 20 30 20 61 6e 64 20 E..Return.a.value.between.0.and.
235e0 31 2e 22 0a 20 20 28 2f 20 28 2b 20 28 2a 20 2e 32 31 32 36 20 72 65 64 29 20 28 2a 20 2e 37 31 1."...(/.(+.(*..2126.red).(*..71
23600 35 32 20 67 72 65 65 6e 29 20 28 2a 20 2e 30 37 32 32 20 62 6c 75 65 29 29 20 32 35 36 29 29 0a 52.green).(*..0722.blue)).256)).
23620 0a 3b 3b 3b 20 4d 61 72 6b 64 6f 77 6e 20 55 74 69 6c 69 74 69 65 73 0a 0a 28 64 65 66 75 6e 20 .;;;.Markdown.Utilities..(defun.
23640 66 6f 72 67 65 2d 2d 66 6f 6e 74 69 66 79 2d 6d 61 72 6b 64 6f 77 6e 20 28 74 65 78 74 29 0a 20 forge--fontify-markdown.(text)..
23660 20 28 77 69 74 68 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 .(with-temp-buffer.....(delay-mo
23680 64 65 2d 68 6f 6f 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 de-hooks.......(gfm-mode)).....(
236a0 69 6e 73 65 72 74 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 insert.text).....(font-lock-ensu
236c0 72 65 29 0a 20 20 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 re).....(when.forge-post-fill-re
236e0 67 69 6f 6e 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 gion.......(fill-region.(point-m
23700 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 28 62 75 66 66 65 72 2d 73 74 in).(point-max))).....(buffer-st
23720 72 69 6e 67 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6d 61 72 6b 64 6f 77 6e 2d ring)))..(defun.forge--markdown-
23740 74 72 61 6e 73 6c 61 74 65 2d 66 69 6c 65 6e 61 6d 65 2d 66 75 6e 63 74 69 6f 6e 20 28 66 69 6c translate-filename-function.(fil
23760 65 29 0a 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 60 68 74 74 e)...(if.(string-match-p."\\`htt
23780 70 73 3f 3a 2f 2f 22 20 66 69 6c 65 29 0a 20 20 20 20 20 20 66 69 6c 65 0a 20 20 20 20 28 6c 65 ps?://".file).......file.....(le
237a0 74 20 28 28 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 t.((host.(oref.(forge-get-reposi
237c0 74 6f 72 79 20 3a 74 72 61 63 6b 65 64 29 20 66 6f 72 67 65 29 29 29 20 3b 61 6b 61 20 77 65 62 tory.:tracked).forge))).;aka.web
237e0 68 6f 73 74 0a 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 69 66 20 28 6d 65 6d 62 65 72 20 68 host.......(concat.(if.(member.h
23800 6f 73 74 20 67 68 75 62 2d 69 6e 73 65 63 75 72 65 2d 68 6f 73 74 73 29 20 22 68 74 74 70 3a 2f ost.ghub-insecure-hosts)."http:/
23820 2f 22 20 22 68 74 74 70 73 3a 2f 2f 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 68 6f 73 /"."https://")...............hos
23840 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 73 74 72 69 6e t...............(and.(not.(strin
23860 67 2d 70 72 65 66 69 78 2d 70 20 22 2f 22 20 66 69 6c 65 29 29 20 22 2f 22 29 0a 20 20 20 20 20 g-prefix-p."/".file))."/")......
23880 20 20 20 20 20 20 20 20 20 66 69 6c 65 29 29 29 29 0a 0a 3b 3b 3b 20 54 65 6d 70 6c 61 74 65 73 .........file))))..;;;.Templates
238a0 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 62 75 66 66 ..(defun.forge--topic-parse-buff
238c0 65 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 66 69 6c 65 29 0a 20 20 28 73 61 76 65 2d 6d 61 74 63 er.(&optional.file)...(save-matc
238e0 68 2d 64 61 74 61 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 h-data.....(save-excursion......
23900 20 28 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 20 20 28 .(goto-char.(point-min)).......(
23920 6c 65 74 20 28 28 61 6c 69 73 74 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 66 6f 72 let.((alist.(save-excursion.(for
23940 67 65 2d 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 79 61 6d 6c 29 29 29 29 0a 20 20 20 20 20 20 20 ge--topic-parse-yaml))))........
23960 20 28 69 66 20 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 61 6c .(if.alist.............(setf.(al
23980 69 73 74 2d 67 65 74 20 27 79 61 6d 6c 20 61 6c 69 73 74 29 20 74 29 0a 20 20 20 20 20 20 20 20 ist-get.'yaml.alist).t).........
239a0 20 20 28 73 65 74 71 20 61 6c 69 73 74 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 66 ..(setq.alist.(save-excursion.(f
239c0 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 70 6c 61 69 6e 29 29 29 29 0a 20 20 20 20 orge--topic-parse-plain)))).....
239e0 20 20 20 20 28 73 65 74 66 20 28 61 6c 69 73 74 2d 67 65 74 20 27 66 69 6c 65 20 61 6c 69 73 74 ....(setf.(alist-get.'file.alist
23a00 29 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 61 6c 69 73 74 2d 67 65 74 ).file).........(setf.(alist-get
23a20 20 27 74 65 78 74 20 61 6c 69 73 74 29 20 28 6d 61 67 69 74 2d 2d 62 75 66 66 65 72 2d 73 74 72 .'text.alist).(magit--buffer-str
23a40 69 6e 67 20 6e 69 6c 20 6e 69 6c 20 3f 5c 6e 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 ing.nil.nil.?\n)).........(when.
23a60 28 61 6e 64 20 66 69 6c 65 20 28 6e 6f 74 20 28 61 6c 69 73 74 2d 67 65 74 20 27 70 72 6f 6d 70 (and.file.(not.(alist-get.'promp
23a80 74 20 61 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 61 6c 69 73 t.alist)))...........(setf.(alis
23aa0 74 2d 67 65 74 20 27 70 72 6f 6d 70 74 20 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 t-get.'prompt.alist)............
23ac0 20 20 20 20 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 28 .....(file-name-sans-extension.(
23ae0 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 29 29 29 29 0a file-name-nondirectory.file)))).
23b00 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 74 68 65 72 65 20 69 73 20 61 20 79 61 6d 6c 20 66 72 ........;;.If.there.is.a.yaml.fr
23b20 6f 6e 74 2d 6d 61 74 74 65 72 2c 20 74 68 65 6e 20 69 74 20 69 73 20 73 75 70 70 6f 73 65 64 0a ont-matter,.then.it.is.supposed.
23b40 20 20 20 20 20 20 20 20 3b 3b 20 74 6f 20 68 61 76 65 20 61 20 60 74 69 74 6c 65 27 20 66 69 65 ........;;.to.have.a.`title'.fie
23b60 6c 64 2c 20 62 75 74 20 74 68 69 73 20 6d 61 79 20 6e 6f 74 20 62 65 20 74 68 65 20 63 61 73 65 ld,.but.this.may.not.be.the.case
23b80 2e 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6e 6f 74 20 66 69 6c 65 29 0a ..........(when.(and.(not.file).
23ba0 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 6c 69 73 74 2d 67 ...................(not.(alist-g
23bc0 65 74 20 27 74 69 74 6c 65 20 61 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 et.'title.alist)))...........(se
23be0 74 66 20 28 61 6c 69 73 74 2d 67 65 74 20 27 74 69 74 6c 65 20 61 6c 69 73 74 29 0a 20 20 20 20 tf.(alist-get.'title.alist).....
23c00 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 54 69 74 6c 65 3a ............(read-string."Title:
23c20 20 22 29 29 29 0a 20 20 20 20 20 20 20 20 61 6c 69 73 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 ."))).........alist))))..(defun.
23c40 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 79 61 6d 6c 20 28 29 0a 20 20 28 6c 65 forge--topic-parse-yaml.()...(le
23c60 74 20 28 61 6c 69 73 74 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6c 6f 6f t.(alist.beg.end).....(when.(loo
23c80 6b 69 6e 67 2d 61 74 20 22 5e 2d 2d 2d 5b 5c 73 5c 74 5d 2a 24 22 29 0a 20 20 20 20 20 20 28 66 king-at."^---[\s\t]*$").......(f
23ca0 6f 72 77 61 72 64 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 62 65 67 20 28 70 6f orward-line).......(setq.beg.(po
23cc0 69 6e 74 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 int)).......(when.(re-search-for
23ce0 77 61 72 64 20 22 5e 2d 2d 2d 5b 5c 73 5c 74 5d 2a 24 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 ward."^---[\s\t]*$".nil.t)......
23d00 20 20 20 28 73 65 74 71 20 65 6e 64 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 ...(setq.end.(match-beginning.0)
23d20 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 61 6c 69 73 74 20 28 79 61 6d 6c 2d 70 61 72 73 ).........(setq.alist.(yaml-pars
23d40 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 20 20 20 20 20 28 62 e-string......................(b
23d60 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 20 62 65 uffer-substring-no-properties.be
23d80 67 20 65 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 3a 6f 62 6a g.end)......................:obj
23da0 65 63 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 ect-type.'alist.................
23dc0 20 20 20 20 20 3a 73 65 71 75 65 6e 63 65 2d 74 79 70 65 20 27 6c 69 73 74 0a 20 20 20 20 20 20 .....:sequence-type.'list.......
23de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 49 58 4d 45 20 44 6f 65 73 20 6e 6f 74 ...............;;.FIXME.Does.not
23e00 20 77 6f 72 6b 20 62 65 63 61 75 73 65 20 6f 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .work.because.of................
23e20 20 20 20 20 20 20 3b 3b 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 7a 6b 72 79 ......;;.https://github.com/zkry
23e40 2f 79 61 6d 6c 2e 65 6c 2f 70 75 6c 6c 2f 32 38 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 /yaml.el/pull/28................
23e60 20 20 20 20 20 20 20 3a 66 61 6c 73 65 2d 6f 62 6a 65 63 74 20 6e 69 6c 29 29 0a 20 20 20 20 20 .......:false-object.nil))......
23e80 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 28 77 ...(let-alist.alist...........(w
23ea0 68 65 6e 20 28 61 6e 64 20 2e 6e 61 6d 65 20 2e 61 62 6f 75 74 29 0a 20 20 20 20 20 20 20 20 20 hen.(and..name..about)..........
23ec0 20 20 20 28 73 65 74 66 20 28 61 6c 69 73 74 2d 67 65 74 20 27 70 72 6f 6d 70 74 20 61 6c 69 73 ...(setf.(alist-get.'prompt.alis
23ee0 74 29 0a 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 5b 25 t)...................(format."[%
23f00 73 5d 20 25 73 22 20 2e 6e 61 6d 65 20 2e 61 62 6f 75 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 s].%s"..name..about)))..........
23f20 20 28 77 68 65 6e 20 28 61 6e 64 20 2e 6c 61 62 65 6c 73 20 28 61 74 6f 6d 20 2e 6c 61 62 65 6c .(when.(and..labels.(atom..label
23f40 73 29 29 0a 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 s)).............(setf.(alist-get
23f60 20 27 6c 61 62 65 6c 73 20 61 6c 69 73 74 29 20 28 6c 69 73 74 20 2e 6c 61 62 65 6c 73 29 29 29 .'labels.alist).(list..labels)))
23f80 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 2e 61 73 73 69 67 6e 65 65 73 ...........(when.(and..assignees
23fa0 20 28 61 74 6f 6d 20 2e 61 73 73 69 67 6e 65 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .(atom..assignees)).............
23fc0 28 73 65 74 66 20 28 61 6c 69 73 74 2d 67 65 74 20 27 61 73 73 69 67 6e 65 65 73 20 61 6c 69 73 (setf.(alist-get.'assignees.alis
23fe0 74 29 20 28 6c 69 73 74 20 2e 61 73 73 69 67 6e 65 65 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 t).(list..assignees)))).........
24000 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e (forward-line).........(when.(an
24020 64 20 28 6e 6f 74 20 28 61 6c 69 73 74 2d 67 65 74 20 27 74 69 74 6c 65 20 61 6c 69 73 74 29 29 d.(not.(alist-get.'title.alist))
24040 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 ....................(looking-at.
24060 22 5e 5c 6e 3f 23 2a 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 "^\n?#*"))...........(goto-char.
24080 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 (match-end.0))...........(setf.(
240a0 61 6c 69 73 74 2d 67 65 74 20 27 74 69 74 6c 65 20 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 alist-get.'title.alist).........
240c0 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 74 72 69 6d 0a 20 20 20 20 20 20 20 20 20 20 20 ........(string-trim............
240e0 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 62 75 66 66 65 72 2d 73 74 72 69 6e 67 20 28 70 6f 69 ......(magit--buffer-string.(poi
24100 6e 74 29 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 20 74 29 29 29 0a 20 20 20 nt).(line-end-position).t)))....
24120 20 20 20 20 20 20 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 28 .......(forward-line)).........(
24140 73 65 74 66 20 28 61 6c 69 73 74 2d 67 65 74 20 27 62 6f 64 79 20 61 6c 69 73 74 29 0a 20 20 20 setf.(alist-get.'body.alist)....
24160 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 74 72 69 6d 20 28 6d 61 67 69 74 2d 2d ...........(string-trim.(magit--
24180 62 75 66 66 65 72 2d 73 74 72 69 6e 67 20 28 70 6f 69 6e 74 29 20 6e 69 6c 20 3f 5c 6e 29 29 29 buffer-string.(point).nil.?\n)))
241a0 29 29 0a 20 20 20 20 61 6c 69 73 74 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 74 6f )).....alist))..(defun.forge--to
241c0 70 69 63 2d 70 61 72 73 65 2d 70 6c 61 69 6e 20 28 29 0a 20 20 28 6c 65 74 20 28 74 69 74 6c 65 pic-parse-plain.()...(let.(title
241e0 20 62 6f 64 79 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5c 5c .body).....(when.(looking-at."\\
24200 60 23 2a 22 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6d 61 74 63 68 2d 65 6e `#*").......(goto-char.(match-en
24220 64 20 30 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 74 69 74 6c 65 20 28 6d 61 67 69 74 2d 2d 62 d.0))).....(setq.title.(magit--b
24240 75 66 66 65 72 2d 73 74 72 69 6e 67 20 28 70 6f 69 6e 74 29 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 uffer-string.(point).(line-end-p
24260 6f 73 69 74 69 6f 6e 29 20 74 29 29 0a 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 29 0a osition).t)).....(forward-line).
24280 20 20 20 20 28 73 65 74 71 20 62 6f 64 79 20 28 6d 61 67 69 74 2d 2d 62 75 66 66 65 72 2d 73 74 ....(setq.body.(magit--buffer-st
242a0 72 69 6e 67 20 28 70 6f 69 6e 74 29 20 6e 69 6c 20 3f 5c 6e 29 29 0a 20 20 20 20 60 28 28 74 69 ring.(point).nil.?\n)).....`((ti
242c0 74 6c 65 20 2e 20 2c 28 73 74 72 69 6e 67 2d 74 72 69 6d 20 74 69 74 6c 65 29 29 0a 20 20 20 20 tle...,(string-trim.title)).....
242e0 20 20 28 62 6f 64 79 20 20 2e 20 2c 28 73 74 72 69 6e 67 2d 74 72 69 6d 20 62 6f 64 79 29 29 29 ..(body....,(string-trim.body)))
24300 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 6c 69 ))..(defun.forge--topic-parse-li
24320 6e 6b 2d 62 75 66 66 65 72 20 28 29 0a 20 20 28 73 61 76 65 2d 6d 61 74 63 68 2d 64 61 74 61 0a nk-buffer.()...(save-match-data.
24340 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 67 6f 74 6f 2d ....(save-excursion.......(goto-
24360 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 char.(point-min)).......(mapcar.
24380 28 6c 61 6d 62 64 61 20 28 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (lambda.(alist).................
243a0 28 63 6f 6e 73 20 28 63 6f 6e 73 20 27 70 72 6f 6d 70 74 20 28 63 6f 6e 63 61 74 20 28 61 6c 69 (cons.(cons.'prompt.(concat.(ali
243c0 73 74 2d 67 65 74 20 27 6e 61 6d 65 20 61 6c 69 73 74 29 20 22 20 2d 2d 20 22 0a 20 20 20 20 20 st-get.'name.alist).".--."......
243e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
24400 20 20 20 20 20 20 20 28 61 6c 69 73 74 2d 67 65 74 20 27 61 62 6f 75 74 20 61 6c 69 73 74 29 29 .......(alist-get.'about.alist))
24420 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 6c 69 73 74 29 29 0a ).......................alist)).
24440 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 2d 70 61 72 73 ..............(forge--topic-pars
24460 65 2d 79 61 6d 6c 2d 6c 69 6e 6b 73 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d e-yaml-links)))))..(defun.forge-
24480 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 79 61 6d 6c 2d 6c 69 6e 6b 73 20 28 29 0a 20 20 28 61 6c -topic-parse-yaml-links.()...(al
244a0 69 73 74 2d 67 65 74 20 27 63 6f 6e 74 61 63 74 5f 6c 69 6e 6b 73 0a 20 20 20 20 20 20 20 20 20 ist-get.'contact_links..........
244c0 20 20 20 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 72 2d 73 ....(yaml-parse-string.(buffer-s
244e0 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 0a 20 20 20 20 20 20 20 20 20 ubstring-no-properties..........
24500 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 6f 69 6e 74 2d 6d ........................(point-m
24520 69 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 in).............................
24540 20 20 20 20 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....(point-max))...............
24560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 62 6a 65 63 74 2d 74 79 70 65 20 27 ..................:object-type.'
24580 61 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 20 alist...........................
245a0 20 20 20 20 20 20 3a 73 65 71 75 65 6e 63 65 2d 74 79 70 65 20 27 6c 69 73 74 29 29 29 0a 0a 28 ......:sequence-type.'list)))..(
245c0 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
245e0 61 74 65 2d 66 69 6c 65 73 20 28 72 65 70 6f 20 63 6c 61 73 73 29 0a 20 20 22 52 65 74 75 72 6e ate-files.(repo.class)..."Return
24600 20 61 20 6c 69 73 74 20 6f 66 20 74 6f 70 69 63 20 74 65 6d 70 6c 61 74 65 20 66 69 6c 65 73 20 .a.list.of.topic.template.files.
24620 66 6f 72 20 52 45 50 4f 20 61 6e 64 20 61 20 74 6f 70 69 63 20 6f 66 20 43 4c 41 53 53 2e 22 29 for.REPO.and.a.topic.of.CLASS.")
24640 0a 0a 28 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 ..(cl-defgeneric.forge--topic-te
24660 6d 70 6c 61 74 65 20 28 72 65 70 6f 20 63 6c 61 73 73 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 mplate.(repo.class)..."Return.a.
24680 74 6f 70 69 63 20 74 65 6d 70 6c 61 74 65 20 61 6c 69 73 74 20 66 6f 72 20 52 45 50 4f 20 61 6e topic.template.alist.for.REPO.an
246a0 64 20 61 20 74 6f 70 69 63 20 6f 66 20 43 4c 41 53 53 2e 0a 49 66 20 74 68 65 72 65 20 61 72 65 d.a.topic.of.CLASS..If.there.are
246c0 20 6d 75 6c 74 69 70 6c 65 20 74 65 6d 70 6c 61 74 65 73 2c 20 74 68 65 6e 20 74 68 65 20 75 73 .multiple.templates,.then.the.us
246e0 65 72 20 69 73 20 61 73 6b 65 64 20 74 6f 20 73 65 6c 65 63 74 0a 6f 6e 65 20 6f 66 20 74 68 65 er.is.asked.to.select.one.of.the
24700 6d 2e 20 20 49 74 20 74 68 65 72 65 20 61 72 65 20 6e 6f 20 74 65 6d 70 6c 61 74 65 73 2c 20 74 m...It.there.are.no.templates,.t
24720 68 65 6e 20 72 65 74 75 72 6e 20 61 20 76 65 72 79 20 62 61 73 69 63 0a 61 6c 69 73 74 2c 20 63 hen.return.a.very.basic.alist,.c
24740 6f 6e 74 61 69 6e 69 6e 67 20 6a 75 73 74 20 60 74 65 78 74 27 20 61 6e 64 20 60 70 6f 73 69 74 ontaining.just.`text'.and.`posit
24760 69 6f 6e 27 2e 22 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 ion'.")..(defun.forge--topic-tem
24780 70 6c 61 74 65 73 2d 64 61 74 61 20 28 72 65 70 6f 20 63 6c 61 73 73 29 0a 20 20 28 6c 65 74 20 plates-data.(repo.class)...(let.
247a0 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 62 72 61 6e ((branch.(oref.repo.default-bran
247c0 63 68 29 29 29 0a 20 20 20 20 28 6d 61 70 63 61 6e 20 28 6c 61 6d 62 64 61 20 28 66 29 0a 20 20 ch))).....(mapcan.(lambda.(f)...
247e0 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 ............(with-temp-buffer...
24800 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 6e 73 65 72 74 20 ..............(magit-git-insert.
24820 22 63 61 74 2d 66 69 6c 65 22 20 22 2d 70 22 20 28 63 6f 6e 63 61 74 20 62 72 61 6e 63 68 20 22 "cat-file"."-p".(concat.branch."
24840 3a 22 20 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 75 61 :".f)).................(if.(equa
24860 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 66 29 20 22 63 6f l.(file-name-nondirectory.f)."co
24880 6e 66 69 67 2e 79 6d 6c 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 nfig.yml").....................(
248a0 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 6c 69 6e 6b 2d 62 75 66 66 65 72 29 0a forge--topic-parse-link-buffer).
248c0 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 2d 2d ..................(list.(forge--
248e0 74 6f 70 69 63 2d 70 61 72 73 65 2d 62 75 66 66 65 72 20 66 29 29 29 29 29 0a 20 20 20 20 20 20 topic-parse-buffer.f))))).......
24900 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 61 74 65 2d 66 69 6c ......(forge--topic-template-fil
24920 65 73 20 72 65 70 6f 20 63 6c 61 73 73 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 es.repo.class))))..(cl-defmethod
24940 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 20 28 28 72 65 70 6f 20 66 6f .forge--topic-template.((repo.fo
24960 72 67 65 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 rge-repository).................
24980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 61 73 73 20 28 73 75 62 .....................(class.(sub
249a0 63 6c 61 73 73 20 66 6f 72 67 65 2d 74 6f 70 69 63 29 29 29 0a 20 20 28 6c 65 74 20 28 28 63 68 class.forge-topic)))...(let.((ch
249c0 6f 69 63 65 73 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c 61 74 65 73 2d 64 61 oices.(forge--topic-templates-da
249e0 74 61 20 72 65 70 6f 20 63 6c 61 73 73 29 29 29 0a 20 20 20 20 28 69 66 20 28 63 64 72 20 63 68 ta.repo.class))).....(if.(cdr.ch
24a00 6f 69 63 65 73 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 20 28 6d 61 67 69 74 2d 63 oices).........(let.((c.(magit-c
24a20 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 20 20 20 20 20 20 ompleting-read..................
24a40 20 28 69 66 20 28 65 71 20 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 20 .(if.(eq.class.'forge-pullreq)..
24a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 65 6c 65 63 74 20 70 75 6c ....................."Select.pul
24a80 6c 2d 72 65 71 75 65 73 74 20 74 65 6d 70 6c 61 74 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 l-request.template".............
24aa0 20 20 20 20 20 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 ........"Select.issue.template")
24ac0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 2d 6d 61 70 20 28 61 6c 69 73 74 ...................(--map.(alist
24ae0 2d 67 65 74 20 27 70 72 6f 6d 70 74 20 69 74 29 20 63 68 6f 69 63 65 73 29 0a 20 20 20 20 20 20 -get.'prompt.it).choices).......
24b00 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 ............nil.t)))...........(
24b20 2d 2d 66 69 72 73 74 20 28 65 71 75 61 6c 20 28 61 6c 69 73 74 2d 67 65 74 20 27 70 72 6f 6d 70 --first.(equal.(alist-get.'promp
24b40 74 20 69 74 29 20 63 29 20 63 68 6f 69 63 65 73 29 29 0a 20 20 20 20 20 20 28 63 61 72 20 63 68 t.it).c).choices)).......(car.ch
24b60 6f 69 63 65 73 29 29 29 29 0a 0a 3b 3b 3b 20 42 75 67 2d 52 65 66 65 72 65 6e 63 65 0a 0a 28 77 oices))))..;;;.Bug-Reference..(w
24b80 68 65 6e 20 28 3c 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f 6e 20 32 38 29 0a 20 hen.(<.emacs-major-version.28)..
24ba0 20 28 64 65 66 75 6e 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 66 6f 6e 74 69 66 79 20 28 73 .(defun.bug-reference-fontify.(s
24bc0 74 61 72 74 20 65 6e 64 29 0a 20 20 20 20 22 41 70 70 6c 79 20 62 75 67 20 72 65 66 65 72 65 6e tart.end)....."Apply.bug.referen
24be0 63 65 20 6f 76 65 72 6c 61 79 73 20 74 6f 20 72 65 67 69 6f 6e 2e 22 0a 20 20 20 20 28 73 61 76 ce.overlays.to.region.".....(sav
24c00 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 65 67 2d 6c 69 6e e-excursion.......(let.((beg-lin
24c20 65 20 28 70 72 6f 67 6e 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 74 61 72 74 29 20 28 6c 69 6e 65 e.(progn.(goto-char.start).(line
24c40 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 -beginning-position)))..........
24c60 20 20 20 28 65 6e 64 2d 6c 69 6e 65 20 28 70 72 6f 67 6e 20 28 67 6f 74 6f 2d 63 68 61 72 20 65 ...(end-line.(progn.(goto-char.e
24c80 6e 64 29 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 29 0a 20 20 20 20 20 nd).(line-end-position))))......
24ca0 20 20 20 3b 3b 20 52 65 6d 6f 76 65 20 6f 6c 64 20 6f 76 65 72 6c 61 79 73 2e 0a 20 20 20 20 20 ...;;.Remove.old.overlays.......
24cc0 20 20 20 28 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 75 6e 66 6f 6e 74 69 66 79 20 62 65 67 2d ...(bug-reference-unfontify.beg-
24ce0 6c 69 6e 65 20 65 6e 64 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 line.end-line).........(goto-cha
24d00 72 20 62 65 67 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 r.beg-line).........(while.(and.
24d20 28 3c 20 28 70 6f 69 6e 74 29 20 65 6e 64 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 (<.(point).end-line)............
24d40 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 62 75 67 2d .........(re-search-forward.bug-
24d60 72 65 66 65 72 65 6e 63 65 2d 62 75 67 2d 72 65 67 65 78 70 20 65 6e 64 2d 6c 69 6e 65 20 27 6d reference-bug-regexp.end-line.'m
24d80 6f 76 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6f 72 20 28 ove))...........(when.(and.(or.(
24da0 6e 6f 74 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 70 72 6f 67 2d 6d 6f 64 65 29 0a 20 20 20 not.bug-reference-prog-mode)....
24dc0 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 20 74 65 ......................;;.This.te
24de0 73 74 73 20 66 6f 72 20 62 6f 74 68 20 63 6f 6d 6d 65 6e 74 20 61 6e 64 20 73 74 72 69 6e 67 20 sts.for.both.comment.and.string.
24e00 73 79 6e 74 61 78 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 syntax..........................
24e20 20 28 6e 74 68 20 38 20 28 73 79 6e 74 61 78 2d 70 70 73 73 29 29 29 0a 20 20 20 20 20 20 20 20 .(nth.8.(syntax-ppss))).........
24e40 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 69 73 20 69 73 20 74 68 65 20 70 61 72 74 .............;;.This.is.the.part
24e60 20 77 68 65 72 65 20 74 68 69 73 20 72 65 64 65 66 69 6e 69 74 69 6f 6e 20 64 69 66 66 65 72 73 .where.this.redefinition.differs
24e80 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 66 72 6f 6d 20 74 68 ......................;;.from.th
24ea0 65 20 6f 72 69 67 69 6e 61 6c 20 64 65 66 69 6e 65 64 20 69 6e 20 22 62 75 67 2d 72 65 66 65 72 e.original.defined.in."bug-refer
24ec0 65 6e 63 65 2e 65 6c 22 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ence.el".......................(
24ee0 6e 6f 74 20 28 61 6e 64 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 6d 61 67 69 74 2d not.(and.(derived-mode-p.'magit-
24f00 73 74 61 74 75 73 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 status-mode.....................
24f20 20 20 20 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 67 ...........................'forg
24f40 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 20 20 e-notifications-mode)...........
24f60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 28 6d 61 74 63 68 2d 62 .....................(=.(match-b
24f80 65 67 69 6e 6e 69 6e 67 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eginning.0).....................
24fa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f ..............(line-beginning-po
24fc0 73 69 74 69 6f 6e 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 sition))))......................
24fe0 3b 3b 20 45 6e 64 20 6f 66 20 61 64 64 69 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 ;;.End.of.additions.............
25000 20 20 20 20 20 20 20 20 20 20 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6f ..........).............(let.((o
25020 76 65 72 6c 61 79 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 28 6d 61 74 63 68 2d 62 65 67 69 verlay.(make-overlay.(match-begi
25040 6e 6e 69 6e 67 20 30 29 20 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 0a 20 20 20 20 20 20 20 20 20 nning.0).(match-end.0)..........
25060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
25080 6e 69 6c 20 74 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 nil.t.nil)))...............(over
250a0 6c 61 79 2d 70 75 74 20 6f 76 65 72 6c 61 79 20 27 63 61 74 65 67 6f 72 79 20 27 62 75 67 2d 72 lay-put.overlay.'category.'bug-r
250c0 65 66 65 72 65 6e 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 44 6f 6e 27 74 eference)...............;;.Don't
250e0 20 70 75 74 20 61 20 6c 69 6e 6b 20 69 66 20 66 6f 72 6d 61 74 20 69 73 20 75 6e 64 65 66 69 6e .put.a.link.if.format.is.undefin
25100 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 62 75 67 2d 72 65 66 65 72 ed...............(when.bug-refer
25120 65 6e 63 65 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 ence-url-format.................
25140 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 65 72 6c 61 79 20 27 62 75 67 2d 72 65 66 65 72 65 (overlay-put.overlay.'bug-refere
25160 6e 63 65 2d 75 72 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 nce-url.........................
25180 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d .....(if.(stringp.bug-reference-
251a0 75 72 6c 2d 66 6f 72 6d 61 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 url-format).....................
251c0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 62 75 67 2d 72 65 66 65 72 65 6e .............(format.bug-referen
251e0 63 65 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 ce-url-format...................
25200 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 74 63 68 2d 73 74 .......................(match-st
25220 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 32 29 29 0a 20 20 20 20 20 20 20 20 20 ring-no-properties.2))..........
25240 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 62 ......................(funcall.b
25260 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 29 29 29 29 29 29 29 29 ug-reference-url-format)))))))))
25280 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 73 ))..(defun.forge-bug-reference-s
252a0 65 74 75 70 20 28 29 0a 20 20 22 53 65 74 75 70 20 60 62 75 67 2d 72 65 66 65 72 65 6e 63 65 27 etup.()..."Setup.`bug-reference'
252c0 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 49 66 20 66 6f 72 67 65 .in.the.current.buffer..If.forge
252e0 20 64 61 74 61 20 68 61 73 20 62 65 65 6e 20 66 65 74 63 68 65 64 20 66 6f 72 20 74 68 65 20 63 .data.has.been.fetched.for.the.c
25300 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 74 68 65 6e 0a 65 6e 61 62 6c 65 20 60 urrent.repository,.then.enable.`
25320 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 6d 6f 64 65 27 20 6f 72 20 60 62 75 67 2d 72 65 66 65 bug-reference-mode'.or.`bug-refe
25340 72 65 6e 63 65 2d 70 72 6f 67 2d 6d 6f 64 65 27 20 61 6e 64 0a 6d 6f 64 69 66 79 20 60 62 75 67 rence-prog-mode'.and.modify.`bug
25360 2d 72 65 66 65 72 65 6e 63 65 2d 62 75 67 2d 72 65 67 65 78 70 27 20 69 66 20 61 70 70 72 6f 70 -reference-bug-regexp'.if.approp
25380 72 69 61 74 65 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 62 75 67 2d 72 65 66 65 72 65 riate."...(unless.(or.bug-refere
253a0 6e 63 65 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 28 6e 6f nce-url-format...............(no
253c0 74 20 28 66 6f 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 3b 3b t.(forge-db.t))...............;;
253e0 20 54 4f 44 4f 20 41 6c 6c 6f 77 20 75 73 65 20 69 6e 20 74 68 69 73 20 6d 6f 64 65 20 61 67 61 .TODO.Allow.use.in.this.mode.aga
25400 69 6e 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d in................(derived-mode-
25420 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 29 0a 20 20 p.'forge-notifications-mode))...
25440 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
25460 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
25480 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?
254a0 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 3e 3d 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d ))).........(if.(>=.emacs-major-
254c0 76 65 72 73 69 6f 6e 20 32 38 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 64 version.28).............(when.(d
254e0 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 6d 61 67 69 74 2d 73 74 61 74 75 73 2d 6d 6f 64 65 erived-mode-p.'magit-status-mode
25500 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 ................................
25520 20 20 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 ...'forge-notifications-mode)...
25540 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 0a 20 20 20 20 20 20 20 20 ............(setq-local.........
25560 20 20 20 20 20 20 20 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 61 75 74 6f 2d 73 65 74 75 70 2d .......bug-reference-auto-setup-
25580 66 75 6e 63 74 69 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 functions................(let.((
255a0 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 70 2d 66 75 hook.bug-reference-auto-setup-fu
255c0 6e 63 74 69 6f 6e 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 nctions))..................(list
255e0 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.().....................
25600 20 20 20 20 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 .....;;.HOOK.is.not.allowed.to.b
25620 65 20 61 20 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 e.a.lexical.var:................
25640 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 72 75 6e 2d 68 6f 6f 6b 2d 77 69 74 68 2d 61 72 67 73 ..........;;.(run-hook-with-args
25660 2d 75 6e 74 69 6c 2d 73 75 63 63 65 73 73 20 27 68 6f 6f 6b 29 0a 20 20 20 20 20 20 20 20 20 20 -until-success.'hook)...........
25680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 74 63 68 20 27 73 75 63 63 65 73 73 0a 20 ...............(catch.'success..
256a0 20 20 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 64 6f 6c 69 73 ..........................(dolis
256c0 74 20 28 66 20 68 6f 6f 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.(f.hook)......................
256e0 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 75 6e 63 61 6c 6c 20 66 29 0a 20 20 20 20 20 20 ........(when.(funcall.f).......
25700 20 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 74 71 20 62 .........................(setq.b
25720 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 62 75 67 2d 72 65 67 65 78 70 0a 20 20 20 20 20 20 20 20 ug-reference-bug-regexp.........
25740 20 20 20 20 20 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 .............................(co
25760 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 65 67 65 78 ncat.".".bug-reference-bug-regex
25780 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 20 20 20 20 p)).............................
257a0 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)))))))))...
257c0 20 20 20 20 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 62 75 67 2d 72 65 66 65 72 65 6e 63 ........(setq-local.bug-referenc
257e0 65 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 e-url-format....................
25800 20 20 20 28 69 66 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 ...(if.(forge--childp.repo.'forg
25820 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 20 e-gitlab-repository)............
25840 20 20 20 20 20 20 20 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 ...............(lambda.().......
25860 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 66 6f ......................(forge--fo
25880 72 6d 61 74 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 20 20 20 rmat.repo.......................
258a0 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 75 61 6c 20 .....................(if.(equal.
258c0 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 20 20 20 20 (match-string.3)."#")...........
258e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
25900 20 20 20 20 20 27 69 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 .....'issue-url-format..........
25920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
25940 20 20 20 20 27 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 6f 72 6d 61 74 29 0a 20 20 20 20 20 20 20 ....'pullreq-url-format)........
25960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
25980 20 20 20 20 60 28 28 3f 69 20 2e 20 2c 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 29 29 29 29 ....`((?i...,(match-string.2))))
259a0 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
259c0 2d 2d 66 6f 72 6d 61 74 20 72 65 70 6f 20 27 69 73 73 75 65 2d 75 72 6c 2d 66 6f 72 6d 61 74 20 --format.repo.'issue-url-format.
259e0 27 28 28 3f 69 20 2e 20 22 25 73 22 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 '((?i..."%s")))))...........(set
25a00 71 2d 6c 6f 63 61 6c 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 q-local.bug-reference-bug-regexp
25a20 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 20 28 66 6f 72 67 .......................(if.(forg
25a40 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 61 62 2d 72 65 70 e--childp.repo.'forge-gitlab-rep
25a60 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 20 20 20 ository)........................
25a80 20 20 20 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 2b 5c 5c 29 ..."\\(?3:[!#]\\)\\(?2:[0-9]+\\)
25aa0 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 22 23 5c 5c 28 3f "........................."#\\(?
25ac0 32 3a 5b 30 2d 39 5d 2b 5c 5c 29 22 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 64 65 72 2:[0-9]+\\)"))).........(if.(der
25ae0 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 70 72 6f 67 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 ived-mode-p.'prog-mode).........
25b00 20 20 20 20 28 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 70 72 6f 67 2d 6d 6f 64 65 20 31 29 0a ....(bug-reference-prog-mode.1).
25b20 20 20 20 20 20 20 20 20 20 20 28 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 6d 6f 64 65 20 31 29 ..........(bug-reference-mode.1)
25b40 29 0a 20 20 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 63 6f 6d 70 6c 65 74 69 6f 6e 2d ).........(add-hook.'completion-
25b60 61 74 2d 70 6f 69 6e 74 2d 66 75 6e 63 74 69 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 at-point-functions..............
25b80 20 20 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 61 74 .....#'forge-topic-completion-at
25ba0 2d 70 6f 69 6e 74 20 6e 69 6c 20 74 29 29 29 29 29 0a 0a 28 75 6e 6c 65 73 73 20 6e 6f 6e 69 6e -point.nil.t)))))..(unless.nonin
25bc0 74 65 72 61 63 74 69 76 65 0a 20 20 28 64 6f 6c 69 73 74 20 28 68 6f 6f 6b 20 66 6f 72 67 65 2d teractive...(dolist.(hook.forge-
25be0 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 68 6f 6f 6b 73 29 0a 20 20 20 20 28 61 64 64 2d 68 6f bug-reference-hooks).....(add-ho
25c00 6f 6b 20 68 6f 6f 6b 20 23 27 66 6f 72 67 65 2d 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 73 65 ok.hook.#'forge-bug-reference-se
25c20 74 75 70 29 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 74 6f tup)))..;;;._.(provide.'forge-to
25c40 70 69 63 29 0a 3b 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 pic).;;;.forge-topic.el.ends.her
25c60 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...............................
25c80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25e00 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 69 73 73 75 65 2e forge-20240405.1509/forge-issue.
25e20 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..............................
25e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25e60 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
25e80 30 30 32 33 31 37 34 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 0023174.00000000000.014673..0...
25ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25f00 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...................
25f20 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...................
25f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
25fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
26000 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
26020 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.-*-.
26040 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 34 20 4a 6f 6e 61 .;;.Copyright.(C).2018-2024.Jona
26060 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
26080 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 3b 3b 20 4d 61 rnoulli.<jonas@bernoul.li>.;;.Ma
260a0 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 intainer:.Jonas.Bernoulli.<jonas
260c0 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 @bernoul.li>..;;.SPDX-License-Id
260e0 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
26100 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
26120 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
26140 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
26160 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
26180 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
261a0 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
261c0 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
261e0 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.
26200 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.
26220 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
26240 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
26260 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
26280 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
262a0 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
262c0 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
262e0 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
26300 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
26320 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
26340 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:
26360 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
26380 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.
263a0 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 6f 70 'forge-post).(require.'forge-top
263c0 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 72 67 ic)..;;;.Classes..(defclass.forg
263e0 65 2d 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 e-issue.(forge-topic)...((closql
26400 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 65 29 -table.........:initform.'issue)
26420 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 6e 69 74 66 ....(closql-primary-key...:initf
26440 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 62 79 20 20 20 20 orm.'id)....(closql-order-by....
26460 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 5d 29 0a 20 20 20 ..:initform.[(desc.number)])....
26480 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 74 66 6f 72 6d 20 (closql-foreign-key...:initform.
264a0 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 61 73 73 2d 70 72 'repository)....(closql-class-pr
264c0 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 20 20 20 28 69 64 efix..:initform."forge-")....(id
264e0 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 67 20 3a 69 64 29 ...................:initarg.:id)
26500 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 3a 69 6e 69 74 61 ....(repository...........:inita
26520 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 20 20 20 20 20 20 rg.:repository)....(number......
26540 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 28 73 .........:initarg.:number)....(s
26560 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 72 67 20 3a 73 74 tate................:initarg.:st
26580 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 20 20 20 20 3a 69 ate)....(author...............:i
265a0 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 20 20 20 20 20 20 nitarg.:author)....(title.......
265c0 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 28 63 72 .........:initarg.:title)....(cr
265e0 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 67 20 3a 63 72 65 eated..............:initarg.:cre
26600 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 20 20 20 20 20 3a ated)....(updated..............:
26620 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 20 6e 69 6c 29 0a initarg.:updated.:initform.nil).
26640 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 69 6e 69 74 61 72 ...(closed...............:initar
26660 67 20 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 g.:closed)....(status...........
26680 20 20 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 ....:initarg.:status.:initform.n
266a0 69 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 3a 69 6e il)....(locked-p.............:in
266c0 69 74 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 itarg.:locked-p)....(milestone..
266e0 20 20 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 ..........:initarg.:milestone)..
26700 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
26720 20 3a 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 .:body)....(assignees...........
26740 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 28 69 73 73 75 65 2d 61 73 73 69 67 6e 65 65 20 61 .:closql-table.(issue-assignee.a
26760 73 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 ssignee))....(project-cards).;.p
26780 72 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 rojectsCards....(edits).;.userCo
267a0 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 20 20 20 20 20 ntentEdits....(labels...........
267c0 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 28 69 73 73 75 65 2d 6c 61 62 65 6c 20 6c ....:closql-table.(issue-label.l
267e0 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
26800 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.
26820 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)
26840 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........
26860 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 28 69 73 73 75 65 2d 6d 61 72 ........:closql-table.(issue-mar
26880 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 20 k.mark))....(note...............
268a0 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 0a ..:initarg.:note.:initform.nil).
268c0 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 72 ...(their-id.............:initar
268e0 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 20 g.:their-id)....(slug...........
26900 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 2d ......:initarg.:slug)....(saved-
26920 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 70 p..............:initarg.:saved-p
26940 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 29 29 0a 0a 28 64 65 66 63 6c 61 73 73 .:initform.nil)....))..(defclass
26960 20 66 6f 72 67 65 2d 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 .forge-issue-post.(forge-post)..
26980 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 6e 69 74 66 6f 72 .((closql-table.........:initfor
269a0 6d 20 27 69 73 73 75 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 m.'issue-post)....(closql-primar
269c0 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
269e0 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.
26a00 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
26a20 20 20 20 3a 69 6e 69 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 ...:initform.'issue)....(closql-
26a40 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 69 class-prefix..:initform."forge-i
26a60 73 73 75 65 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 ssue-")....(id..................
26a80 20 3a 69 6e 69 74 61 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 .:initarg.:id)....(issue........
26aa0 20 20 20 20 20 20 20 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 ........:initarg.:issue)....(num
26ac0 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 75 6d 62 ber...............:initarg.:numb
26ae0 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 20 20 20 3a 69 6e er)....(author...............:in
26b00 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 20 20 20 20 20 20 itarg.:author)....(created......
26b20 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 0a 20 20 20 28 75 ........:initarg.:created)....(u
26b40 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 72 67 20 3a 75 70 pdated..............:initarg.:up
26b60 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 20 20 20 20 20 20 dated)....(body.................
26b80 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 0a 20 20 20 28 72 :initarg.:body)....(edits)....(r
26ba0 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 0a 3b 3b 3b 3b 20 eactions)....))..;;;.Query.;;;;.
26bc0 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 72 65 70 Get..(cl-defmethod.forge-get-rep
26be0 6f 73 69 74 6f 72 79 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 ository.((post.forge-issue-post)
26c00 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
26c20 2d 67 65 74 2d 69 73 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 -get-issue.post)))..(cl-defmetho
26c40 64 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 69 d.forge-get-topic.((post.forge-i
26c60 73 73 75 65 2d 70 6f 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 ssue-post))...(forge-get-issue.p
26c80 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 2d 69 ost))..(cl-defmethod.forge-get-i
26ca0 73 73 75 65 20 28 28 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 ssue.((issue.forge-issue))...iss
26cc0 75 65 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 69 73 73 ue)..(cl-defmethod.forge-get-iss
26ce0 75 65 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 6e 75 6d 62 ue.((repo.forge-repository).numb
26d00 65 72 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 0a 20 20 20 er)...(closql-get.(forge-db)....
26d20 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 27 66 6f ...........(forge--object-id.'fo
26d40 72 67 65 2d 69 73 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 rge-issue.repo.number)..........
26d60 20 20 20 20 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 .....'forge-issue))..(cl-defmeth
26d80 6f 64 20 66 6f 72 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 od.forge-get-issue.((number.inte
26da0 67 65 72 29 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d ger))...(and-let*.((repo.(forge-
26dc0 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 20 20 20 28 get-repository.:tracked))).....(
26de0 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 72 65 70 6f 20 6e 75 6d 62 65 72 29 29 29 0a 0a forge-get-issue.repo.number)))..
26e00 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.((
26e20 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 6f 72 67 65 id.string))...(closql-get.(forge
26e40 2d 64 62 29 20 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 -db).id.'forge-issue))..(cl-defm
26e60 65 74 68 6f 64 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 ethod.forge-get-issue.((post.for
26e80 67 65 2d 69 73 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 ge-issue-post))...(closql-get.(f
26ea0 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 6f 73 orge-db)...............(oref.pos
26ec0 74 20 69 73 73 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 t.issue)...............'forge-is
26ee0 73 75 65 29 29 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 sue))..;;;;.Current..(defun.forg
26f00 65 2d 63 75 72 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 e-current-issue.(&optional.deman
26f20 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 20 d)..."Return.the.issue.at.point.
26f40 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 69 73 20 6e 6f or.being.visited..If.there.is.no
26f60 20 73 75 63 68 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 .such.issue.and.DEMAND.is.non-ni
26f80 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 0a 20 20 28 6f 72 20 l,.then.signal.an.error."...(or.
26fa0 28 66 6f 72 67 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 (forge-issue-at-point).......(an
26fc0 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 69 63 2d 6d d.(derived-mode-p.'forge-topic-m
26fe0 6f 64 65 29 0a 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 20 66 ode)............(forge-issue-p.f
27000 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 20 20 20 66 6f orge-buffer-topic)............fo
27020 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 6e 64 20 64 65 6d rge-buffer-topic).......(and.dem
27040 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 74 20 69 73 73 75 and.(user-error."No.current.issu
27060 65 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 69 73 73 75 65 2d 61 74 2d 70 6f e"))))..(defun.forge-issue-at-po
27080 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 65 74 75 72 6e int.(&optional.demand)..."Return
270a0 20 74 68 65 20 69 73 73 75 65 20 61 74 20 70 6f 69 6e 74 2e 0a 49 66 20 74 68 65 72 65 20 69 73 .the.issue.at.point..If.there.is
270c0 20 6e 6f 20 73 75 63 68 20 69 73 73 75 65 20 61 6e 64 20 44 45 4d 41 4e 44 20 69 73 20 6e 6f 6e .no.such.issue.and.DEMAND.is.non
270e0 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 0a 20 20 28 -nil,.then.signal.an.error."...(
27100 6f 72 20 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 or.(thing-at-point.'forge-issue)
27120 0a 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 .......(magit-section-value-if.'
27140 69 73 73 75 65 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d issue).......(and.(derived-mode-
27160 70 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 p.'forge-topic-list-mode).......
27180 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 69 64 20 28 74 61 62 75 6c 61 74 65 64 2d 6c .....(and-let*.((id.(tabulated-l
271a0 69 73 74 2d 67 65 74 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 ist-get-id))....................
271c0 20 20 20 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 67 65 74 2d 74 6f 70 69 63 20 69 64 29 29 29 ...(topic.(forge-get-topic.id)))
271e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d ..............(and.(forge-issue-
27200 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 20 74 6f 70 69 63 p.topic)...................topic
27220 29 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 72 6f ))).......(and.demand.(user-erro
27240 72 20 22 4e 6f 20 69 73 73 75 65 20 61 74 20 70 6f 69 6e 74 22 29 29 29 29 0a 0a 28 70 75 74 20 r."No.issue.at.point"))))..(put.
27260 27 66 6f 72 67 65 2d 69 73 73 75 65 20 27 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 23 27 66 'forge-issue.'thing-at-point.#'f
27280 6f 72 67 65 2d 74 68 69 6e 67 61 74 70 74 2d 2d 69 73 73 75 65 29 0a 28 64 65 66 75 6e 20 66 6f orge-thingatpt--issue).(defun.fo
272a0 72 67 65 2d 74 68 69 6e 67 61 74 70 74 2d 2d 69 73 73 75 65 20 28 29 0a 20 20 28 61 6e 64 2d 6c rge-thingatpt--issue.()...(and-l
272c0 65 74 2a 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 2d 72 65 70 6f 2d 66 6f 72 2d 74 68 69 6e et*.((repo.(forge--repo-for-thin
272e0 67 61 74 70 74 29 29 29 0a 20 20 20 20 28 61 6e 64 20 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e gatpt))).....(and.(thing-at-poin
27300 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 5c 5f 3e 22 t-looking-at."#\\([0-9]+\\)\\_>"
27320 29 0a 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 69 73 73 75 65 20 72 65 70 6f )..........(forge-get-issue.repo
27340 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 74 72 69 6e 67 .(string-to-number.(match-string
27360 20 31 29 29 29 29 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 .1))))))..;;;;.List..(defun.forg
27380 65 2d 2d 6c 73 2d 72 65 63 65 6e 74 2d 69 73 73 75 65 73 20 28 72 65 70 6f 29 0a 20 20 28 66 6f e--ls-recent-issues.(repo)...(fo
273a0 72 67 65 2d 6c 73 2d 72 65 63 65 6e 74 2d 74 6f 70 69 63 73 20 72 65 70 6f 20 27 69 73 73 75 65 rge-ls-recent-topics.repo.'issue
273c0 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 69 73 73 75 65 73 20 28 72 65 70 ))..(defun.forge--ls-issues.(rep
273e0 6f 29 0a 20 20 28 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 69 73 73 75 65 73 20 72 65 70 6f 0a o)...(forge--select-issues.repo.
27400 20 20 20 20 5b 3a 66 72 6f 6d 20 69 73 73 75 65 20 3a 77 68 65 72 65 20 28 3d 20 69 73 73 75 65 ....[:from.issue.:where.(=.issue
27420 3a 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 5d 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 :repository.$s1)]))..(defun.forg
27440 65 2d 2d 6c 73 2d 6f 70 65 6e 2d 69 73 73 75 65 73 20 28 72 65 70 6f 29 0a 20 20 28 66 6f 72 67 e--ls-open-issues.(repo)...(forg
27460 65 2d 2d 73 65 6c 65 63 74 2d 69 73 73 75 65 73 20 72 65 70 6f 0a 20 20 20 20 5b 3a 66 72 6f 6d e--select-issues.repo.....[:from
27480 20 69 73 73 75 65 0a 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 69 73 73 75 65 .issue......:where.(and.(=.issue
274a0 3a 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 20 :repository.$s1)................
274c0 20 20 28 3d 20 69 73 73 75 65 3a 73 74 61 74 65 20 27 6f 70 65 6e 29 29 5d 29 29 0a 0a 28 64 65 ..(=.issue:state.'open))]))..(de
274e0 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 61 63 74 69 76 65 2d 69 73 73 75 65 73 20 28 72 65 70 fun.forge--ls-active-issues.(rep
27500 6f 29 0a 20 20 28 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 69 73 73 75 65 73 20 72 65 70 6f 0a o)...(forge--select-issues.repo.
27520 20 20 20 20 5b 3a 66 72 6f 6d 20 69 73 73 75 65 0a 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e ....[:from.issue......:where.(an
27540 64 20 28 3d 20 69 73 73 75 65 3a 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 d.(=.issue:repository.$s1)......
27560 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 3d 20 69 73 73 75 65 3a 73 74 61 74 65 20 27 ............(or.(=.issue:state.'
27580 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 20 28 69 6e 20 69 open)......................(in.i
275a0 73 73 75 65 3a 73 74 61 74 75 73 20 5b 70 65 6e 64 69 6e 67 20 75 6e 72 65 61 64 5d 29 29 29 5d ssue:status.[pending.unread])))]
275c0 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 61 73 73 69 67 6e 65 64 2d 69 73 ))..(defun.forge--ls-assigned-is
275e0 73 75 65 73 20 28 72 65 70 6f 29 0a 20 20 28 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 69 73 73 sues.(repo)...(forge--select-iss
27600 75 65 73 20 72 65 70 6f 0a 20 20 20 20 5b 3a 66 72 6f 6d 20 69 73 73 75 65 0a 20 20 20 20 20 3a ues.repo.....[:from.issue......:
27620 6a 6f 69 6e 20 69 73 73 75 65 5f 61 73 73 69 67 6e 65 65 20 3a 6f 6e 20 28 3d 20 69 73 73 75 65 join.issue_assignee.:on.(=.issue
27640 5f 61 73 73 69 67 6e 65 65 3a 69 73 73 75 65 20 69 73 73 75 65 3a 69 64 29 0a 20 20 20 20 20 3a _assignee:issue.issue:id)......:
27660 6a 6f 69 6e 20 61 73 73 69 67 6e 65 65 20 20 20 20 20 20 20 3a 6f 6e 20 28 3d 20 69 73 73 75 65 join.assignee.......:on.(=.issue
27680 5f 61 73 73 69 67 6e 65 65 3a 69 64 20 20 20 20 61 73 73 69 67 6e 65 65 3a 69 64 29 0a 20 20 20 _assignee:id....assignee:id)....
276a0 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 69 73 73 75 65 3a 72 65 70 6f 73 69 74 6f 72 ..:where.(and.(=.issue:repositor
276c0 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 61 73 73 69 67 y.$s1)..................(=.assig
276e0 6e 65 65 3a 6c 6f 67 69 6e 20 20 20 24 73 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nee:login...$s2)................
27700 20 20 28 69 73 6e 75 6c 6c 20 69 73 73 75 65 3a 63 6c 6f 73 65 64 29 29 5d 0a 20 20 20 20 28 67 ..(isnull.issue:closed))].....(g
27720 68 75 62 2d 2d 75 73 65 72 6e 61 6d 65 20 72 65 70 6f 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f hub--username.repo)))..(defun.fo
27740 72 67 65 2d 2d 6c 73 2d 61 75 74 68 6f 72 65 64 2d 69 73 73 75 65 73 20 28 72 65 70 6f 29 0a 20 rge--ls-authored-issues.(repo)..
27760 20 28 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 69 73 73 75 65 73 20 72 65 70 6f 0a 20 20 20 20 .(forge--select-issues.repo.....
27780 5b 3a 66 72 6f 6d 20 5b 69 73 73 75 65 5d 0a 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 [:from.[issue]......:where.(and.
277a0 28 3d 20 69 73 73 75 65 3a 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 (=.issue:repository.$s1)........
277c0 20 20 20 20 20 20 20 20 20 20 28 3d 20 69 73 73 75 65 3a 61 75 74 68 6f 72 20 20 20 20 20 24 73 ..........(=.issue:author.....$s
277e0 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 6e 75 6c 6c 20 69 73 73 75 2)..................(isnull.issu
27800 65 3a 63 6c 6f 73 65 64 29 29 5d 0a 20 20 20 20 28 67 68 75 62 2d 2d 75 73 65 72 6e 61 6d 65 20 e:closed))].....(ghub--username.
27820 72 65 70 6f 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 6c 61 62 65 6c 65 repo)))..(defun.forge--ls-labele
27840 64 2d 69 73 73 75 65 73 20 28 72 65 70 6f 20 6c 61 62 65 6c 29 0a 20 20 28 66 6f 72 67 65 2d 2d d-issues.(repo.label)...(forge--
27860 73 65 6c 65 63 74 2d 69 73 73 75 65 73 20 72 65 70 6f 0a 20 20 20 20 5b 3a 66 72 6f 6d 20 69 73 select-issues.repo.....[:from.is
27880 73 75 65 0a 20 20 20 20 20 3a 6a 6f 69 6e 20 69 73 73 75 65 5f 6c 61 62 65 6c 20 3a 6f 6e 20 28 sue......:join.issue_label.:on.(
278a0 3d 20 69 73 73 75 65 5f 6c 61 62 65 6c 3a 69 73 73 75 65 20 69 73 73 75 65 3a 69 64 29 0a 20 20 =.issue_label:issue.issue:id)...
278c0 20 20 20 3a 6a 6f 69 6e 20 6c 61 62 65 6c 20 20 20 20 20 20 20 3a 6f 6e 20 28 3d 20 69 73 73 75 ...:join.label.......:on.(=.issu
278e0 65 5f 6c 61 62 65 6c 3a 69 64 20 20 20 20 6c 61 62 65 6c 3a 69 64 29 0a 20 20 20 20 20 3a 77 68 e_label:id....label:id)......:wh
27900 65 72 65 20 28 61 6e 64 20 28 3d 20 69 73 73 75 65 3a 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 ere.(and.(=.issue:repository.$s1
27920 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 6c 61 62 65 6c 3a 6e 61 6d 65 )..................(=.label:name
27940 20 20 20 20 20 20 20 24 73 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 .......$s2)..................(is
27960 6e 75 6c 6c 20 69 73 73 75 65 3a 63 6c 6f 73 65 64 29 29 5d 0a 20 20 20 20 6c 61 62 65 6c 29 29 null.issue:closed))].....label))
27980 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 20 ..(defun.forge--ls-owned-issues.
279a0 28 29 0a 20 20 28 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 69 73 73 75 65 73 20 6e 69 6c 0a 20 ()...(forge--select-issues.nil..
279c0 20 20 20 5b 3a 66 72 6f 6d 20 5b 69 73 73 75 65 20 72 65 70 6f 73 69 74 6f 72 79 5d 0a 20 20 20 ...[:from.[issue.repository]....
279e0 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 69 73 73 75 65 3a 72 65 70 6f 73 69 74 6f 72 ..:where.(and.(=.issue:repositor
27a00 79 20 72 65 70 6f 73 69 74 6f 72 79 3a 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 y.repository:id)................
27a20 20 20 28 69 6e 20 72 65 70 6f 73 69 74 6f 72 79 3a 6f 77 6e 65 72 20 24 76 31 29 0a 20 20 20 20 ..(in.repository:owner.$v1).....
27a40 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 69 6e 20 72 65 70 6f 73 69 74 6f 72 79 .............(not.(in.repository
27a60 3a 6e 61 6d 65 20 24 76 32 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 :name.$v2))..................(is
27a80 6e 75 6c 6c 20 69 73 73 75 65 3a 63 6c 6f 73 65 64 29 29 0a 20 20 20 20 20 3a 6f 72 64 65 72 2d null.issue:closed))......:order-
27aa0 62 79 20 5b 28 61 73 63 20 72 65 70 6f 73 69 74 6f 72 79 3a 6f 77 6e 65 72 29 0a 20 20 20 20 20 by.[(asc.repository:owner)......
27ac0 20 20 20 20 20 20 20 20 20 20 20 28 61 73 63 20 72 65 70 6f 73 69 74 6f 72 79 3a 6e 61 6d 65 29 ...........(asc.repository:name)
27ae0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 73 63 20 69 73 73 75 65 3a 6e 75 6d .................(desc.issue:num
27b00 62 65 72 29 5d 5d 0a 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 ber)]].....(vconcat.(mapcar.#'ca
27b20 72 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e 74 73 29 29 0a 20 20 20 20 28 76 63 r.forge-owned-accounts)).....(vc
27b40 6f 6e 63 61 74 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 69 67 6e 6f 72 65 64 29 29 29 0a 0a 28 64 oncat.forge-owned-ignored)))..(d
27b60 65 66 75 6e 20 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 69 73 73 75 65 73 20 28 72 65 70 6f 20 efun.forge--select-issues.(repo.
27b80 71 75 65 72 79 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e query.&rest.args)...(declare.(in
27ba0 64 65 6e 74 20 31 29 29 0a 20 20 28 6d 61 70 63 61 72 20 28 6c 65 74 20 28 28 64 62 20 28 66 6f dent.1))...(mapcar.(let.((db.(fo
27bc0 72 67 65 2d 64 62 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 rge-db))).............(lambda.(r
27be0 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 2d 72 65 6d 61 6b ow)...............(closql--remak
27c00 65 2d 69 6e 73 74 61 6e 63 65 20 27 66 6f 72 67 65 2d 69 73 73 75 65 20 64 62 20 72 6f 77 29 29 e-instance.'forge-issue.db.row))
27c20 29 0a 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 66 6f 72 67 65 2d 73 71 6c 0a 20 )...........(apply.#'forge-sql..
27c40 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 5b 3a 73 65 6c 65 63 ................(vconcat.[:selec
27c60 74 20 2a 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 71 t.*]...........................q
27c80 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 20 20 28 uery...........................(
27ca0 61 6e 64 20 28 6e 6f 74 20 28 63 6c 2d 66 69 6e 64 20 3a 6f 72 64 65 72 2d 62 79 20 71 75 65 72 and.(not.(cl-find.:order-by.quer
27cc0 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 20 20 20 20 20 20 y)).............................
27ce0 20 20 20 5b 3a 6f 72 64 65 72 2d 62 79 20 5b 28 64 65 73 63 20 75 70 64 61 74 65 64 29 5d 5d 29 ...[:order-by.[(desc.updated)]])
27d00 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 72 65 70 6f 0a 20 20 20 20 )..................(if.repo.....
27d20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 6f 72 65 66 20 72 65 70 .................(cons.(oref.rep
27d40 6f 20 69 64 29 20 61 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 o.id).args)....................a
27d60 72 67 73 29 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 rgs))))..;;;.Read..(defun.forge-
27d80 72 65 61 64 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 61 read-issue.(prompt)..."Read.an.a
27da0 63 74 69 76 65 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 ctive.issue.with.completion.usin
27dc0 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 64 20 70 65 6e 64 g.PROMPT...Open,.unread.and.pend
27de0 69 6e 67 20 69 73 73 75 65 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 61 63 74 69 76 65 ing.issues.are.considered.active
27e00 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 69 73 73 75 65 20 65 ..Default.to.the.current.issue.e
27e20 76 65 6e 20 69 66 20 69 74 20 69 73 6e 27 74 20 61 63 74 69 76 65 2e 0a 0a 5c 5c 3c 66 6f 72 67 ven.if.it.isn't.active...\\<forg
27e40 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 3e 57 68 69 6c e-read-topic-minibuffer-map>Whil
27e60 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 69 73 20 69 6e 20 5c 0a 70 72 6f 67 72 65 73 73 2c 20 5c e.completion.is.in.\.progress,.\
27e80 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 5d 20 6c \[forge-read-topic-lift-limit].l
27ea0 69 66 74 73 20 74 68 65 20 6c 69 6d 69 74 2c 20 65 78 74 65 6e 64 69 6e 67 0a 74 68 65 20 63 6f ifts.the.limit,.extending.the.co
27ec0 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 61 74 65 73 20 74 6f 20 69 6e 63 6c 75 64 65 20 61 mpletion.candidates.to.include.a
27ee0 6c 6c 20 69 73 73 75 65 73 2e 0a 0a 49 66 20 60 66 6f 72 67 65 2d 6c 69 6d 69 74 2d 74 6f 70 69 ll.issues...If.`forge-limit-topi
27f00 63 2d 63 68 6f 69 63 65 73 27 20 69 73 20 6e 69 6c 2c 20 74 68 65 6e 20 61 6c 6c 20 63 61 6e 64 c-choices'.is.nil,.then.all.cand
27f20 69 64 61 74 65 73 0a 63 61 6e 20 62 65 20 73 65 6c 65 63 74 65 64 20 66 72 6f 6d 20 74 68 65 20 idates.can.be.selected.from.the.
27f40 73 74 61 72 74 2e 22 0a 20 20 28 66 6f 72 67 65 2d 2d 72 65 61 64 2d 74 6f 70 69 63 20 70 72 6f start."...(forge--read-topic.pro
27f60 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 23 27 66 6f 72 67 65 mpt......................#'forge
27f80 2d 63 75 72 72 65 6e 74 2d 69 73 73 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -current-issue..................
27fa0 20 20 20 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 61 63 74 69 76 65 2d 69 73 73 75 65 73 0a 20 20 ....#'forge--ls-active-issues...
27fc0 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 2d 6c 73 2d 69 ...................#'forge--ls-i
27fe0 73 73 75 65 73 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 6f 70 65 6e 2d ssues))..(defun.forge-read-open-
28000 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 70 65 6e 20 69 issue.(prompt)..."Read.an.open.i
28020 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 50 52 4f 4d 50 ssue.with.completion.using.PROMP
28040 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 65 2d 63 75 72 T."...(let*.((current.(forge-cur
28060 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 20 20 20 20 28 rent-issue))..........(repo....(
28080 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 72 72 65 6e 74 forge-get-repository.(or.current
280a0 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 75 6c 74 20 28 .:tracked)))..........(default.(
280c0 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 74 6f 70 69 63 and.current.(forge--format-topic
280e0 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 61 6c 69 73 74 -line.current)))..........(alist
28100 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 20 28 66 6f 72 ...(forge--topic-collection.(for
28120 67 65 2d 2d 6c 73 2d 6f 70 65 6e 2d 69 73 73 75 65 73 20 72 65 70 6f 29 29 29 0a 20 20 20 20 20 ge--ls-open-issues.repo)))......
28140 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 72 20 61 6c 69 73 74 ....(choices.(mapcar.#'car.alist
28160 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 20 20 28 6d 61 67 69 74 2d 63 6f 6d 70 ))..........(choice..(magit-comp
28180 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
281a0 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 63 64 72 20 28 61 73 .nil.nil.default))).....(cdr.(as
281c0 73 6f 63 20 63 68 6f 69 63 65 20 61 6c 69 73 74 29 29 29 29 0a 0a 3b 3b 3b 20 49 6e 73 65 72 74 soc.choice.alist))))..;;;.Insert
281e0 0a 0a 28 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 73 2d 73 65 ..(defvar-keymap.forge-issues-se
28200 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 62 72 6f 77 ction-map..."<remap>.<magit-brow
28220 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 2d 69 73 73 75 65 73 se-thing>".#'forge-browse-issues
28240 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 67 3e 22 ..."<remap>.<magit-visit-thing>"
28260 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 43 2d 63 20 43 2d 6d ..#'forge-list-issues..."C-c.C-m
28280 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 2d 74 "......................#'forge-t
282a0 6f 70 69 63 73 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 opics-menu..."C-c.C-n"..........
282c0 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 65 2d 69 73 73 75 65 ............#'forge-create-issue
282e0 29 0a 0a 28 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 73 65 )..(defvar-keymap.forge-issue-se
28300 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 76 69 73 69 ction-map..."<remap>.<magit-visi
28320 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 68 69 73 2d 74 6f t-thing>"..#'forge-visit-this-to
28340 70 69 63 0a 20 20 22 43 2d 63 20 43 2d 6d 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pic..."C-c.C-m".................
28360 20 20 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 0a 0a 28 64 65 66 75 6e .....#'forge-topic-menu)..(defun
28380 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 69 73 73 75 65 73 20 28 29 0a 20 20 22 49 6e 73 65 72 .forge-insert-issues.()..."Inser
283a0 74 20 61 20 6c 69 73 74 20 6f 66 20 6d 6f 73 74 6c 79 20 72 65 63 65 6e 74 20 61 6e 64 2f 6f 72 t.a.list.of.mostly.recent.and/or
283c0 20 6f 70 65 6e 20 69 73 73 75 65 73 2e 0a 41 6c 73 6f 20 73 65 65 20 6f 70 74 69 6f 6e 20 60 66 .open.issues..Also.see.option.`f
283e0 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6c 69 6d 69 74 27 2e 22 0a 20 20 28 66 6f 72 67 orge-topic-list-limit'."...(forg
28400 65 2d 2d 69 6e 73 65 72 74 2d 69 73 73 75 65 73 20 22 49 73 73 75 65 73 22 20 23 27 66 6f 72 67 e--insert-issues."Issues".#'forg
28420 65 2d 2d 6c 73 2d 72 65 63 65 6e 74 2d 69 73 73 75 65 73 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f e--ls-recent-issues))..(defun.fo
28440 72 67 65 2d 69 6e 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 rge-insert-assigned-issues.()...
28460 22 49 6e 73 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 6f 70 65 6e 20 69 73 73 75 65 73 20 74 68 "Insert.a.list.of.open.issues.th
28480 61 74 20 61 72 65 20 61 73 73 69 67 6e 65 64 20 74 6f 20 79 6f 75 2e 22 0a 20 20 28 66 6f 72 67 at.are.assigned.to.you."...(forg
284a0 65 2d 2d 69 6e 73 65 72 74 2d 69 73 73 75 65 73 20 22 41 73 73 69 67 6e 65 64 20 69 73 73 75 65 e--insert-issues."Assigned.issue
284c0 73 22 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 61 73 73 69 67 6e 65 64 2d 69 73 73 75 65 73 29 29 s".#'forge--ls-assigned-issues))
284e0 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 61 75 74 68 6f 72 65 64 2d 69 ..(defun.forge-insert-authored-i
28500 73 73 75 65 73 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 6f 70 65 ssues.()..."Insert.a.list.of.ope
28520 6e 20 69 73 73 75 65 73 20 74 68 61 74 20 61 72 65 20 61 75 74 68 6f 72 65 64 20 62 79 20 79 6f n.issues.that.are.authored.by.yo
28540 75 2e 22 0a 20 20 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 69 73 73 75 65 73 20 22 41 75 74 u."...(forge--insert-issues."Aut
28560 68 6f 72 65 64 20 69 73 73 75 65 73 22 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 61 73 73 69 67 6e hored.issues".#'forge--ls-assign
28580 65 64 2d 69 73 73 75 65 73 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 69 6e 73 65 72 ed-issues))..(defun.forge--inser
285a0 74 2d 69 73 73 75 65 73 20 28 68 65 61 64 69 6e 67 20 67 65 74 74 65 72 29 0a 20 20 28 77 68 65 t-issues.(heading.getter)...(whe
285c0 6e 2d 6c 65 74 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 2d 61 73 73 65 72 74 2d 69 6e 73 65 n-let.((repo.(forge--assert-inse
285e0 72 74 2d 74 6f 70 69 63 73 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 74 29 29 29 0a 20 20 rt-topics-get-repository.t)))...
28600 20 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 20 ..(forge--insert-topics.'issues.
28620 68 65 61 64 69 6e 67 20 28 66 75 6e 63 61 6c 6c 20 67 65 74 74 65 72 20 72 65 70 6f 29 29 29 29 heading.(funcall.getter.repo))))
28640 0a 0a 3b 3b 3b 20 5f 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 0a 3b ..;;;._.(provide.'forge-issue).;
28660 3b 3b 20 66 6f 72 67 65 2d 69 73 73 75 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 ;;.forge-issue.el.ends.here.....
28680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
286a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
286c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
286e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
28700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
28720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
28740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
28760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
28780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
287a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
287c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
287e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
28800 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 70 75 6c 6c 72 65 forge-20240405.1509/forge-pullre
28820 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............................
28840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
28860 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
28880 30 30 33 32 35 31 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 32 32 33 00 20 30 00 00 00 0032512.00000000000.015223..0...
288a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
288c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
288e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
28900 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...................
28920 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...................
28940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
28960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
28980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
289a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
289c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
289e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
28a00 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
28a20 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.
28a40 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 34 20 -*-..;;.Copyright.(C).2018-2024.
28a60 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
28a80 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 2e 6c 69 3e 0a 3b s.Bernoulli.<jonas@bernoul.li>.;
28aa0 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 6c 6c 69 20 3c 6a ;.Maintainer:.Jonas.Bernoulli.<j
28ac0 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 4c 69 63 65 6e 73 onas@bernoul.li>..;;.SPDX-Licens
28ae0 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 0a e-Identifier:.GPL-3.0-or-later..
28b00 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 79 ;;.This.file.is.free.software:.y
28b20 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 6f ou.can.redistribute.it.and/or.mo
28b40 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 68 dify.;;.it.under.the.terms.of.th
28b60 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 20 e.GNU.General.Public.License.as.
28b80 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 72 published.;;.by.the.Free.Softwar
28ba0 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 6f e.Foundation,.either.version.3.o
28bc0 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 70 f.the.License,.;;.or.(at.your.op
28be0 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 54 tion).any.later.version..;;.;;.T
28c00 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 68 his.file.is.distributed.in.the.h
28c20 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 62 ope.that.it.will.be.useful,.;;.b
28c40 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 74 ut.WITHOUT.ANY.WARRANTY;.without
28c60 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 3b .even.the.implied.warranty.of.;;
28c80 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 20 .MERCHANTABILITY.or.FITNESS.FOR.
28ca0 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 3b A.PARTICULAR.PURPOSE...See.the.;
28cc0 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 72 ;.GNU.General.Public.License.for
28ce0 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 20 .more.details..;;.;;.You.should.
28d00 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 20 have.received.a.copy.of.the.GNU.
28d20 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 20 General.Public.License.;;.along.
28d40 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 74 with.this.file...If.not,.see.<ht
28d60 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 3b tps://www.gnu.org/licenses/>...;
28d80 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 28 72 65 71 75 ;;.Code:..(require.'forge).(requ
28da0 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 27 66 6f 72 67 65 ire.'forge-post).(require.'forge
28dc0 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 63 6c 61 73 73 20 -topic)..;;;.Classes..(defclass.
28de0 66 6f 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 forge-pullreq.(forge-topic)...((
28e00 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 27 closql-table.........:initform.'
28e20 70 75 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 pullreq)....(closql-primary-key.
28e40 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 65 ..:initform.'id)....(closql-orde
28e60 72 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 r-by......:initform.[(desc.numbe
28e80 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
28ea0 6e 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 nitform.'repository)....(closql-
28ec0 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 22 class-prefix..:initform."forge-"
28ee0 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 20 3a 69 6e 69 74 )....(id...................:init
28f00 61 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 arg.:id)....(repository.........
28f20 20 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 6e 75 6d 62 ..:initarg.:repository)....(numb
28f40 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 75 6d 62 65 er...............:initarg.:numbe
28f60 72 29 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 r)....(state................:ini
28f80 74 61 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 targ.:state)....(author.........
28fa0 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 20 20 28 74 69 74 6c ......:initarg.:author)....(titl
28fc0 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 74 69 74 6c 65 e................:initarg.:title
28fe0 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 69 6e 69 74 )....(created..............:init
29000 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 20 20 20 20 arg.:created)....(updated.......
29020 20 20 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 .......:initarg.:updated.:initfo
29040 72 6d 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 rm.nil)....(closed..............
29060 20 3a 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 .:initarg.:closed)....(merged...
29080 20 20 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 ............:initarg.:merged)...
290a0 20 28 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 .(status...............:initarg.
290c0 3a 73 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 :status.:initform.nil)....(locke
290e0 64 2d 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 d-p.............:initarg.:locked
29100 2d 70 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 -p)....(editable-p...........:in
29120 69 74 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 itarg.:editable-p)....(cross-rep
29140 6f 2d 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 o-p.........:initarg.:cross-repo
29160 2d 70 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 -p)....(base-ref.............:in
29180 69 74 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 itarg.:base-ref)....(base-repo..
291a0 20 20 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 ..........:initarg.:base-repo)..
291c0 20 20 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 ..(head-ref.............:initarg
291e0 20 3a 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 .:head-ref)....(head-user.......
29200 20 20 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 .....:initarg.:head-user)....(he
29220 61 64 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 ad-repo............:initarg.:hea
29240 64 2d 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 d-repo)....(milestone...........
29260 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 28 62 6f 64 79 20 20 .:initarg.:milestone)....(body..
29280 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 62 6f 64 79 29 0a 20 ...............:initarg.:body)..
292a0 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 63 6c 6f 73 71 6c 2d ..(assignees............:closql-
292c0 74 61 62 6c 65 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 table.(pullreq-assignee.assignee
292e0 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 6f 6a 65 63 74 73 ))....(project-cards).;.projects
29300 43 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 Cards....(commits)....(edits).;.
29320 75 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 userContentEdits....(labels.....
29340 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 28 70 75 6c 6c 72 65 71 ..........:closql-table.(pullreq
29360 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)
29380 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
293a0 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)....(
293c0 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..
293e0 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 28 70 75 6c 6c 72 65 71 2d 72 65 76 69 65 ....:closql-table.(pullreq-revie
29400 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 73 w-request.assignee))....(reviews
29420 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 20 )....(timeline)....(marks.......
29440 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 28 70 75 6c 6c 72 65 71 2d .........:closql-table.(pullreq-
29460 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 20 20 mark.mark))....(note............
29480 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 6e 69 .....:initarg.:note.:initform.ni
294a0 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 6e 69 l)....(base-rev.............:ini
294c0 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 20 20 targ.:base-rev)....(head-rev....
294e0 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 20 20 .........:initarg.:head-rev)....
29500 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 20 3a (draft-p..............:initarg.:
29520 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 20 20 draft-p)....(their-id...........
29540 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 20 20 ..:initarg.:their-id)....(slug..
29560 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 0a 20 ...............:initarg.:slug)..
29580 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 72 67 ..(saved-p..............:initarg
295a0 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 0a 0a .:saved-p.:initform.nil)....))..
295c0 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f 73 74 20 28 66 6f (defclass.forge-pullreq-post.(fo
295e0 72 67 65 2d 70 6f 73 74 29 0a 20 20 28 28 63 6c 6f 73 71 6c 2d 74 61 62 6c 65 20 20 20 20 20 20 rge-post)...((closql-table......
29600 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 27 70 75 6c 6c 72 65 71 2d 70 6f 73 74 29 0a 20 20 20 28 ...:initform.'pullreq-post)....(
29620 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 6d 20 27 closql-primary-key...:initform.'
29640 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 3a 69 6e id)....(closql-order-by......:in
29660 69 74 66 6f 72 6d 20 5b 28 61 73 63 20 6e 75 6d 62 65 72 29 5d 29 0a 20 20 20 28 63 6c 6f 73 71 itform.[(asc.number)])....(closq
29680 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 70 75 6c 6c 72 l-foreign-key...:initform.'pullr
296a0 65 71 29 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 eq)....(closql-class-prefix..:in
296c0 69 74 66 6f 72 6d 20 22 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 22 29 0a 20 20 20 28 69 64 20 itform."forge-pullreq-")....(id.
296e0 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 67 20 3a 69 64 29 0a ..................:initarg.:id).
29700 20 20 20 28 70 75 6c 6c 72 65 71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 ...(pullreq..............:initar
29720 67 20 3a 70 75 6c 6c 72 65 71 29 0a 20 20 20 28 6e 75 6d 62 65 72 20 20 20 20 20 20 20 20 20 20 g.:pullreq)....(number..........
29740 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 61 75 74 68 6f .....:initarg.:number)....(autho
29760 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 74 68 6f 72 r...............:initarg.:author
29780 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 69 6e 69 74 )....(created..............:init
297a0 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 20 20 20 20 arg.:created)....(updated.......
297c0 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 20 28 62 6f .......:initarg.:updated)....(bo
297e0 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 62 6f 64 dy.................:initarg.:bod
29800 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 0a 20 20 20 y)....(edits)....(reactions)....
29820 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 6c 2d 64 65 66 6d ))..;;;.Query.;;;;.Get..(cl-defm
29840 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 73 ethod.forge-get-repository.((pos
29860 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 2d t.forge-pullreq-post))...(forge-
29880 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 70 75 6c 6c 72 65 get-repository.(forge-get-pullre
298a0 71 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 2d 67 q.post)))..(cl-defmethod.forge-g
298c0 65 74 2d 74 6f 70 69 63 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f et-topic.((post.forge-pullreq-po
298e0 73 74 29 29 0a 20 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 st))...(forge-get-pullreq.post))
29900 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
29920 71 20 28 28 70 75 6c 6c 72 65 71 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 0a 20 20 70 75 q.((pullreq.forge-pullreq))...pu
29940 6c 6c 72 65 71 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 llreq)..(cl-defmethod.forge-get-
29960 70 75 6c 6c 72 65 71 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 pullreq.((repo.forge-repository)
29980 20 6e 75 6d 62 65 72 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 .number)...(closql-get.(forge-db
299a0 29 0a 20 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 )...............(forge--object-i
299c0 64 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 20 72 65 70 6f 20 6e 75 6d 62 65 72 29 0a 20 20 d.'forge-pullreq.repo.number)...
299e0 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 0a 0a 28 63 ............'forge-pullreq))..(c
29a00 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.((
29a20 6e 75 6d 62 65 72 20 69 6e 74 65 67 65 72 29 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 72 number.integer))...(and-let*.((r
29a40 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
29a60 65 64 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 72 65 70 ed))).....(forge-get-pullreq.rep
29a80 6f 20 6e 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 o.number)))..(cl-defmethod.forge
29aa0 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 28 28 69 64 20 73 74 72 69 6e 67 29 29 0a 20 20 28 63 6c -get-pullreq.((id.string))...(cl
29ac0 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 70 75 osql-get.(forge-db).id.'forge-pu
29ae0 6c 6c 72 65 71 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 llreq))..(cl-defmethod.forge-get
29b00 2d 70 75 6c 6c 72 65 71 20 28 28 70 6f 73 74 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 6f -pullreq.((post.forge-pullreq-po
29b20 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 64 62 29 0a 20 20 st))...(closql-get.(forge-db)...
29b40 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 70 6f 73 74 20 70 75 6c 6c 72 65 71 29 0a ............(oref.post.pullreq).
29b60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 29 0a 0a ..............'forge-pullreq))..
29b80 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 71 20 (cl-defmethod.forge-get-pullreq.
29ba0 28 28 5f 28 65 71 6c 20 3a 62 72 61 6e 63 68 29 29 20 62 72 61 6e 63 68 29 0a 20 20 28 61 6e 64 ((_(eql.:branch)).branch)...(and
29bc0 20 62 72 61 6e 63 68 0a 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 62 72 61 6e 63 .branch........(and-let*.((branc
29be0 68 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 6d 65 20 h.(cdr.(magit-split-branch-name.
29c00 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 20 28 6e 75 6d branch)))...................(num
29c20 62 65 72 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 63 68 20 22 ber.(magit-get."branch".branch."
29c40 70 75 6c 6c 52 65 71 75 65 73 74 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d pullRequest")))..........(forge-
29c60 67 65 74 2d 70 75 6c 6c 72 65 71 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 6e 75 get-pullreq.(string-to-number.nu
29c80 6d 62 65 72 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 43 75 72 72 65 6e 74 0a 0a 28 64 65 66 75 6e 20 mber)))))..;;;;.Current..(defun.
29ca0 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 70 75 6c 6c 72 65 71 20 28 26 6f 70 74 69 6f 6e 61 6c forge-current-pullreq.(&optional
29cc0 20 64 65 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 .demand)..."Return.the.pull-requ
29ce0 65 73 74 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 64 2e 0a 49 est.at.point.or.being.visited..I
29d00 66 20 74 68 65 72 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 f.there.is.no.such.pull-request.
29d20 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 67 6e and.DEMAND.is.non-nil,.then.sign
29d40 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 65 2d 70 75 6c 6c 72 al.an.error."...(or.(forge-pullr
29d60 65 71 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 64 65 72 69 76 65 64 eq-at-point).......(and.(derived
29d80 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 0a 20 20 20 20 20 -mode-p.'forge-topic-mode)......
29da0 20 20 20 20 20 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 ......(forge-pullreq-p.forge-buf
29dc0 66 65 72 2d 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 fer-topic)............forge-buff
29de0 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 73 65 er-topic).......(and.demand.(use
29e00 72 2d 65 72 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 r-error."No.current.pull-request
29e20 22 29 29 29 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 "))))..(defun.forge-pullreq-at-p
29e40 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 65 74 75 72 oint.(&optional.demand)..."Retur
29e60 6e 20 74 68 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 n.the.pull-request.at.point..If.
29e80 74 68 65 72 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 there.is.no.such.pull-request.an
29ea0 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
29ec0 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
29ee0 74 20 27 66 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 t.'forge-pullreq).......(magit-s
29f00 65 63 74 69 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 ection-value-if.'pullreq).......
29f20 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 28 6d 61 67 69 (forge-get-pullreq.:branch.(magi
29f40 74 2d 62 72 61 6e 63 68 2d 61 74 2d 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 t-branch-at-point)).......(and.(
29f60 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 6c 69 73 74 derived-mode-p.'forge-topic-list
29f80 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 69 64 -mode)............(and-let*.((id
29fa0 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 0a 20 20 20 20 20 20 .(tabulated-list-get-id)).......
29fc0 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 6f 72 67 65 2d 67 65 ................(topic.(forge-ge
29fe0 74 2d 74 6f 70 69 63 20 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 t-topic.id)))..............(and.
2a000 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 20 (forge-pullreq-p.topic).........
2a020 20 20 20 20 20 20 20 20 20 20 74 6f 70 69 63 29 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 64 65 ..........topic))).......(and.de
2a040 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 65 71 75 65 73 mand.(user-error."No.pull-reques
2a060 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 65 2d 70 75 6c t.at.point"))))..(put.'forge-pul
2a080 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 65 2d 74 68 69 lreq.'thing-at-point.#'forge-thi
2a0a0 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 67 65 2d 74 68 ngatpt--pullreq).(defun.forge-th
2a0c0 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 6c 65 74 2a 20 ingatpt--pullreq.()...(and-let*.
2a0e0 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 2d 72 65 70 6f 2d 66 6f 72 2d 74 68 69 6e 67 61 74 70 ((repo.(forge--repo-for-thingatp
2a100 74 29 29 29 0a 20 20 20 20 28 61 6e 64 20 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 2d 6c 6f t))).....(and.(thing-at-point-lo
2a120 6f 6b 69 6e 67 2d 61 74 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 6f 72 67 65 2d 67 69 oking-at...........(if.(forge-gi
2a140 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 72 65 tlab-repository--eieio-childp.re
2a160 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5b 23 21 5d 5c 5c 28 5b 30 2d 39 5d 2b po)..............."[#!]\\([0-9]+
2a180 5c 5c 29 5c 5c 5f 3e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 23 5c 5c 28 5b 30 2d 39 5d 2b \\)\\_>"............."#\\([0-9]+
2a1a0 5c 5c 29 5c 5c 5f 3e 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 \\)\\_>"))..........(forge-get-p
2a1c0 75 6c 6c 72 65 71 20 72 65 70 6f 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 28 6d ullreq.repo.(string-to-number.(m
2a1e0 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 4c 69 73 74 0a 0a atch-string.1))))))..;;;;.List..
2a200 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 72 65 63 65 6e 74 2d 70 75 6c 6c 72 65 71 73 (defun.forge--ls-recent-pullreqs
2a220 20 28 72 65 70 6f 29 0a 20 20 28 66 6f 72 67 65 2d 6c 73 2d 72 65 63 65 6e 74 2d 74 6f 70 69 63 .(repo)...(forge-ls-recent-topic
2a240 73 20 72 65 70 6f 20 27 70 75 6c 6c 72 65 71 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d s.repo.'pullreq))..(defun.forge-
2a260 2d 6c 73 2d 70 75 6c 6c 72 65 71 73 20 28 72 65 70 6f 29 0a 20 20 28 66 6f 72 67 65 2d 2d 73 65 -ls-pullreqs.(repo)...(forge--se
2a280 6c 65 63 74 2d 70 75 6c 6c 72 65 71 73 20 72 65 70 6f 0a 20 20 20 20 5b 3a 66 72 6f 6d 20 70 75 lect-pullreqs.repo.....[:from.pu
2a2a0 6c 6c 72 65 71 20 3a 77 68 65 72 65 20 28 3d 20 70 75 6c 6c 72 65 71 3a 72 65 70 6f 73 69 74 6f llreq.:where.(=.pullreq:reposito
2a2c0 72 79 20 24 73 31 29 5d 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 61 63 74 ry.$s1)]))..(defun.forge--ls-act
2a2e0 69 76 65 2d 70 75 6c 6c 72 65 71 73 20 28 72 65 70 6f 29 0a 20 20 28 66 6f 72 67 65 2d 2d 73 65 ive-pullreqs.(repo)...(forge--se
2a300 6c 65 63 74 2d 70 75 6c 6c 72 65 71 73 20 72 65 70 6f 0a 20 20 20 20 5b 3a 66 72 6f 6d 20 70 75 lect-pullreqs.repo.....[:from.pu
2a320 6c 6c 72 65 71 0a 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 70 75 6c 6c 72 65 llreq......:where.(and.(=.pullre
2a340 71 3a 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 q:repository.$s1)...............
2a360 20 20 20 28 6f 72 20 28 3d 20 70 75 6c 6c 72 65 71 3a 73 74 61 74 65 20 27 6f 70 65 6e 29 0a 20 ...(or.(=.pullreq:state.'open)..
2a380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 20 70 75 6c 6c 72 65 71 3a ....................(in.pullreq:
2a3a0 73 74 61 74 75 73 20 5b 70 65 6e 64 69 6e 67 20 75 6e 72 65 61 64 5d 29 29 29 5d 29 29 0a 0a 28 status.[pending.unread])))]))..(
2a3c0 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 61 73 73 69 67 6e 65 64 2d 70 75 6c 6c 72 65 71 defun.forge--ls-assigned-pullreq
2a3e0 73 20 28 72 65 70 6f 29 0a 20 20 28 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 70 75 6c 6c 72 65 s.(repo)...(forge--select-pullre
2a400 71 73 20 72 65 70 6f 0a 20 20 20 20 5b 3a 66 72 6f 6d 20 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 qs.repo.....[:from.pullreq......
2a420 3a 6a 6f 69 6e 20 70 75 6c 6c 72 65 71 5f 61 73 73 69 67 6e 65 65 20 3a 6f 6e 20 28 3d 20 70 75 :join.pullreq_assignee.:on.(=.pu
2a440 6c 6c 72 65 71 5f 61 73 73 69 67 6e 65 65 3a 70 75 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 3a 69 llreq_assignee:pullreq.pullreq:i
2a460 64 29 0a 20 20 20 20 20 3a 6a 6f 69 6e 20 61 73 73 69 67 6e 65 65 20 20 20 20 20 20 20 20 20 3a d)......:join.assignee.........:
2a480 6f 6e 20 28 3d 20 70 75 6c 6c 72 65 71 5f 61 73 73 69 67 6e 65 65 3a 69 64 20 20 20 20 20 20 61 on.(=.pullreq_assignee:id......a
2a4a0 73 73 69 67 6e 65 65 3a 69 64 29 0a 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 ssignee:id)......:where.(and.(=.
2a4c0 70 75 6c 6c 72 65 71 3a 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 20 20 20 pullreq:repository.$s1).........
2a4e0 20 20 20 20 20 20 20 20 20 28 3d 20 61 73 73 69 67 6e 65 65 3a 6c 6f 67 69 6e 20 20 20 20 20 24 .........(=.assignee:login.....$
2a500 73 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 6e 75 6c 6c 20 70 75 6c s2)..................(isnull.pul
2a520 6c 72 65 71 3a 63 6c 6f 73 65 64 29 29 5d 0a 20 20 20 20 28 67 68 75 62 2d 2d 75 73 65 72 6e 61 lreq:closed))].....(ghub--userna
2a540 6d 65 20 72 65 70 6f 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 72 65 71 me.repo)))..(defun.forge--ls-req
2a560 75 65 73 74 65 64 2d 72 65 76 69 65 77 73 20 28 72 65 70 6f 29 0a 20 20 28 66 6f 72 67 65 2d 2d uested-reviews.(repo)...(forge--
2a580 73 65 6c 65 63 74 2d 70 75 6c 6c 72 65 71 73 20 72 65 70 6f 0a 20 20 20 20 5b 3a 66 72 6f 6d 20 select-pullreqs.repo.....[:from.
2a5a0 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 3a 6a 6f 69 6e 20 70 75 6c 6c 72 65 71 5f 72 65 76 69 65 pullreq......:join.pullreq_revie
2a5c0 77 5f 72 65 71 75 65 73 74 20 3a 6f 6e 20 28 3d 20 70 75 6c 6c 72 65 71 5f 72 65 76 69 65 77 5f w_request.:on.(=.pullreq_review_
2a5e0 72 65 71 75 65 73 74 3a 70 75 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 3a 69 64 29 0a 20 20 20 20 request:pullreq.pullreq:id).....
2a600 20 3a 6a 6f 69 6e 20 61 73 73 69 67 6e 65 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f .:join.assignee...............:o
2a620 6e 20 28 3d 20 70 75 6c 6c 72 65 71 5f 72 65 76 69 65 77 5f 72 65 71 75 65 73 74 3a 69 64 20 20 n.(=.pullreq_review_request:id..
2a640 20 20 20 20 61 73 73 69 67 6e 65 65 3a 69 64 29 0a 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e ....assignee:id)......:where.(an
2a660 64 20 28 3d 20 70 75 6c 6c 72 65 71 3a 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 d.(=.pullreq:repository.$s1)....
2a680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 61 73 73 69 67 6e 65 65 3a 6c 6f 67 69 6e 20 ..............(=.assignee:login.
2a6a0 20 20 20 20 24 73 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 6e 75 6c ....$s2)..................(isnul
2a6c0 6c 20 70 75 6c 6c 72 65 71 3a 63 6c 6f 73 65 64 29 29 5d 0a 20 20 20 20 28 67 68 75 62 2d 2d 75 l.pullreq:closed))].....(ghub--u
2a6e0 73 65 72 6e 61 6d 65 20 72 65 70 6f 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c sername.repo)))..(defun.forge--l
2a700 73 2d 61 75 74 68 6f 72 65 64 2d 70 75 6c 6c 72 65 71 73 20 28 72 65 70 6f 29 0a 20 20 28 66 6f s-authored-pullreqs.(repo)...(fo
2a720 72 67 65 2d 2d 73 65 6c 65 63 74 2d 70 75 6c 6c 72 65 71 73 20 72 65 70 6f 0a 20 20 20 20 5b 3a rge--select-pullreqs.repo.....[:
2a740 66 72 6f 6d 20 5b 70 75 6c 6c 72 65 71 5d 0a 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 from.[pullreq]......:where.(and.
2a760 28 3d 20 70 75 6c 6c 72 65 71 3a 72 65 70 6f 73 69 74 6f 72 79 20 24 73 31 29 0a 20 20 20 20 20 (=.pullreq:repository.$s1)......
2a780 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 70 75 6c 6c 72 65 71 3a 61 75 74 68 6f 72 20 20 20 ............(=.pullreq:author...
2a7a0 20 20 24 73 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 6e 75 6c 6c 20 ..$s2)..................(isnull.
2a7c0 70 75 6c 6c 72 65 71 3a 63 6c 6f 73 65 64 29 29 5d 0a 20 20 20 20 28 67 68 75 62 2d 2d 75 73 65 pullreq:closed))].....(ghub--use
2a7e0 72 6e 61 6d 65 20 72 65 70 6f 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d rname.repo)))..(defun.forge--ls-
2a800 6c 61 62 65 6c 65 64 2d 70 75 6c 6c 72 65 71 73 20 28 72 65 70 6f 20 6c 61 62 65 6c 29 0a 20 20 labeled-pullreqs.(repo.label)...
2a820 28 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 70 75 6c 6c 72 65 71 73 20 72 65 70 6f 0a 20 20 20 (forge--select-pullreqs.repo....
2a840 20 5b 3a 66 72 6f 6d 20 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 3a 6a 6f 69 6e 20 70 75 6c 6c 72 .[:from.pullreq......:join.pullr
2a860 65 71 5f 6c 61 62 65 6c 20 3a 6f 6e 20 28 3d 20 70 75 6c 6c 72 65 71 5f 6c 61 62 65 6c 3a 70 75 eq_label.:on.(=.pullreq_label:pu
2a880 6c 6c 72 65 71 20 70 75 6c 6c 72 65 71 3a 69 64 29 0a 20 20 20 20 20 3a 6a 6f 69 6e 20 6c 61 62 llreq.pullreq:id)......:join.lab
2a8a0 65 6c 20 20 20 20 20 20 20 20 20 3a 6f 6e 20 28 3d 20 70 75 6c 6c 72 65 71 5f 6c 61 62 65 6c 3a el.........:on.(=.pullreq_label:
2a8c0 69 64 20 20 20 20 20 20 6c 61 62 65 6c 3a 69 64 29 0a 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 id......label:id)......:where.(a
2a8e0 6e 64 20 28 3d 20 70 75 6c 6c 72 65 71 3a 72 65 70 6f 73 69 74 6f 72 79 20 20 24 73 31 29 0a 20 nd.(=.pullreq:repository..$s1)..
2a900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 6c 61 62 65 6c 3a 6e 61 6d 65 20 20 20 ................(=.label:name...
2a920 20 20 20 20 20 24 73 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 6e 75 .....$s2)..................(isnu
2a940 6c 6c 20 70 75 6c 6c 72 65 71 3a 63 6c 6f 73 65 64 29 29 5d 0a 20 20 20 20 6c 61 62 65 6c 29 29 ll.pullreq:closed))].....label))
2a960 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 6c 73 2d 6f 77 6e 65 64 2d 70 75 6c 6c 72 65 71 ..(defun.forge--ls-owned-pullreq
2a980 73 20 28 29 0a 20 20 28 66 6f 72 67 65 2d 2d 73 65 6c 65 63 74 2d 70 75 6c 6c 72 65 71 73 20 6e s.()...(forge--select-pullreqs.n
2a9a0 69 6c 0a 20 20 20 20 5b 3a 66 72 6f 6d 20 5b 70 75 6c 6c 72 65 71 20 72 65 70 6f 73 69 74 6f 72 il.....[:from.[pullreq.repositor
2a9c0 79 5d 0a 20 20 20 20 20 3a 77 68 65 72 65 20 28 61 6e 64 20 28 3d 20 70 75 6c 6c 72 65 71 3a 72 y]......:where.(and.(=.pullreq:r
2a9e0 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 73 69 74 6f 72 79 3a 69 64 29 0a 20 20 20 20 20 20 20 epository.repository:id)........
2aa00 20 20 20 20 20 20 20 20 20 20 28 69 6e 20 72 65 70 6f 73 69 74 6f 72 79 3a 6f 77 6e 65 72 20 24 ..........(in.repository:owner.$
2aa20 76 31 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 69 6e 20 72 65 v1)..................(not.(in.re
2aa40 70 6f 73 69 74 6f 72 79 3a 6e 61 6d 65 20 24 76 32 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 pository:name.$v2)).............
2aa60 20 20 20 20 20 28 69 73 6e 75 6c 6c 20 70 75 6c 6c 72 65 71 3a 63 6c 6f 73 65 64 29 29 0a 20 20 .....(isnull.pullreq:closed))...
2aa80 20 20 20 3a 6f 72 64 65 72 2d 62 79 20 5b 28 61 73 63 20 72 65 70 6f 73 69 74 6f 72 79 3a 6f 77 ...:order-by.[(asc.repository:ow
2aaa0 6e 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 63 20 72 65 70 6f 73 69 ner).................(asc.reposi
2aac0 74 6f 72 79 3a 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 73 63 tory:name).................(desc
2aae0 20 70 75 6c 6c 72 65 71 3a 6e 75 6d 62 65 72 29 5d 5d 0a 20 20 20 20 28 76 63 6f 6e 63 61 74 20 .pullreq:number)]].....(vconcat.
2ab00 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e (mapcar.#'car.forge-owned-accoun
2ab20 74 73 29 29 0a 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 ts)).....(vconcat.forge-owned-ig
2ab40 6e 6f 72 65 64 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 70 nored)))..(defun.forge--select-p
2ab60 75 6c 6c 72 65 71 73 20 28 72 65 70 6f 20 71 75 65 72 79 20 26 72 65 73 74 20 61 72 67 73 29 0a ullreqs.(repo.query.&rest.args).
2ab80 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 31 29 29 0a 20 20 28 6d 61 70 63 61 72 ..(declare.(indent.1))...(mapcar
2aba0 20 28 6c 65 74 20 28 28 64 62 20 28 66 6f 72 67 65 2d 64 62 29 29 29 0a 20 20 20 20 20 20 20 20 .(let.((db.(forge-db))).........
2abc0 20 20 20 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 ....(lambda.(row)...............
2abe0 28 63 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 (closql--remake-instance.'forge-
2ac00 70 75 6c 6c 72 65 71 20 64 62 20 72 6f 77 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 61 70 70 pullreq.db.row)))...........(app
2ac20 6c 79 20 23 27 66 6f 72 67 65 2d 73 71 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ly.#'forge-sql..................
2ac40 28 76 63 6f 6e 63 61 74 20 5b 3a 73 65 6c 65 63 74 20 2a 5d 0a 20 20 20 20 20 20 20 20 20 20 20 (vconcat.[:select.*]............
2ac60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 71 75 65 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 ...............query............
2ac80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 63 6c 2d 66 69 6e ...............(and.(not.(cl-fin
2aca0 64 20 3a 6f 72 64 65 72 2d 62 79 20 71 75 65 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 d.:order-by.query)).............
2acc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5b 3a 6f 72 64 65 72 2d 62 79 20 5b 28 ...................[:order-by.[(
2ace0 64 65 73 63 20 75 70 64 61 74 65 64 29 5d 5d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 desc.updated)]]))...............
2ad00 20 20 20 28 69 66 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 20 ...(if.repo.....................
2ad20 20 28 63 6f 6e 73 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 20 61 72 67 73 29 0a 20 20 20 20 .(cons.(oref.repo.id).args).....
2ad40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 72 67 73 29 29 29 29 0a 0a 3b 3b 3b 20 52 65 61 ...............args))))..;;;.Rea
2ad60 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 65 71 20 28 70 72 d..(defun.forge-read-pullreq.(pr
2ad80 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 6c 6c 2d 72 65 71 ompt)..."Read.an.active.pull-req
2ada0 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 20 50 52 4f 4d 50 uest.with.completion.using.PROMP
2adc0 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 6e 67 20 70 75 6c T...Open,.unread.and.pending.pul
2ade0 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 61 63 74 69 76 65 l-requests.are.considered.active
2ae00 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 75 6c 6c 2d 72 65 ..Default.to.the.current.pull-re
2ae20 71 75 65 73 74 20 65 76 65 6e 20 69 66 20 69 74 20 69 73 6e 27 74 20 61 63 74 69 76 65 2e 0a 0a quest.even.if.it.isn't.active...
2ae40 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 6d \\<forge-read-topic-minibuffer-m
2ae60 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 5c 0a 70 72 6f 67 ap>While.completion.is.in.\.prog
2ae80 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 6c 69 66 74 2d 6c ress,.\\[forge-read-topic-lift-l
2aea0 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 65 6e 64 69 6e 67 imit].lifts.the.limit,.extending
2aec0 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 20 74 6f 20 69 6e .the.completion.candidates.to.in
2aee0 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 0a 49 66 20 60 66 6f clude.all.pull-requests...If.`fo
2af00 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 69 73 20 6e 69 6c 2c rge-limit-topic-choices'.is.nil,
2af20 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 62 65 20 73 65 6c 65 .then.all.candidates.can.be.sele
2af40 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 66 6f 72 67 65 2d 2d cted.from.the.start."...(forge--
2af60 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 20 20 20 20 20 20 20 read-topic.prompt...............
2af80 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 6c 6c 72 65 71 0a 20 .......#'forge-current-pullreq..
2afa0 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 2d 6c 73 2d ....................#'forge--ls-
2afc0 61 63 74 69 76 65 2d 70 75 6c 6c 72 65 71 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 active-pullreqs.................
2afe0 20 20 20 20 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 70 75 6c 6c 72 65 71 73 29 29 0a 0a 3b 3b 3b .....#'forge--ls-pullreqs))..;;;
2b000 20 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 .Utilities..(defun.forge--pullre
2b020 71 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 q-branch-internal.(pullreq)...(l
2b040 65 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 et.((branch.(oref.pullreq.head-r
2b060 65 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 ef))).....;;.It.is.invalid.for.a
2b080 20 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 .branch.name.to.begin.with.a.col
2b0a0 6f 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 on,.yet.....;;.that.is.what.Gitl
2b0c0 61 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 ab.uses.when.a.pull-request's.so
2b0e0 75 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 urce.branch.....;;.has.been.dele
2b100 74 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 ted...On.Github.this.is.simply.n
2b120 69 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 il.in.the.same.....;;.situation.
2b140 0a 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 .....(and.branch.(not.(string-pr
2b160 65 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 efix-p.":".branch)).branch)))..(
2b180 64 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 defun.forge--pullreq-branch-acti
2b1a0 76 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 ve.(pullreq)...(let*.((number.(n
2b1c0 75 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 umber-to-string.(oref.pullreq.nu
2b1e0 6d 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 mber)))..........(branch-n.(form
2b200 61 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 at."pr-%s".number))..........(br
2b220 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 69 6e 74 65 anch.(forge--pullreq-branch-inte
2b240 72 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 rnal.pullreq))).....(or.(and.(ma
2b260 67 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 git-branch-p.branch)............
2b280 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 61 ..(equal.(magit-get."branch".bra
2b2a0 6e 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 nch."pullRequest").number)......
2b2c0 20 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 ........branch).........(and.(ma
2b2e0 67 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 git-branch-p.branch-n)..........
2b300 20 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 ....(equal.(magit-get."branch".b
2b320 72 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 ranch-n."pullRequest").number)..
2b340 20 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 ............branch-n))))..(defun
2b360 20 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 .forge--pullreq-ref.(pullreq)...
2b380 28 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 (let.((ref.(format."refs/pullreq
2b3a0 73 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 s/%s".(oref.pullreq.number))))..
2b3c0 20 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 ...(and.(magit-rev-verify.ref).r
2b3e0 65 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 ef)))..(defun.forge--pullreq-ran
2b400 67 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 ge.(pullreq.&optional.endpoints)
2b420 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 68 65 61 64 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c ...(and-let*.((head.(forge--pull
2b440 72 65 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 req-ref.pullreq))).....(concat.(
2b460 66 6f 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 forge--get-remote)."/".(oref.pul
2b480 6c 72 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 lreq.base-ref).............(if.e
2b4a0 6e 64 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 ndpoints."..."."..")............
2b4c0 20 68 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 .head)))..;;;.Insert..(defvar-ke
2b4e0 79 6d 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 ymap.forge-pullreqs-section-map.
2b500 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 6e 67 3e 22 .."<remap>.<magit-browse-thing>"
2b520 20 23 27 66 6f 72 67 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 .#'forge-browse-pullreqs..."<rem
2b540 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 6f 72 67 ap>.<magit-visit-thing>"..#'forg
2b560 65 2d 6c 69 73 74 2d 70 75 6c 6c 72 65 71 73 0a 20 20 22 43 2d 63 20 43 2d 6d 22 20 20 20 20 20 e-list-pullreqs..."C-c.C-m".....
2b580 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 73 2d .................#'forge-topics-
2b5a0 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 20 menu..."C-c.C-n"................
2b5c0 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 29 0a 0a 28 ......#'forge-create-pullreq)..(
2b5e0 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 73 65 63 74 defvar-keymap.forge-pullreq-sect
2b600 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 76 69 73 69 74 2d ion-map..."<remap>.<magit-visit-
2b620 74 68 69 6e 67 3e 22 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 thing>"..#'forge-visit-this-topi
2b640 63 0a 20 20 22 43 2d 63 20 43 2d 6d 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c..."C-c.C-m"...................
2b660 20 20 20 23 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 0a 0a 28 64 65 66 75 6e 20 66 ...#'forge-topic-menu)..(defun.f
2b680 6f 72 67 65 2d 69 6e 73 65 72 74 2d 70 75 6c 6c 72 65 71 73 20 28 29 0a 20 20 22 49 6e 73 65 72 orge-insert-pullreqs.()..."Inser
2b6a0 74 20 61 20 6c 69 73 74 20 6f 66 20 6d 6f 73 74 6c 79 20 72 65 63 65 6e 74 20 61 6e 64 2f 6f 72 t.a.list.of.mostly.recent.and/or
2b6c0 20 6f 70 65 6e 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e 0a 41 6c 73 6f 20 73 65 65 20 6f 70 .open.pull-requests..Also.see.op
2b6e0 74 69 6f 6e 20 60 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6c 69 6d 69 74 27 2e 22 0a tion.`forge-topic-list-limit'.".
2b700 20 20 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 70 75 6c 6c 72 65 71 73 20 22 50 75 6c 6c 20 ..(forge--insert-pullreqs."Pull.
2b720 72 65 71 75 65 73 74 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 requests".......................
2b740 20 20 20 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 72 65 63 65 6e 74 2d 70 75 6c 6c 72 65 71 73 29 ....#'forge--ls-recent-pullreqs)
2b760 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 61 73 73 69 67 6e 65 64 2d )..(defun.forge-insert-assigned-
2b780 70 75 6c 6c 72 65 71 73 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 pullreqs.()..."Insert.a.list.of.
2b7a0 6f 70 65 6e 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 74 68 61 74 20 61 72 65 20 61 73 73 69 open.pull-requests.that.are.assi
2b7c0 67 6e 65 64 20 74 6f 20 79 6f 75 2e 22 0a 20 20 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 70 gned.to.you."...(forge--insert-p
2b7e0 75 6c 6c 72 65 71 73 20 22 41 73 73 69 67 6e 65 64 20 70 75 6c 6c 20 72 65 71 75 65 73 74 73 22 ullreqs."Assigned.pull.requests"
2b800 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 23 27 66 6f 72 ...........................#'for
2b820 67 65 2d 2d 6c 73 2d 61 73 73 69 67 6e 65 64 2d 70 75 6c 6c 72 65 71 73 29 29 0a 0a 28 64 65 66 ge--ls-assigned-pullreqs))..(def
2b840 75 6e 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 72 65 71 75 65 73 74 65 64 2d 72 65 76 69 65 77 un.forge-insert-requested-review
2b860 73 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 70 75 6c 6c 2d 72 65 s.()..."Insert.a.list.of.pull-re
2b880 71 75 65 73 74 73 20 74 68 61 74 20 61 72 65 20 61 77 61 69 74 69 6e 67 20 79 6f 75 72 20 72 65 quests.that.are.awaiting.your.re
2b8a0 76 69 65 77 2e 22 0a 20 20 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 70 75 6c 6c 72 65 71 73 view."...(forge--insert-pullreqs
2b8c0 20 22 50 75 6c 6c 20 72 65 71 75 65 73 74 73 20 61 77 61 69 74 69 6e 67 20 72 65 76 69 65 77 22 ."Pull.requests.awaiting.review"
2b8e0 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 23 27 66 6f 72 ...........................#'for
2b900 67 65 2d 2d 6c 73 2d 72 65 71 75 65 73 74 65 64 2d 72 65 76 69 65 77 73 29 29 0a 0a 28 64 65 66 ge--ls-requested-reviews))..(def
2b920 75 6e 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 61 75 74 68 6f 72 65 64 2d 70 75 6c 6c 72 65 71 un.forge-insert-authored-pullreq
2b940 73 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 6f 70 65 6e 20 70 75 s.()..."Insert.a.list.of.open.pu
2b960 6c 6c 72 65 71 73 20 74 68 61 74 20 61 72 65 20 61 75 74 68 6f 72 65 64 20 62 79 20 79 6f 75 2e llreqs.that.are.authored.by.you.
2b980 22 0a 20 20 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 70 75 6c 6c 72 65 71 73 20 22 41 75 74 "...(forge--insert-pullreqs."Aut
2b9a0 68 6f 72 65 64 20 70 75 6c 6c 72 65 71 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 hored.pullreqs".................
2b9c0 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 61 75 74 68 6f 72 65 64 2d 70 ..........#'forge--ls-authored-p
2b9e0 75 6c 6c 72 65 71 73 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 ullreqs))..(defun.forge--insert-
2ba00 70 75 6c 6c 72 65 71 73 20 28 68 65 61 64 69 6e 67 20 67 65 74 74 65 72 29 0a 20 20 28 77 68 65 pullreqs.(heading.getter)...(whe
2ba20 6e 2d 6c 65 74 20 28 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 2d 61 73 73 65 72 74 2d 69 6e 73 65 n-let.((repo.(forge--assert-inse
2ba40 72 74 2d 74 6f 70 69 63 73 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 29 0a 20 20 20 20 rt-topics-get-repository))).....
2ba60 28 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 74 6f 70 69 63 73 20 27 70 75 6c 6c 72 65 71 73 20 (forge--insert-topics.'pullreqs.
2ba80 68 65 61 64 69 6e 67 20 28 66 75 6e 63 61 6c 6c 20 67 65 74 74 65 72 20 72 65 70 6f 29 29 29 29 heading.(funcall.getter.repo))))
2baa0 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 69 6e 73 65 72 74 2d 70 75 6c 6c 72 65 71 2d 63 ..(defun.forge--insert-pullreq-c
2bac0 6f 6d 6d 69 74 73 20 28 70 75 6c 6c 72 65 71 20 26 6f 70 74 69 6f 6e 61 6c 20 61 6c 6c 29 0a 20 ommits.(pullreq.&optional.all)..
2bae0 20 28 63 6c 2d 6c 65 74 66 20 28 28 28 73 79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 23 27 6d .(cl-letf.(((symbol-function.#'m
2bb00 61 67 69 74 2d 63 61 6e 63 65 6c 2d 73 65 63 74 69 6f 6e 29 20 28 6c 61 6d 62 64 61 20 28 29 29 agit-cancel-section).(lambda.())
2bb20 29 29 0a 20 20 20 20 28 69 66 20 61 6c 6c 0a 20 20 20 20 20 20 20 20 3b 3b 20 4e 75 6d 65 72 69 )).....(if.all.........;;.Numeri
2bb40 63 20 70 72 20 72 65 66 2c 20 70 72 20 62 72 61 6e 63 68 20 28 69 66 20 69 74 20 65 78 69 73 74 c.pr.ref,.pr.branch.(if.it.exist
2bb60 73 29 20 61 6e 64 20 61 70 69 0a 20 20 20 20 20 20 20 20 3b 3b 20 70 72 20 72 61 6e 67 65 20 6d s).and.api.........;;.pr.range.m
2bb80 61 79 20 62 65 20 6f 75 74 20 6f 66 20 73 79 6e 63 2e 20 20 4a 75 73 74 20 73 68 6f 77 20 74 68 ay.be.out.of.sync...Just.show.th
2bba0 65 6d 20 61 6c 6c 2e 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 em.all..........(magit-insert-se
2bbc0 63 74 69 6f 6e 2d 62 6f 64 79 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 69 6e 73 ction-body...........(magit--ins
2bbe0 65 72 74 2d 6c 6f 67 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 71 20 6e 69 6c ert-log.nil............(delq.nil
2bc00 20 28 6c 69 73 74 20 28 63 6f 6e 63 61 74 20 22 5e 22 20 28 6f 72 20 28 6f 72 65 66 20 70 75 6c .(list.(concat."^".(or.(oref.pul
2bc20 6c 72 65 71 20 62 61 73 65 2d 72 65 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lreq.base-rev)..................
2bc40 20 20 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 63 61 ..........................(conca
2bc60 74 20 28 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 6d 6f 74 65 29 20 22 2f 22 0a 20 20 20 20 20 20 t.(forge--get-remote)."/".......
2bc80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
2bca0 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 62 61 73 65 2d .............(oref.pullreq.base-
2bcc0 72 65 66 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 ref)))).........................
2bce0 20 20 20 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 0a ...(forge--pullreq-ref.pullreq).
2bd00 20 20 20 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
2bd20 65 2d 2d 70 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 e--pullreq-branch-active.pullreq
2bd40 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 28 61 6e )............................(an
2bd60 64 2d 6c 65 74 2a 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 d-let*.((branch.(oref.pullreq.he
2bd80 61 64 2d 72 65 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 ad-ref))).......................
2bda0 20 20 20 20 20 20 20 28 61 6e 64 20 28 6d 61 67 69 74 2d 6c 6f 63 61 6c 2d 62 72 61 6e 63 68 2d .......(and.(magit-local-branch-
2bdc0 70 20 62 72 61 6e 63 68 29 20 62 72 61 6e 63 68 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 p.branch).branch))))............
2bde0 28 73 65 71 2d 75 6e 69 71 20 28 63 6f 6e 73 20 22 2d 2d 67 72 61 70 68 22 20 6d 61 67 69 74 2d (seq-uniq.(cons."--graph".magit-
2be00 62 75 66 66 65 72 2d 6c 6f 67 2d 61 72 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 buffer-log-args)))...........(ma
2be20 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 74 29 29 0a git-make-margin-overlay.nil.t)).
2be40 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 72 61 6e 67 65 20 28 66 6f 72 67 65 2d 2d ......(when-let.((range.(forge--
2be60 70 75 6c 6c 72 65 71 2d 72 61 6e 67 65 20 70 75 6c 6c 72 65 71 29 29 29 0a 20 20 20 20 20 20 20 pullreq-range.pullreq)))........
2be80 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 20 20 20 .(magit-insert-section-body.....
2bea0 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 20 72 61 6e ......(magit--insert-log.nil.ran
2bec0 67 65 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 ge.magit-buffer-log-args).......
2bee0 20 20 20 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 ....(magit-make-margin-overlay.n
2bf00 69 6c 20 74 29 29 29 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 il.t))))))..;;;._.(provide.'forg
2bf20 65 2d 70 75 6c 6c 72 65 71 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2e 65 6c 20 e-pullreq).;;;.forge-pullreq.el.
2bf40 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.......................
2bf60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2bf80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2bfa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2bfc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2bfe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c000 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 67 6f 67 73 2e 65 forge-20240405.1509/forge-gogs.e
2c020 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...............................
2c040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c060 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
2c080 30 30 30 33 35 37 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 30 37 00 20 30 00 00 00 0003577.00000000000.014507..0...
2c0a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c0c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c0e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c100 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...................
2c120 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...................
2c140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c1a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c1c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c1e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c200 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
2c220 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.-*-..;
2c240 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 34 20 4a 6f 6e 61 73 20 ;.Copyright.(C).2018-2024.Jonas.
2c260 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
2c280 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 3b 3b 20 4d 61 69 6e oulli.<jonas@bernoul.li>.;;.Main
2c2a0 74 61 69 6e 65 72 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 tainer:.Jonas.Bernoulli.<jonas@b
2c2c0 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e ernoul.li>..;;.SPDX-License-Iden
2c2e0 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
2c300 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
2c320 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.;
2c340 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.
2c360 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
2c380 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
2c3a0 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.
2c3c0 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).
2c3e0 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
2c400 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
2c420 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
2c440 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.
2c460 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
2c480 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
2c4a0 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.
2c4c0 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.
2c4e0 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
2c500 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
2c520 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
2c540 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://
2c560 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
2c580 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 67 6f 67 73 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f e:..(require.'gogs).(require.'fo
2c5a0 72 67 65 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 rge)..;;;.Class..(defclass.forge
2c5c0 2d 67 6f 67 73 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 75 6e 75 73 65 64 61 70 -gogs-repository.(forge-unusedap
2c5e0 69 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 72 i-repository)...((issues-url-for
2c600 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 25 mat.........:initform."https://%
2c620 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 66 h/%o/%n/issues")....(issue-url-f
2c640 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 3a ormat..........:initform."https:
2c660 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 65 //%h/%o/%n/issues/%i")....(issue
2c680 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 22 -post-url-format.....:initform."
2c6a0 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 69 73 73 75 65 https://%h/%o/%n/issues/%i#issue
2c6c0 63 6f 6d 6d 65 6e 74 2d 25 49 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 73 2d 75 72 6c 2d 66 6f comment-%I")....(pullreqs-url-fo
2c6e0 72 6d 61 74 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 rmat.......:initform."https://%h
2c700 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 /%o/%n/pulls")....(pullreq-url-f
2c720 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 2f 2f ormat........:initform."https://
2c740 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 2f 25 69 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d %h/%o/%n/pulls/%i")....(pullreq-
2c760 70 6f 73 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 post-url-format...:initform."htt
2c780 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 2f 25 69 23 69 73 73 75 65 63 6f 6d 6d ps://%h/%o/%n/pulls/%i#issuecomm
2c7a0 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..
2c7c0 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/
2c7e0 25 6e 2f 63 6f 6d 6d 69 74 2f 25 72 22 29 0a 20 20 20 28 62 72 61 6e 63 68 2d 75 72 6c 2d 66 6f %n/commit/%r")....(branch-url-fo
2c800 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://
2c820 25 68 2f 25 6f 2f 25 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 %h/%o/%n/commits/%r")....(remote
2c840 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
2c860 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 22 29 0a 20 20 20 28 63 72 65 61 74 65 2d 69 73 73 ttps://%h/%o/%n")....(create-iss
2c880 75 65 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 ue-url-format...:initform."https
2c8a0 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 63 72 65 ://%h/%o/%n/issues/new")....(cre
2c8c0 61 74 65 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 ate-pullreq-url-format.:initform
2c8e0 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 20 3b 20 73 69 63 ."https://%h/%o/%n/pulls").;.sic
2c900 0a 20 20 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 ....(pullreq-refspec.:initform."
2c920 2b 72 65 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 +refs/pull/*/head:refs/pullreqs/
2c940 2a 22 29 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 67 6f 67 *")))..;;;._.(provide.'forge-gog
2c960 73 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 67 6f 67 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 s).;;;.forge-gogs.el.ends.here..
2c980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c9a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c9c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2c9e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2ca00 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2e 65 6c 00 00 00 00 forge-20240405.1509/forge.el....
2ca20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2ca40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2ca60 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
2ca80 30 30 31 33 33 36 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 35 34 34 00 20 30 00 00 00 0013363.00000000000.013544..0...
2caa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2cac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2cae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2cb00 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...................
2cb20 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...................
2cb40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2cb60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2cb80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2cba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2cbc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2cbe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2cc00 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
2cc20 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
2cc40 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-
2cc60 32 30 32 34 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 2024.Jonas.Bernoulli..;;.Author:
2cc80 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 2e .Jonas.Bernoulli.<jonas@bernoul.
2cca0 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 6c li>.;;.Maintainer:.Jonas.Bernoul
2ccc0 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 3b 3b 20 48 6f 6d 65 70 61 67 li.<jonas@bernoul.li>.;;.Homepag
2cce0 65 3a 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 e:.https://github.com/magit/forg
2cd00 65 0a 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 e.;;.Keywords:.git.tools.vc..;;.
2cd20 53 50 44 58 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 SPDX-License-Identifier:.GPL-3.0
2cd40 2d 6f 72 2d 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 -or-later..;;.This.file.is.free.
2cd60 73 6f 66 74 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 software:.you.can.redistribute.i
2cd80 74 20 61 6e 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 t.and/or.modify.;;.it.under.the.
2cda0 74 65 72 6d 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 terms.of.the.GNU.General.Public.
2cdc0 4c 69 63 65 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 License.as.published.;;.by.the.F
2cde0 72 65 65 20 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 ree.Software.Foundation,.either.
2ce00 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 0a 3b 3b 20 6f 72 20 version.3.of.the.License,.;;.or.
2ce20 28 61 74 20 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 (at.your.option).any.later.versi
2ce40 6f 6e 2e 0a 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 on..;;.;;.This.file.is.distribut
2ce60 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
2ce80 73 65 66 75 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 seful,.;;.but.WITHOUT.ANY.WARRAN
2cea0 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 61 72 TY;.without.even.the.implied.war
2cec0 72 61 6e 74 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 ranty.of.;;.MERCHANTABILITY.or.F
2cee0 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 4f 53 45 2e ITNESS.FOR.A.PARTICULAR.PURPOSE.
2cf00 20 20 53 65 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 ..See.the.;;.GNU.General.Public.
2cf20 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 3b 3b 0a 3b 3b 20 License.for.more.details..;;.;;.
2cf40 59 6f 75 20 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 You.should.have.received.a.copy.
2cf60 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 73 of.the.GNU.General.Public.Licens
2cf80 65 0a 3b 3b 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 e.;;.along.with.this.file...If.n
2cfa0 6f 74 2c 20 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 ot,.see.<https://www.gnu.org/lic
2cfc0 65 6e 73 65 73 2f 3e 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 enses/>...;;;.Commentary:..;;.Wo
2cfe0 72 6b 20 77 69 74 68 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 rk.with.Git.forges,.such.as.Gith
2d000 75 62 20 61 6e 64 20 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 ub.and.Gitlab,.from.the.comfort.
2d020 3b 3b 20 6f 66 20 4d 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 ;;.of.Magit.and.the.rest.of.Emac
2d040 73 2e 0a 0a 3b 3b 20 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 s...;;.The.schema.of.the.databas
2d060 65 20 68 61 73 20 6e 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 e.has.not.been.finalized.yet...U
2d080 6e 74 69 6c 20 74 68 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 ntil.that.;;.has.happened.it.wil
2d0a0 6c 20 6f 63 63 61 73 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 l.occasionally.have.to.be.discar
2d0c0 64 65 64 2e 20 20 46 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 ded...For.now.;;.the.database.do
2d0e0 65 73 20 6e 6f 74 20 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 es.not.contain.any.information.t
2d100 68 61 74 20 63 61 6e 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 hat.cannot.simply.;;.be.fetched.
2d120 61 67 61 69 6e 2e 0a 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 again...;;;.Code:..(require.'mag
2d140 69 74 29 0a 0a 28 72 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 it)..(require.'forge-db).(requir
2d160 65 20 27 66 6f 72 67 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 e.'forge-core)..(provide.'forge)
2d180 0a 0a 28 72 65 71 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 ..(require.'forge-repo).(require
2d1a0 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 6f .'forge-post).(require.'forge-to
2d1c0 70 69 63 29 0a 28 72 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 pic).(require.'forge-issue).(req
2d1e0 75 69 72 65 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 28 72 65 71 75 69 72 65 20 27 66 uire.'forge-pullreq).(require.'f
2d200 6f 72 67 65 2d 72 65 76 6e 6f 74 65 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 6e 6f orge-revnote).(require.'forge-no
2d220 74 69 66 79 29 0a 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 67 69 74 68 75 62 29 0a 28 tify)..(require.'forge-github).(
2d240 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 67 69 74 6c 61 62 29 0a 28 72 65 71 75 69 72 65 20 require.'forge-gitlab).(require.
2d260 27 66 6f 72 67 65 2d 67 69 74 65 61 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 67 6f 'forge-gitea).(require.'forge-go
2d280 67 73 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 62 69 74 62 75 63 6b 65 74 29 0a 28 gs).(require.'forge-bitbucket).(
2d2a0 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 73 65 6d 69 29 0a 0a 28 72 65 71 75 69 72 65 20 27 require.'forge-semi)..(require.'
2d2c0 66 6f 72 67 65 2d 63 6f 6d 6d 61 6e 64 73 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d forge-commands).(require.'forge-
2d2e0 6c 69 73 74 29 0a 0a 3b 3b 3b 20 41 64 64 20 53 65 63 74 69 6f 6e 73 0a 0a 28 64 65 66 76 61 72 list)..;;;.Add.Sections..(defvar
2d300 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 6e 73 20 74 0a 20 20 .forge-add-default-sections.t...
2d320 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 65 63 74 69 6f 6e 73 "Whether.to.add.Forge's.sections
2d340 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 73 2d 68 6f 6f 6b 27 .to.`magit-status-sections-hook'
2d360 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 20 74 68 69 73 2c 20 ...If.you.want.to.disable.this,.
2d380 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 20 6e 69 6c 20 62 65 then.you.must.set.this.to.nil.be
2d3a0 66 6f 72 65 0a 60 66 6f 72 67 65 27 20 69 73 20 6c 6f 61 64 65 64 2e 0a 0a 49 66 20 74 68 69 73 fore.`forge'.is.loaded...If.this
2d3c0 20 69 73 20 6e 69 6c 2c 20 74 68 65 6e 20 60 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 64 69 73 70 .is.nil,.then.`forge-toggle-disp
2d3e0 6c 61 79 2d 69 6e 2d 73 74 61 74 75 73 2d 62 75 66 66 65 72 27 20 63 61 6e 0a 6e 6f 20 6c 6f 6e lay-in-status-buffer'.can.no.lon
2d400 67 65 72 20 64 6f 20 69 74 73 20 6a 6f 62 2e 20 20 49 74 20 6d 69 67 68 74 20 62 65 20 62 65 74 ger.do.its.job...It.might.be.bet
2d420 74 65 72 20 74 6f 20 73 65 74 20 74 68 65 20 67 6c 6f 62 61 6c 20 76 61 6c 75 65 0a 6f 66 20 60 ter.to.set.the.global.value.of.`
2d440 66 6f 72 67 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 27 20 forge-display-in-status-buffer'.
2d460 74 6f 20 6e 69 6c 20 69 6e 73 74 65 61 64 2e 20 20 54 68 61 74 20 77 61 79 20 79 6f 75 0a 63 61 to.nil.instead...That.way.you.ca
2d480 6e 20 73 74 69 6c 6c 20 64 69 73 70 6c 61 79 20 74 6f 70 69 63 73 20 6f 6e 20 64 65 6d 61 6e 64 n.still.display.topics.on.demand
2d4a0 20 69 6e 20 74 68 65 20 73 74 61 74 75 73 20 62 75 66 66 65 72 2e 22 29 0a 0a 28 77 68 65 6e 20 .in.the.status.buffer.")..(when.
2d4c0 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 0a 20 20 28 6d 61 forge-add-default-sections...(ma
2d4e0 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
2d500 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-
2d520 70 75 6c 6c 72 65 71 73 20 6e 69 6c 20 74 29 0a 20 20 28 6d 61 67 69 74 2d 61 64 64 2d 73 65 63 pullreqs.nil.t)...(magit-add-sec
2d540 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 6f 6e 73 tion-hook.'magit-status-sections
2d560 2d 68 6f 6f 6b 20 23 27 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 69 73 73 75 65 73 20 20 20 6e 69 -hook.#'forge-insert-issues...ni
2d580 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 3b 3b 23 23 23 61 l.t))..;;;.Add.Bindings..;;;###a
2d5a0 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 64 65 66 61 75 6c utoload.(defvar.forge-add-defaul
2d5c0 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 20 61 64 64 20 46 t-bindings.t..."Whether.to.add.F
2d5e0 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 20 4d 61 67 69 74 orge's.bindings.to.various.Magit
2d600 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 64 69 73 61 62 6c .keymaps...If.you.want.to.disabl
2d620 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 74 68 69 73 20 74 e.this,.then.you.must.set.this.t
2d640 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 61 64 65 64 2e 20 o.nil.before.`magit'.is.loaded..
2d660 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 65 27 20 62 75 74 .If.you.do.it.before.`forge'.but
2d680 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 74 68 65 6e 20 60 .after.`magit'.is.loaded,.then.`
2d6a0 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 69 6e 67 20 6d 6f magit-mode-map'.ends.up.being.mo
2d6c0 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 74 6f 6c 6f 61 64 dified.anyway.")..;;;###autoload
2d6e0 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 67 69 74 2d 6d 6f .(with-eval-after-load.'magit-mo
2d700 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 6c 74 2d 62 69 6e de...(when.forge-add-default-bin
2d720 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 74 2d 6d 6f 64 65 dings.....(keymap-set.magit-mode
2d740 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 0a 20 20 20 20 28 -map."'".#'forge-dispatch).....(
2d760 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 22 4e 22 20 23 27 keymap-set.magit-mode-map."N".#'
2d780 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 70 2d 73 65 74 20 forge-dispatch).....(keymap-set.
2d7a0 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 69 74 2d 62 magit-mode-map."<remap>.<magit-b
2d7c0 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 20 20 20 20 23 27 rowse-thing>".................#'
2d7e0 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 73 65 74 20 6d 61 forge-browse).....(keymap-set.ma
2d800 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 69 74 2d 63 6f 70 git-mode-map."<remap>.<magit-cop
2d820 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 23 27 66 6f 72 67 y-thing>".................#'forg
2d840 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 6c 29 29 29 0a 0a e-copy-url-at-point-as-kill)))..
2d860 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 61 66 74 65 72 2d ;;;###autoload.(with-eval-after-
2d880 6c 6f 61 64 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 load.'git-commit...(when.forge-a
2d8a0 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 6b 65 79 6d 61 70 2d dd-default-bindings.....(keymap-
2d8c0 73 65 74 20 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 set.git-commit-mode-map."C-c.C-v
2d8e0 22 20 23 27 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 ".#'forge-visit-topic)))..(when.
2d900 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 28 6b 65 forge-add-default-bindings...(ke
2d920 79 6d 61 70 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 ymap-set.magit-commit-section-ma
2d940 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 63 29 p."C-c.C-v".#'forge-visit-topic)
2d960 0a 20 20 28 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 ...(keymap-set.magit-branch-sect
2d980 69 6f 6e 2d 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 ion-map."C-c.C-v".#'forge-visit-
2d9a0 74 6f 70 69 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 topic)....(transient-insert-suff
2d9c0 69 78 20 27 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 ix.'magit-dispatch."o".....'("N"
2d9e0 20 22 46 6f 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 ."Forge".forge-dispatch))....(tr
2da00 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 66 65 74 ansient-append-suffix.'magit-fet
2da20 63 68 20 22 6d 22 0a 20 20 20 20 27 28 22 6e 22 20 22 66 6f 72 67 65 20 74 6f 70 69 63 73 22 20 ch."m".....'("n"."forge.topics".
2da40 66 6f 72 67 65 2d 70 75 6c 6c 29 29 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 70 70 65 6e 64 forge-pull))...(transient-append
2da60 2d 73 75 66 66 69 78 20 27 6d 61 67 69 74 2d 66 65 74 63 68 20 22 6e 22 0a 20 20 20 20 27 28 22 -suffix.'magit-fetch."n".....'("
2da80 4e 22 20 22 66 6f 72 67 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 20 66 6f 72 67 65 2d 70 N"."forge.notifications".forge-p
2daa0 75 6c 6c 2d 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 ull-notifications))....(transien
2dac0 74 2d 61 70 70 65 6e 64 2d 73 75 66 66 69 78 20 27 6d 61 67 69 74 2d 70 75 6c 6c 20 22 6d 22 0a t-append-suffix.'magit-pull."m".
2dae0 20 20 20 20 27 28 22 6e 22 20 22 66 6f 72 67 65 20 74 6f 70 69 63 73 22 20 66 6f 72 67 65 2d 70 ....'("n"."forge.topics".forge-p
2db00 75 6c 6c 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 ull))...(transient-append-suffix
2db20 20 27 6d 61 67 69 74 2d 70 75 6c 6c 20 22 6e 22 0a 20 20 20 20 27 28 22 4e 22 20 22 66 6f 72 67 .'magit-pull."n".....'("N"."forg
2db40 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 6e 6f 74 69 e.notifications".forge-pull-noti
2db60 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 61 70 70 65 6e 64 fications))....(transient-append
2db80 2d 73 75 66 66 69 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 -suffix.'magit-branch."w".....'(
2dba0 22 66 22 20 22 70 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 "f"."pull-request".forge-checkou
2dbc0 74 2d 70 75 6c 6c 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 t-pullreq))...(transient-append-
2dbe0 73 75 66 66 69 78 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 suffix.'magit-branch."W".....'("
2dc00 46 22 20 22 66 72 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 F"."from.pull-request".forge-bra
2dc20 6e 63 68 2d 70 75 6c 6c 72 65 71 29 29 0a 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 75 66 66 nch-pullreq))....(transient-suff
2dc40 69 78 2d 70 75 74 20 27 6d 61 67 69 74 2d 72 65 6d 6f 74 65 20 27 6d 61 67 69 74 2d 75 70 64 61 ix-put.'magit-remote.'magit-upda
2dc60 74 65 2d 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 20 3a 6b 65 79 20 22 62 20 75 22 29 0a 20 20 te-default-branch.:key."b.u")...
2dc80 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 2d (transient-append-suffix.'magit-
2dca0 72 65 6d 6f 74 65 20 22 62 20 75 22 0a 20 20 20 20 27 28 22 62 20 72 22 20 22 52 65 6e 61 6d 65 remote."b.u".....'("b.r"."Rename
2dcc0 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 65 .default.branch".forge-rename-de
2dce0 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 70 fault-branch))....(transient-app
2dd00 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 20 end-suffix.'magit-worktree."c"..
2dd20 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 22 ...'("n"."pull-request.worktree"
2dd40 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 74 .forge-checkout-worktree))....(t
2dd60 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 74 ransient-append-suffix.'magit-st
2dd80 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 72 atus-jump."w".....'("Np"."Pull.r
2dda0 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 29 equests".forge-jump-to-pullreqs)
2ddc0 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 61 )...(transient-append-suffix.'ma
2dde0 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 20 git-status-jump."Np".....'("Ni".
2de00 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 0a "Issues".forge-jump-to-issues)).
2de20 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 67 ...(transient-append-suffix.'mag
2de40 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 20 it-merge."a".....'(7."M"."Merge.
2de60 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 53 using.API".forge-merge)))..;;;.S
2de80 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 2d tartup.Asserts..(defconst.forge-
2dea0 2d 6d 69 6e 69 6d 61 6c 2d 67 69 74 20 22 32 2e 37 2e 30 22 29 0a 0a 28 64 65 66 75 6e 20 66 6f -minimal-git."2.7.0")..(defun.fo
2dec0 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 28 28 rge-startup-asserts.()...(let.((
2dee0 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 20 20 version.(magit-git-version)))...
2df00 20 20 28 77 68 65 6e 20 28 61 6e 64 20 76 65 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 ..(when.(and.version............
2df20 20 20 20 20 28 76 65 72 73 69 6f 6e 3c 20 76 65 72 73 69 6f 6e 20 66 6f 72 67 65 2d 2d 6d 69 6e ....(version<.version.forge--min
2df40 69 6d 61 6c 2d 67 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 65 imal-git)................(not.(e
2df60 71 75 61 6c 20 28 67 65 74 65 6e 76 20 22 54 52 41 56 49 53 22 29 20 22 74 72 75 65 22 29 29 29 qual.(getenv."TRAVIS")."true")))
2df80 0a 20 20 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 .......(display-warning.'magit.(
2dfa0 66 6f 72 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 format."\.Forge.requires.Git.>=.
2dfc0 25 73 2c 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 %s,.you.are.using.%s...If.this.c
2dfe0 6f 6d 65 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 omes.as.a.surprise.to.you,.becau
2e000 73 65 20 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 se.you.do.actually.have.a.newer.
2e020 76 65 72 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 version.installed,.then.that.pro
2e040 62 61 62 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 bably.means.that.the.older.versi
2e060 6f 6e 20 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 on.happens.to.appear.earlier.on.
2e080 74 68 65 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 the.`$PATH'...If.you.always.star
2e0a0 74 20 45 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 t.Emacs.from.a.shell,.then.that.
2e0c0 63 61 6e 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 can.be.fixed.in.the.shell's.init
2e0e0 20 66 69 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 .file...If.you.start.Emacs.by.cl
2e100 69 63 6b 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 icking.on.an.icon,.or.using.some
2e120 20 73 6f 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 .sort.of.application.launcher,.t
2e140 68 65 6e 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 hen.you.probably.have.to.adjust.
2e160 74 68 65 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 the.environment.as.seen.by.graph
2e180 69 63 61 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 ical.interface..For.X11.somethin
2e1a0 67 20 6c 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 g.like.~/.xinitrc.should.work...
2e1c0 49 66 20 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 If.you.use.Tramp.to.work.inside.
2e1e0 72 65 6d 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 remote.Git.repositories,.then.yo
2e200 75 0a 68 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 u.have.to.make.sure.a.suitable.G
2e220 69 74 20 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 it.is.used.on.the.remote.machine
2e240 73 0a 74 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 s.too.\n".forge--minimal-git.ver
2e260 73 69 6f 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 sion).:error))))..(if.after-init
2e280 2d 74 69 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 -time.....(forge-startup-asserts
2e2a0 29 0a 20 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 )...(add-hook.'after-init-hook.#
2e2c0 27 66 6f 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 'forge-startup-asserts.t))..;;;.
2e2e0 66 6f 72 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 forge.el.ends.here..............
2e300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e400 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 67 69 74 65 61 2e forge-20240405.1509/forge-gitea.
2e420 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..............................
2e440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e460 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
2e480 30 30 30 33 37 30 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 36 33 31 00 20 30 00 00 00 0003704.00000000000.014631..0...
2e4a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e4c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e4e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e500 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...................
2e520 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...................
2e540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e5a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2e600 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
2e620 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.-*-.
2e640 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 34 20 4a 6f 6e 61 .;;.Copyright.(C).2018-2024.Jona
2e660 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
2e680 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 3b 3b 20 4d 61 rnoulli.<jonas@bernoul.li>.;;.Ma
2e6a0 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 intainer:.Jonas.Bernoulli.<jonas
2e6c0 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 @bernoul.li>..;;.SPDX-License-Id
2e6e0 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
2e700 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
2e720 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
2e740 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
2e760 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
2e780 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
2e7a0 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
2e7c0 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
2e7e0 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.
2e800 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.
2e820 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
2e840 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
2e860 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
2e880 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
2e8a0 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
2e8c0 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
2e8e0 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
2e900 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
2e920 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
2e940 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:
2e960 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
2e980 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 67 74 65 61 29 0a 28 72 65 71 75 69 72 65 20 27 ode:..(require.'gtea).(require.'
2e9a0 66 6f 72 67 65 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 forge)..;;;.Class..(defclass.for
2e9c0 67 65 2d 67 69 74 65 61 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 65 2d 75 6e 75 73 65 ge-gitea-repository.(forge-unuse
2e9e0 64 61 70 69 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 dapi-repository)...((issues-url-
2ea00 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 73 3a format.........:initform."https:
2ea20 2f 2f 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 //%h/%o/%n/issues")....(issue-ur
2ea40 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 22 68 74 74 l-format..........:initform."htt
2ea60 70 73 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 3b 3b 20 ps://%h/%o/%n/issues/%i")....;;.
2ea80 54 68 65 20 61 6e 63 68 6f 72 20 66 6f 72 20 74 68 65 20 69 73 73 75 65 20 69 74 73 65 6c 66 20 The.anchor.for.the.issue.itself.
2eaa0 69 73 20 2e 2e 2e 2f 25 69 23 69 73 73 75 65 2d 25 69 0a 20 20 20 28 69 73 73 75 65 2d 70 6f 73 is..../%i#issue-%i....(issue-pos
2eac0 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 22 68 74 74 70 t-url-format.....:initform."http
2eae0 73 3a 2f 2f 25 68 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 s://%h/%o/%n/issues/%i#issuecomm
2eb00 65 6e 74 2d 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 ent-%I")....(pullreqs-url-format
2eb20 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/
2eb40 25 6e 2f 70 75 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 %n/pulls")....(pullreq-url-forma
2eb60 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 2f 2f 25 68 2f 25 t........:initform."https://%h/%
2eb80 6f 2f 25 6e 2f 70 75 6c 6c 73 2f 25 69 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 70 6f 73 74 o/%n/pulls/%i")....(pullreq-post
2eba0 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 2f -url-format...:initform."https:/
2ebc0 2f 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 73 2f 25 69 23 69 73 73 75 65 63 6f 6d 6d 65 6e 74 2d /%h/%o/%n/pulls/%i#issuecomment-
2ebe0 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 20 20 20 20 %I")....(commit-url-format......
2ec00 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 63 ...:initform."https://%h/%o/%n/c
2ec20 6f 6d 6d 69 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 ommit/%r")....(branch-url-format
2ec40 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 2f 25 .........:initform."https://%h/%
2ec60 6f 2f 25 6e 2f 63 6f 6d 6d 69 74 73 2f 62 72 61 6e 63 68 2f 25 72 22 29 0a 20 20 20 28 72 65 6d o/%n/commits/branch/%r")....(rem
2ec80 6f 74 65 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 ote-url-format.........:initform
2eca0 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 25 6f 2f 25 6e 22 29 0a 20 20 20 28 63 72 65 61 74 65 2d ."https://%h/%o/%n")....(create-
2ecc0 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 6f 72 6d 20 22 68 74 issue-url-format...:initform."ht
2ece0 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")....(
2ed00 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 3a 69 6e 69 74 66 create-pullreq-url-format.:initf
2ed20 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 20 3b 20 orm."https://%h/%o/%n/pulls").;.
2ed40 73 69 63 0a 20 20 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 sic....(pullreq-refspec.:initfor
2ed60 6d 20 22 2b 72 65 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 m."+refs/pull/*/head:refs/pullre
2ed80 71 73 2f 2a 22 29 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 qs/*")))..;;;._.(provide.'forge-
2eda0 67 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 gitea).;;;.forge-gitea.el.ends.h
2edc0 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.............................
2ede0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2ee00 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 64 62 2e 65 6c 00 forge-20240405.1509/forge-db.el.
2ee20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2ee40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2ee60 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
2ee80 30 30 34 34 36 32 37 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 0044627.00000000000.014136..0...
2eea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2eec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2eee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
2ef00 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...................
2ef20 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...................
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 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
2f020 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
2f040 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
2f060 32 34 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 24.Jonas.Bernoulli..;;.Author:.J
2f080 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 2e 6c 69 onas.Bernoulli.<jonas@bernoul.li
2f0a0 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 6c 6c 69 >.;;.Maintainer:.Jonas.Bernoulli
2f0c0 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 4c 69 63 .<jonas@bernoul.li>..;;.SPDX-Lic
2f0e0 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
2f100 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
2f120 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
2f140 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
2f160 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.
2f180 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
2f1a0 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.
2f1c0 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
2f1e0 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..;;.;
2f200 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
2f220 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,.;
2f240 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
2f260 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
2f280 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
2f2a0 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
2f2c0 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.
2f2e0 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
2f300 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
2f320 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
2f340 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.
2f360 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/>.
2f380 0a 0a 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 ..;;;.Code:..(require.'closql).(
2f3a0 72 65 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 require.'compat).(require.'eieio
2f3c0 29 0a 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 ).(require.'emacsql)..;;.For.`cl
2f3e0 6f 73 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 osql--db-update-schema':.(declar
2f400 65 2d 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 e-function.forge--object-id."for
2f420 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
2f440 65 2d 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 e-get-issue."forge-core").(decla
2f460 72 65 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 re-function.forge-get-pullreq."f
2f480 6f 72 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 orge-core").(declare-function.fo
2f4a0 72 67 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 rge-get-repository."forge-core".
2f4c0 28 64 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 (demand))..(eval-when-compile...
2f4e0 28 63 6c 2d 70 75 73 68 6e 65 77 20 27 6e 75 6d 62 65 72 20 65 69 65 69 6f 2d 2d 6b 6e 6f 77 6e (cl-pushnew.'number.eieio--known
2f500 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 76 61 6c 75 -slot-names)...(cl-pushnew.'valu
2f520 65 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 29 0a 0a 3b 3b 3b e.eieio--known-slot-names))..;;;
2f540 20 4f 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 64 61 74 61 62 .Options..(defcustom.forge-datab
2f560 61 73 65 2d 66 69 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 ase-file...(expand-file-name."fo
2f580 72 67 65 2d 64 61 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 rge-database.sqlite".user-emacs-
2f5a0 64 69 72 65 63 74 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 directory)..."The.file.used.to.s
2f5c0 74 6f 72 65 20 74 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 tore.the.forge.database."...:pac
2f5e0 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 31 2e 30 22 29 0a kage-version.'(forge..."0.1.0").
2f600 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 69 6c 65 29 0a 0a ..:group.'forge...:type.'file)..
2f620 3b 3b 3b 20 43 6f 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 ;;;.Core..(defclass.forge-databa
2f640 73 65 20 28 63 6c 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 se.(closql-database)...((name...
2f660 20 20 20 20 20 20 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 ......:initform."Forge")....(obj
2f680 65 63 74 2d 63 6c 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 ect-class.:initform.'forge-repos
2f6a0 69 74 6f 72 79 29 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 itory)....(file.........:initfor
2f6c0 6d 20 27 66 6f 72 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 m.'forge-database-file)....(sche
2f6e0 6d 61 74 61 20 20 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 mata.....:initform.'forge--db-ta
2f700 62 6c 65 2d 73 63 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 ble-schemata)....(version......:
2f720 69 6e 69 74 66 6f 72 6d 20 31 33 29 29 29 0a 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 2d 6f initform.13)))..(defvar.forge--o
2f740 76 65 72 72 69 64 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 verride-connection-class.nil)..(
2f760 64 65 66 75 6e 20 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 defun.forge-db.(&optional.livep)
2f780 0a 20 20 28 63 6c 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 ...(closql-db.'forge-database.li
2f7a0 76 65 70 20 66 6f 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 vep.forge--override-connection-c
2f7c0 6c 61 73 73 29 29 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 lass))..(defun.forge-sql.(sql.&r
2f7e0 65 73 74 20 61 72 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 est.args)...(if.(stringp.sql)...
2f800 20 20 20 20 28 65 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 ....(emacsql.(forge-db).(apply.#
2f820 27 66 6f 72 6d 61 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 'format.sql.args)).....(apply.#'
2f840 65 6d 61 63 73 71 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 emacsql.(forge-db).sql.args)))..
2f860 28 64 65 66 75 6e 20 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 (defun.forge-connect-database-on
2f880 63 65 20 28 29 0a 20 20 22 54 72 79 20 74 6f 20 63 6f 6e 6e 65 63 74 20 46 6f 72 67 65 20 64 61 ce.()..."Try.to.connect.Forge.da
2f8a0 74 61 62 61 73 65 20 6f 6e 20 66 69 72 73 74 20 75 73 65 20 6f 66 20 60 6d 61 67 69 74 2d 73 74 tabase.on.first.use.of.`magit-st
2f8c0 61 74 75 73 27 20 6f 6e 6c 79 2e 22 0a 20 20 28 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 27 6d 61 67 atus'.only."...(remove-hook.'mag
2f8e0 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
2f900 65 63 74 2d 64 61 74 61 62 61 73 65 2d 6f 6e 63 65 29 0a 20 20 28 66 6f 72 67 65 2d 64 62 29 29 ect-database-once)...(forge-db))
2f920 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 2d 68 6f .(add-hook.'magit-status-mode-ho
2f940 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 63 65 ok.#'forge-connect-database-once
2f960 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 65 6e 61 62 6c 65 2d 73 71 6c 2d 6c 6f 67 67 69 )..(defun.forge-enable-sql-loggi
2f980 6e 67 20 28 29 0a 20 20 22 45 6e 61 62 6c 65 20 6c 6f 67 67 69 6e 67 20 46 6f 72 67 65 27 73 20 ng.()..."Enable.logging.Forge's.
2f9a0 53 51 4c 20 71 75 65 72 69 65 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 SQL.queries."...(interactive)...
2f9c0 28 6c 65 74 20 28 28 63 6f 6e 6e 20 28 6f 72 65 66 20 28 66 6f 72 67 65 2d 64 62 29 20 63 6f 6e (let.((conn.(oref.(forge-db).con
2f9e0 6e 65 63 74 69 6f 6e 29 29 29 0a 20 20 20 20 28 65 6d 61 63 73 71 6c 2d 65 6e 61 62 6c 65 2d 64 nection))).....(emacsql-enable-d
2fa00 65 62 75 67 67 69 6e 67 20 63 6f 6e 6e 29 0a 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 ebugging.conn).....(switch-to-bu
2fa20 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 28 6f 72 65 66 20 63 6f 6e 6e 20 6c 6f 67 ffer-other-window.(oref.conn.log
2fa40 2d 62 75 66 66 65 72 29 29 29 29 0a 0a 3b 3b 3b 20 53 63 68 65 6d 61 74 61 0a 0a 28 64 65 66 63 -buffer))))..;;;.Schemata..(defc
2fa60 6f 6e 73 74 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 0a 20 20 onst.forge--db-table-schemata...
2fa80 27 28 28 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 5b 28 63 6c 61 73 73 20 3a 6e 6f 74 2d '((repository......[(class.:not-
2faa0 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 20 3a 70 72 69 6d 61 null).......(id.:not-null.:prima
2fac0 72 79 2d 6b 65 79 29 0a 20 20 20 20 20 20 66 6f 72 67 65 2d 69 64 0a 20 20 20 20 20 20 66 6f 72 ry-key).......forge-id.......for
2fae0 67 65 0a 20 20 20 20 20 20 6f 77 6e 65 72 0a 20 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 ge.......owner.......name.......
2fb00 61 70 69 68 6f 73 74 0a 20 20 20 20 20 20 67 69 74 68 6f 73 74 0a 20 20 20 20 20 20 72 65 6d 6f apihost.......githost.......remo
2fb20 74 65 0a 20 20 20 20 20 20 63 6f 6e 64 69 74 69 6f 6e 0a 20 20 20 20 20 20 63 72 65 61 74 65 64 te.......condition.......created
2fb40 0a 20 20 20 20 20 20 75 70 64 61 74 65 64 0a 20 20 20 20 20 20 70 75 73 68 65 64 0a 20 20 20 20 .......updated.......pushed.....
2fb60 20 20 70 61 72 65 6e 74 0a 20 20 20 20 20 20 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 20 20 ..parent.......description......
2fb80 20 68 6f 6d 65 70 61 67 65 0a 20 20 20 20 20 20 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 0a 20 .homepage.......default-branch..
2fba0 20 20 20 20 20 61 72 63 68 69 76 65 64 2d 70 0a 20 20 20 20 20 20 66 6f 72 6b 2d 70 0a 20 20 20 .....archived-p.......fork-p....
2fbc0 20 20 20 6c 6f 63 6b 65 64 2d 70 0a 20 20 20 20 20 20 6d 69 72 72 6f 72 2d 70 0a 20 20 20 20 20 ...locked-p.......mirror-p......
2fbe0 20 70 72 69 76 61 74 65 2d 70 0a 20 20 20 20 20 20 69 73 73 75 65 73 2d 70 0a 20 20 20 20 20 20 .private-p.......issues-p.......
2fc00 77 69 6b 69 2d 70 0a 20 20 20 20 20 20 73 74 61 72 73 0a 20 20 20 20 20 20 77 61 74 63 68 65 72 wiki-p.......stars.......watcher
2fc20 73 0a 20 20 20 20 20 20 28 61 73 73 69 67 6e 65 65 73 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 s.......(assignees.:default.eiei
2fc40 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 66 6f 72 6b 73 20 20 20 20 20 3a 64 65 66 o-unbound).......(forks.....:def
2fc60 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 69 73 73 75 65 ault.eieio-unbound).......(issue
2fc80 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)....
2fca0 20 20 20 28 6c 61 62 65 6c 73 20 20 20 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 ...(labels....:default.eieio-unb
2fcc0 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 72 65 76 6e 6f 74 65 73 20 20 3a 64 65 66 61 75 6c 74 20 ound).......(revnotes..:default.
2fce0 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 20 28 70 75 6c 6c 72 65 71 73 20 20 eieio-unbound).......(pullreqs..
2fd00 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 73 65 :default.eieio-unbound).......se
2fd20 6c 65 63 74 69 76 65 2d 70 0a 20 20 20 20 20 20 77 6f 72 6b 74 72 65 65 0a 20 20 20 20 20 20 28 lective-p.......worktree.......(
2fd40 6d 69 6c 65 73 74 6f 6e 65 73 20 3a 64 65 66 61 75 6c 74 20 65 69 65 69 6f 2d 75 6e 62 6f 75 6e milestones.:default.eieio-unboun
2fd60 64 29 0a 20 20 20 20 20 20 69 73 73 75 65 73 2d 75 6e 74 69 6c 0a 20 20 20 20 20 20 70 75 6c 6c d).......issues-until.......pull
2fd80 72 65 71 73 2d 75 6e 74 69 6c 0a 20 20 20 20 20 20 5d 29 0a 0a 20 20 20 20 28 61 73 73 69 67 6e reqs-until.......])......(assign
2fda0 65 65 0a 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 ee......[(repository.:not-null).
2fdc0 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 6b 65 79 ......(id.:not-null.:primary-key
2fde0 29 0a 20 20 20 20 20 20 6c 6f 67 69 6e 0a 20 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 66 ).......login.......name.......f
2fe00 6f 72 67 65 2d 69 64 5d 20 3b 20 4e 65 65 64 65 64 20 66 6f 72 20 47 69 74 6c 61 62 2e 0a 20 20 orge-id].;.Needed.for.Gitlab....
2fe20 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 65 70 6f 73 69 74 6f ...(:foreign-key.......[reposito
2fe40 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 79 20 5b 69 64 5d 0a ry].:references.repository.[id].
2fe60 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 0a 20 20 20 ......:on-delete.:cascade)).....
2fe80 20 28 66 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 .(fork......[(parent.:not-null).
2fea0 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 6b 65 79 ......(id.:not-null.:primary-key
2fec0 29 0a 20 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 ).......owner.......name]......(
2fee0 3a 66 6f 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 :foreign-key.......[parent].:ref
2ff00 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
2ff20 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 0a n-delete.:cascade))......(issue.
2ff40 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
2ff60 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).......
2ff80 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 20 20 20 20 20 73 74 repository.......number.......st
2ffa0 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 74 6c 65 0a 20 20 20 ate.......author.......title....
2ffc0 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 20 63 ...created.......updated.......c
2ffe0 6c 6f 73 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 losed.......status.......locked-
30000 70 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 64 79 0a 20 20 20 p.......milestone.......body....
30020 20 20 20 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 ...(assignees....:default.eieio-
30040 75 6e 62 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 unbound).......(cards........:de
30060 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 65 64 69 74 fault.eieio-unbound).......(edit
30080 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 29 s........:default.eieio-unbound)
300a0 0a 20 20 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 .......(labels.......:default.ei
300c0 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 73 eio-unbound).......(participants
300e0 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).......(
30100 70 6f 73 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 posts........:default.eieio-unbo
30120 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 64 65 66 61 75 6c und).......(reactions....:defaul
30140 74 20 65 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 t.eieio-unbound).......(timeline
30160 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 20 .....:default.eieio-unbound)....
30180 20 20 20 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 ...(marks........:default.eieio-
301a0 75 6e 62 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 unbound).......note.......their-
301c0 69 64 0a 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 id.......slug.......saved-p]....
301e0 20 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 ..(:foreign-key.......[repositor
30200 79 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 y].:references.repository.[id]..
30220 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 0a 20 20 20 20 .....:on-delete.:cascade))......
30240 28 69 73 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 (issue-assignee......[(issue.:no
30260 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 29 5d 0a 20 20 t-null).......(id.:not-null)]...
30280 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 73 73 75 65 5d 20 3a ...(:foreign-key.......[issue].:
302a0 72 65 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 references.issue.[id].......:on-
302c0 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 6c 61 delete.:cascade))......(issue-la
302e0 62 65 6c 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 bel......[(issue.:not-null).....
30300 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
30320 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
30340 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
30360 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
30380 64 5d 20 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 d].:references.label.[id].......
303a0 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 73 75 :on-delete.:cascade))......(issu
303c0 65 2d 6d 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 e-mark......[(issue.:not-null)..
303e0 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 6f 72 65 .....(id.:not-null)]......(:fore
30400 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 65 72 65 6e 63 65 ign-key.......[issue].:reference
30420 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 65 74 65 20 3a 63 s.issue.[id].......:on-delete.:c
30440 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 79 0a 20 20 20 20 20 ascade)......(:foreign-key......
30460 20 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 .[id].:references.mark.[id].....
30480 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
304a0 73 75 65 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 sue-post......[(class.:not-null)
304c0 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 6b 65 .......(id.:not-null.:primary-ke
304e0 79 29 0a 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 y).......issue.......number.....
30500 20 20 61 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 ..author.......created.......upd
30520 61 74 65 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 ated.......body.......(edits.:de
30540 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 61 63 fault.eieio-unbound).......(reac
30560 74 69 6f 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 tions.:default.eieio-unbound)]..
30580 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 73 73 75 65 5d 20 ....(:foreign-key.......[issue].
305a0 3a 72 65 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 :references.issue.[id].......:on
305c0 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 6c 61 62 65 6c 0a 20 -delete.:cascade))......(label..
305e0 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 20 ....[(repository.:not-null).....
30600 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)...
30620 20 20 20 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 ....name.......color.......descr
30640 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 20 20 20 iption]......(:foreign-key......
30660 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
30680 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
306a0 61 64 65 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 ade))......(mark......[;;.For.no
306c0 77 20 74 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 w.this.is.always.nil.because.it.
306e0 73 65 65 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 seems.more.useful.to.......;;.sh
30700 61 72 65 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 are.marks.between.repositories..
30720 20 57 65 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 .We.cannot.omit.this.slot.......
30740 3b 3b 20 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 ;;.though.because.`closql--iref'
30760 20 65 78 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 .expects.`id'.to.be.the.second..
30780 20 20 20 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 .....;;.slot........repository..
307a0 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)
307c0 0a 20 20 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 .......name.......face.......des
307e0 63 72 69 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 cription])......(milestone......
30800 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 69 [(repository.:not-null).......(i
30820 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).......
30840 6e 75 6d 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 number.......title.......created
30860 0a 20 20 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 .......updated.......due.......c
30880 6c 6f 73 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 losed.......description]......(:
308a0 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 3a foreign-key.......[repository].:
308c0 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 20 references.repository.[id]......
308e0 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 6e 6f 74 .:on-delete.:cascade))......(not
30900 69 66 69 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 ification......[(class.:not-null
30920 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 6b ).......(id.:not-null.:primary-k
30940 65 79 29 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 ey).......thread-id.......reposi
30960 74 6f 72 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 tory.......type.......topic.....
30980 20 20 75 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 ..url.......title.......reason..
309a0 20 20 20 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 .....last-read.......updated]...
309c0 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 65 70 6f 73 69 74 6f ...(:foreign-key.......[reposito
309e0 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 79 20 5b 69 64 5d 0a ry].:references.repository.[id].
30a00 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 0a 20 20 20 ......:on-delete.:cascade)).....
30a20 20 28 70 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 .(pullreq......[(class.:not-null
30a40 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 6b ).......(id.:not-null.:primary-k
30a60 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 65 ey).......repository.......numbe
30a80 72 0a 20 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 r.......state.......author......
30aa0 20 74 69 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 .title.......created.......updat
30ac0 65 64 0a 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 ed.......closed.......merged....
30ae0 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 65 ...status.......locked-p.......e
30b00 64 69 74 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 ditable-p.......cross-repo-p....
30b20 20 20 20 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 ...base-ref.......base-repo.....
30b40 20 20 68 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 ..head-ref.......head-user......
30b60 20 68 65 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 .head-repo.......milestone......
30b80 20 62 6f 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 .body.......(assignees.......:de
30ba0 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 63 61 72 64 fault.eieio-unbound).......(card
30bc0 73 20 20 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 s...........:default.eieio-unbou
30be0 6e 64 29 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 nd).......(commits.........:defa
30c00 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 65 64 69 74 73 20 ult.eieio-unbound).......(edits.
30c20 20 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 ..........:default.eieio-unbound
30c40 29 0a 20 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 ).......(labels..........:defaul
30c60 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 61 72 74 69 63 69 70 t.eieio-unbound).......(particip
30c80 61 6e 74 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 ants....:default.eieio-unbound).
30ca0 20 20 20 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 ......(posts...........:default.
30cc0 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 20 eieio-unbound).......(reactions.
30ce0 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)...
30d00 20 20 20 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 ....(review-requests.:default.ei
30d20 65 69 6f 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 eio-unbound).......(reviews.....
30d40 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).....
30d60 20 20 28 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 ..(timeline........:default.eiei
30d80 6f 2d 75 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 o-unbound).......(marks.........
30da0 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).......
30dc0 6e 6f 74 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 note.......base-rev.......head-r
30de0 65 76 0a 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 ev.......draft-p.......their-id.
30e00 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]......(
30e20 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].
30e40 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].....
30e60 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 75 ..:on-delete.:cascade))......(pu
30e80 6c 6c 72 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 llreq-assignee......[(pullreq.:n
30ea0 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 29 5d 0a 20 ot-null).......(id.:not-null)]..
30ec0 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 6c 72 65 71 ....(:foreign-key.......[pullreq
30ee0 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 20 20 20 20 ].:references.pullreq.[id]......
30f00 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 75 6c .:on-delete.:cascade))......(pul
30f20 6c 72 65 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 lreq-label......[(pullreq.:not-n
30f40 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)]......
30f60 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 72 (:foreign-key.......[pullreq].:r
30f80 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 6e eferences.pullreq.[id].......:on
30fa0 2d 64 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 -delete.:cascade)......(:foreign
30fc0 2d 6b 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 -key.......[id].:references.labe
30fe0 6c 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 l.[id].......:on-delete.:cascade
31000 29 29 0a 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 ))......(pullreq-mark......[(pul
31020 6c 72 65 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 lreq.:not-null).......(id.:not-n
31040 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 20 20 20 5b ull)]......(:foreign-key.......[
31060 70 75 6c 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 pullreq].:references.pullreq.[id
31080 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 0a 20 20 20 ].......:on-delete.:cascade)....
310a0 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 3a 72 65 66 65 ..(:foreign-key.......[id].:refe
310c0 72 65 6e 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 rences.mark.[id].......:on-delet
310e0 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 70 6f 73 74 0a e.:cascade))......(pullreq-post.
31100 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
31120 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).......
31140 70 75 6c 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 pullreq.......number.......autho
31160 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 64 0a 20 20 r.......created.......updated...
31180 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 6c 74 20 65 ....body.......(edits.:default.e
311a0 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 20 3a ieio-unbound).......(reactions.:
311c0 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 20 28 3a 66 default.eieio-unbound)]......(:f
311e0 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
31200 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
31220 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 71 2d 72 65 lete.:cascade))......(pullreq-re
31240 76 69 65 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 view-request......[(pullreq.:not
31260 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 29 5d 0a 20 20 20 -null).......(id.:not-null)]....
31280 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 6c 72 65 71 5d 20 ..(:foreign-key.......[pullreq].
312a0 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 20 20 20 20 20 3a :references.pullreq.[id].......:
312c0 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 72 65 76 6e 6f on-delete.:cascade))......(revno
312e0 74 65 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 20 te......[(class.:not-null)......
31300 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 20 .(id.:not-null.:primary-key)....
31320 20 20 20 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 ...repository.......commit......
31340 20 66 69 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 .file.......line.......author...
31360 20 20 20 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 ....body]......(:foreign-key....
31380 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 6f ...[repository].:references.repo
313a0 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 61 sitory.[id].......:on-delete.:ca
313c0 73 63 61 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 scade))))..(cl-defmethod.closql-
313e0 2d 64 62 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 -db-update-schema.((db.forge-dat
31400 61 62 61 73 65 29 29 0a 20 20 28 6c 65 74 20 28 28 63 6f 64 65 2d 76 65 72 73 69 6f 6e 20 28 6f abase))...(let.((code-version.(o
31420 72 65 66 2d 64 65 66 61 75 6c 74 20 27 66 6f 72 67 65 2d 64 61 74 61 62 61 73 65 20 76 65 72 73 ref-default.'forge-database.vers
31440 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e 20 28 63 6c 6f 73 71 6c 2d 2d ion)).........(version.(closql--
31460 64 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 db-get-version.db))).....(when.(
31480 3c 20 76 65 72 73 69 6f 6e 20 63 6f 64 65 2d 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 28 66 <.version.code-version).......(f
314a0 6f 72 67 65 2d 2d 62 61 63 6b 75 70 2d 64 61 74 61 62 61 73 65 20 64 62 29 29 0a 20 20 20 20 28 orge--backup-database.db)).....(
314c0 63 6c 6f 73 71 6c 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 closql-with-transaction.db......
314e0 20 28 77 68 65 6e 20 28 3d 20 76 65 72 73 69 6f 6e 20 32 29 0a 20 20 20 20 20 20 20 20 28 6d 65 .(when.(=.version.2).........(me
31500 73 73 61 67 65 20 22 55 70 67 72 61 64 69 6e 67 20 46 6f 72 67 65 20 64 61 74 61 62 61 73 65 20 ssage."Upgrading.Forge.database.
31520 66 72 6f 6d 20 76 65 72 73 69 6f 6e 20 32 20 74 6f 20 33 2e 2e 2e 22 29 0a 20 20 20 20 20 20 20 from.version.2.to.3...")........
31540 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 70 75 6c 6c .(emacsql.db.[:create-table.pull
31560 72 65 71 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 20 24 53 31 5d 0a 20 20 20 20 20 20 20 20 req-review-request.$S1].........
31580 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 71 20 27 70 75 6c 6c 72 65 71 2d 72 65 76 .........(cdr.(assq.'pullreq-rev
315a0 69 65 77 2d 72 65 71 75 65 73 74 20 66 6f 72 67 65 2d 2d 64 62 2d 74 61 62 6c 65 2d 73 63 68 65 iew-request.forge--db-table-sche
315c0 6d 61 74 61 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 2d 64 62 2d 73 65 74 2d mata))).........(closql--db-set-
315e0 76 65 72 73 69 6f 6e 20 64 62 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 33 29 29 0a 20 20 20 version.db.(setq.version.3))....
31600 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 65 20 64 .....(message."Upgrading.Forge.d
31620 61 74 61 62 61 73 65 20 66 72 6f 6d 20 76 65 72 73 69 6f 6e 20 32 20 74 6f 20 33 2e 2e 2e 64 6f atabase.from.version.2.to.3...do
31640 6e 65 22 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 76 65 72 73 69 6f 6e 20 33 29 0a ne")).......(when.(=.version.3).
31660 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
31680 65 20 64 61 74 61 62 61 73 65 20 66 72 6f 6d 20 76 65 72 73 69 6f 6e 20 33 20 74 6f 20 34 2e 2e e.database.from.version.3.to.4..
316a0 2e 22 29 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 6f 70 2d 74 .").........(emacsql.db.[:drop-t
316c0 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 28 70 63 61 able.notification]).........(pca
316e0 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 74 61 62 6c 65 20 2e 20 2c 73 63 68 65 6d 61 29 20 66 se-dolist.(`(,table...,schema).f
31700 6f 72 67 65 2d 2d 64 62 2d 74 61 62 6c 65 2d 73 63 68 65 6d 61 74 61 29 0a 20 20 20 20 20 20 20 orge--db-table-schemata)........
31720 20 20 20 28 77 68 65 6e 20 28 6d 65 6d 71 20 74 61 62 6c 65 20 27 28 6e 6f 74 69 66 69 63 61 74 ...(when.(memq.table.'(notificat
31740 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 20 20 20 20 20 ion.............................
31760 20 20 6d 61 72 6b 20 69 73 73 75 65 2d 6d 61 72 6b 20 70 75 6c 6c 72 65 71 2d 6d 61 72 6b 29 29 ..mark.issue-mark.pullreq-mark))
31780 0a 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 63 72 65 61 74 .............(emacsql.db.[:creat
317a0 65 2d 74 61 62 6c 65 20 24 69 31 20 24 53 32 5d 20 74 61 62 6c 65 20 73 63 68 65 6d 61 29 29 29 e-table.$i1.$S2].table.schema)))
317c0 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
317e0 6c 65 20 69 73 73 75 65 20 20 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 6d 61 72 6b 73 20 3a 64 65 le.issue...:add-column.marks.:de
31800 66 61 75 6c 74 20 24 73 31 5d 20 27 65 69 65 69 6f 2d 75 6e 62 6f 75 6e 64 29 0a 20 20 20 20 20 fault.$s1].'eieio-unbound)......
31820 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 6c ...(emacsql.db.[:alter-table.pul
31840 6c 72 65 71 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 lreq.:add-column.marks.:default.
31860 24 73 31 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 63 6c $s1].'eieio-unbound).........(cl
31880 6f 73 71 6c 2d 2d 64 62 2d 73 65 74 2d 76 65 72 73 69 6f 6e 20 64 62 20 28 73 65 74 71 20 76 65 osql--db-set-version.db.(setq.ve
318a0 72 73 69 6f 6e 20 34 29 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 55 70 67 72 rsion.4)).........(message."Upgr
318c0 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
318e0 6e 20 33 20 74 6f 20 34 2e 2e 2e 64 6f 6e 65 22 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 n.3.to.4...done")).......(when.(
31900 3d 20 76 65 72 73 69 6f 6e 20 34 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 55 =.version.4).........(message."U
31920 70 67 72 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 pgrading.Forge.database.from.ver
31940 73 69 6f 6e 20 34 20 74 6f 20 35 2e 2e 2e 22 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 sion.4.to.5...").........(emacsq
31960 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 3a 61 l.db.[:alter-table.repository.:a
31980 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 61 75 6c 74 20 6e dd-column.selective-p.:default.n
319a0 69 6c 5d 29 0a 20 20 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 il]).........(closql--db-set-ver
319c0 73 69 6f 6e 20 64 62 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 35 29 29 0a 20 20 20 20 20 20 sion.db.(setq.version.5)).......
319e0 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 65 20 64 61 74 61 ..(message."Upgrading.Forge.data
31a00 62 61 73 65 20 66 72 6f 6d 20 76 65 72 73 69 6f 6e 20 34 20 74 6f 20 35 2e 2e 2e 64 6f 6e 65 22 base.from.version.4.to.5...done"
31a20 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 76 65 72 73 69 6f 6e 20 35 29 0a 20 20 20 )).......(when.(=.version.5)....
31a40 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 65 20 64 .....(message."Upgrading.Forge.d
31a60 61 74 61 62 61 73 65 20 66 72 6f 6d 20 76 65 72 73 69 6f 6e 20 35 20 74 6f 20 36 2e 2e 2e 22 29 atabase.from.version.5.to.6...")
31a80 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
31aa0 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 20 77 6f 72 6b 74 72 le.repository.:add-column.worktr
31ac0 65 65 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 63 6c 6f 73 71 ee.:default.nil]).........(closq
31ae0 6c 2d 2d 64 62 2d 73 65 74 2d 76 65 72 73 69 6f 6e 20 64 62 20 28 73 65 74 71 20 76 65 72 73 69 l--db-set-version.db.(setq.versi
31b00 6f 6e 20 36 29 29 0a 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 on.6)).........(message."Upgradi
31b20 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 6e 20 35 ng.Forge.database.from.version.5
31b40 20 74 6f 20 36 2e 2e 2e 64 6f 6e 65 22 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 76 .to.6...done")).......(when.(=.v
31b60 65 72 73 69 6f 6e 20 36 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 55 70 67 72 ersion.6).........(message."Upgr
31b80 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
31ba0 6e 20 36 20 74 6f 20 37 2e 2e 2e 22 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 n.6.to.7...").........(emacsql.d
31bc0 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 2d 63 6f 6c b.[:alter-table.issue...:add-col
31be0 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 20 20 20 20 umn.note.:default.nil]).........
31c00 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 65 (emacsql.db.[:alter-table.pullre
31c20 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 6e 69 6c 5d q.:add-column.note.:default.nil]
31c40 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 74 65 2d 74 ).........(emacsql.db.[:create-t
31c60 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 20 20 20 20 able.milestone.$S1].............
31c80 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 6f 72 67 65 .....(cdr.(assq.'milestone.forge
31ca0 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 20 20 20 28 --db-table-schemata))).........(
31cc0 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
31ce0 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 64 65 66 61 ory.:add-column.milestones.:defa
31d00 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 69 65 69 6f ult.$s1]..................'eieio
31d20 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 69 73 74 20 -unbound).........(pcase-dolist.
31d40 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 74 6f 6e 65 (`(,repo-id.,issue-id.,milestone
31d60 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 61 63 73 71 )........................(emacsq
31d80 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 20 6d 69 6c l.db.[:select.[repository.id.mil
31da0 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 20 20 20 20 estone].........................
31dc0 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 20 20 20 20 ............:from.issue.........
31de0 20 20 20 20 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 ............................:whe
31e00 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 20 20 20 20 re.(notnull.milestone)])).......
31e20 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 6e 65 29 0a ....(unless.(stringp.milestone).
31e40 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 2d 69 73 73 ............(oset.(forge-get-iss
31e60 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 20 20 20 20 ue.issue-id).milestone..........
31e80 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 65 70 6f 2d .........(forge--object-id.repo-
31ea0 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 20 20 20 20 id.(cdar.milestone))))).........
31ec0 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 75 6c 6c 72 (pcase-dolist.(`(,repo-id.,pullr
31ee0 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 20 20 20 20 eq-id.,milestone)...............
31f00 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 74 20 5b 72 .........(emacsql.db.[:select.[r
31f20 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 20 20 20 20 epository.id.milestone].........
31f40 20 20 20 20 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
31f60 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.......................
31f80 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 6c 20 6d 69 ..............:where.(notnull.mi
31fa0 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 73 20 28 73 lestone)]))...........(unless.(s
31fc0 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 20 20 28 6f tringp.milestone).............(o
31fe0 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 65 71 2d 69 set.(forge-get-pullreq.pullreq-i
32000 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 20 20 20 28 d).milestone...................(
32020 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 61 72 20 6d forge--object-id.repo-id.(cdar.m
32040 69 6c 65 73 74 6f 6e 65 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 2d 64 ilestone))))).........(closql--d
32060 62 2d 73 65 74 2d 76 65 72 73 69 6f 6e 20 64 62 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 37 b-set-version.db.(setq.version.7
32080 29 29 0a 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 )).........(message."Upgrading.F
320a0 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 6e 20 36 20 74 6f 20 orge.database.from.version.6.to.
320c0 37 2e 2e 2e 64 6f 6e 65 22 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 76 65 72 73 69 7...done")).......(when.(=.versi
320e0 6f 6e 20 37 29 0a 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 on.7).........(message."Upgradin
32100 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 6e 20 37 20 g.Forge.database.from.version.7.
32120 74 6f 20 38 2e 2e 2e 22 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 5b 3a to.8...").........(emacsql.db.[:
32140 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 20 alter-table.pullreq.:add-column.
32160 62 61 73 65 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 20 base-rev.:default.nil]).........
32180 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 65 (emacsql.db.[:alter-table.pullre
321a0 71 20 3a 61 64 64 2d 63 6f 6c 75 6d 6e 20 68 65 61 64 2d 72 65 76 20 3a 64 65 66 61 75 6c 74 20 q.:add-column.head-rev.:default.
321c0 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 74 65 nil]).........(emacsql.db.[:alte
321e0 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 20 64 72 61 66 r-table.pullreq.:add-column.draf
32200 74 2d 70 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 63 6c 6f t-p..:default.nil]).........(clo
32220 73 71 6c 2d 2d 64 62 2d 73 65 74 2d 76 65 72 73 69 6f 6e 20 64 62 20 28 73 65 74 71 20 76 65 72 sql--db-set-version.db.(setq.ver
32240 73 69 6f 6e 20 38 29 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 55 70 67 72 61 sion.8)).........(message."Upgra
32260 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 6e ding.Forge.database.from.version
32280 20 37 20 74 6f 20 38 2e 2e 2e 64 6f 6e 65 22 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 3d .7.to.8...done")).......(when.(=
322a0 20 76 65 72 73 69 6f 6e 20 38 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 55 70 .version.8).........(message."Up
322c0 67 72 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 grading.Forge.database.from.vers
322e0 69 6f 6e 20 38 20 74 6f 20 39 2e 2e 2e 22 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c ion.8.to.9...").........(emacsql
32300 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 63 .db.[:alter-table.pullreq.:add-c
32320 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 20 20 olumn.their-id.:default.nil])...
32340 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.
32360 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 64 65 issue...:add-column.their-id.:de
32380 66 61 75 6c 74 20 6e 69 6c 5d 29 0a 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 2d 64 62 2d fault.nil]).........(closql--db-
323a0 73 65 74 2d 76 65 72 73 69 6f 6e 20 64 62 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 39 29 29 set-version.db.(setq.version.9))
323c0 0a 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 .........(message."Upgrading.For
323e0 67 65 20 64 61 74 61 62 61 73 65 20 66 72 6f 6d 20 76 65 72 73 69 6f 6e 20 38 20 74 6f 20 39 2e ge.database.from.version.8.to.9.
32400 2e 2e 64 6f 6e 65 22 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 76 65 72 73 69 6f 6e ..done")).......(when.(=.version
32420 20 39 29 0a 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 .9).........(message."Upgrading.
32440 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 6e 20 39 20 74 6f Forge.database.from.version.9.to
32460 20 31 30 2e 2e 2e 22 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 .10...").........(emacsql.db.[:a
32480 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 20 73 lter-table.pullreq.:add-column.s
324a0 6c 75 67 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 65 6d 61 63 lug.:default.nil]).........(emac
324c0 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 20 20 3a 61 64 sql.db.[:alter-table.issue...:ad
324e0 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 6c 5d 29 0a 20 20 20 d-column.slug.:default.nil])....
32500 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 20 2c 6e 75 6d 62 65 .....(pcase-dolist.(`(,id.,numbe
32520 72 20 2c 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 20 20 20 20 r.,type)........................
32540 28 65 6d 61 63 73 71 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 (emacsql........................
32560 20 64 62 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 5b 3a 73 65 .db.........................[:se
32580 6c 65 63 74 20 5b 70 75 6c 6c 72 65 71 3a 69 64 20 70 75 6c 6c 72 65 71 3a 6e 75 6d 62 65 72 20 lect.[pullreq:id.pullreq:number.
325a0 72 65 70 6f 73 69 74 6f 72 79 3a 63 6c 61 73 73 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 repository:class]...............
325c0 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 20 20 ...........:from.pullreq........
325e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6a 6f 69 6e 20 72 65 70 6f 73 69 74 6f ..................:join.reposito
32600 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 3a 6f 6e 20 ry..........................:on.
32620 28 3d 20 70 75 6c 6c 72 65 71 3a 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 73 69 74 6f 72 79 (=.pullreq:repository.repository
32640 3a 69 64 29 5d 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 67 69 74 6c 61 62 70 :id)]))...........(let.((gitlabp
32660 20 28 6d 65 6d 71 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 .(memq.type.....................
32680 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 65 6e 64 20 28 63 6c 6f 73 71 6c 2d 77 68 65 72 65 ...........(append.(closql-where
326a0 2d 63 6c 61 73 73 2d 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 -class-in.......................
326c0 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 6c 61 62 2d ..................'forge-gitlab-
326e0 72 65 70 6f 73 69 74 6f 72 79 2d 2d 65 69 65 69 6f 2d 63 68 69 6c 64 70 29 0a 20 20 20 20 20 20 repository--eieio-childp).......
32700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
32720 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 .nil)))).............(emacsql.db
32740 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 6c 75 67 20 24 .[:update.pullreq.:set.(=.slug.$
32760 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)]..........
32780 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 22 20 28 69 66 20 67 ............(format."%s%s".(if.g
327a0 69 74 6c 61 62 70 20 22 21 22 20 22 23 22 29 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 20 itlabp."!"."#").number).........
327c0 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 63 61 73 .............id))).........(pcas
327e0 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 69 64 20 2c 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 e-dolist.(`(,id.,number)........
32800 20 20 20 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 ................(emacsql.db.[:se
32820 6c 65 63 74 20 5b 69 64 20 6e 75 6d 62 65 72 5d 20 3a 66 72 6f 6d 20 69 73 73 75 65 5d 29 29 0a lect.[id.number].:from.issue])).
32840 20 20 20 20 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 69 ..........(emacsql.db.[:update.i
32860 73 73 75 65 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 ssue.:set.(=.slug.$s1).:where.(=
32880 20 69 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 28 66 6f .id.$s2)]....................(fo
328a0 72 6d 61 74 20 22 23 25 73 22 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 rmat."#%s".number)..............
328c0 20 20 20 20 20 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 2d 64 62 2d 73 ......id)).........(closql--db-s
328e0 65 74 2d 76 65 72 73 69 6f 6e 20 64 62 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 31 30 29 29 et-version.db.(setq.version.10))
32900 0a 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 .........(message."Upgrading.For
32920 67 65 20 64 61 74 61 62 61 73 65 20 66 72 6f 6d 20 76 65 72 73 69 6f 6e 20 39 20 74 6f 20 31 30 ge.database.from.version.9.to.10
32940 2e 2e 2e 64 6f 6e 65 22 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 76 65 72 73 69 6f ...done")).......(when.(=.versio
32960 6e 20 31 30 29 0a 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 n.10).........(message."Upgradin
32980 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 6e 20 31 30 g.Forge.database.from.version.10
329a0 20 74 6f 20 31 31 2e 2e 2e 22 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 20 64 62 20 .to.11...").........(emacsql.db.
329c0 5b 3a 64 72 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 [:drop-table.notification]).....
329e0 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 6e ....(emacsql.db.[:create-table.n
32a00 6f 74 69 66 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 otification.$S1]................
32a20 20 20 28 63 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 ..(cdr.(assq.'notification.forge
32a40 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 20 20 20 28 --db-table-schemata))).........(
32a60 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 65 71 emacsql.db.[:alter-table.pullreq
32a80 20 3a 72 65 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 .:rename-column.unread-p.:to.sta
32aa0 74 75 73 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 tus]).........(emacsql.db.[:alte
32ac0 72 2d 74 61 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 r-table.issue...:rename-column.u
32ae0 6e 72 65 61 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 nread-p.:to.status]).........(em
32b00 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 65 71 20 3a acsql.db.[:alter-table.pullreq.:
32b20 61 64 64 2d 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 add-column.saved-p.:default.nil]
32b40 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
32b60 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 61 76 65 64 2d 70 20 ble.issue...:add-column.saved-p.
32b80 3a 64 65 66 61 75 6c 74 20 6e 69 6c 5d 29 0a 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 2d :default.nil]).........(closql--
32ba0 64 62 2d 73 65 74 2d 76 65 72 73 69 6f 6e 20 64 62 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 db-set-version.db.(setq.version.
32bc0 31 31 29 29 0a 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 11)).........(message."Upgrading
32be0 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 6e 20 31 30 20 .Forge.database.from.version.10.
32c00 74 6f 20 31 31 2e 2e 2e 64 6f 6e 65 22 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 76 to.11...done")).......(when.(=.v
32c20 65 72 73 69 6f 6e 20 31 31 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 55 70 67 ersion.11).........(message."Upg
32c40 72 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 rading.Forge.database.from.versi
32c60 6f 6e 20 31 31 20 74 6f 20 31 32 2e 2e 2e 22 29 0a 20 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 on.11.to.12...").........(emacsq
32c80 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 74 69 6f 6e 5d 29 l.db.[:drop-table.notification])
32ca0 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
32cc0 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 20 20 20 20 20 20 ble.notification.$S1]...........
32ce0 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 61 74 69 6f 6e 20 .......(cdr.(assq.'notification.
32d00 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 29 0a 20 20 20 20 forge--db-table-schemata))).....
32d20 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 5b 3a 73 65 ....(dolist.(id.(emacsql.db.[:se
32d40 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 3d 20 73 74 lect.id.:from.issue.:where.(=.st
32d60 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 28 65 6d 61 63 73 ate.'closed)]))...........(emacs
32d80 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 74 61 ql.db.[:update.issue.:set.(=.sta
32da0 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 64 20 24 73 31 29 te.'completed).:where.(=.id.$s1)
32dc0 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 20 20 20 20 20 20 ]....................id)).......
32de0 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 5b 3a 73 65 6c 65 ..(dolist.(id.(emacsql.db.[:sele
32e00 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 69 73 6e 75 6c 6c ct.id.:from.issue.:where.(isnull
32e20 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
32e40 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 74 61 74 65 20 27 b.[:update.issue.:set.(=.state.'
32e60 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 20 20 done).:where.(=.id.$s1)]........
32e80 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 64 6f 6c 69 73 74 ............id)).........(dolist
32ea0 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 66 72 .(id.(emacsql.db.[:select.id.:fr
32ec0 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 20 27 63 6c 6f 73 om.pullreq.:where.(=.state.'clos
32ee0 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 64 62 20 5b 3a 75 ed)]))...........(emacsql.db.[:u
32f00 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 20 27 72 65 6a pdate.pullreq.:set.(=.state.'rej
32f20 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 20 20 20 20 20 20 ected).:where.(=.id.$s1)].......
32f40 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 64 6f 6c 69 73 .............id)).........(dolis
32f60 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 66 t.(id.(emacsql.db.[:select.id.:f
32f80 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 20 73 74 61 74 75 rom.pullreq.:where.(isnull.statu
32fa0 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 62 20 5b 3a 75 70 s)]))...........(emacsql.db.[:up
32fc0 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 20 27 64 6f 6e 65 date.pullreq.:set.(=.state.'done
32fe0 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 20 20 20 20 20 20 ).:where.(=.id.$s1)]............
33000 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 73 71 6c 20 64 62 ........id)).........(emacsql.db
33020 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 3a 61 64 64 2d 63 .[:alter-table.repository.:add-c
33040 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 74 20 6e 69 6c 5d olumn.issues-until.:default.nil]
33060 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
33080 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 20 70 75 6c 6c 72 ble.repository.:add-column.pullr
330a0 65 71 73 2d 75 6e 74 69 6c 20 3a 64 65 66 61 75 6c 74 20 6e 69 6c 5d 29 0a 20 20 20 20 20 20 20 eqs-until.:default.nil])........
330c0 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 20 28 73 65 74 .(closql--db-set-version.db.(set
330e0 71 20 76 65 72 73 69 6f 6e 20 31 32 29 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 q.version.12)).........(message.
33100 22 55 70 67 72 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 "Upgrading.Forge.database.from.v
33120 65 72 73 69 6f 6e 20 31 31 20 74 6f 20 31 32 2e 2e 2e 64 6f 6e 65 22 29 29 0a 20 20 20 20 20 20 ersion.11.to.12...done")).......
33140 28 77 68 65 6e 20 28 3d 20 76 65 72 73 69 6f 6e 20 31 32 29 0a 20 20 20 20 20 20 20 20 28 6d 65 (when.(=.version.12).........(me
33160 73 73 61 67 65 20 22 55 70 67 72 61 64 69 6e 67 20 46 6f 72 67 65 20 64 61 74 61 62 61 73 65 20 ssage."Upgrading.Forge.database.
33180 66 72 6f 6d 20 76 65 72 73 69 6f 6e 20 31 32 20 74 6f 20 31 33 2e 2e 2e 22 29 0a 20 20 20 20 20 from.version.12.to.13...")......
331a0 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 5b 3a 73 65 6c ...(dolist.(id.(emacsql.db.[:sel
331c0 65 63 74 20 69 64 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 ect.id.:from.repository.........
331e0 20 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.
33200 28 69 73 6e 75 6c 6c 20 69 73 73 75 65 73 2d 75 6e 74 69 6c 29 5d 29 29 0a 20 20 20 20 20 20 20 (isnull.issues-until)]))........
33220 20 20 20 28 65 6d 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 ...(emacsql............db.[:upda
33240 74 65 20 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 65 74 20 28 3d 20 69 73 73 75 65 73 2d 75 6e 74 te.repository.:set.(=.issues-unt
33260 69 6c 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 il.$s1).:where.(=.id.$s2)]......
33280 20 20 20 20 20 20 28 63 61 61 72 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 ......(caar.(forge-sql.[:select.
332a0 5b 75 70 64 61 74 65 64 5d 20 3a 66 72 6f 6d 20 69 73 73 75 65 0a 20 20 20 20 20 20 20 20 20 20 [updated].:from.issue...........
332c0 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 70 ...................:where.(=.rep
332e0 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 20 ository.$s1)....................
33300 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 74 ..........:order-by.[(desc.updat
33320 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 20 20 20 ed)]............................
33340 20 20 3a 6c 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 ..:limit.1].....................
33360 20 20 20 20 20 20 20 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 69 64 29 29 0a 20 20 20 ........id))............id))....
33380 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 5b 3a 73 .....(dolist.(id.(emacsql.db.[:s
333a0 65 6c 65 63 74 20 69 64 20 3a 66 72 6f 6d 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 20 elect.id.:from.repository.......
333c0 20 20 20 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 ...........................:wher
333e0 65 20 28 69 73 6e 75 6c 6c 20 70 75 6c 6c 72 65 71 73 2d 75 6e 74 69 6c 29 5d 29 29 0a 20 20 20 e.(isnull.pullreqs-until)]))....
33400 20 20 20 20 20 20 20 28 65 6d 61 63 73 71 6c 0a 20 20 20 20 20 20 20 20 20 20 20 64 62 20 5b 3a .......(emacsql............db.[:
33420 75 70 64 61 74 65 20 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 65 74 20 28 3d 20 70 75 6c 6c 72 65 update.repository.:set.(=.pullre
33440 71 73 2d 75 6e 74 69 6c 20 24 73 31 29 20 3a 77 68 65 72 65 20 28 3d 20 69 64 20 24 73 32 29 5d qs-until.$s1).:where.(=.id.$s2)]
33460 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 61 72 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 ............(caar.(forge-sql.[:s
33480 65 6c 65 63 74 20 5b 75 70 64 61 74 65 64 5d 20 3a 66 72 6f 6d 20 70 75 6c 6c 72 65 71 0a 20 20 elect.[updated].:from.pullreq...
334a0 20 20 20 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 ...........................:wher
334c0 65 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 20 20 20 20 e.(=.repository.$s1)............
334e0 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 65 ..................:order-by.[(de
33500 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 20 20 20 20 20 20 20 sc.updated)]....................
33520 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 20 20 ..........:limit.1].............
33540 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 20 20 20 ................id))............
33560 69 64 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 61 6c 74 65 72 id)).........(emacsql.db.[:alter
33580 2d 74 61 62 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 -table.repository.:rename-column
335a0 20 73 70 61 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 .sparse-p.:to.condition]).......
335c0 20 20 28 70 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 ..(pcase-dolist.(`(,id.,not-trac
335e0 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 28 65 6d 61 ked)........................(ema
33600 63 73 71 6c 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 csql.db.[:select.[id.condition].
33620 3a 66 72 6f 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 :from.repository]))...........(e
33640 6d 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 macsql............db.[:update.re
33660 70 6f 73 69 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 pository.:set.(=.condition.$s1).
33680 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 20 20 28 69 :where.(=.id.$s2)]............(i
336a0 66 20 6e 6f 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 f.not-tracked.:known.:tracked)..
336c0 20 20 20 20 20 20 20 20 20 20 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 2d ..........id)).........(closql--
336e0 64 62 2d 73 65 74 2d 76 65 72 73 69 6f 6e 20 64 62 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 db-set-version.db.(setq.version.
33700 31 33 29 29 0a 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 13)).........(message."Upgrading
33720 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 6e 20 31 32 20 .Forge.database.from.version.12.
33740 74 6f 20 31 33 2e 2e 2e 64 6f 6e 65 22 29 29 0a 20 20 20 20 20 20 29 0a 20 20 20 20 28 63 6c 2d to.13...done")).......).....(cl-
33760 63 61 6c 6c 2d 6e 65 78 74 2d 6d 65 74 68 6f 64 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 call-next-method)))..(defun.forg
33780 65 2d 2d 62 61 63 6b 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 e--backup-database.(db)...(let.(
337a0 28 64 73 74 20 28 63 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 (dst.(concat.(file-name-sans-ext
337c0 65 6e 73 69 6f 6e 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 ension.forge-database-file).....
337e0 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 2d 76 25 73 22 20 .................(format."-v%s".
33800 28 63 61 61 72 20 28 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 (caar.(emacsql.(oref.db.connecti
33820 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 20 20 20 20 20 20 on).............................
33840 20 20 20 20 20 20 20 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 .......................[:pragma.
33860 75 73 65 72 2d 76 65 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 user-version])))................
33880 20 20 20 20 20 20 28 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 ......(format-time-string."-%Y%m
338a0 25 64 2d 25 48 25 4d 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 %d-%H%M")......................"
338c0 2e 73 71 6c 69 74 65 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 .sqlite"))).....(message."Copyin
338e0 67 20 46 6f 72 67 65 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 g.Forge.database.to.%s...".dst).
33900 20 20 20 20 28 63 6f 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 ....(copy-file.forge-database-fi
33920 6c 65 20 64 73 74 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 le.dst).....(message."Copying.Fo
33940 72 67 65 20 64 61 74 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 rge.database.to.%s...done".dst))
33960 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 64 62 29 0a 3b 3b 3b )..;;;._.(provide.'forge-db).;;;
33980 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 00 00 00 00 .forge-db.el.ends.here..........
339a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
339c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
339e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33a00 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 73 65 6d 69 2e 65 forge-20240405.1509/forge-semi.e
33a20 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...............................
33a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33a60 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
33a80 30 30 30 37 32 33 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 34 37 36 00 20 30 00 00 00 0007233.00000000000.014476..0...
33aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33b00 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...................
33b20 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...................
33b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
33c00 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
33c20 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
33c40 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-
33c60 32 30 32 34 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 2024.Jonas.Bernoulli..;;.Author:
33c80 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 2e .Jonas.Bernoulli.<jonas@bernoul.
33ca0 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 6c li>.;;.Maintainer:.Jonas.Bernoul
33cc0 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 4c li.<jonas@bernoul.li>..;;.SPDX-L
33ce0 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 61 icense-Identifier:.GPL-3.0-or-la
33d00 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 61 ter..;;.This.file.is.free.softwa
33d20 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 2f re:.you.can.redistribute.it.and/
33d40 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 20 or.modify.;;.it.under.the.terms.
33d60 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 73 of.the.GNU.General.Public.Licens
33d80 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 6f e.as.published.;;.by.the.Free.So
33da0 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 6f ftware.Foundation,.either.versio
33dc0 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 6f n.3.of.the.License,.;;.or.(at.yo
33de0 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 3b ur.option).any.later.version..;;
33e00 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 20 .;;.This.file.is.distributed.in.
33e20 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 2c the.hope.that.it.will.be.useful,
33e40 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 69 .;;.but.WITHOUT.ANY.WARRANTY;.wi
33e60 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 20 thout.even.the.implied.warranty.
33e80 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 53 of.;;.MERCHANTABILITY.or.FITNESS
33ea0 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 20 .FOR.A.PARTICULAR.PURPOSE...See.
33ec0 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 73 the.;;.GNU.General.Public.Licens
33ee0 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 68 e.for.more.details..;;.;;.You.sh
33f00 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 65 ould.have.received.a.copy.of.the
33f20 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 61 .GNU.General.Public.License.;;.a
33f40 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 65 long.with.this.file...If.not,.se
33f60 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 2f e.<https://www.gnu.org/licenses/
33f80 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 0a >...;;;.Code:..(require.'forge).
33fa0 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 67 69 .;;;.Classes..(defclass.forge-gi
33fc0 74 77 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 tweb-repository.(forge-noapi-rep
33fe0 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.:
34000 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 3f 70 3d 25 initform."https://%h/gitweb/?p=%
34020 50 2e 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 P.git;a=commitdiff;h=%r")....(br
34040 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
34060 3a 2f 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 ://%h/gitweb/?p=%P.git;a=log;h=r
34080 65 66 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 efs/heads/%r")....(remote-url-fo
340a0 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 67 69 74 77 65 rmat.:initform."https://%h/gitwe
340c0 62 2f 3f 70 3d 25 50 2e 67 69 74 3b 61 3d 73 75 6d 6d 61 72 79 22 29 29 0a 20 20 22 47 69 74 77 b/?p=%P.git;a=summary"))..."Gitw
340e0 65 62 20 66 72 6f 6d 20 68 74 74 70 73 3a 2f 2f 67 69 74 2d 73 63 6d 2e 63 6f 6d 2f 64 6f 63 73 eb.from.https://git-scm.com/docs
34100 2f 67 69 74 77 65 62 2e 22 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 63 67 69 74 /gitweb.")..(defclass.forge-cgit
34120 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 69 74 -repository.(forge-noapi-reposit
34140 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 69 74 ory)...((commit-url-format.:init
34160 66 6f 72 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 3f form."https://%h/%p.git/commit/?
34180 69 64 3d 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 3a 69 id=%r")....(branch-url-format.:i
341a0 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 6c 6f 67 2f 3f nitform."https://%h/%p.git/log/?
341c0 68 3d 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 3a 69 6e h=%r")....(remote-url-format.:in
341e0 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 61 62 6f 75 74 22 itform."https://%h/%p.git/about"
34200 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 7a 78 32 63 ))..."Cgit.from.https://git.zx2c
34220 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 68 6f 73 74 4.com/cgit/about..Different.host
34240 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 73 6f s.use.different.url.schemata,.so
34260 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 53 65 65 20 .we.need.multiple.classes...See.
34280 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 2d 73 65 6d their.definitions.in.\"forge-sem
342a0 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 67 69 74 2a i.el\".")..(defclass.forge-cgit*
342c0 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 6f 73 69 74 6f -repository.(forge-cgit-reposito
342e0 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 69 74 66 ry)...((commit-url-format.:initf
34300 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 25 68 2f 63 67 69 74 2f 25 70 2e 67 69 74 2f 63 6f 6d 6d orm."https://%h/cgit/%p.git/comm
34320 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 66 6f 72 6d 61 it/?id=%r")....(branch-url-forma
34340 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 74 2f 25 70 2e t.:initform."https://%h/cgit/%p.
34360 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 2d 66 git/log/?h=%r")....(remote-url-f
34380 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 74 ormat.:initform."https://%h/cgit
343a0 2f 25 70 2e 67 69 74 2f 61 62 6f 75 74 22 29 29 0a 20 20 22 43 67 69 74 20 66 72 6f 6d 20 68 74 /%p.git/about"))..."Cgit.from.ht
343c0 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..
343e0 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
34400 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.
34420 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.
34440 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
34460 73 73 20 66 6f 72 67 65 2d 63 67 69 74 2a 2a 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 66 6f 72 67 ss.forge-cgit**-repository.(forg
34480 65 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 e-cgit-repository)...((commit-ur
344a0 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 63 l-format.:initform."https://%h/c
344c0 67 69 74 2f 25 6e 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 git/%n.git/commit/?id=%r")....(b
344e0 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
34500 73 3a 2f 2f 25 68 2f 63 67 69 74 2f 25 6e 2e 67 69 74 2f 6c 6f 67 2f 3f 68 3d 25 72 22 29 0a 20 s://%h/cgit/%n.git/log/?h=%r")..
34520 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."
34540 68 74 74 70 73 3a 2f 2f 25 68 2f 63 67 69 74 2f 25 6e 2e 67 69 74 2f 61 62 6f 75 74 22 29 29 0a https://%h/cgit/%n.git/about")).
34560 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
34580 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 68 6f 73 74 73 20 75 om/cgit/about..Different.hosts.u
345a0 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 73 6f 20 77 65 se.different.url.schemata,.so.we
345c0 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 53 65 65 20 74 68 65 .need.multiple.classes...See.the
345e0 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 2d 73 65 6d 69 2e 65 ir.definitions.in.\"forge-semi.e
34600 6c 5c 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 l\".")..(defclass.forge-repoorcz
34620 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 6f 73 69 74 6f -repository.(forge-cgit-reposito
34640 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 69 74 66 ry)...((commit-url-format.:initf
34660 6f 72 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 orm."https://%h/%p.git/commit/%r
34680 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 3a 69 6e 69 74 66 6f ")....(branch-url-format.:initfo
346a0 72 6d 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 rm."https://%h/%p.git/log/%r")..
346c0 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."
346e0 68 74 74 70 73 3a 2f 2f 25 68 2f 25 70 2e 67 69 74 22 29 29 0a 20 20 22 43 67 69 74 20 66 6f 72 https://%h/%p.git"))..."Cgit.for
34700 6b 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 k.used.on.https://repo.or.cz/cgi
34720 74 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 t.git..Different.hosts.use.diffe
34740 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 65 65 64 20 6d 75 rent.url.schemata,.so.we.need.mu
34760 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 20 64 65 66 69 6e ltiple.classes...See.their.defin
34780 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 22 2e 22 29 0a 0a itions.in.\"forge-semi.el\".")..
347a0 28 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 (defclass.forge-stagit-repositor
347c0 79 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 y.(forge-noapi-repository)...((c
347e0 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 6d 20 22 68 74 74 70 ommit-url-format.:initform."http
34800 73 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 s://%h/%n/commit/%r.html")....(b
34820 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
34840 73 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 s://%h/%n/refs.html")....(remote
34860 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://%
34880 68 2f 25 6e 2f 66 69 6c 65 2f 52 45 41 44 4d 45 2e 68 74 6d 6c 22 29 29 0a 20 20 22 53 74 61 67 h/%n/file/README.html"))..."Stag
348a0 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 6f 72 67 2f it.from.https://codemadness.org/
348c0 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 0a 4f 6e 6c git/stagit/file/README.html..Onl
348e0 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 63 61 6e 20 y.the.history.of.\"master\".can.
34900 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 68 65 0a 6c be.shown,.so.this.links.to.the.l
34920 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 6f 67 20 6f ist.of.refs.instead.of.the.log.o
34940 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 64 65 66 63 f.the.specified.branch.")..(defc
34960 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 66 6f 72 67 lass.forge-srht-repository.(forg
34980 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 69 74 2d 75 e-noapi-repository)...((commit-u
349a0 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 2f rl-format.:initform."https://%h/
349c0 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 68 2d 75 72 ~%o/%n/commit/%r")....(branch-ur
349e0 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/~
34a00 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 6c 2d 66 6f %o/%n/log/%r")....(remote-url-fo
34a20 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 25 6f 2f 25 rmat.:initform."https://%h/~%o/%
34a40 6e 22 29 29 0a 20 20 22 53 65 65 20 68 74 74 70 73 3a 2f 2f 6d 65 74 61 2e 73 72 2e 68 74 2e 22 n"))..."See.https://meta.sr.ht."
34a60 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 73 65 6d 69 29 0a 3b )..;;;._.(provide.'forge-semi).;
34a80 3b 3b 20 66 6f 72 67 65 2d 73 65 6d 69 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 ;;.forge-semi.el.ends.here......
34aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34c00 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 70 6f 73 74 2e 65 forge-20240405.1509/forge-post.e
34c20 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...............................
34c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34c60 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
34c80 30 30 32 32 30 31 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 32 31 00 20 30 00 00 00 0022015.00000000000.014521..0...
34ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34d00 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...................
34d20 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...................
34d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
34e00 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
34e20 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.-*-..;
34e40 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 34 20 4a 6f 6e 61 73 20 ;.Copyright.(C).2018-2024.Jonas.
34e60 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
34e80 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 3b 3b 20 4d 61 69 6e oulli.<jonas@bernoul.li>.;;.Main
34ea0 74 61 69 6e 65 72 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 tainer:.Jonas.Bernoulli.<jonas@b
34ec0 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e ernoul.li>..;;.SPDX-License-Iden
34ee0 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
34f00 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
34f20 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.;
34f40 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.
34f60 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
34f80 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
34fa0 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.
34fc0 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).
34fe0 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
35000 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
35020 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
35040 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.
35060 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
35080 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
350a0 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.
350c0 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.
350e0 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
35100 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
35120 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
35140 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://
35160 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
35180 65 3a 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 e:..(require.'markdown-mode)..(r
351a0 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 0a 28 64 65 equire.'forge)..;;;.Options..(de
351c0 66 63 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 fcustom.forge-post-mode-hook...'
351e0 28 76 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 (visual-line-mode.....turn-on-fl
35200 79 73 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 yspell)..."Hook.run.after.enteri
35220 6e 67 20 46 6f 72 67 65 2d 50 6f 73 74 20 6d 6f 64 65 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d ng.Forge-Post.mode."...:package-
35240 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 3a 67 72 version.'(forge..."0.2.0")...:gr
35260 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 70 74 69 oup.'forge...:type.'hook...:opti
35280 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 20 20 20 ons.'(visual-line-mode..........
352a0 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 75 73 74 ....turn-on-flyspell))..(defcust
352c0 6f 6d 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 64 72 61 66 74 2d 70 20 6e 69 6c 0a 20 20 22 57 om.forge-buffer-draft-p.nil..."W
352e0 68 65 74 68 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 hether.new.pull-requests.start.o
35300 75 74 20 61 73 20 64 72 61 66 74 73 20 62 79 20 64 65 66 61 75 6c 74 2e 0a 0a 54 68 65 20 62 75 ut.as.drafts.by.default...The.bu
35320 66 66 65 72 2d 6c 6f 63 61 6c 20 76 61 6c 75 65 20 69 73 20 75 73 65 20 74 6f 20 6b 65 65 70 20 ffer-local.value.is.use.to.keep.
35340 74 72 61 63 6b 20 6f 66 20 74 68 65 20 64 72 61 66 74 20 73 74 61 74 75 73 0a 6f 66 20 74 68 65 track.of.the.draft.status.of.the
35360 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 70 61 63 6b 61 .current.pull-request."...:packa
35380 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 20 ge-version.'(forge..."0.4.0")...
353a0 3a 67 72 6f 75 70 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 :group.'forge...:type.'boolean).
353c0 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 2d 70 6f 73 74 .;;;.Class..(defclass.forge-post
353e0 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 63 74 20 74 29 0a .(forge-object).().:abstract.t).
35400 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 65 66 6d 65 74 68 .;;;.Query.;;;;.Get..(cl-defmeth
35420 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 20 66 6f 72 67 65 od.forge-get-parent.((post.forge
35440 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 20 70 6f 73 74 29 -post))...(forge-get-topic.post)
35460 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 65 70 6f 73 )..(cl-defmethod.forge-get-repos
35480 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 20 20 28 66 6f 72 itory.((post.forge-post))...(for
354a0 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 74 6f 70 ge-get-repository.(forge-get-top
354c0 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 28 64 65 66 75 6e ic.post)))..;;;;.Current..(defun
354e0 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 69 6f 6e 61 6c 20 .forge-post-at-point.(&optional.
35500 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 20 61 74 20 70 6f assert)..."Return.the.post.at.po
35520 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 6f 73 74 20 61 6e int..If.there.is.no.such.post.an
35540 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
35560 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 74 69 6f 6e .an.error."...(or.(magit-section
35580 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 70 6f 73 74 29 29 -value-if.'(issue.pullreq.post))
355a0 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 72 72 6f 72 20 22 .......(and.assert.(user-error."
355c0 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 29 29 29 29 0a 0a There.is.no.post.at.point"))))..
355e0 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 69 6e 74 20 28 26 (defun.forge-comment-at-point.(&
35600 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 20 74 68 65 20 63 optional.assert)..."Return.the.c
35620 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 69 73 20 6e 6f 20 omment.at.point..If.there.is.no.
35640 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 20 6e 6f 6e 2d 6e such.comment.and.DEMAND.is.non-n
35660 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 0a 20 20 28 6f 72 il,.then.signal.an.error."...(or
35680 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 2d 69 66 20 27 28 .(and.(magit-section-value-if.'(
356a0 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 6f 73 74 20 28 6f post))............(let.((post.(o
356c0 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 29 20 76 61 6c 75 ref.(magit-current-section).valu
356e0 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 20 28 66 6f 72 67 e)))..............(and.(or.(forg
35700 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 20 20 20 20 20 20 e-pullreq-post-p.post)..........
35720 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 70 6f 73 74 2d 70 .............(forge-issue-post-p
35740 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 70 6f 73 74 29 29 .post))...................post))
35760 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 72 72 6f 72 20 ).......(and.assert.(user-error.
35780 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 69 6e 74 22 29 29 "There.is.no.comment.at.point"))
357a0 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 6d 65 74 68 6f 64 ))..;;;.Utilities..(cl-defmethod
357c0 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 65 2d 70 6f 73 74 .forge--format.((post.forge-post
357e0 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 66 6f 72 67 65 2d ).slot.&optional.spec)...(forge-
35800 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 6f 73 74 29 20 73 -format.(forge-get-topic.post).s
35820 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 70 65 63 20 28 3f lot..................`(,@spec.(?
35840 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 29 0a 0a 3b 3b 3b I...,(oref.post.number)))))..;;;
35860 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 70 6f 73 74 .Mode..(defvar-keymap.forge-post
35880 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 22 43 2d 63 20 43 2d 65 22 20 20 20 20 20 20 20 20 20 20 20 -mode-map..."C-c.C-e"...........
358a0 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
358c0 74 2d 64 69 73 70 61 74 63 68 0a 20 20 22 43 2d 63 20 43 2d 63 22 20 20 20 20 20 20 20 20 20 20 t-dispatch..."C-c.C-c"..........
358e0 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 70 6f ......................#'forge-po
35900 73 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 st-submit..."<remap>.<evil-save-
35920 61 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 and-close>"..........#'forge-pos
35940 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 6d t-submit..."<remap>.<evil-save-m
35960 6f 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 odified-and-close>".#'forge-post
35980 2d 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 -submit..."C-c.C-k".............
359a0 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 74 2d ...................#'forge-post-
359c0 63 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 cancel..."<remap>.<kill-buffer>"
359e0 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
35a00 61 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 ancel..."<remap>.<ido-kill-buffe
35a20 72 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 r>"..............#'forge-post-ca
35a40 6e 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 ncel..."<remap>.<iswitchb-kill-b
35a60 75 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 uffer>".........#'forge-post-can
35a80 63 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 cel..."<remap>.<evil-quit>".....
35aa0 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 6e 63 ...............#'forge-post-canc
35ac0 65 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 el)..(define-derived-mode.forge-
35ae0 70 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 20 post-mode.gfm-mode."Forge-Post".
35b00 22 22 29 0a 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 "")..(defvar-local.forge--buffer
35b20 2d 62 61 73 65 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 -base-branch.nil).(defvar-local.
35b40 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 20 6e 69 6c 29 0a 28 forge--buffer-head-branch.nil).(
35b60 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 70 6f 73 74 2d defvar-local.forge--buffer-post-
35b80 6f 62 6a 65 63 74 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 object.nil).(defvar-local.forge-
35ba0 2d 62 75 66 66 65 72 2d 69 73 73 75 65 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c -buffer-issue.nil).(defvar-local
35bc0 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 6e 20 6e 69 6c .forge--submit-post-function.nil
35be0 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 6f 72 67 65 2d 2d 63 61 6e 63 65 6c 2d 70 6f ).(defvar-local.forge--cancel-po
35c00 73 74 2d 66 75 6e 63 74 69 6f 6e 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 66 st-function.nil).(defvar-local.f
35c20 6f 72 67 65 2d 2d 70 72 65 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 6e 69 6c 29 0a 28 6d 61 6b 65 orge--pre-post-buffer.nil).(make
35c40 2d 76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 27 66 6f 72 67 65 2d 62 75 -variable-buffer-local.'forge-bu
35c60 66 66 65 72 2d 64 72 61 66 74 2d 70 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 70 72 65 ffer-draft-p)..(defun.forge--pre
35c80 70 61 72 65 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 28 66 69 6c 65 6e 61 6d 65 20 26 6f 70 74 69 pare-post-buffer.(filename.&opti
35ca0 6f 6e 61 6c 20 68 65 61 64 65 72 20 73 6f 75 72 63 65 20 74 61 72 67 65 74 29 0a 20 20 28 6c 65 onal.header.source.target)...(le
35cc0 74 20 28 28 66 69 6c 65 20 28 63 6f 6e 76 65 72 74 2d 73 74 61 6e 64 61 72 64 2d 66 69 6c 65 6e t.((file.(convert-standard-filen
35ce0 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d ame................(expand-file-
35d00 6e 61 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 name.(concat."magit/posts/".file
35d20 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 20 20 20 20 20 20 20 name)...........................
35d40 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 67 69 74 64 69 72 29 29 29 29 29 0a 20 20 20 20 28 6d .......(magit-gitdir))))).....(m
35d60 61 6b 65 2d 64 69 72 65 63 74 6f 72 79 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f ake-directory.(file-name-directo
35d80 72 79 20 66 69 6c 65 29 20 74 29 0a 20 20 20 20 28 6c 65 74 20 28 28 70 72 65 76 62 75 66 20 28 ry.file).t).....(let.((prevbuf.(
35da0 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 20 28 72 65 73 75 current-buffer))...........(resu
35dc0 6d 65 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 me.(and.(file-exists-p.file)....
35de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3e 20 28 66 69 6c 65 2d 61 74 74 ....................(>.(file-att
35e00 72 69 62 75 74 65 2d 73 69 7a 65 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 66 69 6c ribute-size.(file-attributes.fil
35e20 65 29 29 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 62 75 66 20 28 66 69 6e 64 2d 66 69 e)).0)))...........(buf.(find-fi
35e40 6c 65 2d 6e 6f 73 65 6c 65 63 74 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d le-noselect.file))).......(with-
35e60 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 current-buffer.buf.........(forg
35e80 65 2d 70 6f 73 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 68 65 61 64 65 e-post-mode).........(when.heade
35ea0 72 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 73 65 74 2d 68 65 61 64 65 72 2d 6c 69 r...........(magit-set-header-li
35ec0 6e 65 2d 66 6f 72 6d 61 74 20 68 65 61 64 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 ne-format.header)).........(setq
35ee0 20 66 6f 72 67 65 2d 2d 70 72 65 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 70 72 65 76 62 75 66 29 .forge--pre-post-buffer.prevbuf)
35f00 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 72 65 73 75 6d 65 0a 20 20 20 20 20 20 20 20 20 20 .........(when.resume...........
35f20 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 75 66 29 (forge--display-post-buffer.buf)
35f40 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6d 61 67 69 74 2d 72 65 61 64 2d 63 68 61 ...........(when.(magit-read-cha
35f60 72 2d 63 61 73 65 20 22 41 20 64 72 61 66 74 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 2e 20 r-case."A.draft.already.exists..
35f80 20 22 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 72 20 22 5b 72 .".nil...................(?r."[r
35fa0 5d 65 73 75 6d 65 20 65 64 69 74 69 6e 67 20 65 78 69 73 74 69 6e 67 20 64 72 61 66 74 22 29 0a ]esume.editing.existing.draft").
35fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 64 20 22 5b 64 5d 69 73 63 61 72 64 ..................(?d."[d]iscard
35fe0 20 64 72 61 66 74 20 61 6e 64 20 73 74 61 72 74 20 6f 76 65 72 22 20 74 29 29 0a 20 20 20 20 20 .draft.and.start.over".t))......
36000 20 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 .......(erase-buffer)...........
36020 20 20 28 73 65 74 71 20 72 65 73 75 6d 65 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 ..(setq.resume.nil))).........(w
36040 68 65 6e 20 28 61 6e 64 20 28 6e 6f 74 20 72 65 73 75 6d 65 29 20 28 73 74 72 69 6e 67 2d 70 72 hen.(and.(not.resume).(string-pr
36060 65 66 69 78 2d 70 20 22 6e 65 77 22 20 66 69 6c 65 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 efix-p."new".filename)).........
36080 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 74 65 6d 70 6c ..(let-alist.(forge--topic-templ
360a0 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 66 6f 72 67 65 ate.......................(forge
360c0 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 0a 20 20 20 20 20 20 -get-repository.:tracked).......
360e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 6f 75 72 63 65 20 27 66 6f 72 67 ................(if.source.'forg
36100 65 2d 70 75 6c 6c 72 65 71 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 29 0a 20 20 20 20 20 20 20 e-pullreq.'forge-issue))........
36120 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2e 75 72 6c 0a 20 20 .....(cond..............(.url...
36140 20 20 20 20 20 20 20 20 20 20 20 20 28 62 72 6f 77 73 65 2d 75 72 6c 20 2e 75 72 6c 29 0a 20 20 ............(browse-url..url)...
36160 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 6f 73 74 2d 63 61 6e 63 65 6c 29 0a ............(forge-post-cancel).
36180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 75 66 20 6e 69 6c 29 0a 20 20 20 ..............(setq.buf.nil)....
361a0 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 55 73 69 6e 67 20 62 72 6f 77 73 ...........(message."Using.brows
361c0 65 72 20 74 6f 20 76 69 73 69 74 20 25 73 20 69 6e 73 74 65 61 64 20 6f 66 20 6f 70 65 6e 69 6e er.to.visit.%s.instead.of.openin
361e0 67 20 61 6e 20 69 73 73 75 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 g.an.issue".....................
36200 20 20 20 2e 75 72 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2e 6e 61 6d 65 0a 20 20 ....url))..............(.name...
36220 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 20 47 69 74 68 75 62 20 69 73 73 75 65 20 77 69 ............;;.A.Github.issue.wi
36240 74 68 20 79 61 6d 6c 20 66 72 6f 6e 74 6d 61 74 74 65 72 2e 0a 20 20 20 20 20 20 20 20 20 20 20 th.yaml.frontmatter.............
36260 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 69 6e 73 65 72 74 20 2e 74 65 78 74 ...(save-excursion.(insert..text
36280 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 72 65 2d 73 65 61 ))...............(unless.(re-sea
362a0 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 74 69 74 6c 65 3a 20 22 20 6e 69 6c 20 74 29 0a 20 20 rch-forward."^title:.".nil.t)...
362c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 66 ..............(when.(re-search-f
362e0 6f 72 77 61 72 64 20 22 5e 2d 2d 2d 22 20 6e 69 6c 20 74 20 32 29 0a 20 20 20 20 20 20 20 20 20 orward."^---".nil.t.2)..........
36300 20 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 29 0a 20 20 20 .........(beginning-of-line)....
36320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 74 69 74 6c 65 3a 20 5c ...............(insert."title:.\
36340 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 61 63 6b 77 61 72 64 2d n")...................(backward-
36360 63 68 61 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 char))))..............(t........
36380 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 23 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 .......(insert."#.")............
363a0 20 20 20 28 6c 65 74 20 28 28 73 69 6e 67 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...(let.((single................
363c0 20 20 20 20 20 20 28 61 6e 64 20 73 6f 75 72 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ......(and.source...............
363e0 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 28 63 61 72 20 28 6d 61 67 69 74 2d 72 65 76 2d 64 ............(=.(car.(magit-rev-d
36400 69 66 66 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 29 0a iff-count.source.target)).1)))).
36420 20 20 20 20 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 0a ................(save-excursion.
36440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 73 69 6e 67 6c 65 0a 20 ..................(when.single..
36460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 20 70 75 6c 6c 2d 72 65 71 ...................;;.A.pull-req
36480 75 65 73 74 2e 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 uest......................(magit
364a0 2d 72 65 76 2d 69 6e 73 65 72 74 2d 66 6f 72 6d 61 74 20 22 25 42 22 20 73 6f 75 72 63 65 29 29 -rev-insert-format."%B".source))
364c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 2e 74 65 78 74 0a 20 ...................(when..text..
364e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 69 6e 67 6c 65 0a 20 20 ...................(if.single...
36500 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 72 74 20 22 2d ......................(insert."-
36520 2d 2d 2d 2d 2d 2d 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ------\n")......................
36540 20 28 69 6e 73 65 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 .(insert."\n")).................
36560 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 22 20 2e 74 65 78 74 29 29 29 29 29 29 29 29 29 0a ....(insert."\n"..text))))))))).
36580 20 20 20 20 20 20 62 75 66 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 64 69 73 70 ......buf)))..(defun.forge--disp
365a0 6c 61 79 2d 70 6f 73 74 2d 62 75 66 66 65 72 20 28 62 75 66 29 0a 20 20 28 6d 61 67 69 74 2d 64 lay-post-buffer.(buf)...(magit-d
365c0 69 73 70 6c 61 79 2d 62 75 66 66 65 72 20 62 75 66 20 23 27 64 69 73 70 6c 61 79 2d 62 75 66 66 isplay-buffer.buf.#'display-buff
365e0 65 72 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 20 28 er))..(defun.forge-post-cancel.(
36600 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 65 69 )..."Cancel.the.post.that.is.bei
36620 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 72 2e ng.edited.in.the.current.buffer.
36640 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 65 72 "...(interactive)...(save-buffer
36660 29 0a 20 20 28 69 66 2d 6c 65 74 20 28 28 66 6e 20 66 6f 72 67 65 2d 2d 63 61 6e 63 65 6c 2d 70 )...(if-let.((fn.forge--cancel-p
36680 6f 73 74 2d 66 75 6e 63 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6e ost-function)).......(funcall.fn
366a0 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 20 20 20 20 .forge--buffer-post-object).....
366c0 28 6d 61 67 69 74 2d 6d 6f 64 65 2d 62 75 72 79 2d 62 75 66 66 65 72 20 27 6b 69 6c 6c 29 29 29 (magit-mode-bury-buffer.'kill)))
366e0 0a 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 ..(defun.forge-post-submit.()...
36700 22 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 "Submit.the.post.that.is.being.e
36720 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 72 2e 22 0a 20 20 dited.in.the.current.buffer."...
36740 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 65 72 29 0a 20 20 (interactive)...(save-buffer)...
36760 28 69 66 2d 6c 65 74 20 28 28 66 6e 20 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 2d 70 6f 73 74 2d (if-let.((fn.forge--submit-post-
36780 66 75 6e 63 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6e 0a 20 20 20 function)).......(funcall.fn....
367a0 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 6f 72 ............(forge-get-repositor
367c0 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 20 20 20 y.forge--buffer-post-object)....
367e0 20 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 ............forge--buffer-post-o
36800 62 6a 65 63 74 29 0a 20 20 20 20 28 65 72 72 6f 72 20 22 66 6f 72 67 65 2d 2d 73 75 62 6d 69 74 bject).....(error."forge--submit
36820 2d 70 6f 73 74 2d 66 75 6e 63 74 69 6f 6e 20 69 73 20 6e 69 6c 22 29 29 29 0a 0a 28 64 65 66 75 -post-function.is.nil")))..(defu
36840 6e 20 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 28 29 n.forge--post-submit-callback.()
36860 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 65 20 20 20 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e ...(let*.((file....buffer-file-n
36880 61 6d 65 29 0a 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 ame)..........(editbuf.(current-
368a0 62 75 66 66 65 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 buffer))..........(prevbuf.forge
368c0 2d 2d 70 72 65 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 --pre-post-buffer)..........(top
368e0 69 63 20 20 20 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 ic...(ignore-errors.(forge-get-t
36900 6f 70 69 63 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 29 opic.forge--buffer-post-object))
36920 29 0a 20 20 20 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 )..........(repo....(forge-get-r
36940 65 70 6f 73 69 74 6f 72 79 20 74 6f 70 69 63 29 29 29 0a 20 20 20 20 28 6c 61 6d 62 64 61 20 28 epository.topic))).....(lambda.(
36960 76 61 6c 75 65 20 68 65 61 64 65 72 73 20 73 74 61 74 75 73 20 72 65 71 29 0a 20 20 20 20 20 20 value.headers.status.req).......
36980 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 6f 73 74 2d (run-hook-with-args.'forge-post-
369a0 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 20 20 20 20 submit-callback-hook............
369c0 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 20 73 74 61 ...............value.headers.sta
369e0 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 66 69 6c 65 tus.req).......(delete-file.file
36a00 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 61 6d 65 2d .t).......(let.((dir.(file-name-
36a20 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 6e 6c 65 73 directory.file))).........(unles
36a40 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 20 6e 69 6c s.(cddr.(directory-files.dir.nil
36a60 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 69 72 65 63 .nil.t))...........(delete-direc
36a80 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 6e 20 28 62 tory.dir.nil.t))).......(when.(b
36aa0 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 20 20 28 77 uffer-live-p.editbuf).........(w
36ac0 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 20 20 20 20 ith-current-buffer.editbuf......
36ae0 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 20 27 6b 69 .....(magit-mode-bury-buffer.'ki
36b00 6c 6c 29 29 29 0a 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 ll))).......(with-current-buffer
36b20 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 70 72 ...........(if.(buffer-live-p.pr
36b40 65 76 62 75 66 29 20 70 72 65 76 62 75 66 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 evbuf).prevbuf.(current-buffer))
36b60 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 74 6f 70 69 63 0a 20 20 20 20 20 20 20 20 .........(if.(and.topic.........
36b80 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 63 68 69 6c 64 70 20 72 65 70 6f 20 27 66 6f .........(forge--childp.repo.'fo
36ba0 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)..........
36bc0 20 20 20 20 20 20 20 20 28 6f 72 20 28 61 6e 64 20 28 66 62 6f 75 6e 64 70 20 27 66 6f 72 67 65 ........(or.(and.(fboundp.'forge
36be0 2d 70 75 6c 6c 72 65 71 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -pullreq-p).....................
36c00 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 2d 70 20 74 6f 70 69 63 29 29 0a 20 ......(forge-pullreq-p.topic))..
36c20 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 20 73 ....................(oref.repo.s
36c40 65 6c 65 63 74 69 76 65 2d 70 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 elective-p))).............(forge
36c60 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 20 72 65 70 6f 20 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 --pull-topic.repo.topic)........
36c80 20 20 20 28 66 6f 72 67 65 2d 70 75 6c 6c 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 ...(forge-pull))))))..(defun.for
36ca0 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 20 28 29 0a 20 20 28 ge--post-submit-errorback.()...(
36cc0 6c 61 6d 62 64 61 20 28 65 72 72 6f 72 20 26 72 65 73 74 20 5f 29 0a 20 20 20 20 28 65 72 72 6f lambda.(error.&rest._).....(erro
36ce0 72 20 22 46 61 69 6c 65 64 20 74 6f 20 73 75 62 6d 69 74 20 70 6f 73 74 3a 20 25 53 22 20 65 72 r."Failed.to.submit.post:.%S".er
36d00 72 6f 72 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 ror)))..(transient-define-prefix
36d20 20 66 6f 72 67 65 2d 70 6f 73 74 2d 64 69 73 70 61 74 63 68 20 28 29 0a 20 20 22 44 69 73 70 61 .forge-post-dispatch.()..."Dispa
36d40 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 22 0a 20 20 tch.a.post.creation.command."...
36d60 5b 22 56 61 72 69 61 62 6c 65 73 22 0a 20 20 20 28 22 64 22 20 22 43 72 65 61 74 65 20 64 72 61 ["Variables"....("d"."Create.dra
36d80 66 74 22 20 66 6f 72 67 65 2d 70 6f 73 74 2d 74 6f 67 67 6c 65 2d 64 72 61 66 74 29 5d 0a 20 20 ft".forge-post-toggle-draft)]...
36da0 5b 22 41 63 74 22 0a 20 20 20 28 22 43 2d 63 22 20 22 53 75 62 6d 69 74 22 20 66 6f 72 67 65 2d ["Act"....("C-c"."Submit".forge-
36dc0 70 6f 73 74 2d 73 75 62 6d 69 74 29 0a 20 20 20 28 22 43 2d 6b 22 20 22 43 61 6e 63 65 6c 22 20 post-submit)....("C-k"."Cancel".
36de0 66 6f 72 67 65 2d 70 6f 73 74 2d 63 61 6e 63 65 6c 29 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 forge-post-cancel)])..(transient
36e00 2d 64 65 66 69 6e 65 2d 69 6e 66 69 78 20 66 6f 72 67 65 2d 70 6f 73 74 2d 74 6f 67 67 6c 65 2d -define-infix.forge-post-toggle-
36e20 64 72 61 66 74 20 28 29 0a 20 20 22 54 6f 67 67 6c 65 20 77 68 65 74 68 65 72 20 74 68 65 20 70 draft.()..."Toggle.whether.the.p
36e40 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 20 64 ull-request.being.created.is.a.d
36e60 72 61 66 74 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 74 72 61 6e 73 69 65 6e 74 2d 6c 69 73 70 2d raft."...:class.'transient-lisp-
36e80 76 61 72 69 61 62 6c 65 0a 20 20 3a 76 61 72 69 61 62 6c 65 20 27 66 6f 72 67 65 2d 62 75 66 66 variable...:variable.'forge-buff
36ea0 65 72 2d 64 72 61 66 74 2d 70 0a 20 20 3a 72 65 61 64 65 72 20 28 6c 61 6d 62 64 61 20 28 26 72 er-draft-p...:reader.(lambda.(&r
36ec0 65 73 74 20 5f 29 20 28 6e 6f 74 20 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 64 72 61 66 74 2d 70 est._).(not.forge-buffer-draft-p
36ee0 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 65 ))...:if.(lambda.().(equal.(file
36f00 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 6e -name-nondirectory.buffer-file-n
36f20 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 73 ame)."new-pullreq")))..;;;.Notes
36f40 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 6f ..(defclass.forge-note.(forge-po
36f60 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 6f st).())..(defvar-keymap.forge-no
36f80 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 74 te-section-map..."<remap>.<magit
36fa0 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 63 -edit-thing>".#'forge-edit-topic
36fc0 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 20 -note)..(defun.forge--save-note.
36fe0 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 74 (_repo.topic)...(let.((value.(st
37000 72 69 6e 67 2d 74 72 69 6d 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 ring-trim.(buffer-substring-no-p
37020 72 6f 70 65 72 74 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 roperties.......................
37040 20 20 20 20 20 20 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .......(point-min)..............
37060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 29 0a ................(point-max))))).
37080 20 20 20 20 28 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 ....(oset.topic.note.(if.(equal.
370a0 76 61 6c 75 65 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 value."").nil.value)))...(delete
370c0 2d 66 69 6c 65 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 -file.buffer-file-name.t)...(let
370e0 20 28 28 64 69 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 .((dir.(file-name-directory.buff
37100 65 72 2d 66 69 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 er-file-name))).....(unless.(cdd
37120 72 20 28 64 69 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 r.(directory-files.dir.nil.nil.t
37140 29 29 0a 20 20 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 )).......(delete-directory.dir))
37160 29 0a 20 20 28 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 )...(let.((prevbuf.forge--pre-po
37180 73 74 2d 62 75 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 st-buffer)).....(magit-mode-bury
371a0 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 72 65 66 72 65 73 -buffer.'kill).....(forge-refres
371c0 68 2d 62 75 66 66 65 72 20 70 72 65 76 62 75 66 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 28 70 72 6f 76 h-buffer.prevbuf)))..;;;._.(prov
371e0 69 64 65 20 27 66 6f 72 67 65 2d 70 6f 73 74 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 70 6f 73 74 2e ide.'forge-post).;;;.forge-post.
37200 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 00 el.ends.here....................
37220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
372a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
372c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
372e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
373a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
373c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
373e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37400 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 63 6f 72 65 2e 65 forge-20240405.1509/forge-core.e
37420 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...............................
37440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37460 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
37480 30 30 33 35 32 32 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 34 37 34 00 20 30 00 00 00 0035226.00000000000.014474..0...
374a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
374c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
374e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37500 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...................
37520 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...................
37540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
37580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
375a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
375c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
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 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
37620 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.
37640 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 34 20 -*-..;;.Copyright.(C).2018-2024.
37660 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
37680 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 2e 6c 69 3e 0a 3b s.Bernoulli.<jonas@bernoul.li>.;
376a0 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 6c 6c 69 20 3c 6a ;.Maintainer:.Jonas.Bernoulli.<j
376c0 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 4c 69 63 65 6e 73 onas@bernoul.li>..;;.SPDX-Licens
376e0 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 0a e-Identifier:.GPL-3.0-or-later..
37700 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 79 ;;.This.file.is.free.software:.y
37720 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 6f ou.can.redistribute.it.and/or.mo
37740 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 68 dify.;;.it.under.the.terms.of.th
37760 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 20 e.GNU.General.Public.License.as.
37780 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 72 published.;;.by.the.Free.Softwar
377a0 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 6f e.Foundation,.either.version.3.o
377c0 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 70 f.the.License,.;;.or.(at.your.op
377e0 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 54 tion).any.later.version..;;.;;.T
37800 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 68 his.file.is.distributed.in.the.h
37820 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 62 ope.that.it.will.be.useful,.;;.b
37840 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 74 ut.WITHOUT.ANY.WARRANTY;.without
37860 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 3b .even.the.implied.warranty.of.;;
37880 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 20 .MERCHANTABILITY.or.FITNESS.FOR.
378a0 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 3b A.PARTICULAR.PURPOSE...See.the.;
378c0 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 72 ;.GNU.General.Public.License.for
378e0 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 20 .more.details..;;.;;.You.should.
37900 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 20 have.received.a.copy.of.the.GNU.
37920 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 20 General.Public.License.;;.along.
37940 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 74 with.this.file...If.not,.see.<ht
37960 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 3b tps://www.gnu.org/licenses/>...;
37980 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 65 71 ;;.Code:..(require.'magit)..(req
379a0 75 69 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 uire.'cl-lib).(require.'compat).
379c0 28 72 65 71 75 69 72 65 20 27 64 61 73 68 29 0a 28 72 65 71 75 69 72 65 20 27 65 69 65 69 6f 29 (require.'dash).(require.'eieio)
379e0 0a 28 72 65 71 75 69 72 65 20 27 73 65 71 29 0a 28 72 65 71 75 69 72 65 20 27 73 75 62 72 2d 78 .(require.'seq).(require.'subr-x
37a00 29 0a 0a 28 72 65 71 75 69 72 65 20 27 74 72 61 6e 73 69 65 6e 74 29 0a 0a 28 72 65 71 75 69 72 )..(require.'transient)..(requir
37a20 65 20 27 66 6f 72 67 65 2d 64 62 29 0a 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 e.'forge-db)..(eval-when-compile
37a40 0a 20 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 27 69 64 20 20 20 20 20 20 20 65 69 65 69 6f 2d 2d ...(cl-pushnew.'id.......eieio--
37a60 6b 6e 6f 77 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 known-slot-names)...(cl-pushnew.
37a80 27 6e 61 6d 65 20 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 'name.....eieio--known-slot-name
37aa0 73 29 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 65 69 65 69 6f s)...(cl-pushnew.'number...eieio
37ac0 2d 2d 6b 6e 6f 77 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 --known-slot-names)...(cl-pushne
37ae0 77 20 27 6f 77 6e 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 w.'owner....eieio--known-slot-na
37b00 6d 65 73 29 0a 20 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 27 77 6f 72 6b 74 72 65 65 20 65 69 65 mes)...(cl-pushnew.'worktree.eie
37b20 69 6f 2d 2d 6b 6e 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 io--known-slot-names))..;;;.Opti
37b40 6f 6e 73 0a 0a 28 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 ons..(defgroup.forge.nil..."Opti
37b60 6f 6e 73 20 63 6f 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 ons.concerning.Git.forges."...:g
37b80 72 6f 75 70 20 27 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 roup.'magit)..(defgroup.forge-fa
37ba0 63 65 73 20 6e 69 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 ces.nil..."Faces.concerning.Git.
37bc0 66 6f 72 67 65 73 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 forges."...:group.'forge...:grou
37be0 70 20 27 6d 61 67 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 p.'magit-faces)..(defcustom.forg
37c00 65 2d 61 6c 69 73 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 e-alist...'(;;.Forges.....("gith
37c20 75 62 2e 63 6f 6d 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 ub.com"."api.github.com"......"g
37c40 69 74 68 75 62 2e 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 ithub.com".forge-github-reposito
37c60 72 79 29 0a 20 20 20 20 28 22 67 69 74 6c 61 62 2e 63 6f 6d 22 20 22 67 69 74 6c 61 62 2e 63 6f ry).....("gitlab.com"."gitlab.co
37c80 6d 2f 61 70 69 2f 76 34 22 0a 20 20 20 20 20 22 67 69 74 6c 61 62 2e 63 6f 6d 22 20 66 6f 72 67 m/api/v4"......"gitlab.com".forg
37ca0 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 22 73 61 6c 73 61 e-gitlab-repository).....("salsa
37cc0 2e 64 65 62 69 61 6e 2e 6f 72 67 22 20 22 73 61 6c 73 61 2e 64 65 62 69 61 6e 2e 6f 72 67 2f 61 .debian.org"."salsa.debian.org/a
37ce0 70 69 2f 76 34 22 0a 20 20 20 20 20 22 73 61 6c 73 61 2e 64 65 62 69 61 6e 2e 6f 72 67 22 20 66 pi/v4"......"salsa.debian.org".f
37d00 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 22 66 72 orge-gitlab-repository).....("fr
37d20 61 6d 61 67 69 74 2e 6f 72 67 22 20 22 66 72 61 6d 61 67 69 74 2e 6f 72 67 2f 61 70 69 2f 76 34 amagit.org"."framagit.org/api/v4
37d40 22 0a 20 20 20 20 20 22 66 72 61 6d 61 67 69 74 2e 6f 72 67 22 20 66 6f 72 67 65 2d 67 69 74 6c "......"framagit.org".forge-gitl
37d60 61 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 67 6e 6f 6d ab-repository).....("gitlab.gnom
37d80 65 2e 6f 72 67 22 20 22 67 69 74 6c 61 62 2e 67 6e 6f 6d 65 2e 6f 72 67 2f 61 70 69 2f 76 34 22 e.org"."gitlab.gnome.org/api/v4"
37da0 0a 20 20 20 20 20 22 67 69 74 6c 61 62 2e 67 6e 6f 6d 65 2e 6f 72 67 22 20 66 6f 72 67 65 2d 67 ......"gitlab.gnome.org".forge-g
37dc0 69 74 6c 61 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 3b 3b 20 46 6f 72 67 65 73 20 itlab-repository).....;;.Forges.
37de0 28 41 50 49 20 75 6e 73 75 70 70 6f 72 74 65 64 29 0a 20 20 20 20 28 22 63 6f 64 65 62 65 72 67 (API.unsupported).....("codeberg
37e00 2e 6f 72 67 22 20 22 63 6f 64 65 62 65 72 67 2e 6f 72 67 2f 61 70 69 2f 76 31 22 0a 20 20 20 20 .org"."codeberg.org/api/v1".....
37e20 20 22 63 6f 64 65 62 65 72 67 2e 6f 72 67 22 20 66 6f 72 67 65 2d 67 69 74 65 61 2d 72 65 70 6f ."codeberg.org".forge-gitea-repo
37e40 73 69 74 6f 72 79 29 0a 20 20 20 20 28 22 63 6f 64 65 2e 6f 72 67 6d 6f 64 65 2e 6f 72 67 22 20 sitory).....("code.orgmode.org".
37e60 22 63 6f 64 65 2e 6f 72 67 6d 6f 64 65 2e 6f 72 67 2f 61 70 69 2f 76 31 22 0a 20 20 20 20 20 22 "code.orgmode.org/api/v1"......"
37e80 63 6f 64 65 2e 6f 72 67 6d 6f 64 65 2e 6f 72 67 22 20 66 6f 72 67 65 2d 67 6f 67 73 2d 72 65 70 code.orgmode.org".forge-gogs-rep
37ea0 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 28 22 62 69 74 62 75 63 6b 65 74 2e 6f 72 67 22 20 22 61 ository).....("bitbucket.org"."a
37ec0 70 69 2e 62 69 74 62 75 63 6b 65 74 2e 6f 72 67 2f 32 2e 30 22 0a 20 20 20 20 20 22 62 69 74 62 pi.bitbucket.org/2.0"......"bitb
37ee0 75 63 6b 65 74 2e 6f 72 67 22 20 66 6f 72 67 65 2d 62 69 74 62 75 63 6b 65 74 2d 72 65 70 6f 73 ucket.org".forge-bitbucket-repos
37f00 69 74 6f 72 79 29 0a 20 20 20 20 3b 3b 20 53 65 6d 69 2d 46 6f 72 67 65 73 0a 20 20 20 20 28 22 itory).....;;.Semi-Forges.....("
37f20 67 69 74 2e 73 61 76 61 6e 6e 61 68 2e 67 6e 75 2e 6f 72 67 22 20 6e 69 6c 0a 20 20 20 20 20 22 git.savannah.gnu.org".nil......"
37f40 67 69 74 2e 73 61 76 61 6e 6e 61 68 2e 67 6e 75 2e 6f 72 67 22 20 66 6f 72 67 65 2d 63 67 69 74 git.savannah.gnu.org".forge-cgit
37f60 2a 2a 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 28 22 67 69 74 2e 6b 65 72 6e 65 6c 2e **-repository).....("git.kernel.
37f80 6f 72 67 22 20 6e 69 6c 0a 20 20 20 20 20 22 67 69 74 2e 6b 65 72 6e 65 6c 2e 6f 72 67 22 20 66 org".nil......"git.kernel.org".f
37fa0 6f 72 67 65 2d 63 67 69 74 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 28 22 72 65 70 6f orge-cgit-repository).....("repo
37fc0 2e 6f 72 2e 63 7a 22 20 6e 69 6c 0a 20 20 20 20 20 22 72 65 70 6f 2e 6f 72 2e 63 7a 22 20 66 6f .or.cz".nil......"repo.or.cz".fo
37fe0 72 67 65 2d 72 65 70 6f 6f 72 63 7a 2d 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 20 28 22 67 rge-repoorcz-repository).....("g
38000 69 74 2e 73 75 63 6b 6c 65 73 73 2e 6f 72 67 22 20 6e 69 6c 0a 20 20 20 20 20 22 67 69 74 2e 73 it.suckless.org".nil......"git.s
38020 75 63 6b 6c 65 73 73 2e 6f 72 67 22 20 66 6f 72 67 65 2d 73 74 61 67 69 74 2d 72 65 70 6f 73 69 uckless.org".forge-stagit-reposi
38040 74 6f 72 79 29 0a 20 20 20 20 28 22 67 69 74 2e 73 72 2e 68 74 22 20 6e 69 6c 0a 20 20 20 20 20 tory).....("git.sr.ht".nil......
38060 22 67 69 74 2e 73 72 2e 68 74 22 20 66 6f 72 67 65 2d 73 72 68 74 2d 72 65 70 6f 73 69 74 6f 72 "git.sr.ht".forge-srht-repositor
38080 79 29 29 0a 20 20 22 4c 69 73 74 20 6f 66 20 47 69 74 20 66 6f 72 67 65 73 2e 0a 0a 45 61 63 68 y))..."List.of.Git.forges...Each
380a0 20 65 6e 74 72 79 20 68 61 73 20 74 68 65 20 66 6f 72 6d 20 28 47 49 54 48 4f 53 54 20 41 50 49 .entry.has.the.form.(GITHOST.API
380c0 48 4f 53 54 20 57 45 42 48 4f 53 54 20 43 4c 41 53 53 29 2e 0a 0a 2d 20 47 49 54 48 4f 53 54 20 HOST.WEBHOST.CLASS)...-.GITHOST.
380e0 69 73 20 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 is.the.host.used.to.access.repos
38100 69 74 6f 72 69 65 73 20 6f 6e 20 74 68 65 20 66 6f 72 67 65 20 75 73 69 6e 67 0a 20 20 47 69 74 itories.on.the.forge.using...Git
38120 2e 0a 0a 2d 20 41 50 49 48 4f 53 54 20 69 73 20 74 68 65 20 68 6f 73 74 20 75 73 65 64 20 74 6f ...-.APIHOST.is.the.host.used.to
38140 20 61 63 63 65 73 73 20 74 68 65 20 66 6f 72 67 65 27 73 20 41 50 49 2e 20 20 46 6f 72 20 73 6f .access.the.forge's.API...For.so
38160 6d 65 20 66 6f 72 67 65 73 0a 20 20 74 68 65 20 69 73 6e 27 74 20 6a 75 73 74 20 61 20 68 6f 73 me.forges...the.isn't.just.a.hos
38180 74 2c 20 62 75 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 t,.but.a.host.followed.by.the.pa
381a0 74 68 20 74 6f 20 74 68 65 20 41 50 49 27 73 0a 20 20 65 6e 64 70 6f 69 6e 74 2e 0a 0a 2d 20 57 th.to.the.API's...endpoint...-.W
381c0 45 42 48 4f 53 54 20 69 73 20 74 68 65 20 68 6f 73 74 20 75 73 65 64 20 74 6f 20 61 63 63 65 73 EBHOST.is.the.host.used.to.acces
381e0 73 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 6f 6e 20 74 68 69 73 20 66 6f 72 67 65 20 75 73 69 s.repositories.on.this.forge.usi
38200 6e 67 0a 20 20 61 20 62 72 6f 77 73 65 72 2e 20 20 54 68 65 20 49 44 73 20 75 73 65 64 20 74 6f ng...a.browser...The.IDs.used.to
38220 20 69 64 65 6e 74 69 66 79 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 66 72 6f 6d 20 74 68 65 20 .identify.repositories.from.the.
38240 66 6f 72 67 65 20 69 6e 0a 20 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 20 61 6c forge.in...the.local.database.al
38260 73 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 20 20 0a 2d so.derives.from.this.value.....-
38280 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 20 75 73 65 64 20 66 .CLASS.is.the.class.to.be.used.f
382a0 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 66 6f 72 67 65 2e 0a or.repositories.from.the.forge..
382c0 0a 43 6f 6d 70 6c 69 63 61 74 69 6f 6e 73 3a 0a 0a 2d 20 57 68 65 6e 20 63 6f 6e 6e 65 63 74 69 .Complications:..-.When.connecti
382e0 6e 67 20 74 6f 20 61 20 47 69 74 68 75 62 20 45 6e 74 65 72 70 72 69 73 65 20 65 64 69 74 69 6f ng.to.a.Github.Enterprise.editio
38300 6e 20 77 68 6f 73 65 20 52 45 53 54 20 41 50 49 27 73 0a 20 20 65 6e 64 20 70 6f 69 6e 74 20 69 n.whose.REST.API's...end.point.i
38320 73 20 5c 22 3c 68 6f 73 74 3e 2f 76 33 5c 22 20 61 6e 64 20 77 68 6f 73 65 20 47 72 61 70 68 51 s.\"<host>/v3\".and.whose.GraphQ
38340 4c 20 41 50 49 27 73 20 65 6e 64 20 70 6f 69 6e 74 20 69 73 0a 20 20 5c 22 3c 68 6f 73 74 3e 2f L.API's.end.point.is...\"<host>/
38360 67 72 61 70 68 71 6c 5c 22 2c 20 74 68 65 6e 20 75 73 65 20 5c 22 3c 68 6f 73 74 3e 2f 76 33 5c graphql\",.then.use.\"<host>/v3\
38380 22 20 61 73 20 41 50 49 48 4f 53 54 2e 20 20 54 68 69 73 20 69 73 20 61 0a 20 20 68 69 73 74 6f ".as.APIHOST...This.is.a...histo
383a0 72 69 63 20 61 63 63 69 64 65 6e 74 2e 20 20 53 65 65 20 69 73 73 75 65 20 23 31 37 34 2e 0a 0a ric.accident...See.issue.#174...
383c0 2d 20 57 45 42 48 4f 53 54 20 61 6e 64 20 43 4c 41 53 53 20 63 61 6e 6e 6f 74 20 62 65 20 63 68 -.WEBHOST.and.CLASS.cannot.be.ch
383e0 61 6e 67 65 64 20 6f 6e 63 65 20 79 6f 75 20 68 61 76 65 20 61 64 64 65 64 20 6f 6e 65 20 6f 72 anged.once.you.have.added.one.or
38400 0a 20 20 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 ...more.repositories.from.a.forg
38420 65 2e 20 20 43 68 61 6e 67 69 6e 67 20 47 49 54 48 4f 53 54 20 61 6e 64 2f 6f 72 20 41 50 49 48 e...Changing.GITHOST.and/or.APIH
38440 4f 53 54 0a 20 20 6d 61 79 20 62 65 20 70 6f 73 73 69 62 6c 65 2c 20 62 75 74 20 73 68 6f 75 6c OST...may.be.possible,.but.shoul
38460 64 20 73 65 6c 64 6f 6d 20 62 65 20 6e 65 63 65 73 73 61 72 79 2e 22 0a 20 20 3a 70 61 63 6b 61 d.seldom.be.necessary."...:packa
38480 67 65 2d 76 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 ge-version.'(forge..."0.1.0")...
384a0 3a 67 72 6f 75 70 20 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 :group.'forge...:type.'(repeat.(
384c0 6c 69 73 74 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 47 69 74 20 68 6f 73 74 22 29 0a 20 20 list.(string.:tag."Git.host")...
384e0 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 20 28 73 74 .....................(choice.(st
38500 72 69 6e 67 20 3a 74 61 67 20 22 41 50 49 20 65 6e 64 70 6f 69 6e 74 22 29 0a 20 20 20 20 20 20 ring.:tag."API.endpoint").......
38520 20 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 .........................(const.
38540 20 3a 74 61 67 20 22 4e 6f 20 41 50 49 22 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 .:tag."No.API".nil))............
38560 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 49 44 22 29 0a 20 ............(string.:tag."ID")..
38580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 6f 6c 20 3a 74 ......................(symbol.:t
385a0 61 67 20 22 52 65 70 6f 73 69 74 6f 72 79 20 63 6c 61 73 73 22 29 29 29 29 0a 0a 3b 3b 3b 20 43 ag."Repository.class"))))..;;;.C
385c0 6c 61 73 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 6f 62 6a 65 63 74 20 28 63 6c lass..(defclass.forge-object.(cl
385e0 6f 73 71 6c 2d 6f 62 6a 65 63 74 29 20 28 29 20 3a 61 62 73 74 72 61 63 74 20 74 29 0a 0a 28 64 osql-object).().:abstract.t)..(d
38600 65 66 6d 61 63 72 6f 20 66 6f 72 67 65 2d 2d 63 68 69 6c 64 70 20 28 6f 62 6a 20 74 79 70 65 29 efmacro.forge--childp.(obj.type)
38620 0a 20 20 22 53 6f 6d 65 77 68 61 74 20 73 69 6d 69 6c 61 72 20 74 6f 20 60 63 6c 2d 74 79 70 65 ..."Somewhat.similar.to.`cl-type
38640 70 27 20 62 75 74 20 6f 6e 6c 79 20 66 6f 72 20 28 70 6f 73 73 69 62 6c 79 20 75 6e 6b 6e 6f 77 p'.but.only.for.(possibly.unknow
38660 6e 29 20 63 6c 61 73 73 65 73 2e 0a 54 59 50 45 20 69 73 20 65 76 61 6c 75 61 74 65 64 20 61 74 n).classes..TYPE.is.evaluated.at
38680 20 6d 61 63 72 6f 2d 65 78 70 61 6e 73 69 6f 6e 20 74 69 6d 65 20 62 75 74 20 75 6e 6c 69 6b 65 .macro-expansion.time.but.unlike
386a0 20 77 69 74 68 0a 60 63 6c 2d 74 79 70 65 70 27 20 74 68 65 20 72 65 73 70 65 63 74 69 76 65 20 .with.`cl-typep'.the.respective.
386c0 63 6c 61 73 73 20 64 6f 65 73 20 6e 6f 74 20 68 61 76 65 20 74 6f 20 62 65 20 64 65 66 69 6e 65 class.does.not.have.to.be.define
386e0 64 0a 61 74 20 74 68 61 74 20 74 69 6d 65 2e 22 0a 20 20 28 6c 65 74 20 28 28 66 6e 20 28 69 6e d.at.that.time."...(let.((fn.(in
38700 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 65 76 61 6c 20 tern.(concat.(symbol-name.(eval.
38720 74 79 70 65 29 29 20 22 2d 2d 65 69 65 69 6f 2d 63 68 69 6c 64 70 22 29 29 29 29 0a 20 20 20 20 type))."--eieio-childp")))).....
38740 60 28 61 6e 64 20 28 66 62 6f 75 6e 64 70 20 27 2c 66 6e 29 20 28 2c 66 6e 20 2c 6f 62 6a 29 29 `(and.(fboundp.',fn).(,fn.,obj))
38760 29 29 0a 0a 3b 3b 3b 20 51 75 65 72 79 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 72 69 63 20 66 6f ))..;;;.Query..(cl-defgeneric.fo
38780 72 67 65 2d 67 65 74 2d 70 61 72 65 6e 74 20 28 6f 62 6a 65 63 74 29 0a 20 20 22 52 65 74 75 72 rge-get-parent.(object)..."Retur
387a0 6e 20 74 68 65 20 70 61 72 65 6e 74 20 6f 62 6a 65 63 74 20 6f 66 20 4f 42 4a 45 43 54 2e 0a 54 n.the.parent.object.of.OBJECT..T
387c0 68 65 20 68 69 65 72 61 72 63 68 79 20 69 73 20 72 65 70 6f 73 69 74 6f 72 79 20 3e 20 74 6f 70 he.hierarchy.is.repository.>.top
387e0 69 63 20 3e 20 70 6f 73 74 2e 0a 46 6f 72 20 6f 74 68 65 72 20 6f 62 6a 65 63 74 73 20 72 65 74 ic.>.post..For.other.objects.ret
38800 75 72 6e 20 6e 69 6c 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 urn.nil.")..(cl-defgeneric.forge
38820 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 64 65 6d 61 6e 64 29 0a 20 20 22 52 65 74 75 -get-repository.(demand)..."Retu
38840 72 6e 20 61 20 66 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 65 63 74 20 6f 72 20 rn.a.forge.repository.object.or.
38860 6e 69 6c 2c 20 6f 72 20 73 69 67 6e 61 6c 20 61 6e 20 65 72 72 6f 72 2e 0a 0a 41 20 66 6f 72 67 nil,.or.signal.an.error...A.forg
38880 65 20 72 65 70 6f 73 69 74 6f 72 79 20 69 73 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 68 6f 73 e.repository.is.a.repository.hos
388a0 74 65 64 20 6f 6e 20 61 20 66 6f 72 67 65 2e 20 20 54 68 65 20 6c 6f 63 61 6c 20 63 6c 6f 6e 65 ted.on.a.forge...The.local.clone
388c0 0a 69 73 20 61 6c 73 6f 20 61 20 5c 22 72 65 70 6f 73 69 74 6f 72 79 5c 22 2c 20 62 75 74 20 69 .is.also.a.\"repository\",.but.i
388e0 74 20 69 73 20 61 20 5c 22 47 69 74 5c 22 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 6e 6f 74 20 61 t.is.a.\"Git\".repository,.not.a
38900 20 5c 22 46 6f 72 67 65 5c 22 0a 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 28 46 6f 72 67 65 20 72 .\"Forge\".repository...(Forge.r
38920 65 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 61 6c 73 6f 20 47 69 74 20 72 65 70 6f 73 69 74 epositories.are.also.Git.reposit
38940 6f 72 69 65 73 2c 20 62 75 74 20 6e 6f 74 20 74 68 65 0a 6f 74 68 65 72 20 77 61 79 20 61 72 6f ories,.but.not.the.other.way.aro
38960 75 6e 64 2e 29 0a 0a 41 20 60 3a 6b 6e 6f 77 6e 27 20 72 65 70 6f 73 69 74 6f 72 79 20 68 61 73 und.)..A.`:known'.repository.has
38980 20 61 6e 20 65 6e 74 72 79 20 69 6e 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 2e .an.entry.in.the.local.database.
389a0 20 20 41 6c 6c 20 6f 74 68 65 72 0a 72 65 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 75 6e 6b ..All.other.repositories.are.unk
389c0 6e 6f 77 6e 2e 20 20 60 3a 6b 6e 6f 77 6e 27 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 nown...`:known'.repositories.are
389e0 20 64 65 76 69 64 65 64 20 69 6e 74 6f 20 74 77 6f 0a 73 75 62 67 72 6f 75 70 73 3a 20 60 3a 74 .devided.into.two.subgroups:.`:t
38a00 72 61 63 6b 65 64 27 20 61 6e 64 20 5c 22 75 6e 74 72 61 63 6b 65 64 5c 22 20 72 65 70 6f 73 69 racked'.and.\"untracked\".reposi
38a20 74 6f 72 69 65 73 2e 0a 0a 41 20 60 3a 74 72 61 63 6b 65 64 27 20 72 65 70 6f 73 69 74 6f 72 79 tories...A.`:tracked'.repository
38a40 20 77 61 73 20 70 72 65 76 69 6f 75 73 6c 79 20 65 78 70 6c 69 63 69 74 6c 79 20 61 64 64 65 64 .was.previously.explicitly.added
38a60 20 74 6f 20 74 68 65 20 64 61 74 61 62 61 73 65 0a 62 79 20 74 68 65 20 75 73 65 72 2e 0a 0a 57 .to.the.database.by.the.user...W
38a80 68 65 6e 20 46 6f 72 67 65 20 65 6e 63 6f 75 6e 74 65 72 73 20 61 20 72 65 70 6f 73 69 74 6f 72 hen.Forge.encounters.a.repositor
38aa0 79 2c 20 77 69 74 68 6f 75 74 20 62 65 69 6e 67 20 69 6e 73 74 72 75 63 74 65 64 20 62 79 20 74 y,.without.being.instructed.by.t
38ac0 68 65 20 75 73 65 72 0a 74 6f 20 74 72 61 63 6b 20 69 74 2c 20 69 74 20 6d 61 79 20 6e 65 76 65 he.user.to.track.it,.it.may.neve
38ae0 72 74 68 65 6c 65 73 73 20 61 64 64 20 6c 69 6d 69 74 65 64 20 69 6e 66 6f 72 6d 61 74 69 6f 6e rtheless.add.limited.information
38b00 20 61 62 6f 75 74 20 69 74 20 74 6f 20 74 68 65 0a 64 61 74 61 62 61 73 65 2e 20 20 53 75 63 68 .about.it.to.the.database...Such
38b20 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 69 73 20 60 3a 6b 6e 6f 77 6e 27 20 62 75 74 20 69 74 .a.repository.is.`:known'.but.it
38b40 20 69 73 20 6e 6f 74 20 60 3a 74 72 61 63 6b 65 64 27 2e 0a 0a 4f 74 68 65 72 20 72 65 70 6f 73 .is.not.`:tracked'...Other.repos
38b60 69 74 6f 72 69 65 73 20 61 72 65 20 5c 22 75 6e 6b 6e 6f 77 6e 5c 22 2e 20 20 4d 6f 73 74 20 63 itories.are.\"unknown\"...Most.c
38b80 6f 6d 6d 61 6e 64 73 20 63 61 6e 20 6f 6e 6c 79 20 64 65 61 6c 20 77 69 74 68 0a 72 65 70 6f 73 ommands.can.only.deal.with.repos
38ba0 69 74 6f 72 69 65 73 20 74 68 61 74 20 61 72 65 20 73 74 6f 72 65 64 20 69 6e 20 74 68 65 20 64 itories.that.are.stored.in.the.d
38bc0 61 74 61 62 61 73 65 2e 20 20 4f 66 20 74 68 65 73 65 2c 20 73 6f 6d 65 20 63 61 6e 20 64 65 61 atabase...Of.these,.some.can.dea
38be0 6c 0a 77 69 74 68 20 61 6e 79 20 60 3a 6b 6e 6f 77 6e 27 20 72 65 70 6f 73 69 74 6f 72 69 65 73 l.with.any.`:known'.repositories
38c00 2c 20 6f 74 68 65 72 73 20 72 65 71 75 69 72 65 20 74 68 61 74 20 74 68 65 79 20 61 72 65 20 60 ,.others.require.that.they.are.`
38c20 3a 74 72 61 63 6b 65 64 27 2e 0a 0a 53 6f 6d 65 20 6f 74 68 65 72 20 63 6f 6d 6d 61 6e 64 73 20 :tracked'...Some.other.commands.
38c40 65 78 69 73 74 20 e2 80 94 20 73 75 63 68 20 61 73 20 74 68 65 20 62 72 6f 77 73 65 20 63 6f 6d exist.....such.as.the.browse.com
38c60 6d 61 6e 64 73 20 e2 80 94 20 74 68 61 74 20 68 61 76 65 20 6e 6f 0a 73 75 63 68 20 72 65 71 75 mands.....that.have.no.such.requ
38c80 69 72 65 6d 65 6e 74 2e 20 20 57 68 69 6c 65 20 73 75 63 68 20 63 6f 6d 6d 61 6e 64 73 20 61 6c irement...While.such.commands.al
38ca0 73 6f 20 72 65 71 75 69 72 65 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 65 63 74 2c 0a so.require.a.repository.object,.
38cc0 74 68 65 79 20 64 6f 20 6e 6f 74 20 63 61 72 65 20 77 68 65 74 68 65 72 20 74 68 61 74 20 69 73 they.do.not.care.whether.that.is
38ce0 20 73 74 6f 72 65 64 20 69 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 20 20 49 6e 73 74 65 61 .stored.in.the.database...Instea
38d00 64 20 74 68 65 79 0a 61 72 65 20 68 61 70 70 79 20 74 6f 20 75 73 65 20 61 20 60 3a 73 74 75 62 d.they.are.happy.to.use.a.`:stub
38d20 27 20 72 65 70 6f 73 69 74 6f 72 79 3b 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 74 68 61 74 20 '.repository;.a.repository.that.
38d40 69 73 20 6e 6f 74 20 73 74 6f 72 65 64 0a 69 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 0a 0a is.not.stored.in.the.database...
38d60 54 68 65 20 44 45 4d 41 4e 44 20 61 72 67 75 6d 65 6e 74 20 73 70 65 63 69 66 69 65 73 20 77 68 The.DEMAND.argument.specifies.wh
38d80 61 74 20 6b 69 6e 64 20 6f 66 20 72 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 65 63 74 20 74 68 65 at.kind.of.repository.object.the
38da0 20 63 61 6c 6c 65 72 0a 72 65 71 75 69 72 65 73 2c 20 61 74 20 6c 65 61 73 74 2e 20 20 60 3a 74 .caller.requires,.at.least...`:t
38dc0 72 61 63 6b 65 64 27 20 69 73 20 67 72 65 61 74 65 72 20 74 68 61 6e 20 60 3a 6b 6e 6f 77 6e 27 racked'.is.greater.than.`:known'
38de0 2c 20 77 68 69 63 68 20 69 73 0a 67 72 65 61 74 65 72 20 74 68 61 6e 20 60 3a 73 74 75 62 27 2e ,.which.is.greater.than.`:stub'.
38e00 20 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c 20 69 66 20 74 68 65 20 63 61 6c 6c 65 72 20 72 65 71 ..For.example,.if.the.caller.req
38e20 75 65 73 74 73 20 61 20 60 3a 6b 6e 6f 77 6e 27 0a 72 65 70 6f 73 69 74 6f 72 79 2c 20 61 20 60 uests.a.`:known'.repository,.a.`
38e40 3a 74 72 61 63 6b 65 64 27 20 72 65 70 6f 73 69 74 6f 72 79 20 77 69 6c 6c 20 64 6f 2c 20 77 68 :tracked'.repository.will.do,.wh
38e60 69 6c 65 20 61 20 60 3a 73 74 75 62 27 20 72 65 70 6f 73 69 74 6f 72 79 0a 77 69 6c 6c 20 6e 6f ile.a.`:stub'.repository.will.no
38e80 74 2e 0a 0a 54 68 65 20 76 61 6c 69 64 20 76 61 6c 75 65 73 20 66 6f 72 20 44 45 4d 41 4e 44 20 t...The.valid.values.for.DEMAND.
38ea0 61 72 65 3a 0a 0a 2d 20 60 3a 74 72 61 63 6b 65 64 27 20 61 6e 64 20 60 3a 74 72 61 63 6b 65 64 are:..-.`:tracked'.and.`:tracked
38ec0 3f 27 20 72 65 71 75 65 73 74 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 74 68 61 74 20 74 68 65 ?'.request.a.repository.that.the
38ee0 20 75 73 65 72 20 61 64 64 65 64 0a 20 20 74 6f 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 20 20 .user.added...to.the.database...
38f00 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 79 2c 20 If.there.is.no.such.repository,.
38f20 74 68 65 20 66 6f 72 6d 65 72 20 63 61 75 73 65 73 0a 20 20 61 6e 20 65 72 72 6f 72 20 74 6f 20 the.former.causes...an.error.to.
38f40 62 65 20 73 69 67 6e 61 6c 65 64 2c 20 77 68 69 6c 65 20 66 6f 72 20 74 68 65 20 6c 61 74 74 65 be.signaled,.while.for.the.latte
38f60 72 20 6e 69 6c 20 69 73 20 72 65 74 75 72 6e 65 64 2e 0a 0a 2d 20 60 3a 6b 6e 6f 77 6e 3f 27 20 r.nil.is.returned...-.`:known?'.
38f80 61 6e 64 20 60 3a 69 6e 73 65 72 74 21 27 20 72 65 71 75 65 73 74 20 61 20 72 65 70 6f 73 69 74 and.`:insert!'.request.a.reposit
38fa0 6f 72 79 20 66 72 6f 6d 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 0a 20 20 57 68 65 74 68 65 72 ory.from.the.database....Whether
38fc0 20 74 68 65 20 75 73 65 72 20 65 78 70 6c 69 63 69 74 6c 79 20 61 64 64 65 64 20 69 74 20 64 6f .the.user.explicitly.added.it.do
38fe0 65 73 20 6e 6f 74 20 6d 61 74 74 65 72 2e 20 20 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 0a 20 es.not.matter...If.there.is.no..
39000 20 73 75 63 68 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 6e 69 6c 20 69 73 20 72 65 74 75 72 6e 65 .such.repository,.nil.is.returne
39020 64 20 66 6f 72 20 74 68 65 20 66 6f 72 6d 65 72 2c 20 77 68 69 6c 65 20 66 6f 72 20 74 68 65 20 d.for.the.former,.while.for.the.
39040 6c 61 74 74 65 72 0a 20 20 61 20 6e 65 77 20 72 65 70 6f 73 69 74 6f 72 79 20 69 73 20 69 6e 73 latter...a.new.repository.is.ins
39060 65 72 74 65 64 20 69 6e 74 6f 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 61 6e 64 20 74 68 erted.into.the.repository.and.th
39080 65 6e 20 72 65 74 75 72 6e 65 64 2e 0a 0a 2d 20 60 3a 73 74 75 62 27 20 61 6e 64 20 60 3a 73 74 en.returned...-.`:stub'.and.`:st
390a0 75 62 3f 27 20 72 65 71 75 65 73 74 20 74 68 65 20 46 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 ub?'.request.the.Forge.repositor
390c0 79 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 0a 20 20 74 68 65 20 63 75 72 72 65 6e 74 y.corresponding.to...the.current
390e0 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 49 74 20 64 6f 65 73 20 6e 6f 74 20 6d 61 .Git.repository...It.does.not.ma
39100 74 74 65 72 20 77 68 65 74 68 65 72 20 69 74 20 69 73 20 6b 6e 6f 77 6e 2e 0a 20 20 54 68 69 73 tter.whether.it.is.known....This
39120 20 66 61 69 6c 73 20 69 66 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 20 69 73 .fails.if.`default-directory'.is
39140 20 6e 6f 74 20 69 6e 73 69 64 65 20 61 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 69 66 .not.inside.a.Git.repository,.if
39160 0a 20 20 74 68 65 72 65 20 69 73 20 6e 6f 20 6d 61 74 63 68 69 6e 67 20 65 6e 74 72 79 20 69 6e ...there.is.no.matching.entry.in
39180 20 60 66 6f 72 67 65 2d 61 6c 69 73 74 27 2c 20 6f 72 20 69 66 20 69 74 20 69 73 20 75 6e 63 6c .`forge-alist',.or.if.it.is.uncl
391a0 65 61 72 20 77 68 69 63 68 0a 20 20 72 65 6d 6f 74 65 20 74 6f 20 75 73 65 2e 20 20 49 66 20 74 ear.which...remote.to.use...If.t
391c0 68 65 20 72 65 70 6f 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 he.repository.cannot.be.determin
391e0 65 64 2c 20 74 68 65 20 66 6f 72 6d 65 72 0a 20 20 63 61 75 73 65 73 20 61 6e 20 65 72 72 6f 72 ed,.the.former...causes.an.error
39200 20 74 6f 20 62 65 20 73 69 67 6e 61 6c 65 64 2c 20 77 68 69 6c 65 20 66 6f 72 20 74 68 65 20 6c .to.be.signaled,.while.for.the.l
39220 61 74 74 65 72 20 6e 69 6c 20 69 73 20 72 65 74 75 72 6e 65 64 2e 0a 0a 20 20 53 74 75 62 20 72 atter.nil.is.returned.....Stub.r
39240 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 65 63 74 73 20 61 72 65 20 63 72 65 61 74 65 64 20 77 69 epository.objects.are.created.wi
39260 74 68 6f 75 74 20 6d 61 6b 69 6e 67 20 61 6e 20 41 50 49 20 72 65 71 75 65 73 74 2c 20 73 6f 0a thout.making.an.API.request,.so.
39280 20 20 77 65 20 6c 61 63 6b 20 61 63 63 65 73 73 20 74 6f 20 74 68 65 20 75 70 73 74 72 65 61 6d ..we.lack.access.to.the.upstream
392a0 20 49 44 2c 20 77 68 69 63 68 20 74 68 65 20 49 44 73 20 75 73 65 64 20 69 6e 20 6f 75 74 20 64 .ID,.which.the.IDs.used.in.out.d
392c0 61 74 61 62 61 73 65 2c 0a 20 20 64 65 72 69 76 65 20 66 72 6f 6d 2e 20 20 53 74 75 62 20 72 65 atabase,...derive.from...Stub.re
392e0 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 5c 22 75 6e 6b 6e 6f 77 6e 5c 22 20 69 6e 20 74 68 positories.are.\"unknown\".in.th
39300 65 20 73 65 6e 73 65 20 74 68 61 74 20 74 68 65 69 72 0a 20 20 49 44 73 20 61 72 65 20 6e 6f 74 e.sense.that.their...IDs.are.not
39320 20 60 3a 6b 6e 6f 77 6e 27 2e 20 20 54 68 69 73 20 69 73 20 64 6f 6e 65 20 74 6f 20 61 6c 6c 6f .`:known'...This.is.done.to.allo
39340 77 20 6f 66 66 6c 69 6e 65 20 6f 70 65 72 61 74 69 6f 6e 73 2e 0a 0a 47 69 76 65 6e 20 61 20 72 w.offline.operations...Given.a.r
39360 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 65 63 74 2c 20 79 6f 75 20 63 61 6e 20 71 75 65 72 79 20 epository.object,.you.can.query.
39380 69 74 73 20 60 63 6f 6e 64 69 74 69 6f 6e 27 20 73 6c 6f 74 20 74 6f 20 6c 65 61 72 6e 0a 77 68 its.`condition'.slot.to.learn.wh
393a0 65 74 68 65 72 20 69 74 20 69 73 20 60 3a 74 72 61 63 6b 65 64 27 2c 20 60 3a 6b 6e 6f 77 6e 27 ether.it.is.`:tracked',.`:known'
393c0 20 28 69 2e 65 2e 2c 20 68 61 73 20 61 20 76 61 6c 69 64 20 49 44 20 61 6e 64 20 69 73 20 73 74 .(i.e.,.has.a.valid.ID.and.is.st
393e0 6f 72 65 64 0a 69 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 29 2c 20 6f 72 20 6d 65 72 65 6c 79 ored.in.the.database),.or.merely
39400 20 61 20 60 3a 73 74 75 62 27 2e 0a 0a 59 6f 75 20 63 61 6e 20 61 6c 73 6f 20 75 73 65 20 28 66 .a.`:stub'...You.can.also.use.(f
39420 6f 72 67 65 2d 67 65 74 20 72 65 70 6f 73 69 74 6f 72 79 20 4f 42 4a 45 43 54 20 44 45 4d 41 4e orge-get.repository.OBJECT.DEMAN
39440 44 29 20 74 6f 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 D).to.check.the.condition.of.a.r
39460 65 70 6f 73 69 74 6f 72 79 20 6f 62 6a 65 63 74 20 6f 72 20 65 76 65 6e 20 74 6f 20 75 70 67 72 epository.object.or.even.to.upgr
39480 61 64 65 20 69 74 20 77 69 74 68 20 60 3a 69 6e 73 65 72 74 21 27 2e 0a 0a 55 73 65 20 60 66 6f ade.it.with.`:insert!'...Use.`fo
394a0 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
394c0 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.
394e0 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.
39500 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'."
39520 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
39540 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.
39560 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
39580 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
395a0 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
395c0 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
395e0 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.").
39600 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
39620 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.
39640 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
39660 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
39680 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
396a0 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.
396c0 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,
396e0 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
39700 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...
39720 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
39740 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
39760 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
39780 70 6f 6e 64 69 6e 67 20 65 6e 74 72 79 0a 0a 49 66 20 6e 6f 20 65 6e 74 72 79 20 6d 61 74 63 68 ponding.entry..If.no.entry.match
397a0 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 72 es,.return.nil,.or.signal.an.err
397c0 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 6c or.if.optional.DEMAND.is.non-nil
397e0 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 74 ."...(or.(assoc.host.forge-alist
39800 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 61 ).......(assoc.(seq-some.(lambda
39820 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 20 .(line).........................
39840 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 65 .(and.(string-prefix-p."hostname
39860 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 20 ".line).........................
39880 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 20 ......(substring.line.9)))......
398a0 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 73 ..................(ignore-errors
398c0 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 65 ..........................(proce
398e0 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 47 ss-lines-ignore-status."ssh"."-G
39900 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 69 ".host)))..............forge-ali
39920 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 66 st).......(car.(cl-member.host.f
39940 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 27 orge-alist.:test.#'equal.:key.#'
39960 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 20 caddr)).......(and.demand.......
39980 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 22 .....(error."No.entry.for.\"%s\"
399a0 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 65 .in.`forge-alist'".host))))..(de
399c0 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 29 fun.forge--split-forge-url.(url)
399e0 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 61 6e 64 20 28 73 74 ...(save-match-data.....(and.(st
39a00 72 69 6e 67 2d 6d 61 74 63 68 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 5c 5c ring-match...........(concat."\\
39a20 60 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 28 3f 3a 67 69 74 3a 2f `"..................."\\(?:git:/
39a40 2f 5c 5c 7c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5b 5e 2f 40 5d 2b 40 /\\|"..................."[^/@]+@
39a60 5c 5c 7c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 28 3f 3a 73 73 68 \\|"..................."\\(?:ssh
39a80 5c 5c 7c 73 73 68 5c 5c 2b 67 69 74 5c 5c 7c 67 69 74 5c 5c 2b 73 73 68 5c 5c 29 3a 2f 2f 5c 5c \\|ssh\\+git\\|git\\+ssh\\)://\\
39aa0 28 3f 3a 5b 5e 2f 40 5d 2b 40 5c 5c 29 3f 5c 5c 7c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 (?:[^/@]+@\\)?\\|"..............
39ac0 20 20 20 20 20 22 68 74 74 70 73 3f 3a 2f 2f 5c 5c 28 3f 3a 5b 5e 2f 40 5d 2b 40 5c 5c 29 3f 5c ....."https?://\\(?:[^/@]+@\\)?\
39ae0 5c 29 3f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 67 65 78 70 2d 6f \)?"...................(regexp-o
39b00 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 73 74 29 20 74 29 pt.(mapcar.#'car.forge-alist).t)
39b20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 28 3f 3a 3a 5b 30 2d 39 5d 2b ..................."\\(?::[0-9]+
39b40 5c 5c 29 3f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 28 3f 3a 2f 5c \\)?"..................."\\(?:/\
39b60 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 20 20 20 22 7e 3f 5c \|:/?\\)"..................."~?\
39b80 5c 28 2e 2b 3f 5c 5c 29 2f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c \(.+?\\)/"..................."\\
39ba0 28 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 20 20 20 22 5c ([^/]+?\\)"..................."\
39bc0 5c 28 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 \(?:\\.git\\|/\\)?".............
39be0 20 20 20 20 20 20 22 5c 5c 27 22 29 0a 20 20 20 20 20 20 20 20 20 20 75 72 6c 29 0a 20 20 20 20 ......"\\'")...........url).....
39c00 20 20 20 20 20 28 6c 69 73 74 20 28 63 61 64 64 72 20 28 66 6f 72 67 65 2d 2d 67 65 74 2d 66 6f .....(list.(caddr.(forge--get-fo
39c20 72 67 65 2d 68 6f 73 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 75 72 6c 29 20 74 29 rge-host.(match-string.1.url).t)
39c40 29 0a 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 32 )................(match-string.2
39c60 20 75 72 6c 29 0a 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 .url)................(match-stri
39c80 6e 67 20 33 20 75 72 6c 29 29 29 29 29 0a 0a 3b 3b 3b 20 49 64 65 6e 74 69 74 79 0a 0a 28 63 6c ng.3.url)))))..;;;.Identity..(cl
39ca0 2d 64 65 66 67 65 6e 65 72 69 63 20 66 6f 72 67 65 2d 2d 6f 62 6a 65 63 74 2d 69 64 20 28 63 6c -defgeneric.forge--object-id.(cl
39cc0 61 73 73 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 64 61 ass.&rest.args)..."Return.the.da
39ce0 74 61 62 61 73 65 20 69 64 20 66 6f 72 20 74 68 65 20 43 4c 41 53 53 20 6f 62 6a 65 63 74 20 73 tabase.id.for.the.CLASS.object.s
39d00 70 65 63 69 66 69 65 64 20 62 79 20 41 52 47 53 2e 22 29 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 pecified.by.ARGS.")..(cl-defgene
39d20 72 69 63 20 66 6f 72 67 65 2d 2d 72 65 70 6f 73 69 74 6f 72 79 2d 69 64 73 20 28 63 6c 61 73 73 ric.forge--repository-ids.(class
39d40 20 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 29 .host.owner.name.&optional.stub)
39d60 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 6e 64 20 66 6f 72 67 ..."Return.the.database.and.forg
39d80 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 4c 41 53 53 20 6f 62 e.ids.for.the.specified.CLASS.ob
39da0 6a 65 63 74 2e 22 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 6d 61 67 69 74 2d 73 65 63 ject.")..(cl-defmethod.magit-sec
39dc0 74 69 6f 6e 2d 69 64 65 6e 74 2d 76 61 6c 75 65 20 28 28 6f 62 6a 20 66 6f 72 67 65 2d 6f 62 6a tion-ident-value.((obj.forge-obj
39de0 65 63 74 29 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 76 61 6c 75 65 20 6f 62 20 4f 42 4a ect))..."Return.the.value.ob.OBJ
39e00 27 73 20 60 69 64 27 20 73 6c 6f 74 2e 0a 55 73 69 6e 67 20 4f 42 4a 20 69 74 73 65 6c 66 20 77 's.`id'.slot..Using.OBJ.itself.w
39e20 6f 75 6c 64 20 6e 6f 74 20 62 65 20 61 70 70 72 6f 70 72 69 61 74 65 20 62 65 63 61 75 73 65 20 ould.not.be.appropriate.because.
39e40 6d 75 6c 74 69 70 6c 65 0a 6e 6f 6e 2d 65 71 75 61 6c 20 6f 62 6a 65 63 74 73 20 6d 61 79 20 65 multiple.non-equal.objects.may.e
39e60 78 69 73 74 2c 20 72 65 70 72 65 73 65 6e 74 69 6e 67 20 74 68 65 20 73 61 6d 65 20 74 68 69 6e xist,.representing.the.same.thin
39e80 67 2e 22 0a 20 20 28 6f 72 65 66 20 6f 62 6a 20 69 64 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 g."...(oref.obj.id))..(defun.for
39ea0 67 65 2d 2d 73 65 74 2d 69 64 2d 73 6c 6f 74 20 28 72 65 70 6f 20 6f 62 6a 65 63 74 20 73 6c 6f ge--set-id-slot.(repo.object.slo
39ec0 74 20 72 6f 77 73 29 0a 20 20 22 53 65 74 20 74 68 65 20 76 61 6c 75 65 20 69 6e 20 4f 42 4a 45 t.rows)..."Set.the.value.in.OBJE
39ee0 43 54 20 66 6f 72 20 53 4c 4f 54 20 74 6f 20 56 41 4c 55 45 2c 20 61 63 74 75 61 6c 6c 79 20 73 CT.for.SLOT.to.VALUE,.actually.s
39f00 74 6f 72 69 6e 67 20 66 6f 72 65 69 67 6e 20 6b 65 79 73 2e 22 0a 20 20 3b 3b 20 54 4f 44 4f 20 toring.foreign.keys."...;;.TODO.
39f20 53 68 6f 75 6c 64 20 43 6c 6f 53 51 4c 20 61 64 76 69 63 65 20 60 6f 73 65 74 27 20 74 6f 20 6d Should.CloSQL.advice.`oset'.to.m
39f40 61 6b 65 20 74 68 69 73 20 75 6e 6e 65 63 65 73 73 61 72 79 3f 0a 20 20 28 6c 65 74 20 28 28 72 ake.this.unnecessary?...(let.((r
39f60 65 70 6f 2d 69 64 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 29 29 0a 20 20 20 20 28 63 6c 6f epo-id.(oref.repo.id))).....(clo
39f80 73 71 6c 2d 6f 73 65 74 0a 20 20 20 20 20 6f 62 6a 65 63 74 20 73 6c 6f 74 0a 20 20 20 20 20 28 sql-oset......object.slot......(
39fa0 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 76 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 mapcar.(lambda.(val)............
39fc0 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 0a 20 20 ....(forge--object-id.repo-id...
39fe0 20 20 20 20 20 20 20 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 ...............................(
3a000 69 66 20 28 61 74 6f 6d 20 76 61 6c 29 20 76 61 6c 20 28 61 6c 69 73 74 2d 67 65 74 20 27 69 64 if.(atom.val).val.(alist-get.'id
3a020 20 76 61 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 72 6f 77 73 29 29 29 29 0a 0a .val))))..............rows))))..
3a040 3b 3b 3b 20 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 ;;;.Format..(cl-defgeneric.forge
3a060 2d 2d 66 6f 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 --format.(object.slot.&optional.
3a080 73 70 65 63 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 spec)..."Return.a.string.based.o
3a0a0 6e 20 53 50 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 n.SPEC.and.the.format-string.in.
3a0c0 4f 42 4a 45 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 OBJECT's.SLOT..The.available.`fo
3a0e0 72 6d 61 74 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 rmat'-like.specs.depend.on.the.t
3a100 79 70 65 20 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 ype.of.OBJECT..SPEC.can.be.used.
3a120 74 6f 20 61 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 to.add.additional.specs,.as.for.
3a140 60 66 6f 72 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 `format-spec'..The.latter.overri
3a160 64 65 20 74 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 de.the.former...SLOT.is.expected
3a180 20 74 6f 20 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 .to.be.class-.allocated...Some.m
3a1a0 65 74 68 6f 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 ethods.also.accept.a.format.stri
3a1c0 6e 67 20 69 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 ng.in.place.of.SLOT.")..(cl-defm
3a1e0 65 74 68 6f 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 ethod.forge--format-resource.((o
3a200 62 6a 65 63 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 bject.forge-object).resource)...
3a220 22 52 65 74 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 "Return.an.API.resource.based.on
3a240 20 52 45 53 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 46 .RESOURCE.and.slots.of.OBJECT..F
3a260 6f 72 20 75 73 65 20 69 6e 20 60 66 6f 72 67 65 2d 2d 46 4f 52 47 45 2d 4d 45 54 48 4f 44 27 20 or.use.in.`forge--FORGE-METHOD'.
3a280 73 75 63 68 20 61 73 20 60 66 6f 72 67 65 2d 2d 67 68 75 62 2d 67 65 74 27 2e 0a 52 45 53 4f 55 such.as.`forge--ghub-get'..RESOU
3a2a0 52 43 45 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 RCE.is.a.string.separated.by.sla
3a2c0 73 68 65 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 shes...Each.part.that.begins.wit
3a2e0 68 20 61 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 h.a.colon.is.replaced.with.a.val
3a300 75 65 20 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 ue.from.OBJECT...`:repo'.is.a.sy
3a320 6e 6f 6e 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 nonym.for.`:name'...`:project'.i
3a340 73 20 61 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 s.a.like.`:owner/:name',.but.the
3a360 0a 73 6c 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 .slash.is.quoted.on.Gitlab...`:t
3a380 6f 70 69 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 opic'.is.a.synonym.for.`:number'
3a3a0 0a 62 75 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 .but.only.if.OBJECT.is.a.topic..
3a3c0 20 41 6e 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 .Any.other.`:SLOT'.means.to.use.
3a3e0 74 68 65 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 the.value.of.that.slot.in.OBJECT
3a400 2c 20 6f 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 ,.or.if.that.doesn't.exist.in.it
3a420 73 0a 70 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 s.parent.object.(determined.usin
3a440 67 20 60 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 g.`forge-get-parent')."...(save-
3a460 6d 61 74 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 match-data.....(setq.resource...
3a480 20 20 20 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 ........(replace-regexp-in-strin
3a4a0 67 0a 20 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 g............":\\([^/]+\\)".....
3a4c0 20 20 20 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 .......(lambda.(str)............
3a4e0 20 20 28 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 ..(let.((slot.(intern.(substring
3a500 20 73 74 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 .str.1))))................(or.(a
3a520 6e 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 nd-let*........................(
3a540 28 76 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 (v.(ignore-errors...............
3a560 20 20 20 20 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 ...............(pcase.slot......
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 20 20 28 27 72 65 70 6f ..........................('repo
3a5a0 20 20 20 20 28 6f 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 ....(oref.object.name)).........
3a5c0 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 70 72 6f 6a 65 63 74 .......................('project
3a5e0 20 28 63 6f 6e 63 61 74 20 28 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 0a 20 20 20 20 20 20 20 .(concat.(string-replace........
3a600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
3a620 20 20 20 20 20 20 20 20 20 20 20 22 2f 22 20 22 25 32 46 22 20 28 6f 72 65 66 20 6f 62 6a 65 63 ..........."/"."%2F".(oref.objec
3a640 74 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 20 20 20 20 20 20 t.owner)).......................
3a660 20 20 20 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 25 32 46 22 ..........................."%2F"
3a680 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 ................................
3a6a0 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 74 20 6e ..................(oref.object.n
3a6c0 61 6d 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 20 20 20 20 ame)))..........................
3a6e0 20 20 20 20 20 20 28 27 74 6f 70 69 63 20 20 20 28 61 6e 64 20 28 66 6f 72 67 65 2d 2d 63 68 69 ......('topic...(and.(forge--chi
3a700 6c 64 70 20 6f 62 6a 65 63 74 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 29 0a 20 20 20 20 20 20 20 ldp.object.'forge-topic)........
3a720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
3a740 20 20 20 20 20 20 20 28 6f 72 65 66 20 6f 62 6a 65 63 74 20 6e 75 6d 62 65 72 29 29 29 0a 20 20 .......(oref.object.number)))...
3a760 20 20 20 20 20 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 .............................(_.
3a780 20 20 20 20 20 20 20 28 65 69 65 69 6f 2d 6f 72 65 66 20 6f 62 6a 65 63 74 20 73 6c 6f 74 29 29 .......(eieio-oref.object.slot))
3a7a0 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 28 66 6f 72 6d 61 ))))......................(forma
3a7c0 74 20 22 25 73 22 20 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 t."%s".v))....................st
3a7e0 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 72 65 73 6f 75 72 63 65 20 74 20 74 29 29 0a 20 r)))............resource.t.t))..
3a800 20 20 20 28 69 66 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 ...(if.(string-match.":[^/]*".re
3a820 73 6f 75 72 63 65 29 0a 20 20 20 20 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 70 61 72 65 6e 74 source).........(if-let.((parent
3a840 20 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 70 61 72 65 6e .(ignore-errors.(forge-get-paren
3a860 74 20 6f 62 6a 65 63 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d t.object)))).............(forge-
3a880 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 63 65 -format-resource.parent.resource
3a8a0 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 72 65 73 6f 6c )...........(error."Cannot.resol
3a8c0 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 20 20 ve.%s.for.a.%s".................
3a8e0 20 28 6d 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 .(match-string.0.resource)......
3a900 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 6c 61 73 73 20 ............(eieio-object-class.
3a920 6f 62 6a 65 63 74 29 29 29 0a 20 20 20 20 20 20 72 65 73 6f 75 72 63 65 29 29 29 0a 0a 3b 3b 3b object))).......resource)))..;;;
3a940 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 2d 72 65 66 .Miscellaneous..(defun.forge-ref
3a960 72 65 73 68 2d 62 75 66 66 65 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 62 75 66 66 65 72 29 0a 20 resh-buffer.(&optional.buffer)..
3a980 20 22 52 65 66 72 65 73 68 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2c 20 69 66 ."Refresh.the.current.buffer,.if
3a9a0 20 69 74 20 69 73 20 61 20 4d 61 67 69 74 20 6f 72 20 46 6f 72 67 65 20 62 75 66 66 65 72 2e 0a .it.is.a.Magit.or.Forge.buffer..
3a9c0 52 65 66 72 65 73 68 20 74 68 65 20 62 75 66 66 65 72 20 69 66 20 69 74 73 20 6d 61 6a 6f 72 2d Refresh.the.buffer.if.its.major-
3a9e0 6d 6f 64 65 20 64 65 72 69 76 65 73 20 66 72 6f 6d 20 60 6d 61 67 69 74 2d 6d 6f 64 65 27 2c 0a mode.derives.from.`magit-mode',.
3aa00 60 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 27 20 6f 72 20 60 66 6f 72 67 `forge-topic-list-mode'.or.`forg
3aa20 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 2d 6d 6f 64 65 27 2e 20 20 49 66 0a 6f 70 74 e-repository-list-mode'...If.opt
3aa40 69 6f 6e 61 6c 20 42 55 46 46 45 52 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 72 65 ional.BUFFER.is.non-nil,.then.re
3aa60 66 72 65 73 68 20 74 68 61 74 20 62 75 66 66 65 72 2c 20 70 72 6f 76 69 64 65 64 0a 69 74 20 69 fresh.that.buffer,.provided.it.i
3aa80 73 20 61 6c 69 76 65 20 61 6e 64 20 73 61 74 69 73 66 69 65 73 20 74 68 65 20 6d 6f 64 65 20 72 s.alive.and.satisfies.the.mode.r
3aaa0 65 71 75 69 72 65 6d 65 6e 74 2e 22 0a 20 20 28 63 6f 6e 64 20 28 62 75 66 66 65 72 0a 20 20 20 equirement."...(cond.(buffer....
3aac0 20 20 20 20 20 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 ......(when.(buffer-live-p.buffe
3aae0 72 29 0a 20 20 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 r)............(with-current-buff
3ab00 65 72 20 62 75 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 er.buffer..............(forge-re
3ab20 66 72 65 73 68 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 fresh-buffer)))).........((deriv
3ab40 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 0a 20 20 20 ed-mode-p.'forge-topic-mode)....
3ab60 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 20 20 ......(magit-refresh-buffer))...
3ab80 20 20 20 20 20 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 ......((derived-mode-p.'magit-mo
3aba0 64 65 29 0a 20 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 de)..........(magit-refresh-buff
3abc0 65 72 29 29 0a 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 er)).........((derived-mode-p.'f
3abe0 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 orge-topic-list-mode............
3ac00 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 73 69 74 6f 72 79 2d ..............'forge-repository-
3ac20 6c 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 list-mode)..........(revert-buff
3ac40 65 72 29 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 65 2d 73 er))))..(defun.forge--sanitize-s
3ac60 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 62 20 74 tring.(string)...;;.For.Gitlab.t
3ac80 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 72 69 6e his.may.also.be.nil....(if.strin
3aca0 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 20 73 74 g.(string-replace."\r\n"."\n".st
3acc0 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 75 75 69 64 20 28 ring).""))..(defun.forge--uuid.(
3ace0 29 0a 20 20 22 52 65 74 75 72 6e 20 73 74 72 69 6e 67 20 77 69 74 68 20 72 61 6e 64 6f 6d 20 28 )..."Return.string.with.random.(
3ad00 76 65 72 73 69 6f 6e 20 34 29 20 55 55 49 44 2e 22 0a 20 20 3b 3b 20 54 68 69 73 20 69 73 20 61 version.4).UUID."...;;.This.is.a
3ad20 20 63 6f 70 79 20 6f 66 20 60 6f 72 67 2d 69 64 2d 75 75 69 64 27 2e 0a 20 20 3b 3b 20 4f 6e 6c .copy.of.`org-id-uuid'....;;.Onl
3ad40 79 20 75 73 65 64 20 69 6e 20 60 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 6d 61 72 6b 27 2e 0a 20 y.used.in.`forge-create-mark'...
3ad60 20 28 6c 65 74 20 28 28 72 6e 64 20 28 6d 64 35 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 25 73 .(let.((rnd.(md5.(format."%s%s%s
3ad80 25 73 25 73 25 73 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 %s%s%s%s".......................
3ada0 20 20 20 20 28 72 61 6e 64 6f 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(random)....................
3adc0 20 20 20 20 20 20 20 28 63 75 72 72 65 6e 74 2d 74 69 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 .......(current-time)...........
3ade0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 75 69 64 29 0a 20 20 20 20 20 ................(user-uid)......
3ae00 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 2d 70 69 64 29 .....................(emacs-pid)
3ae20 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 65 72 ...........................(user
3ae40 2d 66 75 6c 6c 2d 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 20 -full-name).....................
3ae60 20 20 20 20 20 20 75 73 65 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 0a 20 20 20 20 20 20 20 20 ......user-mail-address.........
3ae80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 63 65 6e 74 2d 6b 65 79 73 29 29 ..................(recent-keys))
3aea0 29 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 2d 25 73 2d 34 25 73 2d 25 73 25 73 2d ))).....(format."%s-%s-4%s-%s%s-
3aec0 25 73 22 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 30 %s".............(substring.rnd.0
3aee0 20 38 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 38 .8).............(substring.rnd.8
3af00 20 31 32 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 .12).............(substring.rnd.
3af20 31 33 20 31 36 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 78 22 0a 13.16).............(format."%x".
3af40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 69 6f 72 0a 20 20 20 20 ....................(logior.....
3af60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 62 31 30 30 30 30 30 30 30 0a 20 20 20 20 .................#b10000000.....
3af80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 61 6e 64 0a 20 20 20 20 20 20 20 .................(logand........
3afa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 62 31 30 31 31 31 31 31 31 0a 20 20 20 20 20 20 ...............#b10111111.......
3afc0 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 2d 6e 75 6d 62 65 ................(string-to-numbe
3afe0 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 28 73 75 62 73 74 72 r........................(substr
3b000 69 6e 67 20 72 6e 64 20 31 36 20 31 38 29 20 31 36 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 ing.rnd.16.18).16))))...........
3b020 20 20 28 73 75 62 73 74 72 69 6e 67 20 72 6e 64 20 31 38 20 32 30 29 0a 20 20 20 20 20 20 20 20 ..(substring.rnd.18.20).........
3b040 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 72 6e 64 20 32 30 20 33 32 29 29 29 29 0a 0a 3b 3b ....(substring.rnd.20.32))))..;;
3b060 3b 20 5f 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 63 6f 72 65 29 0a 3b 3b 3b 20 66 6f ;._.(provide.'forge-core).;;;.fo
3b080 72 67 65 2d 63 6f 72 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 rge-core.el.ends.here...........
3b0a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b0c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b0e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b1a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b1c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b1e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b200 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2e 69 6e 66 6f 00 00 forge-20240405.1509/forge.info..
3b220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b260 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
3b280 30 31 37 37 30 30 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 31 30 32 00 20 30 00 00 00 0177004.00000000000.014102..0...
3b2a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b2c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b2e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b300 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...................
3b320 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...................
3b340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
3b400 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.
3b420 6d 61 6b 65 69 6e 66 6f 20 76 65 72 73 69 6f 6e 20 36 2e 37 20 66 72 6f 6d 20 66 6f 72 67 65 2e makeinfo.version.6.7.from.forge.
3b440 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
3b460 30 32 34 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 024.Jonas.Bernoulli.<jonas@berno
3b480 75 6c 2e 6c 69 3e 0a 0a 20 20 20 20 20 59 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 ul.li>.......You.can.redistribut
3b4a0 65 20 74 68 69 73 20 64 6f 63 75 6d 65 6e 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 20 69 74 e.this.document.and/or.modify.it
3b4c0 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 0a 20 20 20 20 20 6f 66 20 74 68 65 20 47 4e 55 .under.the.terms......of.the.GNU
3b4e0 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
3b500 73 68 65 64 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 0a 20 20 20 20 20 46 shed.by.the.Free.Software......F
3b520 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 74 oundation,.either.version.3.of.t
3b540 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 0a he.License,.or.(at.your.option).
3b560 20 20 20 20 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 20 20 20 20 20 54 68 .....any.later.version........Th
3b580 69 73 20 64 6f 63 75 6d 65 6e 74 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 is.document.is.distributed.in.th
3b5a0 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 20 e.hope.that.it.will.be.useful,..
3b5c0 20 20 20 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 ....but.WITHOUT.ANY.WARRANTY;.wi
3b5e0 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 20 thout.even.the.implied.warranty.
3b600 6f 66 0a 20 20 20 20 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 of......MERCHANTABILITY.or.FITNE
3b620 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
3b640 65 20 74 68 65 20 47 4e 55 0a 20 20 20 20 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 e.the.GNU......General.Public.Li
3b660 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 49 4e 46 4f 2d 44 49 cense.for.more.details...INFO-DI
3b680 52 2d 53 45 43 54 49 4f 4e 20 45 6d 61 63 73 0a 53 54 41 52 54 2d 49 4e 46 4f 2d 44 49 52 2d 45 R-SECTION.Emacs.START-INFO-DIR-E
3b6a0 4e 54 52 59 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 41 63 63 NTRY.*.Forge:.(forge)........Acc
3b6c0 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 2e 0a 45 4e 44 2d 49 ess.Git.Forges.from.Magit..END-I
3b6e0 4e 46 4f 2d 44 49 52 2d 45 4e 54 52 59 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 NFO-DIR-ENTRY....File:.forge.inf
3b700 6f 2c 20 20 4e 6f 64 65 3a 20 54 6f 70 2c 20 20 4e 65 78 74 3a 20 49 6e 74 72 6f 64 75 63 74 69 o,..Node:.Top,..Next:.Introducti
3b720 6f 6e 2c 20 20 55 70 3a 20 28 64 69 72 29 0a 0a 46 6f 72 67 65 20 55 73 65 72 20 61 6e 64 20 44 on,..Up:.(dir)..Forge.User.and.D
3b740 65 76 65 6c 6f 70 65 72 20 4d 61 6e 75 61 6c 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a eveloper.Manual.****************
3b760 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 46 6f 72 67 65 20 61 6c 6c 6f 77 73 20 79 6f ***************..Forge.allows.yo
3b780 75 20 74 6f 20 77 6f 72 6b 20 77 69 74 68 20 47 69 74 20 66 6f 72 67 65 73 2c 20 73 75 63 68 20 u.to.work.with.Git.forges,.such.
3b7a0 61 73 20 47 69 74 68 75 62 20 61 6e 64 20 47 69 74 6c 61 62 2c 0a 66 72 6f 6d 20 74 68 65 20 63 as.Github.and.Gitlab,.from.the.c
3b7c0 6f 6d 66 6f 72 74 20 6f 66 20 4d 61 67 69 74 20 61 6e 64 20 74 68 65 20 72 65 73 74 20 6f 66 20 omfort.of.Magit.and.the.rest.of.
3b7e0 45 6d 61 63 73 2e 0a 0a 54 68 69 73 20 6d 61 6e 75 61 6c 20 69 73 20 66 6f 72 20 46 6f 72 67 65 Emacs...This.manual.is.for.Forge
3b800 20 76 65 72 73 69 6f 6e 20 30 2e 33 2e 32 2e 35 30 2d 67 69 74 2e 0a 0a 20 20 20 20 20 43 6f 70 .version.0.3.2.50-git........Cop
3b820 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 34 20 4a 6f 6e 61 73 20 42 65 72 6e 6f yright.(C).2018-2024.Jonas.Berno
3b840 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 0a 20 20 20 20 20 59 6f ulli.<jonas@bernoul.li>.......Yo
3b860 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 65 6e 74 u.can.redistribute.this.document
3b880 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 65 72 6d .and/or.modify.it.under.the.term
3b8a0 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 6c 69 63 s......of.the.GNU.General.Public
3b8c0 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 46 72 65 .License.as.published.by.the.Fre
3b8e0 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 69 74 68 e.Software......Foundation,.eith
3b900 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 6f 72 20 er.version.3.of.the.License,.or.
3b920 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 65 72 20 (at.your.option)......any.later.
3b940 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 69 73 20 version........This.document.is.
3b960 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 69 74 20 distributed.in.the.hope.that.it.
3b980 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 4f 55 54 will.be.useful,......but.WITHOUT
3b9a0 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 65 20 .ANY.WARRANTY;.without.even.the.
3b9c0 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 48 41 4e implied.warranty.of......MERCHAN
3b9e0 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
3ba00 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 20 20 20 ULAR.PURPOSE...See.the.GNU......
3ba20 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.
3ba40 64 65 74 61 69 6c 73 2e 0a 0a 2a 20 4d 65 6e 75 3a 0a 0a 2a 20 49 6e 74 72 6f 64 75 63 74 69 6f details...*.Menu:..*.Introductio
3ba60 6e 3a 3a 0a 2a 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 n::.*.Supported.Forges.and.Hosts
3ba80 3a 3a 0a 2a 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 3a 3a 0a 2a 20 55 73 61 67 65 3a 3a ::.*.Getting.Started::.*.Usage::
3baa0 0a 2a 20 46 41 51 3a 3a 0a 2a 20 4b 65 79 73 74 72 6f 6b 65 20 49 6e 64 65 78 3a 3a 0a 2a 20 46 .*.FAQ::.*.Keystroke.Index::.*.F
3bac0 75 6e 63 74 69 6f 6e 20 61 6e 64 20 43 6f 6d 6d 61 6e 64 20 49 6e 64 65 78 3a 3a 0a 2a 20 56 61 unction.and.Command.Index::.*.Va
3bae0 72 69 61 62 6c 65 20 49 6e 64 65 78 3a 3a 0a 0a e2 80 94 20 54 68 65 20 44 65 74 61 69 6c 65 64 riable.Index::......The.Detailed
3bb00 20 4e 6f 64 65 20 4c 69 73 74 69 6e 67 20 e2 80 94 0a 0a 53 75 70 70 6f 72 74 65 64 20 46 6f 72 .Node.Listing......Supported.For
3bb20 67 65 73 20 61 6e 64 20 48 6f 73 74 73 0a 0a 2a 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 ges.and.Hosts..*.Supported.Forge
3bb40 73 3a 3a 0a 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 s::.*.Partially.Supported.Forges
3bb60 3a 3a 0a 2a 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 47 65 ::.*.Supported.Semi-Forges::..Ge
3bb80 74 74 69 6e 67 20 53 74 61 72 74 65 64 0a 0a 2a 20 4c 6f 61 64 69 6e 67 20 46 6f 72 67 65 3a 3a tting.Started..*.Loading.Forge::
3bba0 0a 2a 20 54 6f 6b 65 6e 20 43 72 65 61 74 69 6f 6e 3a 3a 0a 2a 20 49 6e 69 74 69 61 6c 20 50 75 .*.Token.Creation::.*.Initial.Pu
3bbc0 6c 6c 3a 3a 0a 2a 20 52 65 70 6f 73 69 74 6f 72 79 20 44 65 74 65 63 74 69 6f 6e 3a 3a 0a 2a 20 ll::.*.Repository.Detection::.*.
3bbe0 43 61 76 65 61 74 73 3a 3a 0a 0a 55 73 61 67 65 0a 0a 2a 20 50 75 6c 6c 69 6e 67 3a 3a 0a 2a 20 Caveats::..Usage..*.Pulling::.*.
3bc00 42 72 61 6e 63 68 69 6e 67 3a 3a 0a 2a 20 57 6f 72 6b 69 6e 67 20 77 69 74 68 20 54 6f 70 69 63 Branching::.*.Working.with.Topic
3bc20 73 3a 3a 0a 2a 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 3a 3a 0a 0a 57 6f 72 6b 69 6e 67 20 77 s::.*.Miscellaneous::..Working.w
3bc40 69 74 68 20 54 6f 70 69 63 73 0a 0a 2a 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 3a 3a 0a ith.Topics..*.Visiting.Topics::.
3bc60 2a 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f *.Listing.Topics.and.Notificatio
3bc80 6e 73 3a 3a 0a 2a 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 3a 3a 0a 2a 20 45 64 69 74 69 ns::.*.Creating.Topics::.*.Editi
3bca0 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 3a 3a 0a 0a 0a 46 41 51 0a 0a 2a 20 49 ng.Topics.and.Posts::...FAQ..*.I
3bcc0 73 20 69 74 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 63 72 65 61 74 65 20 61 20 73 69 6e 67 6c 65 s.it.possible.to.create.a.single
3bce0 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 77 69 74 68 6f 75 74 20 70 75 6c 6c 69 6e 67 20 65 76 .pull-request.without.pulling.ev
3bd00 65 72 79 74 68 69 6e 67 3f 3a 3a 0a 2a 20 e2 80 98 65 72 72 6f 72 20 69 6e 20 70 72 6f 63 65 73 erything?::.*....error.in.proces
3bd20 73 20 66 69 6c 74 65 72 20 48 54 54 50 20 45 72 72 6f 72 20 35 30 32 2c 20 22 42 61 64 20 67 61 s.filter.HTTP.Error.502,."Bad.ga
3bd40 74 65 77 61 79 22 e2 80 99 3a 20 65 72 72 6f 72 20 69 6e 20 70 72 6f 63 65 73 73 20 66 69 6c 74 teway"...:.error.in.process.filt
3bd60 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 2e er.HTTP.Error.502."Bad.gateway".
3bd80 0a 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 49 6e .....File:.forge.info,..Node:.In
3bda0 74 72 6f 64 75 63 74 69 6f 6e 2c 20 20 4e 65 78 74 3a 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 troduction,..Next:.Supported.For
3bdc0 67 65 73 20 61 6e 64 20 48 6f 73 74 73 2c 20 20 50 72 65 76 3a 20 54 6f 70 2c 20 20 55 70 3a 20 ges.and.Hosts,..Prev:.Top,..Up:.
3bde0 54 6f 70 0a 0a 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 Top..1.Introduction.************
3be00 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 74 **..Forge.allows.you.to.work.wit
3be20 68 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 h.Git.forges,.such.as.Github.and
3be40 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 4d 61 67 .Gitlab,.from.the.comfort.of.Mag
3be60 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 20 20 20 46 6f it.and.the.rest.of.Emacs......Fo
3be80 72 67 65 20 66 65 74 63 68 65 73 20 69 73 73 75 65 73 2c 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 rge.fetches.issues,.pull-request
3bea0 73 20 61 6e 64 20 6f 74 68 65 72 20 64 61 74 61 20 75 73 69 6e 67 20 74 68 65 20 66 6f 72 67 65 s.and.other.data.using.the.forge
3bec0 e2 80 99 73 0a 41 50 49 20 61 6e 64 20 73 74 6f 72 65 73 20 74 68 61 74 20 69 6e 20 61 20 6c 6f ...s.API.and.stores.that.in.a.lo
3bee0 63 61 6c 20 64 61 74 61 62 61 73 65 2e 20 20 41 64 64 69 74 69 6f 6e 61 6c 6c 79 20 69 74 20 66 cal.database...Additionally.it.f
3bf00 65 74 63 68 65 73 20 74 68 65 0a 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 72 65 66 65 72 65 6e 63 etches.the.pull-request.referenc
3bf20 65 73 20 75 73 69 6e 67 20 47 69 74 2e 20 20 46 6f 72 67 65 20 69 6d 70 6c 65 6d 65 6e 74 73 20 es.using.Git...Forge.implements.
3bf40 76 61 72 69 6f 75 73 20 66 65 61 74 75 72 65 73 0a 74 68 61 74 20 75 73 65 20 74 68 69 73 20 64 various.features.that.use.this.d
3bf60 61 74 61 20 62 75 74 20 74 68 65 20 64 61 74 61 62 61 73 65 20 61 6e 64 20 70 75 6c 6c 2d 72 65 ata.but.the.database.and.pull-re
3bf80 71 75 65 73 74 20 72 65 66 73 20 63 61 6e 20 61 6c 73 6f 20 62 65 0a 75 73 65 64 20 62 79 20 74 quest.refs.can.also.be.used.by.t
3bfa0 68 69 72 64 2d 70 61 72 74 79 20 70 61 63 6b 61 67 65 73 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f hird-party.packages.....File:.fo
3bfc0 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 6f 72 67 65 rge.info,..Node:.Supported.Forge
3bfe0 73 20 61 6e 64 20 48 6f 73 74 73 2c 20 20 4e 65 78 74 3a 20 47 65 74 74 69 6e 67 20 53 74 61 72 s.and.Hosts,..Next:.Getting.Star
3c000 74 65 64 2c 20 20 50 72 65 76 3a 20 49 6e 74 72 6f 64 75 63 74 69 6f 6e 2c 20 20 55 70 3a 20 54 ted,..Prev:.Introduction,..Up:.T
3c020 6f 70 0a 0a 32 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 op..2.Supported.Forges.and.Hosts
3c040 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 0a 0a 43 .****************************..C
3c060 75 72 72 65 6e 74 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 urrently.Forge.supports.two.forg
3c080 65 73 20 61 6e 64 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 es.and.three.more.forges.partial
3c0a0 6c 79 2e 0a 41 64 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 ly..Additionally.it.supports.fou
3c0c0 72 20 73 65 6d 69 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 r.semi-forges...Support.for.more
3c0e0 20 66 6f 72 67 65 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 .forges.and.semi-forges.can.and.
3c100 77 69 6c 6c 20 62 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 will.be.added......Both.forges.a
3c120 6e 64 20 73 65 6d 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 nd.semi-forges.provide.web.inter
3c140 66 61 63 65 73 20 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 faces.for.Git.repositories...For
3c160 67 65 73 20 61 64 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 ges.additionally.support.pull-re
3c180 71 75 65 73 74 73 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 quests.and.issues.and.make.those
3c1a0 20 61 6e 64 20 6f 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 .and.other.information.available
3c1c0 20 75 73 69 6e 67 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 .using.an.API......When.a.forge.
3c1e0 69 73 20 6f 6e 6c 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 is.only.partially.supported,.the
3c200 6e 20 74 68 61 74 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 n.that.means.that.only.the.funct
3c220 69 6f 6e 61 6c 69 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 ionality.that.does.not.require.t
3c240 68 65 20 41 50 49 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 he.API.is.implemented,.or.in.oth
3c260 65 72 20 77 6f 72 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 er.words,.that.the.forge.is.only
3c280 20 73 75 70 70 6f 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 .supported.as.a.semi-forge......
3c2a0 41 20 68 6f 73 74 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 A.host.is.a.particular.instance.
3c2c0 6f 66 20 61 20 66 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 of.a.forge...For.example.the.hos
3c2e0 74 73 0a 3c 68 74 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 ts.<https://gitlab.com>.and.<htt
3c300 70 73 3a 2f 2f 73 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 ps://salsa.debian.org>.are.both.
3c320 69 6e 73 74 61 6e 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 instances.of.the.Gitlab.forge...
3c340 46 6f 72 67 65 20 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 Forge.supports.some.well.known.h
3c360 6f 73 74 73 20 6f 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 osts.out.of.the.box.and.addition
3c380 61 6c 20 68 6f 73 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 al.hosts.can.easily.be.supported
3c3a0 20 62 79 20 61 64 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 .by.adding.entries.to.the.option
3c3c0 20 e2 80 98 66 6f 72 67 65 2d 61 6c 69 73 74 e2 80 99 20 28 73 65 65 20 2a 6e 6f 74 65 20 52 65 ....forge-alist....(see.*note.Re
3c3e0 70 6f 73 69 74 6f 72 79 20 44 65 74 65 63 74 69 6f 6e 3a 3a 29 2e 0a 0a 20 20 20 46 6f 72 20 6d pository.Detection::)......For.m
3c400 6f 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 ore.details.about.the.caveats.me
3c420 6e 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 ntioned.below.(and.some.others).
3c440 61 6c 73 6f 20 73 65 65 20 2a 6e 6f 74 65 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 3a 3a also.see.*note.Getting.Started::
3c460 2e 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 ...*.Menu:..*.Supported.Forges::
3c480 0a 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 .*.Partially.Supported.Forges::.
3c4a0 2a 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 *.Supported.Semi-Forges::....Fil
3c4c0 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 64 20 e:.forge.info,..Node:.Supported.
3c4e0 46 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 Forges,..Next:.Partially.Support
3c500 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 73 ed.Forges,..Up:.Supported.Forges
3c520 20 61 6e 64 20 48 6f 73 74 73 0a 0a 32 2e 31 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 .and.Hosts..2.1.Supported.Forges
3c540 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 47 69 74 68 75 62 0a 2d 2d .====================..Github.--
3c560 2d 2d 2d 2d 0a 0a 46 6f 72 67 65 e2 80 99 73 20 73 75 70 70 6f 72 74 20 66 6f 72 20 47 69 74 68 ----..Forge...s.support.for.Gith
3c580 75 62 20 63 61 6e 20 62 65 20 63 6f 6e 73 69 64 65 72 65 64 20 74 68 65 20 22 72 65 66 65 72 65 ub.can.be.considered.the."refere
3c5a0 6e 63 65 0a 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 22 2e 20 20 53 75 70 70 6f 72 74 20 66 6f nce.implementation"...Support.fo
3c5c0 72 20 6f 74 68 65 72 20 66 6f 72 67 65 73 20 63 61 6e 20 6c 61 67 20 62 65 68 69 6e 64 20 61 20 r.other.forges.can.lag.behind.a.
3c5e0 62 69 74 2e 0a 0a 47 69 74 68 75 62 20 43 61 76 65 61 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e bit...Github.Caveats............
3c600 2e 2e 2e 0a 0a 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 ............Forge.uses.the.Githu
3c620 62 20 47 72 61 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 b.GraphQL.API.when.possible.but.
3c640 68 61 73 20 74 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 has.to.fall......back.to.use.the
3c660 20 52 45 53 54 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 .REST.API.in.many.cases.because.
3c680 74 68 65 20 66 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 the.former.is.still......rather.
3c6a0 69 6e 63 6f 6d 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 incomplete..........The.Github.G
3c6c0 72 61 70 68 51 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 raphQL.API.has.a.hard-coded.time
3c6e0 6f 75 74 20 6f 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 out.on.queries...The......only.s
3c700 6f 6c 75 74 69 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 olution.is.to.reduce.the.number.
3c720 6f 66 20 65 6e 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 of.entities.we.query.at.once,...
3c740 20 20 20 77 68 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 ...which.can.be.done.by.adjustin
3c760 67 20 65 69 74 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 g.either.the....forge.graphqlIte
3c780 6d 4c 69 6d 69 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 mLimit.........git.variable.or.t
3c7a0 68 65 20 66 69 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 he.field."GQL.entity.limit".in.a
3c7c0 20 73 74 61 74 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 .status.buffer..........Forge.de
3c7e0 70 65 6e 64 73 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 pends.on.the....updated_at....fi
3c800 65 6c 64 20 62 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 eld.being.updated.when......appr
3c820 6f 70 72 69 61 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 opriate...For.Github.pull-reques
3c840 74 73 20 61 74 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 ts.at.least,.that.is.not.always.
3c860 20 20 20 20 20 64 6f 6e 65 2e 0a 0a 47 69 74 68 75 62 20 48 6f 73 74 73 0a 2e 2e 2e 2e 2e 2e 2e .....done...Github.Hosts........
3c880 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 68 75 62 2e 63 6f ..............<https://github.co
3c8a0 6d 3e 0a 0a 47 69 74 6c 61 62 0a 2d 2d 2d 2d 2d 2d 0a 0a 47 69 74 6c 61 62 20 43 61 76 65 61 74 m>..Gitlab.------..Gitlab.Caveat
3c8c0 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 46 6f 72 67 65 20 63 s........................Forge.c
3c8e0 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 6e 73 20 62 65 63 61 annot.provide.notifications.beca
3c900 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 6f 74 0a 20 20 20 20 use.the.Gitlab.API.does.not.....
3c920 20 65 78 70 6f 73 65 20 74 68 6f 73 65 2e 0a 0a 47 69 74 6c 61 62 20 48 6f 73 74 73 0a 2e 2e 2e .expose.those...Gitlab.Hosts....
3c940 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 2f 2f 67 69 74 6c 61 ..................<https://gitla
3c960 62 2e 63 6f 6d 3e 0a 20 20 20 e2 80 a2 20 3c 68 74 74 70 73 3a 2f 2f 73 61 6c 73 61 2e 64 65 62 b.com>........<https://salsa.deb
3c980 69 61 6e 2e 6f 72 67 3e 0a 20 20 20 e2 80 a2 20 3c 68 74 74 70 73 3a 2f 2f 66 72 61 6d 61 67 69 ian.org>........<https://framagi
3c9a0 74 2e 6f 72 67 3e 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 t.org>....File:.forge.info,..Nod
3c9c0 65 3a 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 2c 20 20 e:.Partially.Supported.Forges,..
3c9e0 4e 65 78 74 3a 20 53 75 70 70 6f 72 74 65 64 20 53 65 6d 69 2d 46 6f 72 67 65 73 2c 20 20 50 72 Next:.Supported.Semi-Forges,..Pr
3ca00 65 76 3a 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 2c 20 20 55 70 3a 20 53 75 70 70 6f ev:.Supported.Forges,..Up:.Suppo
3ca20 72 74 65 64 20 46 6f 72 67 65 73 20 61 6e 64 20 48 6f 73 74 73 0a 0a 32 2e 32 20 50 61 72 74 69 rted.Forges.and.Hosts..2.2.Parti
3ca40 61 6c 6c 79 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ally.Supported.Forges.==========
3ca60 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 47 69 74 65 61 20 68 74 74 70 ====================..Gitea.http
3ca80 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 2d 2d 2d s://gitea.io.-------------------
3caa0 2d 2d 2d 0a 0a 54 68 69 73 20 69 73 20 74 68 65 20 6e 65 78 74 20 66 6f 72 67 65 20 77 68 6f 73 ---..This.is.the.next.forge.whos
3cac0 65 20 41 50 49 20 77 69 6c 6c 20 62 65 20 73 75 70 70 6f 72 74 65 64 2e 0a 0a 47 69 74 65 61 20 e.API.will.be.supported...Gitea.
3cae0 48 6f 73 74 73 0a 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 Hosts.....................<https
3cb00 3a 2f 2f 63 6f 64 65 62 65 72 67 2e 6f 72 67 3e 0a 0a 47 6f 67 73 20 68 74 74 70 73 3a 2f 2f 67 ://codeberg.org>..Gogs.https://g
3cb20 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 2d 2d 0a 0a 4f 6e 63 ogs.io.--------------------..Onc
3cb40 65 20 47 69 74 65 61 20 69 73 20 73 75 70 70 6f 72 74 65 64 20 69 74 20 73 68 6f 75 6c 64 20 62 e.Gitea.is.supported.it.should.b
3cb60 65 20 66 61 69 72 6c 79 20 73 69 6d 70 6c 65 20 74 6f 20 73 75 70 70 6f 72 74 20 47 6f 67 73 20 e.fairly.simple.to.support.Gogs.
3cb80 74 6f 6f 2c 0a 62 65 63 61 75 73 65 20 74 68 65 20 66 6f 72 6d 65 72 20 69 73 20 61 20 66 6f 72 too,.because.the.former.is.a.for
3cba0 6b 20 6f 66 20 74 68 65 20 6c 61 74 74 65 72 20 61 6e 64 20 74 68 65 20 41 50 49 73 20 73 65 65 k.of.the.latter.and.the.APIs.see
3cbc0 6d 20 74 6f 20 73 74 69 6c 6c 20 62 65 0a 76 65 72 79 20 73 69 6d 69 6c 61 72 2e 0a 0a 47 6f 67 m.to.still.be.very.similar...Gog
3cbe0 73 20 48 6f 73 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 3c 68 74 74 70 s.Hosts....................<http
3cc00 73 3a 2f 2f 63 6f 64 65 2e 6f 72 67 6d 6f 64 65 2e 6f 72 67 3e 0a 0a 42 69 74 62 75 63 6b 65 74 s://code.orgmode.org>..Bitbucket
3cc20 20 68 74 74 70 73 3a 2f 2f 62 69 74 62 75 63 6b 65 74 2e 6f 72 67 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d .https://bitbucket.org.---------
3cc40 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 49 20 64 6f 6e e2 80 99 ----------------------..I.don...
3cc60 74 20 70 6c 61 6e 20 74 6f 20 73 75 70 70 6f 72 74 20 42 69 74 62 75 63 6b 65 74 e2 80 99 73 20 t.plan.to.support.Bitbucket...s.
3cc80 41 50 49 20 61 6e 79 20 74 69 6d 65 20 73 6f 6f 6e 2c 20 61 6e 64 20 69 74 20 67 65 74 73 20 6c API.any.time.soon,.and.it.gets.l
3cca0 65 73 73 0a 6c 69 6b 65 6c 79 20 74 68 61 74 20 49 20 77 69 6c 6c 20 65 76 65 72 79 20 64 6f 20 ess.likely.that.I.will.every.do.
3ccc0 69 74 20 65 76 65 72 79 20 74 69 6d 65 20 49 20 6c 6f 6f 6b 20 61 74 20 69 74 2e 0a 0a 42 69 74 it.every.time.I.look.at.it...Bit
3cce0 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..................
3cd00 0a 0a 20 20 20 e2 80 a2 20 54 68 65 20 41 50 49 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 69 .........The.API.documentation.i
3cd20 73 20 70 6f 6f 72 20 61 6e 64 20 69 6e 69 74 69 61 6c 20 74 65 73 74 73 20 69 6e 64 69 63 61 74 s.poor.and.initial.tests.indicat
3cd40 65 64 20 74 68 61 74 20 74 68 65 0a 20 20 20 20 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 ed.that.the......implementation.
3cd60 69 73 20 62 75 67 67 79 2e 0a 0a 20 20 20 e2 80 a2 20 41 74 6c 61 73 73 69 61 6e e2 80 99 73 20 is.buggy..........Atlassian...s.
3cd80 6f 66 66 65 72 69 6e 67 20 63 6f 6e 74 61 69 6e 73 20 74 77 6f 20 76 65 72 79 20 64 69 73 74 69 offering.contains.two.very.disti
3cda0 6e 63 74 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 73 0a 20 20 20 20 20 74 68 61 74 20 61 72 nct.implementations......that.ar
3cdc0 65 20 62 6f 74 68 20 63 61 6c 6c 65 64 20 22 42 69 74 62 75 63 6b 65 74 22 2e 20 20 46 6f 72 67 e.both.called."Bitbucket"...Forg
3cde0 65 20 6f 6e 6c 79 20 73 75 70 70 6f 72 74 73 20 74 68 65 0a 20 20 20 20 20 69 6d 70 6c 65 6d 65 e.only.supports.the......impleme
3ce00 6e 74 61 74 69 6f 6e 20 77 68 6f 73 65 20 6f 6e 6c 79 20 69 6e 73 74 61 6e 63 65 20 69 73 20 61 ntation.whose.only.instance.is.a
3ce20 76 61 69 6c 61 62 6c 65 20 61 74 0a 20 20 20 20 20 3c 68 74 74 70 73 3a 2f 2f 62 69 74 62 75 63 vailable.at......<https://bitbuc
3ce40 6b 65 74 2e 6f 72 67 3e 2c 20 62 65 63 61 75 73 65 20 49 20 6f 6e 6c 79 20 68 61 76 65 20 61 63 ket.org>,.because.I.only.have.ac
3ce60 63 65 73 73 20 74 6f 20 74 68 61 74 2e 0a 0a 20 20 20 e2 80 a2 20 55 6e 6c 69 6b 65 20 61 6c 6c cess.to.that..........Unlike.all
3ce80 20 6f 74 68 65 72 20 66 6f 72 67 65 73 2c 20 42 69 74 62 75 63 6b 65 74 20 64 6f 65 73 20 6e 6f .other.forges,.Bitbucket.does.no
3cea0 74 20 65 78 70 6f 73 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 61 73 0a 20 20 20 20 20 72 t.expose.pull-requests.as......r
3cec0 65 66 65 72 65 6e 63 65 73 20 69 6e 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 70 6f 73 69 eferences.in.the.upstream.reposi
3cee0 74 6f 72 79 2e 20 20 46 6f 72 20 74 68 61 74 20 72 65 61 73 6f 6e 20 46 6f 72 67 65 0a 20 20 20 tory...For.that.reason.Forge....
3cf00 20 20 61 63 74 75 61 6c 6c 79 20 74 72 65 61 74 73 20 69 74 20 61 73 20 61 20 73 65 6d 69 2d 66 ..actually.treats.it.as.a.semi-f
3cf20 6f 72 67 65 2c 20 6e 6f 74 20 61 73 20 66 6f 72 67 65 20 77 68 6f 73 65 20 41 50 49 20 69 73 20 orge,.not.as.forge.whose.API.is.
3cf40 6e 6f 74 0a 20 20 20 20 20 73 75 70 70 6f 72 74 65 64 20 79 65 74 2e 20 20 54 68 69 73 20 6d 65 not......supported.yet...This.me
3cf60 61 6e 73 20 74 68 61 74 20 79 6f 75 20 63 61 6e 6e 6f 74 20 63 68 65 63 6b 6f 75 74 20 70 75 6c ans.that.you.cannot.checkout.pul
3cf80 6c 2d 72 65 71 75 65 73 74 73 0a 20 20 20 20 20 6c 6f 63 61 6c 6c 79 2e 20 20 54 68 65 72 65 20 l-requests......locally...There.
3cfa0 69 73 20 6c 69 74 74 6c 65 20 68 6f 70 65 20 74 68 61 74 20 74 68 69 73 20 77 69 6c 6c 20 65 76 is.little.hope.that.this.will.ev
3cfc0 65 72 20 67 65 74 20 66 69 78 65 64 3b 20 74 68 65 0a 20 20 20 20 20 72 65 73 70 65 63 74 69 76 er.get.fixed;.the......respectiv
3cfe0 65 20 69 73 73 75 65 20 77 61 73 20 6f 70 65 6e 65 64 20 73 69 78 20 79 65 61 72 73 20 61 67 6f e.issue.was.opened.six.years.ago
3d000 20 61 6e 64 20 74 68 65 72 65 20 68 61 73 20 62 65 65 6e 20 6e 6f 0a 20 20 20 20 20 70 72 6f 67 .and.there.has.been.no......prog
3d020 72 65 73 73 20 73 69 6e 63 65 3a 20 3c 68 74 74 70 73 3a 2f 2f 62 69 74 62 75 63 6b 65 74 2e 6f ress.since:.<https://bitbucket.o
3d040 72 67 2f 73 69 74 65 2f 6d 61 73 74 65 72 2f 69 73 73 75 65 73 2f 35 38 31 34 3e 2e 0a 0a 42 69 rg/site/master/issues/5814>...Bi
3d060 74 62 75 63 6b 65 74 20 48 6f 73 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 tbucket.Hosts...................
3d080 20 20 e2 80 a2 20 3c 68 74 74 70 73 3a 2f 2f 62 69 74 62 75 63 6b 65 74 2e 6f 72 67 3e 0a 0a 1f ......<https://bitbucket.org>...
3d0a0 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 75 70 70 6f 72 .File:.forge.info,..Node:.Suppor
3d0c0 74 65 64 20 53 65 6d 69 2d 46 6f 72 67 65 73 2c 20 20 50 72 65 76 3a 20 50 61 72 74 69 61 6c 6c ted.Semi-Forges,..Prev:.Partiall
3d0e0 79 20 53 75 70 70 6f 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 y.Supported.Forges,..Up:.Support
3d100 65 64 20 46 6f 72 67 65 73 20 61 6e 64 20 48 6f 73 74 73 0a 0a 32 2e 33 20 53 75 70 70 6f 72 74 ed.Forges.and.Hosts..2.3.Support
3d120 65 64 20 53 65 6d 69 2d 46 6f 72 67 65 73 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ed.Semi-Forges.=================
3d140 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 47 69 74 77 65 62 20 68 74 74 70 73 3a 2f 2f 67 69 74 2d 73 63 6d ========..Gitweb.https://git-scm
3d160 2e 63 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 .com/docs/gitweb.---------------
3d180 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 47 69 74 77 65 62 20 -----------------------..Gitweb.
3d1a0 43 61 76 65 61 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 49 Caveats........................I
3d1c0 20 63 6f 75 6c 64 20 66 69 6e 64 20 6f 6e 6c 79 20 6f 6e 65 20 70 75 62 6c 69 63 20 69 6e 73 74 .could.find.only.one.public.inst
3d1e0 61 6c 6c 61 74 69 6f 6e 0a 20 20 20 20 20 28 3c 68 74 74 70 73 3a 2f 2f 67 69 74 2e 73 61 76 61 allation......(<https://git.sava
3d200 6e 6e 61 68 2e 67 6e 75 2e 6f 72 67 3e 29 2c 20 77 68 69 63 68 20 67 69 76 65 73 20 75 73 65 72 nnah.gnu.org>),.which.gives.user
3d220 73 20 74 68 65 20 63 68 6f 69 63 65 0a 20 20 20 20 20 62 65 74 77 65 65 6e 20 47 69 74 77 65 62 s.the.choice......between.Gitweb
3d240 20 61 6e 64 20 43 67 69 74 2e 20 20 54 68 65 20 6c 61 74 74 65 72 20 73 65 65 6d 73 20 6d 6f 72 .and.Cgit...The.latter.seems.mor
3d260 65 20 70 6f 70 75 6c 61 72 20 28 6e 6f 74 20 6a 75 73 74 0a 20 20 20 20 20 6f 6e 20 74 68 69 73 e.popular.(not.just......on.this
3d280 20 73 69 74 65 29 2e 0a 0a 43 67 69 74 20 68 74 74 70 73 3a 2f 2f 67 69 74 2e 7a 78 32 63 34 2e .site)...Cgit.https://git.zx2c4.
3d2a0 63 6f 6d 2f 63 67 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 com/cgit/about.-----------------
3d2c0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 43 67 69 74 20 43 61 76 65 61 --------------------..Cgit.Cavea
3d2e0 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 44 69 66 66 65 72 65 6e ts......................Differen
3d300 74 20 73 69 74 65 73 20 75 73 65 20 64 69 66 66 65 72 65 6e 74 20 55 52 4c 20 73 63 68 65 6d 61 t.sites.use.different.URL.schema
3d320 74 61 20 61 6e 64 20 73 6f 6d 65 20 6f 66 20 74 68 65 20 62 69 67 67 65 72 0a 20 20 20 20 20 73 ta.and.some.of.the.bigger......s
3d340 69 74 65 73 20 75 73 65 20 61 20 66 6f 72 6b 2e 20 20 46 6f 72 20 74 68 69 73 20 72 65 61 73 6f ites.use.a.fork...For.this.reaso
3d360 6e 20 46 6f 72 67 65 20 68 61 73 20 74 6f 20 70 72 6f 76 69 64 65 20 73 65 76 65 72 61 6c 0a 20 n.Forge.has.to.provide.several..
3d380 20 20 20 20 63 6c 61 73 73 65 73 20 74 6f 20 73 75 70 70 6f 72 74 20 64 69 66 66 65 72 65 6e 74 ....classes.to.support.different
3d3a0 20 76 61 72 69 61 74 69 6f 6e 73 20 6f 66 20 43 67 69 74 20 61 6e 64 20 79 6f 75 20 68 61 76 65 .variations.of.Cgit.and.you.have
3d3c0 20 74 6f 0a 20 20 20 20 20 6c 6f 6f 6b 20 61 74 20 74 68 65 69 72 20 64 65 66 69 6e 69 74 69 6f .to......look.at.their.definitio
3d3e0 6e 73 20 74 6f 20 66 69 67 75 72 65 20 6f 75 74 20 77 68 69 63 68 20 6f 6e 65 20 69 73 20 74 68 ns.to.figure.out.which.one.is.th
3d400 65 20 63 6f 72 72 65 63 74 0a 20 20 20 20 20 6f 6e 65 20 66 6f 72 20 61 20 70 61 72 74 69 63 75 e.correct......one.for.a.particu
3d420 6c 61 72 20 69 6e 73 74 61 6c 6c 61 74 69 6f 6e 2e 0a 0a 43 67 69 74 20 48 6f 73 74 73 0a 2e 2e lar.installation...Cgit.Hosts...
3d440 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
3d460 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
3d480 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
3d4a0 70 73 3a 2f 2f 72 65 70 6f 2e 6f 72 2e 63 7a 3e 0a 0a 53 74 67 69 74 20 68 74 74 70 73 3a 2f 2f ps://repo.or.cz>..Stgit.https://
3d4c0 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 2f 66 69 6c 65 2f codemadness.org/git/stagit/file/
3d4e0 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 2d 2d 2d 2d 2d 2d README.html.--------------------
3d500 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 --------------------------------
3d520 2d 2d 2d 2d 2d 0a 0a 53 74 67 69 74 20 43 61 76 65 61 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e -----..Stgit.Caveats............
3d540 2e 2e 0a 0a 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 ...........Stgit.cannot.show.log
3d560 73 20 66 6f 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 s.for.branches.beside."master"..
3d580 20 46 6f 72 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 .For.that......reason.Forge.take
3d5a0 73 20 75 73 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 s.users.to.a.page.listing.the.br
3d5c0 61 6e 63 68 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 anches.when.they......request.th
3d5e0 65 20 6c 6f 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 e.log.for.a.particular.branch.(e
3d600 76 65 6e 20 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 ven.for."master".whose......log.
3d620 69 73 20 6a 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 is.just.one.click.away.from.ther
3d640 65 29 2e 0a 0a 53 74 67 69 74 20 48 6f 73 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 e)...Stgit.Hosts................
3d660 20 e2 80 a2 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 2e 73 75 63 6b 6c 65 73 73 2e 6f 72 67 3e 0a .....<https://git.suckless.org>.
3d680 0a 53 72 68 74 20 68 74 74 70 73 3a 2f 2f 6d 65 74 61 2e 73 72 2e 68 74 0a 2d 2d 2d 2d 2d 2d 2d .Srht.https://meta.sr.ht.-------
3d6a0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 53 72 68 74 20 43 61 76 65 61 74 73 0a 2e ----------------..Srht.Caveats..
3d6c0 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 0a 0a 20 20 20 e2 80 a2 20 53 72 68 74 20 63 61 6e 6e 6f 74 20 ....................Srht.cannot.
3d6e0 73 68 6f 77 20 6c 6f 67 73 20 66 6f 72 20 62 72 61 6e 63 68 65 73 20 62 65 73 69 64 65 20 22 6d show.logs.for.branches.beside."m
3d700 61 73 74 65 72 22 2e 20 20 46 6f 72 20 74 68 61 74 0a 20 20 20 20 20 72 65 61 73 6f 6e 20 46 6f aster"...For.that......reason.Fo
3d720 72 67 65 20 74 61 6b 65 73 20 75 73 65 72 73 20 74 6f 20 61 20 70 61 67 65 20 6c 69 73 74 69 6e rge.takes.users.to.a.page.listin
3d740 67 20 74 68 65 20 62 72 61 6e 63 68 65 73 20 77 68 65 6e 20 74 68 65 79 0a 20 20 20 20 20 72 65 g.the.branches.when.they......re
3d760 71 75 65 73 74 20 74 68 65 20 6c 6f 67 20 66 6f 72 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 62 quest.the.log.for.a.particular.b
3d780 72 61 6e 63 68 20 28 65 76 65 6e 20 66 6f 72 20 22 6d 61 73 74 65 72 22 20 77 68 6f 73 65 0a 20 ranch.(even.for."master".whose..
3d7a0 20 20 20 20 6c 6f 67 20 69 73 20 6a 75 73 74 20 6f 6e 65 20 63 6c 69 63 6b 20 61 77 61 79 20 66 ....log.is.just.one.click.away.f
3d7c0 72 6f 6d 20 74 68 65 72 65 29 2e 0a 0a 53 72 68 74 20 48 6f 73 74 73 0a 2e 2e 2e 2e 2e 2e 2e 2e rom.there)...Srht.Hosts.........
3d7e0 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 72 2e 68 74 3e 0a 0a ...........<https://git.sr.ht>..
3d800 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 47 65 74 74 69 ..File:.forge.info,..Node:.Getti
3d820 6e 67 20 53 74 61 72 74 65 64 2c 20 20 4e 65 78 74 3a 20 55 73 61 67 65 2c 20 20 50 72 65 76 3a ng.Started,..Next:.Usage,..Prev:
3d840 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 2c 20 20 55 70 .Supported.Forges.and.Hosts,..Up
3d860 3a 20 54 6f 70 0a 0a 33 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 0a 2a 2a 2a 2a 2a 2a 2a :.Top..3.Getting.Started.*******
3d880 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 49 6e 69 74 69 61 6c 20 73 65 74 75 70 20 74 75 72 6e 65 64 **********..Initial.setup.turned
3d8a0 20 6f 75 74 20 74 6f 20 6d 6f 72 65 20 63 68 61 6c 6c 65 6e 67 69 6e 67 20 66 6f 72 20 6d 61 6e .out.to.more.challenging.for.man
3d8c0 79 20 75 73 65 72 73 20 74 68 61 6e 20 49 20 68 61 64 0a 68 6f 70 65 64 2e 20 20 49 20 61 6d 20 y.users.than.I.had.hoped...I.am.
3d8e0 74 72 79 69 6e 67 20 74 6f 20 63 6f 75 6e 74 65 72 20 74 68 61 74 20 62 79 20 70 72 6f 76 69 64 trying.to.counter.that.by.provid
3d900 69 6e 67 20 64 65 74 61 69 6c 65 64 20 69 6e 73 74 72 75 63 74 69 6f 6e 73 0a 74 68 61 74 20 63 ing.detailed.instructions.that.c
3d920 6f 76 65 72 20 6e 6f 74 20 6a 75 73 74 20 74 68 65 20 68 61 70 70 79 20 70 61 74 68 20 62 75 74 over.not.just.the.happy.path.but
3d940 20 61 6c 73 6f 20 6d 61 6e 79 20 6f 66 20 74 68 65 20 69 73 73 75 65 73 20 75 73 65 72 73 0a 68 .also.many.of.the.issues.users.h
3d960 61 76 65 20 72 61 6e 20 69 6e 74 6f 20 69 6e 20 74 68 65 20 70 61 73 74 2e 20 20 54 68 65 20 72 ave.ran.into.in.the.past...The.r
3d980 65 63 6f 6d 6d 65 6e 64 65 64 20 72 65 61 64 69 6e 67 20 69 73 20 6c 6f 6e 67 65 72 20 74 68 61 ecommended.reading.is.longer.tha
3d9a0 6e 20 6f 6e 65 0a 6d 69 67 68 74 20 77 69 73 68 2c 20 62 75 74 20 73 6b 69 70 70 69 6e 67 20 69 n.one.might.wish,.but.skipping.i
3d9c0 74 20 64 6f 65 73 20 6e 6f 74 20 6e 65 63 65 73 73 61 72 69 6c 79 20 73 61 76 65 20 74 69 6d 65 t.does.not.necessarily.save.time
3d9e0 2e 0a 0a 20 20 20 46 6f 72 67 65 20 75 73 65 73 20 74 68 65 20 47 68 75 62 20 70 61 63 6b 61 67 ......Forge.uses.the.Ghub.packag
3da00 65 20 74 6f 20 61 63 63 65 73 73 20 74 68 65 20 41 50 49 73 20 6f 66 20 73 75 70 70 6f 72 74 65 e.to.access.the.APIs.of.supporte
3da20 64 20 66 6f 72 67 65 73 2e 0a 48 6f 77 20 74 68 69 73 20 77 6f 72 6b 73 20 61 6e 64 20 68 6f 77 d.forges..How.this.works.and.how
3da40 20 74 6f 20 63 72 65 61 74 65 20 61 6e 64 20 73 74 6f 72 65 20 61 20 74 6f 6b 65 6e 20 69 73 20 .to.create.and.store.a.token.is.
3da60 64 6f 63 75 6d 65 6e 74 65 64 20 69 6e 0a 2a 6e 6f 74 65 20 28 67 68 75 62 29 47 65 74 74 69 6e documented.in.*note.(ghub)Gettin
3da80 67 20 53 74 61 72 74 65 64 3a 3a 2e 20 20 50 6c 65 61 73 65 20 72 65 61 64 20 74 68 61 74 20 69 g.Started::...Please.read.that.i
3daa0 6e 20 66 75 6c 6c 20 62 65 66 6f 72 65 20 63 6f 6d 69 6e 67 0a 62 61 63 6b 20 68 65 72 65 20 61 n.full.before.coming.back.here.a
3dac0 6e 64 20 63 6f 6e 74 69 6e 75 69 6e 67 20 77 69 74 68 20 74 68 65 20 73 75 62 73 65 63 74 69 6f nd.continuing.with.the.subsectio
3dae0 6e 73 20 6c 69 73 74 65 64 20 62 65 6c 6f 77 2e 0a 0a 20 20 20 3c 68 74 74 70 73 3a 2f 2f 67 69 ns.listed.below......<https://gi
3db00 74 68 75 62 2e 63 6f 6d 2f 6d 61 67 69 74 2f 66 6f 72 67 65 2f 77 69 6b 69 3e 20 6c 69 73 74 73 thub.com/magit/forge/wiki>.lists
3db20 20 61 64 64 69 74 69 6f 6e 61 6c 20 72 65 73 6f 75 72 63 65 73 3b 0a 69 6e 63 6c 75 64 69 6e 67 .additional.resources;.including
3db40 20 61 20 6c 69 6e 6b 20 74 6f 20 61 20 6d 75 63 68 20 73 68 6f 72 74 65 72 20 71 75 69 63 6b 2d .a.link.to.a.much.shorter.quick-
3db60 73 74 61 72 74 20 67 75 69 64 65 20 70 72 6f 76 69 64 65 64 20 62 79 20 61 20 75 73 65 72 2e 0a start.guide.provided.by.a.user..
3db80 0a 2a 20 4d 65 6e 75 3a 0a 0a 2a 20 4c 6f 61 64 69 6e 67 20 46 6f 72 67 65 3a 3a 0a 2a 20 54 6f .*.Menu:..*.Loading.Forge::.*.To
3dba0 6b 65 6e 20 43 72 65 61 74 69 6f 6e 3a 3a 0a 2a 20 49 6e 69 74 69 61 6c 20 50 75 6c 6c 3a 3a 0a ken.Creation::.*.Initial.Pull::.
3dbc0 2a 20 52 65 70 6f 73 69 74 6f 72 79 20 44 65 74 65 63 74 69 6f 6e 3a 3a 0a 2a 20 43 61 76 65 61 *.Repository.Detection::.*.Cavea
3dbe0 74 73 3a 3a 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 ts::....File:.forge.info,..Node:
3dc00 20 4c 6f 61 64 69 6e 67 20 46 6f 72 67 65 2c 20 20 4e 65 78 74 3a 20 54 6f 6b 65 6e 20 43 72 65 .Loading.Forge,..Next:.Token.Cre
3dc20 61 74 69 6f 6e 2c 20 20 55 70 3a 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 0a 0a 33 2e 31 ation,..Up:.Getting.Started..3.1
3dc40 20 4c 6f 61 64 69 6e 67 20 46 6f 72 67 65 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d .Loading.Forge.=================
3dc60 0a 0a 4c 6f 61 64 69 6e 67 20 4d 61 67 69 74 20 64 6f 65 73 6e e2 80 99 74 20 63 61 75 73 65 20 ..Loading.Magit.doesn...t.cause.
3dc80 46 6f 72 67 65 20 74 6f 20 62 65 20 6c 6f 61 64 65 64 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 Forge.to.be.loaded.automatically
3dca0 2e 20 20 41 64 64 69 6e 67 0a 73 6f 6d 65 74 68 69 6e 67 20 6c 69 6b 65 20 74 68 69 73 20 74 6f ...Adding.something.like.this.to
3dcc0 20 79 6f 75 72 20 69 6e 69 74 20 66 69 6c 65 20 74 61 6b 65 73 20 63 61 72 65 20 6f 66 20 74 68 .your.init.file.takes.care.of.th
3dce0 61 74 3a 0a 0a 20 20 20 20 20 28 77 69 74 68 2d 65 76 61 6c 2d 61 66 74 65 72 2d 6c 6f 61 64 20 at:.......(with-eval-after-load.
3dd00 27 6d 61 67 69 74 0a 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 29 29 0a 'magit........(require.'forge)).
3dd20 0a 4f 72 20 69 66 20 79 6f 75 20 75 73 65 20 e2 80 98 75 73 65 2d 70 61 63 6b 61 67 65 e2 80 99 .Or.if.you.use....use-package...
3dd40 3a 0a 0a 20 20 20 20 20 28 75 73 65 2d 70 61 63 6b 61 67 65 20 66 6f 72 67 65 0a 20 20 20 20 20 :.......(use-package.forge......
3dd60 20 20 3a 61 66 74 65 72 20 6d 61 67 69 74 29 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 ..:after.magit)....File:.forge.i
3dd80 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 54 6f 6b 65 6e 20 43 72 65 61 74 69 6f 6e 2c 20 20 4e 65 78 nfo,..Node:.Token.Creation,..Nex
3dda0 74 3a 20 49 6e 69 74 69 61 6c 20 50 75 6c 6c 2c 20 20 50 72 65 76 3a 20 4c 6f 61 64 69 6e 67 20 t:.Initial.Pull,..Prev:.Loading.
3ddc0 46 6f 72 67 65 2c 20 20 55 70 3a 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 0a 0a 33 2e 32 Forge,..Up:.Getting.Started..3.2
3dde0 20 54 6f 6b 65 6e 20 43 72 65 61 74 69 6f 6e 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d .Token.Creation.================
3de00 3d 3d 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 61 67 65 20 ==..Forge.uses.the.Ghub.package.
3de20 74 6f 20 61 63 63 65 73 73 20 74 68 65 20 41 50 49 73 20 6f 66 20 73 75 70 70 6f 72 74 65 64 20 to.access.the.APIs.of.supported.
3de40 47 69 74 20 66 6f 72 67 65 73 2e 0a 48 6f 77 20 74 68 69 73 20 77 6f 72 6b 73 20 61 6e 64 20 68 Git.forges..How.this.works.and.h
3de60 6f 77 20 74 6f 20 63 72 65 61 74 65 20 61 6e 64 20 73 74 6f 72 65 20 61 20 74 6f 6b 65 6e 20 69 ow.to.create.and.store.a.token.i
3de80 73 20 64 6f 63 75 6d 65 6e 74 65 64 20 69 6e 0a 2a 6e 6f 74 65 20 28 67 68 75 62 29 47 65 74 74 s.documented.in.*note.(ghub)Gett
3dea0 69 6e 67 20 53 74 61 72 74 65 64 3a 3a 2e 0a 0a 20 20 20 47 68 75 62 20 75 73 65 64 20 74 6f 20 ing.Started::......Ghub.used.to.
3dec0 70 72 6f 76 69 64 65 20 61 20 73 65 74 75 70 20 77 69 7a 61 72 64 2c 20 62 75 74 20 74 68 61 74 provide.a.setup.wizard,.but.that
3dee0 20 68 61 64 20 74 6f 20 62 65 20 72 65 6d 6f 76 65 64 20 66 6f 72 0a 72 65 61 73 6f 6e 73 20 67 .had.to.be.removed.for.reasons.g
3df00 69 76 65 6e 20 69 6e 20 74 68 65 20 6d 61 6e 75 61 6c 20 6a 75 73 74 20 6d 65 6e 74 69 6f 6e 65 iven.in.the.manual.just.mentione
3df20 64 2e 20 20 4e 6f 77 61 64 61 79 73 20 74 68 65 72 65 20 69 73 20 6e 6f 20 77 61 79 0a 61 72 6f d...Nowadays.there.is.no.way.aro
3df40 75 6e 64 20 72 65 61 64 69 6e 67 20 74 68 65 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 61 6e und.reading.the.documentation.an
3df60 64 20 64 6f 69 6e 67 20 74 68 69 73 20 6d 61 6e 75 61 6c 6c 79 20 49 20 61 6d 20 61 66 72 61 69 d.doing.this.manually.I.am.afrai
3df80 64 2e 0a 0a 20 20 20 46 6f 72 67 65 20 72 65 71 75 69 72 65 73 20 74 68 65 20 66 6f 6c 6c 6f 77 d......Forge.requires.the.follow
3dfa0 69 6e 67 20 74 6f 6b 65 6e 20 73 63 6f 70 65 73 2e 0a 0a 20 20 20 e2 80 a2 20 46 6f 72 20 47 69 ing.token.scopes..........For.Gi
3dfc0 74 68 75 62 20 74 68 65 73 65 20 73 63 6f 70 65 73 20 61 72 65 20 72 65 71 75 69 72 65 64 2e 0a thub.these.scopes.are.required..
3dfe0 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 e2 80 98 72 65 70 6f e2 80 99 20 67 72 61 6e 74 73 20 66 ................repo....grants.f
3e000 75 6c 6c 20 72 65 61 64 2f 77 72 69 74 65 20 61 63 63 65 73 73 20 74 6f 20 70 72 69 76 61 74 65 ull.read/write.access.to.private
3e020 20 61 6e 64 20 70 75 62 6c 69 63 0a 20 20 20 20 20 20 20 20 20 20 72 65 70 6f 73 69 74 6f 72 69 .and.public...........repositori
3e040 65 73 2e 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 e2 80 98 75 73 65 72 e2 80 99 20 67 72 61 6e 74 es.................user....grant
3e060 73 20 61 63 63 65 73 73 20 74 6f 20 70 72 6f 66 69 6c 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e s.access.to.profile.information.
3e080 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 e2 80 98 72 65 61 64 3a 6f 72 67 e2 80 99 20 67 72 61 6e ................read:org....gran
3e0a0 74 73 20 72 65 61 64 2d 6f 6e 6c 79 20 61 63 63 65 73 73 20 74 6f 20 6f 72 67 61 6e 69 7a 61 74 ts.read-only.access.to.organizat
3e0c0 69 6f 6e 20 6d 65 6d 62 65 72 73 68 69 70 2e 0a 0a 20 20 20 20 20 4d 6f 72 65 20 69 6e 66 6f 72 ion.membership........More.infor
3e0e0 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 74 68 65 73 65 20 61 6e 64 20 6f 74 68 65 72 20 73 63 6f mation.about.these.and.other.sco
3e100 70 65 73 20 63 61 6e 20 62 65 20 66 6f 75 6e 64 20 61 74 0a 20 20 20 20 20 3c 68 74 74 70 73 3a pes.can.be.found.at......<https:
3e120 2f 2f 64 6f 63 73 2e 67 69 74 68 75 62 2e 63 6f 6d 2f 65 6e 2f 64 65 76 65 6c 6f 70 65 72 73 2f //docs.github.com/en/developers/
3e140 61 70 70 73 2f 73 63 6f 70 65 73 2d 66 6f 72 2d 6f 61 75 74 68 2d 61 70 70 73 3e 2e 0a 0a 20 20 apps/scopes-for-oauth-apps>.....
3e160 20 e2 80 a2 20 46 6f 72 20 47 69 74 6c 61 62 20 69 6e 73 74 61 6e 63 65 73 20 e2 80 98 61 70 69 .....For.Gitlab.instances....api
3e180 e2 80 99 20 69 73 20 74 68 65 20 6f 6e 6c 79 20 72 65 71 75 69 72 65 64 20 73 63 6f 70 65 2e 20 ....is.the.only.required.scope..
3e1a0 20 49 74 20 67 69 76 65 73 0a 20 20 20 20 20 72 65 61 64 20 61 6e 64 20 77 72 69 74 65 20 61 63 .It.gives......read.and.write.ac
3e1c0 63 65 73 73 20 74 6f 20 65 76 65 72 79 74 68 69 6e 67 2e 20 20 54 68 65 20 47 69 74 6c 61 62 20 cess.to.everything...The.Gitlab.
3e1e0 41 50 49 20 70 72 6f 76 69 64 65 73 20 6d 6f 72 65 0a 20 20 20 20 20 66 69 6e 65 2d 67 72 61 69 API.provides.more......fine-grai
3e200 6e 65 64 20 73 63 6f 70 65 73 20 66 6f 72 20 72 65 61 64 2d 6f 6e 6c 79 20 61 63 63 65 73 73 2c ned.scopes.for.read-only.access,
3e220 20 62 75 74 20 77 68 65 6e 20 61 6e 79 20 77 72 69 74 65 20 61 63 63 65 73 73 0a 20 20 20 20 20 .but.when.any.write.access......
3e240 61 74 20 61 6c 6c 20 69 73 20 72 65 71 75 69 72 65 64 2c 20 74 68 65 6e 20 69 74 20 69 73 20 61 at.all.is.required,.then.it.is.a
3e260 6c 6c 20 6f 72 20 6e 6f 74 68 69 6e 67 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e ll.or.nothing.....File:.forge.in
3e280 66 6f 2c 20 20 4e 6f 64 65 3a 20 49 6e 69 74 69 61 6c 20 50 75 6c 6c 2c 20 20 4e 65 78 74 3a 20 fo,..Node:.Initial.Pull,..Next:.
3e2a0 52 65 70 6f 73 69 74 6f 72 79 20 44 65 74 65 63 74 69 6f 6e 2c 20 20 50 72 65 76 3a 20 54 6f 6b Repository.Detection,..Prev:.Tok
3e2c0 65 6e 20 43 72 65 61 74 69 6f 6e 2c 20 20 55 70 3a 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 en.Creation,..Up:.Getting.Starte
3e2e0 64 0a 0a 33 2e 33 20 49 6e 69 74 69 61 6c 20 50 75 6c 6c 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d d..3.3.Initial.Pull.============
3e300 3d 3d 3d 3d 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 20 ====..To.start.using.Forge.in.a.
3e320 63 65 72 74 61 69 6e 20 72 65 70 6f 73 69 74 6f 72 79 20 76 69 73 69 74 20 74 68 65 20 4d 61 67 certain.repository.visit.the.Mag
3e340 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 73 69 it.status.buffer.for.that.reposi
3e360 74 6f 72 79 20 61 6e 64 20 74 79 70 65 20 e2 80 98 66 20 6e e2 80 99 20 28 e2 80 98 66 6f 72 67 tory.and.type....f.n....(...forg
3e380 65 2d 70 75 6c 6c e2 80 99 29 2e 0a 41 6c 74 65 72 6e 61 74 69 76 65 6c 79 2c 20 79 6f 75 20 63 e-pull...)..Alternatively,.you.c
3e3a0 61 6e 20 75 73 65 20 e2 80 98 4d 2d 78 20 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f an.use....M-x.forge-add-reposito
3e3c0 72 79 e2 80 99 2c 20 77 68 69 63 68 20 6d 61 6b 65 73 20 69 74 0a 70 6f 73 73 69 62 6c 65 20 74 ry...,.which.makes.it.possible.t
3e3e0 6f 20 61 64 64 20 61 20 66 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 20 77 69 74 68 6f 75 74 o.add.a.forge.repository.without
3e400 20 70 75 6c 6c 69 6e 67 20 61 6c 6c 20 74 6f 70 69 63 73 20 61 6e 64 20 65 76 65 6e 0a 77 69 74 .pulling.all.topics.and.even.wit
3e420 68 6f 75 74 20 68 61 76 69 6e 67 20 74 6f 20 63 6c 6f 6e 65 20 74 68 65 20 72 65 73 70 65 63 74 hout.having.to.clone.the.respect
3e440 69 76 65 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a 20 20 20 59 6f 75 20 6d 75 73 74 ive.Git.repository......You.must
3e460 20 73 65 74 20 75 70 20 61 20 74 6f 6b 65 6e 20 2a 62 65 66 6f 72 65 2a 20 79 6f 75 20 63 61 6e .set.up.a.token.*before*.you.can
3e480 20 61 64 64 20 74 68 65 20 66 69 72 73 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 53 65 65 20 2a .add.the.first.repository..See.*
3e4a0 6e 6f 74 65 20 54 6f 6b 65 6e 20 43 72 65 61 74 69 6f 6e 3a 3a 2e 0a 0a 20 20 20 54 68 65 20 66 note.Token.Creation::......The.f
3e4c0 69 72 73 74 20 74 69 6d 65 20 e2 80 98 66 6f 72 67 65 2d 70 75 6c 6c e2 80 99 20 69 73 20 72 75 irst.time....forge-pull....is.ru
3e4e0 6e 20 69 6e 20 61 20 72 65 70 6f 73 69 74 6f 72 79 2c 20 61 6e 20 65 6e 74 72 79 20 66 6f 72 20 n.in.a.repository,.an.entry.for.
3e500 74 68 61 74 0a 72 65 70 6f 73 69 74 6f 72 79 20 69 73 20 61 64 64 65 64 20 74 6f 20 74 68 65 20 that.repository.is.added.to.the.
3e520 64 61 74 61 62 61 73 65 20 61 6e 64 20 61 20 6e 65 77 20 76 61 6c 75 65 20 69 73 20 61 64 64 65 database.and.a.new.value.is.adde
3e540 64 20 74 6f 20 74 68 65 20 47 69 74 0a 76 61 72 69 61 62 6c 65 20 e2 80 98 72 65 6d 6f 74 65 2e d.to.the.Git.variable....remote.
3e560 3c 72 65 6d 6f 74 65 3e 2e 66 65 74 63 68 e2 80 99 2c 20 77 68 69 63 68 20 66 65 74 63 68 65 73 <remote>.fetch...,.which.fetches
3e580 20 61 6c 6c 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e 0a 28 e2 80 98 2b 72 65 66 73 2f 70 75 .all.pull-requests..(...+refs/pu
3e5a0 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
3e5c0 20 47 69 74 68 75 62 29 0a 0a 20 20 20 e2 80 98 66 6f 72 67 65 2d 70 75 6c 6c e2 80 99 20 74 68 .Github)........forge-pull....th
3e5e0 65 6e 20 66 65 74 63 68 65 73 20 74 6f 70 69 63 73 20 61 6e 64 20 6f 74 68 65 72 20 69 6e 66 6f en.fetches.topics.and.other.info
3e600 72 6d 61 74 69 6f 6e 20 75 73 69 6e 67 20 74 68 65 0a 66 6f 72 67 65 e2 80 99 73 20 41 50 49 20 rmation.using.the.forge...s.API.
3e620 61 6e 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 72 65 66 65 72 65 6e 63 65 73 20 75 73 69 6e and.pull-request.references.usin
3e640 67 20 47 69 74 2e 0a 0a 20 20 20 54 68 65 20 69 6e 69 74 69 61 6c 20 66 65 74 63 68 20 63 61 6e g.Git......The.initial.fetch.can
3e660 20 74 61 6b 65 20 61 20 77 68 69 6c 65 20 62 75 74 20 6d 6f 73 74 20 6f 66 20 74 68 61 74 20 69 .take.a.while.but.most.of.that.i
3e680 73 20 64 6f 6e 65 0a 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 s.done.asynchronously...Storing.
3e6a0 74 68 65 20 69 6e 66 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 the.information.in.the.database.
3e6c0 69 73 20 64 6f 6e 65 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 is.done.synchronously.though,.so
3e6e0 20 74 68 65 72 65 20 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 .there.can.be.a.noticeable.hang.
3e700 61 74 20 74 68 65 20 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 at.the.end..Subsequent.fetches.a
3e720 72 65 20 6d 75 63 68 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 re.much.faster......Fetching.iss
3e740 75 65 73 20 66 72 6f 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 ues.from.Github.is.much.faster.t
3e760 68 61 6e 20 66 65 74 63 68 69 6e 67 20 66 72 6f 6d 20 6f 74 68 65 72 0a 66 6f 72 67 65 73 20 62 han.fetching.from.other.forges.b
3e780 65 63 61 75 73 65 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 ecause.making.a.handful.of.Graph
3e7a0 51 4c 20 72 65 71 75 65 73 74 73 20 69 73 20 6d 75 63 68 20 66 61 73 74 65 72 20 74 68 61 6e 0a QL.requests.is.much.faster.than.
3e7c0 6d 61 6b 69 6e 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 making.hundreds.of.REST.requests
3e7e0 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 52 65 .....File:.forge.info,..Node:.Re
3e800 70 6f 73 69 74 6f 72 79 20 44 65 74 65 63 74 69 6f 6e 2c 20 20 4e 65 78 74 3a 20 43 61 76 65 61 pository.Detection,..Next:.Cavea
3e820 74 73 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 47 65 ts,..Prev:.Initial.Pull,..Up:.Ge
3e840 74 74 69 6e 67 20 53 74 61 72 74 65 64 0a 0a 33 2e 34 20 52 65 70 6f 73 69 74 6f 72 79 20 44 65 tting.Started..3.4.Repository.De
3e860 74 65 63 74 69 6f 6e 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 tection.========================
3e880 0a 0a 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 ..Ghub.does.*not*.associate.a.gi
3e8a0 76 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 ven.local.repository.with.a.repo
3e8c0 73 69 74 6f 72 79 20 6f 6e 0a 61 20 66 6f 72 67 65 2e 20 20 54 68 65 20 46 6f 72 67 65 20 70 61 sitory.on.a.forge...The.Forge.pa
3e8e0 63 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 ckage.itself.takes.care.of.this.
3e900 20 20 49 6e 20 64 6f 69 6e 67 20 73 6f 20 69 74 0a 69 67 6e 6f 72 65 73 20 74 68 65 20 47 69 74 ..In.doing.so.it.ignores.the.Git
3e920 20 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 .variable....ghub.host....and.ot
3e940 68 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 20 75 73 65 64 0a her....*.host....variables.used.
3e960 62 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 by.Ghub...(But....github.user...
3e980 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
3e9a0 63 69 66 79 20 74 68 65 0a 75 73 65 72 20 61 72 65 20 68 6f 6e 6f 72 65 64 29 2e 0a 0a 20 20 20 cify.the.user.are.honored)......
3e9c0 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 73 Forge.associates.the.local.repos
3e9e0 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 20 62 79 itory.with.a.forge.repository.by
3ea00 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 65 20 .first.determining.which.remote.
3ea20 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 6d 0a is.associated.with.the.upstream.
3ea40 72 65 70 6f 73 69 74 6f 72 79 20 61 6e 64 20 74 68 65 6e 20 6c 6f 6f 6b 69 6e 67 20 74 68 61 74 repository.and.then.looking.that
3ea60 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 20 49 66 .up.in....forge-alist.........If
3ea80 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 20 46 6f .only.one.remote.exists,.then.Fo
3eaa0 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 2e 20 20 rge.uses.that.unconditionally...
3eac0 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 72 74 20 To.reduce.the.number.of.support.
3eae0 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 73 65 20 requests,.this.is.even.the.case.
3eb00 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 72 65 6d if.the.Git.variable....forge.rem
3eb20 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 73 74 65 ote....names.another,.non-existe
3eb40 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 6d 6f 74 nt,.remote......If.several.remot
3eb60 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 65 20 73 es.exist,.then.a.remote.may.be.s
3eb80 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 6c 6d 6f elected.based.on.its.name...Almo
3eba0 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 65 20 64 st.always.we.want.to.fetch.the.d
3ebc0 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 65 61 6d ata.associated.with.the.upstream
3ebe0 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 74 68 65 .repository,.so.that.is.what.the
3ec00 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 6f 0a 61 .logic.described.here.tries.to.a
3ec20 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 20 6e 61 chieve...The.convention.is.to.na
3ec40 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 6e 22 2c me.the.upstream.remote."origin",
3ec60 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 75 6e 69 .and.if.that.convention.were.uni
3ec80 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 73 20 77 versally.followed,.then.things.w
3eca0 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 20 70 65 ould.be.trivial..However.many.pe
3ecc0 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 20 22 75 ople.name.the.upstream.remote."u
3ece0 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 6e 73 65 pstream",.which.also.makes.sense
3ed00 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 76 65 6e ........Note,.however,.that.even
3ed20 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 66 20 70 .though.a.surprising.number.of.p
3ed40 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 6f 65 73 eople.do......just.that,.it.does
3ed60 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 65 20 6e .not.make.any.sense.to.use.the.n
3ed80 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 20 61 20 ame."origin".to......refer.to.a.
3eda0 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 72 6b 2e fork;.not.even.to.your.own.fork.
3edc0 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 74 68 65 ..A.fork.is.a.*copy*.of......the
3ede0 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 79 6d 20 .original,."copy".is.an.antonym.
3ee00 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 20 20 20 for."original",.and.the.word....
3ee20 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 79 20 72 .."origin".is.not.only.closely.r
3ee40 65 6c 61 74 65 64 20 74 6f 20 62 75 74 20 65 76 65 6e 20 63 6f 6e 74 61 69 6e 65 64 20 69 6e 20 elated.to.but.even.contained.in.
3ee60 74 68 65 0a 20 20 20 20 20 77 6f 72 64 20 22 6f 72 69 67 69 6e 61 6c 22 2e 20 20 4e 61 6d 69 6e the......word."original"...Namin
3ee80 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 74 20 62 65 73 74 g.a.fork.the."origin".is.at.best
3eea0 20 65 78 74 72 65 6d 65 6c 79 0a 20 20 20 20 20 63 6f 6e 66 75 73 69 6e 67 2e 0a 0a 20 20 20 20 .extremely......confusing.......
3eec0 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 64 65 20 74 6f 20 .copy...........a.thing.made.to.
3eee0 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 20 61 6e 6f 74 68 be.similar.or.identical.to.anoth
3ef00 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 20 20 20 74 68 65 er........original...........the
3ef20 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 67 2c 20 66 72 6f .earliest.form.of.something,.fro
3ef40 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 2e 0a 0a 20 20 20 m.which.copies.may.be.made......
3ef60 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 6e 74 20 6f 72 20 ..origin...........the.point.or.
3ef80 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 6e 73 2c 20 61 72 place.where.something.begins,.ar
3efa0 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 76 65 64 2e 0a 0a ises,.or.is...........derived...
3efc0 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 74 2c 20 74 68 65 ...If.several.remotes.exist,.the
3efe0 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 65 73 20 61 72 65 n.the.following.remote.names.are
3f000 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 72 73 74 20 72 65 .tried.in.order.and.the.first.re
3f020 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 73 20 69 6e 20 74 mote.thus.named.that.exists.in.t
3f040 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 31 2e 20 54 68 65 he.repository.is.used.....1..The
3f060 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 20 e2 80 98 66 6f .value.of.the.Git.variable....fo
3f080 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 20 74 68 65 0a 20 rge.remote...,.if.set...If.the..
3f0a0 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 75 74 20 6e 6f 20 ....variable.has.a.value.but.no.
3f0c0 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 6d 65 20 65 78 69 remote.by.the.specified.name.exi
3f0e0 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 73 20 73 68 6f 77 sts,......then.a.warning.is.show
3f100 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 6c 69 63 74 20 69 n,.but.otherwise.this.conflict.i
3f120 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 69 6f 72 20 69 73 s.ignored.......This.behavior.is
3f140 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 68 69 73 74 6f 72 .arguably.odd,.but.due.to.histor
3f160 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 6f 6e 73 20 69 74 ic.and.pragmatic......reasons.it
3f180 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 20 66 6f 72 77 61 .is.the.least.painful.path.forwa
3f1a0 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 20 e2 80 98 75 70 rd.....2..The.remote.named....up
3f1c0 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 20 20 33 2e 20 54 stream...,.if.it.exists.....3..T
3f1e0 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 80 99 2c 20 69 66 he.remote.named....origin...,.if
3f200 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 20 6e 61 6d 65 64 .it.exists......The.remote.named
3f220 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 76 65 72 20 74 68 ."upstream".is.preferred.over.th
3f240 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 63 61 75 73 65 20 e.remote.named."origin".because.
3f260 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 72 20 73 74 72 6f the.existence.of.the.former.stro
3f280 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 74 65 72 20 69 73 ngly.suggests.that.the.latter.is
3f2a0 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 65 70 6f 73 69 74 .either.not.used.in.this.reposit
3f2c0 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 65 72 0a 64 6f 65 ory.(in.which.case.the.order.doe
3f2e0 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 73 20 61 62 75 73 s.not.matter).or.else.it.is.abus
3f300 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 69 6e 20 77 68 69 ed.as.the.name.of.a.fork.(in.whi
3f320 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 20 70 72 65 66 65 ch.case."upstream".must.be.prefe
3f340 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 65 2e 72 65 6d 6f rred)....--.Variable:.forge.remo
3f360 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 76 61 72 69 61 62 te......The.value.of.this.variab
3f380 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 6f 6d 20 77 68 69 le.specifies.the.remote.from.whi
3f3a0 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 2e 20 20 49 74 20 ch.Forge......fetches.data...It.
3f3c0 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 68 69 73 20 75 6e is.usually.best.to.leave.this.un
3f3e0 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 20 6f 6e 20 74 68 specified.and.to......rely.on.th
3f400 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 2e 0a 0a 20 20 20 e.behavior.described.above......
3f420 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 73 70 65 63 69 66 ..If.the.remote.has.to.be.specif
3f440 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 73 68 6f 75 6c 64 ied.explicitly,.then.this.should
3f460 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 20 61 20 73 69 6e .be......done.locally,.for.a.sin
3f480 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 20 65 76 65 72 20 gle.repository........Only.ever.
3f4a0 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 63 6f 6e 73 69 73 set.this.globally,.if.you.consis
3f4c0 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 20 20 20 20 20 74 tently.use.a.certain.name......t
3f4e0 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 70 6f 73 69 74 6f o.refer.to.the.upstream.reposito
3f500 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 75 70 73 74 72 65 ry.and.it.isn...t.one.of."upstre
3f520 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 79 6f 75 20 2a 6e am"......or."origin",.and.you.*n
3f540 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 65 72 20 74 6f 20 ever*.use.that.name.to.refer.to.
3f560 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 73 20 2a 6e 6f 74 a.repository......that.does.*not
3f580 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 70 6f 73 69 74 6f *.refer.to.the.upstream.reposito
3f5a0 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 6f 72 67 65 2e 72 ry......N.r....(...forge-forge.r
3f5c0 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 64 20 63 68 61 6e emote...)......This.command.chan
3f5e0 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 72 67 65 2e 72 65 ges.the.value.of.the....forge.re
3f600 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 69 6e 20 74 68 65 mote....Git.variable......in.the
3f620 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 66 20 74 68 69 73 .current.repository......If.this
3f640 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 67 65 20 75 73 65 .variable.is.set,.then.Forge.use
3f660 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 20 69 66 0a 69 74 s.the.remote.by.that.name,.if.it
3f680 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 61 79 20 68 61 76 .exists,.the.same.way.it.may.hav
3f6a0 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 20 74 68 65 20 76 e.used....origin....if.the.the.v
3f6c0 61 72 69 61 62 6c 65 0a 77 65 72 65 20 75 6e 64 65 66 69 6e 65 64 2e 20 20 49 2e 65 2e 2c 20 69 ariable.were.undefined...I.e.,.i
3f6e0 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 20 e2 t.does.not.fall.through.to.try..
3f700 80 98 6f 72 69 67 69 6e e2 80 99 20 69 66 20 6e 6f 0a 72 65 6d 6f 74 65 20 62 79 20 79 6f 75 72 ..origin....if.no.remote.by.your
3f720 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 74 68 .chosen.name.exists......Once.th
3f740 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 65 72 e.upstream.remote.has.been.deter
3f760 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 98 66 mined,.Forge.looks.it.up.in....f
3f780 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 70 61 orge-alist...,.using.the.host.pa
3f7a0 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 20 65 rt.of.the.URL.as.the.key...For.e
3f7c0 78 61 6d 70 6c 65 0a 74 68 65 20 6b 65 79 20 66 6f 72 20 e2 80 98 67 69 74 40 67 69 74 68 75 62 xample.the.key.for....git@github
3f7e0 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 98 67 69 .com:magit/forge.git....is....gi
3f800 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 3a 20 66 thub.com.......--.User.Option:.f
3f820 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 65 66 69 orge-alist......This.option.defi
3f840 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 65 2e 0a nes.forge.hosts.known.to.Forge..
3f860 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 20 e2 80 ......Each.entry.has.the.form...
3f880 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 53 53 29 .(GITHOST.APIHOST.WEBHOST.CLASS)
3f8a0 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 74 68 65 ..................GITHOST.is.the
3f8c0 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 72 69 65 .host.used.to.access.repositorie
3f8e0 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 67 20 47 s.on.the.forge...........using.G
3f900 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 68 65 20 it...............APIHOST.is.the.
3f920 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 e2 80 99 host.used.to.access.the.forge...
3f940 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 72 67 65 s.API...For.some...........forge
3f960 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 74 20 61 s.the.isn...t.just.a.host,.but.a
3f980 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 20 20 20 .host.followed.by.the.path......
3f9a0 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 0a 0a 20 .....to.the.API...s.endpoint....
3f9c0 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 74 20 75 ...........WEBHOST.is.the.host.u
3f9e0 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 68 sed.to.access.repositories.on.th
3fa00 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 6f 77 73 is.forge...........using.a.brows
3fa20 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 20 72 65 er...The.IDs.used.to.identify.re
3fa40 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 20 66 6f positories.from...........the.fo
3fa60 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 6f 20 64 rge.in.the.local.database.also.d
3fa80 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 20 20 20 erives.from.this.value..........
3faa0 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 20 75 73 .....CLASS.is.the.class.to.be.us
3fac0 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 66 6f 72 ed.for.repositories.from.the.for
3fae0 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 20 20 20 ge........Complications:........
3fb00 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 74 68 75 ......When.connecting.to.a.Githu
3fb20 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 53 54 0a b.Enterprise.edition.whose.REST.
3fb40 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 73 20 22 ..........API...s.end.point.is."
3fb60 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 41 50 49 <host>/v3".and.whose.GraphQL.API
3fb80 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 3c 68 6f ...s.end...........point.is."<ho
3fba0 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 3e 2f 76 st>/graphql",.then.use."<host>/v
3fbc0 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 20 69 73 3".as.APIHOST............This.is
3fbe0 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 73 75 65 .a.historic.accident...See.issue
3fc00 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 6e 64 20 .#174...............WEBHOST.and.
3fc20 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 79 6f 75 CLASS.cannot.be.changed.once.you
3fc40 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 6d 6f 72 .have.added.one.or...........mor
3fc60 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 20 43 68 e.repositories.from.a.forge...Ch
3fc80 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 20 20 20 anging.GITHOST.and/or...........
3fca0 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 73 68 6f APIHOST.may.be.possible,.but.sho
3fcc0 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 69 6c 65 uld.seldom.be.necessary.....File
3fce0 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 43 61 76 65 61 74 73 2c 20 20 50 :.forge.info,..Node:.Caveats,..P
3fd00 72 65 76 3a 20 52 65 70 6f 73 69 74 6f 72 79 20 44 65 74 65 63 74 69 6f 6e 2c 20 20 55 70 3a 20 rev:.Repository.Detection,..Up:.
3fd20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 0a 0a 33 2e 35 20 43 61 76 65 61 74 73 0a 3d 3d 3d Getting.Started..3.5.Caveats.===
3fd40 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 20 20 20 e2 80 a2 20 46 65 74 63 68 65 64 20 69 6e 66 6f 72 6d 61 ========.........Fetched.informa
3fd60 74 69 6f 6e 20 69 73 20 73 74 6f 72 65 64 20 69 6e 20 61 20 64 61 74 61 62 61 73 65 2e 20 20 54 tion.is.stored.in.a.database...T
3fd80 68 65 20 74 61 62 6c 65 20 73 63 68 65 6d 61 74 61 20 6f 66 0a 20 20 20 20 20 74 68 61 74 20 64 he.table.schemata.of......that.d
3fda0 61 74 61 62 61 73 65 20 68 61 76 65 20 6e 6f 74 20 62 65 65 6e 20 66 69 6e 61 6c 69 7a 65 64 20 atabase.have.not.been.finalized.
3fdc0 79 65 74 2e 20 20 55 6e 74 69 6c 20 74 68 61 74 20 68 61 73 20 68 61 70 70 65 6e 65 64 0a 20 20 yet...Until.that.has.happened...
3fde0 20 20 20 69 74 20 77 69 6c 6c 20 6f 63 63 61 73 69 6f 6e 61 6c 6c 79 20 68 61 76 65 20 74 6f 20 ...it.will.occasionally.have.to.
3fe00 62 65 20 64 69 73 63 61 72 64 65 64 2e 20 20 54 68 61 74 20 69 73 6e e2 80 99 74 20 73 75 63 68 be.discarded...That.isn...t.such
3fe20 20 61 20 68 75 67 65 0a 20 20 20 20 20 64 65 61 6c 20 62 65 63 61 75 73 65 20 66 6f 72 20 6e 6f .a.huge......deal.because.for.no
3fe40 77 20 74 68 65 20 64 61 74 61 62 61 73 65 20 64 6f 65 73 20 6e 6f 74 20 63 6f 6e 74 61 69 6e 20 w.the.database.does.not.contain.
3fe60 61 6e 79 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 0a 20 20 20 20 20 74 68 61 74 20 63 61 6e 6e 6f 74 any.information......that.cannot
3fe80 20 73 69 6d 70 6c 79 20 62 65 20 66 65 74 63 68 65 64 20 61 67 61 69 6e 2c 20 73 65 65 20 2a 6e .simply.be.fetched.again,.see.*n
3fea0 6f 74 65 20 49 6e 69 74 69 61 6c 20 50 75 6c 6c 3a 3a 2e 0a 0a 20 20 20 e2 80 a2 20 46 65 74 63 ote.Initial.Pull::..........Fetc
3fec0 68 69 6e 67 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 75 6e 64 65 72 20 74 68 65 20 61 73 hing.is.implemented.under.the.as
3fee0 73 75 6d 70 74 69 6f 6e 20 74 68 61 74 20 74 68 65 20 41 50 49 20 63 61 6e 20 62 65 0a 20 20 20 sumption.that.the.API.can.be....
3ff00 20 20 61 73 6b 65 64 20 74 6f 20 6c 69 73 74 20 74 68 65 20 74 68 69 6e 67 73 20 74 68 61 74 20 ..asked.to.list.the.things.that.
3ff20 68 61 76 65 20 63 68 61 6e 67 65 64 20 73 69 6e 63 65 20 77 65 20 6c 61 73 74 20 63 68 65 63 6b have.changed.since.we.last.check
3ff40 65 64 2e 0a 20 20 20 20 20 55 6e 66 6f 72 74 75 6e 61 74 65 6c 79 20 74 68 65 20 41 50 49 73 20 ed.......Unfortunately.the.APIs.
3ff60 61 72 65 20 6e 6f 74 20 62 75 67 2d 66 72 65 65 2c 20 73 6f 20 74 68 69 73 20 69 73 20 6e 6f 74 are.not.bug-free,.so.this.is.not
3ff80 20 61 6c 77 61 79 73 20 74 68 65 0a 20 20 20 20 20 63 61 73 65 2e 20 20 49 66 20 69 6e 20 64 6f .always.the......case...If.in.do
3ffa0 75 62 74 2c 20 74 68 65 6e 20 72 65 2d 66 65 74 63 68 20 61 6e 20 69 6e 64 69 76 69 64 75 61 6c ubt,.then.re-fetch.an.individual
3ffc0 20 74 6f 70 69 63 20 74 6f 20 65 6e 73 75 72 65 20 69 74 0a 20 20 20 20 20 69 73 20 75 70 2d 74 .topic.to.ensure.it......is.up-t
3ffe0 6f 2d 64 61 74 65 20 75 73 69 6e 67 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 e2 80 98 66 6f 72 67 o-date.using.the.command....forg
40000 65 2d 70 75 6c 6c 2d 74 6f 70 69 63 e2 80 99 2e 0a 0a 20 20 20 e2 80 a2 20 53 6f 6d 65 20 6f 74 e-pull-topic.............Some.ot
40020 68 65 72 2c 20 66 6f 72 67 65 2d 73 70 65 63 69 66 69 63 2c 20 63 61 76 65 61 74 73 20 61 72 65 her,.forge-specific,.caveats.are
40040 20 6d 65 6e 74 69 6f 6e 65 64 20 69 6e 20 2a 6e 6f 74 65 0a 20 20 20 20 20 53 75 70 70 6f 72 74 .mentioned.in.*note......Support
40060 65 64 20 46 6f 72 67 65 73 20 61 6e 64 20 48 6f 73 74 73 3a 3a 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 ed.Forges.and.Hosts::.....File:.
40080 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 55 73 61 67 65 2c 20 20 4e 65 78 74 3a forge.info,..Node:.Usage,..Next:
400a0 20 46 41 51 2c 20 20 50 72 65 76 3a 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 2c 20 20 55 .FAQ,..Prev:.Getting.Started,..U
400c0 70 3a 20 54 6f 70 0a 0a 34 20 55 73 61 67 65 0a 2a 2a 2a 2a 2a 2a 2a 0a 0a 4f 6e 63 65 20 69 6e p:.Top..4.Usage.*******..Once.in
400e0 66 6f 72 6d 61 74 69 6f 6e 20 68 61 73 20 62 65 65 6e 20 70 75 6c 6c 65 64 20 66 72 6f 6d 20 61 formation.has.been.pulled.from.a
40100 20 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 73 20 66 6f 72 67 65 20 66 6f 72 20 74 68 65 20 66 69 .repository...s.forge.for.the.fi
40120 72 73 74 0a 74 69 6d 65 2c 20 46 6f 72 67 65 20 61 64 64 73 20 74 77 6f 20 61 64 64 69 74 69 6f rst.time,.Forge.adds.two.additio
40140 6e 61 6c 20 73 65 63 74 69 6f 6e 73 2c 20 6e 61 6d 65 64 20 22 50 75 6c 6c 20 72 65 71 75 65 73 nal.sections,.named."Pull.reques
40160 74 73 22 20 61 6e 64 0a 22 49 73 73 75 65 73 22 20 74 6f 20 4d 61 67 69 74 e2 80 99 73 20 73 74 ts".and."Issues".to.Magit...s.st
40180 61 74 75 73 20 62 75 66 66 65 72 2e 20 20 49 74 20 69 73 20 61 6c 73 6f 20 70 6f 73 73 69 62 6c atus.buffer...It.is.also.possibl
401a0 65 20 74 6f 20 61 64 64 20 61 0a 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 20 74 68 65 20 6c 6f 63 e.to.add.a.repository.to.the.loc
401c0 61 6c 20 64 61 74 61 62 61 73 65 20 77 69 74 68 6f 75 74 20 70 75 6c 6c 69 6e 67 20 61 6c 6c 20 al.database.without.pulling.all.
401e0 74 68 65 20 64 61 74 61 2c 20 77 68 69 63 68 20 69 73 0a 75 73 65 66 75 6c 20 69 66 20 79 6f 75 the.data,.which.is.useful.if.you
40200 20 77 61 6e 74 20 74 6f 20 63 72 65 61 74 65 20 61 20 73 69 6e 67 6c 65 20 70 75 6c 6c 2d 72 65 .want.to.create.a.single.pull-re
40220 71 75 65 73 74 2e 0a 0a e2 80 98 4e 20 61 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 61 64 64 2d quest......N.a....(...forge-add-
40240 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 63 6f 6d 6d 61 6e 64 repository...)......This.command
40260 20 61 64 64 73 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 .adds.a.repository.to.the.databa
40280 73 65 2e 0a 0a 20 20 20 20 20 49 74 20 6f 66 66 65 72 73 20 74 6f 20 65 69 74 68 65 72 20 70 75 se........It.offers.to.either.pu
402a0 6c 6c 20 74 6f 70 69 63 73 20 28 6e 6f 77 20 61 6e 64 20 69 6e 20 74 68 65 20 66 75 74 75 72 65 ll.topics.(now.and.in.the.future
402c0 29 20 6f 72 20 74 6f 20 6f 6e 6c 79 0a 20 20 20 20 20 70 75 6c 6c 20 69 6e 64 69 76 69 64 75 61 ).or.to.only......pull.individua
402e0 6c 20 74 6f 70 69 63 73 20 77 68 65 6e 20 74 68 65 20 75 73 65 72 20 69 6e 76 6f 6b 65 73 20 e2 l.topics.when.the.user.invokes..
40300 80 98 66 6f 72 67 65 2d 70 75 6c 6c 2d 74 6f 70 69 63 e2 80 99 2e 0a 0a 20 20 20 53 6f 6d 65 20 ..forge-pull-topic.........Some.
40320 6f 66 20 46 6f 72 67 65 e2 80 99 73 20 63 6f 6d 6d 61 6e 64 73 20 61 72 65 20 6f 6e 6c 79 20 62 of.Forge...s.commands.are.only.b
40340 6f 75 6e 64 20 77 68 65 6e 20 70 6f 69 6e 74 20 69 73 20 77 69 74 68 69 6e 20 6f 6e 65 20 6f 66 ound.when.point.is.within.one.of
40360 0a 74 68 65 73 65 20 73 65 63 74 69 6f 6e 73 20 62 75 74 20 6f 74 68 65 72 20 63 6f 6d 6d 61 6e .these.sections.but.other.comman
40380 64 73 20 61 72 65 20 61 6c 73 6f 20 61 76 61 69 6c 61 62 6c 65 20 65 6c 73 65 77 68 65 72 65 20 ds.are.also.available.elsewhere.
403a0 69 6e 0a 4d 61 67 69 74 e2 80 99 73 20 73 74 61 74 75 73 20 62 75 66 66 65 72 20 61 6e 64 2f 6f in.Magit...s.status.buffer.and/o
403c0 72 20 66 72 6f 6d 20 4d 61 67 69 74 e2 80 99 73 20 74 72 61 6e 73 69 65 6e 74 20 63 6f 6d 6d 61 r.from.Magit...s.transient.comma
403e0 6e 64 73 2e 0a 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 nds......N....(...forge-dispatch
40400 e2 80 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 69 73 ...)......This.prefix.command.is
40420 20 61 76 61 69 6c 61 62 6c 65 20 69 6e 20 61 6e 79 20 4d 61 67 69 74 20 62 75 66 66 65 72 20 61 .available.in.any.Magit.buffer.a
40440 6e 64 20 70 72 6f 76 69 64 65 73 0a 20 20 20 20 20 61 63 63 65 73 73 20 74 6f 20 73 65 76 65 72 nd.provides......access.to.sever
40460 61 6c 20 6f 66 20 74 68 65 20 61 76 61 69 6c 61 62 6c 65 20 46 6f 72 67 65 20 63 6f 6d 6d 61 6e al.of.the.available.Forge.comman
40480 64 73 2e 20 20 4d 6f 73 74 20 6f 66 20 74 68 65 73 65 0a 20 20 20 20 20 63 6f 6d 6d 61 6e 64 73 ds...Most.of.these......commands
404a0 20 61 72 65 20 61 6c 73 6f 20 62 6f 75 6e 64 20 65 6c 73 65 77 68 65 72 65 2c 20 62 75 74 20 73 .are.also.bound.elsewhere,.but.s
404c0 6f 6d 65 20 61 72 65 20 6e 6f 74 2e 20 20 53 65 65 20 74 68 65 0a 20 20 20 20 20 66 6f 6c 6c 6f ome.are.not...See.the......follo
404e0 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 20 61 62 wing.sections.for.information.ab
40500 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 20 20 20 out.the.available.commands......
40520 20 20 54 68 72 6f 75 67 68 6f 75 74 20 74 68 69 73 20 6d 61 6e 75 61 6c 20 79 6f 75 20 77 69 6c ..Throughout.this.manual.you.wil
40540 6c 20 66 69 6e 64 20 6d 61 6e 79 20 62 69 6e 64 69 6e 67 73 20 74 68 61 74 20 62 65 67 69 6e 20 l.find.many.bindings.that.begin.
40560 77 69 74 68 0a 20 20 20 20 20 e2 80 98 4e e2 80 99 2c 20 62 75 74 20 69 66 20 79 6f 75 20 70 72 with.........N...,.but.if.you.pr
40580 65 66 65 72 20 74 6f 20 63 6f 6e 74 69 6e 75 65 20 74 6f 20 75 73 65 20 e2 80 98 66 6f 72 67 65 efer.to.continue.to.use....forge
405a0 2d 64 69 73 70 61 74 63 68 e2 80 99 e2 80 99 73 20 6f 6c 64 65 72 0a 20 20 20 20 20 62 69 6e 64 -dispatch......s.older......bind
405c0 69 6e 67 20 79 6f 75 20 63 61 6e 20 73 75 62 73 74 69 74 75 74 65 20 e2 80 98 27 e2 80 99 20 66 ing.you.can.substitute....'....f
405e0 6f 72 20 74 68 61 74 2e 0a 0a 2a 20 4d 65 6e 75 3a 0a 0a 2a 20 50 75 6c 6c 69 6e 67 3a 3a 0a 2a or.that...*.Menu:..*.Pulling::.*
40600 20 42 72 61 6e 63 68 69 6e 67 3a 3a 0a 2a 20 57 6f 72 6b 69 6e 67 20 77 69 74 68 20 54 6f 70 69 .Branching::.*.Working.with.Topi
40620 63 73 3a 3a 0a 2a 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 3a 3a 0a 0a 1f 0a 46 69 6c 65 3a 20 cs::.*.Miscellaneous::....File:.
40640 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 50 75 6c 6c 69 6e 67 2c 20 20 4e 65 78 forge.info,..Node:.Pulling,..Nex
40660 74 3a 20 42 72 61 6e 63 68 69 6e 67 2c 20 20 55 70 3a 20 55 73 61 67 65 0a 0a 34 2e 31 20 50 75 t:.Branching,..Up:.Usage..4.1.Pu
40680 6c 6c 69 6e 67 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 54 68 65 20 63 6f 6d 6d 61 6e 64 73 20 lling.===========..The.commands.
406a0 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
406c0 62 6c 65 20 66 72 6f 6d 20 74 68 65 20 73 61 6d 65 20 74 72 61 6e 73 69 65 6e 74 0a 70 72 65 66 ble.from.the.same.transient.pref
406e0 69 78 20 63 6f 6d 6d 61 6e 64 20 28 e2 80 98 6d 61 67 69 74 2d 66 65 74 63 68 e2 80 99 20 6f 6e ix.command.(...magit-fetch....on
40700 20 e2 80 98 66 e2 80 99 29 20 74 68 61 74 20 69 73 20 75 73 65 64 20 74 6f 20 66 65 74 63 68 20 ....f...).that.is.used.to.fetch.
40720 47 69 74 20 64 61 74 61 2e 0a 49 66 20 6f 70 74 69 6f 6e 20 e2 80 98 6d 61 67 69 74 2d 70 75 6c Git.data..If.option....magit-pul
40740 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 20 74 68 65 6e 20 74 l-or-fetch....is.non-nil,.then.t
40760 68 65 79 20 61 72 65 20 61 6c 73 6f 20 61 76 61 69 6c 61 62 6c 65 0a 66 72 6f 6d 20 74 68 65 20 hey.are.also.available.from.the.
40780 e2 80 98 6d 61 67 69 74 2d 70 75 6c 6c e2 80 99 20 74 72 61 6e 73 69 65 6e 74 20 28 6f 6e 20 e2 ...magit-pull....transient.(on..
407a0 80 98 46 e2 80 99 29 2e 0a 0a e2 80 98 66 20 6e e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 70 75 ..F...)......f.n....(...forge-pu
407c0 6c 6c e2 80 99 29 0a e2 80 98 4e 20 66 20 66 e2 80 99 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d ll...)....N.f.f.........This.com
407e0 6d 61 6e 64 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 mand.uses.a.forge...s.API.to.fet
40800 63 68 20 74 6f 70 69 63 73 20 61 6e 64 20 6f 74 68 65 72 0a 20 20 20 20 20 69 6e 66 6f 72 6d 61 ch.topics.and.other......informa
40820 74 69 6f 6e 20 61 62 6f 75 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 tion.about.the.current.repositor
40840 79 20 61 6e 64 20 73 74 6f 72 65 73 20 74 68 65 20 66 65 74 63 68 65 64 0a 20 20 20 20 20 69 6e y.and.stores.the.fetched......in
40860 66 6f 72 6d 61 74 69 6f 6e 20 69 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 20 20 49 74 20 61 formation.in.the.database...It.a
40880 6c 73 6f 20 66 65 74 63 68 65 73 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 66 6f 72 20 61 6c lso.fetches.notifications.for.al
408a0 6c 0a 20 20 20 20 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 66 72 6f 6d 20 74 68 65 20 73 61 6d l......repositories.from.the.sam
408c0 65 20 66 6f 72 67 65 20 68 6f 73 74 2e 20 20 28 43 75 72 72 65 6e 74 6c 79 20 74 68 69 73 20 69 e.forge.host...(Currently.this.i
408e0 73 20 6c 69 6d 69 74 65 64 0a 20 20 20 20 20 74 6f 20 47 69 74 68 75 62 2e 29 20 20 46 69 6e 61 s.limited......to.Github.)..Fina
40900 6c 6c 79 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 lly.it.fetches.pull-request.refe
40920 72 65 6e 63 65 73 20 75 73 69 6e 67 20 47 69 74 2e 0a 0a 20 20 20 20 20 41 66 74 65 72 20 75 73 rences.using.Git........After.us
40940 69 6e 67 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20 66 6f 72 20 74 68 65 20 66 69 72 73 74 20 74 ing.this.command.for.the.first.t
40960 69 6d 65 20 69 6e 20 61 20 67 69 76 65 6e 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 74 ime.in.a.given.repository......t
40980 68 65 20 73 74 61 74 75 73 20 62 75 66 66 65 72 20 66 6f 72 20 74 68 61 74 20 72 65 70 6f 73 69 he.status.buffer.for.that.reposi
409a0 74 6f 72 79 20 61 6c 77 61 79 73 20 6c 69 73 74 73 20 74 68 65 0a 20 20 20 20 20 70 75 6c 6c 2d tory.always.lists.the......pull-
409c0 72 65 71 75 65 73 74 73 20 61 6e 64 20 69 73 73 75 65 73 2e 20 20 53 65 65 20 2a 6e 6f 74 65 20 requests.and.issues...See.*note.
409e0 49 6e 69 74 69 61 6c 20 50 75 6c 6c 3a 3a 2e 0a 0a e2 80 98 66 20 4e e2 80 99 20 28 e2 80 98 66 Initial.Pull::......f.N....(...f
40a00 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 98 4e orge-pull-notifications...)....N
40a20 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 20 61 .f.n.........This.command.uses.a
40a40 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 74 69 .forge...s.API.to.fetch.all.noti
40a60 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 20 69 fications.from......that.forge.i
40a80 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 20 74 68 ncluding,.but.not.limited.to,.th
40aa0 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 66 6f 72 20 74 68 65 0a 20 20 20 20 20 63 75 72 e.notifications.for.the......cur
40ac0 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 6e 67 20 rent.repository........Fetching.
40ae0 61 6c 6c 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 all.notifications.fetches.associ
40b00 61 74 65 64 20 74 6f 70 69 63 73 20 65 76 65 6e 20 69 66 20 79 6f 75 0a 20 20 20 20 20 68 61 76 ated.topics.even.if.you......hav
40b20 65 20 6e 6f 74 20 73 74 61 72 74 65 64 20 66 65 74 63 68 69 6e 67 20 2a 61 6c 6c 2a 20 74 6f 70 e.not.started.fetching.*all*.top
40b40 69 63 73 20 66 6f 72 20 74 68 65 20 72 65 73 70 65 63 74 69 76 65 0a 20 20 20 20 20 72 65 70 6f ics.for.the.respective......repo
40b60 73 69 74 6f 72 69 65 73 20 28 75 73 69 6e 67 20 e2 80 98 66 6f 72 67 65 2d 70 75 6c 6c e2 80 99 sitories.(using....forge-pull...
40b80 29 2c 20 62 75 74 20 69 74 20 64 6f 65 73 20 6e 6f 74 20 63 61 75 73 65 20 74 68 65 20 74 6f 70 ),.but.it.does.not.cause.the.top
40ba0 69 63 73 0a 20 20 20 20 20 74 6f 20 62 65 20 6c 69 73 74 65 64 20 69 6e 20 74 68 65 20 73 74 61 ics......to.be.listed.in.the.sta
40bc0 74 75 73 20 62 75 66 66 65 72 20 6f 66 20 73 75 63 68 20 22 75 6e 69 6e 69 74 69 61 6c 69 7a 65 tus.buffer.of.such."uninitialize
40be0 64 22 0a 20 20 20 20 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 0a 0a 20 20 20 4e 6f 74 65 20 68 d"......repositories......Note.h
40c00 6f 77 20 70 75 6c 6c 69 6e 67 20 64 61 74 61 20 66 72 6f 6d 20 61 20 66 6f 72 67 65 e2 80 99 73 ow.pulling.data.from.a.forge...s
40c20 20 41 50 49 20 77 6f 72 6b 73 20 74 68 65 20 73 61 6d 65 20 77 61 79 20 61 73 0a 70 75 6c 6c 69 .API.works.the.same.way.as.pulli
40c40 6e 67 20 47 69 74 20 64 61 74 61 20 64 6f 65 73 3b 20 79 6f 75 20 64 6f 20 69 74 20 65 78 70 6c ng.Git.data.does;.you.do.it.expl
40c60 69 63 69 74 6c 79 20 77 68 65 6e 20 79 6f 75 20 77 61 6e 74 20 74 6f 20 73 65 65 20 74 68 65 0a icitly.when.you.want.to.see.the.
40c80 77 6f 72 6b 20 64 6f 6e 65 20 62 79 20 6f 74 68 65 72 73 2e 0a 0a 20 20 20 54 68 69 73 20 69 73 work.done.by.others......This.is
40ca0 20 6c 65 73 73 20 64 69 73 72 75 70 74 69 76 65 2c 20 6d 6f 72 65 20 72 65 6c 69 61 62 6c 65 2c .less.disruptive,.more.reliable,
40cc0 20 61 6e 64 20 65 61 73 69 65 72 20 74 6f 20 75 6e 64 65 72 73 74 61 6e 64 20 74 68 61 6e 0a 69 .and.easier.to.understand.than.i
40ce0 66 20 46 6f 72 67 65 20 64 69 64 20 74 68 65 20 70 75 6c 6c 69 6e 67 20 62 79 20 69 74 73 65 6c f.Forge.did.the.pulling.by.itsel
40d00 66 20 61 74 20 72 61 6e 64 6f 6d 20 69 6e 74 65 72 76 61 6c 73 2e 20 20 49 74 20 6d 69 67 68 74 f.at.random.intervals...It.might
40d20 0a 68 6f 77 65 76 65 72 20 6d 65 61 6e 20 74 68 61 74 20 79 6f 75 20 6f 63 63 61 73 69 6f 6e 61 .however.mean.that.you.occasiona
40d40 6c 6c 79 20 69 6e 76 6f 6b 65 20 61 20 63 6f 6d 6d 61 6e 64 20 65 78 70 65 63 74 69 6e 67 20 74 lly.invoke.a.command.expecting.t
40d60 68 65 20 6d 6f 73 74 0a 72 65 63 65 6e 74 20 64 61 74 61 20 74 6f 20 62 65 20 61 76 61 69 6c 61 he.most.recent.data.to.be.availa
40d80 62 6c 65 20 61 6e 64 20 74 68 65 6e 20 68 61 76 65 20 74 6f 20 61 62 6f 72 74 20 74 6f 20 70 75 ble.and.then.have.to.abort.to.pu
40da0 6c 6c 20 66 69 72 73 74 2e 20 20 54 68 65 0a 73 61 6d 65 20 63 61 6e 20 68 61 70 70 65 6e 20 77 ll.first...The.same.can.happen.w
40dc0 69 74 68 20 47 69 74 2c 20 65 2e 67 2e 2c 20 79 6f 75 20 6d 69 67 68 74 20 61 74 74 65 6d 70 74 ith.Git,.e.g.,.you.might.attempt
40de0 20 74 6f 20 6d 65 72 67 65 20 61 20 62 72 61 6e 63 68 20 74 68 61 74 0a 79 6f 75 20 6b 6e 6f 77 .to.merge.a.branch.that.you.know
40e00 20 65 78 69 73 74 73 20 62 75 74 20 68 61 76 65 6e e2 80 99 74 20 61 63 74 75 61 6c 6c 79 20 70 .exists.but.haven...t.actually.p
40e20 75 6c 6c 65 64 20 79 65 74 2e 0a 0a e2 80 98 4e 20 66 20 74 e2 80 99 20 28 e2 80 98 66 6f 72 67 ulled.yet......N.f.t....(...forg
40e40 65 2d 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 e-pull-topic...)......This.comma
40e60 6e 64 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 nd.uses.a.forge...s.API.to.fetch
40e80 20 61 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 .a.single.pull-request.and......
40ea0 73 74 6f 72 65 73 20 69 74 20 69 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 0a 0a 20 20 20 20 stores.it.in.the.database.......
40ec0 20 4e 6f 72 6d 61 6c 6c 79 20 79 6f 75 20 77 6f 75 6c 64 6e e2 80 99 74 20 77 61 6e 74 20 74 6f .Normally.you.wouldn...t.want.to
40ee0 20 70 75 6c 6c 20 61 20 73 69 6e 67 6c 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 79 20 69 .pull.a.single.pull-request.by.i
40f00 74 73 65 6c 66 2c 0a 20 20 20 20 20 62 75 74 20 64 75 65 20 74 6f 20 61 20 62 75 67 20 69 6e 20 tself,......but.due.to.a.bug.in.
40f20 74 68 65 20 47 69 74 68 75 62 20 41 50 49 20 79 6f 75 20 6d 69 67 68 74 20 73 6f 6d 65 74 69 6d the.Github.API.you.might.sometim
40f40 65 73 20 68 61 76 65 20 74 6f 20 64 6f 0a 20 20 20 20 20 73 6f 2e 0a 0a 20 20 20 20 20 46 65 74 es.have.to.do......so........Fet
40f60 63 68 69 6e 67 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 75 6e 64 65 72 20 74 68 65 20 61 ching.is.implemented.under.the.a
40f80 73 73 75 6d 70 74 69 6f 6e 20 74 68 61 74 20 74 68 65 20 41 50 49 20 63 61 6e 20 62 65 0a 20 20 ssumption.that.the.API.can.be...
40fa0 20 20 20 61 73 6b 65 64 20 74 6f 20 6c 69 73 74 20 74 68 65 20 74 68 69 6e 67 73 20 74 68 61 74 ...asked.to.list.the.things.that
40fc0 20 68 61 76 65 20 63 68 61 6e 67 65 64 20 73 69 6e 63 65 20 77 65 20 6c 61 73 74 20 63 68 65 63 .have.changed.since.we.last.chec
40fe0 6b 65 64 2e 0a 20 20 20 20 20 55 6e 66 6f 72 74 75 6e 61 74 65 6c 79 20 74 68 65 20 41 50 49 73 ked.......Unfortunately.the.APIs
41000 20 61 72 65 20 6e 6f 74 20 62 75 67 2d 66 72 65 65 2c 20 73 6f 20 74 68 69 73 20 69 73 20 6e 6f .are.not.bug-free,.so.this.is.no
41020 74 20 61 6c 77 61 79 73 20 74 68 65 0a 20 20 20 20 20 63 61 73 65 2e 20 20 49 66 20 69 6e 20 64 t.always.the......case...If.in.d
41040 6f 75 62 74 2c 20 74 68 65 6e 20 72 65 2d 66 65 74 63 68 20 61 6e 20 69 6e 64 69 76 69 64 75 61 oubt,.then.re-fetch.an.individua
41060 6c 20 74 6f 70 69 63 20 74 6f 20 65 6e 73 75 72 65 20 69 74 0a 20 20 20 20 20 69 73 20 75 70 2d l.topic.to.ensure.it......is.up-
41080 74 6f 2d 64 61 74 65 20 75 73 69 6e 67 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 e2 80 98 66 6f 72 to-date.using.the.command....for
410a0 67 65 2d 70 75 6c 6c 2d 74 6f 70 69 63 e2 80 99 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 ge-pull-topic........File:.forge
410c0 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 4e 65 78 74 3a 20 .info,..Node:.Branching,..Next:.
410e0 57 6f 72 6b 69 6e 67 20 77 69 74 68 20 54 6f 70 69 63 73 2c 20 20 50 72 65 76 3a 20 50 75 6c 6c Working.with.Topics,..Prev:.Pull
41100 69 6e 67 2c 20 20 55 70 3a 20 55 73 61 67 65 0a 0a 34 2e 32 20 42 72 61 6e 63 68 69 6e 67 0a 3d ing,..Up:.Usage..4.2.Branching.=
41120 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 46 6f 72 67 65 20 70 72 6f 76 69 64 65 73 20 63 6f 6d ============..Forge.provides.com
41140 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 6b 69 6e 67 20 mands.for.creating.and.checking.
41160 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 65 65 20 66 72 out.a.new.branch.or.work.tree.fr
41180 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 6f 6d 6d 61 6e om.a.pull-request...These.comman
411a0 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 61 6d 65 20 74 ds.are.available.from.the.same.t
411c0 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 20 74 68 65 20 ransient.prefix.commands.as.the.
411e0 73 75 66 66 69 78 20 63 6f 6d 6d 61 6e 64 73 20 75 73 65 64 20 74 6f 20 63 72 65 61 74 65 20 61 suffix.commands.used.to.create.a
41200 6e 64 0a 63 68 65 63 6b 20 6f 75 74 20 62 72 61 6e 63 68 65 73 20 61 6e 64 20 77 6f 72 6b 20 74 nd.check.out.branches.and.work.t
41220 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 68 69 6f 6e 0a 28 rees.in.a.more.generic.fashion.(
41240 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 e2 80 99 20 61 6e ...magit-branch....on....b....an
41260 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 e2 80 98 25 e2 80 d....magit-worktree....on....%..
41280 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 72 61 6e 63 68 2d .)......b.F....(...forge-branch-
412a0 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 61 6e 64 20 63 72 pullreq...)......This.command.cr
412c0 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 20 62 72 61 6e 63 eates.and.configures.a.new.branc
412e0 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 2c 20 63 72 65 61 h.from.a......pull-request,.crea
41300 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 20 72 65 6d 6f 74 ting.and.configuring.a.new.remot
41320 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 6e 61 6d 65 20 6f e.if.necessary........The.name.o
41340 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 73 61 6d 65 20 61 f.the.local.branch.is.the.same.a
41360 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 20 20 20 20 62 72 s.the.name.of.the.remote......br
41380 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 6b 65 64 20 74 6f anch.that.you.are.being.asked.to
413a0 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 75 74 6f 72 0a 20 .merge,.unless.the.contributor..
413c0 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 74 6f 20 70 72 6f ....could.not.be.bothered.to.pro
413e0 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 72 65 20 6f 70 65 perly.name.the.branch.before.ope
41400 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 2e 20 20 54 68 65 ning......the.pull-request...The
41420 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 77 68 65 6e 20 79 .most.likely.such.case.is.when.y
41440 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 20 6d 65 72 67 65 ou.are.being......asked.to.merge
41460 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 65 72 22 20 69 6e .something.like."fork/master".in
41480 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 6e 20 73 75 63 68 to."origin/master".......In.such
414a0 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 6c 6c 20 62 65 20 .cases.the.local.branch.will.be.
414c0 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 99 20 69 73 0a 20 named."pr-N",.where....N....is..
414e0 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 72 2e 0a 0a 20 20 ....the.pull-request.number.....
41500 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 61 79 73 20 73 65 ...These.variables.are.always.se
41520 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 20 20 e2 80 a2 20 t.by.this.command:..............
41540 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 73 74 e2 80 99 20 ...branch.<name>.pullRequest....
41560 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 20 6e 75 6d 62 65 is.set.to.the.pull-request.numbe
41580 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 6e 61 6d 65 3e 2e r.................branch.<name>.
415a0 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 74 6f 20 74 pullRequestRemote....is.set.to.t
415c0 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 63 68 20 74 68 65 he.remote.on...........which.the
415e0 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 74 65 64 2e .pull-request.branch.is.located.
41600 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 6d 65 3e 2e 70 75 ................branch.<name>.pu
41620 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 73 61 6d 65 20 72 shRemote....is.set.to.the.same.r
41640 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 63 68 2e 3c 6e 61 emote.as..............branch.<na
41660 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 66 20 74 68 61 74 me>.pullRequestRemote....if.that
41680 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 68 65 72 77 69 73 .is.possible,...........otherwis
416a0 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 6d 20 72 65 6d 6f e.it.is.set.to.the.upstream.remo
416c0 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 3c 6e 61 6d 65 3e te.................branch.<name>
416e0 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 74 68 65 20 70 75 .description....is.set.to.the.pu
41700 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 e2 80 a2 20 e2 80 ll-request.title................
41720 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 73 20 73 65 74 20 .branch.<name>.rebase....is.set.
41740 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 65 20 73 68 6f 75 to....true....because.there.shou
41760 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 6f 6d 6d 69 74 73 ld...........be.no.merge.commits
41780 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 6c 6c 2d 72 65 71 .among.the.commits.in.a.pull-req
417a0 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 6c 73 6f 20 63 6f uest........This.command.also.co
417c0 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 74 68 65 20 70 75 nfigures.the.upstream.and.the.pu
417e0 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 6c 20 62 72 61 6e sh-remote.of......the.local.bran
41800 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 54 68 65 20 62 72 ch.that.it.creates........The.br
41820 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 6c 2d 72 65 71 75 anch.against.which.the.pull-requ
41840 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 73 65 64 0a 20 20 est.was.opened.is.always.used...
41860 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 6d 61 6b 65 73 20 ...as.the.upstream...This.makes.
41880 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 73 20 79 6f 75 20 it.easy.to.see.what.commits.you.
418a0 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 72 67 65 20 69 6e are......being.asked.to.merge.in
418c0 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 6c 69 .the.section.titled.something.li
418e0 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 67 69 6e 2f 6d 61 ke."Unmerged......into.origin/ma
41900 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 72 20 63 6f 6d 6d ster"........Like.for.other.comm
41920 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 20 69 74 20 64 65 ands.that.create.a.branch,.it.de
41940 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 80 98 6d 61 67 69 pends.on.the......option....magi
41960 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 74 72 65 61 6d e2 t-branch-prefer-remote-upstream.
41980 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 20 62 72 61 6e 63 ...whether.the.remote......branc
419a0 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 20 6c 6f 63 61 6c h.itself.or.the.respective.local
419c0 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 20 20 75 70 73 74 .branch.is.used.as.the......upst
419e0 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 61 6c 73 6f 20 62 ream,.so.this.section.may.also.b
41a00 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 69 6e 74 6f 0a 20 e.titled,.e.g.,."Unmerged.into..
41a20 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 63 65 73 73 61 72 ....master"........When.necessar
41a40 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 20 70 75 6c 6c 2d y.and.possible,.the.remote.pull-
41a60 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 66 69 67 75 72 65 request.branch.is......configure
41a80 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 61 72 67 65 74 2e d.to.be.used.as.the.push-target.
41aa0 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 20 20 20 73 65 65 ..This.makes.it.easy.to......see
41ac0 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 63 6f 6e 74 72 69 .what.further.changes.the.contri
41ae0 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 61 73 74 0a 20 20 butor.has.made.since.you.last...
41b00 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 69 6e 20 74 68 65 ...reviewed.their.changes.in.the
41b20 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 6c 69 6b 65 0a 20 .section.titled.something.like..
41b40 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 6e 65 77 2d 66 65 ...."Unpulled.from.origin/new-fe
41b60 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 20 20 20 20 66 6f ature".or."Unpulled.from......fo
41b80 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 e2 80 a2 20 49 66 rk/new-feature"...............If
41ba0 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
41bc0 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 20 20 20 20 72 65 ted.in.the.upstream...........re
41be0 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 79 20 68 61 76 65 pository,.then.you.probably.have
41c00 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 e2 80 99 20 74 6f .set....remote.pushDefault....to
41c20 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 2e 20 20 48 6f 77 ...........that.repository...How
41c40 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 74 20 74 68 61 74 ever.some.users.like.to.set.that
41c60 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 69 72 20 70 65 72 .variable...........to.their.per
41c80 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 61 76 65 20 70 75 sonal.fork,.even.if.they.have.pu
41ca0 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 20 75 70 73 74 72 sh.access.to.the...........upstr
41cc0 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 75 73 68 52 65 6d eam,.so....branch.<name>.pushRem
41ce0 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 20 20 20 20 20 e2 ote....is.set.anyway............
41d00 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 73 ...If.the.pull-request.branch.is
41d20 20 6c 6f 63 61 74 65 64 20 69 6e 73 69 64 65 20 61 20 66 6f 72 6b 2c 20 74 68 65 6e 20 79 6f 75 .located.inside.a.fork,.then.you
41d40 0a 20 20 20 20 20 20 20 20 20 20 61 72 65 20 75 73 75 61 6c 6c 79 20 61 62 6c 65 20 74 6f 20 70 ...........are.usually.able.to.p
41d60 75 73 68 20 74 6f 20 74 68 61 74 20 62 72 61 6e 63 68 2c 20 62 65 63 61 75 73 65 20 47 69 74 68 ush.to.that.branch,.because.Gith
41d80 75 62 20 62 79 0a 20 20 20 20 20 20 20 20 20 20 64 65 66 61 75 6c 74 20 61 6c 6c 6f 77 73 20 74 ub.by...........default.allows.t
41da0 68 65 20 72 65 63 69 70 69 65 6e 74 20 6f 66 20 61 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 74 he.recipient.of.a.pull-request.t
41dc0 6f 20 70 75 73 68 20 74 6f 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 72 65 6d 6f 74 65 20 70 o.push.to.the...........remote.p
41de0 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 72 61 6e 63 68 20 65 76 65 6e 20 69 66 20 69 74 20 69 73 ull-request.branch.even.if.it.is
41e00 20 6c 6f 63 61 74 65 64 20 69 6e 20 61 20 66 6f 72 6b 2e 0a 20 20 20 20 20 20 20 20 20 20 54 68 .located.in.a.fork............Th
41e20 65 20 63 6f 6e 74 72 69 62 75 74 6f 72 20 68 61 73 20 74 6f 20 65 78 70 6c 69 63 69 74 6c 79 20 e.contributor.has.to.explicitly.
41e40 64 69 73 61 62 6c 65 20 74 68 69 73 2e 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 e2 80 a2 20 disable.this....................
41e60 49 66 20 79 6f 75 20 61 72 65 20 6e 6f 74 20 61 6c 6c 6f 77 65 64 20 74 6f 20 70 75 73 68 20 74 If.you.are.not.allowed.to.push.t
41e80 6f 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 72 61 6e 63 68 0a 20 20 20 20 20 20 o.the.pull-request.branch.......
41ea0 20 20 20 20 20 20 20 20 20 6f 6e 20 74 68 65 20 66 6f 72 6b 2c 20 74 68 65 6e 20 61 20 62 72 61 .........on.the.fork,.then.a.bra
41ec0 6e 63 68 20 62 79 20 74 68 65 20 73 61 6d 65 20 6e 61 6d 65 20 6c 6f 63 61 74 65 64 20 69 6e 0a nch.by.the.same.name.located.in.
41ee0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 70 6f ...............the.upstream.repo
41f00 73 69 74 6f 72 79 20 69 73 20 63 6f 6e 66 69 67 75 72 65 64 20 61 73 20 74 68 65 20 70 75 73 68 sitory.is.configured.as.the.push
41f20 2d 74 61 72 67 65 74 2e 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 e2 80 a2 20 41 e2 80 94 73 -target....................A...s
41f40 61 64 6c 79 20 72 61 74 68 65 72 20 63 6f 6d 6d 6f 6e e2 80 94 73 70 65 63 69 61 6c 20 63 61 73 adly.rather.common...special.cas
41f60 65 20 69 73 20 77 68 65 6e 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6e e.is.when.the................con
41f80 74 72 69 62 75 74 6f 72 20 64 69 64 6e e2 80 99 74 20 62 6f 74 68 65 72 20 74 6f 20 75 73 65 20 tributor.didn...t.bother.to.use.
41fa0 61 20 64 65 64 69 63 61 74 65 64 20 62 72 61 6e 63 68 20 66 6f 72 0a 20 20 20 20 20 20 20 20 20 a.dedicated.branch.for..........
41fc0 20 20 20 20 20 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 0a 0a 20 20 20 20 20 20 20 ......the.pull-request..........
41fe0 20 20 20 20 20 20 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 ........The.most.likely.such.cas
42000 65 20 69 73 20 77 68 65 6e 20 79 6f 75 20 61 72 65 20 62 65 69 6e 67 20 61 73 6b 65 64 20 74 6f e.is.when.you.are.being.asked.to
42020 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 65 72 67 65 20 73 6f 6d 65 74 68 69 6e 67 20 ................merge.something.
42040 6c 69 6b 65 20 22 66 6f 72 6b 2f 6d 61 73 74 65 72 22 20 69 6e 74 6f 20 22 6f 72 69 67 69 6e 2f like."fork/master".into."origin/
42060 6d 61 73 74 65 72 22 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 20 73 70 65 63 master".................The.spec
42080 69 61 6c 20 70 75 73 68 20 70 65 72 6d 69 73 73 69 6f 6e 20 6d 65 6e 74 69 6f 6e 65 64 20 61 62 ial.push.permission.mentioned.ab
420a0 6f 76 65 20 69 73 20 6e 65 76 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67 72 61 6e ove.is.never................gran
420c0 74 65 64 20 66 6f 72 20 74 68 65 20 62 72 61 6e 63 68 20 74 68 61 74 20 69 73 20 74 68 65 20 72 ted.for.the.branch.that.is.the.r
420e0 65 70 6f 73 69 74 6f 72 79 e2 80 99 73 20 64 65 66 61 75 6c 74 0a 20 20 20 20 20 20 20 20 20 20 epository...s.default...........
42100 20 20 20 20 20 62 72 61 6e 63 68 2c 20 61 6e 64 20 74 68 61 74 20 77 6f 75 6c 64 20 61 6c 6d 6f .....branch,.and.that.would.almo
42120 73 74 20 63 65 72 74 61 69 6e 6c 79 20 62 65 20 74 68 65 20 63 61 73 65 20 69 6e 0a 20 20 20 20 st.certainly.be.the.case.in.....
42140 20 20 20 20 20 20 20 20 20 20 20 74 68 69 73 20 73 63 65 6e 61 72 69 6f 2e 0a 0a 20 20 20 20 20 ...........this.scenario........
42160 20 20 20 20 20 20 20 20 20 20 54 6f 20 65 6e 61 62 6c 65 20 79 6f 75 20 74 6f 20 65 61 73 69 6c ..........To.enable.you.to.easil
42180 79 20 70 75 73 68 20 73 6f 6d 65 77 68 65 72 65 20 61 6e 79 77 61 79 2c 20 74 68 65 20 6c 6f 63 y.push.somewhere.anyway,.the.loc
421a0 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 72 61 6e 63 68 20 69 73 20 6e 61 6d 65 al................branch.is.name
421c0 64 20 22 70 72 2d 4e 22 20 28 77 68 65 72 65 20 e2 80 98 4e e2 80 99 20 69 73 20 74 68 65 20 70 d."pr-N".(where....N....is.the.p
421e0 75 6c 6c 2d 72 65 71 75 65 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 75 6d 62 65 ull-request................numbe
42200 72 29 20 61 6e 64 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 70 6f 73 69 74 6f 72 79 20 69 r).and.the.upstream.repository.i
42220 73 20 75 73 65 64 20 61 73 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 75 73 s.used.as.the................pus
42240 68 2d 72 65 6d 6f 74 65 2e 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 e2 80 a2 20 46 69 6e 61 h-remote....................Fina
42260 6c 6c 79 2c 20 69 66 20 79 6f 75 20 61 72 65 20 61 6c 6c 6f 77 65 64 20 74 6f 20 70 75 73 68 20 lly,.if.you.are.allowed.to.push.
42280 74 6f 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 to.the.pull-request.............
422a0 20 20 20 62 72 61 6e 63 68 20 61 6e 64 20 74 68 65 20 63 6f 6e 74 72 69 62 75 74 6f 72 20 68 61 ...branch.and.the.contributor.ha
422c0 64 20 74 68 65 20 66 6f 72 65 73 69 67 68 74 20 74 6f 20 75 73 65 20 61 0a 20 20 20 20 20 20 20 d.the.foresight.to.use.a........
422e0 20 20 20 20 20 20 20 20 64 65 64 69 63 61 74 65 64 20 62 72 61 6e 63 68 2c 20 74 68 65 6e 20 74 ........dedicated.branch,.then.t
42300 68 65 20 66 6f 72 6b 20 69 73 20 63 6f 6e 66 69 67 75 72 65 64 20 61 73 20 74 68 65 0a 20 20 20 he.fork.is.configured.as.the....
42320 20 20 20 20 20 20 20 20 20 20 20 20 70 75 73 68 2d 72 65 6d 6f 74 65 2e 0a 0a 20 20 20 20 20 20 ............push-remote.........
42340 20 20 20 20 54 68 65 20 70 75 73 68 2d 72 65 6d 6f 74 65 20 69 73 20 63 6f 6e 66 69 67 75 72 65 ....The.push-remote.is.configure
42360 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 2e 3c 6e 61 6d d.using..............branch.<nam
42380 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 68 65 20 75 73 e>.pushRemote...,.even.if.the.us
423a0 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 69 63 61 6c 20 ed.value.is...........identical.
423c0 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 66 61 75 6c 74 to.that.of....remote.pushDefault
423e0 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 20 20 20 20 20 ...,.just.in.case.you...........
42400 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 74 65 72 20 6c change.the.value.of.the.latter.l
42420 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 20 20 20 20 20 ater.on...Additionally.the......
42440 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 6d 65 3e 2e 70 .....variable....branch.<name>.p
42460 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 74 6f 20 74 68 ullRequestRemote....is.set.to.th
42480 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 20 74 68 65 20 e...........remote.on.which.the.
424a0 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 74 65 64 2e 0a pull-request.branch.is.located..
424c0 0a e2 80 98 62 20 66 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 70 75 ....b.f....(...forge-checkout-pu
424e0 6c 6c 72 65 71 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 63 72 65 61 llreq...)......This.command.crea
42500 74 65 73 20 61 6e 64 20 63 6f 6e 66 69 67 75 72 65 73 20 61 20 6e 65 77 20 62 72 61 6e 63 68 20 tes.and.configures.a.new.branch.
42520 66 72 6f 6d 20 61 0a 20 20 20 20 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 74 68 65 20 73 61 6d from.a......pull-request.the.sam
42540 65 20 77 61 79 20 e2 80 98 66 6f 72 67 65 2d 62 72 61 6e 63 68 2d 70 75 6c 6c 72 65 71 e2 80 99 e.way....forge-branch-pullreq...
42560 20 64 6f 65 73 2e 0a 20 20 20 20 20 41 64 64 69 74 69 6f 6e 61 6c 6c 79 20 69 74 20 63 68 65 63 .does.......Additionally.it.chec
42580 6b 73 20 6f 75 74 20 74 68 65 20 6e 65 77 20 62 72 61 6e 63 68 2e 0a 0a e2 80 98 5a 20 6e e2 80 ks.out.the.new.branch......Z.n..
425a0 99 20 28 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 ..(...forge-checkout-worktree...
425c0 29 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 6e 64 20 )......This.command.creates.and.
425e0 63 6f 6e 66 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 configures.a.new.branch.from.a..
42600 20 20 20 20 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 ....pull-request.the.same.way...
42620 98 66 6f 72 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 .forge-branch-pullreq....does...
42640 20 20 20 20 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 ....Additionally.it.checks.out.t
42660 68 65 20 6e 65 77 20 62 72 61 6e 63 68 20 75 73 69 6e 67 20 61 20 6e 65 77 20 77 6f 72 6b 69 6e he.new.branch.using.a.new.workin
42680 67 20 74 72 65 65 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 g.tree....--.User.Option:.forge-
426a0 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 63 74 6f 72 79 checkout-worktree-read-directory
426c0 2d 66 75 6e 63 74 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 -function......This.function.is.
426e0 75 73 65 64 20 62 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 used.by....forge-checkout-worktr
42700 65 65 e2 80 99 20 74 6f 20 72 65 61 64 20 72 65 61 64 20 74 68 65 0a 20 20 20 20 20 6e 65 77 20 ee....to.read.read.the......new.
42720 77 6f 72 6b 74 72 65 65 20 64 69 72 65 63 74 6f 72 79 20 77 68 65 72 65 20 69 74 20 63 68 65 63 worktree.directory.where.it.chec
42740 6b 73 20 6f 75 74 20 74 6f 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 2e 20 20 49 74 0a 20 20 20 20 ks.out.to.pull-request...It.....
42760 20 74 61 6b 65 73 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 61 73 20 74 68 65 20 6f .takes.the.pull-request.as.the.o
42780 6e 6c 79 20 61 72 67 75 6d 65 6e 74 20 61 6e 64 20 6d 75 73 74 20 72 65 74 75 72 6e 20 61 0a 20 nly.argument.and.must.return.a..
427a0 20 20 20 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 20 20 20 57 68 65 6e 20 79 6f 75 20 64 65 6c 65 ....directory......When.you.dele
427c0 74 65 20 61 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 62 72 61 6e 63 68 2c 20 77 68 69 63 68 20 te.a.pull-request.branch,.which.
427e0 77 61 73 20 63 72 65 61 74 65 64 20 75 73 69 6e 67 20 6f 6e 65 20 6f 66 0a 74 68 65 20 61 62 6f was.created.using.one.of.the.abo
42800 76 65 20 74 68 72 65 65 20 63 6f 6d 6d 61 6e 64 73 2c 20 74 68 65 6e 20 e2 80 98 6d 61 67 69 74 ve.three.commands,.then....magit
42820 2d 62 72 61 6e 63 68 2d 64 65 6c 65 74 65 e2 80 99 20 75 73 75 61 6c 6c 79 20 6f 66 66 65 72 73 -branch-delete....usually.offers
42840 20 74 6f 0a 61 6c 73 6f 20 64 65 6c 65 74 65 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e .to.also.delete.the.correspondin
42860 67 20 72 65 6d 6f 74 65 2e 20 20 49 74 20 64 6f 65 73 20 6e 6f 74 20 6f 66 66 65 72 20 74 6f 20 g.remote...It.does.not.offer.to.
42880 64 65 6c 65 74 65 20 61 0a 72 65 6d 6f 74 65 20 69 66 20 28 31 29 20 74 68 65 20 72 65 6d 6f 74 delete.a.remote.if.(1).the.remot
428a0 65 20 69 73 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 72 65 6d 6f 74 65 2c 20 61 6e 64 2f 6f 72 e.is.the.upstream.remote,.and/or
428c0 20 28 32 29 20 69 66 20 6f 74 68 65 72 0a 62 72 61 6e 63 68 65 73 20 61 72 65 20 62 65 69 6e 67 .(2).if.other.branches.are.being
428e0 20 66 65 74 63 68 65 64 20 66 72 6f 6d 20 74 68 65 20 72 65 6d 6f 74 65 2e 0a 0a 20 20 20 4e 6f .fetched.from.the.remote......No
42900 74 65 20 74 68 61 74 20 79 6f 75 20 68 61 76 65 20 74 6f 20 64 65 6c 65 74 65 20 74 68 65 20 6c te.that.you.have.to.delete.the.l
42920 6f 63 61 6c 20 62 72 61 6e 63 68 20 28 65 2e 67 2e 2c 20 22 66 65 61 74 75 72 65 22 29 20 66 6f ocal.branch.(e.g.,."feature").fo
42940 72 0a 74 68 69 73 20 74 6f 20 77 6f 72 6b 2e 20 20 49 66 20 79 6f 75 20 64 65 6c 65 74 65 20 74 r.this.to.work...If.you.delete.t
42960 68 65 20 74 72 61 63 6b 69 6e 67 20 62 72 61 6e 63 68 20 28 65 2e 67 2e 2c 20 22 66 6f 72 6b 2f he.tracking.branch.(e.g.,."fork/
42980 66 65 61 74 75 72 65 22 29 2c 0a 74 68 65 6e 20 74 68 65 20 72 65 6d 6f 74 65 20 69 73 20 6e 65 feature"),.then.the.remote.is.ne
429a0 76 65 72 20 72 65 6d 6f 76 65 64 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f ver.removed.....File:.forge.info
429c0 2c 20 20 4e 6f 64 65 3a 20 57 6f 72 6b 69 6e 67 20 77 69 74 68 20 54 6f 70 69 63 73 2c 20 20 4e ,..Node:.Working.with.Topics,..N
429e0 65 78 74 3a 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 2c 20 20 50 72 65 76 3a 20 42 72 61 6e 63 ext:.Miscellaneous,..Prev:.Branc
42a00 68 69 6e 67 2c 20 20 55 70 3a 20 55 73 61 67 65 0a 0a 34 2e 33 20 57 6f 72 6b 69 6e 67 20 77 69 hing,..Up:.Usage..4.3.Working.wi
42a20 74 68 20 54 6f 70 69 63 73 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d th.Topics.======================
42a40 3d 0a 0a 57 65 20 63 61 6c 6c 20 62 6f 74 68 20 69 73 73 75 65 73 20 61 6e 64 20 70 75 6c 6c 2d =..We.call.both.issues.and.pull-
42a60 72 65 71 75 65 73 74 73 20 22 74 6f 70 69 63 73 22 2e 20 20 54 68 65 20 63 6f 6e 74 72 69 62 75 requests."topics"...The.contribu
42a80 74 69 6f 6e 73 20 74 6f 0a 74 68 65 20 63 6f 6e 76 65 72 73 61 74 69 6f 6e 20 61 72 65 20 63 61 tions.to.the.conversation.are.ca
42aa0 6c 6c 65 64 20 22 70 6f 73 74 73 22 2e 0a 0a 2a 20 4d 65 6e 75 3a 0a 0a 2a 20 56 69 73 69 74 69 lled."posts"...*.Menu:..*.Visiti
42ac0 6e 67 20 54 6f 70 69 63 73 3a 3a 0a 2a 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 ng.Topics::.*.Listing.Topics.and
42ae0 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 3a 3a 0a 2a 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 .Notifications::.*.Creating.Topi
42b00 63 73 3a 3a 0a 2a 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 3a cs::.*.Editing.Topics.and.Posts:
42b20 3a 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 69 :....File:.forge.info,..Node:.Vi
42b40 73 69 74 69 6e 67 20 54 6f 70 69 63 73 2c 20 20 4e 65 78 74 3a 20 4c 69 73 74 69 6e 67 20 54 6f siting.Topics,..Next:.Listing.To
42b60 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2c 20 20 55 70 3a 20 57 6f 72 pics.and.Notifications,..Up:.Wor
42b80 6b 69 6e 67 20 77 69 74 68 20 54 6f 70 69 63 73 0a 0a 34 2e 33 2e 31 20 56 69 73 69 74 69 6e 67 king.with.Topics..4.3.1.Visiting
42ba0 20 54 6f 70 69 63 73 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 4d .Topics.---------------------..M
42bc0 61 67 69 74 e2 80 99 73 20 73 74 61 74 75 73 20 62 75 66 66 65 72 20 63 6f 6e 74 61 69 6e 73 20 agit...s.status.buffer.contains.
42be0 6c 69 73 74 73 20 6f 66 20 69 73 73 75 65 73 20 61 6e 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 lists.of.issues.and.pull-request
42c00 73 2e 0a 54 6f 70 69 63 73 20 61 72 65 20 6f 72 64 65 72 65 64 20 62 79 20 6c 61 73 74 20 6d 6f s..Topics.are.ordered.by.last.mo
42c20 64 69 66 69 63 61 74 69 6f 6e 20 74 69 6d 65 2e 20 20 41 6c 6c 20 6f 70 65 6e 20 69 73 73 75 65 dification.time...All.open.issue
42c40 73 20 61 6e 64 20 73 6f 6d 65 0a 72 65 63 65 6e 74 6c 79 20 65 64 69 74 65 64 20 61 6e 64 20 63 s.and.some.recently.edited.and.c
42c60 6c 6f 73 65 64 20 74 6f 70 69 63 73 20 61 72 65 20 6c 69 73 74 65 64 2e 0a 0a 20 20 20 46 6f 72 losed.topics.are.listed......For
42c80 67 65 20 70 72 6f 76 69 64 65 73 20 73 6f 6d 65 20 63 6f 6d 6d 61 6e 64 73 20 74 68 61 74 20 61 ge.provides.some.commands.that.a
42ca0 63 74 20 6f 6e 20 74 68 65 20 6c 69 73 74 65 64 20 74 6f 70 69 63 73 2e 20 20 54 68 65 73 65 0a ct.on.the.listed.topics...These.
42cc0 63 6f 6d 6d 61 6e 64 73 20 63 61 6e 20 61 6c 73 6f 20 62 65 20 75 73 65 64 20 69 6e 20 6f 74 68 commands.can.also.be.used.in.oth
42ce0 65 72 20 63 6f 6e 74 65 78 74 73 2c 20 73 75 63 68 20 61 73 20 77 68 65 6e 20 70 6f 69 6e 74 20 er.contexts,.such.as.when.point.
42d00 69 73 20 6f 6e 20 61 0a 63 6f 6d 6d 69 74 20 6f 72 20 62 72 61 6e 63 68 20 73 65 63 74 69 6f 6e is.on.a.commit.or.branch.section
42d20 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 62 72 6f 77 73 ......C-c.C-w....(...forge-brows
42d40 65 2d 54 59 50 45 e2 80 99 29 0a e2 80 98 43 2d 63 20 43 2d 77 e2 80 99 20 28 e2 80 98 66 6f 72 e-TYPE...)....C-c.C-w....(...for
42d60 67 65 2d 62 72 6f 77 73 65 2d 64 77 69 6d e2 80 99 29 0a e2 80 98 4e 20 62 20 72 e2 80 99 20 28 ge-browse-dwim...)....N.b.r....(
42d80 e2 80 98 66 6f 72 67 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 ...forge-browse-remote...)....N.
42da0 62 20 49 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 73 e2 80 b.I....(...forge-browse-issues..
42dc0 99 29 0a e2 80 98 4e 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 .)....N.b.P....(...forge-browse-
42de0 70 75 6c 6c 72 65 71 73 e2 80 99 29 0a e2 80 98 4e 20 62 20 74 e2 80 99 20 28 e2 80 98 66 6f 72 pullreqs...)....N.b.t....(...for
42e00 67 65 2d 62 72 6f 77 73 65 2d 74 6f 70 69 63 e2 80 99 29 0a e2 80 98 4e 20 62 20 69 e2 80 99 20 ge-browse-topic...)....N.b.i....
42e20 28 e2 80 98 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 73 75 65 e2 80 99 29 0a e2 80 98 4e 20 (...forge-browse-issue...)....N.
42e40 62 20 70 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 e2 b.p....(...forge-browse-pullreq.
42e60 80 99 29 0a 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 ..)......These.commands.visit.th
42e80 65 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 e.topic,.issue(s),.pull-request(
42ea0 73 29 2c 20 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 6f s),.post,......branch,.commit,.o
42ec0 72 20 72 65 6d 6f 74 65 20 61 74 20 70 6f 69 6e 74 20 69 6e 20 61 20 62 72 6f 77 73 65 72 2e 0a r.remote.at.point.in.a.browser..
42ee0 0a 20 20 20 20 20 54 68 69 73 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 75 73 69 6e 67 20 ......This.is.implemented.using.
42f00 76 61 72 69 6f 75 73 20 63 6f 6d 6d 61 6e 64 73 20 6e 61 6d 65 64 0a 20 20 20 20 20 e2 80 98 66 various.commands.named.........f
42f20 6f 72 67 65 2d 62 72 6f 77 73 65 2d 54 59 50 45 e2 80 99 2c 20 61 6e 64 20 74 68 65 20 6b 65 79 orge-browse-TYPE...,.and.the.key
42f40 20 62 69 6e 64 69 6e 67 20 69 73 20 64 65 66 69 6e 65 64 20 62 79 20 72 65 6d 61 70 70 69 6e 67 .binding.is.defined.by.remapping
42f60 0a 20 20 20 20 20 e2 80 98 6d 61 67 69 74 2d 62 72 6f 77 73 65 2d 74 68 69 6e 67 e2 80 99 20 28 .........magit-browse-thing....(
42f80 61 73 20 64 65 66 69 6e 65 64 20 69 6e 20 e2 80 98 6d 61 67 69 74 2d 6d 6f 64 65 2d 6d 61 70 29 as.defined.in....magit-mode-map)
42fa0 e2 80 99 2e 20 20 46 6f 72 20 63 6f 6d 6d 69 74 0a 20 20 20 20 20 73 65 63 74 69 6f 6e 73 20 74 ......For.commit......sections.t
42fc0 68 69 73 20 6b 65 79 20 69 73 20 62 6f 75 6e 64 20 74 6f 20 e2 80 98 66 6f 72 67 65 2d 62 72 6f his.key.is.bound.to....forge-bro
42fe0 77 73 65 2d 64 77 69 6d e2 80 99 2c 20 77 68 69 63 68 20 70 72 65 66 65 72 73 20 61 0a 20 20 20 wse-dwim...,.which.prefers.a....
43000 20 20 74 6f 70 69 63 20 6f 76 65 72 20 61 20 62 72 61 6e 63 68 20 61 6e 64 20 61 20 62 72 61 6e ..topic.over.a.branch.and.a.bran
43020 63 68 20 6f 76 65 72 20 61 20 63 6f 6d 6d 69 74 2e 0a 0a e2 80 98 3c 52 45 54 3e e2 80 99 20 28 ch.over.a.commit......<RET>....(
43040 e2 80 98 66 6f 72 67 65 2d 76 69 73 69 74 2d 54 59 50 45 e2 80 99 29 0a e2 80 98 43 2d 63 20 43 ...forge-visit-TYPE...)....C-c.C
43060 2d 76 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 e2 80 99 29 0a -v....(...forge-visit-topic...).
43080 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 69 74 2d 74 6f 70 69 ...N.v.t....(...forge-visit-topi
430a0 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 67 65 2d 76 69 73 69 c...)....N.v.i....(...forge-visi
430c0 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 e2 80 98 66 6f 72 67 t-issue...)....N.v.p....(...forg
430e0 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 54 68 65 73 65 20 63 e-visit-pullreq...)......These.c
43100 6f 6d 6d 61 6e 64 73 20 76 69 73 69 74 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 28 73 ommands.visit.the.pull-request(s
43120 29 2c 20 69 73 73 75 65 28 73 29 2c 20 6f 72 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 ),.issue(s),.or.repository......
43140 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 2e 0a 0a 20 20 20 20 20 54 68 65 20 in.a.separate.buffer........The.
43160 e2 80 98 52 45 54 e2 80 99 20 62 69 6e 64 69 6e 67 20 69 73 20 6f 6e 6c 79 20 61 76 61 69 6c 61 ...RET....binding.is.only.availa
43180 62 6c 65 20 77 68 65 6e 20 70 6f 69 6e 74 20 69 73 20 6f 6e 20 61 20 69 73 73 75 65 20 6f 72 0a ble.when.point.is.on.a.issue.or.
431a0 20 20 20 20 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 73 65 63 74 69 6f 6e 20 62 65 63 61 75 73 .....pull-request.section.becaus
431c0 65 20 74 68 61 74 20 6b 65 79 20 69 73 20 61 6c 72 65 61 64 79 20 62 6f 75 6e 64 20 74 6f 20 73 e.that.key.is.already.bound.to.s
431e0 6f 6d 65 74 68 69 6e 67 0a 20 20 20 20 20 65 6c 73 65 20 66 6f 72 20 6d 6f 73 74 20 6f 66 20 4d omething......else.for.most.of.M
43200 61 67 69 74 e2 80 99 73 20 6f 77 6e 20 73 65 63 74 69 6f 6e 73 2e 20 20 e2 80 98 43 2d 63 20 43 agit...s.own.sections......C-c.C
43220 2d 76 e2 80 99 20 68 6f 77 65 76 65 72 20 69 73 20 61 6c 73 6f 0a 20 20 20 20 20 61 76 61 69 6c -v....however.is.also......avail
43240 61 62 6c 65 20 6f 6e 20 72 65 67 75 6c 61 72 20 63 6f 6d 6d 69 74 20 28 65 2e 67 2e 2c 20 69 6e able.on.regular.commit.(e.g.,.in
43260 20 61 20 6c 6f 67 29 20 61 6e 64 20 62 72 61 6e 63 68 20 73 65 63 74 69 6f 6e 73 2e 0a 0a 20 20 .a.log).and.branch.sections.....
43280 20 20 20 54 68 69 73 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 75 73 69 6e 67 20 76 61 72 ...This.is.implemented.using.var
432a0 69 6f 75 73 20 63 6f 6d 6d 61 6e 64 73 20 6e 61 6d 65 64 20 e2 80 98 66 6f 72 67 65 2d 76 69 73 ious.commands.named....forge-vis
432c0 69 74 2d 54 59 50 45 e2 80 99 0a 20 20 20 20 20 61 6e 64 20 74 68 65 20 6b 65 79 20 62 69 6e 64 it-TYPE.........and.the.key.bind
432e0 69 6e 67 20 69 73 20 64 65 66 69 6e 65 64 20 62 79 20 72 65 6d 61 70 70 69 6e 67 20 e2 80 98 6d ing.is.defined.by.remapping....m
43300 61 67 69 74 2d 76 69 73 69 74 2d 74 68 69 6e 67 e2 80 99 20 28 61 73 0a 20 20 20 20 20 64 65 66 agit-visit-thing....(as......def
43320 69 6e 65 64 20 69 6e 20 e2 80 98 6d 61 67 69 74 2d 6d 6f 64 65 2d 6d 61 70 e2 80 99 29 2e 0a 0a ined.in....magit-mode-map...)...
43340 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 4c 69 73 74 69 ..File:.forge.info,..Node:.Listi
43360 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2c 20 20 4e 65 ng.Topics.and.Notifications,..Ne
43380 78 74 3a 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 2c 20 20 50 72 65 76 3a 20 56 69 73 69 xt:.Creating.Topics,..Prev:.Visi
433a0 74 69 6e 67 20 54 6f 70 69 63 73 2c 20 20 55 70 3a 20 57 6f 72 6b 69 6e 67 20 77 69 74 68 20 54 ting.Topics,..Up:.Working.with.T
433c0 6f 70 69 63 73 0a 0a 34 2e 33 2e 32 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 opics..4.3.2.Listing.Topics.and.
433e0 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d Notifications.------------------
43400 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 42 79 20 64 65 66 61 75 6c 74 --------------------..By.default
43420 20 46 6f 72 67 65 20 6c 69 73 74 73 20 61 20 73 75 62 73 65 74 20 6f 66 20 74 6f 70 69 63 73 20 .Forge.lists.a.subset.of.topics.
43440 64 69 72 65 63 74 6c 79 20 69 6e 20 74 68 65 20 4d 61 67 69 74 20 73 74 61 74 75 73 0a 62 75 66 directly.in.the.Magit.status.buf
43460 66 65 72 2e 20 20 49 74 20 61 6c 73 6f 20 70 72 6f 76 69 64 65 73 20 63 6f 6d 6d 61 6e 64 73 20 fer...It.also.provides.commands.
43480 74 6f 20 6c 69 73 74 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 to.list.topics.and.notifications
434a0 20 69 6e 0a 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 73 2e 0a 0a 20 20 20 46 6f 72 67 65 20 .in.separate.buffers......Forge.
434c0 61 64 64 73 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 20 74 6f 20 adds.the.following.functions.to.
434e0 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 6b e2 80 99 ...magit-status-sections-hook...
43500 3a 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
43520 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
43540 73 20 61 20 6c 69 73 74 20 6f 66 20 74 68 65 20 6d 6f 73 74 20 72 65 63 65 6e 74 20 61 6e 64 2f s.a.list.of.the.most.recent.and/
43560 6f 72 20 6f 70 65 6e 0a 20 20 20 20 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2e 0a 0a 20 2d 2d or.open......pull-requests....--
43580 20 46 75 6e 63 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 69 73 73 75 65 73 0a 20 .Function:.forge-insert-issues..
435a0 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 61 20 6c 69 73 74 ....This.function.inserts.a.list
435c0 20 6f 66 20 74 68 65 20 6d 6f 73 74 20 72 65 63 65 6e 74 20 61 6e 64 2f 6f 72 20 6f 70 65 6e 20 .of.the.most.recent.and/or.open.
435e0 69 73 73 75 65 73 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 issues....--.User.Option:.forge-
43600 74 6f 70 69 63 2d 6c 69 73 74 2d 6c 69 6d 69 74 0a 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 6f topic-list-limit......This.optio
43620 6e 20 6c 69 6d 69 74 73 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 74 6f 70 69 63 73 20 6c 69 n.limits.the.number.of.topics.li
43640 73 74 65 64 20 62 79 20 74 68 65 20 61 62 6f 76 65 0a 20 20 20 20 20 66 75 6e 63 74 69 6f 6e 73 sted.by.the.above......functions
43660 2e 0a 0a 20 20 20 20 20 41 6c 6c 20 75 6e 72 65 61 64 20 74 6f 70 69 63 73 20 61 72 65 20 61 6c ........All.unread.topics.are.al
43680 77 61 79 73 20 73 68 6f 77 6e 2e 20 20 49 66 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 69 ways.shown...If.the.value.of.thi
436a0 73 20 6f 70 74 69 6f 6e 0a 20 20 20 20 20 68 61 73 20 74 68 65 20 66 6f 72 6d 20 e2 80 98 28 4f s.option......has.the.form....(O
436c0 50 45 4e 20 2e 20 43 4c 4f 53 45 44 29 e2 80 99 2c 20 74 68 65 6e 20 74 68 65 20 69 6e 74 65 67 PEN...CLOSED)...,.then.the.integ
436e0 65 72 20 e2 80 98 4f 50 45 4e e2 80 99 20 73 70 65 63 69 66 69 65 73 0a 20 20 20 20 20 74 68 65 er....OPEN....specifies......the
43700 20 6d 61 78 69 6d 61 6c 20 6e 75 6d 62 65 72 20 6f 66 20 74 6f 70 69 63 73 20 61 6e 64 20 e2 80 .maximal.number.of.topics.and...
43720 98 43 4c 4f 53 45 44 e2 80 99 20 73 70 65 63 69 66 69 65 73 20 74 68 65 20 6d 61 78 69 6d 61 6c .CLOSED....specifies.the.maximal
43740 0a 20 20 20 20 20 6e 75 6d 62 65 72 20 6f 66 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 73 2e 20 20 ......number.of.closed.topics...
43760 49 46 20 e2 80 98 43 4c 4f 53 45 44 e2 80 99 20 69 73 20 6e 65 67 61 74 69 76 65 20 74 68 65 6e IF....CLOSED....is.negative.then
43780 20 73 68 6f 77 20 6e 6f 0a 20 20 20 20 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 73 20 75 6e 74 69 .show.no......closed.topics.unti
437a0 6c 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 e2 80 98 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 63 6c l.the.command....forge-toggle-cl
437c0 6f 73 65 64 2d 76 69 73 69 62 69 6c 69 74 79 e2 80 99 0a 20 20 20 20 20 63 68 61 6e 67 65 73 20 osed-visibility.........changes.
437e0 74 68 65 20 73 69 67 6e 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 74 6f the.sign....--.Command:.forge-to
43800 67 67 6c 65 2d 63 6c 6f 73 65 64 2d 76 69 73 69 62 69 6c 69 74 79 0a 20 20 20 20 20 54 68 69 73 ggle-closed-visibility......This
43820 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 20 61 62 6f .command.toggles.whether.the.abo
43840 76 65 20 74 77 6f 20 66 75 6e 63 74 69 6f 6e 73 20 6c 69 73 74 20 72 65 63 65 6e 74 6c 79 0a 20 ve.two.functions.list.recently..
43860 20 20 20 20 63 6c 6f 73 65 64 20 69 73 73 75 65 73 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 ....closed.issues.in.the.current
43880 20 62 75 66 66 65 72 2e 0a 0a 20 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 75 6e 63 74 .buffer......The.following.funct
438a0 69 6f 6e 73 20 61 72 65 20 61 6c 73 6f 20 73 75 69 74 61 62 6c 65 20 66 6f 72 0a e2 80 98 6d 61 ions.are.also.suitable.for....ma
438c0 67 69 74 2d 73 74 61 74 75 73 2d 73 65 63 74 69 6f 6e 73 2d 68 6f 6f 6b e2 80 99 3a 0a 0a 20 2d git-status-sections-hook...:...-
438e0 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 61 73 73 69 67 6e 65 -.Function:.forge-insert-assigne
43900 64 2d 70 75 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 d-pullreqs......This.function.in
43920 73 65 72 74 73 20 61 20 6c 69 73 74 20 6f 66 20 6f 70 65 6e 20 70 75 6c 6c 2d 72 65 71 75 65 73 serts.a.list.of.open.pull-reques
43940 74 73 20 74 68 61 74 20 61 72 65 0a 20 20 20 20 20 61 73 73 69 67 6e 65 64 20 74 6f 20 79 6f 75 ts.that.are......assigned.to.you
43960 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 72 65 ....--.Function:.forge-insert-re
43980 71 75 65 73 74 65 64 2d 72 65 76 69 65 77 73 0a 20 20 20 20 20 54 68 69 73 20 66 75 6e 63 74 69 quested-reviews......This.functi
439a0 6f 6e 20 69 6e 73 65 72 74 73 20 61 20 6c 69 73 74 20 6f 66 20 6f 70 65 6e 20 70 75 6c 6c 2d 72 on.inserts.a.list.of.open.pull-r
439c0 65 71 75 65 73 74 73 20 74 68 61 74 20 61 72 65 0a 20 20 20 20 20 61 77 61 69 74 69 6e 67 20 79 equests.that.are......awaiting.y
439e0 6f 75 72 20 72 65 76 69 65 77 2e 0a 0a 20 2d 2d 20 46 75 6e 63 74 69 6f 6e 3a 20 66 6f 72 67 65 our.review....--.Function:.forge
43a00 2d 69 6e 73 65 72 74 2d 61 75 74 68 6f 72 65 64 2d 70 75 6c 6c 72 65 71 73 0a 20 20 20 20 20 54 -insert-authored-pullreqs......T
43a20 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 6e 73 65 72 74 73 20 61 20 6c 69 73 74 20 6f 66 20 6f his.function.inserts.a.list.of.o
43a40 70 65 6e 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 74 68 61 74 20 61 72 65 0a 20 20 20 20 20 pen.pull-requests.that.are......
43a60 61 75 74 68 6f 72 65 64 20 62 79 20 79 6f 75 2e 0a 0a 20 2d 2d 20 46 75 6e 63 74 69 6f 6e 3a 20 authored.by.you....--.Function:.
43a80 66 6f 72 67 65 2d 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 forge-insert-assigned-issues....
43aa0 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 6e 73 65 72 74 73 20 61 20 6c 69 73 74 20 6f ..This.function.inserts.a.list.o
43ac0 66 20 6f 70 65 6e 20 69 73 73 75 65 73 20 74 68 61 74 20 61 72 65 20 61 73 73 69 67 6e 65 64 20 f.open.issues.that.are.assigned.
43ae0 74 6f 0a 20 20 20 20 20 79 6f 75 2e 0a 0a 20 2d 2d 20 46 75 6e 63 74 69 6f 6e 3a 20 66 6f 72 67 to......you....--.Function:.forg
43b00 65 2d 69 6e 73 65 72 74 2d 61 75 74 68 6f 72 65 64 2d 69 73 73 75 65 73 0a 20 20 20 20 20 54 68 e-insert-authored-issues......Th
43b20 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 6e 73 65 72 74 73 20 61 20 6c 69 73 74 20 6f 66 20 6f 70 is.function.inserts.a.list.of.op
43b40 65 6e 20 69 73 73 75 65 73 20 74 68 61 74 20 61 72 65 20 61 75 74 68 6f 72 65 64 20 62 79 0a 20 en.issues.that.are.authored.by..
43b60 20 20 20 20 79 6f 75 2e 0a 0a 20 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 6f 6d 6d 61 ....you......The.following.comma
43b80 6e 64 73 20 6c 69 73 74 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2c 20 6e 6f 74 69 66 69 63 61 74 nds.list.repositories,.notificat
43ba0 69 6f 6e 73 20 61 6e 64 20 74 6f 70 69 63 73 20 69 6e 0a 64 65 64 69 63 61 74 65 64 20 62 75 66 ions.and.topics.in.dedicated.buf
43bc0 66 65 72 73 3a 0a 0a e2 80 98 4e 20 6c 20 72 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 6c 69 73 fers:.....N.l.r....(...forge-lis
43be0 74 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d t-repositories...)......This.com
43c00 6d 61 6e 64 20 6c 69 73 74 73 20 61 6c 6c 20 6b 6e 6f 77 6e 20 72 65 70 6f 73 69 74 6f 72 69 65 mand.lists.all.known.repositorie
43c20 73 20 69 6e 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 20 6c 20 s.in.a.separate.buffer......N.l.
43c40 6e e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 6c 69 73 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e n....(...forge-list-notification
43c60 73 e2 80 99 29 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 s...)......This.command.lists.al
43c80 6c 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 66 6f 72 20 61 6c 6c 20 66 6f 72 67 65 73 20 69 l.notifications.for.all.forges.i
43ca0 6e 20 61 20 73 65 70 61 72 61 74 65 0a 20 20 20 20 20 62 75 66 66 65 72 2e 0a 0a e2 80 98 4e 20 n.a.separate......buffer......N.
43cc0 6c 20 70 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 6c 69 73 74 2d 70 75 6c 6c 72 65 71 73 e2 80 l.p....(...forge-list-pullreqs..
43ce0 99 29 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 74 68 65 20 63 .)......This.command.lists.the.c
43d00 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 73 20 70 75 6c 6c 2d 72 65 71 75 65 urrent.repository...s.pull-reque
43d20 73 74 73 20 69 6e 20 61 0a 20 20 20 20 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 2e 0a 0a sts.in.a......separate.buffer...
43d40 e2 80 98 4e 20 6c 20 69 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 6c 69 73 74 2d 69 73 73 75 65 ...N.l.i....(...forge-list-issue
43d60 73 e2 80 99 29 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 74 68 s...)......This.command.lists.th
43d80 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 73 20 69 73 73 75 65 73 20 e.current.repository...s.issues.
43da0 69 6e 20 61 20 73 65 70 61 72 61 74 65 0a 20 20 20 20 20 62 75 66 66 65 72 2e 0a 0a 20 2d 2d 20 in.a.separate......buffer....--.
43dc0 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6c 61 62 65 6c 65 64 2d 70 75 6c 6c Command:.forge-list-labeled-pull
43de0 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 74 68 65 reqs......This.command.lists.the
43e00 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 73 20 6f 70 65 6e 20 70 75 6c .current.repository...s.open.pul
43e20 6c 2d 72 65 71 75 65 73 74 73 20 74 68 61 74 0a 20 20 20 20 20 61 72 65 20 6c 61 62 65 6c 65 64 l-requests.that......are.labeled
43e40 20 77 69 74 68 20 61 20 6c 61 62 65 6c 20 72 65 61 64 20 66 72 6f 6d 20 74 68 65 20 75 73 65 72 .with.a.label.read.from.the.user
43e60 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6c 61 62 65 6c ....--.Command:.forge-list-label
43e80 65 64 2d 69 73 73 75 65 73 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6c 69 73 74 ed-issues......This.command.list
43ea0 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 99 73 20 6f 70 65 s.the.current.repository...s.ope
43ec0 6e 20 69 73 73 75 65 73 20 74 68 61 74 20 61 72 65 0a 20 20 20 20 20 6c 61 62 65 6c 65 64 20 77 n.issues.that.are......labeled.w
43ee0 69 74 68 20 61 20 6c 61 62 65 6c 20 72 65 61 64 20 66 72 6f 6d 20 74 68 65 20 75 73 65 72 2e 0a ith.a.label.read.from.the.user..
43f00 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 73 73 69 67 6e 65 ..--.Command:.forge-list-assigne
43f20 64 2d 70 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 d-pullreqs......This.command.lis
43f40 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 99 73 20 6f 70 ts.the.current.repository...s.op
43f60 65 6e 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 74 68 61 74 0a 20 20 20 20 20 61 72 65 20 61 en.pull-requests.that......are.a
43f80 73 73 69 67 6e 65 64 20 74 6f 20 79 6f 75 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 ssigned.to.you.in.a.separate.buf
43fa0 66 65 72 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 73 fer....--.Command:.forge-list-as
43fc0 73 69 67 6e 65 64 2d 69 73 73 75 65 73 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 signed-issues......This.command.
43fe0 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 99 73 lists.the.current.repository...s
44000 20 6f 70 65 6e 20 69 73 73 75 65 73 20 74 68 61 74 20 61 72 65 0a 20 20 20 20 20 61 73 73 69 67 .open.issues.that.are......assig
44020 6e 65 64 20 74 6f 20 79 6f 75 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 2e ned.to.you.in.a.separate.buffer.
44040 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 72 65 71 75 65 73 ...--.Command:.forge-list-reques
44060 74 65 64 2d 72 65 76 69 65 77 73 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6c 69 ted-reviews......This.command.li
44080 73 74 73 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 sts.pull-requests.of.the.current
440a0 20 72 65 70 6f 73 69 74 6f 72 79 20 74 68 61 74 20 61 72 65 0a 20 20 20 20 20 61 77 61 69 74 69 .repository.that.are......awaiti
440c0 6e 67 20 79 6f 75 72 20 72 65 76 69 65 77 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 ng.your.review.in.a.separate.buf
440e0 66 65 72 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 75 fer....--.Command:.forge-list-au
44100 74 68 6f 72 65 64 2d 70 75 6c 6c 72 65 71 73 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e thored-pullreqs......This.comman
44120 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..
44140 99 73 20 6f 70 65 6e 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 74 68 61 74 0a 20 20 20 20 20 .s.open.pull-requests.that......
44160 61 72 65 20 61 75 74 68 6f 72 65 64 20 62 79 20 79 6f 75 20 69 6e 20 61 20 73 65 70 61 72 61 74 are.authored.by.you.in.a.separat
44180 65 20 62 75 66 66 65 72 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 6c 69 e.buffer....--.Command:.forge-li
441a0 73 74 2d 61 75 74 68 6f 72 65 64 2d 69 73 73 75 65 73 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d st-authored-issues......This.com
441c0 6d 61 6e 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 mand.lists.the.current.repositor
441e0 79 e2 80 99 73 20 6f 70 65 6e 20 69 73 73 75 65 73 20 74 68 61 74 20 61 72 65 0a 20 20 20 20 20 y...s.open.issues.that.are......
44200 61 75 74 68 6f 72 65 64 20 62 79 20 79 6f 75 20 69 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 authored.by.you.in.a.separate.bu
44220 66 66 65 72 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6f ffer....--.Command:.forge-list-o
44240 77 6e 65 64 2d 70 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 wned-pullreqs......This.command.
44260 6c 69 73 74 73 20 6f 70 65 6e 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 66 72 6f 6d 20 61 6c lists.open.pull-requests.from.al
44280 6c 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 69 65 73 0a 20 20 20 20 20 74 68 61 74 20 79 6f 75 l.the.repositories......that.you
442a0 20 6f 77 6e 2e 20 20 4f 70 74 69 6f 6e 73 20 e2 80 98 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 .own...Options....forge-owned-ac
442c0 63 6f 75 6e 74 73 e2 80 99 20 61 6e 64 0a 20 20 20 20 20 e2 80 98 66 6f 72 67 65 2d 6f 77 6e 65 counts....and.........forge-owne
442e0 64 2d 69 67 6e 6f 72 65 64 e2 80 99 20 63 6f 6e 74 72 6f 6c 73 20 77 68 69 63 68 20 72 65 70 6f d-ignored....controls.which.repo
44300 73 69 74 6f 72 69 65 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 74 6f 0a 20 20 20 20 20 sitories.are.considered.to......
44320 62 65 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 2e 20 20 4f 6e 6c 79 20 47 69 74 68 75 62 20 69 73 be.owned.by.you...Only.Github.is
44340 20 73 75 70 70 6f 72 74 65 64 20 66 6f 72 20 6e 6f 77 2e 0a 0a 20 2d 2d 20 43 6f 6d 6d 61 6e 64 .supported.for.now....--.Command
44360 3a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 0a 20 20 20 20 20 54 :.forge-list-owned-issues......T
44380 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6c 69 73 74 73 20 6f 70 65 6e 20 69 73 73 75 65 73 20 66 72 his.command.lists.open.issues.fr
443a0 6f 6d 20 61 6c 6c 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 74 68 61 74 20 79 6f 75 om.all.the.repositories.that.you
443c0 0a 20 20 20 20 20 6f 77 6e 2e 20 20 4f 70 74 69 6f 6e 73 20 e2 80 98 66 6f 72 67 65 2d 6f 77 6e ......own...Options....forge-own
443e0 65 64 2d 61 63 63 6f 75 6e 74 73 e2 80 99 20 61 6e 64 20 e2 80 98 66 6f 72 67 65 2d 6f 77 6e 65 ed-accounts....and....forge-owne
44400 64 2d 69 67 6e 6f 72 65 64 e2 80 99 0a 20 20 20 20 20 63 6f 6e 74 72 6f 6c 73 20 77 68 69 63 68 d-ignored.........controls.which
44420 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 74 6f 20 .repositories.are.considered.to.
44440 62 65 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 2e 0a 20 20 20 20 20 4f 6e 6c 79 20 47 69 74 68 75 be.owned.by.you.......Only.Githu
44460 62 20 69 73 20 73 75 70 70 6f 72 74 65 64 20 66 6f 72 20 6e 6f 77 2e 0a 0a 20 2d 2d 20 55 73 65 b.is.supported.for.now....--.Use
44480 72 20 4f 70 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 r.Option:.forge-owned-accounts..
444a0 20 20 20 20 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 ....This.is.an.alist.of.accounts
444c0 20 74 68 61 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 .that.are.owned.by.you...This.sh
444e0 6f 75 6c 64 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 ould......include.your.username.
44500 61 73 20 77 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 as.well.as.any.organization.that
44520 20 79 6f 75 20 6f 77 6e 2e 0a 20 20 20 20 20 55 73 65 64 20 62 79 20 74 68 65 20 63 6f 6d 6d 61 .you.own.......Used.by.the.comma
44540 6e 64 73 20 e2 80 98 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 e2 80 nds....forge-list-owned-issues..
44560 99 2c 0a 20 20 20 20 20 e2 80 98 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 70 75 6c 6c .,.........forge-list-owned-pull
44580 72 65 71 73 e2 80 99 20 61 6e 64 20 e2 80 98 66 6f 72 67 65 2d 66 6f 72 6b e2 80 99 2e 0a 0a 20 reqs....and....forge-fork.......
445a0 20 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 ....Each.element.has.the.form...
445c0 98 28 41 43 43 4f 55 4e 54 20 2e 20 50 4c 49 53 54 29 e2 80 99 2e 20 20 54 68 65 20 66 6f 6c 6c .(ACCOUNT...PLIST)......The.foll
445e0 6f 77 69 6e 67 0a 20 20 20 20 20 70 72 6f 70 65 72 74 69 65 73 20 61 72 65 20 63 75 72 72 65 6e owing......properties.are.curren
44600 74 6c 79 20 62 65 69 6e 67 20 75 73 65 64 3a 0a 0a 20 20 20 20 20 20 20 20 e2 80 a2 20 e2 80 98 tly.being.used:.................
44620 72 65 6d 6f 74 65 2d 6e 61 6d 65 e2 80 99 20 54 68 65 20 64 65 66 61 75 6c 74 20 6e 61 6d 65 20 remote-name....The.default.name.
44640 73 75 67 67 65 73 74 65 64 20 62 79 20 e2 80 98 66 6f 72 67 65 2d 66 6f 72 6b e2 80 99 20 66 6f suggested.by....forge-fork....fo
44660 72 20 61 0a 20 20 20 20 20 20 20 20 20 20 66 6f 72 6b 20 63 72 65 61 74 65 64 20 77 69 74 68 69 r.a...........fork.created.withi
44680 6e 20 74 68 69 73 20 61 63 63 6f 75 6e 74 2e 20 20 49 66 20 75 6e 73 70 65 63 69 66 69 65 64 2c n.this.account...If.unspecified,
446a0 20 74 68 65 6e 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 .then.the...........name.of.the.
446c0 61 63 63 6f 75 6e 74 20 69 73 20 75 73 65 64 2e 0a 0a 20 20 20 20 20 45 78 61 6d 70 6c 65 3a 20 account.is.used........Example:.
446e0 e2 80 98 28 28 22 74 61 72 73 69 75 73 22 29 20 28 22 65 6d 61 63 73 6d 69 72 72 6f 72 22 20 72 ...(("tarsius").("emacsmirror".r
44700 65 6d 6f 74 65 2d 6e 61 6d 65 20 22 6d 69 72 72 6f 72 22 29 29 e2 80 99 2e 0a 0a 20 2d 2d 20 55 emote-name."mirror")).......--.U
44720 73 65 72 20 4f 70 74 69 6f 6e 3a 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 69 67 6e 6f 72 65 64 0a ser.Option:.forge-owned-ignored.
44740 20 20 20 20 20 54 68 69 73 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 72 65 70 6f 73 69 74 6f 72 .....This.is.a.list.of.repositor
44760 79 20 6e 61 6d 65 73 20 74 68 61 74 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 74 6f 20 6e y.names.that.are.considered.to.n
44780 6f 74 20 62 65 0a 20 20 20 20 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 20 65 76 65 6e 20 74 68 6f ot.be......owned.by.you.even.tho
447a0 75 67 68 20 74 68 65 79 20 77 6f 75 6c 64 20 68 61 76 65 20 62 65 65 6e 20 63 6f 6e 73 69 64 65 ugh.they.would.have.been.conside
447c0 72 65 64 20 74 6f 20 62 65 0a 20 20 20 20 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 20 62 61 73 65 red.to.be......owned.by.you.base
447e0 64 20 6f 6e 20 e2 80 98 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e 74 73 e2 80 99 2e d.on....forge-owned-accounts....
44800 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 43 72 65 ....File:.forge.info,..Node:.Cre
44820 61 74 69 6e 67 20 54 6f 70 69 63 73 2c 20 20 4e 65 78 74 3a 20 45 64 69 74 69 6e 67 20 54 6f 70 ating.Topics,..Next:.Editing.Top
44840 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2c 20 20 50 72 65 76 3a 20 4c 69 73 74 69 6e 67 20 54 6f ics.and.Posts,..Prev:.Listing.To
44860 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2c 20 20 55 70 3a 20 57 6f 72 pics.and.Notifications,..Up:.Wor
44880 6b 69 6e 67 20 77 69 74 68 20 54 6f 70 69 63 73 0a 0a 34 2e 33 2e 33 20 43 72 65 61 74 69 6e 67 king.with.Topics..4.3.3.Creating
448a0 20 54 6f 70 69 63 73 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a e2 .Topics.---------------------...
448c0 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 75 6c 6c ..N.c.p....(...forge-create-pull
448e0 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 72 65 71 req...)....C-c.C-n.[on."Pull.req
44900 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 63 6f 6d uests".section].........This.com
44920 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 73 74 20 mand.creates.a.new.pull-request.
44940 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 e2 80 98 for.the.current.repository......
44960 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 75 65 e2 N.c.i....(...forge-create-issue.
44980 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 65 63 74 ..)....C-c.C-n.[on."Issues".sect
449a0 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 61 74 65 ion].........This.command.create
449c0 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 20 72 65 s.a.new.issue.for.the.current.re
449e0 70 6f 73 69 74 6f 72 79 2e 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e 69 6e 66 6f 2c 20 20 pository.....File:.forge.info,..
44a00 4e 6f 64 65 3a 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2c 20 Node:.Editing.Topics.and.Posts,.
44a20 20 50 72 65 76 3a 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 2c 20 20 55 70 3a 20 57 6f 72 .Prev:.Creating.Topics,..Up:.Wor
44a40 6b 69 6e 67 20 77 69 74 68 20 54 6f 70 69 63 73 0a 0a 34 2e 33 2e 34 20 45 64 69 74 69 6e 67 20 king.with.Topics..4.3.4.Editing.
44a60 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d Topics.and.Posts.---------------
44a80 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 57 65 20 63 61 6c 6c 20 62 6f 74 68 20 69 73 ---------------..We.call.both.is
44aa0 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 73 22 2e sues.and.pull-requests."topics".
44ac0 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 6e 76 65 ..The.contributions.to.the.conve
44ae0 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 54 68 65 rsation.are.called."posts"...The
44b00 20 70 6f 73 74 20 74 68 61 74 20 69 6e 69 74 69 61 74 65 64 20 74 68 65 0a 63 6f 6e 76 65 72 73 .post.that.initiated.the.convers
44b20 61 74 69 6f 6e 20 69 73 20 61 6c 73 6f 20 63 61 6c 6c 65 64 20 61 20 70 6f 73 74 2e 0a 0a 20 20 ation.is.also.called.a.post.....
44b40 20 54 68 65 73 65 20 63 6f 6d 6d 61 6e 64 73 20 61 72 65 20 61 76 61 69 6c 61 62 6c 65 20 6f 6e .These.commands.are.available.on
44b60 6c 79 20 66 72 6f 6d 20 74 68 65 20 74 6f 70 69 63 20 62 75 66 66 65 72 20 28 69 2e 65 2e 2c 20 ly.from.the.topic.buffer.(i.e.,.
44b80 66 72 6f 6d 0a 74 68 65 20 62 75 66 66 65 72 20 74 68 61 74 20 73 68 6f 77 73 20 74 68 65 20 70 from.the.buffer.that.shows.the.p
44ba0 6f 73 74 73 20 6f 6e 20 61 20 74 6f 70 69 63 29 2e 20 20 4f 74 68 65 72 20 63 6f 6d 6d 61 6e 64 osts.on.a.topic)...Other.command
44bc0 73 20 74 68 61 74 20 61 6c 73 6f 0a 77 6f 72 6b 20 69 6e 20 6f 74 68 65 72 20 62 75 66 66 65 72 s.that.also.work.in.other.buffer
44be0 73 20 61 72 65 20 61 76 61 69 6c 61 62 6c 65 20 68 65 72 65 20 61 6c 73 6f 2e 20 20 46 6f 72 20 s.are.available.here.also...For.
44c00 65 78 61 6d 70 6c 65 20 e2 80 98 43 2d 63 20 43 2d 77 e2 80 99 20 6f 6e 0a 61 20 70 6f 73 74 20 example....C-c.C-w....on.a.post.
44c20 76 69 73 69 74 73 20 74 68 61 74 20 70 6f 73 74 20 69 6e 20 61 20 62 72 6f 77 73 65 72 2e 0a 0a visits.that.post.in.a.browser...
44c40 e2 80 98 43 2d 63 20 43 2d 6e e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 ...C-c.C-n....(...forge-create-p
44c60 6f 73 74 e2 80 99 29 0a e2 80 98 43 2d 63 20 43 2d 72 e2 80 99 0a 20 20 20 20 20 54 68 69 73 20 ost...)....C-c.C-r.........This.
44c80 63 6f 6d 6d 61 6e 64 20 61 6c 6c 6f 77 73 20 75 73 65 72 73 20 74 6f 20 63 72 65 61 74 65 20 61 command.allows.users.to.create.a
44ca0 20 6e 65 77 20 70 6f 73 74 20 6f 6e 20 61 6e 20 65 78 69 73 74 69 6e 67 0a 20 20 20 20 20 74 6f .new.post.on.an.existing......to
44cc0 70 69 63 2e 20 20 49 74 20 6f 70 65 6e 73 20 61 20 62 75 66 66 65 72 20 69 6e 20 77 68 69 63 68 pic...It.opens.a.buffer.in.which
44ce0 20 74 68 65 20 75 73 65 72 20 63 61 6e 20 77 72 69 74 65 20 74 68 65 20 70 6f 73 74 2e 0a 20 20 .the.user.can.write.the.post....
44d00 20 20 20 57 68 65 6e 20 74 68 65 20 70 6f 73 74 20 69 73 20 64 6f 6e 65 2c 20 74 68 65 6e 20 74 ...When.the.post.is.done,.then.t
44d20 68 65 20 75 73 65 72 20 68 61 73 20 74 6f 20 73 75 62 6d 69 74 20 75 73 69 6e 67 20 e2 80 98 43 he.user.has.to.submit.using....C
44d40 2d 63 20 43 2d 63 e2 80 99 2e 0a 0a 20 20 20 20 20 49 66 20 74 68 65 20 72 65 67 69 6f 6e 20 69 -c.C-c...........If.the.region.i
44d60 73 20 61 63 74 69 76 65 20 61 6e 64 20 6d 61 72 6b 73 20 70 61 72 74 20 6f 66 20 61 6e 20 65 78 s.active.and.marks.part.of.an.ex
44d80 69 73 74 69 6e 67 20 70 6f 73 74 2c 20 74 68 65 6e 0a 20 20 20 20 20 74 68 61 74 20 70 61 72 74 isting.post,.then......that.part
44da0 20 6f 66 20 74 68 65 20 70 6f 73 74 20 69 73 20 71 75 6f 74 65 64 2e 20 20 4f 74 68 65 72 77 69 .of.the.post.is.quoted...Otherwi
44dc0 73 65 2c 20 6f 72 20 69 66 20 61 20 70 72 65 66 69 78 0a 20 20 20 20 20 61 72 67 75 6d 65 6e 74 se,.or.if.a.prefix......argument
44de0 20 69 73 20 75 73 65 64 2c 20 74 68 65 6e 20 74 68 65 20 63 6f 6d 70 6c 65 74 65 20 70 6f 73 74 .is.used,.then.the.complete.post
44e00 20 74 68 61 74 20 70 6f 69 6e 74 20 69 73 20 63 75 72 72 65 6e 74 6c 79 20 6f 6e 0a 20 20 20 20 .that.point.is.currently.on.....
44e20 20 69 73 20 71 75 6f 74 65 64 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 61 20 70 6f .is.quoted......C-c.C-e.[on.a.po
44e40 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 2d 70 6f st.section]....(...forge-edit-po
44e60 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 74 73 20 st...)......This.command.visits.
44e80 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 65 20 62 an.existing.post.in.a.separate.b
44ea0 75 66 66 65 72 2e 20 20 57 68 65 6e 0a 20 20 20 20 20 74 68 65 20 63 68 61 6e 67 65 73 20 74 6f uffer...When......the.changes.to
44ec0 20 74 68 65 20 70 6f 73 74 20 61 72 65 20 64 6f 6e 65 2c 20 74 68 65 6e 20 74 68 65 20 75 73 65 .the.post.are.done,.then.the.use
44ee0 72 20 68 61 73 20 74 6f 20 73 75 62 6d 69 74 20 75 73 69 6e 67 0a 20 20 20 20 20 e2 80 98 43 2d r.has.to.submit.using.........C-
44f00 63 20 43 2d 63 e2 80 99 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 54 69 74 6c 65 c.C-c.........C-c.C-e.[on."Title
44f20 22 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 2d 74 6f 70 ".section]....(...forge-edit-top
44f40 69 63 2d 74 69 74 6c 65 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 72 ic-title...)......This.command.r
44f60 65 61 64 73 20 61 20 6e 65 77 20 74 69 74 6c 65 20 66 6f 72 20 61 6e 20 65 78 69 73 74 69 6e 67 eads.a.new.title.for.an.existing
44f80 20 74 6f 70 69 63 20 69 6e 20 74 68 65 0a 20 20 20 20 20 6d 69 6e 69 62 75 66 66 65 72 2e 0a 0a .topic.in.the......minibuffer...
44fa0 e2 80 98 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 53 74 61 74 65 22 20 73 65 63 74 69 6f 6e 5d e2 ...C-c.C-e.[on."State".section].
44fc0 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 65 64 69 74 2d 74 6f 70 69 63 2d 73 74 61 74 65 e2 80 99 ...(...forge-edit-topic-state...
44fe0 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 73 20 74 68 65 20 )......This.command.toggles.the.
45000 73 74 61 74 65 20 6f 66 20 61 6e 20 65 78 69 73 74 69 6e 67 20 74 6f 70 69 63 20 62 65 74 77 65 state.of.an.existing.topic.betwe
45020 65 6e 20 22 6f 70 65 6e 22 0a 20 20 20 20 20 61 6e 64 20 22 63 6c 6f 73 65 64 22 2e 0a 0a e2 80 en."open"......and."closed".....
45040 98 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 44 72 61 66 74 22 20 73 65 63 74 69 6f 6e 5d e2 80 99 .C-c.C-e.[on."Draft".section]...
45060 20 28 e2 80 98 66 6f 72 67 65 2d 65 64 69 74 2d 74 6f 70 69 63 2d 64 72 61 66 74 e2 80 99 29 0a .(...forge-edit-topic-draft...).
45080 20 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 .....This.command.toggles.whethe
450a0 72 20 61 6e 20 65 78 69 73 74 69 6e 67 20 74 6f 70 69 63 20 69 73 20 61 20 64 72 61 66 74 20 6f r.an.existing.topic.is.a.draft.o
450c0 72 20 6e 6f 74 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 4c 61 62 65 6c 73 22 20 r.not......C-c.C-e.[on."Labels".
450e0 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 2d 74 6f 70 69 63 section]....(...forge-edit-topic
45100 2d 6c 61 62 65 6c 73 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 72 65 -labels...)......This.command.re
45120 61 64 73 20 61 20 6c 69 73 74 20 6f 66 20 6c 61 62 65 6c 73 20 66 6f 72 20 61 6e 20 65 78 69 73 ads.a.list.of.labels.for.an.exis
45140 74 69 6e 67 20 74 6f 70 69 63 20 69 6e 20 74 68 65 0a 20 20 20 20 20 6d 69 6e 69 62 75 66 66 65 ting.topic.in.the......minibuffe
45160 72 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 4d 61 72 6b 73 22 20 73 65 63 74 69 r......C-c.C-e.[on."Marks".secti
45180 6f 6e 5d e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 65 64 69 74 2d 74 6f 70 69 63 2d 6d 61 72 6b on]....(...forge-edit-topic-mark
451a0 73 e2 80 99 29 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 s...)......This.command.reads.a.
451c0 6c 69 73 74 20 6f 66 20 6d 61 72 6b 73 20 66 6f 72 20 61 6e 20 65 78 69 73 74 69 6e 67 20 74 6f list.of.marks.for.an.existing.to
451e0 70 69 63 20 69 6e 20 74 68 65 0a 20 20 20 20 20 6d 69 6e 69 62 75 66 66 65 72 2e 0a 0a 20 20 20 pic.in.the......minibuffer......
45200 20 20 4d 61 72 6b 73 20 61 72 65 20 6c 69 6b 65 20 6c 61 62 65 6c 73 20 65 78 63 65 70 74 20 74 ..Marks.are.like.labels.except.t
45220 68 61 74 20 74 68 65 79 20 61 72 65 20 6e 6f 74 20 73 68 61 72 65 64 20 77 69 74 68 20 61 6e 79 hat.they.are.not.shared.with.any
45240 6f 6e 65 0a 20 20 20 20 20 65 6c 73 65 2e 20 20 54 6f 20 63 72 65 61 74 65 20 61 20 6d 61 72 6b one......else...To.create.a.mark
45260 20 74 68 61 74 20 74 6f 70 69 63 73 20 63 61 6e 20 73 75 62 73 65 71 75 65 6e 74 6c 79 20 62 65 .that.topics.can.subsequently.be
45280 20 6d 61 72 6b 65 64 20 77 69 74 68 0a 20 20 20 20 20 75 73 65 20 74 68 65 20 63 6f 6d 6d 61 6e .marked.with......use.the.comman
452a0 64 20 e2 80 98 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 6d 61 72 6b e2 80 99 2e 20 20 45 78 69 73 d....forge-create-mark......Exis
452c0 74 69 6e 67 20 6d 61 72 6b 73 20 63 61 6e 20 62 65 20 65 64 69 74 65 64 0a 20 20 20 20 20 75 73 ting.marks.can.be.edited......us
452e0 69 6e 67 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 e2 80 98 66 6f 72 67 65 2d 65 64 69 74 2d 6d 61 ing.the.command....forge-edit-ma
45300 72 6b e2 80 99 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 41 73 73 69 67 6e 65 65 rk.........C-c.C-e.[on."Assignee
45320 73 22 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 2d 74 6f s".section]....(...forge-edit-to
45340 70 69 63 2d 61 73 73 69 67 6e 65 65 73 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d pic-assignees...)......This.comm
45360 61 6e 64 20 72 65 61 64 73 20 61 20 6c 69 73 74 20 6f 66 20 61 73 73 69 67 6e 65 65 73 20 66 6f and.reads.a.list.of.assignees.fo
45380 72 20 61 6e 20 65 78 69 73 74 69 6e 67 20 74 6f 70 69 63 20 69 6e 20 74 68 65 0a 20 20 20 20 20 r.an.existing.topic.in.the......
453a0 6d 69 6e 69 62 75 66 66 65 72 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 52 65 76 minibuffer......C-c.C-e.[on."Rev
453c0 69 65 77 2d 52 65 71 75 65 73 74 73 22 20 73 65 63 74 69 6f 6e 5d e2 80 99 20 28 e2 80 98 66 6f iew-Requests".section]....(...fo
453e0 72 67 65 2d 65 64 69 74 2d 74 6f 70 69 63 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 e2 80 rge-edit-topic-review-requests..
45400 99 29 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 6c 69 73 .)......This.command.reads.a.lis
45420 74 20 6f 66 20 70 65 6f 70 6c 65 20 77 68 6f 20 79 6f 75 20 77 6f 75 6c 64 20 6c 69 6b 65 20 74 t.of.people.who.you.would.like.t
45440 6f 20 72 65 76 69 65 77 20 61 6e 0a 20 20 20 20 20 65 78 69 73 74 69 6e 67 20 74 6f 70 69 63 20 o.review.an......existing.topic.
45460 69 6e 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 65 20 5b in.the.minibuffer......C-c.C-e.[
45480 6f 6e 20 22 4e 6f 74 65 22 20 73 65 63 74 69 6f 6e 5d e2 80 99 0a e2 80 98 4d 2d 78 20 66 6f 72 on."Note".section].......M-x.for
454a0 67 65 2d 65 64 69 74 2d 74 6f 70 69 63 2d 6e 6f 74 65 e2 80 99 0a 20 20 20 20 20 54 68 69 73 20 ge-edit-topic-note.........This.
454c0 6c 65 74 73 20 79 6f 75 20 65 64 69 74 20 79 6f 75 72 20 70 72 69 76 61 74 65 20 6e 6f 74 65 20 lets.you.edit.your.private.note.
454e0 61 62 6f 75 74 20 61 20 74 6f 70 69 63 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 6b 20 5b 6f 6e 20 61 about.a.topic......C-c.C-k.[on.a
45500 20 63 6f 6d 6d 65 6e 74 20 73 65 63 74 69 6f 6e 5d e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 64 .comment.section]....(...forge-d
45520 65 6c 65 74 65 2d 63 6f 6d 6d 65 6e 74 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d elete-comment...)......This.comm
45540 61 6e 64 20 64 65 6c 65 74 65 73 20 74 68 65 20 63 6f 6d 6d 65 6e 74 20 61 74 20 70 6f 69 6e 74 and.deletes.the.comment.at.point
45560 2e 0a 0a e2 80 98 6d 20 4d 20 5b 69 66 20 65 6e 61 62 6c 65 64 5d e2 80 99 20 28 e2 80 98 66 6f ......m.M.[if.enabled]....(...fo
45580 72 67 65 2d 6d 65 72 67 65 e2 80 99 29 0a e2 80 98 4e 20 4d 20 5b 69 66 20 65 6e 61 62 6c 65 64 rge-merge...)....N.M.[if.enabled
455a0 5d e2 80 99 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6d 65 72 67 65 73 20 74 68 ].........This.command.merges.th
455c0 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 20 74 68 65 e.current.pull-request.using.the
455e0 20 66 6f 72 67 65 e2 80 99 73 20 41 50 49 2e 0a 20 20 20 20 20 49 66 20 74 68 65 72 65 20 69 73 .forge...s.API.......If.there.is
45600 20 6e 6f 20 63 75 72 72 65 6e 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 6f 72 20 77 69 74 68 .no.current.pull-request.or.with
45620 20 61 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 2c 20 74 68 65 6e 0a 20 20 20 20 20 69 74 .a.prefix.argument,.then......it
45640 20 72 65 61 64 73 20 61 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 74 6f 20 76 69 73 69 74 20 69 .reads.a.pull-request.to.visit.i
45660 6e 73 74 65 61 64 2e 0a 0a 20 20 20 20 20 54 68 65 20 22 6d 65 72 67 65 20 6d 65 74 68 6f 64 22 nstead........The."merge.method"
45680 20 74 6f 20 62 65 20 75 73 65 64 20 69 73 20 72 65 61 64 20 66 72 6f 6d 20 74 68 65 20 75 73 65 .to.be.used.is.read.from.the.use
456a0 72 2e 0a 0a 20 20 20 20 20 55 73 65 20 6f 66 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20 69 73 20 r........Use.of.this.command.is.
456c0 64 69 73 63 6f 75 72 61 67 65 64 2e 20 20 55 6e 6c 65 73 73 20 74 68 65 20 72 65 6d 6f 74 65 20 discouraged...Unless.the.remote.
456e0 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 69 73 20 63 6f 6e 66 69 67 75 72 65 64 20 74 6f repository......is.configured.to
45700 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 73 74 65 .disallow.that,.you.should.inste
45720 61 64 20 6d 65 72 67 65 20 6c 6f 63 61 6c 6c 79 0a 20 20 20 20 20 61 6e 64 20 74 68 65 6e 20 70 ad.merge.locally......and.then.p
45740 75 73 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 ush.the.target.branch...Forges.d
45760 65 74 65 63 74 20 74 68 61 74 20 79 6f 75 20 68 61 76 65 20 64 6f 6e 65 0a 20 20 20 20 20 74 68 etect.that.you.have.done......th
45780 61 74 20 61 6e 64 20 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 at.and.respond.by.automatically.
457a0 6d 61 72 6b 69 6e 67 20 74 68 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 61 73 0a 20 20 20 20 marking.the.pull-request.as.....
457c0 20 6d 65 72 67 65 64 2e 0a 0a 20 20 20 43 72 65 61 74 69 6e 67 20 61 20 6e 65 77 20 70 6f 73 74 .merged......Creating.a.new.post
457e0 20 61 6e 64 20 65 64 69 74 69 6e 67 20 61 6e 20 65 78 69 73 74 69 6e 67 20 70 6f 73 74 20 61 72 .and.editing.an.existing.post.ar
45800 65 20 73 69 6d 69 6c 61 72 20 74 6f 0a 63 72 65 61 74 69 6e 67 20 61 20 6e 65 77 20 63 6f 6d 6d e.similar.to.creating.a.new.comm
45820 69 74 20 61 6e 64 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 it.and.editing.the.message.of.an
45840 20 65 78 69 73 74 69 6e 67 20 63 6f 6d 6d 69 74 2e 20 20 49 6e 0a 62 6f 74 68 20 63 61 73 65 73 .existing.commit...In.both.cases
45860 20 74 68 65 20 6d 65 73 73 61 67 65 20 68 61 73 20 74 6f 20 62 65 20 77 72 69 74 74 65 6e 20 69 .the.message.has.to.be.written.i
45880 6e 20 61 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 20 61 6e 64 20 74 68 65 6e 0a 74 68 65 n.a.separate.buffer.and.then.the
458a0 20 70 72 6f 63 65 73 73 20 68 61 73 20 74 6f 20 62 65 20 66 69 6e 69 73 68 65 64 20 6f 72 20 63 .process.has.to.be.finished.or.c
458c0 61 6e 63 65 6c 65 64 20 75 73 69 6e 67 20 61 20 73 65 70 61 72 61 74 65 20 63 6f 6d 6d 61 6e 64 anceled.using.a.separate.command
458e0 2e 0a 0a 20 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 6f 6d 6d 61 6e 64 73 20 61 72 65 ......The.following.commands.are
45900 20 61 76 61 69 6c 61 62 6c 65 20 69 6e 20 62 75 66 66 65 72 73 20 75 73 65 64 20 74 6f 20 65 64 .available.in.buffers.used.to.ed
45920 69 74 20 70 6f 73 74 73 3a 0a 0a e2 80 98 43 2d 63 20 43 2d 63 e2 80 99 20 28 e2 80 98 66 6f 72 it.posts:.....C-c.C-c....(...for
45940 67 65 2d 70 6f 73 74 2d 73 75 62 6d 69 74 e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d ge-post-submit...)......This.com
45960 6d 61 6e 64 20 73 75 62 6d 69 74 73 20 74 68 65 20 70 6f 73 74 20 74 68 61 74 20 69 73 20 62 65 mand.submits.the.post.that.is.be
45980 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 0a 20 20 20 20 20 62 ing.edited.in.the.current......b
459a0 75 66 66 65 72 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 6b e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d uffer......C-c.C-k....(...forge-
459c0 70 6f 73 74 2d 63 61 6e 63 65 6c e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e post-cancel...)......This.comman
459e0 64 20 63 61 6e 63 65 6c 73 20 74 68 65 20 70 6f 73 74 20 74 68 61 74 20 69 73 20 62 65 69 6e 67 d.cancels.the.post.that.is.being
45a00 20 65 64 69 74 65 64 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 0a 20 20 20 20 20 62 75 66 66 .edited.in.the.current......buff
45a20 65 72 2e 0a 0a e2 80 98 43 2d 63 20 43 2d 65 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 70 6f 73 er......C-c.C-e....(...forge-pos
45a40 74 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 t-dispatch...)......This.prefix.
45a60 63 6f 6d 6d 61 6e 64 20 66 65 61 74 75 72 65 73 20 74 68 65 20 61 62 6f 76 65 20 74 77 6f 20 63 command.features.the.above.two.c
45a80 6f 6d 6d 61 6e 64 73 20 61 73 20 73 75 66 66 69 78 65 73 2c 0a 20 20 20 20 20 61 6e 64 20 77 68 ommands.as.suffixes,......and.wh
45aa0 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 20 61 6c 73 6f 20 en.creating.a.pull-request.also.
45ac0 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 6f 6d 6d 61 6e 64 2e 20 20 4d 6f 72 65 0a 20 20 20 the.following.command...More....
45ae0 20 20 73 75 66 66 69 78 20 63 6f 6d 6d 61 6e 64 73 20 77 69 6c 6c 20 6c 69 6b 65 6c 79 20 62 65 ..suffix.commands.will.likely.be
45b00 20 61 64 64 65 64 20 69 6e 20 74 68 65 20 66 75 74 75 72 65 2e 0a 0a e2 80 98 43 2d 63 20 43 2d .added.in.the.future......C-c.C-
45b20 65 20 64 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 70 6f 73 74 2d 74 6f 67 67 6c 65 2d 64 72 61 e.d....(...forge-post-toggle-dra
45b40 66 74 e2 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 73 ft...)......This.command.toggles
45b60 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 69 6e 67 20 .whether.the.pull-request.being.
45b80 63 72 65 61 74 65 64 20 69 73 20 61 0a 20 20 20 20 20 64 72 61 66 74 2e 0a 0a 1f 0a 46 69 6c 65 created.is.a......draft.....File
45ba0 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 65 6f :.forge.info,..Node:.Miscellaneo
45bc0 75 73 2c 20 20 50 72 65 76 3a 20 57 6f 72 6b 69 6e 67 20 77 69 74 68 20 54 6f 70 69 63 73 2c 20 us,..Prev:.Working.with.Topics,.
45be0 20 55 70 3a 20 55 73 61 67 65 0a 0a 34 2e 34 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 0a 3d 3d .Up:.Usage..4.4.Miscellaneous.==
45c00 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a e2 80 98 4e 20 63 20 66 e2 80 99 20 28 e2 80 ===============.....N.c.f....(..
45c20 98 66 6f 72 67 65 2d 66 6f 72 6b e2 80 99 29 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e .forge-fork...)......This.comman
45c40 64 20 61 64 64 73 20 61 6e 20 61 64 64 69 74 69 6f 6e 61 6c 20 72 65 6d 6f 74 65 20 74 6f 20 74 d.adds.an.additional.remote.to.t
45c60 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 20 20 20 20 20 54 68 65 20 he.current.repository.......The.
45c80 72 65 6d 6f 74 65 20 63 61 6e 20 65 69 74 68 65 72 20 70 6f 69 6e 74 20 61 74 20 61 6e 20 65 78 remote.can.either.point.at.an.ex
45ca0 69 73 74 69 6e 67 20 72 65 70 6f 73 69 74 6f 72 79 20 6f 72 20 6f 6e 65 20 74 68 61 74 0a 20 20 isting.repository.or.one.that...
45cc0 20 20 20 68 61 73 20 74 6f 20 62 65 20 63 72 65 61 74 65 64 20 66 69 72 73 74 20 62 79 20 66 6f ...has.to.be.created.first.by.fo
45ce0 72 6b 69 6e 67 20 69 74 20 74 6f 20 61 6e 20 61 63 63 6f 75 6e 74 20 74 68 65 20 75 73 65 72 20 rking.it.to.an.account.the.user.
45d00 68 61 73 0a 20 20 20 20 20 61 63 63 65 73 73 20 74 6f 2e 0a 0a 20 20 20 20 20 43 75 72 72 65 6e has......access.to........Curren
45d20 74 6c 79 20 74 68 69 73 20 6f 6e 6c 79 20 73 75 70 70 6f 72 74 73 20 47 69 74 68 75 62 20 61 6e tly.this.only.supports.Github.an
45d40 64 20 47 69 74 6c 61 62 2e 0a 0a e2 80 98 4e 20 61 e2 80 99 20 28 e2 80 98 66 6f 72 67 65 2d 61 d.Gitlab......N.a....(...forge-a
45d60 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 63 6f 6d 6d dd-repository...)......This.comm
45d80 61 6e 64 20 72 65 61 64 73 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 66 72 6f 6d 20 74 68 65 20 and.reads.a.repository.from.the.
45da0 75 73 65 72 20 61 6e 64 20 61 64 64 73 20 69 74 20 74 6f 20 74 68 65 0a 20 20 20 20 20 64 61 74 user.and.adds.it.to.the......dat
45dc0 61 62 61 73 65 2e 20 20 54 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 63 61 6e 20 62 65 20 70 72 abase...The.repository.can.be.pr
45de0 6f 76 69 64 65 64 20 61 73 20 61 20 55 52 4c 2c 20 61 20 6e 61 6d 65 2c 20 6f 72 20 69 6e 0a 20 ovided.as.a.URL,.a.name,.or.in..
45e00 20 20 20 20 74 68 65 20 66 6f 72 6d 20 4f 57 4e 45 52 2f 4e 41 4d 45 2e 20 20 54 68 69 73 20 69 ....the.form.OWNER/NAME...This.i
45e20 73 20 73 75 62 6a 65 63 74 20 74 6f 20 e2 80 98 6d 61 67 69 74 2d 63 6c 6f 6e 65 2d 6e 61 6d 65 s.subject.to....magit-clone-name
45e40 2d 61 6c 69 73 74 e2 80 99 2e 0a 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6f 66 -alist...........This.command.of
45e60 66 65 72 73 20 74 6f 20 65 69 74 68 65 72 20 70 75 6c 6c 20 74 6f 70 69 63 73 20 28 6e 6f 77 20 fers.to.either.pull.topics.(now.
45e80 61 6e 64 20 69 6e 20 74 68 65 20 66 75 74 75 72 65 29 0a 20 20 20 20 20 6f 72 20 74 6f 20 6f 6e and.in.the.future)......or.to.on
45ea0 6c 79 20 70 75 6c 6c 20 69 6e 64 69 76 69 64 75 61 6c 20 74 6f 70 69 63 73 20 77 68 65 6e 20 74 ly.pull.individual.topics.when.t
45ec0 68 65 20 75 73 65 72 20 69 6e 76 6f 6b 65 73 0a 20 20 20 20 20 e2 80 98 66 6f 72 67 65 2d 70 75 he.user.invokes.........forge-pu
45ee0 6c 6c 2d 74 6f 70 69 63 e2 80 99 2e 0a 0a e2 80 98 4e 20 74 20 74 e2 80 99 20 28 e2 80 98 66 6f ll-topic.........N.t.t....(...fo
45f00 72 67 65 2d 74 6f 67 67 6c 65 2d 64 69 73 70 6c 61 79 2d 69 6e 2d 73 74 61 74 75 73 2d 62 75 66 rge-toggle-display-in-status-buf
45f20 66 65 72 e2 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 fer...)......This.command.toggle
45f40 73 20 77 68 65 74 68 65 72 20 61 6e 79 20 74 6f 70 69 63 73 20 61 72 65 20 64 69 73 70 6c 61 79 s.whether.any.topics.are.display
45f60 65 64 20 69 6e 20 74 68 65 0a 20 20 20 20 20 63 75 72 72 65 6e 74 20 4d 61 67 69 74 20 73 74 61 ed.in.the......current.Magit.sta
45f80 74 75 73 20 62 75 66 66 65 72 2e 0a 0a e2 80 98 4e 20 74 20 63 e2 80 99 20 28 e2 80 98 66 6f 72 tus.buffer......N.t.c....(...for
45fa0 67 65 2d 74 6f 67 67 6c 65 2d 63 6c 6f 73 65 64 2d 76 69 73 69 62 69 6c 69 74 79 e2 80 99 29 0a ge-toggle-closed-visibility...).
45fc0 20 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 .....This.command.toggles.whethe
45fe0 72 20 63 6c 6f 73 65 64 20 74 6f 70 69 63 73 20 61 72 65 20 73 68 6f 77 6e 20 69 6e 20 74 68 65 r.closed.topics.are.shown.in.the
46000 20 4d 61 67 69 74 0a 20 20 20 20 20 73 74 61 74 75 73 20 62 75 66 66 65 72 2e 0a 0a 20 2d 2d 20 .Magit......status.buffer....--.
46020 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 61 64 64 2d 75 73 65 72 2d 72 65 70 6f 73 69 74 6f Command:.forge-add-user-reposito
46040 72 69 65 73 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 68 ries......This.command.reads.a.h
46060 6f 73 74 20 61 6e 64 20 61 20 75 73 65 72 6e 61 6d 65 20 66 72 6f 6d 20 74 68 65 20 75 73 65 72 ost.and.a.username.from.the.user
46080 20 61 6e 64 20 61 64 64 73 20 61 6c 6c 0a 20 20 20 20 20 6f 66 20 74 68 61 74 20 75 73 65 72 e2 .and.adds.all......of.that.user.
460a0 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 74 20 74 6f ..s.repositories.on.that.host.to
460c0 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 2e 0a 0a 20 20 20 20 20 54 68 69 73 20 .the.local.database........This.
460e0 6d 61 79 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 may.take.a.while...Only.Github.i
46100 73 20 73 75 70 70 6f 72 74 65 64 20 61 74 20 74 68 65 20 6d 6f 6d 65 6e 74 2e 0a 0a 20 2d 2d 20 s.supported.at.the.moment....--.
46120 43 6f 6d 6d 61 6e 64 3a 20 66 6f 72 67 65 2d 61 64 64 2d 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 2d Command:.forge-add-organization-
46140 72 65 70 6f 73 69 74 6f 72 69 65 73 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 72 repositories......This.command.r
46160 65 61 64 73 20 61 20 68 6f 73 74 20 61 6e 64 20 61 6e 20 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 20 eads.a.host.and.an.organization.
46180 66 72 6f 6d 20 74 68 65 20 75 73 65 72 20 61 6e 64 0a 20 20 20 20 20 61 64 64 73 20 61 6c 6c 20 from.the.user.and......adds.all.
461a0 74 68 65 20 6f 72 67 61 6e 69 7a 61 74 69 6f 6e e2 80 99 73 20 72 65 70 6f 73 69 74 6f 72 69 65 the.organization...s.repositorie
461c0 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 0a 20 20 20 20 s.on.that.host.to.the.local.....
461e0 20 64 61 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 .database........This.may.take.a
46200 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 75 70 70 6f 72 74 65 .while...Only.Github.is.supporte
46220 64 20 61 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 d.at.the.moment....--.Command:.f
46240 6f 72 67 65 2d 72 65 6d 6f 76 65 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 54 68 69 73 orge-remove-repository......This
46260 20 63 6f 6d 6d 61 6e 64 20 72 65 61 64 73 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 61 6e 64 20 .command.reads.a.repository.and.
46280 72 65 6d 6f 76 65 73 20 69 74 20 66 72 6f 6d 20 74 68 65 20 6c 6f 63 61 6c 0a 20 20 20 20 20 64 removes.it.from.the.local......d
462a0 61 74 61 62 61 73 65 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 atabase....--.Command:.forge-rem
462c0 6f 76 65 2d 74 6f 70 69 63 2d 6c 6f 63 61 6c 6c 79 0a 20 20 20 20 20 54 68 69 73 20 63 6f 6d 6d ove-topic-locally......This.comm
462e0 61 6e 64 20 72 65 61 64 73 20 61 20 74 6f 70 69 63 20 61 6e 64 20 72 65 6d 6f 76 65 73 20 69 74 and.reads.a.topic.and.removes.it
46300 20 66 72 6f 6d 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 2e 0a 20 20 20 20 20 54 .from.the.local.database.......T
46320 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 20 74 68 65 he.topic.is.not.removed.from.the
46340 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 20 20 20 20 .forge.and,.if.it.is.later......
46360 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 64 65 64 20 modified,.then.it.will.be.added.
46380 74 6f 20 74 68 65 20 64 61 74 61 62 61 73 65 20 61 67 61 69 6e 2e 0a 0a 20 20 20 20 20 44 75 65 to.the.database.again........Due
463a0 20 74 6f 20 68 6f 77 20 74 68 65 20 73 75 70 70 6f 72 74 65 64 20 41 50 49 73 20 77 6f 72 6b 2c .to.how.the.supported.APIs.work,
463c0 20 69 74 20 77 6f 75 6c 64 20 62 65 20 74 6f 6f 20 65 78 70 65 6e 73 69 76 65 20 74 6f 0a 20 20 .it.would.be.too.expensive.to...
463e0 20 20 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 72 65 6d 6f 76 65 20 74 6f 70 69 63 73 20 66 ...automatically.remove.topics.f
46400 72 6f 6d 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 20 74 68 61 74 20 77 65 72 65 rom.the.local.database.that.were
46420 0a 20 20 20 20 20 72 65 6d 6f 76 65 64 20 66 72 6f 6d 20 74 68 65 20 66 6f 72 67 65 2e 20 20 54 ......removed.from.the.forge...T
46440 68 65 20 6f 6e 6c 79 20 70 75 72 70 6f 73 65 20 6f 66 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20 he.only.purpose.of.this.command.
46460 69 73 20 74 6f 0a 20 20 20 20 20 61 6c 6c 6f 77 20 79 6f 75 20 74 6f 20 6d 61 6e 75 61 6c 6c 79 is.to......allow.you.to.manually
46480 20 63 6c 65 61 6e 20 75 70 20 74 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 2e 0a 0a 20 .clean.up.the.local.database....
464a0 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 61 73 65 --.Command:.forge-reset-database
464c0 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 63 75 72 ......This.command.moves.the.cur
464e0 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 73 68 20 rent.database.file.to.the.trash.
46500 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 64 61 74 and......creates.a.new.empty.dat
46520 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 66 74 65 abase........This.is.useful.afte
46540 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 6d 61 74 r.the.database...s.table.schemat
46560 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 6c 6c 20 a.have.changed,......which.will.
46580 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 46 6f 72 happen.a.few.times.while.the.For
465a0 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 6c 20 75 ge.functionality.is......still.u
465c0 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 6c 65 3a nder.heavy.development.....File:
465e0 20 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 .forge.info,..Node:.FAQ,..Next:.
46600 4b 65 79 73 74 72 6f 6b 65 20 49 6e 64 65 78 2c 20 20 50 72 65 76 3a 20 55 73 61 67 65 2c 20 20 Keystroke.Index,..Prev:.Usage,..
46620 55 70 3a 20 54 6f 70 0a 0a 41 70 70 65 6e 64 69 78 20 41 20 46 41 51 0a 2a 2a 2a 2a 2a 2a 2a 2a Up:.Top..Appendix.A.FAQ.********
46640 2a 2a 2a 2a 2a 2a 0a 0a 54 68 69 73 20 73 65 63 74 69 6f 6e 20 6c 69 73 74 73 20 73 6f 6d 65 20 ******..This.section.lists.some.
46660 66 72 65 71 75 65 6e 74 6c 79 20 61 73 6b 65 64 20 71 75 65 73 74 69 6f 6e 73 2e 20 20 50 6c 65 frequently.asked.questions...Ple
46680 61 73 65 20 61 6c 73 6f 20 73 65 65 0a 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d ase.also.see.<https://github.com
466a0 2f 6d 61 67 69 74 2f 66 6f 72 67 65 2f 77 69 6b 69 2f 46 41 51 3e 20 66 6f 72 20 61 6e 20 65 78 /magit/forge/wiki/FAQ>.for.an.ex
466c0 74 65 6e 64 65 64 20 6c 69 73 74 20 6f 66 20 63 6f 6d 6d 6f 6e 0a 69 73 73 75 65 73 2e 0a 0a 2a tended.list.of.common.issues...*
466e0 20 4d 65 6e 75 3a 0a 0a 2a 20 49 73 20 69 74 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 63 72 65 61 .Menu:..*.Is.it.possible.to.crea
46700 74 65 20 61 20 73 69 6e 67 6c 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 77 69 74 68 6f 75 74 te.a.single.pull-request.without
46720 20 70 75 6c 6c 69 6e 67 20 65 76 65 72 79 74 68 69 6e 67 3f 3a 3a 0a 2a 20 e2 80 98 65 72 72 6f .pulling.everything?::.*....erro
46740 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 72 6f 72 20 35 r.in.process.filter.HTTP.Error.5
46760 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 20 69 6e 20 70 02,."Bad.gateway"...:.error.in.p
46780 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 20 22 42 61 rocess.filter.HTTP.Error.502."Ba
467a0 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 69 6e 66 6f 2c d.gateway".....File:.forge.info,
467c0 20 20 4e 6f 64 65 3a 20 49 73 20 69 74 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 63 72 65 61 74 65 ..Node:.Is.it.possible.to.create
467e0 20 61 20 73 69 6e 67 6c 65 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 77 69 74 68 6f 75 74 20 70 .a.single.pull-request.without.p
46800 75 6c 6c 69 6e 67 20 65 76 65 72 79 74 68 69 6e 67 3f 2c 20 20 4e 65 78 74 3a 20 65 72 72 6f 72 ulling.everything?,..Next:.error
46820 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
46840 32 20 22 42 61 64 20 67 61 74 65 77 61 79 22 2c 20 20 55 70 3a 20 46 41 51 0a 0a 41 2e 31 20 49 2."Bad.gateway",..Up:.FAQ..A.1.I
46860 73 20 69 74 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 63 72 65 61 74 65 20 61 20 73 69 6e 67 6c 65 s.it.possible.to.create.a.single
46880 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 77 69 74 68 6f 75 74 20 70 75 6c 6c 69 6e 67 20 65 76 .pull-request.without.pulling.ev
468a0 65 72 79 74 68 69 6e 67 3f 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d erything?.======================
468c0 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 ================================
468e0 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 59 65 73 2e 20 20 ========================..Yes...
46900 e2 80 98 4d 2d 78 20 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 e2 80 99 20 6f ...M-x.forge-add-repository....o
46920 66 66 65 72 73 20 74 6f 20 61 64 64 20 61 20 72 65 70 6f 73 69 74 6f 72 79 20 74 6f 20 74 68 65 ffers.to.add.a.repository.to.the
46940 0a 64 61 74 61 62 61 73 65 20 77 69 74 68 6f 75 74 20 61 6c 73 6f 20 66 65 74 63 68 69 6e 67 20 .database.without.also.fetching.
46960 61 6c 6c 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 61 6e 64 20 69 73 73 75 65 73 2e 0a 0a 1f all.pull-requests.and.issues....
46980 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 65 72 72 6f 72 20 .File:.forge.info,..Node:.error.
469a0 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 32 in.process.filter.HTTP.Error.502
469c0 20 22 42 61 64 20 67 61 74 65 77 61 79 22 2c 20 20 50 72 65 76 3a 20 49 73 20 69 74 20 70 6f 73 ."Bad.gateway",..Prev:.Is.it.pos
469e0 73 69 62 6c 65 20 74 6f 20 63 72 65 61 74 65 20 61 20 73 69 6e 67 6c 65 20 70 75 6c 6c 2d 72 65 sible.to.create.a.single.pull-re
46a00 71 75 65 73 74 20 77 69 74 68 6f 75 74 20 70 75 6c 6c 69 6e 67 20 65 76 65 72 79 74 68 69 6e 67 quest.without.pulling.everything
46a20 3f 2c 20 20 55 70 3a 20 46 41 51 0a 0a 41 2e 32 20 e2 80 98 65 72 72 6f 72 20 69 6e 20 70 72 6f ?,..Up:.FAQ..A.2....error.in.pro
46a40 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
46a60 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"....=================
46a80 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 ================================
46aa0 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
46ac0 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
46ae0 20 66 6f 72 6d 61 74 74 69 6e 67 20 74 68 65 20 66 75 6c 6c 0a 65 72 72 6f 72 20 69 73 3a 0a 0a .formatting.the.full.error.is:..
46b00 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 68 .....error.in.process.filter:.gh
46b20 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 30 ub--signal-error:.HTTP.Error:.50
46b40 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 68 2,........"Bad.gateway",."/graph
46b60 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 20 ql",........((data..."null")....
46b80 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 68 .....(errors.((message..."Someth
46ba0 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 79 ing.went.wrong.while.executing.y
46bc0 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 62 our.query.............This.may.b
46be0 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 74 e.the.result.of.a.timeout,.or.it
46c00 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 20 .could.be.a.GitHub.bug..........
46c20 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 37 ...Please.include.`CC2C:4FEA:A17
46c40 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 20 71C1:CBF40CE:5C33F7E5`..........
46c60 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 29 ..when.reporting.this.issue.")))
46c80 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 68 ).....This.indicates.that.someth
46ca0 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 73 ing.went.wrong.within.Github...s
46cc0 20 6e 65 74 77 6f 72 6b 2e 0a 53 65 65 0a 3c 68 74 74 70 73 3a 2f 2f 65 6e 2e 77 69 6b 69 70 65 .network..See.<https://en.wikipe
46ce0 64 69 61 2e 6f 72 67 2f 77 69 6b 69 2f 4c 69 73 74 5f 6f 66 5f 48 54 54 50 5f 73 74 61 74 75 73 dia.org/wiki/List_of_HTTP_status
46d00 5f 63 6f 64 65 73 23 35 78 78 5f 73 65 72 76 65 72 5f 65 72 72 6f 72 73 3e 2e 0a 54 68 65 20 61 _codes#5xx_server_errors>..The.a
46d20 70 70 65 6e 64 65 64 20 65 72 72 6f 72 20 6d 65 73 73 61 67 65 20 61 6c 73 6f 20 73 61 79 73 20 ppended.error.message.also.says.
46d40 61 73 20 6d 75 63 68 3a 20 22 54 68 69 73 20 6d 61 79 20 62 65 20 74 68 65 20 72 65 73 75 6c 74 as.much:."This.may.be.the.result
46d60 20 6f 66 0a 61 20 74 69 6d 65 6f 75 74 2c 20 6f 72 20 69 74 20 63 6f 75 6c 64 20 62 65 20 61 20 .of.a.timeout,.or.it.could.be.a.
46d80 47 69 74 48 75 62 20 62 75 67 2e 22 0a 0a 20 20 20 49 74 20 61 70 70 65 61 72 73 20 74 68 61 74 GitHub.bug.".....It.appears.that
46da0 20 74 68 69 73 20 68 61 70 70 65 6e 73 20 6d 6f 72 65 20 6f 66 74 65 6e 20 69 6e 20 62 69 67 20 .this.happens.more.often.in.big.
46dc0 72 65 70 6f 73 69 74 6f 72 69 65 73 2c 0a 65 73 70 65 63 69 61 6c 6c 79 20 64 75 72 69 6e 67 20 repositories,.especially.during.
46de0 74 68 65 20 69 6e 69 74 69 61 6c 20 70 75 6c 6c 2c 20 62 75 74 20 74 68 69 73 20 6d 61 79 20 62 the.initial.pull,.but.this.may.b
46e00 65 20 61 6e 20 69 6c 6c 75 73 69 6f 6e 3b 20 69 74 20 69 73 0a 6b 6e 6f 77 6e 20 74 6f 20 61 6c e.an.illusion;.it.is.known.to.al
46e20 73 6f 20 68 61 70 70 65 6e 73 20 66 6f 72 20 73 6d 61 6c 6c 65 72 2c 20 69 6e 63 72 65 6d 65 6e so.happens.for.smaller,.incremen
46e40 74 61 6c 20 72 65 71 75 65 73 74 73 2e 0a 0a 20 20 20 49 20 62 65 6c 69 65 76 65 20 74 68 61 74 tal.requests......I.believe.that
46e60 20 6d 6f 72 65 20 64 61 74 61 20 6a 75 73 74 20 6d 65 61 6e 73 20 6d 6f 72 65 20 72 65 71 75 65 .more.data.just.means.more.reque
46e80 73 74 73 20 61 6e 64 20 74 68 75 73 20 6d 6f 72 65 0a 6f 70 70 6f 72 74 75 6e 69 74 69 65 73 20 sts.and.thus.more.opportunities.
46ea0 66 6f 72 20 74 68 69 6e 67 73 20 74 6f 20 67 6f 20 77 72 6f 6e 67 2e 20 20 49 74 20 73 65 65 6d for.things.to.go.wrong...It.seem
46ec0 73 20 75 6e 6c 69 6b 65 6c 79 20 74 68 61 74 20 74 68 69 73 20 69 73 0a 64 75 65 20 74 6f 20 75 s.unlikely.that.this.is.due.to.u
46ee0 73 20 72 65 71 75 65 73 74 69 6e 67 20 74 6f 6f 20 6d 75 63 68 20 64 61 74 61 20 61 74 20 6f 6e s.requesting.too.much.data.at.on
46f00 63 65 20 28 69 6e 20 74 68 61 74 20 63 61 73 65 20 77 65 20 77 6f 75 6c 64 20 67 65 74 20 61 0a ce.(in.that.case.we.would.get.a.
46f20 64 69 66 66 65 72 65 6e 74 20 65 72 72 6f 72 20 66 72 6f 6d 20 47 72 61 70 68 51 4c 2c 20 6e 6f different.error.from.GraphQL,.no
46f40 74 20 48 54 54 50 29 2e 20 57 68 65 6e 20 66 65 74 63 68 69 6e 67 20 6c 6f 74 73 20 6f 66 20 64 t.HTTP)..When.fetching.lots.of.d
46f60 61 74 61 2c 0a 74 68 65 6e 20 77 65 20 64 6f 20 6e 6f 74 20 72 65 71 75 65 73 74 20 6f 6e 65 20 ata,.then.we.do.not.request.one.
46f80 6c 61 72 67 65 20 72 65 73 70 6f 6e 73 65 20 62 75 74 20 6d 61 6b 65 20 6d 61 6e 79 20 72 65 71 large.response.but.make.many.req
46fa0 75 65 73 74 73 20 61 6e 64 20 77 65 0a 74 68 65 6e 20 63 6f 6c 6c 65 63 74 20 74 68 65 20 6d 61 uests.and.we.then.collect.the.ma
46fc0 6e 79 20 72 65 73 70 6f 6e 73 65 73 20 28 70 61 67 69 6e 61 74 69 6f 6e 20 66 6f 72 63 65 73 20 ny.responses.(pagination.forces.
46fe0 75 73 20 74 6f 20 64 6f 20 74 68 61 74 29 2e 0a 0a 20 20 20 54 68 65 20 74 69 6d 65 6f 75 74 20 us.to.do.that)......The.timeout.
47000 6d 61 79 20 62 65 20 64 75 65 20 74 6f 20 6d 61 6e 79 20 72 65 71 75 65 73 74 73 20 66 72 6f 6d may.be.due.to.many.requests.from
47020 20 6f 74 68 65 72 20 70 65 6f 70 6c 65 20 61 72 72 69 76 69 6e 67 20 61 74 0a 73 6f 6d 65 20 47 .other.people.arriving.at.some.G
47040 69 74 68 75 62 2d 69 6e 74 65 72 6e 61 6c 20 62 6f 74 74 6c 65 6e 65 63 6b 20 61 74 20 74 68 65 ithub-internal.bottleneck.at.the
47060 20 73 61 6d 65 20 74 69 6d 65 2c 20 6f 72 20 69 74 20 6d 61 79 20 62 65 20 64 75 65 20 74 6f 0a .same.time,.or.it.may.be.due.to.
47080 63 6f 6c 64 20 63 61 63 68 65 73 20 61 6e 64 20 6f 76 65 72 6c 79 20 61 67 67 72 65 73 73 69 76 cold.caches.and.overly.aggressiv
470a0 65 20 74 69 6d 65 6f 75 74 73 2e 20 20 57 65 20 6a 75 73 74 20 64 6f 6e e2 80 99 74 20 6b 6e 6f e.timeouts...We.just.don...t.kno
470c0 77 3b 20 69 74 e2 80 99 73 0a 74 68 65 69 72 20 69 6e 66 72 61 73 74 72 75 63 74 75 72 65 2e 0a w;.it...s.their.infrastructure..
470e0 0a 20 20 20 54 68 65 20 73 65 63 6f 6e 64 20 70 72 6f 62 6c 65 6d 20 69 73 20 74 68 61 74 20 77 ....The.second.problem.is.that.w
47100 65 20 63 75 72 72 65 6e 74 6c 79 20 73 69 6d 70 6c 79 20 65 72 72 6f 72 20 6f 75 74 20 69 66 20 e.currently.simply.error.out.if.
47120 77 65 20 67 65 74 0a 74 68 69 73 20 65 72 72 6f 72 2e 20 20 54 68 69 73 20 63 6f 75 6c 64 20 62 we.get.this.error...This.could.b
47140 65 20 63 68 61 6e 67 65 64 20 61 6e 64 20 65 76 65 6e 74 75 61 6c 6c 79 20 69 74 20 77 69 6c 6c e.changed.and.eventually.it.will
47160 20 62 65 2c 20 62 75 74 20 66 6f 72 0a 74 68 65 20 74 69 6d 65 20 62 65 69 6e 67 20 79 6f 75 72 .be,.but.for.the.time.being.your
47180 20 6f 6e 6c 79 20 6f 70 74 69 6f 6e 20 69 73 20 74 6f 20 6a 75 73 74 20 74 72 79 20 61 67 61 69 .only.option.is.to.just.try.agai
471a0 6e 2c 20 70 6f 73 73 69 62 6c 79 0a 72 65 70 65 61 74 65 64 6c 79 20 61 6e 64 20 70 6f 73 73 69 n,.possibly.repeatedly.and.possi
471c0 62 6c 79 20 61 66 74 65 72 20 61 20 64 65 6c 61 79 20 74 6f 20 67 69 76 65 20 77 68 61 74 65 76 bly.after.a.delay.to.give.whatev
471e0 65 72 20 63 6f 6e 67 65 73 74 69 6f 6e 20 6d 61 79 0a 65 78 69 73 74 20 6f 6e 20 74 68 65 20 6f er.congestion.may.exist.on.the.o
47200 74 68 65 72 20 65 6e 64 20 61 20 63 68 61 6e 63 65 20 74 6f 20 63 6c 65 61 72 20 6f 72 20 74 6f ther.end.a.chance.to.clear.or.to
47220 20 67 69 76 65 20 74 68 65 69 72 20 63 61 63 68 65 73 20 61 0a 63 68 61 6e 63 65 20 74 6f 20 77 .give.their.caches.a.chance.to.w
47240 61 72 6d 20 75 70 2e 0a 0a 20 20 20 54 68 69 73 20 77 61 73 20 61 6c 73 6f 20 64 69 73 63 75 73 arm.up......This.was.also.discus
47260 73 65 64 20 69 6e 20 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 sed.in.<https://github.com/magit
47280 2f 66 6f 72 67 65 2f 69 73 73 75 65 73 2f 32 30 3e 0a 61 6e 64 20 3c 68 74 74 70 73 3a 2f 2f 67 /forge/issues/20>.and.<https://g
472a0 69 74 68 75 62 2e 63 6f 6d 2f 6d 61 67 69 74 2f 67 68 75 62 2f 69 73 73 75 65 73 2f 38 33 3e 2e ithub.com/magit/ghub/issues/83>.
472c0 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 4b 65 79 ....File:.forge.info,..Node:.Key
472e0 73 74 72 6f 6b 65 20 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 stroke.Index,..Next:.Function.an
47300 64 20 43 6f 6d 6d 61 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 d.Command.Index,..Prev:.FAQ,..Up
47320 3a 20 54 6f 70 0a 0a 41 70 70 65 6e 64 69 78 20 42 20 4b 65 79 73 74 72 6f 6b 65 20 49 6e 64 65 :.Top..Appendix.B.Keystroke.Inde
47340 78 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 0a 0a 00 08 x.**************************....
47360 5b 69 6e 64 65 78 00 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 [index..].*.Menu:..*.b.F:.......
47380 20 20 20 20 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 61 6e ............................Bran
473a0 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 29 0a 2a 20 62 20 ching............(line..13).*.b.
473c0 66 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 f:..............................
473e0 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 69 6e 65 20 .....Branching............(line.
47400 31 30 32 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 20 20 102).*.C-c.C-c:.................
47420 20 20 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 20 61 6e 64 ..............Editing.Topics.and
47440 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..........................
47460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47480 20 20 20 20 20 20 28 6c 69 6e 65 20 20 39 32 29 0a 2a 20 43 2d 63 20 43 2d 65 3a 20 20 20 20 20 ......(line..92).*.C-c.C-e:.....
474a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 64 69 74 69 6e ..........................Editin
474c0 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 20 20 g.Topics.and.Posts..............
474e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 31 30 30 29 0a 2a 20 43 ..................(line.100).*.C
47520 2d 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 -c.C-e.d:.......................
47540 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a ......Editing.Topics.and.Posts..
47560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47580 20 20 20 20 20 20 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
475a0 69 6e 65 20 31 30 35 29 0a 2a 20 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 41 73 73 69 67 6e 65 65 ine.105).*.C-c.C-e.[on."Assignee
475c0 73 22 20 73 65 63 74 69 6f 6e 5d 3a 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 s".section]:......Editing.Topics
475e0 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......................
47600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47620 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 35 36 29 0a 2a 20 43 2d 63 20 43 2d 65 20 5b ..........(line..56).*.C-c.C-e.[
47640 6f 6e 20 22 44 72 61 66 74 22 20 73 65 63 74 69 6f 6e 5d 3a 20 20 20 20 20 20 20 20 20 20 45 64 on."Draft".section]:..........Ed
47660 69 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 20 iting.Topics.and.Posts..........
47680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
476a0 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 34 30 29 ......................(line..40)
476c0 0a 2a 20 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 4c 61 62 65 6c 73 22 20 73 65 63 74 69 6f 6e 5d .*.C-c.C-e.[on."Labels".section]
476e0 3a 20 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 :.........Editing.Topics.and.Pos
47700 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 20 20 ts..............................
47720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47740 20 20 28 6c 69 6e 65 20 20 34 33 29 0a 2a 20 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 4d 61 72 6b ..(line..43).*.C-c.C-e.[on."Mark
47760 73 22 20 73 65 63 74 69 6f 6e 5d 3a 20 20 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f s".section]:..........Editing.To
47780 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 20 pics.and.Posts..................
477a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
477c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 37 29 0a 2a 20 43 2d 63 20 43 ..............(line..47).*.C-c.C
477e0 2d 65 20 5b 6f 6e 20 22 4e 6f 74 65 22 20 73 65 63 74 69 6f 6e 5d 3a 20 20 20 20 20 20 20 20 20 -e.[on."Note".section]:.........
47800 20 20 45 64 69 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 ..Editing.Topics.and.Posts......
47820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47840 20 20 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.
47860 20 36 35 29 0a 2a 20 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 52 65 76 69 65 77 2d 52 65 71 75 65 .65).*.C-c.C-e.[on."Review-Reque
47880 73 74 73 22 20 73 65 63 74 69 6f 6e 5d 3a 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e sts".section]:.Editing.Topics.an
478a0 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 20 20 d.Posts.........................
478c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
478e0 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 36 30 29 0a 2a 20 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 .......(line..60).*.C-c.C-e.[on.
47900 22 53 74 61 74 65 22 20 73 65 63 74 69 6f 6e 5d 3a 20 20 20 20 20 20 20 20 20 20 45 64 69 74 69 "State".section]:..........Editi
47920 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 20 ng.Topics.and.Posts.............
47940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47960 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 33 36 29 0a 2a 20 ...................(line..36).*.
47980 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 22 54 69 74 6c 65 22 20 73 65 63 74 69 6f 6e 5d 3a 20 20 20 C-c.C-e.[on."Title".section]:...
479a0 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e .......Editing.Topics.and.Posts.
479c0 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 ................................
479e0 20 20 20 20 20 20 20 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 ...............................(
47a00 6c 69 6e 65 20 20 33 32 29 0a 2a 20 43 2d 63 20 43 2d 65 20 5b 6f 6e 20 61 20 70 6f 73 74 20 73 line..32).*.C-c.C-e.[on.a.post.s
47a20 65 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 ection]:...........Editing.Topic
47a40 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.....................
47a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47a80 20 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 6b 3a ...........(line..27).*.C-c.C-k:
47aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 ...............................E
47ac0 64 69 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 diting.Topics.and.Posts.........
47ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47b00 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 39 36 .......................(line..96
47b20 29 0a 2a 20 43 2d 63 20 43 2d 6b 20 5b 6f 6e 20 61 20 63 6f 6d 6d 65 6e 74 20 73 65 63 74 69 6f ).*.C-c.C-k.[on.a.comment.sectio
47b40 6e 5d 3a 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f n]:........Editing.Topics.and.Po
47b60 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 20 sts.............................
47b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47ba0 20 20 20 28 6c 69 6e 65 20 20 36 38 29 0a 2a 20 43 2d 63 20 43 2d 6e 3a 20 20 20 20 20 20 20 20 ...(line..68).*.C-c.C-n:........
47bc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 .......................Editing.T
47be0 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.................
47c00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47c20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 31 37 29 0a 2a 20 43 2d 63 20 ...............(line..17).*.C-c.
47c40 43 2d 6e 20 5b 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 C-n.[on."Issues".section]:......
47c60 20 20 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 31 ...Creating.Topics......(line..1
47c80 32 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 2).*.C-c.C-n.[on."Pull.requests"
47ca0 20 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 2e 20 20 20 20 .section]:..Creating.Topics.....
47cc0 20 28 6c 69 6e 65 20 20 20 38 29 0a 2a 20 43 2d 63 20 43 2d 72 3a 20 20 20 20 20 20 20 20 20 20 .(line...8).*.C-c.C-r:..........
47ce0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 .....................Editing.Top
47d00 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 20 20 ics.and.Posts...................
47d20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47d40 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 31 37 29 0a 2a 20 43 2d 63 20 43 2d .............(line..17).*.C-c.C-
47d60 76 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 v:..............................
47d80 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 36 29 .Visiting.Topics......(line..36)
47da0 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 20 20 20 20 .*.C-c.C-w:.....................
47dc0 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......(
47de0 6c 69 6e 65 20 20 32 32 29 0a 2a 20 43 2d 63 20 43 2d 77 20 3c 31 3e 3a 20 20 20 20 20 20 20 20 line..22).*.C-c.C-w.<1>:........
47e00 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
47e20 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 32 32 29 0a 2a 20 66 20 6e 3a 20 20 20 20 20 20 20 cs......(line..22).*.f.n:.......
47e40 20 20 20 20 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 ............................Pull
47e60 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 31 33 29 0a 2a 20 66 20 ing..............(line..13).*.f.
47e80 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:..............................
47ea0 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 6c 69 6e 65 20 .....Pulling..............(line.
47ec0 20 32 35 29 0a 2a 20 6d 20 4d 20 5b 69 66 20 65 6e 61 62 6c 65 64 5d 3a 20 20 20 20 20 20 20 20 .25).*.m.M.[if.enabled]:........
47ee0 20 20 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 20 61 6e 64 ..............Editing.Topics.and
47f00 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..........................
47f20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47f40 20 20 20 20 20 20 28 6c 69 6e 65 20 20 37 32 29 0a 2a 20 4e 3a 20 20 20 20 20 20 20 20 20 20 20 ......(line..72).*.N:...........
47f60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 73 61 67 65 2e ..........................Usage.
47f80 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 61 3a ...............(line..23).*.N.a:
47fa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
47fc0 20 20 20 55 73 61 67 65 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 31 ...Usage................(line..1
47fe0 33 29 0a 2a 20 4e 20 61 20 3c 31 3e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3).*.N.a.<1>:...................
48000 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 2e 20 20 20 20 20 20 ............Miscellaneous.......
48020 20 28 6c 69 6e 65 20 20 31 35 29 0a 2a 20 4e 20 62 20 49 3a 20 20 20 20 20 20 20 20 20 20 20 20 .(line..15).*.N.b.I:............
48040 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
48060 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 32 32 29 0a 2a 20 4e 20 62 20 69 3a 20 20 20 pics......(line..22).*.N.b.i:...
48080 20 20 20 20 20 20 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 ..............................Vi
480a0 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 32 29 0a 2a 20 siting.Topics......(line..22).*.
480c0 4e 20 62 20 50 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 N.b.P:..........................
480e0 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 6e .......Visiting.Topics......(lin
48100 65 20 20 32 32 29 0a 2a 20 4e 20 62 20 70 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e..22).*.N.b.p:.................
48120 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.
48140 20 20 20 20 20 28 6c 69 6e 65 20 20 32 32 29 0a 2a 20 4e 20 62 20 72 3a 20 20 20 20 20 20 20 20 .....(line..22).*.N.b.r:........
48160 20 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 .........................Visitin
48180 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 32 32 29 0a 2a 20 4e 20 62 20 74 g.Topics......(line..22).*.N.b.t
481a0 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 :...............................
481c0 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 32 32 ..Visiting.Topics......(line..22
481e0 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 20 ).*.N.c.f:......................
48200 20 20 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 2e 20 20 20 20 20 20 20 ...........Miscellaneous........
48220 28 6c 69 6e 65 20 20 20 37 29 0a 2a 20 4e 20 63 20 69 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 (line...7).*.N.c.i:.............
48240 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 6f 70 ....................Creating.Top
48260 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 31 32 29 0a 2a 20 4e 20 63 20 70 3a 20 20 20 20 ics......(line..12).*.N.c.p:....
48280 20 20 20 20 20 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 .............................Cre
482a0 61 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 20 38 29 0a 2a 20 4e ating.Topics......(line...8).*.N
482c0 20 66 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 20 20 20 20 20 .f.f:...........................
482e0 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 6c 69 6e 65 ......Pulling..............(line
48300 20 20 31 33 29 0a 2a 20 4e 20 66 20 6e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..13).*.N.f.n:..................
48320 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 20 20 20 20 20 20 ...............Pulling..........
48340 20 20 20 20 28 6c 69 6e 65 20 20 32 35 29 0a 2a 20 4e 20 66 20 74 3a 20 20 20 20 20 20 20 20 20 ....(line..25).*.N.f.t:.........
48360 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 2e ........................Pulling.
48380 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 37 29 0a 2a 20 4e 20 6c 20 69 3a .............(line..47).*.N.l.i:
483a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
483c0 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e .Listing.Topics.and.Notification
483e0 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...............................
48400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
48420 20 28 6c 69 6e 65 20 20 37 32 29 0a 2a 20 4e 20 6c 20 6e 3a 20 20 20 20 20 20 20 20 20 20 20 20 .(line..72).*.N.l.n:............
48440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 .....................Listing.Top
48460 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 ics.and.Notifications...........
48480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
484a0 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 36 34 29 0a .....................(line..64).
484c0 2a 20 4e 20 6c 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 *.N.l.p:........................
484e0 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 .........Listing.Topics.and.Noti
48500 66 69 63 61 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 fications.......................
48520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
48540 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 36 38 29 0a 2a 20 4e 20 6c 20 72 3a 20 20 20 20 .........(line..68).*.N.l.r:....
48560 20 20 20 20 20 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
48580 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 ting.Topics.and.Notifications...
485a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
485c0 20 20 20 20 20 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
485e0 6e 65 20 20 36 31 29 0a 2a 20 4e 20 4d 20 5b 69 66 20 65 6e 61 62 6c 65 64 5d 3a 20 20 20 20 20 ne..61).*.N.M.[if.enabled]:.....
48600 20 20 20 20 20 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 20 .................Editing.Topics.
48620 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.......................
48640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
48660 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 37 32 29 0a 2a 20 4e 20 72 3a 20 20 20 20 20 20 .........(line..72).*.N.r:......
48680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 65 70 .............................Rep
486a0 6f 73 69 74 6f 72 79 20 44 65 74 65 63 74 69 6f 6e 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ository.Detection...............
486c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
486e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 38 30 29 0a 2a 20 4e 20 .................(line..80).*.N.
48700 74 20 63 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 t.c:............................
48720 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 2e 20 20 20 20 20 20 20 28 6c 69 6e 65 20 .....Miscellaneous........(line.
48740 20 32 38 29 0a 2a 20 4e 20 74 20 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .28).*.N.t.t:...................
48760 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 2e 20 20 20 20 ..............Miscellaneous.....
48780 20 20 20 28 6c 69 6e 65 20 20 32 34 29 0a 2a 20 4e 20 76 20 69 3a 20 20 20 20 20 20 20 20 20 20 ...(line..24).*.N.v.i:..........
487a0 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.
487c0 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 33 36 29 0a 2a 20 4e 20 76 20 70 3a 20 Topics......(line..36).*.N.v.p:.
487e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
48800 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 36 29 0a Visiting.Topics......(line..36).
48820 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 20 20 20 20 20 *.N.v.t:........................
48840 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 6c .........Visiting.Topics......(l
48860 69 6e 65 20 20 33 36 29 0a 2a 20 52 45 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ine..36).*.RET:.................
48880 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 63 ..................Visiting.Topic
488a0 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 33 36 29 0a 2a 20 5a 20 6e 3a 20 20 20 20 20 20 20 20 s......(line..36).*.Z.n:........
488c0 20 20 20 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 61 6e 63 ...........................Branc
488e0 68 69 6e 67 2e 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 31 30 37 29 0a 0a 1f 0a 46 69 hing............(line.107)....Fi
48900 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 69 6f 6e 20 le:.forge.info,..Node:.Function.
48920 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 72 69 61 62 and.Command.Index,..Next:.Variab
48940 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 6e 64 65 78 le.Index,..Prev:.Keystroke.Index
48960 2c 20 20 55 70 3a 20 54 6f 70 0a 0a 41 70 70 65 6e 64 69 78 20 43 20 46 75 6e 63 74 69 6f 6e 20 ,..Up:.Top..Appendix.C.Function.
48980 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 2a 2a 2a 2a and.Command.Index.**************
489a0 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 69 6e 64 65 ***********************....[inde
489c0 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 67 61 6e 69 x..].*.Menu:..*.forge-add-organi
489e0 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 6c 6c 61 6e zation-repositories:...Miscellan
48a00 65 6f 75 73 2e 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 33 37 29 0a 2a 20 66 6f 72 67 65 2d 61 eous........(line..37).*.forge-a
48a20 64 64 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 20 20 20 dd-repository:..................
48a40 55 73 61 67 65 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 31 33 29 0a Usage................(line..13).
48a60 2a 20 66 6f 72 67 65 2d 61 64 64 2d 72 65 70 6f 73 69 74 6f 72 79 20 3c 31 3e 3a 20 20 20 20 20 *.forge-add-repository.<1>:.....
48a80 20 20 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 2e 20 20 20 20 20 20 20 28 6c .........Miscellaneous........(l
48aa0 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 72 65 70 6f 73 69 ine..15).*.forge-add-user-reposi
48ac0 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 6e 65 6f 75 73 2e tories:...........Miscellaneous.
48ae0 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 33 31 29 0a 2a 20 66 6f 72 67 65 2d 62 72 61 6e 63 68 .......(line..31).*.forge-branch
48b00 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 42 72 61 6e 63 -pullreq:..................Branc
48b20 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 29 0a 2a 20 66 6f 72 hing............(line..13).*.for
48b40 67 65 2d 62 72 6f 77 73 65 2d 64 77 69 6d 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ge-browse-dwim:.................
48b60 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 20 ....Visiting.Topics......(line..
48b80 32 32 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 20 20 22).*.forge-browse-issue:.......
48ba0 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 20 .............Visiting.Topics....
48bc0 20 20 28 6c 69 6e 65 20 20 32 32 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 69 73 73 75 ..(line..22).*.forge-browse-issu
48be0 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 20 54 es:...................Visiting.T
48c00 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 32 32 29 0a 2a 20 66 6f 72 67 65 2d 62 72 opics......(line..22).*.forge-br
48c20 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 20 56 owse-pullreq:..................V
48c40 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 32 32 29 0a 2a isiting.Topics......(line..22).*
48c60 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 20 20 .forge-browse-pullreqs:.........
48c80 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
48ca0 6e 65 20 20 32 32 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d 72 65 6d 6f 74 65 3a 20 20 ne..22).*.forge-browse-remote:..
48cc0 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
48ce0 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 32 32 29 0a 2a 20 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d ......(line..22).*.forge-browse-
48d00 74 6f 70 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 topic:....................Visiti
48d20 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 32 32 29 0a 2a 20 66 6f 72 67 ng.Topics......(line..22).*.forg
48d40 65 2d 62 72 6f 77 73 65 2d 54 59 50 45 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-browse-TYPE:..................
48d60 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 32 ...Visiting.Topics......(line..2
48d80 32 29 0a 2a 20 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 70 75 6c 6c 72 65 71 3a 20 20 20 20 2).*.forge-checkout-pullreq:....
48da0 20 20 20 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 ............Branching...........
48dc0 20 28 6c 69 6e 65 20 31 30 32 29 0a 2a 20 66 6f 72 67 65 2d 63 68 65 63 6b 6f 75 74 2d 77 6f 72 .(line.102).*.forge-checkout-wor
48de0 6b 74 72 65 65 3a 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 ktree:...............Branching..
48e00 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 31 30 37 29 0a 2a 20 66 6f 72 67 65 2d 63 72 65 ..........(line.107).*.forge-cre
48e20 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 20 20 20 20 20 43 72 ate-issue:....................Cr
48e40 65 61 74 69 6e 67 20 54 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 31 32 29 0a 2a 20 eating.Topics......(line..12).*.
48e60 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 6f 73 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 forge-create-post:..............
48e80 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e .......Editing.Topics.and.Posts.
48ea0 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 ................................
48ec0 20 20 20 20 20 20 20 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 ...............................(
48ee0 6c 69 6e 65 20 20 31 37 29 0a 2a 20 66 6f 72 67 65 2d 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 line..17).*.forge-create-pullreq
48f00 3a 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
48f20 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 20 38 29 0a 2a 20 66 6f 72 67 65 2d 64 65 6c 65 74 cs......(line...8).*.forge-delet
48f40 65 2d 63 6f 6d 6d 65 6e 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 64 69 74 e-comment:..................Edit
48f60 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............
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 20 20 20 ................................
48fa0 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 36 38 29 0a 2a ....................(line..68).*
48fc0 20 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .forge-dispatch:................
48fe0 20 20 20 20 20 20 20 20 55 73 61 67 65 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 ........Usage................(li
49000 6e 65 20 20 32 33 29 0a 2a 20 66 6f 72 67 65 2d 65 64 69 74 2d 70 6f 73 74 3a 20 20 20 20 20 20 ne..23).*.forge-edit-post:......
49020 20 20 20 20 20 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 20 .................Editing.Topics.
49040 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.......................
49060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49080 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 65 64 69 74 .........(line..27).*.forge-edit
490a0 2d 74 6f 70 69 63 2d 61 73 73 69 67 6e 65 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 45 64 69 -topic-assignees:............Edi
490c0 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 20 20 ting.Topics.and.Posts...........
490e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49100 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 36 29 0a .....................(line..56).
49120 2a 20 66 6f 72 67 65 2d 65 64 69 74 2d 74 6f 70 69 63 2d 64 72 61 66 74 3a 20 20 20 20 20 20 20 *.forge-edit-topic-draft:.......
49140 20 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 .........Editing.Topics.and.Post
49160 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...............................
49180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
491a0 20 28 6c 69 6e 65 20 20 34 30 29 0a 2a 20 66 6f 72 67 65 2d 65 64 69 74 2d 74 6f 70 69 63 2d 6c .(line..40).*.forge-edit-topic-l
491c0 61 62 65 6c 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 abels:...............Editing.Top
491e0 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 20 20 ics.and.Posts...................
49200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49220 20 20 20 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 .............(line..43).*.forge-
49240 65 64 69 74 2d 74 6f 70 69 63 2d 6d 61 72 6b 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 edit-topic-marks:...............
49260 20 45 64 69 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 .Editing.Topics.and.Posts.......
49280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
492a0 20 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..
492c0 34 37 29 0a 2a 20 66 6f 72 67 65 2d 65 64 69 74 2d 74 6f 70 69 63 2d 6e 6f 74 65 3a 20 20 20 20 47).*.forge-edit-topic-note:....
492e0 20 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 20 61 6e 64 20 .............Editing.Topics.and.
49300 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 20 Posts...........................
49320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49340 20 20 20 20 20 28 6c 69 6e 65 20 20 36 35 29 0a 2a 20 66 6f 72 67 65 2d 65 64 69 74 2d 74 6f 70 .....(line..65).*.forge-edit-top
49360 69 63 2d 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 3a 20 20 20 20 20 20 45 64 69 74 69 6e 67 ic-review-requests:......Editing
49380 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...............
493a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
493c0 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 30 29 0a 2a 20 66 6f .................(line..60).*.fo
493e0 72 67 65 2d 65 64 69 74 2d 74 6f 70 69 63 2d 73 74 61 74 65 3a 20 20 20 20 20 20 20 20 20 20 20 rge-edit-topic-state:...........
49400 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 74 73 2e 0a 20 .....Editing.Topics.and.Posts...
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 20 20 20 20 20 20 ................................
49440 20 20 20 20 20 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
49460 6e 65 20 20 33 36 29 0a 2a 20 66 6f 72 67 65 2d 65 64 69 74 2d 74 6f 70 69 63 2d 74 69 74 6c 65 ne..36).*.forge-edit-topic-title
49480 3a 20 20 20 20 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 20 :................Editing.Topics.
494a0 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.......................
494c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
494e0 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 33 32 29 0a 2a 20 66 6f 72 67 65 2d 66 6f 72 67 .........(line..32).*.forge-forg
49500 65 2e 72 65 6d 6f 74 65 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 65 70 e.remote:....................Rep
49520 6f 73 69 74 6f 72 79 20 44 65 74 65 63 74 69 6f 6e 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ository.Detection...............
49540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 38 30 29 0a 2a 20 66 6f .................(line..80).*.fo
49580 72 67 65 2d 66 6f 72 6b 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rge-fork:.......................
495a0 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 2e 20 20 20 20 20 20 20 28 6c 69 6e 65 20 .....Miscellaneous........(line.
495c0 20 20 37 29 0a 2a 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 61 73 73 69 67 6e 65 64 2d 69 73 73 ..7).*.forge-insert-assigned-iss
495e0 75 65 73 3a 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 ues:..........Listing.Topics.and
49600 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .Notifications..................
49620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 39 29 0a 2a 20 66 6f 72 67 65 ..............(line..49).*.forge
49660 2d 69 6e 73 65 72 74 2d 61 73 73 69 67 6e 65 64 2d 70 75 6c 6c 72 65 71 73 3a 20 20 20 20 20 20 -insert-assigned-pullreqs:......
49680 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f ..Listing.Topics.and.Notificatio
496a0 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 20 20 20 ns..............................
496c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
496e0 20 20 28 6c 69 6e 65 20 20 33 37 29 0a 2a 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 61 75 74 68 ..(line..37).*.forge-insert-auth
49700 6f 72 65 64 2d 69 73 73 75 65 73 3a 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f ored-issues:..........Listing.To
49720 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 pics.and.Notifications..........
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 20 ................................
49760 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 33 29 ......................(line..53)
49780 0a 2a 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 61 75 74 68 6f 72 65 64 2d 70 75 6c 6c 72 65 71 .*.forge-insert-authored-pullreq
497a0 73 3a 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 s:........Listing.Topics.and.Not
497c0 69 66 69 63 61 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 ifications......................
497e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49800 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 69 6e 73 ..........(line..45).*.forge-ins
49820 65 72 74 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 4c 69 ert-issues:...................Li
49840 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a sting.Topics.and.Notifications..
49860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49880 20 20 20 20 20 20 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
498a0 69 6e 65 20 20 31 36 29 0a 2a 20 66 6f 72 67 65 2d 69 6e 73 65 72 74 2d 70 75 6c 6c 72 65 71 73 ine..16).*.forge-insert-pullreqs
498c0 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 :.................Listing.Topics
498e0 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 .and.Notifications..............
49900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49920 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 32 29 0a 2a 20 66 ..................(line..12).*.f
49940 6f 72 67 65 2d 69 6e 73 65 72 74 2d 72 65 71 75 65 73 74 65 64 2d 72 65 76 69 65 77 73 3a 20 20 orge-insert-requested-reviews:..
49960 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 ......Listing.Topics.and.Notific
49980 61 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 ations..........................
499a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
499c0 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 31 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 73 ......(line..41).*.forge-list-as
499e0 73 69 67 6e 65 64 2d 69 73 73 75 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e signed-issues:............Listin
49a00 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 g.Topics.and.Notifications......
49a20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49a40 20 20 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.
49a60 20 38 37 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 73 73 69 67 6e 65 64 2d 70 75 6c 6c 72 .87).*.forge-list-assigned-pullr
49a80 65 71 73 3a 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 eqs:..........Listing.Topics.and
49aa0 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .Notifications..................
49ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49ae0 20 20 20 20 20 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 ..............(line..83).*.forge
49b00 2d 6c 69 73 74 2d 61 75 74 68 6f 72 65 64 2d 69 73 73 75 65 73 3a 20 20 20 20 20 20 20 20 20 20 -list-authored-issues:..........
49b20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f ..Listing.Topics.and.Notificatio
49b40 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 20 20 20 ns..............................
49b60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49b80 20 20 28 6c 69 6e 65 20 20 39 39 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 75 74 68 6f 72 ..(line..99).*.forge-list-author
49ba0 65 64 2d 70 75 6c 6c 72 65 71 73 3a 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f ed-pullreqs:..........Listing.To
49bc0 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 pics.and.Notifications..........
49be0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49c00 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 39 35 29 ......................(line..95)
49c20 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 69 73 73 75 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 .*.forge-list-issues:...........
49c40 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 ..........Listing.Topics.and.Not
49c60 69 66 69 63 61 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 ifications......................
49c80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49ca0 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 37 32 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 ..........(line..72).*.forge-lis
49cc0 74 2d 6c 61 62 65 6c 65 64 2d 69 73 73 75 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 t-labeled-issues:.............Li
49ce0 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a sting.Topics.and.Notifications..
49d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49d20 20 20 20 20 20 20 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
49d40 69 6e 65 20 20 37 39 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6c 61 62 65 6c 65 64 2d 70 75 ine..79).*.forge-list-labeled-pu
49d60 6c 6c 72 65 71 73 3a 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 llreqs:...........Listing.Topics
49d80 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 .and.Notifications..............
49da0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49dc0 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 35 29 0a 2a 20 66 ..................(line..75).*.f
49de0 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:........
49e00 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 ......Listing.Topics.and.Notific
49e20 61 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 ations..........................
49e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49e60 20 20 20 20 20 20 28 6c 69 6e 65 20 20 36 34 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 ......(line..64).*.forge-list-ow
49e80 6e 65 64 2d 69 73 73 75 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e ned-issues:...............Listin
49ea0 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 g.Topics.and.Notifications......
49ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49ee0 20 20 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.
49f00 31 30 39 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 70 75 6c 6c 72 65 71 73 109).*.forge-list-owned-pullreqs
49f20 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 :.............Listing.Topics.and
49f40 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .Notifications..................
49f60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
49f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 31 30 33 29 0a 2a 20 66 6f 72 67 65 ..............(line.103).*.forge
49fa0 2d 6c 69 73 74 2d 70 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 -list-pullreqs:.................
49fc0 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f ..Listing.Topics.and.Notificatio
49fe0 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 20 20 20 ns..............................
4a000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4a020 20 20 28 6c 69 6e 65 20 20 36 38 29 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 72 65 70 6f 73 69 ..(line..68).*.forge-list-reposi
4a040 74 6f 72 69 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f tories:...............Listing.To
4a060 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 pics.and.Notifications..........
4a080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4a0a0 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 36 31 29 ......................(line..61)
4a0c0 0a 2a 20 66 6f 72 67 65 2d 6c 69 73 74 2d 72 65 71 75 65 73 74 65 64 2d 72 65 76 69 65 77 73 3a .*.forge-list-requested-reviews:
4a0e0 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 ..........Listing.Topics.and.Not
4a100 69 66 69 63 61 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 ifications......................
4a120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4a140 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 39 31 29 0a 2a 20 66 6f 72 67 65 2d 6d 65 72 ..........(line..91).*.forge-mer
4a160 67 65 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 45 64 ge:...........................Ed
4a180 69 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 20 iting.Topics.and.Posts..........
4a1a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4a1c0 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 37 32 29 ......................(line..72)
4a1e0 0a 2a 20 66 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 .*.forge-post-cancel:...........
4a200 20 20 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 50 6f 73 ..........Editing.Topics.and.Pos
4a220 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 20 20 ts..............................
4a240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4a260 20 20 28 6c 69 6e 65 20 20 39 36 29 0a 2a 20 66 6f 72 67 65 2d 70 6f 73 74 2d 64 69 73 70 61 74 ..(line..96).*.forge-post-dispat
4a280 63 68 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 64 69 74 69 6e 67 20 54 6f ch:...................Editing.To
4a2a0 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 20 pics.and.Posts..................
4a2c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4a2e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 31 30 30 29 0a 2a 20 66 6f 72 67 65 ..............(line.100).*.forge
4a300 2d 70 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 -post-submit:...................
4a320 20 20 45 64 69 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 ..Editing.Topics.and.Posts......
4a340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4a360 20 20 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.
4a380 20 39 32 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 .92).*.forge-post-toggle-draft:.
4a3a0 20 20 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 20 61 6e 64 ..............Editing.Topics.and
4a3c0 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..........................
4a3e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4a400 20 20 20 20 20 20 28 6c 69 6e 65 20 31 30 35 29 0a 2a 20 66 6f 72 67 65 2d 70 75 6c 6c 3a 20 20 ......(line.105).*.forge-pull:..
4a420 20 20 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 ..........................Pullin
4a440 67 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 31 33 29 0a 2a 20 66 6f 72 67 g..............(line..13).*.forg
4a460 65 2d 70 75 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 3a 20 20 20 20 20 20 20 20 20 20 20 e-pull-notifications:...........
4a480 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
4a4a0 35 29 0a 2a 20 66 6f 72 67 65 2d 70 75 6c 6c 2d 74 6f 70 69 63 3a 20 20 20 20 20 20 20 20 20 20 5).*.forge-pull-topic:..........
4a4c0 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.............
4a4e0 20 28 6c 69 6e 65 20 20 34 37 29 0a 2a 20 66 6f 72 67 65 2d 72 65 6d 6f 76 65 2d 72 65 70 6f 73 .(line..47).*.forge-remove-repos
4a500 69 74 6f 72 79 3a 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 itory:...............Miscellaneo
4a520 75 73 2e 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 34 29 0a 2a 20 66 6f 72 67 65 2d 72 65 6d us........(line..44).*.forge-rem
4a540 6f 76 65 2d 74 6f 70 69 63 2d 6c 6f 63 61 6c 6c 79 3a 20 20 20 20 20 20 20 20 20 20 20 20 4d 69 ove-topic-locally:............Mi
4a560 73 63 65 6c 6c 61 6e 65 6f 75 73 2e 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 34 38 29 0a 2a 20 scellaneous........(line..48).*.
4a580 66 6f 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 forge-reset-database:...........
4a5a0 20 20 20 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 2e 20 20 20 20 20 20 20 28 6c 69 6e .......Miscellaneous........(lin
4a5c0 65 20 20 35 38 29 0a 2a 20 66 6f 72 67 65 2d 74 6f 67 67 6c 65 2d 63 6c 6f 73 65 64 2d 76 69 73 e..58).*.forge-toggle-closed-vis
4a5e0 69 62 69 6c 69 74 79 3a 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 ibility:........Listing.Topics.a
4a600 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nd.Notifications................
4a620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4a640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 33 30 29 0a 2a 20 66 6f 72 ................(line..30).*.for
4a660 67 65 2d 74 6f 67 67 6c 65 2d 63 6c 6f 73 65 64 2d 76 69 73 69 62 69 6c 69 74 79 20 3c 31 3e 3a ge-toggle-closed-visibility.<1>:
4a680 20 20 20 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 2e 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 ....Miscellaneous........(line..
4a6a0 32 38 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 73 74 28).*.forge-toggle-display-in-st
4a6c0 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 2e 20 20 20 20 20 atus-buffer:.Miscellaneous......
4a6e0 20 20 28 6c 69 6e 65 20 20 32 34 29 0a 2a 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 69 73 73 75 65 ..(line..24).*.forge-visit-issue
4a700 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 67 20 54 :.....................Visiting.T
4a720 6f 70 69 63 73 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 33 36 29 0a 2a 20 66 6f 72 67 65 2d 76 69 opics......(line..36).*.forge-vi
4a740 73 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 sit-pullreq:...................V
4a760 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 36 29 0a 2a isiting.Topics......(line..36).*
4a780 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 6f 70 69 63 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 .forge-visit-topic:.............
4a7a0 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
4a7c0 6e 65 20 20 33 36 29 0a 2a 20 66 6f 72 67 65 2d 76 69 73 69 74 2d 54 59 50 45 3a 20 20 20 20 20 ne..36).*.forge-visit-TYPE:.....
4a7e0 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
4a800 2e 20 20 20 20 20 28 6c 69 6e 65 20 20 33 36 29 0a 0a 1f 0a 46 69 6c 65 3a 20 66 6f 72 67 65 2e ......(line..36)....File:.forge.
4a820 69 6e 66 6f 2c 20 20 4e 6f 64 65 3a 20 56 61 72 69 61 62 6c 65 20 49 6e 64 65 78 2c 20 20 50 72 info,..Node:.Variable.Index,..Pr
4a840 65 76 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 64 65 78 2c 20 ev:.Function.and.Command.Index,.
4a860 20 55 70 3a 20 54 6f 70 0a 0a 41 70 70 65 6e 64 69 78 20 44 20 56 61 72 69 61 62 6c 65 20 49 6e .Up:.Top..Appendix.D.Variable.In
4a880 64 65 78 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 0a 0a 00 dex.*************************...
4a8a0 08 5b 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 6c 69 73 .[index..].*.Menu:..*.forge-alis
4a8c0 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 52 65 70 t:...........................Rep
4a8e0 6f 73 69 74 6f 72 79 20 44 65 74 65 63 74 69 6f 6e 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ository.Detection...............
4a900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4a920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 20 39 32 29 0a 2a 20 66 6f .................(line..92).*.fo
4a940 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 63 rge-checkout-worktree-read-direc
4a960 74 6f 72 79 2d 66 75 6e 63 74 69 6f 6e 3a 20 42 72 61 6e 63 68 69 6e 67 2e 20 28 6c 69 6e 65 20 tory-function:.Branching..(line.
4a980 31 31 31 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 20 20 20 111).*.forge-owned-accounts:....
4a9a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 ..............Listing.Topics.and
4a9c0 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .Notifications..................
4a9e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4aa00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 31 31 35 29 0a 2a 20 66 6f 72 67 65 ..............(line.115).*.forge
4aa20 2d 6f 77 6e 65 64 2d 69 67 6e 6f 72 65 64 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -owned-ignored:.................
4aa40 20 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f ..Listing.Topics.and.Notificatio
4aa60 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 20 20 20 ns..............................
4aa80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4aaa0 20 20 28 6c 69 6e 65 20 31 33 30 29 0a 2a 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d ..(line.130).*.forge-topic-list-
4aac0 6c 69 6d 69 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 73 74 69 6e 67 20 54 6f limit:................Listing.To
4aae0 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 20 20 pics.and.Notifications..........
4ab00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4ab20 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 39 29 ......................(line..19)
4ab40 0a 2a 20 66 6f 72 67 65 2e 72 65 6d 6f 74 65 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .*.forge.remote:................
4ab60 20 20 20 20 20 20 20 20 20 20 52 65 70 6f 73 69 74 6f 72 79 20 44 65 74 65 63 74 69 6f 6e 2e 0a ..........Repository.Detection..
4ab80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4aba0 20 20 20 20 20 20 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
4abc0 69 6e 65 20 20 36 36 29 0a 0a 0a 1f 0a 54 61 67 20 54 61 62 6c 65 3a 0a 4e 6f 64 65 3a 20 54 6f ine..66).....Tag.Table:.Node:.To
4abe0 70 7f 37 35 31 0a 4e 6f 64 65 3a 20 49 6e 74 72 6f 64 75 63 74 69 6f 6e 7f 32 34 33 35 0a 4e 6f p.751.Node:.Introduction.2435.No
4ac00 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 32 de:.Supported.Forges.and.Hosts.2
4ac20 39 39 38 0a 4e 6f 64 65 3a 20 53 75 70 70 6f 72 74 65 64 20 46 6f 72 67 65 73 7f 34 32 38 33 0a 998.Node:.Supported.Forges.4283.
4ac40 52 65 66 3a 20 47 69 74 68 75 62 7f 34 34 33 39 0a 52 65 66 3a 20 47 69 74 68 75 62 20 43 61 76 Ref:.Github.4439.Ref:.Github.Cav
4ac60 65 61 74 73 7f 34 35 38 32 0a 52 65 66 3a 20 47 69 74 68 75 62 20 48 6f 73 74 73 7f 35 32 32 38 eats.4582.Ref:.Github.Hosts.5228
4ac80 0a 52 65 66 3a 20 47 69 74 6c 61 62 7f 35 32 38 34 0a 52 65 66 3a 20 47 69 74 6c 61 62 20 43 61 .Ref:.Gitlab.5284.Ref:.Gitlab.Ca
4aca0 76 65 61 74 73 7f 35 32 39 39 0a 52 65 66 3a 20 47 69 74 6c 61 62 20 48 6f 73 74 73 7f 35 34 32 veats.5299.Ref:.Gitlab.Hosts.542
4acc0 34 0a 4e 6f 64 65 3a 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 4.Node:.Partially.Supported.Forg
4ace0 65 73 7f 35 35 34 34 0a 52 65 66 3a 20 47 69 74 65 61 20 68 74 74 70 73 2f 2f 67 69 74 65 61 69 es.5544.Ref:.Gitea.https//giteai
4ad00 6f 7f 35 37 35 30 0a 52 65 66 3a 20 47 69 74 65 61 20 48 6f 73 74 73 7f 35 38 35 30 0a 52 65 66 o.5750.Ref:.Gitea.Hosts.5850.Ref
4ad20 3a 20 47 6f 67 73 20 68 74 74 70 73 2f 2f 67 6f 67 73 69 6f 7f 35 39 30 36 0a 52 65 66 3a 20 47 :.Gogs.https//gogsio.5906.Ref:.G
4ad40 6f 67 73 20 48 6f 73 74 73 7f 36 31 30 39 0a 52 65 66 3a 20 42 69 74 62 75 63 6b 65 74 20 68 74 ogs.Hosts.6109.Ref:.Bitbucket.ht
4ad60 74 70 73 2f 2f 62 69 74 62 75 63 6b 65 74 6f 72 67 7f 36 31 36 37 0a 52 65 66 3a 20 42 69 74 62 tps//bitbucketorg.6167.Ref:.Bitb
4ad80 75 63 6b 65 74 20 43 61 76 65 61 74 73 7f 36 33 36 35 0a 52 65 66 3a 20 42 69 74 62 75 63 6b 65 ucket.Caveats.6365.Ref:.Bitbucke
4ada0 74 20 48 6f 73 74 73 7f 37 32 36 32 0a 4e 6f 64 65 3a 20 53 75 70 70 6f 72 74 65 64 20 53 65 6d t.Hosts.7262.Node:.Supported.Sem
4adc0 69 2d 46 6f 72 67 65 73 7f 37 33 32 37 0a 52 65 66 3a 20 47 69 74 77 65 62 20 68 74 74 70 73 2f i-Forges.7327.Ref:.Gitweb.https/
4ade0 2f 67 69 74 2d 73 63 6d 63 6f 6d 2f 64 6f 63 73 2f 67 69 74 77 65 62 7f 37 34 39 38 0a 52 65 66 /git-scmcom/docs/gitweb.7498.Ref
4ae00 3a 20 47 69 74 77 65 62 20 43 61 76 65 61 74 73 7f 37 35 37 37 0a 52 65 66 3a 20 43 67 69 74 20 :.Gitweb.Caveats.7577.Ref:.Cgit.
4ae20 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 74 7f 37 38 https//gitzx2c4com/cgit/about.78
4ae40 31 37 0a 52 65 66 3a 20 43 67 69 74 20 43 61 76 65 61 74 73 7f 37 38 39 34 0a 52 65 66 3a 20 43 17.Ref:.Cgit.Caveats.7894.Ref:.C
4ae60 67 69 74 20 48 6f 73 74 73 7f 38 32 34 33 0a 52 65 66 3a 20 53 74 67 69 74 20 68 74 74 70 73 2f git.Hosts.8243.Ref:.Stgit.https/
4ae80 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 74 2f 66 69 6c 65 2f /codemadnessorg/git/stagit/file/
4aea0 52 45 41 44 4d 45 68 74 6d 6c 7f 38 33 37 30 0a 52 65 66 3a 20 53 74 67 69 74 20 43 61 76 65 61 READMEhtml.8370.Ref:.Stgit.Cavea
4aec0 74 73 7f 38 34 38 37 0a 52 65 66 3a 20 53 74 67 69 74 20 48 6f 73 74 73 7f 38 37 37 33 0a 52 65 ts.8487.Ref:.Stgit.Hosts.8773.Re
4aee0 66 3a 20 53 72 68 74 20 68 74 74 70 73 2f 2f 6d 65 74 61 73 72 68 74 7f 38 38 33 33 0a 52 65 66 f:.Srht.https//metasrht.8833.Ref
4af00 3a 20 53 72 68 74 20 43 61 76 65 61 74 73 7f 38 38 38 32 0a 52 65 66 3a 20 53 72 68 74 20 48 6f :.Srht.Caveats.8882.Ref:.Srht.Ho
4af20 73 74 73 7f 39 31 36 35 0a 4e 6f 64 65 3a 20 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 7f 39 sts.9165.Node:.Getting.Started.9
4af40 32 31 36 0a 4e 6f 64 65 3a 20 4c 6f 61 64 69 6e 67 20 46 6f 72 67 65 7f 31 30 32 31 34 0a 4e 6f 216.Node:.Loading.Forge.10214.No
4af60 64 65 3a 20 54 6f 6b 65 6e 20 43 72 65 61 74 69 6f 6e 7f 31 30 36 30 39 0a 4e 6f 64 65 3a 20 49 de:.Token.Creation.10609.Node:.I
4af80 6e 69 74 69 61 6c 20 50 75 6c 6c 7f 31 31 38 38 38 0a 4e 6f 64 65 3a 20 52 65 70 6f 73 69 74 6f nitial.Pull.11888.Node:.Reposito
4afa0 72 79 20 44 65 74 65 63 74 69 6f 6e 7f 31 33 32 38 33 0a 4e 6f 64 65 3a 20 43 61 76 65 61 74 73 ry.Detection.13283.Node:.Caveats
4afc0 7f 31 38 36 35 30 0a 4e 6f 64 65 3a 20 55 73 61 67 65 7f 31 39 35 37 36 0a 4e 6f 64 65 3a 20 50 .18650.Node:.Usage.19576.Node:.P
4afe0 75 6c 6c 69 6e 67 7f 32 31 30 34 38 0a 4e 6f 64 65 3a 20 42 72 61 6e 63 68 69 6e 67 7f 32 33 37 ulling.21048.Node:.Branching.237
4b000 33 31 0a 4e 6f 64 65 3a 20 57 6f 72 6b 69 6e 67 20 77 69 74 68 20 54 6f 70 69 63 73 7f 33 30 31 31.Node:.Working.with.Topics.301
4b020 32 36 0a 4e 6f 64 65 3a 20 56 69 73 69 74 69 6e 67 20 54 6f 70 69 63 73 7f 33 30 34 39 39 0a 4e 26.Node:.Visiting.Topics.30499.N
4b040 6f 64 65 3a 20 4c 69 73 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 20 4e 6f 74 69 66 69 63 61 ode:.Listing.Topics.and.Notifica
4b060 74 69 6f 6e 73 7f 33 32 35 37 36 0a 4e 6f 64 65 3a 20 43 72 65 61 74 69 6e 67 20 54 6f 70 69 63 tions.32576.Node:.Creating.Topic
4b080 73 7f 33 37 38 39 30 0a 4e 6f 64 65 3a 20 45 64 69 74 69 6e 67 20 54 6f 70 69 63 73 20 61 6e 64 s.37890.Node:.Editing.Topics.and
4b0a0 20 50 6f 73 74 73 7f 33 38 33 37 39 0a 4e 6f 64 65 3a 20 4d 69 73 63 65 6c 6c 61 6e 65 6f 75 73 .Posts.38379.Node:.Miscellaneous
4b0c0 7f 34 32 39 30 36 0a 4e 6f 64 65 3a 20 46 41 51 7f 34 35 35 32 39 0a 4e 6f 64 65 3a 20 49 73 20 .42906.Node:.FAQ.45529.Node:.Is.
4b0e0 69 74 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 63 72 65 61 74 65 20 61 20 73 69 6e 67 6c 65 20 70 it.possible.to.create.a.single.p
4b100 75 6c 6c 2d 72 65 71 75 65 73 74 20 77 69 74 68 6f 75 74 20 70 75 6c 6c 69 6e 67 20 65 76 65 72 ull-request.without.pulling.ever
4b120 79 74 68 69 6e 67 3f 7f 34 35 39 39 37 0a 4e 6f 64 65 3a 20 65 72 72 6f 72 20 69 6e 20 70 72 6f ything?.45997.Node:.error.in.pro
4b140 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 20 22 42 61 64 20 cess.filter.HTTP.Error.502."Bad.
4b160 67 61 74 65 77 61 79 22 7f 34 36 34 36 33 0a 4e 6f 64 65 3a 20 4b 65 79 73 74 72 6f 6b 65 20 49 gateway".46463.Node:.Keystroke.I
4b180 6e 64 65 78 7f 34 38 38 33 34 0a 4e 6f 64 65 3a 20 46 75 6e 63 74 69 6f 6e 20 61 6e 64 20 43 6f ndex.48834.Node:.Function.and.Co
4b1a0 6d 6d 61 6e 64 20 49 6e 64 65 78 7f 35 34 35 32 34 0a 4e 6f 64 65 3a 20 56 61 72 69 61 62 6c 65 mmand.Index.54524.Node:.Variable
4b1c0 20 49 6e 64 65 78 7f 36 32 34 38 32 0a 1f 0a 45 6e 64 20 54 61 67 20 54 61 62 6c 65 0a 0a 1f 0a .Index.62482...End.Tag.Table....
4b1e0 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 63 6f 64 69 6e 67 3a 20 75 74 66 2d 38 0a 45 Local.Variables:.coding:.utf-8.E
4b200 6e 64 3a 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 nd:.............................
4b220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b2a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b2c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b2e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b400 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 62 69 74 62 75 63 forge-20240405.1509/forge-bitbuc
4b420 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..........................
4b440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b460 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
4b480 30 30 30 33 36 34 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 35 31 35 00 20 30 00 00 00 0003642.00000000000.015515..0...
4b4a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b4c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b4e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b500 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...................
4b520 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...................
4b540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b5a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4b600 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
4b620 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
4b640 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
4b660 30 32 34 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 024.Jonas.Bernoulli..;;.Author:.
4b680 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 2e 6c Jonas.Bernoulli.<jonas@bernoul.l
4b6a0 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 6c 6c i>.;;.Maintainer:.Jonas.Bernoull
4b6c0 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 4c 69 i.<jonas@bernoul.li>..;;.SPDX-Li
4b6e0 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
4b700 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
4b720 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
4b740 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
4b760 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
4b780 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
4b7a0 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
4b7c0 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
4b7e0 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..;;.
4b800 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
4b820 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,.
4b840 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
4b860 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
4b880 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.
4b8a0 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
4b8c0 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
4b8e0 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
4b900 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.
4b920 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
4b940 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
4b960 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/>
4b980 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 62 75 63 6b 29 0a 28 72 ...;;;.Code:..(require.'buck).(r
4b9a0 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 64 65 66 63 equire.'forge)..;;;.Class..(defc
4b9c0 6c 61 73 73 20 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 20 lass.forge-bitbucket-repository.
4b9e0 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 69 73 73 (forge-noapi-repository)...((iss
4ba00 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 6f 72 6d ues-url-format.........:initform
4ba20 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 20 20 28 ."https://%h/%o/%n/issues")....(
4ba40 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 69 74 66 issue-url-format..........:initf
4ba60 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 25 69 22 orm."https://%h/%o/%n/issues/%i"
4ba80 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 20 69 73 73 75 65 )....;;.The.anchor.for.the.issue
4baa0 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 0a 20 20 20 28 69 .itself.is..../%i#issue-%i....(i
4bac0 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 69 6e 69 74 66 6f ssue-post-url-format.....:initfo
4bae0 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 25 69 23 63 rm."https://%h/%o/%n/issues/%i#c
4bb00 6f 6d 6d 65 6e 74 2d 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 omment-%I")....(pullreqs-url-for
4bb20 6d 61 74 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 mat.......:initform."https://%h/
4bb40 25 6f 2f 25 6e 2f 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 22 29 0a 20 20 20 28 70 75 6c 6c 72 65 %o/%n/pull-requests")....(pullre
4bb60 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 20 22 68 q-url-format........:initform."h
4bb80 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 73 2f 25 69 ttps://%h/%o/%n/pull-requests/%i
4bba0 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 20 ")....(pullreq-post-url-format..
4bbc0 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
4bbe0 6c 2d 72 65 71 75 65 73 74 73 2f 25 69 23 63 6f 6d 6d 65 6e 74 2d 25 49 22 29 0a 20 20 20 28 63 l-requests/%i#comment-%I")....(c
4bc00 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 3a 69 6e 69 74 66 6f ommit-url-format.........:initfo
4bc20 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"
4bc40 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 20 20 20 20 20 )....(branch-url-format.........
4bc60 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 62 72 61 6e :initform."https://%h/%o/%n/bran
4bc80 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 61 74 20 20 20 ch/%r")....(remote-url-format...
4bca0 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/%
4bcc0 6e 2f 73 72 63 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 n/src")....(create-issue-url-for
4bce0 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 25 mat...:initform."https://%h/%o/%
4bd00 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 65 n/issues/new")....(create-pullre
4bd20 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 2f q-url-format.:initform."https://
4bd40 25 68 2f 25 6f 2f 25 6e 2f 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 2f 6e 65 77 22 29 29 29 0a 0a %h/%o/%n/pull-requests/new")))..
4bd60 3b 3b 3b 20 5f 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 62 69 74 62 75 63 6b 65 74 29 ;;;._.(provide.'forge-bitbucket)
4bd80 0a 3b 3b 3b 20 66 6f 72 67 65 2d 62 69 74 62 75 63 6b 65 74 2e 65 6c 20 65 6e 64 73 20 68 65 72 .;;;.forge-bitbucket.el.ends.her
4bda0 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...............................
4bdc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4bde0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4be00 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 67 69 74 68 75 62 forge-20240405.1509/forge-github
4be20 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.............................
4be40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4be60 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
4be80 30 31 30 37 36 36 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 33 37 00 20 30 00 00 00 0107667.00000000000.015037..0...
4bea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4bec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4bee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4bf00 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...................
4bf20 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...................
4bf40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4bf60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4bf80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4bfa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4bfc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4bfe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4c000 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
4c020 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.-*
4c040 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 34 20 4a 6f -..;;.Copyright.(C).2018-2024.Jo
4c060 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.
4c080 42 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 3b 3b 20 Bernoulli.<jonas@bernoul.li>.;;.
4c0a0 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e Maintainer:.Jonas.Bernoulli.<jon
4c0c0 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d as@bernoul.li>..;;.SPDX-License-
4c0e0 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..;;
4c100 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
4c120 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
4c140 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.
4c160 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
4c180 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.
4c1a0 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.
4c1c0 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
4c1e0 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
4c200 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
4c220 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
4c240 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
4c260 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
4c280 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.
4c2a0 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.;;.
4c2c0 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
4c2e0 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
4c300 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
4c320 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
4c340 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
4c360 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/>...;;;
4c380 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 67 68 75 62 29 0a 0a 28 72 65 71 75 69 72 .Code:..(require.'ghub)..(requir
4c3a0 65 20 27 66 6f 72 67 65 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 69 73 73 75 65 29 e.'forge).(require.'forge-issue)
4c3c0 0a 28 72 65 71 75 69 72 65 20 27 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 0a 3b 3b 3b 20 43 .(require.'forge-pullreq)..;;;.C
4c3e0 6c 61 73 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 lass..(defclass.forge-github-rep
4c400 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 0a 20 20 28 28 69 ository.(forge-repository)...((i
4c420 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 6f ssues-url-format.........:initfo
4c440 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 20 rm."https://%h/%o/%n/issues")...
4c460 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 69 .(issue-url-format..........:ini
4c480 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 25 tform."https://%h/%o/%n/issues/%
4c4a0 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 20 i")....(issue-post-url-format...
4c4c0 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 73 ..:initform."https://%h/%o/%n/is
4c4e0 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 75 sues/%i#issuecomment-%I")....(pu
4c500 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
4c520 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 28 m."https://%h/%o/%n/pulls")....(
4c540 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 66 pullreq-url-format........:initf
4c560 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 2f 25 69 22 29 0a orm."https://%h/%o/%n/pull/%i").
4c580 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 3a 69 ...(pullreq-post-url-format...:i
4c5a0 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 2f 25 nitform."https://%h/%o/%n/pull/%
4c5c0 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 74 2d 75 i#issuecomment-%I")....(commit-u
4c5e0 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 74 rl-format.........:initform."htt
4c600 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 72 ps://%h/%o/%n/commit/%r")....(br
4c620 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 72 anch-url-format.........:initfor
4c640 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 29 m."https://%h/%o/%n/commits/%r")
4c660 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 3a ....(remote-url-format.........:
4c680 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 20 initform."https://%h/%o/%n")....
4c6a0 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 3a 69 6e 69 74 (create-issue-url-format...:init
4c6c0 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 6e 65 form."https://%h/%o/%n/issues/ne
4c6e0 77 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 w")....(create-pullreq-url-forma
4c700 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 6f 2f 25 6e 2f 63 6f t.:initform."https://%h/%o/%n/co
4c720 6d 70 61 72 65 22 29 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 mpare")....(pullreq-refspec.....
4c740 20 20 20 20 20 20 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 ......:initform."+refs/pull/*/he
4c760 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 51 75 65 72 ad:refs/pullreqs/*")))..;;;.Quer
4c780 79 0a 0a 28 64 65 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 y..(defun.forge--get-github-repo
4c7a0 73 69 74 6f 72 79 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 sitory.()...(forge-github-reposi
4c7c0 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 73 74 tory-p.(forge-get-repository.:st
4c7e0 75 62 3f 29 29 29 0a 0a 3b 3b 3b 20 50 75 6c 6c 0a 3b 3b 3b 3b 20 52 65 70 6f 73 69 74 6f 72 79 ub?)))..;;;.Pull.;;;;.Repository
4c800 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 20 28 28 72 65 ..(cl-defmethod.forge--pull.((re
4c820 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 20 po.forge-github-repository).....
4c840 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 6c .......................&optional
4c860 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 72 74 20 28 6e .callback.since)...(cl-assert.(n
4c880 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 70 6f 73 69 74 ot.(and.since.(forge-get-reposit
4c8a0 6f 72 79 20 72 65 70 6f 20 3a 74 72 61 63 6b 65 64 3f 29 29 29 29 0a 20 20 28 73 65 74 71 20 66 ory.repo.:tracked?))))...(setq.f
4c8c0 6f 72 67 65 2d 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d orge--mode-line-buffer.(current-
4c8e0 62 75 66 66 65 72 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 70 6f 20 74 20 6e 69 buffer))...(forge--msg.repo.t.ni
4c900 6c 20 22 50 75 6c 6c 69 6e 67 20 52 45 50 4f 22 29 0a 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 l."Pulling.REPO")...(let.((buf.(
4c920 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 67 68 75 62 2d 66 65 74 63 current-buffer))).....(ghub-fetc
4c940 68 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 6f 77 6e h-repository......(oref.repo.own
4c960 65 72 29 0a 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 6e 61 6d 65 29 0a 20 20 20 20 20 28 er)......(oref.repo.name)......(
4c980 6c 61 6d 62 64 61 20 28 64 61 74 61 29 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 lambda.(data)........(forge--msg
4c9a0 20 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 .repo.t.t..."Pulling.REPO").....
4c9c0 20 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 53 74 6f 72 69 ...(forge--msg.repo.t.nil."Stori
4c9e0 6e 67 20 52 45 50 4f 22 29 0a 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 77 69 74 68 2d 74 72 ng.REPO")........(closql-with-tr
4ca00 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 20 20 20 20 20 28 6c ansaction.(forge-db)..........(l
4ca20 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 28 66 6f 72 67 65 2d et-alist.data............(forge-
4ca40 2d 75 70 64 61 74 65 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 64 61 74 61 29 0a 20 20 -update-repository.repo.data)...
4ca60 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 6e 65 65 .........(forge--update-assignee
4ca80 73 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 20 20 20 20 s..repo..assignableUsers).......
4caa0 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 20 20 20 20 72 .....(forge--update-forks......r
4cac0 65 70 6f 20 2e 66 6f 72 6b 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 epo..forks)............(forge--u
4cae0 70 64 61 74 65 2d 6c 61 62 65 6c 73 20 20 20 20 20 72 65 70 6f 20 2e 6c 61 62 65 6c 73 29 0a 20 pdate-labels.....repo..labels)..
4cb00 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 6d 69 6c 65 73 74 6f ..........(forge--update-milesto
4cb20 6e 65 73 20 72 65 70 6f 20 2e 6d 69 6c 65 73 74 6f 6e 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 nes.repo..milestones)...........
4cb40 20 28 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 69 73 73 75 65 73 20 20 20 20 20 72 65 70 6f 20 .(forge--update-issues.....repo.
4cb60 2e 69 73 73 75 65 73 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 75 70 .issues.t)............(forge--up
4cb80 64 61 74 65 2d 70 75 6c 6c 72 65 71 73 20 20 20 72 65 70 6f 20 2e 70 75 6c 6c 52 65 71 75 65 73 date-pullreqs...repo..pullReques
4cba0 74 73 20 74 29 0a 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 ts.t)............(forge--update-
4cbc0 72 65 76 6e 6f 74 65 73 20 20 20 72 65 70 6f 20 2e 63 6f 6d 6d 69 74 43 6f 6d 6d 65 6e 74 73 29 revnotes...repo..commitComments)
4cbe0 29 0a 20 20 20 20 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 )..........(oset.repo.condition.
4cc00 3a 74 72 61 63 6b 65 64 29 29 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6d 73 67 20 72 65 :tracked))........(forge--msg.re
4cc20 70 6f 20 74 20 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 po.t.t..."Storing.REPO")........
4cc40 28 63 6f 6e 64 0a 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 (cond.........((oref.repo.select
4cc60 69 76 65 2d 70 29 29 0a 20 20 20 20 20 20 20 20 28 63 61 6c 6c 62 61 63 6b 20 28 66 75 6e 63 61 ive-p)).........(callback.(funca
4cc80 6c 6c 20 63 61 6c 6c 62 61 63 6b 29 29 0a 20 20 20 20 20 20 20 20 28 28 66 6f 72 67 65 2d 2d 6d ll.callback)).........((forge--m
4cca0 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 29 29 0a 20 20 20 20 aybe-git-fetch.repo.buf)))).....
4ccc0 20 60 28 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 72 20 73 69 .`((issues-until.........,(or.si
4cce0 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 29 29 0a 20 nce.(oref.repo.issues-until)))..
4cd00 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 20 2c 28 6f 72 ......(pullRequests-until...,(or
4cd20 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 75 6e 74 69 6c .since.(oref.repo.pullreqs-until
4cd40 29 29 29 29 0a 20 20 20 20 20 3a 68 6f 73 74 20 28 6f 72 65 66 20 72 65 70 6f 20 61 70 69 68 6f ))))......:host.(oref.repo.apiho
4cd60 73 74 29 0a 20 20 20 20 20 3a 61 75 74 68 20 27 66 6f 72 67 65 0a 20 20 20 20 20 3a 73 70 61 72 st)......:auth.'forge......:spar
4cd80 73 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 29 29 29 0a 0a 28 se.(oref.repo.selective-p))))..(
4cda0 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 65 70 6f 73 cl-defmethod.forge--update-repos
4cdc0 69 74 6f 72 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 itory.((repo.forge-github-reposi
4cde0 74 6f 72 79 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 tory).data)...(let-alist.data...
4ce00 20 20 28 6f 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 ..(oset.repo.created.........cre
4ce20 61 74 65 64 41 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 atedAt).....(oset.repo.updated..
4ce40 20 20 20 20 20 20 2e 75 70 64 61 74 65 64 41 74 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f .......updatedAt).....(oset.repo
4ce60 20 70 75 73 68 65 64 20 20 20 20 20 20 20 20 20 2e 70 75 73 68 65 64 41 74 29 0a 20 20 20 20 28 .pushed..........pushedAt).....(
4ce80 6f 73 65 74 20 72 65 70 6f 20 70 61 72 65 6e 74 20 20 20 20 20 20 20 20 20 2e 70 61 72 65 6e 74 oset.repo.parent..........parent
4cea0 2e 6e 61 6d 65 57 69 74 68 4f 77 6e 65 72 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 64 .nameWithOwner).....(oset.repo.d
4cec0 65 73 63 72 69 70 74 69 6f 6e 20 20 20 20 2e 64 65 73 63 72 69 70 74 69 6f 6e 29 0a 20 20 20 20 escription.....description).....
4cee0 28 6f 73 65 74 20 72 65 70 6f 20 68 6f 6d 65 70 61 67 65 20 20 20 20 20 20 20 28 61 6e 64 20 28 (oset.repo.homepage.......(and.(
4cf00 6e 6f 74 20 28 65 71 75 61 6c 20 2e 68 6f 6d 65 70 61 67 65 55 72 6c 20 22 22 29 29 20 2e 68 6f not.(equal..homepageUrl.""))..ho
4cf20 6d 65 70 61 67 65 55 72 6c 29 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 64 65 66 61 75 mepageUrl)).....(oset.repo.defau
4cf40 6c 74 2d 62 72 61 6e 63 68 20 2e 64 65 66 61 75 6c 74 42 72 61 6e 63 68 52 65 66 2e 6e 61 6d 65 lt-branch..defaultBranchRef.name
4cf60 29 0a 20 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 ).....(oset.repo.archived-p.....
4cf80 2e 69 73 41 72 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 .isArchived).....(oset.repo.fork
4cfa0 2d 70 20 20 20 20 20 20 20 20 20 2e 69 73 46 6f 72 6b 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 -p..........isFork).....(oset.re
4cfc0 70 6f 20 6c 6f 63 6b 65 64 2d 70 20 20 20 20 20 20 20 2e 69 73 4c 6f 63 6b 65 64 29 0a 20 20 20 po.locked-p........isLocked)....
4cfe0 20 28 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 69 73 4d 69 .(oset.repo.mirror-p........isMi
4d000 72 72 6f 72 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 rror).....(oset.repo.private-p..
4d020 20 20 20 20 2e 69 73 50 72 69 76 61 74 65 29 0a 20 20 20 20 28 6f 73 65 74 20 72 65 70 6f 20 69 .....isPrivate).....(oset.repo.i
4d040 73 73 75 65 73 2d 70 20 20 20 20 20 20 20 2e 68 61 73 49 73 73 75 65 73 45 6e 61 62 6c 65 64 29 ssues-p........hasIssuesEnabled)
4d060 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 20 20 20 20 2e .....(oset.repo.wiki-p..........
4d080 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 65 70 6f 20 73 hasWikiEnabled).....(oset.repo.s
4d0a0 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 6f 74 61 6c 43 tars...........stargazers.totalC
4d0c0 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...
4d0e0 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 29 29 0a 0a 28 63 6c .....watchers.totalCount)))..(cl
4d100 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 65 -defmethod.forge--update-revnote
4d120 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
4d140 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 69 ).data)...(closql-with-transacti
4d160 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 61 70 70 6c 79 2d 70 on.(forge-db).....(mapc.(apply-p
4d180 61 72 74 69 61 6c 6c 79 20 23 27 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d 72 65 76 6e 6f 74 65 artially.#'forge--update-revnote
4d1a0 20 72 65 70 6f 29 20 64 61 74 61 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f .repo).data)))..(cl-defmethod.fo
4d1c0 72 67 65 2d 2d 75 70 64 61 74 65 2d 72 65 76 6e 6f 74 65 20 28 28 72 65 70 6f 20 66 6f 72 67 65 rge--update-revnote.((repo.forge
4d1e0 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 63 6c 6f -github-repository).data)...(clo
4d200 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 29 0a sql-with-transaction.(forge-db).
4d220 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 71 ....(let-alist.data.......(closq
4d240 6c 2d 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 l-insert........(forge-db)......
4d260 20 20 28 66 6f 72 67 65 2d 72 65 76 6e 6f 74 65 0a 20 20 20 20 20 20 20 20 3a 69 64 20 20 20 20 ..(forge-revnote.........:id....
4d280 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 27 66 6f 72 67 65 2d .......(forge--object-id.'forge-
4d2a0 72 65 76 6e 6f 74 65 20 72 65 70 6f 20 2e 69 64 29 0a 20 20 20 20 20 20 20 20 3a 72 65 70 6f 73 revnote.repo..id).........:repos
4d2c0 69 74 6f 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 3a itory...(oref.repo.id).........:
4d2e0 63 6f 6d 6d 69 74 20 20 20 20 20 20 20 2e 63 6f 6d 6d 69 74 2e 6f 69 64 0a 20 20 20 20 20 20 20 commit........commit.oid........
4d300 20 3a 66 69 6c 65 20 20 20 20 20 20 20 20 20 2e 70 61 74 68 0a 20 20 20 20 20 20 20 20 3a 6c 69 .:file..........path.........:li
4d320 6e 65 20 20 20 20 20 20 20 20 20 2e 70 6f 73 69 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 3a 61 75 ne..........position.........:au
4d340 74 68 6f 72 20 20 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 thor........author.login........
4d360 20 3a 62 6f 64 79 20 20 20 20 20 20 20 20 20 2e 62 6f 64 79 29 0a 20 20 20 20 20 20 20 74 29 29 .:body..........body)........t))
4d380 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 65 2d ))..(cl-defmethod.forge--update-
4d3a0 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 68 75 62 2d 72 65 assignees.((repo.forge-github-re
4d3c0 70 6f 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 61 73 73 pository).data)...(oset.repo.ass
4d3e0 69 67 6e 65 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 ignees.........(with-slots.(id).
4d400 72 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 repo...........(mapcar.(lambda.(
4d420 72 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 row).....................(let-al
4d440 69 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 ist.row.......................(l
4d460 69 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 ist.(forge--object-id.id..id)...
4d480 20 20 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 6c 6f 67 69 6e ...........................login
4d4a0 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 6e 61 ..............................na
4d4c0 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 20 20 20 20 2e me..............................
4d4e0 69 64 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 65 74 65 2d id)))...................(delete-
4d500 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 64 20 66 6f dups.data)))))..(cl-defmethod.fo
4d520 72 67 65 2d 2d 75 70 64 61 74 65 2d 66 6f 72 6b 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 rge--update-forks.((repo.forge-g
4d540 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 6f 73 65 74 20 ithub-repository).data)...(oset.
4d560 72 65 70 6f 20 66 6f 72 6b 73 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 repo.forks.........(with-slots.(
4d580 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 6c 61 6d 62 id).repo...........(mapcar.(lamb
4d5a0 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 20 28 6c 65 da.(row).....................(le
4d5c0 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 20 20 20 20 t-alist.row.....................
4d5e0 20 20 28 6e 63 6f 6e 63 20 28 66 6f 72 67 65 2d 2d 72 65 70 6f 73 69 74 6f 72 79 2d 69 64 73 0a ..(nconc.(forge--repository-ids.
4d600 20 20 20 20 20 20 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 ..............................(e
4d620 69 65 69 6f 2d 6f 62 6a 65 63 74 2d 63 6c 61 73 73 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 ieio-object-class.repo).........
4d640 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
4d660 20 67 69 74 68 6f 73 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 .githost).......................
4d680 20 20 20 20 20 20 20 20 2e 6f 77 6e 65 72 2e 6c 6f 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 .........owner.login............
4d6a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6e 61 6d 65 29 0a 20 20 20 20 20 20 ....................name).......
4d6c0 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 73 74 20 2e 6f 77 .......................(list..ow
4d6e0 6e 65 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 ner.login.......................
4d700 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 ..............name))))..........
4d720 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 0a .........(delete-dups.data))))).
4d740 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 6c 61 62 .(cl-defmethod.forge--update-lab
4d760 65 6c 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 els.((repo.forge-github-reposito
4d780 72 79 29 20 64 61 74 61 29 0a 20 20 28 6f 73 65 74 20 72 65 70 6f 20 6c 61 62 65 6c 73 0a 20 20 ry).data)...(oset.repo.labels...
4d7a0 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.....
4d7c0 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).....
4d7e0 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..
4d800 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 72 67 .....................(list.(forg
4d820 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 20 20 e--object-id.id..id)............
4d840 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 20 ..................name..........
4d860 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 23 22 20 28 ...................(concat."#".(
4d880 64 6f 77 6e 63 61 73 65 20 2e 63 6f 6c 6f 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 downcase..color))...............
4d8a0 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 0a 20 20 ...............description)))...
4d8c0 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 64 61 74 ................(delete-dups.dat
4d8e0 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 75 70 64 a)))))..(cl-defmethod.forge--upd
4d900 61 74 65 2d 6d 69 6c 65 73 74 6f 6e 65 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 ate-milestones.((repo.forge-gith
4d920 75 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 65 74 20 72 65 70 ub-repository).data)...(oset.rep
4d940 6f 20 6d 69 6c 65 73 74 6f 6e 65 73 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 o.milestones.........(with-slots
4d960 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 6c 61 .(id).repo...........(mapcar.(la
4d980 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 20 28 mbda.(row).....................(
4d9a0 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 20 20 let-alist.row...................
4d9c0 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 69 64 20 2e ....(list.(forge--object-id.id..
4d9e0 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).............................
4da00 2e 6e 75 6d 62 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 .number.........................
4da20 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 20 20 20 20 20 20 .....title......................
4da40 20 20 20 20 20 20 20 2e 63 72 65 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ........createdAt...............
4da60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 75 70 64 61 74 65 64 41 74 0a 20 20 20 20 20 20 20 ...............updatedAt........
4da80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 64 75 65 4f 6e 0a 20 20 20 20 ......................dueOn.....
4daa0 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 6c 6f 73 65 64 41 .........................closedA
4dac0 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 20 2e 64 t..............................d
4dae0 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 20 20 20 escription)))...................
4db00 28 64 65 6c 65 74 65 2d 64 75 70 73 20 64 61 74 61 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 54 6f 70 (delete-dups.data)))))..;;;;.Top
4db20 69 63 73 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 2d 74 ics..(cl-defmethod.forge--pull-t
4db40 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 69 74 opic.((repo.forge-github-reposit
4db60 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)............................
4db80 20 20 20 20 20 20 28 6e 75 6d 62 65 72 20 6e 75 6d 62 65 72 29 29 0a 20 20 28 6c 65 74 20 28 28 ......(number.number))...(let.((
4dba0 69 64 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d id.(oref.repo.id))).....(forge--
4dbc0 70 75 6c 6c 2d 74 6f 70 69 63 0a 20 20 20 20 20 72 65 70 6f 0a 20 20 20 20 20 28 66 6f 72 67 65 pull-topic......repo......(forge
4dbe0 2d 69 73 73 75 65 20 3a 72 65 70 6f 73 69 74 6f 72 79 20 69 64 20 3a 6e 75 6d 62 65 72 20 6e 75 -issue.:repository.id.:number.nu
4dc00 6d 62 65 72 29 0a 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 65 mber)......:errorback.(lambda.(e
4dc20 72 72 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 20 20 20 20 rr._headers._status._req).......
4dc40 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 75 61 6c 20 28 63 64 72 20 28 61 ............(when.(equal.(cdr.(a
4dc60 73 73 71 20 27 74 79 70 65 20 28 63 61 64 72 20 65 72 72 29 29 29 20 22 4e 4f 54 5f 46 4f 55 4e ssq.'type.(cadr.err)))."NOT_FOUN
4dc80 44 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 6f 72 67 65 2d 2d D").....................(forge--
4dca0 70 75 6c 6c 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 pull-topic......................
4dcc0 72 65 70 6f 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 repo......................(forge
4dce0 2d 70 75 6c 6c 72 65 71 20 3a 72 65 70 6f 73 69 74 6f 72 79 20 69 64 20 3a 6e 75 6d 62 65 72 20 -pullreq.:repository.id.:number.
4dd00 6e 75 6d 62 65 72 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 number)))))))..(cl-defmethod.for
4dd20 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
4dd40 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)..................
4dd60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 6f 70 69 63 20 66 6f 72 67 65 2d 69 73 73 ................(topic.forge-iss
4dd80 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 20 ue).............................
4dda0 20 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 29 0a 20 20 .....&key.callback.errorback)...
4ddc0 28 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 (let.((buffer.(current-buffer)))
4dde0 0a 20 20 20 20 28 67 68 75 62 2d 66 65 74 63 68 2d 69 73 73 75 65 0a 20 20 20 20 20 28 6f 72 65 .....(ghub-fetch-issue......(ore
4de00 66 20 72 65 70 6f 20 6f 77 6e 65 72 29 0a 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 6e 61 f.repo.owner)......(oref.repo.na
4de20 6d 65 29 0a 20 20 20 20 20 28 6f 72 65 66 20 74 6f 70 69 63 20 6e 75 6d 62 65 72 29 0a 20 20 20 me)......(oref.topic.number)....
4de40 20 20 28 6c 61 6d 62 64 61 20 28 64 61 74 61 29 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d ..(lambda.(data)........(forge--
4de60 75 70 64 61 74 65 2d 69 73 73 75 65 20 72 65 70 6f 20 64 61 74 61 29 0a 20 20 20 20 20 20 20 28 update-issue.repo.data)........(
4de80 66 6f 72 67 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 20 28 61 6e 64 20 28 62 75 66 66 65 forge-refresh-buffer.(and.(buffe
4dea0 72 2d 6c 69 76 65 2d 70 20 62 75 66 66 65 72 29 20 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 r-live-p.buffer).buffer)).......
4dec0 20 28 77 68 65 6e 20 63 61 6c 6c 62 61 63 6b 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 6c 62 61 63 .(when.callback.(funcall.callbac
4dee0 6b 29 29 29 0a 20 20 20 20 20 6e 69 6c 0a 20 20 20 20 20 3a 68 6f 73 74 20 28 6f 72 65 66 20 72 k)))......nil......:host.(oref.r
4df00 65 70 6f 20 61 70 69 68 6f 73 74 29 0a 20 20 20 20 20 3a 61 75 74 68 20 27 66 6f 72 67 65 0a 20 epo.apihost)......:auth.'forge..
4df20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 65 72 72 6f 72 62 61 63 6b 29 29 29 0a 0a 28 63 6c ....:errorback.errorback)))..(cl
4df40 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 72 -defmethod.forge--pull-topic.((r
4df60 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 20 epo.forge-github-repository)....
4df80 20 20 20 20 20 20 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 ..............................(t
4dfa0 6f 70 69 63 20 66 6f 72 67 65 2d 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 opic.forge-pullreq).............
4dfc0 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 63 61 6c 6c 62 61 .....................&key.callba
4dfe0 63 6b 20 65 72 72 6f 72 62 61 63 6b 29 0a 20 20 28 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 63 ck.errorback)...(let.((buffer.(c
4e000 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 67 68 75 62 2d 66 65 74 63 68 urrent-buffer))).....(ghub-fetch
4e020 2d 70 75 6c 6c 72 65 71 0a 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 6f 77 6e 65 72 29 0a -pullreq......(oref.repo.owner).
4e040 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 20 6e 61 6d 65 29 0a 20 20 20 20 20 28 6f 72 65 66 .....(oref.repo.name)......(oref
4e060 20 74 6f 70 69 63 20 6e 75 6d 62 65 72 29 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 64 61 74 .topic.number)......(lambda.(dat
4e080 61 29 0a 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 65 71 a)........(forge--update-pullreq
4e0a0 20 72 65 70 6f 20 64 61 74 61 29 0a 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 66 72 65 73 .repo.data)........(forge-refres
4e0c0 68 2d 62 75 66 66 65 72 20 28 61 6e 64 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 h-buffer.(and.(buffer-live-p.buf
4e0e0 66 65 72 29 20 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 28 77 68 65 6e 20 63 61 6c 6c 62 fer).buffer))........(when.callb
4e100 61 63 6b 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 6c 62 61 63 6b 29 29 29 0a 20 20 20 20 20 6e 69 ack.(funcall.callback)))......ni
4e120 6c 0a 20 20 20 20 20 3a 68 6f 73 74 20 28 6f 72 65 66 20 72 65 70 6f 20 61 70 69 68 6f 73 74 29 l......:host.(oref.repo.apihost)
4e140 0a 20 20 20 20 20 3a 61 75 74 68 20 27 66 6f 72 67 65 0a 20 20 20 20 20 3a 65 72 72 6f 72 62 61 ......:auth.'forge......:errorba
4e160 63 6b 20 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 ck.errorback)))..(cl-defmethod.f
4e180 6f 72 67 65 2d 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 orge--update-status.((repo.forge
4e1a0 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 20 20 20 -github-repository).............
4e1c0 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 6f 70 69 63 20 64 61 ........................topic.da
4e1e0 74 61 20 62 75 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 ta.bump.initial-pull)...(let-ali
4e200 73 74 20 64 61 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 st.data.....(let.((updated.(or..
4e220 75 70 64 61 74 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 updatedAt..createdAt))..........
4e240 20 28 63 75 72 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 .(current-status.(oref.topic.sta
4e260 74 75 73 29 29 29 0a 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 tus))).......(cond.((not..isRead
4e280 42 79 56 69 65 77 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 74 6f 70 ByViewer)..............(oset.top
4e2a0 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 20 20 20 20 20 20 20 ic.status.'unread)).............
4e2c0 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 28 6f 73 65 74 (initial-pull..............(oset
4e2e0 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 20 20 20 .topic.status.'done))...........
4e300 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 20 20 20 20 20 ..((null.current-status)........
4e320 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 70 65 6e 64 69 6e ......(oset.topic.status.'pendin
4e340 67 29 29 0a 20 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 g)).............((string>.update
4e360 64 20 28 6f 72 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 d.(oref.topic.updated)).........
4e380 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 70 65 6e 64 69 6e 67 .....(oset.topic.status.'pending
4e3a0 29 29 29 0a 20 20 20 20 20 20 28 6f 73 65 74 20 74 6f 70 69 63 20 75 70 64 61 74 65 64 20 75 70 ))).......(oset.topic.updated.up
4e3c0 64 61 74 65 64 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 62 75 6d 70 0a 20 20 20 20 20 20 20 20 dated).......(when.bump.........
4e3e0 28 6c 65 74 2a 20 28 28 73 6c 6f 74 20 28 69 66 20 28 66 6f 72 67 65 2d 69 73 73 75 65 2d 70 20 (let*.((slot.(if.(forge-issue-p.
4e400 74 6f 70 69 63 29 20 27 69 73 73 75 65 73 2d 75 6e 74 69 6c 20 27 70 75 6c 6c 72 65 71 73 2d 75 topic).'issues-until.'pullreqs-u
4e420 6e 74 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 74 69 6c 20 28 65 69 ntil))................(until.(ei
4e440 65 69 6f 2d 6f 72 65 66 20 72 65 70 6f 20 73 6c 6f 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 eio-oref.repo.slot)))...........
4e460 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 20 75 (when.(or.(not.until).(string>.u
4e480 70 64 61 74 65 64 20 75 6e 74 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 69 65 69 pdated.until)).............(eiei
4e4a0 6f 2d 6f 73 65 74 20 72 65 70 6f 20 73 6c 6f 74 20 75 70 64 61 74 65 64 29 29 29 29 29 29 29 0a o-oset.repo.slot.updated))))))).
4e4c0 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 72 67 .;;;;.Issues..(cl-defmethod.forg
4e4e0 65 2d 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 e--update-issues.((repo.forge-gi
4e500 74 68 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 thub-repository).data...........
4e520 20 20 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 ..........................&optio
4e540 6e 61 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 nal.bump)...(closql-with-transac
4e560 74 69 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 tion.(forge-db).....(let.((initi
4e580 61 6c 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 al-pull.(not.(oref.repo.issues-u
4e5a0 6e 74 69 6c 29 29 29 29 0a 20 20 20 20 20 20 28 6d 61 70 63 20 28 6c 61 6d 62 64 61 20 28 65 29 ntil)))).......(mapc.(lambda.(e)
4e5c0 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 6f 20 65 20 62 75 6d .(forge--update-issue.repo.e.bum
4e5e0 70 20 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 29 29 20 64 61 74 61 29 29 29 29 0a 0a 28 63 6c 2d 64 p.initial-pull)).data))))..(cl-d
4e600 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 28 28 72 efmethod.forge--update-issue.((r
4e620 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
4e640 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...............................
4e660 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 6c 6c .....&optional.bump.initial-pull
4e680 29 0a 20 20 28 6c 65 74 20 28 69 73 73 75 65 2d 69 64 20 69 73 73 75 65 29 0a 20 20 20 20 28 6c )...(let.(issue-id.issue).....(l
4e6a0 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 77 69 74 68 et-alist.data.......(closql-with
4e6c0 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 20 20 20 20 -transaction.(forge-db).........
4e6e0 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 74 2d 69 64 (setq.issue-id.(forge--object-id
4e700 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 0a 20 20 20 .'forge-issue.repo..number))....
4e720 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 67 65 74 2d .....(setq.issue.(or.(forge-get-
4e740 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 20 20 20 20 issue.repo..number).............
4e760 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......
4e780 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 62 29 0a 20 ....................(forge-db)..
4e7a0 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 69 ........................(forge-i
4e7c0 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 20 20 20 20 ssue.:id.........issue-id.......
4e7e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4e800 3a 72 65 70 6f 73 69 74 6f 72 79 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 0a 20 20 20 20 20 :repository.(oref.repo.id)......
4e820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4e840 20 3a 6e 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 .:number......number))))........
4e860 20 28 6f 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 .(oset.issue.their-id....id)....
4e880 20 20 20 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 .....(oset.issue.slug.......(for
4e8a0 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 73 65 mat."#%s"..number)).........(ose
4e8c0 74 20 69 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 t.issue.state...............(pca
4e8e0 73 65 2d 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 se-exhaustive.(list..stateReason
4e900 20 2e 73 74 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 22 43 4f 4d ..state).................(`("COM
4e920 50 4c 45 54 45 44 22 20 20 20 2c 5f 29 20 27 63 6f 6d 70 6c 65 74 65 64 29 0a 20 20 20 20 20 20 PLETED"...,_).'completed).......
4e940 20 20 20 20 20 20 20 20 20 20 28 60 28 22 4e 4f 54 5f 50 4c 41 4e 4e 45 44 22 20 2c 5f 29 20 27 ..........(`("NOT_PLANNED".,_).'
4e960 75 6e 70 6c 61 6e 6e 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 5f unplanned).................(`(,_
4e980 20 20 20 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 20 ......"CLOSED").'completed).....
4e9a0 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 5f 20 20 20 20 20 20 20 20 22 4f 50 45 4e 22 29 ............(`(,_........"OPEN")
4e9c0 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 73 73 75 65 20 61 75 .'open))).........(oset.issue.au
4e9e0 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 20 20 20 20 20 20 20 thor......author.login).........
4ea00 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 69 74 6c 65 29 0a 20 (oset.issue.title.......title)..
4ea20 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 64 20 20 20 20 2e 63 .......(oset.issue.created.....c
4ea40 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 73 73 75 65 20 63 6c reatedAt).........(oset.issue.cl
4ea60 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 20 20 20 28 6f 73 65 osed......closedAt).........(ose
4ea80 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 64 29 0a 20 20 20 20 t.issue.locked-p....locked).....
4eaa0 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 20 20 28 61 6e 64 20 ....(oset.issue.milestone..(and.
4eac0 2e 6d 69 6c 65 73 74 6f 6e 65 2e 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .milestone.id...................
4eae0 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 6f 62 6a 65 63 74 ..................(forge--object
4eb00 2d 69 64 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 -id.(oref.repo.id)..............
4eb20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4eb40 20 20 20 20 20 20 20 20 20 2e 6d 69 6c 65 73 74 6f 6e 65 2e 69 64 29 29 29 0a 20 20 20 20 20 20 ..........milestone.id))).......
4eb60 20 20 28 6f 73 65 74 20 69 73 73 75 65 20 62 6f 64 79 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d ..(oset.issue.body.......(forge-
4eb80 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 20 20 20 20 20 20 20 -sanitize-string..body))........
4eba0 20 2e 64 61 74 61 62 61 73 65 49 64 20 3b 20 53 69 6c 65 6e 63 65 20 45 6d 61 63 73 20 32 35 20 ..databaseId.;.Silence.Emacs.25.
4ebc0 62 79 74 65 2d 63 6f 6d 70 69 6c 65 72 2e 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 byte-compiler..........(dolist.(
4ebe0 63 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 69 73 c..comments)...........(let-alis
4ec00 74 20 63 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 0a 20 t.c.............(closql-insert..
4ec20 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 20 20 ............(forge-db)..........
4ec40 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 20 20 20 20 20 20 20 ....(forge-issue-post...........
4ec60 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 69 64 20 69 ....:id......(forge--object-id.i
4ec80 73 73 75 65 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 ssue-id..databaseId)............
4eca0 20 20 20 3a 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 ...:issue...issue-id............
4ecc0 20 20 20 3a 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 ...:number...databaseId.........
4ece0 20 20 20 20 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 ......:author...author.login....
4ed00 20 20 20 20 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 ...........:created..createdAt..
4ed20 20 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 41 74 .............:updated..updatedAt
4ed40 0a 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 6f 72 67 65 2d 2d ...............:body....(forge--
4ed60 73 61 6e 69 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 sanitize-string..body)).........
4ed80 20 20 20 20 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 .....t))).........(forge--update
4eda0 2d 73 74 61 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 -status.repo.issue.data.bump.ini
4edc0 74 69 61 6c 2d 70 75 6c 6c 29 29 0a 20 20 20 20 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 tial-pull)).......(ignore-errors
4ede0 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 69 64 2d 73 6c 6f 74 20 72 65 70 .........(forge--set-id-slot.rep
4ee00 6f 20 69 73 73 75 65 20 27 61 73 73 69 67 6e 65 65 73 20 2e 61 73 73 69 67 6e 65 65 73 29 29 0a o.issue.'assignees..assignees)).
4ee20 20 20 20 20 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 0a 20 20 20 20 20 20 20 20 28 75 6e ......(ignore-errors.........(un
4ee40 6c 65 73 73 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 6b less.(magit-get-boolean."forge.k
4ee60 6c 75 64 67 65 2d 66 6f 72 2d 69 73 73 75 65 2d 32 39 34 22 29 0a 20 20 20 20 20 20 20 20 20 20 ludge-for-issue-294")...........
4ee80 28 66 6f 72 67 65 2d 2d 73 65 74 2d 69 64 2d 73 6c 6f 74 20 72 65 70 6f 20 69 73 73 75 65 20 27 (forge--set-id-slot.repo.issue.'
4eea0 6c 61 62 65 6c 73 20 2e 6c 61 62 65 6c 73 29 29 29 29 0a 20 20 20 20 69 73 73 75 65 29 29 0a 0a labels..labels)))).....issue))..
4eec0 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 6f 64 20 66 6f 72 ;;;;.Pullreqs..(cl-defmethod.for
4eee0 67 65 2d 2d 75 70 64 61 74 65 2d 70 75 6c 6c 72 65 71 73 20 28 28 72 65 70 6f 20 66 6f 72 67 65 ge--update-pullreqs.((repo.forge
4ef00 2d 67 69 74 68 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 -github-repository).data........
4ef20 20 20 20 20 20 20 20 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 ...............................&
4ef40 6f 70 74 69 6f 6e 61 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 optional.bump)...(closql-with-tr
4ef60 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 28 6c 65 74 20 28 28 ansaction.(forge-db).....(let.((
4ef80 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 20 28 6e 6f 74 20 28 6f 72 65 66 20 72 65 70 6f 20 70 75 6c initial-pull.(not.(oref.repo.pul
4efa0 6c 72 65 71 73 2d 75 6e 74 69 6c 29 29 29 29 0a 20 20 20 20 20 20 28 6d 61 70 63 20 28 6c 61 6d lreqs-until)))).......(mapc.(lam
4efc0 62 64 61 20 28 65 29 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 bda.(e).(forge--update-pullreq.r
4efe0 65 70 6f 20 65 20 62 75 6d 70 20 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 29 29 20 64 61 74 61 29 29 epo.e.bump.initial-pull)).data))
4f000 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 65 2d ))..(cl-defmethod.forge--update-
4f020 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 72 65 70 6f pullreq.((repo.forge-github-repo
4f040 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 20 20 20 20 20 20 20 sitory).data....................
4f060 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 6c 20 62 75 6d 70 ..................&optional.bump
4f080 20 69 6e 69 74 69 61 6c 2d 70 75 6c 6c 29 0a 20 20 28 6c 65 74 20 28 70 75 6c 6c 72 65 71 2d 69 .initial-pull)...(let.(pullreq-i
4f0a0 64 20 70 75 6c 6c 72 65 71 29 0a 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 61 74 61 0a 20 d.pullreq).....(let-alist.data..
4f0c0 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 6f 6e 20 28 66 .....(closql-with-transaction.(f
4f0e0 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 75 6c 6c 72 65 71 2d 69 orge-db).........(setq.pullreq-i
4f100 64 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 6c 72 d.(forge--object-id.'forge-pullr
4f120 65 71 20 72 65 70 6f 20 2e 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 eq.repo..number)).........(setq.
4f140 70 75 6c 6c 72 65 71 20 28 6f 72 20 28 66 6f 72 67 65 2d 67 65 74 2d 70 75 6c 6c 72 65 71 20 72 pullreq.(or.(forge-get-pullreq.r
4f160 65 70 6f 20 2e 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 epo..number)....................
4f180 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 20 20 20 20 .......(closql-insert...........
4f1a0 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 0a 20 20 20 20 .................(forge-db).....
4f1c0 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 75 .......................(forge-pu
4f1e0 6c 6c 72 65 71 20 3a 69 64 20 20 20 20 20 20 20 20 20 70 75 6c 6c 72 65 71 2d 69 64 0a 20 20 20 llreq.:id.........pullreq-id....
4f200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4f220 20 20 20 20 20 20 20 3a 72 65 70 6f 73 69 74 6f 72 79 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 .......:repository.(oref.repo.id
4f240 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 )...............................
4f260 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 6d 62 65 72 29 ............:number......number)
4f280 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 74 68 65 69 72 2d ))).........(oset.pullreq.their-
4f2a0 69 64 20 20 20 20 20 2e 69 64 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 id......id).........(oset.pullre
4f2c0 71 20 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 2e 6e 75 q.slug.........(format."#%s"..nu
4f2e0 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 73 74 61 mber)).........(oset.pullreq.sta
4f300 74 65 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 2e 73 74 61 te........(pcase-exhaustive..sta
4f320 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 20 20 20 20 20 20 20 te..............................
4f340 20 20 20 20 20 20 20 20 28 22 4d 45 52 47 45 44 22 20 27 6d 65 72 67 65 64 29 0a 20 20 20 20 20 ........("MERGED".'merged)......
4f360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4f380 28 22 43 4c 4f 53 45 44 22 20 27 72 65 6a 65 63 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 ("CLOSED".'rejected)............
4f3a0 20 20 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 4f 50 45 4e ..........................("OPEN
4f3c0 22 20 20 20 27 6f 70 65 6e 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 "...'open))).........(oset.pullr
4f3e0 65 71 20 61 75 74 68 6f 72 20 20 20 20 20 20 20 2e 61 75 74 68 6f 72 2e 6c 6f 67 69 6e 29 0a 20 eq.author........author.login)..
4f400 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 74 69 74 6c 65 20 20 20 20 20 20 .......(oset.pullreq.title......
4f420 20 20 2e 74 69 74 6c 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 ...title).........(oset.pullreq.
4f440 63 72 65 61 74 65 64 20 20 20 20 20 20 2e 63 72 65 61 74 65 64 41 74 29 0a 20 20 20 20 20 20 20 created.......createdAt)........
4f460 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 63 6c 6f 73 65 64 20 20 20 20 20 20 20 2e 63 6c 6f .(oset.pullreq.closed........clo
4f480 73 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 6d 65 72 sedAt).........(oset.pullreq.mer
4f4a0 67 65 64 20 20 20 20 20 20 20 2e 6d 65 72 67 65 64 41 74 29 0a 20 20 20 20 20 20 20 20 28 6f 73 ged........mergedAt).........(os
4f4c0 65 74 20 70 75 6c 6c 72 65 71 20 64 72 61 66 74 2d 70 20 20 20 20 20 20 2e 69 73 44 72 61 66 74 et.pullreq.draft-p.......isDraft
4f4e0 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 6c 6f 63 6b 65 64 2d 70 ).........(oset.pullreq.locked-p
4f500 20 20 20 20 20 2e 6c 6f 63 6b 65 64 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c ......locked).........(oset.pull
4f520 72 65 71 20 65 64 69 74 61 62 6c 65 2d 70 20 20 20 2e 6d 61 69 6e 74 61 69 6e 65 72 43 61 6e 4d req.editable-p....maintainerCanM
4f540 6f 64 69 66 79 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 72 6f odify).........(oset.pullreq.cro
4f560 73 73 2d 72 65 70 6f 2d 70 20 2e 69 73 43 72 6f 73 73 52 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 ss-repo-p..isCrossRepository)...
4f580 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 66 20 20 20 20 ......(oset.pullreq.base-ref....
4f5a0 20 2e 62 61 73 65 52 65 66 2e 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 70 75 ..baseRef.name).........(oset.pu
4f5c0 6c 6c 72 65 71 20 62 61 73 65 2d 72 65 76 20 20 20 20 20 2e 62 61 73 65 52 65 66 4f 69 64 29 0a llreq.base-rev......baseRefOid).
4f5e0 20 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 70 6f 20 ........(oset.pullreq.base-repo.
4f600 20 20 20 2e 62 61 73 65 52 65 66 2e 72 65 70 6f 73 69 74 6f 72 79 2e 6e 61 6d 65 57 69 74 68 4f ....baseRef.repository.nameWithO
4f620 77 6e 65 72 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 64 wner).........(oset.pullreq.head
4f640 2d 72 65 66 20 20 20 20 20 2e 68 65 61 64 52 65 66 2e 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 -ref......headRef.name).........
4f660 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 68 65 61 64 2d 72 65 76 20 20 20 20 20 2e 68 65 61 64 (oset.pullreq.head-rev......head
4f680 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 6c 72 65 71 20 68 65 RefOid).........(oset.pullreq.he
4f6a0 61 64 2d 75 73 65 72 20 20 20 20 2e 68 65 61 64 52 65 66 2e 72 65 70 6f 73 69 74 6f 72 79 2e 6f ad-user.....headRef.repository.o
4f6c0 77 6e 65 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 72 65 wner.login).........(oset.pullre
4f6e0 71 20 68 65 61 64 2d 72 65 70 6f 20 20 20 20 2e 68 65 61 64 52 65 66 2e 72 65 70 6f 73 69 74 6f q.head-repo.....headRef.reposito
4f700 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 65 74 20 ry.nameWithOwner).........(oset.
4f720 70 75 6c 6c 72 65 71 20 6d 69 6c 65 73 74 6f 6e 65 20 20 20 20 28 61 6e 64 20 2e 6d 69 6c 65 73 pullreq.milestone....(and..miles
4f740 74 6f 6e 65 2e 69 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 tone.id.........................
4f760 20 20 20 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 ................(forge--object-i
4f780 64 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 20 d.(oref.repo.id)................
4f7a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4f7c0 20 20 20 20 20 20 20 20 20 20 20 2e 6d 69 6c 65 73 74 6f 6e 65 2e 69 64 29 29 29 0a 20 20 20 20 ............milestone.id))).....
4f7e0 20 20 20 20 28 6f 73 65 74 20 70 75 6c 6c 72 65 71 20 62 6f 64 79 20 20 20 20 20 20 20 20 20 28 ....(oset.pullreq.body.........(
4f800 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 20 forge--sanitize-string..body))..
4f820 20 20 20 20 20 20 20 2e 64 61 74 61 62 61 73 65 49 64 20 3b 20 53 69 6c 65 6e 63 65 20 45 6d 61 ........databaseId.;.Silence.Ema
4f840 63 73 20 32 35 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 72 2e 0a 20 20 20 20 20 20 20 20 28 64 6f cs.25.byte-compiler..........(do
4f860 6c 69 73 74 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 list.(p..comments)...........(le
4f880 74 2d 61 6c 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 t-alist.p.............(closql-in
4f8a0 73 65 72 74 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 sert..............(forge-db)....
4f8c0 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 73 74 0a 20 20 ..........(forge-pullreq-post...
4f8e0 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 2d 2d 6f 62 6a ............:id......(forge--obj
4f900 65 63 74 2d 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 ect-id.pullreq-id..databaseId)..
4f920 20 20 20 20 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 .............:pullreq.pullreq-id
4f940 0a 20 20 20 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 ...............:number...databas
4f960 65 49 64 0a 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 eId...............:author...auth
4f980 6f 72 2e 6c 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 or.login...............:created.
4f9a0 2e 63 72 65 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 .createdAt...............:update
4f9c0 64 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 3a 62 6f 64 79 d..updatedAt...............:body
4f9e0 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
4fa00 79 29 29 0a 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 y))..............t))).........(f
4fa20 6f 72 67 65 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 orge--update-status.repo.pullreq
4fa40 20 64 61 74 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 .data.bump.initial-pull)).......
4fa60 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 (ignore-errors.........(forge--s
4fa80 65 74 2d 69 64 2d 73 6c 6f 74 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 20 27 61 73 73 69 67 6e 65 et-id-slot.repo.pullreq.'assigne
4faa0 65 73 20 2e 61 73 73 69 67 6e 65 65 73 29 29 0a 20 20 20 20 20 20 28 69 67 6e 6f 72 65 2d 65 72 es..assignees)).......(ignore-er
4fac0 72 6f 72 73 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 73 65 74 2d 69 64 2d 73 6c 6f 74 rors.........(forge--set-id-slot
4fae0 20 72 65 70 6f 20 70 75 6c 6c 72 65 71 20 27 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 0a 20 .repo.pullreq.'review-requests..
4fb00 20 20 20 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 2d 2d 6d 61 ...........................(--ma
4fb20 70 20 28 63 64 72 20 28 63 61 64 72 20 28 63 61 72 20 69 74 29 29 29 0a 20 20 20 20 20 20 20 20 p.(cdr.(cadr.(car.it))).........
4fb40 20 20 20 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 72 65 76 69 ............................revi
4fb60 65 77 52 65 71 75 65 73 74 73 29 29 29 0a 20 20 20 20 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f ewRequests))).......(ignore-erro
4fb80 72 73 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6d 61 67 69 74 2d 67 65 74 2d 62 6f rs.........(unless.(magit-get-bo
4fba0 6f 6c 65 61 6e 20 22 66 6f 72 67 65 2e 6b 6c 75 64 67 65 2d 66 6f 72 2d 69 73 73 75 65 2d 32 39 olean."forge.kludge-for-issue-29
4fbc0 34 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 69 64 2d 73 6c 6f 4")...........(forge--set-id-slo
4fbe0 74 20 72 65 70 6f 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 t.repo.pullreq.'labels..labels))
4fc00 29 29 0a 20 20 20 20 70 75 6c 6c 72 65 71 29 29 0a 0a 3b 3b 3b 3b 20 4e 6f 74 69 66 69 63 61 74 )).....pullreq))..;;;;.Notificat
4fc20 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 70 75 6c 6c 2d ions..(cl-defmethod.forge--pull-
4fc40 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 0a 20 20 28 28 5f 63 6c 61 73 73 20 28 73 75 62 63 6c 61 notifications...((_class.(subcla
4fc60 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 29 29 20 67 69 74 ss.forge-github-repository)).git
4fc80 68 6f 73 74 20 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6c 6c 62 61 63 6b 29 0a 20 20 3b 3b 20 54 68 host.&optional.callback)...;;.Th
4fca0 65 20 47 72 61 70 68 51 4c 20 41 50 49 20 64 6f 65 73 6e 27 74 20 73 75 70 70 6f 72 74 20 6e 6f e.GraphQL.API.doesn't.support.no
4fcc0 74 69 66 69 63 61 74 69 6f 6e 73 20 61 6e 64 20 61 6c 73 6f 20 6c 69 6b 65 73 20 74 6f 0a 20 20 tifications.and.also.likes.to...
4fce0 3b 3b 20 74 69 6d 65 6f 75 74 20 66 6f 72 20 68 61 6e 64 63 72 61 66 74 65 64 20 72 65 71 75 65 ;;.timeout.for.handcrafted.reque
4fd00 73 74 73 2c 20 66 6f 72 63 69 6e 67 20 75 73 20 74 6f 20 70 65 72 66 6f 72 6d 20 61 20 6d 61 6a sts,.forcing.us.to.perform.a.maj
4fd20 6f 72 0a 20 20 3b 3b 20 72 61 69 6e 20 64 61 6e 63 65 2e 0a 20 20 28 6c 65 74 20 28 28 73 70 65 or...;;.rain.dance....(let.((spe
4fd40 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 73 74 c.(forge--get-forge-host.githost
4fd60 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 6c 20 .t))).....(forge--msg.nil.t.nil.
4fd80 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 70 63 "Pulling.notifications").....(pc
4fda0 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 73 74 ase-let*.........((`(,_.,apihost
4fdc0 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 6e 6f 74 69 .,forge.,_).spec)..........(noti
4fde0 66 73 0a 20 20 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 fs...........(seq-keep.(lambda.(
4fe00 64 61 74 61 29 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 data).......................;;.G
4fe20 69 74 68 75 62 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 ithub.returns.notifications.for.
4fe40 72 65 70 6f 73 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 repositories.the................
4fe60 20 20 20 20 20 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 .......;;.user.no.longer.has.acc
4fe80 65 73 73 20 74 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 ess.to...Trying.to.retrieve.....
4fea0 20 20 20 20 20 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 ..................;;.information
4fec0 20 66 6f 72 20 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 .for.such.repositories.leads.to.
4fee0 65 72 72 6f 72 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 errors,.......................;;
4ff00 20 77 68 69 63 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 .which.we.suppress...See.#164...
4ff20 20 20 20 20 20 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 .....................(with-demot
4ff40 65 64 2d 65 72 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 ed-errors."forge--pull-notificat
4ff60 69 6f 6e 73 3a 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 ions:.%S".......................
4ff80 20 20 28 66 6f 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 ..(forge--ghub-massage-notificat
4ffa0 69 6f 6e 20 64 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 ion.data.githost))).............
4ffc0 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 67 65 74 20 6e 69 6c 20 22 2f 6e ........(forge--ghub-get.nil."/n
4ffe0 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"...................
50000 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 73 69 6e 63 65 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 ....(if-let.((since.(forge--ghub
50020 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 73 69 6e 63 65 20 66 6f 72 67 65 29 29 29 0a 20 20 -notifications-since.forge)))...
50040 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 61 6c 6c 20 2e ........................`((all..
50060 20 74 29 20 28 73 69 6e 63 65 20 2e 20 2c 73 69 6e 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 .t).(since...,since))...........
50080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 28 61 6c 6c 20 2e 20 74 29 29 29 0a 20 20 20 20 ..............'((all...t))).....
500a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 6f 73 74 20 61 70 69 68 6f 73 74 20 ..................:host.apihost.
500c0 3a 75 6e 70 61 67 69 6e 61 74 65 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 67 72 6f 75 70 :unpaginate.t)))..........(group
500e0 73 20 28 2d 70 61 72 74 69 74 69 6f 6e 2d 61 6c 6c 20 35 30 20 6e 6f 74 69 66 73 29 29 0a 20 20 s.(-partition-all.50.notifs))...
50100 20 20 20 20 20 20 20 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 .......(pages..(length.groups)).
50120 20 20 20 20 20 20 20 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 .........(page...0)..........(to
50140 70 69 63 73 20 6e 69 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 pics.nil)).......(cl-labels.....
50160 20 20 20 20 20 20 28 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 ......((cb.(&optional.data._head
50180 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 28 ers._status._req)..............(
501a0 77 68 65 6e 20 64 61 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 when.data................(setq.t
501c0 6f 70 69 63 73 20 28 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 opics.(nconc.topics.(cdr.data)))
501e0 29 0a 20 20 20 20 20 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 )..............(if.groups.......
50200 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 63 6c 2d 69 6e 63 66 20 70 61 67 65 29 ...........(progn.(cl-incf.page)
50220 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-
50240 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 20 -msg.nil.t.nil..................
50260 20 20 20 20 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 ..................."Pulling.noti
50280 66 69 63 61 74 69 6f 6e 73 20 28 70 61 67 65 20 25 73 2f 25 73 29 22 0a 20 20 20 20 20 20 20 20 fications.(page.%s/%s)".........
502a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 67 65 ............................page
502c0 20 70 61 67 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 .pages).........................
502e0 28 67 68 75 62 2d 2d 67 72 61 70 68 71 6c 2d 76 61 63 75 75 6d 0a 20 20 20 20 20 20 20 20 20 20 (ghub--graphql-vacuum...........
50300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 27 71 75 65 72 79 20 28 73 65 71 ...............(cons.'query.(seq
50320 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 0a 20 20 20 -keep.#'caddr.(pop.groups)))....
50340 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 23 27 63 62 20 6e ......................nil.#'cb.n
50360 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 29 29 0a il.:auth.'forge.:host.apihost)).
50380 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 20 74 ...............(forge--msg.nil.t
503a0 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 22 29 0a 20 20 .t..."Pulling.notifications")...
503c0 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 20 74 20 6e .............(forge--msg.nil.t.n
503e0 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 0a 20 20 20 20 il."Storing.notifications").....
50400 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 61 74 65 2d 6e ...........(forge--ghub-update-n
50420 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 29 0a 20 20 20 20 otifications.notifs.topics).....
50440 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 74 20 74 20 22 ...........(forge--msg.nil.t.t."
50460 53 74 6f 72 69 6e 67 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 22 29 0a 20 20 20 20 20 20 20 20 Storing.notifications").........
50480 20 20 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 .......(when.callback...........
504a0 20 20 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 .......(funcall.callback)))))...
504c0 20 20 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 ......(cb)))))..(defun.forge--gh
504e0 75 62 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 ub-notifications-since.(forge)..
50500 20 28 63 61 61 72 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 63 74 20 3a 64 69 73 74 .(caar.(forge-sql.[:select.:dist
50520 69 6e 63 74 20 5b 6e 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 inct.[notification:updated].....
50540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 20 5b 6e 6f 74 69 66 69 63 61 74 ................:from.[notificat
50560 69 6f 6e 20 72 65 70 6f 73 69 74 6f 72 79 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ion.repository].................
50580 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 74 6f 72 79 3a 66 6f ....:where.(and.(=.repository:fo
505a0 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)........................
505c0 20 20 20 20 20 20 20 20 20 28 3d 20 72 65 70 6f 73 69 74 6f 72 79 3a 69 64 20 6e 6f 74 69 66 69 .........(=.repository:id.notifi
505e0 63 61 74 69 6f 6e 3a 72 65 70 6f 73 69 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 cation:repository)).............
50600 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 74 69 66 69 63 ........:order-by.[(desc.notific
50620 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 20 20 20 20 20 ation:updated)]]................
50640 20 20 20 20 66 6f 72 67 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 68 75 62 ....forge)))..(defun.forge--ghub
50660 2d 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 -massage-notification.(data.gith
50680 6f 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 ost)...(let-alist.data.....(let*
506a0 20 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 .((type.(intern.(downcase..subje
506c0 63 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 ct.type)))............(type.(if.
506e0 28 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 (eq.type.'pullrequest).'pullreq.
50700 74 79 70 65 29 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 6d 65 6d 71 20 74 79 70 65 20 27 28 type))).......(and.(memq.type.'(
50720 70 75 6c 6c 72 65 71 20 69 73 73 75 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a pullreq.issue))............(let*
50740 20 28 28 6e 75 6d 62 65 72 20 28 61 6e 64 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5b 30 .((number.(and.(string-match."[0
50760 2d 39 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 20 20 20 20 20 -9]*\\'"..subject.url)..........
50780 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
507a0 2d 6e 75 6d 62 65 72 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 30 20 2e 73 75 62 6a 65 63 74 -number.(match-string.0..subject
507c0 2e 75 72 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f .url))))...................(repo
507e0 20 20 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 20 ...(forge-get-repository........
50800 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 69 74 68 6f 73 ....................(list.githos
50820 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 20 20 20 t...............................
50840 20 20 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 ....repository.owner.login......
50860 20 20 20 20 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 72 65 70 .............................rep
50880 6f 73 69 74 6f 72 79 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 ository.name)...................
508a0 20 20 20 20 20 20 20 20 20 6e 69 6c 20 3a 69 6e 73 65 72 74 21 29 29 0a 20 20 20 20 20 20 20 20 .........nil.:insert!)).........
508c0 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 69 64 20 28 6f 72 65 66 20 72 65 70 6f 20 69 64 29 ..........(repoid.(oref.repo.id)
508e0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 77 6e 65 72 20 20 28 6f 72 65 )...................(owner..(ore
50900 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 20 20 20 f.repo.owner))..................
50920 20 28 6e 61 6d 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 .(name...(oref.repo.name))......
50940 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 64 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 6f 62 6a .............(id.....(forge--obj
50960 65 63 74 2d 69 64 20 72 65 70 6f 69 64 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 ect-id.repoid.(string-to-number.
50980 2e 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 69 61 73 20 .id)))...................(alias.
509a0 20 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 22 5f 22 20 28 73 74 72 69 6e 67 2d 72 65 70 .(intern.(concat."_".(string-rep
509c0 6c 61 63 65 20 22 3d 22 20 22 5f 22 20 69 64 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 lace."="."_".id)))))............
509e0 20 20 28 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 ..(list.alias.id................
50a00 20 20 20 20 60 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 ....`((,alias.repository).......
50a20 20 20 20 20 20 20 20 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 ...............[(name.,name)....
50a40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 77 6e 65 72 20 2c 6f 77 6e 65 72 ...................(owner.,owner
50a60 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 63 64 64 72 0a )]......................,@(cddr.
50a80 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 61 64 64 72 0a 20 ........................(caddr..
50aa0 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 67 68 75 62 2d 2d 67 ........................(ghub--g
50ac0 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 20 20 20 raphql-prepare-query............
50ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67 68 75 62 2d 66 65 74 63 68 2d 72 65 70 6f 73 69 ...............ghub-fetch-reposi
50b00 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 20 20 28 tory...........................(
50b20 69 66 20 28 65 71 20 74 79 70 65 20 27 69 73 73 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 if.(eq.type.'issue).............
50b40 20 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 69 ..................`(repository.i
50b60 73 73 75 65 73 20 28 69 73 73 75 65 20 2e 20 2c 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 ssues.(issue...,number))........
50b80 20 20 20 20 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 .....................`(repositor
50ba0 79 20 70 75 6c 6c 52 65 71 75 65 73 74 20 28 70 75 6c 6c 52 65 71 75 65 73 74 20 2e 20 2c 6e 75 y.pullRequest.(pullRequest...,nu
50bc0 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 20 20 20 20 mber))).........................
50be0 20 20 29 29 29 29 0a 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 ..))))....................repo.t
50c00 79 70 65 20 64 61 74 61 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 68 ype.data))))))..(defun.forge--gh
50c20 75 62 2d 75 70 64 61 74 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 28 6e 6f 74 69 66 73 20 ub-update-notifications.(notifs.
50c40 74 6f 70 69 63 73 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 topics)...(closql-with-transacti
50c60 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 20 on.(forge-db).....(pcase-dolist.
50c80 28 60 28 2c 61 6c 69 61 73 20 2c 69 64 20 2c 5f 20 2c 72 65 70 6f 20 2c 74 79 70 65 20 2c 64 61 (`(,alias.,id.,_.,repo.,type.,da
50ca0 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 73 74 20 64 61 74 ta).notifs).......(let-alist.dat
50cc0 61 0a 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 74 6f 70 69 63 20 28 66 75 6e 63 61 6c 6c a.........(let*.((topic.(funcall
50ce0 20 28 69 66 20 28 65 71 20 74 79 70 65 20 27 69 73 73 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 .(if.(eq.type.'issue)...........
50d00 20 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
50d20 2d 2d 75 70 64 61 74 65 2d 69 73 73 75 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --update-issue..................
50d40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 2d 75 70 64 61 74 65 2d ................#'forge--update-
50d60 70 75 6c 6c 72 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 pullreq)........................
50d80 20 20 20 20 20 20 20 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 ........repo....................
50da0 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 63 61 64 72 20 28 61 73 73 71 20 61 6c 69 ............(cdr.(cadr.(assq.ali
50dc0 61 73 20 74 6f 70 69 63 73 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e as.topics)))))................(n
50de0 6f 74 69 66 20 28 6f 72 20 28 66 6f 72 67 65 2d 67 65 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e otif.(or.(forge-get-notification
50e00 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 28 .id)...........................(
50e20 63 6c 6f 73 71 6c 2d 69 6e 73 65 72 74 20 28 66 6f 72 67 65 2d 64 62 29 0a 20 20 20 20 20 20 20 closql-insert.(forge-db)........
50e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
50e60 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 20 20 20 20 20 20 ..(forge-notification...........
50e80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
50ea0 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 20 20 20 20 :id...........id................
50ec0 20 20 20 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 72 65 ...........................:thre
50ee0 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 20 20 ad-id.....id....................
50f00 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
50f20 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).............
50f40 20 20 20 20 20 20 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 ..............................:t
50f60 79 70 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 ype.........type................
50f80 20 20 20 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 6f 70 69 ...........................:topi
50fa0 63 20 20 20 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 c........(oref.topic.id)........
50fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
50fe0 20 20 20 3a 75 72 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 ...:url...........subject.url)))
51000 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 74 69 74 6c 65 20 20 ))...........(oset.notif.title..
51020 20 20 20 2e 73 75 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 ....subject.title)...........(os
51040 65 74 20 6e 6f 74 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 et.notif.reason....(intern.(down
51060 63 61 73 65 20 2e 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 case..reason)))...........(oset.
51080 6e 6f 74 69 66 20 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 notif.last-read..last_read_at)..
510a0 20 20 20 20 20 20 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 .........(oset.notif.updated....
510c0 75 70 64 61 74 65 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 updated_at))))))..;;;;.Miscellan
510e0 65 6f 75 73 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 64 2d 75 eous..(cl-defmethod.forge--add-u
51100 73 65 72 2d 72 65 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 ser-repos...((class.(subclass.fo
51120 72 67 65 2d 67 69 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 rge-github-repository)).host.use
51140 72 29 0a 20 20 28 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 r)...(forge--fetch-user-repos...
51160 20 63 6c 61 73 73 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 .class.(forge--as-apihost.host).
51180 75 73 65 72 0a 20 20 20 28 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 20 23 27 66 6f 72 67 65 user....(apply-partially.#'forge
511a0 2d 2d 62 61 74 63 68 2d 61 64 64 2d 63 61 6c 6c 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 61 73 2d --batch-add-callback.(forge--as-
511c0 67 69 74 68 6f 73 74 20 68 6f 73 74 29 20 75 73 65 72 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 githost.host).user)))..(cl-defme
511e0 74 68 6f 64 20 66 6f 72 67 65 2d 2d 61 64 64 2d 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 2d 72 65 70 thod.forge--add-organization-rep
51200 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 74 os...((class.(subclass.forge-git
51220 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 20 68 6f 73 74 20 6f 72 67 29 0a 20 20 28 66 6f hub-repository)).host.org)...(fo
51240 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 20 20 rge--fetch-organization-repos...
51260 20 63 6c 61 73 73 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 .class.(forge--as-apihost.host).
51280 6f 72 67 0a 20 20 20 28 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 20 23 27 66 6f 72 67 65 2d org....(apply-partially.#'forge-
512a0 2d 62 61 74 63 68 2d 61 64 64 2d 63 61 6c 6c 62 61 63 6b 20 28 66 6f 72 67 65 2d 2d 61 73 2d 67 -batch-add-callback.(forge--as-g
512c0 69 74 68 6f 73 74 20 68 6f 73 74 29 20 6f 72 67 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 ithost.host).org)))..(cl-defmeth
512e0 6f 64 20 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 28 28 5f od.forge--fetch-user-repos...((_
51300 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 6f 73 69 74 6f .(subclass.forge-github-reposito
51320 72 79 29 29 20 68 6f 73 74 20 75 73 65 72 20 63 61 6c 6c 62 61 63 6b 29 0a 20 20 28 67 68 75 62 ry)).host.user.callback)...(ghub
51340 2d 2d 67 72 61 70 68 71 6c 2d 76 61 63 75 75 6d 0a 20 20 20 27 28 71 75 65 72 79 20 28 75 73 65 --graphql-vacuum....'(query.(use
51360 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 5b 28 6c 6f 67 69 6e 20 24 6c 6f 67 69 6e 20 53 74 72 r.............[(login.$login.Str
51380 69 6e 67 21 29 5d 0a 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 ing!)].............(repositories
513a0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 5b 28 3a 65 64 67 65 73 20 74 29 0a 20 20 20 20 20 20 ..............[(:edges.t).......
513c0 20 20 20 20 20 20 20 20 28 6f 77 6e 65 72 41 66 66 69 6c 69 61 74 69 6f 6e 73 20 2e 20 28 4f 57 ........(ownerAffiliations...(OW
513e0 4e 45 52 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 29 29 29 0a 20 20 20 60 NER))]..............name)))....`
51400 28 28 6c 6f 67 69 6e 20 2e 20 2c 75 73 65 72 29 29 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 64 29 ((login...,user))....(lambda.(d)
51420 0a 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 20 20 20 20 20 20 ......(funcall.callback.........
51440 20 20 20 20 20 20 28 2d 2d 6d 61 70 20 28 61 6c 69 73 74 2d 67 65 74 20 27 6e 61 6d 65 20 69 74 ......(--map.(alist-get.'name.it
51460 29 0a 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 )......................(let-alis
51480 74 20 64 20 2e 75 73 65 72 2e 72 65 70 6f 73 69 74 6f 72 69 65 73 29 29 29 29 0a 20 20 20 6e 69 t.d..user.repositories))))....ni
514a0 6c 20 3a 61 75 74 68 20 27 66 6f 72 67 65 20 3a 68 6f 73 74 20 68 6f 73 74 29 29 0a 0a 28 63 6c l.:auth.'forge.:host.host))..(cl
514c0 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 65 74 63 68 2d 6f 72 67 61 6e 69 7a 61 -defmethod.forge--fetch-organiza
514e0 74 69 6f 6e 2d 72 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 tion-repos...((_.(subclass.forge
51500 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 20 68 6f 73 74 20 6f 72 67 20 63 61 -github-repository)).host.org.ca
51520 6c 6c 62 61 63 6b 29 0a 20 20 28 67 68 75 62 2d 2d 67 72 61 70 68 71 6c 2d 76 61 63 75 75 6d 0a llback)...(ghub--graphql-vacuum.
51540 20 20 20 27 28 71 75 65 72 79 20 28 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 ...'(query.(organization........
51560 20 20 20 20 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 .....[(login.$login.String!)]...
51580 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 64 67 65 73 ..........(repositories.[(:edges
515a0 20 74 29 5d 20 6e 61 6d 65 29 29 29 0a 20 20 20 60 28 28 6c 6f 67 69 6e 20 2e 20 2c 6f 72 67 29 .t)].name)))....`((login...,org)
515c0 29 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 64 29 0a 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 )....(lambda.(d)......(funcall.c
515e0 61 6c 6c 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 2d 6d 61 70 20 28 61 6c allback...............(--map.(al
51600 69 73 74 2d 67 65 74 20 27 6e 61 6d 65 20 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ist-get.'name.it)...............
51620 20 20 20 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 64 20 2e 6f 72 67 61 6e 69 7a 61 74 69 6f .......(let-alist.d..organizatio
51640 6e 2e 72 65 70 6f 73 69 74 6f 72 69 65 73 29 29 29 29 0a 20 20 20 6e 69 6c 20 3a 61 75 74 68 20 n.repositories))))....nil.:auth.
51660 27 66 6f 72 67 65 20 3a 68 6f 73 74 20 68 6f 73 74 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 'forge.:host.host))..(defun.forg
51680 65 2d 2d 62 61 74 63 68 2d 61 64 64 2d 63 61 6c 6c 62 61 63 6b 20 28 68 6f 73 74 20 6f 77 6e 65 e--batch-add-callback.(host.owne
516a0 72 20 6e 61 6d 65 73 29 0a 20 20 28 6c 65 74 20 28 28 72 65 70 6f 73 20 28 63 6c 2d 6d 61 70 63 r.names)...(let.((repos.(cl-mapc
516c0 61 6e 20 28 6c 61 6d 62 64 61 20 28 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 an.(lambda.(name)...............
516e0 20 20 20 20 20 20 20 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 ..............(let.((repo.(forge
51700 2d 67 65 74 2d 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 -get-repository.................
51720 20 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 73 74 20 68 .........................(list.h
51740 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 20 20 20 20 20 20 20 ost.owner.name).................
51760 20 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 69 6e .........................nil.:in
51780 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 20 20 20 20 sert!)))........................
517a0 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 6f .......(and.(not.(forge-get-repo
517c0 73 69 74 6f 72 79 20 72 65 70 6f 20 3a 74 72 61 63 6b 65 64 3f 29 29 0a 20 20 20 20 20 20 20 20 sitory.repo.:tracked?)).........
517e0 20 20 20 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 73 74 ...........................(list
51800 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 20 20 .repo)))).......................
51820 20 20 20 20 6e 61 6d 65 73 29 29 0a 20 20 20 20 20 20 20 20 63 62 29 0a 20 20 20 20 28 73 65 74 ....names)).........cb).....(set
51840 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 20 20 20 20 28 q.cb.(lambda.()................(
51860 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 29 29 0a 20 20 when-let.((repo.(pop.repos)))...
51880 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 65 70 6f ...............(forge--pull.repo
518a0 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 0a 3b 3b 3b 20 .cb)))).....(funcall.cb)))..;;;.
518c0 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 72 67 65 2d 2d Mutations..(cl-defmethod.forge--
518e0 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 6f 72 67 65 2d 67 69 submit-create-issue.((_.forge-gi
51900 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 72 65 70 6f 29 0a 20 20 28 6c 65 74 2d 61 6c thub-repository).repo)...(let-al
51920 69 73 74 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 62 75 66 66 65 72 29 0a ist.(forge--topic-parse-buffer).
51940 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 6f 73 74 20 72 65 70 6f 20 22 2f 72 65 70 ....(forge--ghub-post.repo."/rep
51960 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 69 73 73 75 65 73 22 0a 20 20 20 20 20 20 60 28 os/:owner/:repo/issues".......`(
51980 28 74 69 74 6c 65 20 2e 20 2c 20 2e 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 28 62 6f 64 79 (title...,..title).........(body
519a0 20 20 2e 20 2c 20 2e 62 6f 64 79 29 0a 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 2e 6c 61 62 ....,..body).........,@(and..lab
519c0 65 6c 73 20 20 20 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 27 6c 61 62 65 6c 73 20 20 20 20 2e 6c els....(list.(cons.'labels.....l
519e0 61 62 65 6c 73 29 29 29 0a 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 2e 61 73 73 69 67 6e 65 abels))).........,@(and..assigne
51a00 65 73 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 27 61 73 73 69 67 6e 65 65 73 20 2e 61 73 73 69 67 es.(list.(cons.'assignees..assig
51a20 6e 65 65 73 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 nees)))).......:callback..(forge
51a40 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 65 --post-submit-callback).......:e
51a60 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 72 rrorback.(forge--post-submit-err
51a80 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 2d orback))))..(cl-defmethod.forge-
51aa0 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 65 20 28 28 72 65 70 -create-pullreq-from-issue.((rep
51ac0 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 20 20 o.forge-github-repository)......
51ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
51b00 20 20 20 20 20 20 20 20 20 20 20 28 69 73 73 75 65 20 66 6f 72 67 65 2d 69 73 73 75 65 29 0a 20 ...........(issue.forge-issue)..
51b20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
51b40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 6f 75 72 63 65 20 74 61 72 67 65 74 29 0a 20 20 ...............source.target)...
51b60 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 60 28 2c 62 61 73 65 2d 72 65 6d 6f 74 65 20 2e 20 2c (pcase-let*.((`(,base-remote...,
51b80 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 20 28 6d 61 base-branch).................(ma
51ba0 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 74 61 72 67 65 74 29 29 0a 20 git-split-branch-name.target))..
51bc0 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 20 ..............(`(,head-remote...
51be0 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 6d ,head-branch).................(m
51c00 61 67 69 74 2d 73 70 6c 69 74 2d 62 72 61 6e 63 68 2d 6e 61 6d 65 20 73 6f 75 72 63 65 29 29 0a agit-split-branch-name.source)).
51c20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 65 61 64 2d 72 65 70 6f 20 28 66 6f 72 67 65 ...............(head-repo.(forge
51c40 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 3a 73 74 75 62 20 68 65 61 64 2d 72 65 6d 6f 74 -get-repository.:stub.head-remot
51c60 65 29 29 29 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 6f 73 74 20 72 65 70 6f 20 e))).....(forge--ghub-post.repo.
51c80 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 70 75 6c 6c 73 22 0a 20 20 20 20 "/repos/:owner/:repo/pulls".....
51ca0 20 20 60 28 28 69 73 73 75 65 20 2e 20 2c 28 6f 72 65 66 20 69 73 73 75 65 20 6e 75 6d 62 65 72 ..`((issue...,(oref.issue.number
51cc0 29 29 0a 20 20 20 20 20 20 20 20 28 62 61 73 65 20 20 2e 20 2c 62 61 73 65 2d 62 72 61 6e 63 68 )).........(base....,base-branch
51ce0 29 0a 20 20 20 20 20 20 20 20 28 68 65 61 64 20 20 2e 20 2c 28 69 66 20 28 65 71 75 61 6c 20 68 ).........(head....,(if.(equal.h
51d00 65 61 64 2d 72 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 ead-remote.base-remote).........
51d20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 68 65 61 64 2d 62 72 61 6e 63 68 0a 20 20 20 20 20 20 ..............head-branch.......
51d40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 6f 72 65 66 20 68 65 61 64 ..............(concat.(oref.head
51d60 2d 72 65 70 6f 20 6f 77 6e 65 72 29 20 22 3a 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -repo.owner).":"................
51d80 20 20 20 20 20 20 20 20 20 20 20 20 20 68 65 61 64 2d 62 72 61 6e 63 68 29 29 29 0a 20 20 20 20 .............head-branch))).....
51da0 20 20 20 20 28 6d 61 69 6e 74 61 69 6e 65 72 5f 63 61 6e 5f 6d 6f 64 69 66 79 20 2e 20 74 29 29 ....(maintainer_can_modify...t))
51dc0 0a 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 20 28 6c 61 6d 62 64 61 20 28 26 72 65 73 74 .......:callback..(lambda.(&rest
51de0 20 5f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 64 ._)....................(closql-d
51e00 65 6c 65 74 65 20 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 elete.issue)....................
51e20 28 66 6f 72 67 65 2d 70 75 6c 6c 29 29 0a 20 20 20 20 20 20 3a 65 72 72 6f 72 62 61 63 6b 20 28 (forge-pull)).......:errorback.(
51e40 6c 61 6d 62 64 61 20 28 26 72 65 73 74 20 5f 29 20 28 66 6f 72 67 65 2d 70 75 6c 6c 29 29 29 29 lambda.(&rest._).(forge-pull))))
51e60 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 74 2d 63 )..(cl-defmethod.forge--submit-c
51e80 72 65 61 74 65 2d 70 75 6c 6c 72 65 71 20 28 28 5f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 reate-pullreq.((_.forge-github-r
51ea0 65 70 6f 73 69 74 6f 72 79 29 20 72 65 70 6f 29 0a 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 28 66 epository).repo)...(let-alist.(f
51ec0 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 28 77 orge--topic-parse-buffer).....(w
51ee0 68 65 6e 20 28 61 6e 64 20 2e 79 61 6d 6c 20 28 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 2d 70 hen.(and..yaml.(local-variable-p
51f00 20 27 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 64 72 61 66 74 2d 70 29 29 0a 20 20 20 20 20 20 28 .'forge-buffer-draft-p)).......(
51f20 75 73 65 72 2d 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 75 73 65 20 79 61 6d 6c 20 66 72 6f 6e user-error."Cannot.use.yaml.fron
51f40 74 6d 61 74 74 65 72 20 61 6e 64 20 73 65 74 20 60 25 73 27 20 61 74 20 74 68 65 20 73 61 6d 65 tmatter.and.set.`%s'.at.the.same
51f60 20 74 69 6d 65 22 0a 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 .time"...................'forge-
51f80 62 75 66 66 65 72 2d 64 72 61 66 74 2d 70 29 29 0a 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 2a buffer-draft-p)).....(pcase-let*
51fa0 20 28 28 60 28 2c 62 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 .((`(,base-remote...,base-branch
51fc0 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 73 70 6c 69 74 )...................(magit-split
51fe0 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 62 61 73 65 2d -branch-name.forge--buffer-base-
52000 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 20 28 60 28 2c 68 65 branch))..................(`(,he
52020 61 64 2d 72 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 ad-remote...,head-branch).......
52040 20 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 ............(magit-split-branch-
52060 6e 61 6d 65 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 29 name.forge--buffer-head-branch))
52080 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 65 61 64 2d 72 65 70 6f 20 28 66 6f ..................(head-repo.(fo
520a0 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 61 64 2d 72 65 rge-get-repository.:stub.head-re
520c0 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 72 6c 2d 6d 69 6d mote))..................(url-mim
520e0 65 2d 61 63 63 65 70 74 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e-accept-string.................
52100 20 20 3b 3b 20 53 75 70 70 6f 72 74 20 64 72 61 66 74 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 ..;;.Support.draft.pull-requests
52120 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 61 70 70 6c 69 63 61 74 69 6f 6e ...................."application
52140 2f 76 6e 64 2e 67 69 74 68 75 62 2e 73 68 61 64 6f 77 2d 63 61 74 2d 70 72 65 76 69 65 77 2b 6a /vnd.github.shadow-cat-preview+j
52160 73 6f 6e 22 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 6f 73 74 20 72 son")).......(forge--ghub-post.r
52180 65 70 6f 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 70 75 6c 6c 73 22 0a epo."/repos/:owner/:repo/pulls".
521a0 20 20 20 20 20 20 20 20 60 28 28 74 69 74 6c 65 20 2e 20 2c 20 2e 74 69 74 6c 65 29 0a 20 20 20 ........`((title...,..title)....
521c0 20 20 20 20 20 20 20 28 62 6f 64 79 20 20 2e 20 2c 20 2e 62 6f 64 79 29 0a 20 20 20 20 20 20 20 .......(body....,..body)........
521e0 20 20 20 28 62 61 73 65 20 20 2e 20 2c 62 61 73 65 2d 62 72 61 6e 63 68 29 0a 20 20 20 20 20 20 ...(base....,base-branch).......
52200 20 20 20 20 28 68 65 61 64 20 20 2e 20 2c 28 69 66 20 28 65 71 75 61 6c 20 68 65 61 64 2d 72 65 ....(head....,(if.(equal.head-re
52220 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 20 mote.base-remote)...............
52240 20 20 20 20 20 20 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 ..........head-branch...........
52260 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 6f 72 65 66 20 68 65 61 64 2d 72 ............(concat.(oref.head-r
52280 65 70 6f 20 6f 77 6e 65 72 29 20 22 3a 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 epo.owner).":"..................
522a0 20 20 20 20 20 20 20 20 20 20 20 20 20 68 65 61 64 2d 62 72 61 6e 63 68 29 29 29 0a 20 20 20 20 .............head-branch))).....
522c0 20 20 20 20 20 20 28 64 72 61 66 74 20 2e 20 2c 28 69 66 20 28 6c 6f 63 61 6c 2d 76 61 72 69 61 ......(draft...,(if.(local-varia
522e0 62 6c 65 2d 70 20 27 66 6f 72 67 65 2d 62 75 66 66 65 72 2d 64 72 61 66 74 2d 70 29 0a 20 20 20 ble-p.'forge-buffer-draft-p)....
52300 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 62 75 66 66 65 .....................forge-buffe
52320 72 2d 64 72 61 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 r-draft-p.......................
52340 2e 64 72 61 66 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 69 6e 74 61 69 6e 65 72 5f 63 .draft))...........(maintainer_c
52360 61 6e 5f 6d 6f 64 69 66 79 20 2e 20 74 29 29 0a 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 an_modify...t)).........:callbac
52380 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)
523a0 0a 20 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 .........:errorback.(forge--post
523c0 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 2d 64 65 66 6d -submit-errorback)))))..(cl-defm
523e0 65 74 68 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 20 ethod.forge--submit-create-post.
52400 28 28 5f 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 74 6f 70 ((_.forge-github-repository).top
52420 69 63 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 6f 73 74 20 74 6f 70 69 63 20 22 2f ic)...(forge--ghub-post.topic."/
52440 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 69 73 73 75 65 73 2f 3a 6e 75 6d 62 65 repos/:owner/:repo/issues/:numbe
52460 72 2f 63 6f 6d 6d 65 6e 74 73 22 0a 20 20 20 20 60 28 28 62 6f 64 79 20 2e 20 2c 28 73 74 72 69 r/comments".....`((body...,(stri
52480 6e 67 2d 74 72 69 6d 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 3a ng-trim.(buffer-string)))).....:
524a0 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
524c0 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
524e0 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
52500 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 20 28 method.forge--submit-edit-post.(
52520 28 5f 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 70 6f 73 74 (_.forge-github-repository).post
52540 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 61 74 63 68 20 70 6f 73 74 0a 20 20 20 20 )...(forge--ghub-patch.post.....
52560 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 70 (cl-typecase.post.......(forge-p
52580 75 6c 6c 72 65 71 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 70 75 6c 6c ullreq."/repos/:owner/:repo/pull
525a0 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 75 65 20 20 s/:number").......(forge-issue..
525c0 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 69 73 73 75 65 73 2f 3a 6e 75 ."/repos/:owner/:repo/issues/:nu
525e0 6d 62 65 72 22 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 70 6f 73 74 20 20 20 20 22 2f 72 65 mber").......(forge-post...."/re
52600 70 6f 73 2f 3a 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 pos/:owner/:repo/issues/comments
52620 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 65 70 20 70 6f /:number")).....(if.(cl-typep.po
52640 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 6c 65 74 2d 61 6c st.'forge-topic).........(let-al
52660 69 73 74 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 70 61 72 73 65 2d 62 75 66 66 65 72 29 0a ist.(forge--topic-parse-buffer).
52680 20 20 20 20 20 20 20 20 20 20 60 28 28 74 69 74 6c 65 20 2e 20 2c 20 2e 74 69 74 6c 65 29 0a 20 ..........`((title...,..title)..
526a0 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 64 79 20 20 2e 20 2c 20 2e 62 6f 64 79 29 29 29 0a 20 ...........(body....,..body)))..
526c0 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 72 69 6d 20 28 62 75 .....`((body...,(string-trim.(bu
526e0 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 29 29 0a 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 20 ffer-string))))).....:callback..
52700 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 20 20 (forge--post-submit-callback)...
52720 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 69 74 ..:errorback.(forge--post-submit
52740 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 6f 72 -errorback)))..(cl-defmethod.for
52760 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 74 69 74 6c 65 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f ge--set-topic-title...((_repo.fo
52780 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 20 74 69 74 rge-github-repository).topic.tit
527a0 6c 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 61 74 63 68 20 74 6f 70 69 63 0a 20 le)...(forge--ghub-patch.topic..
527c0 20 20 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 69 73 73 75 65 73 2f 3a ..."/repos/:owner/:repo/issues/:
527e0 6e 75 6d 62 65 72 22 0a 20 20 20 20 60 28 28 74 69 74 6c 65 20 2e 20 2c 74 69 74 6c 65 29 29 0a number".....`((title...,title)).
52800 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 2d 66 69 65 6c 64 2d ....:callback.(forge--set-field-
52820 63 61 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 callback.topic)))..(cl-defmethod
52840 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 73 74 61 74 65 0a 20 20 28 28 5f 72 65 70 .forge--set-topic-state...((_rep
52860 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 74 6f 70 69 63 o.forge-github-repository).topic
52880 20 73 74 61 74 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 61 74 63 68 20 74 6f 70 .state)...(forge--ghub-patch.top
528a0 69 63 0a 20 20 20 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 69 73 73 75 ic....."/repos/:owner/:repo/issu
528c0 65 73 2f 3a 6e 75 6d 62 65 72 22 0a 20 20 20 20 28 70 63 61 73 65 2d 65 78 68 61 75 73 74 69 76 es/:number".....(pcase-exhaustiv
528e0 65 20 73 74 61 74 65 0a 20 20 20 20 20 20 3b 3b 20 4d 65 72 67 69 6e 67 20 69 73 6e 27 74 20 64 e.state.......;;.Merging.isn't.d
52900 6f 6e 65 20 74 68 72 6f 75 67 68 20 68 65 72 65 2e 0a 20 20 20 20 20 20 28 27 63 6f 6d 70 6c 65 one.through.here........('comple
52920 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 74 65 5f ted.'((state..."closed").(state_
52940 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 20 28 27 reason..."completed"))).......('
52960 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 29 20 28 unplanned.'((state..."closed").(
52980 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 29 29 0a state_reason..."not_planned"))).
529a0 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 22 63 6c ......('rejected..'((state..."cl
529c0 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 28 73 74 osed"))).......('open......'((st
529e0 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 6b 20 28 ate..."open")))).....:callback.(
52a00 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 29 forge--set-field-callback.topic)
52a20 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 70 ))..(cl-defmethod.forge--set-top
52a40 69 63 2d 64 72 61 66 74 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d ic-draft...((_repo.forge-github-
52a60 72 65 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 20 76 61 6c 75 65 29 0a 20 20 28 6c 65 74 20 repository).topic.value)...(let.
52a80 28 28 62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 ((buffer.(current-buffer))).....
52aa0 28 67 68 75 62 2d 67 72 61 70 68 71 6c 0a 20 20 20 20 20 60 28 6d 75 74 61 74 69 6f 6e 20 28 2c (ghub-graphql......`(mutation.(,
52ac0 28 69 66 20 76 61 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 (if.value.......................
52ae0 27 63 6f 6e 76 65 72 74 50 75 6c 6c 52 65 71 75 65 73 74 54 6f 44 72 61 66 74 0a 20 20 20 20 20 'convertPullRequestToDraft......
52b00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6d 61 72 6b 50 75 6c 6c 52 65 71 75 65 73 74 52 ...............'markPullRequestR
52b20 65 61 64 79 46 6f 72 52 65 76 69 65 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eadyForReview)..................
52b40 5b 28 69 6e 70 75 74 20 24 69 6e 70 75 74 20 2c 28 69 66 20 76 61 6c 75 65 0a 20 20 20 20 20 20 [(input.$input.,(if.value.......
52b60 20 20 20 20 20 20 20 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 ...............................'
52b80 43 6f 6e 76 65 72 74 50 75 6c 6c 52 65 71 75 65 73 74 54 6f 44 72 61 66 74 49 6e 70 75 74 21 0a ConvertPullRequestToDraftInput!.
52ba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
52bc0 20 20 20 27 4d 61 72 6b 50 75 6c 6c 52 65 71 75 65 73 74 52 65 61 64 79 46 6f 72 52 65 76 69 65 ...'MarkPullRequestReadyForRevie
52be0 77 49 6e 70 75 74 21 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 6c wInput!))]..................(pul
52c00 6c 52 65 71 75 65 73 74 20 69 73 44 72 61 66 74 29 29 29 0a 20 20 20 20 20 60 28 28 69 6e 70 75 lRequest.isDraft)))......`((inpu
52c20 74 20 28 70 75 6c 6c 52 65 71 75 65 73 74 49 64 20 2e 20 2c 28 6f 72 65 66 20 74 6f 70 69 63 20 t.(pullRequestId...,(oref.topic.
52c40 74 68 65 69 72 2d 69 64 29 29 29 29 0a 20 20 20 20 20 3a 68 6f 73 74 20 28 6f 72 65 66 20 28 66 their-id))))......:host.(oref.(f
52c60 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 61 70 69 68 6f orge-get-repository.topic).apiho
52c80 73 74 29 0a 20 20 20 20 20 3a 61 75 74 68 20 27 66 6f 72 67 65 0a 20 20 20 20 20 3a 63 61 6c 6c st)......:auth.'forge......:call
52ca0 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 64 61 74 61 20 26 72 65 73 74 20 5f 29 0a 20 20 20 20 back.(lambda.(data.&rest._).....
52cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 73 73 71 20 27 65 72 72 6f 72 20 64 61 .............(if.(assq.'error.da
52ce0 74 61 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 68 75 62 2d 2d ta)......................(ghub--
52d00 67 72 61 70 68 71 6c 2d 70 70 2d 72 65 73 70 6f 6e 73 65 20 64 61 74 61 29 0a 20 20 20 20 20 20 graphql-pp-response.data).......
52d20 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 64 72 61 66 74 2d 70 .............(oset.topic.draft-p
52d40 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 28 66 6f 72 67 .value)....................(forg
52d60 65 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 29 29 29 29 29 29 0a 0a 28 e-refresh-buffer.buffer))))))..(
52d80 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 6d 69 cl-defmethod.forge--set-topic-mi
52da0 6c 65 73 74 6f 6e 65 0a 20 20 28 28 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 lestone...((repo.forge-github-re
52dc0 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 20 6d 69 6c 65 73 74 6f 6e 65 29 0a 20 20 28 66 6f pository).topic.milestone)...(fo
52de0 72 67 65 2d 2d 67 68 75 62 2d 70 61 74 63 68 20 74 6f 70 69 63 0a 20 20 20 20 22 2f 72 65 70 6f rge--ghub-patch.topic....."/repo
52e00 73 2f 3a 6f 77 6e 65 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 s/:owner/:repo/issues/:number"..
52e20 20 20 20 28 69 66 20 6d 69 6c 65 73 74 6f 6e 65 0a 20 20 20 20 20 20 20 20 60 28 28 6d 69 6c 65 ...(if.milestone.........`((mile
52e40 73 74 6f 6e 65 20 2e 20 2c 28 63 61 61 72 20 28 66 6f 72 67 65 2d 73 71 6c 20 5b 3a 73 65 6c 65 stone...,(caar.(forge-sql.[:sele
52e60 63 74 20 5b 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 ct.[number].....................
52e80 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 6d 20 6d 69 6c 65 ......................:from.mile
52ea0 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 20 20 20 20 20 20 stone...........................
52ec0 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 3d 20 72 ................:where.(and.(=.r
52ee0 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)..................
52f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
52f20 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 20 .....(=.title.$s2))]............
52f40 20 20 20 20 20 20 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
52f60 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 20 20 20 20 20 ref.repo.id)....................
52f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 69 6c 65 73 74 6f 6e 65 29 ......................milestone)
52fa0 29 29 29 0a 20 20 20 20 20 20 60 28 28 6d 69 6c 65 73 74 6f 6e 65 20 2e 20 3a 6e 75 6c 6c 29 29 ))).......`((milestone...:null))
52fc0 29 0a 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 2d 66 69 65 6c ).....:callback.(forge--set-fiel
52fe0 64 2d 63 61 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 d-callback.topic)))..(cl-defmeth
53000 6f 64 20 66 6f 72 67 65 2d 2d 73 65 74 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 73 0a 20 20 28 28 5f od.forge--set-topic-labels...((_
53020 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 74 6f repo.forge-github-repository).to
53040 70 69 63 20 6c 61 62 65 6c 73 29 0a 20 20 28 66 75 6e 63 61 6c 6c 20 28 69 66 20 6c 61 62 65 6c pic.labels)...(funcall.(if.label
53060 73 20 23 27 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 75 74 20 23 27 66 6f 72 67 65 2d 2d 67 68 75 s.#'forge--ghub-put.#'forge--ghu
53080 62 2d 64 65 6c 65 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 74 6f 70 69 63 20 22 2f 72 65 70 b-delete)............topic."/rep
530a0 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 69 73 73 75 65 73 2f 3a 6e 75 6d 62 65 72 2f 6c os/:owner/:repo/issues/:number/l
530c0 61 62 65 6c 73 22 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 3a 70 61 79 6c 6f 61 64 20 6c abels".nil............:payload.l
530e0 61 62 65 6c 73 0a 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 66 6f 72 67 abels............:callback.(forg
53100 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 29 29 29 0a 0a e--set-field-callback.topic)))..
53120 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
53140 73 73 69 67 6e 65 65 73 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d ssignees...((_repo.forge-github-
53160 72 65 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 20 61 73 73 69 67 6e 65 65 73 29 0a 20 20 28 repository).topic.assignees)...(
53180 6c 65 74 20 28 28 76 61 6c 75 65 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 28 63 6c 6f 73 71 let.((value.(mapcar.#'car.(closq
531a0 6c 2d 2d 69 72 65 66 20 74 6f 70 69 63 20 27 61 73 73 69 67 6e 65 65 73 29 29 29 29 0a 20 20 20 l--iref.topic.'assignees))))....
531c0 20 3b 3b 20 46 49 58 4d 45 20 4f 6e 6c 79 20 72 65 66 72 65 73 68 20 6f 6e 63 65 2e 0a 20 20 20 .;;.FIXME.Only.refresh.once.....
531e0 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 61 64 64 20 28 63 6c 2d 73 65 74 2d 64 69 66 66 65 72 65 .(when-let.((add.(cl-set-differe
53200 6e 63 65 20 61 73 73 69 67 6e 65 65 73 20 76 61 6c 75 65 20 3a 74 65 73 74 20 23 27 65 71 75 61 nce.assignees.value.:test.#'equa
53220 6c 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 6f 73 74 20 74 6f 70 l))).......(forge--ghub-post.top
53240 69 63 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 69 73 73 75 65 73 2f 3a ic."/repos/:owner/:repo/issues/:
53260 6e 75 6d 62 65 72 2f 61 73 73 69 67 6e 65 65 73 22 0a 20 20 20 20 20 20 20 20 60 28 28 61 73 73 number/assignees".........`((ass
53280 69 67 6e 65 65 73 20 2e 20 2c 61 64 64 29 29 0a 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 ignees...,add)).........:callbac
532a0 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
532c0 69 63 29 29 29 0a 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 72 65 6d 6f 76 65 20 28 63 6c ic))).....(when-let.((remove.(cl
532e0 2d 73 65 74 2d 64 69 66 66 65 72 65 6e 63 65 20 76 61 6c 75 65 20 61 73 73 69 67 6e 65 65 73 20 -set-difference.value.assignees.
53300 3a 74 65 73 74 20 23 27 65 71 75 61 6c 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 :test.#'equal))).......(forge--g
53320 68 75 62 2d 64 65 6c 65 74 65 20 74 6f 70 69 63 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f hub-delete.topic."/repos/:owner/
53340 3a 72 65 70 6f 2f 69 73 73 75 65 73 2f 3a 6e 75 6d 62 65 72 2f 61 73 73 69 67 6e 65 65 73 22 0a :repo/issues/:number/assignees".
53360 20 20 20 20 20 20 20 20 60 28 28 61 73 73 69 67 6e 65 65 73 20 2e 20 2c 72 65 6d 6f 76 65 29 29 ........`((assignees...,remove))
53380 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 2d 66 .........:callback.(forge--set-f
533a0 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 64 65 ield-callback.topic)))))..(cl-de
533c0 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 77 2d fmethod.forge--set-topic-review-
533e0 72 65 71 75 65 73 74 73 0a 20 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 2d requests...((_repo.forge-github-
53400 72 65 70 6f 73 69 74 6f 72 79 29 20 74 6f 70 69 63 20 72 65 76 69 65 77 65 72 73 29 0a 20 20 28 repository).topic.reviewers)...(
53420 6c 65 74 20 28 28 76 61 6c 75 65 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 28 63 6c 6f 73 71 let.((value.(mapcar.#'car.(closq
53440 6c 2d 2d 69 72 65 66 20 74 6f 70 69 63 20 27 72 65 76 69 65 77 2d 72 65 71 75 65 73 74 73 29 29 l--iref.topic.'review-requests))
53460 29 29 0a 20 20 20 20 3b 3b 20 46 49 58 4d 45 20 4f 6e 6c 79 20 72 65 66 72 65 73 68 20 6f 6e 63 )).....;;.FIXME.Only.refresh.onc
53480 65 2e 0a 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 61 64 64 20 28 63 6c 2d 73 65 74 2d 64 e......(when-let.((add.(cl-set-d
534a0 69 66 66 65 72 65 6e 63 65 20 72 65 76 69 65 77 65 72 73 20 76 61 6c 75 65 20 3a 74 65 73 74 20 ifference.reviewers.value.:test.
534c0 23 27 65 71 75 61 6c 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 6f #'equal))).......(forge--ghub-po
534e0 73 74 20 74 6f 70 69 63 0a 20 20 20 20 20 20 20 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f st.topic........."/repos/:owner/
53500 3a 72 65 70 6f 2f 70 75 6c 6c 73 2f 3a 6e 75 6d 62 65 72 2f 72 65 71 75 65 73 74 65 64 5f 72 65 :repo/pulls/:number/requested_re
53520 76 69 65 77 65 72 73 22 0a 20 20 20 20 20 20 20 20 60 28 28 72 65 76 69 65 77 65 72 73 20 2e 20 viewers".........`((reviewers...
53540 2c 61 64 64 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 ,add)).........:callback.(forge-
53560 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 20 20 20 -set-field-callback.topic)))....
53580 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 72 65 6d 6f 76 65 20 28 63 6c 2d 73 65 74 2d 64 69 66 66 .(when-let.((remove.(cl-set-diff
535a0 65 72 65 6e 63 65 20 76 61 6c 75 65 20 72 65 76 69 65 77 65 72 73 20 3a 74 65 73 74 20 23 27 65 erence.value.reviewers.:test.#'e
535c0 71 75 61 6c 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 64 65 6c 65 74 qual))).......(forge--ghub-delet
535e0 65 20 74 6f 70 69 63 0a 20 20 20 20 20 20 20 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a e.topic........."/repos/:owner/:
53600 72 65 70 6f 2f 70 75 6c 6c 73 2f 3a 6e 75 6d 62 65 72 2f 72 65 71 75 65 73 74 65 64 5f 72 65 76 repo/pulls/:number/requested_rev
53620 69 65 77 65 72 73 22 0a 20 20 20 20 20 20 20 20 60 28 28 72 65 76 69 65 77 65 72 73 20 2e 20 2c iewers".........`((reviewers...,
53640 72 65 6d 6f 76 65 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 remove)).........:callback.(forg
53660 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 29 29 29 29 29 e--set-field-callback.topic)))))
53680 0a 0a 28 63 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 ..(cl-defmethod.forge--delete-co
536a0 6d 6d 65 6e 74 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 mment...((_repo.forge-github-rep
536c0 6f 73 69 74 6f 72 79 29 20 70 6f 73 74 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 64 65 ository).post)...(forge--ghub-de
536e0 6c 65 74 65 20 70 6f 73 74 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 69 lete.post."/repos/:owner/:repo/i
53700 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 63 6c 6f 73 ssues/comments/:number")...(clos
53720 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 68 ql-delete.post)...(forge-refresh
53740 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 2d -buffer))..(cl-defmethod.forge--
53760 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 67 topic-template-files.((repo.forg
53780 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 20 20 e-github-repository)............
537a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
537c0 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 61 (_.(subclass.forge-issue)))...(a
537e0 6e 64 2d 6c 65 74 2a 20 28 28 66 69 6c 65 73 20 28 6d 61 67 69 74 2d 72 65 76 69 73 69 6f 6e 2d nd-let*.((files.(magit-revision-
53800 66 69 6c 65 73 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 files.(oref.repo.default-branch)
53820 29 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 ))).....(let.((case-fold-search.
53840 74 29 29 0a 20 20 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 66 69 6c 65 20 28 2d 2d 66 69 72 73 t)).......(if-let.((file.(--firs
53860 74 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 0a 5c 5c 60 5c 5c 28 5c 5c 7c 64 6f t.(string-match-p."\.\\`\\(\\|do
53880 63 73 2f 5c 5c 7c 5c 5c 2e 67 69 74 68 75 62 2f 5c 5c 29 69 73 73 75 65 5f 74 65 6d 70 6c 61 74 cs/\\|\\.github/\\)issue_templat
538a0 65 5c 5c 28 5c 5c 2e 5b 61 2d 7a 41 2d 5a 30 2d 39 5d 2b 5c 5c 29 3f 5c 5c 27 22 20 69 74 29 0a e\\(\\.[a-zA-Z0-9]+\\)?\\'".it).
538c0 20 20 20 20 20 20 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 69 ..............................fi
538e0 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 66 69 6c 65 29 0a 20 20 20 les)))...........(list.file)....
53900 20 20 20 20 20 28 73 65 74 71 20 66 69 6c 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 .....(setq.files...............(
53920 2d 2d 66 69 6c 74 65 72 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 60 5c 5c 2e --filter.(string-match-p."\\`\\.
53940 67 69 74 68 75 62 2f 49 53 53 55 45 5f 54 45 4d 50 4c 41 54 45 2f 5b 5e 2f 5d 2a 22 20 69 74 29 github/ISSUE_TEMPLATE/[^/]*".it)
53960 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 69 6c 65 73 29 29 .........................files))
53980 0a 20 20 20 20 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 63 6f 6e 66 20 28 63 6c 2d 66 69 6e 64 .........(if-let.((conf.(cl-find
539a0 2d 69 66 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 6c 61 6d -if.........................(lam
539c0 62 64 61 20 28 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 bda.(f).........................
539e0 20 20 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 ..(equal.(file-name-nondirectory
53a00 20 66 29 20 22 63 6f 6e 66 69 67 2e 79 6d 6c 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .f)."config.yml"))..............
53a20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ...........files))).............
53a40 28 6e 63 6f 6e 63 20 28 64 65 6c 65 74 65 20 63 6f 6e 66 20 66 69 6c 65 73 29 0a 20 20 20 20 20 (nconc.(delete.conf.files)......
53a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 63 6f 6e 66 29 29 0a 20 20 20 20 20 ..............(list.conf))......
53a80 20 20 20 20 20 66 69 6c 65 73 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 .....files)))))..(cl-defmethod.f
53aa0 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 28 72 65 70 orge--topic-template-files.((rep
53ac0 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 20 20 o.forge-github-repository)......
53ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
53b00 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 6c 72 65 71 ......(_.(subclass.forge-pullreq
53b20 29 29 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 66 69 6c 65 73 20 28 6d 61 67 69 74 2d 72 )))...(and-let*.((files.(magit-r
53b40 65 76 69 73 69 6f 6e 2d 66 69 6c 65 73 20 28 6f 72 65 66 20 72 65 70 6f 20 64 65 66 61 75 6c 74 evision-files.(oref.repo.default
53b60 2d 62 72 61 6e 63 68 29 29 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 63 61 73 65 2d 66 6f 6c 64 -branch)))).....(let.((case-fold
53b80 2d 73 65 61 72 63 68 20 74 29 29 0a 20 20 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 66 69 6c 65 -search.t)).......(if-let.((file
53ba0 20 28 2d 2d 66 69 72 73 74 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 0a 5c 5c 60 .(--first.(string-match-p."\.\\`
53bc0 5c 5c 28 5c 5c 7c 64 6f 63 73 2f 5c 5c 7c 5c 5c 2e 67 69 74 68 75 62 2f 5c 5c 29 70 75 6c 6c 5f \\(\\|docs/\\|\\.github/\\)pull_
53be0 72 65 71 75 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 request_template\\(\\.[a-zA-Z0-9
53c00 5d 2b 5c 5c 29 3f 5c 5c 27 22 20 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ]+\\)?\\'".it)..................
53c20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 .............files)))...........
53c40 28 6c 69 73 74 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 55 6e 6c 69 6b 65 20 66 6f (list.file).........;;.Unlike.fo
53c60 72 20 69 73 73 75 65 73 2c 20 74 68 65 20 77 65 62 20 69 6e 74 65 72 66 61 63 65 20 64 6f 65 73 r.issues,.the.web.interface.does
53c80 20 6e 6f 74 20 73 75 70 70 6f 72 74 0a 20 20 20 20 20 20 20 20 3b 3b 20 6d 75 6c 74 69 70 6c 65 .not.support.........;;.multiple
53ca0 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 20 74 65 6d 70 6c 61 74 65 73 2e 20 20 54 68 65 20 41 50 .pull-request.templates...The.AP
53cc0 49 20 64 6f 65 73 20 74 68 6f 75 67 68 2c 0a 20 20 20 20 20 20 20 20 3b 3b 20 62 75 74 20 64 75 I.does.though,.........;;.but.du
53ce0 65 20 74 6f 20 74 68 69 73 20 6c 69 6d 69 74 61 74 69 6f 6e 20 49 20 64 6f 75 62 74 20 6d 61 6e e.to.this.limitation.I.doubt.man
53d00 79 20 70 65 6f 70 6c 65 20 75 73 65 20 74 68 65 6d 2c 0a 20 20 20 20 20 20 20 20 3b 3b 20 73 6f y.people.use.them,.........;;.so
53d20 20 46 6f 72 67 65 20 64 6f 65 73 6e 27 74 20 73 75 70 70 6f 72 74 20 74 68 65 6d 20 65 69 74 68 .Forge.doesn't.support.them.eith
53d40 65 72 2e 0a 20 20 20 20 20 20 20 20 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 er..........))))..(cl-defmethod.
53d60 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 20 28 28 72 65 70 6f forge--set-default-branch.((repo
53d80 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 20 20 20 .forge-github-repository).......
53da0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
53dc0 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 72 67 65 2d 2d 67 68 ...newname.oldname)...(forge--gh
53de0 75 62 2d 70 6f 73 74 20 72 65 70 6f 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 2f 72 65 70 6f 73 ub-post.repo.....(format."/repos
53e00 2f 3a 6f 77 6e 65 72 2f 3a 6e 61 6d 65 2f 62 72 61 6e 63 68 65 73 2f 25 73 2f 72 65 6e 61 6d 65 /:owner/:name/branches/%s/rename
53e20 22 20 6f 6c 64 6e 61 6d 65 29 0a 20 20 20 20 60 28 28 6e 65 77 5f 6e 61 6d 65 20 2e 20 2c 6e 65 ".oldname).....`((new_name...,ne
53e40 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 20 35 20 73 wname)))...(message."Waiting.5.s
53e60 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 65 20 72 65 econds.for.GitHub.to.complete.re
53e80 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 28 6d 65 73 name...")...(sleep-for.5)...(mes
53ea0 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 47 69 74 48 sage."Waiting.5.seconds.for.GitH
53ec0 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 22 29 0a 20 ub.to.complete.rename...done")..
53ee0 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 70 72 75 6e .(magit-call-git."fetch"."--prun
53f00 65 22 20 28 6f 72 65 66 20 72 65 70 6f 20 72 65 6d 6f 74 65 29 29 0a 20 20 28 6d 61 67 69 74 2d e".(oref.repo.remote))...(magit-
53f20 2d 73 65 74 2d 64 65 66 61 75 6c 74 2d 62 72 61 6e 63 68 20 6e 65 77 6e 61 6d 65 20 6f 6c 64 6e -set-default-branch.newname.oldn
53f40 61 6d 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 2d 66 6f 72 6b ame))..(cl-defmethod.forge--fork
53f60 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 68 75 62 2d -repository.((repo.forge-github-
53f80 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 20 repository).fork)...(with-slots.
53fa0 28 6f 77 6e 65 72 20 6e 61 6d 65 29 20 72 65 70 6f 0a 20 20 20 20 28 66 6f 72 67 65 2d 2d 67 68 (owner.name).repo.....(forge--gh
53fc0 75 62 2d 70 6f 73 74 20 72 65 70 6f 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 2f 72 65 70 ub-post.repo.......(format."/rep
53fe0 6f 73 2f 25 73 2f 25 73 2f 66 6f 72 6b 73 22 20 6f 77 6e 65 72 20 6e 61 6d 65 29 0a 20 20 20 20 os/%s/%s/forks".owner.name).....
54000 20 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 66 6f 72 6b 20 28 67 68 75 62 2d 2d 75 ..(and.(not.(equal.fork.(ghub--u
54020 73 65 72 6e 61 6d 65 20 28 67 68 75 62 2d 2d 68 6f 73 74 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 sername.(ghub--host.nil)))).....
54040 20 20 20 20 20 20 20 60 28 28 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 20 2e 20 2c 66 6f 72 6b 29 29 .......`((organization...,fork))
54060 29 29 0a 20 20 20 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 )).....(ghub-wait.(format."/repo
54080 73 2f 25 73 2f 25 73 22 20 66 6f 72 6b 20 6e 61 6d 65 29 20 6e 69 6c 20 3a 61 75 74 68 20 27 66 s/%s/%s".fork.name).nil.:auth.'f
540a0 6f 72 67 65 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 6d 65 orge)))..(cl-defmethod.forge--me
540c0 72 67 65 2d 70 75 6c 6c 72 65 71 20 28 28 5f 72 65 70 6f 20 66 6f 72 67 65 2d 67 69 74 68 75 62 rge-pullreq.((_repo.forge-github
540e0 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 20 20 -repository)....................
54100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 70 69 63 20 68 61 73 68 20 6d 65 74 68 .................topic.hash.meth
54120 6f 64 29 0a 20 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 75 74 20 74 6f 70 69 63 0a 20 20 20 od)...(forge--ghub-put.topic....
54140 20 22 2f 72 65 70 6f 73 2f 3a 6f 77 6e 65 72 2f 3a 72 65 70 6f 2f 70 75 6c 6c 73 2f 3a 6e 75 6d ."/repos/:owner/:repo/pulls/:num
54160 62 65 72 2f 6d 65 72 67 65 22 0a 20 20 20 20 60 28 28 6d 65 72 67 65 5f 6d 65 74 68 6f 64 20 2e ber/merge".....`((merge_method..
54180 20 2c 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 6d 65 74 68 6f 64 29 29 0a 20 20 20 20 20 20 2c 40 .,(symbol-name.method)).......,@
541a0 28 61 6e 64 20 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 (and.hash.`((sha...,hash))))))..
541c0 3b 3b 3b 20 57 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 ;;;.Wrappers..(cl-defun.forge--g
541e0 68 75 62 2d 67 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 hub-get.(obj.resource...........
54200 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 6c 20 70 .....................&optional.p
54220 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 20 20 20 20 arams...........................
54240 20 20 20 20 20 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 .....&key.query.payload.headers.
54260 20 20 20 20 20 20 20 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 ...............................s
54280 69 6c 65 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 ilent.unpaginate.noerror.reader.
542a0 20 20 20 20 20 20 20 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
542c0 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 20 20 20 ost.............................
542e0 20 20 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 72 ...callback.errorback)...(declar
54300 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 67 65 74 20 28 69 e.(indent.defun))...(ghub-get.(i
54320 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 72 63 65 20 6f 62 f.obj.(forge--format-resource.ob
54340 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 20 20 20 20 20 20 j.resource).resource)...........
54360 20 20 70 61 72 61 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 6f 73 74 20 28 6f 72 20 68 ..params.............:host.(or.h
54380 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 72 79 20 ost.(oref.(forge-get-repository.
543a0 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 3a 61 75 74 68 obj).apihost)).............:auth
543c0 20 27 66 6f 72 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 71 75 65 72 79 20 71 75 65 72 79 .'forge.............:query.query
543e0 20 3a 70 61 79 6c 6f 61 64 20 70 61 79 6c 6f 61 64 20 3a 68 65 61 64 65 72 73 20 68 65 61 64 65 .:payload.payload.:headers.heade
54400 72 73 0a 20 20 20 20 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 rs.............:silent.silent.:u
54420 6e 70 61 67 69 6e 61 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 npaginate.unpaginate............
54440 20 3a 6e 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 .:noerror.noerror.:reader.reader
54460 0a 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 20 .............:callback.callback.
54480 3a 65 72 72 6f 72 62 61 63 6b 20 65 72 72 6f 72 62 61 63 6b 29 29 0a 0a 28 63 6c 2d 64 65 66 75 :errorback.errorback))..(cl-defu
544a0 6e 20 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 75 74 20 28 6f 62 6a 20 72 65 73 6f 75 72 63 65 0a n.forge--ghub-put.(obj.resource.
544c0 20 20 20 20 20 20 20 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 ...............................&
544e0 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 20 20 20 20 20 optional.params.................
54500 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
54520 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.......................
54540 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 72 .........silent.unpaginate.noerr
54560 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 20 or.reader.......................
54580 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 20 20 20 20 20 20 20 .........host...................
545a0 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 6c 62 61 63 6b 20 65 72 72 6f 72 62 61 63 6b 29 .............callback.errorback)
545c0 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 20 28 67 ...(declare.(indent.defun))...(g
545e0 68 75 62 2d 70 75 74 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 hub-put.(if.obj.(forge--format-r
54600 65 73 6f 75 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 esource.obj.resource).resource).
54620 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 3a ............params.............:
54640 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 74 2d 72 host.(or.host.(oref.(forge-get-r
54660 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 20 20 20 epository.obj).apihost))........
54680 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 20 20 20 20 20 3a 71 .....:auth.'forge.............:q
546a0 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 61 uery.query.:payload.payload.:hea
546c0 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 3a 73 69 6c 65 6e 74 ders.headers.............:silent
546e0 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 61 74 65 0a 20 .silent.:unpaginate.unpaginate..
54700 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 65 72 72 6f 72 20 6e 6f 65 72 72 6f 72 20 3a 72 65 61 ...........:noerror.noerror.:rea
54720 64 65 72 20 72 65 61 64 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b der.reader.............:callback
54740 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 61 63 6b 29 29 .callback.:errorback.errorback))
54760 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 6f 73 74 20 28 6f 62 ..(cl-defun.forge--ghub-post.(ob
54780 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 20 20 20 20 20 20 j.resource......................
547a0 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 20 ...........&optional.params.....
547c0 20 20 20 20 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 79 ............................&key
547e0 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 20 20 20 .query.payload.headers..........
54800 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 20 75 6e .......................silent.un
54820 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 20 20 20 paginate.noerror.reader.........
54840 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 61 6c ........................host.cal
54860 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 6e 64 lback.errorback)...(declare.(ind
54880 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 67 68 75 62 2d 70 6f 73 74 20 28 66 6f 72 67 65 2d ent.defun))...(ghub-post.(forge-
548a0 2d 66 6f 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 -format-resource.obj.resource)..
548c0 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..............
548e0 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 74 2d :host.(or.host.(oref.(forge-get-
54900 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 20 20 repository.obj).apihost)).......
54920 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 20 20 20 20 20 .......:auth.'forge.............
54940 20 3a 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 .:query.query.:payload.payload.:
54960 68 65 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 3a 73 69 headers.headers..............:si
54980 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 61 lent.silent.:unpaginate.unpagina
549a0 74 65 0a 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 72 72 6f 72 te..............:noerror.noerror
549c0 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 20 3a 63 61 .:reader.reader..............:ca
549e0 6c 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 llback.callback.:errorback.error
54a00 62 61 63 6b 29 29 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 68 75 62 2d 70 61 back))..(cl-defun.forge--ghub-pa
54a20 74 63 68 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 tch.(obj.resource...............
54a40 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 6c 20 70 61 72 ...................&optional.par
54a60 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 20 20 20 20 20 20 ams.............................
54a80 20 20 20 20 20 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 .....&key.query.payload.headers.
54aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
54ac0 20 73 69 6c 65 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 .silent.unpaginate.noerror.reade
54ae0 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...............................
54b00 20 20 20 68 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 ...host.callback.errorback)...(d
54b20 65 63 6c 61 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 70 eclare.(indent.defun))...(ghub-p
54b40 61 74 63 68 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 atch.(forge--format-resource.obj
54b60 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 70 61 72 61 6d 73 0a .resource)...............params.
54b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 6f 73 74 20 28 6f 72 20 68 6f 73 74 20 28 6f 72 ..............:host.(or.host.(or
54ba0 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 6f 62 6a 29 20 61 70 ef.(forge-get-repository.obj).ap
54bc0 69 68 6f 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 75 74 68 20 27 66 6f 72 ihost))...............:auth.'for
54be0 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 71 75 65 72 79 20 71 75 65 72 79 20 3a 70 ge...............:query.query.:p
54c00 61 79 6c 6f 61 64 20 70 61 79 6c 6f 61 64 20 3a 68 65 61 64 65 72 73 20 68 65 61 64 65 72 73 0a ayload.payload.:headers.headers.
54c20 20 20 20 20 20 20 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 ..............:silent.silent.:un
54c40 70 61 67 69 6e 61 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 paginate.unpaginate.............
54c60 20 20 3a 6e 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 ..:noerror.noerror.:reader.reade
54c80 72 0a 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 r...............:callback.callba
54ca0 63 6b 20 3a 65 72 72 6f 72 62 61 63 6b 20 65 72 72 6f 72 62 61 63 6b 29 29 0a 0a 28 63 6c 2d 64 ck.:errorback.errorback))..(cl-d
54cc0 65 66 75 6e 20 66 6f 72 67 65 2d 2d 67 68 75 62 2d 64 65 6c 65 74 65 20 28 6f 62 6a 20 72 65 73 efun.forge--ghub-delete.(obj.res
54ce0 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 20 ource...........................
54d00 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 20 20 20 20 ........&optional.params........
54d20 20 20 20 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 79 20 ...........................&key.
54d40 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 20 20 20 20 query.payload.headers...........
54d60 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 20 75 ........................silent.u
54d80 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 20 20 npaginate.noerror.reader........
54da0 20 20 20 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 ...........................host.
54dc0 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 72 65 20 28 callback.errorback)...(declare.(
54de0 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 67 68 75 62 2d 64 65 6c 65 74 65 20 28 66 indent.defun))...(ghub-delete.(f
54e00 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 73 6f 75 72 orge--format-resource.obj.resour
54e20 63 65 29 0a 20 20 20 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 ce)................params.......
54e40 20 20 20 20 20 20 20 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 .........:host.(or.host.(oref.(f
54e60 6f 72 67 65 2d 67 65 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 orge-get-repository.obj).apihost
54e80 29 29 0a 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 0a 20 ))................:auth.'forge..
54ea0 20 20 20 20 20 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 ..............:query.query.:payl
54ec0 6f 61 64 20 70 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 oad.payload.:headers.headers....
54ee0 20 20 20 20 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 ............:silent.silent.:unpa
54f00 67 69 6e 61 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 ginate.unpaginate...............
54f20 20 3a 6e 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 .:noerror.noerror.:reader.reader
54f40 0a 20 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 ................:callback.callba
54f60 63 6b 20 3a 65 72 72 6f 72 62 61 63 6b 20 65 72 72 6f 72 62 61 63 6b 29 29 0a 0a 3b 3b 3b 20 5f ck.:errorback.errorback))..;;;._
54f80 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 67 65 2d 67 69 74 68 75 62 29 0a 3b 3b 3b 20 66 6f 72 .(provide.'forge-github).;;;.for
54fa0 67 65 2d 67 69 74 68 75 62 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 ge-github.el.ends.here..........
54fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
54fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
55000 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 72 65 70 6f 2e 65 forge-20240405.1509/forge-repo.e
55020 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...............................
55040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
55060 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
55080 30 30 35 33 35 35 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 31 35 00 20 30 00 00 00 0053554.00000000000.014515..0...
550a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
550c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
550e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
55100 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...................
55120 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...................
55140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
55160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
55180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
551a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
551c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
551e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
55200 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
55220 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.
55240 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 34 20 -*-..;;.Copyright.(C).2018-2024.
55260 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
55280 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 2e 6c 69 3e 0a 3b s.Bernoulli.<jonas@bernoul.li>.;
552a0 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 6c 6c 69 20 3c 6a ;.Maintainer:.Jonas.Bernoulli.<j
552c0 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 4c 69 63 65 6e 73 onas@bernoul.li>..;;.SPDX-Licens
552e0 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 0a e-Identifier:.GPL-3.0-or-later..
55300 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 79 ;;.This.file.is.free.software:.y
55320 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 6f ou.can.redistribute.it.and/or.mo
55340 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 68 dify.;;.it.under.the.terms.of.th
55360 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 20 e.GNU.General.Public.License.as.
55380 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 72 published.;;.by.the.Free.Softwar
553a0 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 6f e.Foundation,.either.version.3.o
553c0 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 70 f.the.License,.;;.or.(at.your.op
553e0 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 54 tion).any.later.version..;;.;;.T
55400 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 68 his.file.is.distributed.in.the.h
55420 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 62 ope.that.it.will.be.useful,.;;.b
55440 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 74 ut.WITHOUT.ANY.WARRANTY;.without
55460 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 3b .even.the.implied.warranty.of.;;
55480 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 20 .MERCHANTABILITY.or.FITNESS.FOR.
554a0 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 3b A.PARTICULAR.PURPOSE...See.the.;
554c0 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 72 ;.GNU.General.Public.License.for
554e0 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 20 .more.details..;;.;;.You.should.
55500 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 20 have.received.a.copy.of.the.GNU.
55520 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 20 General.Public.License.;;.along.
55540 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 74 with.this.file...If.not,.see.<ht
55560 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 3b tps://www.gnu.org/licenses/>...;
55580 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 28 72 65 71 75 ;;.Code:..(require.'forge).(requ
555a0 69 72 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 ire.'eieio)..;;;.Classes..(defcl
555c0 61 73 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 ass.forge-repository.(forge-obje
555e0 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 20 20 ct)...((closql-class-prefix.....
55600 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 71 6c ..:initform."forge-")....(closql
55620 2d 63 6c 61 73 73 2d 73 75 66 66 69 78 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 2d -class-suffix.......:initform."-
55640 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...
55660 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 79 ...........:initform.'repository
55680 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 20 )....(closql-primary-key........
556a0 3a 69 6e 69 74 66 6f 72 6d 20 27 69 64 29 0a 20 20 20 28 69 73 73 75 65 73 2d 75 72 6c 2d 66 6f :initform.'id)....(issues-url-fo
556c0 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f rmat.........:initform.nil.:allo
556e0 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 72 6c 2d 66 6f 72 cation.:class)....(issue-url-for
55700 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 20 3a 61 6c 6c 6f mat..........:initform.nil.:allo
55720 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 70 6f 73 74 2d 75 72 cation.:class)....(issue-post-ur
55740 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 6c 6c 6f l-format.....:initform.nil.:allo
55760 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 73 2d 75 72 6c 2d cation.:class)....(pullreqs-url-
55780 66 6f 72 6d 61 74 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f format.......:initform.nil.:allo
557a0 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 75 72 6c 2d 66 cation.:class)....(pullreq-url-f
557c0 6f 72 6d 61 74 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f ormat........:initform.nil.:allo
557e0 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 70 6f 73 74 2d cation.:class)....(pullreq-post-
55800 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f url-format...:initform.nil.:allo
55820 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 63 6f 6d 6d 69 74 2d 75 72 6c 2d 66 6f cation.:class)....(commit-url-fo
55840 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f rmat.........:initform.nil.:allo
55860 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 62 72 61 6e 63 68 2d 75 72 6c 2d 66 6f cation.:class)....(branch-url-fo
55880 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f rmat.........:initform.nil.:allo
558a0 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 72 65 6d 6f 74 65 2d 75 72 6c 2d 66 6f cation.:class)....(remote-url-fo
558c0 72 6d 61 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f rmat.........:initform.nil.:allo
558e0 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 63 72 65 61 74 65 2d 69 73 73 75 65 2d cation.:class)....(create-issue-
55900 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f url-format...:initform.nil.:allo
55920 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 63 72 65 61 74 65 2d 70 75 6c 6c 72 65 cation.:class)....(create-pullre
55940 71 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 3a 61 6c 6c 6f q-url-format.:initform.nil.:allo
55960 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 2d 72 65 66 73 70 cation.:class)....(pullreq-refsp
55980 65 63 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 61 6c 6c 6f ec...........:initform.nil.:allo
559a0 63 61 74 69 6f 6e 20 3a 63 6c 61 73 73 29 0a 20 20 20 28 69 64 20 20 20 20 20 20 20 20 20 20 20 cation.:class)....(id...........
559c0 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 20 3a 69 6e 69 74 .............:initform.nil.:init
559e0 61 72 67 20 3a 69 64 29 0a 20 20 20 28 66 6f 72 67 65 2d 69 64 20 20 20 20 20 20 20 20 20 20 20 arg.:id)....(forge-id...........
55a00 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 66 .......:initform.nil.:initarg.:f
55a20 6f 72 67 65 2d 69 64 29 0a 20 20 20 28 66 6f 72 67 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 orge-id)....(forge..............
55a40 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 66 .......:initform.nil.:initarg.:f
55a60 6f 72 67 65 29 0a 20 20 20 28 6f 77 6e 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 orge)....(owner.................
55a80 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 6f 77 6e 65 ....:initform.nil.:initarg.:owne
55aa0 72 29 0a 20 20 20 28 6e 61 6d 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r)....(name.....................
55ac0 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 6e 61 6d 65 29 0a 20 .:initform.nil.:initarg.:name)..
55ae0 20 20 28 61 70 69 68 6f 73 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e ..(apihost...................:in
55b00 69 74 66 6f 72 6d 20 6e 69 6c 20 3a 69 6e 69 74 61 72 67 20 3a 61 70 69 68 6f 73 74 29 0a 20 20 itform.nil.:initarg.:apihost)...
55b20 20 28 67 69 74 68 6f 73 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 .(githost...................:ini
55b40 74 66 6f 72 6d 20 6e 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 tform.nil.:initarg.:githost)....
55b60 28 72 65 6d 6f 74 65 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 (remote....................:init
55b80 66 6f 72 6d 20 6e 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 form.nil.:initarg.:remote)....(c
55ba0 6f 6e 64 69 74 69 6f 6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f ondition.................:initfo
55bc0 72 6d 20 3a 73 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 rm.:stub)....(created...........
55be0 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 75 70 64 61 74 ........:initform.nil)....(updat
55c00 65 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 66 6f 72 6d 20 6e ed...................:initform.n
55c20 69 6c 29 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 il)....(pushed..................
55c40 20 20 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 ..:initform.nil)....(parent.....
55c60 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 20 ...............:initform.nil)...
55c80 20 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 3a 69 6e 69 .(description...............:ini
55ca0 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.........
55cc0 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 61 .........:initform.nil)....(defa
55ce0 75 6c 74 2d 62 72 61 6e 63 68 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 ult-branch............:initform.
55d00 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 20 20 nil)....(archived-p.............
55d20 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 20 20 20 ...:initform.nil)....(fork-p....
55d40 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)..
55d60 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 20 3a 69 6e ..(locked-p..................:in
55d80 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 20 20 20 20 20 itform.nil)....(mirror-p........
55da0 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 70 72 69 ..........:initform.nil)....(pri
55dc0 76 61 74 65 2d 70 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 vate-p.................:initform
55de0 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 20 20 20 20 20 20 20 .nil)....(issues-p..............
55e00 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 74 29 0a 20 20 20 28 77 69 6b 69 2d 70 20 20 20 20 20 ....:initform.t)....(wiki-p.....
55e20 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 20 ...............:initform.nil)...
55e40 20 28 73 74 61 72 73 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 .(stars.....................:ini
55e60 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 77 61 74 63 68 65 72 73 20 20 20 20 20 20 20 20 20 tform.nil)....(watchers.........
55e80 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 61 73 73 69 .........:initform.nil)....(assi
55ea0 67 6e 65 65 73 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 74 61 gnees.................:closql-ta
55ec0 62 6c 65 20 61 73 73 69 67 6e 65 65 29 0a 20 20 20 28 66 6f 72 6b 73 20 20 20 20 20 20 20 20 20 ble.assignee)....(forks.........
55ee0 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 66 6f 72 6b 29 0a ............:closql-table.fork).
55f00 20 20 20 28 69 73 73 75 65 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 ...(issues....................:c
55f20 6c 6f 73 71 6c 2d 63 6c 61 73 73 20 66 6f 72 67 65 2d 69 73 73 75 65 29 0a 20 20 20 28 6c 61 62 losql-class.forge-issue)....(lab
55f40 65 6c 73 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 2d 74 els....................:closql-t
55f60 61 62 6c 65 20 6c 61 62 65 6c 29 0a 20 20 20 28 70 75 6c 6c 72 65 71 73 20 20 20 20 20 20 20 20 able.label)....(pullreqs........
55f80 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 70 75 ..........:closql-class.forge-pu
55fa0 6c 6c 72 65 71 29 0a 20 20 20 28 72 65 76 6e 6f 74 65 73 20 20 20 20 20 20 20 20 20 20 20 20 20 llreq)....(revnotes.............
55fc0 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 72 65 76 6e 6f 74 65 .....:closql-class.forge-revnote
55fe0 29 0a 20 20 20 28 73 65 6c 65 63 74 69 76 65 2d 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )....(selective-p...............
56000 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 77 6f 72 6b 74 72 65 65 20 20 20 20 20 :initform.nil)....(worktree.....
56020 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 28 .............:initform.nil)....(
56040 6d 69 6c 65 73 74 6f 6e 65 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 6f 73 71 milestones................:closq
56060 6c 2d 74 61 62 6c 65 20 6d 69 6c 65 73 74 6f 6e 65 29 0a 20 20 20 28 69 73 73 75 65 73 2d 75 6e l-table.milestone)....(issues-un
56080 74 69 6c 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 til..............:initform.nil).
560a0 20 20 20 28 70 75 6c 6c 72 65 71 73 2d 75 6e 74 69 6c 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 ...(pullreqs-until............:i
560c0 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 64 nitform.nil))...:abstract.t)..(d
560e0 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 6f efclass.forge-unusedapi-reposito
56100 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 61 ry.(forge-repository).().:abstra
56120 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 70 ct.t)..(defclass.forge-noapi-rep
56140 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 61 ository.(forge-repository).().:a
56160 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 6d bstract.t)..(cl-defmethod.slot-m
56180 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 79 issing.((object.forge-repository
561a0 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 6c ).............................sl
561c0 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 77 ot-name.operation.&optional._new
561e0 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 6e -value)...(if.(and.(eq.operation
56200 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 65 .'oref)............(eq.slot-name
56220 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 6a .'slug)).......(concat.(oref.obj
56240 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 72 ect.owner)."/"...............(or
56260 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 65 ef.object.name)).....(cl-call-ne
56280 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 74 xt-method)))..;;;.Query.;;;;.Get
562a0 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 70 ..(defvar-local.forge-buffer-rep
562c0 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 2d ository.nil).(put.'forge-buffer-
562e0 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 0a repository.'permanent-local.t)..
56300 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 73 (defvar-local.forge-buffer-unass
56320 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 2d ociated-p.nil)..(defconst.forge-
56340 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 75 -signal-no-entry.'(:tracked.:stu
56360 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 2d b.:insert!))..(defun.forge--get-
56380 72 65 6d 6f 74 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 77 61 72 6e 29 0a 20 20 28 6c 65 74 2a 20 remote.(&optional.warn)...(let*.
563a0 28 28 72 65 6d 6f 74 65 73 20 28 6d 61 67 69 74 2d 6c 69 73 74 2d 72 65 6d 6f 74 65 73 29 29 0a ((remotes.(magit-list-remotes)).
563c0 20 20 20 20 20 20 20 20 20 28 63 6f 6e 66 69 67 20 28 6d 61 67 69 74 2d 67 65 74 20 22 66 6f 72 .........(config.(magit-get."for
563e0 67 65 2e 72 65 6d 6f 74 65 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 74 65 20 28 69 ge.remote"))..........(remote.(i
56400 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 20 20 20 f.(cdr.remotes).................
56420 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 72 65 6d .....(or.(car.(member.config.rem
56440 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 20 20 20 otes))..........................
56460 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 65 73 29 (car.(member."upstream".remotes)
56480 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 61 72 20 )..........................(car.
564a0 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 20 20 20 (member."origin".remotes))).....
564c0 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 29 29 0a ...............(car.remotes)))).
564e0 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 6d 6f 74 ....(when.(and.warn.config.remot
56500 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 29 0a 20 e.(not.(equal.config.remote)))..
56520 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 72 65 6d .....(message."Ignored.forge.rem
56540 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 25 73 2e ote=%s;.no.such.remote.\nSee.%s.
56560 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 73 3a 2f ".config................"https:/
56580 2f 6d 61 67 69 74 2e 76 63 2f 6d 61 6e 75 61 6c 2f 66 6f 72 67 65 2f 52 65 70 6f 73 69 74 6f 72 /magit.vc/manual/forge/Repositor
565a0 79 2d 44 65 74 65 63 74 69 6f 6e 2e 68 74 6d 6c 22 29 29 0a 20 20 20 20 72 65 6d 6f 74 65 29 29 y-Detection.html")).....remote))
565c0 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
565e0 74 6f 72 79 20 28 28 5f 28 65 71 6c 20 3a 69 64 29 29 20 69 64 29 0a 20 20 28 63 6c 6f 73 71 6c tory.((_(eql.:id)).id)...(closql
56600 2d 67 65 74 20 28 66 6f 72 67 65 2d 64 62 29 20 28 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 -get.(forge-db).(substring-no-pr
56620 6f 70 65 72 74 69 65 73 20 69 64 29 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 operties.id).'forge-repository))
56640 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
56660 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 72 65 6d 6f 74 65 29 tory.((_.null).&optional.remote)
56680 0a 20 20 3b 3b 20 41 76 6f 69 64 20 6d 61 74 63 68 69 6e 67 20 74 68 65 20 28 28 68 6f 73 74 20 ...;;.Avoid.matching.the.((host.
566a0 6f 77 6e 65 72 20 6e 61 6d 65 29 20 6c 69 73 74 29 20 2e 2e 2e 29 20 6d 65 74 68 6f 64 2e 0a 20 owner.name).list)....).method...
566c0 20 3b 3b 20 4e 65 63 65 73 73 61 72 79 20 66 6f 72 20 45 6d 61 63 73 20 33 30 2e 30 2e 35 30 2c .;;.Necessary.for.Emacs.30.0.50,
566e0 20 73 69 6e 63 65 20 63 35 35 36 39 34 37 38 35 65 39 2e 20 20 53 65 65 20 23 36 34 32 2e 0a 20 .since.c55694785e9...See.#642...
56700 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 3f 20 72 .(forge-get-repository.:known?.r
56720 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 74 emote))..(cl-defmethod.forge-get
56740 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 28 64 65 6d 61 6e 64 20 73 79 6d 62 6f 6c 29 20 26 6f 70 -repository.((demand.symbol).&op
56760 74 69 6f 6e 61 6c 20 72 65 6d 6f 74 65 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 63 75 72 tional.remote)..."Return.the.cur
56780 72 65 6e 74 20 66 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 rent.forge.repository...First.ch
567a0 65 63 6b 20 69 66 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 eck.if.`forge-buffer-repository'
567c0 2c 20 6f 72 20 69 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 ,.or.if.that.is.nil,.then.the.re
567e0 70 6f 73 69 74 6f 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 pository.for.`forge-buffer-topic
56800 27 2c 20 73 61 74 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 ',.satisfies.DEMAND...If.so,.the
56820 6e 20 72 65 74 75 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 n.return.that.repository...Other
56840 77 69 73 65 20 72 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 wise.return.the.repository.for.`
56860 64 65 66 61 75 6c 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 default-directory',.if.that.exis
56880 74 73 20 61 6e 64 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 ts.and.satisfies.DEMAND...If.tha
568a0 74 20 66 61 69 6c 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 t.fails.too,.then.return.nil.or.
568c0 73 69 67 6e 61 6c 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 signal.an.error,.depending.on.DE
568e0 4d 41 4e 44 2e 22 0a 20 20 28 6f 72 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 72 65 70 6f 20 28 6f MAND."...(or.(and-let*.((repo.(o
56900 72 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 20 20 r.forge-buffer-repository.......
56920 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 72 67 65 2d .....................(and.forge-
56940 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 20 20 20 20 buffer-topic....................
56960 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 6f .............(forge-get-reposito
56980 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 20 20 20 ry.forge-buffer-topic)))))......
569a0 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 20 64 65 ...(forge-get-repository.repo.de
569c0 6d 61 6e 64 20 27 6e 6f 65 72 72 6f 72 29 29 0a 20 20 20 20 20 20 28 6d 61 67 69 74 2d 2d 77 69 mand.'noerror)).......(magit--wi
569e0 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 69 73 74 th-refresh-cache...........(list
56a00 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 2d 72 65 .default-directory.'forge-get-re
56a20 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 69 66 20 28 6e 6f pository.demand).........(if.(no
56a40 74 20 28 6d 61 67 69 74 2d 67 69 74 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 t.(magit-gitdir)).............(w
56a60 68 65 6e 20 28 6d 65 6d 71 20 64 65 6d 61 6e 64 20 66 6f 72 67 65 2d 2d 73 69 67 6e 61 6c 2d 6e hen.(memq.demand.forge--signal-n
56a80 6f 2d 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 0a 20 20 o-entry)...............(error...
56aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 22 43 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 46 ............."Cannot.determine.F
56ac0 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 20 6f 75 74 73 69 64 65 20 6f 66 20 47 69 74 20 72 orge.repository.outside.of.Git.r
56ae0 65 70 6f 73 69 74 6f 72 79 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 72 epository"))...........(unless.r
56b00 65 6d 6f 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 72 65 6d 6f 74 65 20 28 emote.............(setq.remote.(
56b20 66 6f 72 67 65 2d 2d 67 65 74 2d 72 65 6d 6f 74 65 20 27 77 61 72 6e 29 29 29 0a 20 20 20 20 20 forge--get-remote.'warn)))......
56b40 20 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 75 72 6c 20 28 61 6e 64 20 72 65 6d 6f 74 65 0a 20 .....(if-let.((url.(and.remote..
56b60 20 20 20 20 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
56b80 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 22 it-git-string."remote"."get-url"
56ba0 20 72 65 6d 6f 74 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c .remote))))...............(and-l
56bc0 65 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 et*.((repo.(forge-get-repository
56be0 20 75 72 6c 20 72 65 6d 6f 74 65 20 64 65 6d 61 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 .url.remote.demand)))...........
56c00 20 20 20 20 20 20 28 70 72 6f 67 6e 20 3b 20 77 6f 72 6b 20 61 72 6f 75 6e 64 20 64 65 62 62 75 ......(progn.;.work.around.debbu
56c20 67 73 23 33 31 38 34 30 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 gs#31840...................(oset
56c40 20 72 65 70 6f 20 77 6f 72 6b 74 72 65 65 20 28 6d 61 67 69 74 2d 74 6f 70 6c 65 76 65 6c 29 29 .repo.worktree.(magit-toplevel))
56c60 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 70 6f 29 29 0a 20 20 20 20 20 20 ...................repo)).......
56c80 20 20 20 20 20 20 28 77 68 65 6e 20 28 6d 65 6d 71 20 64 65 6d 61 6e 64 20 66 6f 72 67 65 2d 2d ......(when.(memq.demand.forge--
56ca0 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 20 20 20 20 20 20 28 signal-no-entry)...............(
56cc0 65 72 72 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 43 61 6e 6e 6f 74 20 64 65 74 error................"Cannot.det
56ce0 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 65 ermine.forge.repository...%s\nSe
56d00 65 20 25 73 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 72 65 6d e.%s."................(cond.(rem
56d20 6f 74 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 ote.(format."No.url.configured.f
56d40 6f 72 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 or.%S.".remote))................
56d60 20 20 20 20 20 20 28 28 61 6e 64 2d 6c 65 74 2a 20 28 28 63 6f 6e 66 69 67 20 28 6d 61 67 69 74 ......((and-let*.((config.(magit
56d80 2d 67 65 74 20 22 66 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 -get."forge.remote")))..........
56da0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 56 61 6c 75 65 20 6f 66 ...............(format."Value.of
56dc0 20 60 66 6f 72 67 65 2e 72 65 6d 6f 74 65 27 20 69 73 20 25 53 20 62 75 74 20 25 73 22 0a 20 20 .`forge.remote'.is.%S.but.%s"...
56de0 20 20 20 20 20 20 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 6f ..............................co
56e00 6e 66 69 67 20 22 74 68 61 74 20 72 65 6d 6f 74 65 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 nfig."that.remote.does.not.exist
56e20 2e 22 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 28 6d 61 67 .")))......................((mag
56e40 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 65 63 69 64 65 20 it-list-remotes)."Cannot.decide.
56e60 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 20 20 20 20 20 20 on.remote.to.use.").............
56e80 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 75 72 65 .........(t."No.remote.configure
56ea0 64 2e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 68 74 74 70 73 3a 2f 2f 6d 61 d."))................"https://ma
56ec0 67 69 74 2e 76 63 2f 6d 61 6e 75 61 6c 2f 66 6f 72 67 65 2f 52 65 70 6f 73 69 74 6f 72 79 2d 44 git.vc/manual/forge/Repository-D
56ee0 65 74 65 63 74 69 6f 6e 2e 68 74 6d 6c 22 29 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 etection.html")))))))..(cl-defme
56f00 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 75 72 6c 20 thod.forge-get-repository.((url.
56f20 73 74 72 69 6e 67 29 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 string).&optional.remote.demand)
56f40 0a 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 55 52 4c ..."Return.the.repository.at.URL
56f60 2e 22 0a 20 20 28 69 66 2d 6c 65 74 20 28 28 70 61 72 74 73 20 28 66 6f 72 67 65 2d 2d 73 70 6c ."...(if-let.((parts.(forge--spl
56f80 69 74 2d 66 6f 72 67 65 2d 75 72 6c 20 75 72 6c 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 it-forge-url.url))).......(forge
56fa0 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 70 61 72 74 73 20 72 65 6d 6f 74 65 20 28 6f 72 -get-repository.parts.remote.(or
56fc0 20 64 65 6d 61 6e 64 20 3a 6b 6e 6f 77 6e 3f 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6d 65 6d .demand.:known?)).....(when.(mem
56fe0 71 20 64 65 6d 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 q.demand.forge--signal-no-entry)
57000 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 .......(error."Cannot.determine.
57020 66 6f 72 67 65 20 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 25 73 20 69 73 6e 27 74 20 61 20 66 6f forge.repository...%s.isn't.a.fo
57040 72 67 65 20 55 52 4c 2e 20 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 75 72 6c 20 22 rge.URL...%s"..............url."
57060 59 6f 75 20 6d 69 67 68 74 20 68 61 76 65 20 74 6f 20 63 75 73 74 6f 6d 69 7a 65 20 60 66 6f 72 You.might.have.to.customize.`for
57080 67 65 2d 61 6c 69 73 74 27 2e 22 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 66 ge-alist'."))))..(cl-defmethod.f
570a0 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 28 28 68 6f 73 74 20 6f 77 6e 65 orge-get-repository.(((host.owne
570c0 72 20 6e 61 6d 65 29 20 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r.name).list)...................
570e0 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 6c 20 72 65 6d 6f ..................&optional.remo
57100 74 65 20 64 65 6d 61 6e 64 29 0a 20 20 22 28 28 48 4f 53 54 20 4f 57 4e 45 52 20 4e 41 4d 45 29 te.demand)..."((HOST.OWNER.NAME)
57120 20 26 6f 70 74 69 6f 6e 61 6c 20 52 45 4d 4f 54 45 20 44 45 4d 41 4e 44 29 0a 0a 52 65 74 75 72 .&optional.REMOTE.DEMAND)..Retur
57140 6e 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 69 64 65 6e 74 69 66 69 65 64 20 62 79 20 48 n.the.repository.identified.by.H
57160 4f 53 54 2c 20 4f 57 4e 45 52 20 61 6e 64 20 4e 41 4d 45 2e 0a 53 65 65 20 60 66 6f 72 67 65 2d OST,.OWNER.and.NAME..See.`forge-
57180 61 6c 69 73 74 27 20 66 6f 72 20 76 61 6c 69 64 20 47 69 74 20 68 6f 73 74 73 2e 22 0a 20 20 28 alist'.for.valid.Git.hosts."...(
571a0 73 65 74 71 20 68 6f 73 74 20 20 28 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 setq.host..(substring-no-propert
571c0 69 65 73 20 68 6f 73 74 29 29 0a 20 20 28 73 65 74 71 20 6f 77 6e 65 72 20 28 73 75 62 73 74 72 ies.host))...(setq.owner.(substr
571e0 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 6f 77 6e 65 72 29 29 0a 20 20 28 73 65 74 ing-no-properties.owner))...(set
57200 71 20 6e 61 6d 65 20 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.name..(substring-no-properties
57220 20 6e 61 6d 65 29 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 6d 65 6d 71 20 64 65 6d 61 6e 64 20 27 .name))...(unless.(memq.demand.'
57240 28 3a 74 72 61 63 6b 65 64 20 3a 74 72 61 63 6b 65 64 3f 20 3a 6b 6e 6f 77 6e 3f 20 3a 69 6e 73 (:tracked.:tracked?.:known?.:ins
57260 65 72 74 21 20 3a 73 74 75 62 20 3a 73 74 75 62 3f 29 29 0a 20 20 20 20 28 69 66 2d 6c 65 74 20 ert!.:stub.:stub?)).....(if-let.
57280 28 28 6e 65 77 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 ((new.(pcase.demand.............
572a0 20 20 20 20 20 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 ........('t......:tracked)......
572c0 20 20 20 20 20 20 20 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 ...............('full...:tracked
572e0 3f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 6e 69 6c 20 20 20 20 ?).....................('nil....
57300 3a 6b 6e 6f 77 6e 3f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 63 :known?).....................('c
57320 72 65 61 74 65 20 3a 69 6e 73 65 72 74 21 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 reate.:insert!).................
57340 20 20 20 20 28 27 73 74 75 62 20 20 20 3a 73 74 75 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ....('stub...:stub).............
57360 20 20 20 20 20 20 20 20 28 27 6d 61 79 62 65 20 20 3a 73 74 75 62 3f 29 29 29 29 0a 20 20 20 20 ........('maybe..:stub?)))).....
57380 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 4f ....(progn...........(message."O
573a0 62 73 6f 6c 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 bsolete.value.for.`%s's.DEMAND:.
573c0 60 25 73 27 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 `%s';.use.`%s'.instead".........
573e0 20 20 20 20 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 ...........'forge-get-repository
57400 20 64 65 6d 61 6e 64 20 6e 65 77 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 64 65 6d .demand.new)...........(setq.dem
57420 61 6e 64 20 6e 65 77 29 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 55 6e 6b 6e 6f 77 6e 20 and.new)).......(error."Unknown.
57440 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 22 0a 20 20 value.for.`%s's.DEMAND:.`%s'"...
57460 20 20 20 20 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 ...........'forge-get-repository
57480 20 64 65 6d 61 6e 64 29 29 29 0a 20 20 28 69 66 2d 6c 65 74 20 28 28 73 70 65 63 20 28 66 6f 72 .demand)))...(if-let.((spec.(for
574a0 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 29 29 0a 20 20 20 ge--get-forge-host.host.t)))....
574c0 20 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 67 69 74 68 6f 73 74 20 2c 61 70 69 68 ...(pcase-let.((`(,githost.,apih
574e0 6f 73 74 20 2c 77 65 62 68 6f 73 74 20 2c 63 6c 61 73 73 29 20 73 70 65 63 29 29 0a 20 20 20 20 ost.,webhost.,class).spec)).....
57500 20 20 20 20 3b 3b 20 54 68 65 20 60 77 65 62 68 6f 73 74 27 20 69 73 20 75 73 65 64 20 74 6f 20 ....;;.The.`webhost'.is.used.to.
57520 69 64 65 6e 74 69 66 79 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 66 6f 72 67 65 identify.the.corresponding.forge
57540 2e 0a 20 20 20 20 20 20 20 20 3b 3b 20 46 6f 72 20 74 68 61 74 20 72 65 61 73 6f 6e 20 69 74 20 ..........;;.For.that.reason.it.
57560 69 73 20 73 74 6f 72 65 64 20 69 6e 20 74 68 65 20 60 66 6f 72 67 65 27 20 73 6c 6f 74 2e 20 20 is.stored.in.the.`forge'.slot...
57580 54 68 65 20 69 64 0a 20 20 20 20 20 20 20 20 3b 3b 20 73 74 6f 72 65 64 20 69 6e 20 74 68 65 20 The.id.........;;.stored.in.the.
575a0 60 69 64 27 20 73 6c 6f 74 20 61 6c 73 6f 20 64 65 72 69 76 65 73 20 66 72 6f 6d 20 74 68 61 74 `id'.slot.also.derives.from.that
575c0 20 76 61 6c 75 65 2e 0a 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 72 6f 77 20 28 63 61 72 .value..........(let*.((row.(car
575e0 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 72 6f 6d 20 72 65 70 .(forge-sql.[:select.*.:from.rep
57600 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.........................
57620 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 72 67 .............:where.(and.(=.forg
57640 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 20 20 e.$s1)..........................
57660 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 6f 77 6e 65 72 ........................(=.owner
57680 20 24 73 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 .$s2)...........................
576a0 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 65 20 20 .......................(=.name..
576c0 24 73 33 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 20 $s3))]..........................
576e0 20 20 20 20 20 20 20 20 20 20 20 77 65 62 68 6f 73 74 20 6f 77 6e 65 72 20 6e 61 6d 65 29 29 29 ...........webhost.owner.name)))
57700 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 62 6a 20 28 61 6e 64 20 72 6f 77 20 28 63 ................(obj.(and.row.(c
57720 6c 6f 73 71 6c 2d 2d 72 65 6d 61 6b 65 2d 69 6e 73 74 61 6e 63 65 20 63 6c 61 73 73 20 28 66 6f losql--remake-instance.class.(fo
57740 72 67 65 2d 64 62 29 20 72 6f 77 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 79 6e rge-db).row))))...........;;.Syn
57760 63 68 72 6f 6e 69 7a 65 20 74 68 65 20 6f 62 6a 65 63 74 20 77 69 74 68 20 74 68 65 20 65 6e 74 chronize.the.object.with.the.ent
57780 72 79 20 66 72 6f 6d 20 60 66 6f 72 67 65 2d 61 6c 69 73 74 27 2e 0a 20 20 20 20 20 20 20 20 20 ry.from.`forge-alist'...........
577a0 20 3b 3b 20 54 68 69 73 20 6f 6e 6c 79 20 68 61 73 20 61 6e 20 65 66 66 65 63 74 20 69 66 20 74 .;;.This.only.has.an.effect.if.t
577c0 68 65 20 65 6e 74 72 79 20 77 61 73 20 6d 6f 64 69 66 69 65 64 2c 20 77 68 69 63 68 0a 20 20 20 he.entry.was.modified,.which....
577e0 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 20 65 76 65 72 .......;;.should.rarely,.if.ever
57800 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 20 62 79 20 6e ,.happen...Avoid.confusion,.by.n
57820 6f 74 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6d 65 6e 74 69 6f 6e 69 6e 67 20 74 68 69 73 20 ot...........;;.mentioning.this.
57840 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 20 20 detail.in.any.docstring.........
57860 20 20 20 28 77 68 65 6e 20 6f 62 6a 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 6f ...(when.obj.............(oset.o
57880 62 6a 20 61 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 20 20 20 bj.apihost.apihost).............
578a0 28 6f 73 65 74 20 6f 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 (oset.obj.githost.githost)......
578c0 20 20 20 20 20 20 20 28 6f 73 65 74 20 6f 62 6a 20 72 65 6d 6f 74 65 20 20 72 65 6d 6f 74 65 29 .......(oset.obj.remote..remote)
578e0 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 20 28 6c 69 73 74 20 64 65 6d 61 6e 64 20 )...........(pcase.(list.demand.
57900 28 61 6e 64 20 6f 62 6a 20 28 65 71 20 28 6f 72 65 66 20 6f 62 6a 20 63 6f 6e 64 69 74 69 6f 6e (and.obj.(eq.(oref.obj.condition
57920 29 20 3a 74 72 61 63 6b 65 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 3a 74 72 ).:tracked))).............(`(:tr
57940 61 63 6b 65 64 3f 20 6e 69 6c 29 20 28 73 65 74 71 20 6f 62 6a 20 6e 69 6c 29 29 0a 20 20 20 20 acked?.nil).(setq.obj.nil)).....
57960 20 20 20 20 20 20 20 20 28 60 28 3a 74 72 61 63 6b 65 64 20 20 6e 69 6c 29 0a 20 20 20 20 20 20 ........(`(:tracked..nil).......
57980 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 75 73 65 20 60 25 73 27 20 69 .......(error."Cannot.use.`%s'.i
579a0 6e 20 25 53 20 79 65 74 2e 5c 6e 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n.%S.yet.\n%s"..................
579c0 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 70 6c 65 76 65 6c 29 ...this-command.(magit-toplevel)
579e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 55 73 65 20 60 4d 2d 78 20 66 ....................."Use.`M-x.f
57a00 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 74 72 79 69 orge-add-repository'.before.tryi
57a20 6e 67 20 61 67 61 69 6e 2e 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 ng.again.")))...........(when.(a
57a40 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 73 74 75 62 nd.(memq.demand.'(:insert!.:stub
57a60 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 28 .:stub?))......................(
57a80 6e 6f 74 20 6f 62 6a 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 not.obj)).............(pcase-let
57aa0 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 20 20 20 .((`(,id...,forge-id)...........
57ac0 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
57ae0 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 20 20 20 y-ids...........................
57b00 63 6c 61 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 class.webhost.owner.name........
57b20 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 64 65 6d 61 6e 64 20 ...................(memq.demand.
57b40 27 28 3a 73 74 75 62 20 3a 73 74 75 62 3f 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 '(:stub.:stub?))))).............
57b60 20 20 3b 3b 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 ..;;.The.repo.might.have.been.re
57b80 6e 61 6d 65 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 named.on.the.forge...#188.......
57ba0 20 20 20 20 20 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 ........(unless.(setq.obj.(forge
57bc0 2d 67 65 74 2d 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 -get-repository.:id.id))........
57be0 20 20 20 20 20 20 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 .........(setq.obj.(funcall.clas
57c00 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...............................
57c20 20 20 20 20 20 3a 69 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 .....:id.......id...............
57c40 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 67 65 2d 69 64 20 66 .....................:forge-id.f
57c60 6f 72 67 65 2d 69 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 orge-id.........................
57c80 20 20 20 20 20 20 20 20 20 20 20 3a 66 6f 72 67 65 20 20 20 20 77 65 62 68 6f 73 74 0a 20 20 20 ...........:forge....webhost....
57ca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
57cc0 3a 6f 77 6e 65 72 20 20 20 20 6f 77 6e 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :owner....owner.................
57ce0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 61 6d 65 20 20 20 20 20 6e 61 6d ...................:name.....nam
57d00 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...............................
57d20 20 20 20 20 20 3a 61 70 69 68 6f 73 74 20 20 61 70 69 68 6f 73 74 0a 20 20 20 20 20 20 20 20 20 .....:apihost..apihost..........
57d40 20 20 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 67 69 74 68 6f ..........................:githo
57d60 73 74 20 20 67 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 st..githost.....................
57d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 6d 6f 74 65 20 20 20 72 65 6d 6f 74 65 29 ...............:remote...remote)
57da0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 64 65 6d 61 ).................(when.(eq.dema
57dc0 6e 64 20 3a 69 6e 73 65 72 74 21 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 nd.:insert!)...................(
57de0 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 6f 62 6a 29 0a 20 20 closql-insert.(forge-db).obj)...
57e00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 6f 62 6a 20 63 6f 6e 64 69 74 ................(oset.obj.condit
57e20 69 6f 6e 20 3a 6b 6e 6f 77 6e 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 6f 62 6a 29 29 0a ion.:known)))))...........obj)).
57e40 20 20 20 20 28 77 68 65 6e 20 28 6d 65 6d 71 20 64 65 6d 61 6e 64 20 66 6f 72 67 65 2d 2d 73 69 ....(when.(memq.demand.forge--si
57e60 67 6e 61 6c 2d 6e 6f 2d 65 6e 74 72 79 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 61 6e gnal-no-entry).......(error."Can
57e80 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 2e 20 not.determine.forge.repository..
57ea0 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 20 20 20 20 20 20 20 .No.entry.for.%S.in.%s".........
57ec0 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 0a 0a 28 63 6c 2d .....host.'forge-alist))))..(cl-
57ee0 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 20 28 defmethod.forge-get-repository.(
57f00 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 20 20 20 20 20 20 (repo.forge-repository).........
57f20 20 20 20 20 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
57f40 69 6f 6e 61 6c 20 64 65 6d 61 6e 64 20 6e 6f 65 72 72 6f 72 29 0a 20 20 28 73 65 74 71 20 6e 6f ional.demand.noerror)...(setq.no
57f60 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 77 69 74 68 2d 73 error.(and.noerror.t))...(with-s
57f80 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 0a 20 20 20 20 28 lots.(condition.slug).repo.....(
57fa0 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 20 28 28 65 72 72 cl-symbol-macrolet.........((err
57fc0 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 25 73 2c 20 62 75 .(error."Requested.%s.for.%s,.bu
57fe0 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 74 69 6f 6e 29 29 t.is.%s".demand.slug.condition))
58000 0a 20 20 20 20 20 20 20 20 20 28 69 6e 73 20 28 70 72 6f 67 6e 20 28 63 6c 6f 73 71 6c 2d 69 6e ..........(ins.(progn.(closql-in
58020 73 65 72 74 20 28 66 6f 72 67 65 2d 64 62 29 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 sert.(forge-db).repo)...........
58040 20 20 20 20 20 20 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 ...........(oset.repo.condition.
58060 3a 6b 6e 6f 77 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 70 :known)......................rep
58080 6f 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 28 6c 69 o))).......(pcase-exhaustive.(li
580a0 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 20 20 20 st.demand.condition.noerror)....
580c0 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 20 20 20 .....(`(nil.......,_............
580e0 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 60 28 3a .........,_)..repo).........(`(:
58100 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 20 20 20 tracked?.:tracked...............
58120 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 64 3f 20 ,_)..repo).........(`(:tracked?.
58140 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 6e 69 6c ,_.....................,_)...nil
58160 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 65 64 20 ).........(`(:tracked..:tracked.
58180 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 20 20 20 ..............,_)..repo)........
581a0 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 20 20 20 .(`(:tracked..,_................
581c0 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 72 61 63 ......t)...nil).........(`(:trac
581e0 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 6c 29 20 ked..,_....................nil).
58200 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 28 6f 72 ..err).........(`(:known?...,(or
58220 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 0a 20 20 .:tracked.:known)..,_)..repo)...
58240 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 20 20 20 ......(`(:known?...,_...........
58260 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 28 60 28 ..........,_)...nil).........(`(
58280 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 6e 29 20 :insert!..,(or.:tracked.:known).
582a0 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 74 21 20 .,_)..repo).........(`(:insert!.
582c0 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 69 6e .,_.....................,_)...in
582e0 73 29 0a 20 20 20 20 20 20 20 20 28 60 28 3a 73 74 75 62 3f 20 20 20 20 2c 5f 20 20 20 20 20 20 s).........(`(:stub?....,_......
58300 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 20 20 ...............,_)..repo).......
58320 20 20 28 60 28 3a 73 74 75 62 20 20 20 20 20 2c 5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..(`(:stub.....,_...............
58340 20 20 20 20 20 20 2c 5f 29 20 20 72 65 70 6f 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 ......,_)..repo)))))..(defun.for
58360 67 65 2d 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 3a 74 72 61 63 6b 65 64 3f 20 28 29 0a 20 ge--get-repository:tracked?.()..
58380 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?
583a0 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 67 65 74 2d 77 6f 72 6b 74 72 65 65 20 28 72 ))..(defun.forge-get-worktree.(r
583c0 65 70 6f 29 0a 20 20 22 56 61 6c 69 64 61 74 65 20 61 6e 64 20 72 65 74 75 72 6e 20 74 68 65 20 epo)..."Validate.and.return.the.
583e0 77 6f 72 6b 74 72 65 65 20 72 65 63 6f 72 64 65 64 20 66 6f 72 20 52 45 50 4f 2e 0a 49 66 20 6e worktree.recorded.for.REPO..If.n
58400 6f 20 77 6f 72 6b 74 72 65 65 20 69 73 20 72 65 63 6f 72 64 65 64 2c 20 72 65 74 75 72 6e 20 6e o.worktree.is.recorded,.return.n
58420 69 6c 2e 20 20 49 66 20 61 20 77 6f 72 6b 74 72 65 65 20 69 73 20 72 65 63 6f 72 64 65 64 20 62 il...If.a.worktree.is.recorded.b
58440 75 74 0a 74 68 61 74 20 64 6f 65 73 6e 27 74 20 65 78 69 73 74 20 61 6e 79 6d 6f 72 65 2c 20 74 ut.that.doesn't.exist.anymore,.t
58460 68 65 6e 20 64 69 73 63 61 72 64 20 74 68 65 20 72 65 63 6f 72 64 65 64 20 76 61 6c 75 65 20 61 hen.discard.the.recorded.value.a
58480 6e 64 20 72 65 74 75 72 6e 0a 6e 69 6c 2e 22 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 77 6f nd.return.nil."...(and-let*.((wo
584a0 72 6b 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 29 29 0a 20 20 rktree.(oref.repo.worktree)))...
584c0 20 20 28 69 66 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 77 6f 72 6b 74 72 65 65 ..(if.(file-directory-p.worktree
584e0 29 0a 20 20 20 20 20 20 20 20 77 6f 72 6b 74 72 65 65 0a 20 20 20 20 20 20 28 6f 73 65 74 20 72 ).........worktree.......(oset.r
58500 65 70 6f 20 77 6f 72 6b 74 72 65 65 20 6e 69 6c 29 0a 20 20 20 20 20 20 6e 69 6c 29 29 29 0a 0a epo.worktree.nil).......nil)))..
58520 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 72 65 ;;;;.Current..(defun.forge-curre
58540 6e 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 72 nt-repository.()..."Return.the.r
58560 65 70 6f 73 69 74 6f 72 79 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 62 65 69 6e 67 20 76 69 73 69 epository.at.point.or.being.visi
58580 74 65 64 2e 22 0a 20 20 28 6f 72 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 61 74 ted."...(or.(forge-repository-at
585a0 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 -point).......(forge-get-reposit
585c0 6f 72 79 20 3a 6b 6e 6f 77 6e 3f 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 70 ory.:known?)))..(defun.forge-rep
585e0 6f 73 69 74 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 ository-at-point.(&optional.dema
58600 6e 64 29 0a 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 nd)..."Return.the.repository.at.
58620 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 72 65 70 6f 73 point..If.there.is.no.such.repos
58640 69 74 6f 72 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 itory.and.DEMAND.is.non-nil,.the
58660 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 6d 61 67 69 74 n.signal.an.error."...(or.(magit
58680 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 29 0a 20 -section-value-if.'forge-repo)..
586a0 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 74 6f .....(and-let*.((topic.(forge-to
586c0 70 69 63 2d 61 74 2d 70 6f 69 6e 74 20 6e 69 6c 20 27 6e 6f 74 2d 74 68 69 6e 67 61 74 70 74 29 pic-at-point.nil.'not-thingatpt)
586e0 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 72 79 )).........(forge-get-repository
58700 20 74 6f 70 69 63 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 .topic)).......(and.(derived-mod
58720 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 29 e-p.'forge-repository-list-mode)
58740 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 69 64 20 28 74 61 62 75 ............(and-let*.((id.(tabu
58760 6c 61 74 65 64 2d 6c 69 73 74 2d 67 65 74 2d 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 lated-list-get-id)))............
58780 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 20 69 64 29 29 ..(forge-get-repository.:id.id))
587a0 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 72 6f 72 20 ).......(and.demand.(user-error.
587c0 22 4e 6f 20 72 65 70 6f 73 69 74 6f 72 79 20 61 74 20 70 6f 69 6e 74 22 29 29 29 29 0a 0a 3b 3b "No.repository.at.point"))))..;;
587e0 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 72 65 70 6f 73 20 ;;.List..(defun.forge--ls-repos.
58800 28 29 0a 20 20 28 6d 61 70 63 61 72 20 28 6c 65 74 20 28 28 64 62 20 28 66 6f 72 67 65 2d 64 62 ()...(mapcar.(let.((db.(forge-db
58820 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 6f 77 29 0a 20 20 ))).............(lambda.(row)...
58840 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 73 71 6c 2d 2d 72 65 6d 61 6b 65 2d 69 6e 73 74 ............(closql--remake-inst
58860 61 6e 63 65 20 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 20 64 62 20 72 6f 77 29 29 29 ance.'forge-repository.db.row)))
58880 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 74 20 2a ...........(forge-sql.[:select.*
588a0 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 20 20 20 .:from.repository...............
588c0 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 29 20 28 ........:order-by.[(asc.owner).(
588e0 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 2d 6c 73 asc.name)]])))..(defun.forge--ls
58900 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 6c 65 74 20 28 -owned-repos.()...(mapcar.(let.(
58920 28 64 62 20 28 66 6f 72 67 65 2d 64 62 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 (db.(forge-db))).............(la
58940 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 28 63 6c 6f 73 71 6c mbda.(row)...............(closql
58960 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 72 65 70 6f 73 69 74 --remake-instance.'forge-reposit
58980 6f 72 79 20 64 62 20 72 6f 77 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 73 ory.db.row)))...........(forge-s
589a0 71 6c 20 5b 3a 73 65 6c 65 63 74 20 2a 20 3a 66 72 6f 6d 20 72 65 70 6f 73 69 74 6f 72 79 0a 20 ql.[:select.*.:from.repository..
589c0 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 61 6e 64 .....................:where.(and
589e0 20 28 69 6e 20 6f 77 6e 65 72 20 24 76 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(in.owner.$v1).................
58a00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 69 6e 20 6e 61 6d 65 20 ..................(not.(in.name.
58a20 24 76 32 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 3a 6f 72 $v2))).......................:or
58a40 64 65 72 2d 62 79 20 5b 28 61 73 63 20 6f 77 6e 65 72 29 20 28 61 73 63 20 6e 61 6d 65 29 5d 5d der-by.[(asc.owner).(asc.name)]]
58a60 0a 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 74 20 28 ......................(vconcat.(
58a80 6d 61 70 63 61 72 20 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 mapcar.#'car.forge-owned-account
58aa0 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 76 63 6f 6e 63 61 s))......................(vconca
58ac0 74 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 69 67 6e 6f 72 65 64 29 29 29 29 0a 0a 3b 3b 3b 20 49 t.forge-owned-ignored))))..;;;.I
58ae0 64 65 6e 74 69 74 79 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 dentity..(defun.forge-repository
58b00 2d 65 71 75 61 6c 20 28 72 65 70 6f 31 20 72 65 70 6f 32 29 0a 20 20 22 52 65 74 75 72 6e 20 74 -equal.(repo1.repo2)..."Return.t
58b20 20 69 66 20 52 45 50 4f 31 20 61 6e 64 20 52 45 50 4f 32 20 61 72 65 20 74 68 65 20 73 61 6d 65 .if.REPO1.and.REPO2.are.the.same
58b40 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 52 45 50 4f 31 20 61 6e 64 2f 6f 72 20 52 45 50 4f 32 20 .repository..REPO1.and/or.REPO2.
58b60 6d 61 79 20 61 6c 73 6f 20 62 65 20 6e 69 6c 2c 20 69 6e 20 77 68 69 63 68 20 63 61 73 65 20 72 may.also.be.nil,.in.which.case.r
58b80 65 74 75 72 6e 20 6e 69 6c 2e 22 0a 20 20 28 61 6e 64 20 72 65 70 6f 31 20 72 65 70 6f 32 0a 20 eturn.nil."...(and.repo1.repo2..
58ba0 20 20 20 20 20 20 28 6f 72 20 28 65 71 75 61 6c 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f ......(or.(equal......(oref.repo
58bc0 31 20 69 64 29 20 20 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 32 20 69 64 29 29 0a 20 20 20 20 1.id)......(oref.repo2.id)).....
58be0 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 75 61 6c 20 28 6f 72 65 66 20 72 65 70 6f 31 20 67 .......(and.(equal.(oref.repo1.g
58c00 69 74 68 6f 73 74 29 20 28 6f 72 65 66 20 72 65 70 6f 32 20 67 69 74 68 6f 73 74 29 29 0a 20 20 ithost).(oref.repo2.githost))...
58c20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 75 61 6c 20 28 6f 72 65 66 20 72 65 70 6f 31 ..............(equal.(oref.repo1
58c40 20 6f 77 6e 65 72 29 20 20 20 28 6f 72 65 66 20 72 65 70 6f 32 20 6f 77 6e 65 72 29 29 0a 20 20 .owner)...(oref.repo2.owner))...
58c60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 75 61 6c 20 28 6f 72 65 66 20 72 65 70 6f 31 ..............(equal.(oref.repo1
58c80 20 6e 61 6d 65 29 20 20 20 20 28 6f 72 65 66 20 72 65 70 6f 32 20 6e 61 6d 65 29 29 29 29 29 29 .name)....(oref.repo2.name))))))
58ca0 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 74 6f 72 ..(cl-defmethod.forge--repositor
58cc0 79 2d 69 64 73 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 72 65 y-ids.((class.(subclass.forge-re
58ce0 70 6f 73 69 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 pository))......................
58d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 68 6f 73 74 20 6f 77 6e 65 72 20 6e 61 6d 65 20 ................host.owner.name.
58d20 26 6f 70 74 69 6f 6e 61 6c 20 73 74 75 62 29 0a 20 20 22 52 65 74 75 72 6e 20 28 4f 55 52 2d 49 &optional.stub)..."Return.(OUR-I
58d40 44 20 2e 20 54 48 45 49 52 2d 49 44 29 20 6f 66 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 72 D...THEIR-ID).of.the.specified.r
58d60 65 70 6f 73 69 74 6f 72 79 2e 0a 49 66 20 6f 70 74 69 6f 6e 61 6c 20 53 54 55 42 20 69 73 20 6e epository..If.optional.STUB.is.n
58d80 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 74 68 65 20 49 44 73 20 61 72 65 20 6e 6f 74 20 67 75 61 on-nil,.then.the.IDs.are.not.gua
58da0 72 61 6e 74 65 65 64 20 74 6f 0a 62 65 20 75 6e 69 71 75 65 2e 20 20 4f 74 68 65 72 77 69 73 65 ranteed.to.be.unique...Otherwise
58dc0 20 74 68 69 73 20 6d 65 74 68 6f 64 20 68 61 73 20 74 6f 20 6d 61 6b 65 20 61 6e 20 41 50 49 20 .this.method.has.to.make.an.API.
58de0 72 65 71 75 65 73 74 20 74 6f 0a 72 65 74 72 69 65 76 65 20 54 48 45 49 52 2d 49 44 2c 20 74 68 request.to.retrieve.THEIR-ID,.th
58e00 65 20 72 65 70 6f 73 69 74 6f 72 79 27 73 20 49 44 20 6f 6e 20 74 68 65 20 66 6f 72 67 65 2e 20 e.repository's.ID.on.the.forge..
58e20 20 49 6e 20 74 68 61 74 0a 63 61 73 65 20 4f 55 52 2d 49 44 20 64 65 72 69 76 65 73 20 66 72 6f .In.that.case.OUR-ID.derives.fro
58e40 6d 20 54 48 45 49 52 2d 49 44 20 61 6e 64 20 69 73 20 75 6e 69 71 75 65 20 61 63 72 6f 73 73 20 m.THEIR-ID.and.is.unique.across.
58e60 61 6c 6c 0a 66 6f 72 67 65 73 20 61 6e 64 20 68 6f 73 74 73 2e 22 0a 20 20 28 70 63 61 73 65 2d all.forges.and.hosts."...(pcase-
58e80 6c 65 74 2a 20 28 28 60 28 2c 5f 67 69 74 68 6f 73 74 20 2c 61 70 69 68 6f 73 74 20 2c 69 64 20 let*.((`(,_githost.,apihost.,id.
58ea0 2c 5f 63 6c 61 73 73 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 ,_class).................(forge-
58ec0 2d 67 65 74 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 -get-forge-host.host.t))........
58ee0 20 20 20 20 20 20 20 20 28 70 61 74 68 20 28 66 6f 72 6d 61 74 20 22 25 73 2f 25 73 22 20 6f 77 ........(path.(format."%s/%s".ow
58f00 6e 65 72 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 68 65 69 72 ner.name))................(their
58f20 2d 69 64 20 28 61 6e 64 20 28 6e 6f 74 20 73 74 75 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 -id.(and.(not.stub).............
58f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 68 75 62 2d 72 65 70 6f 73 69 74 6f ..................(ghub-reposito
58f60 72 79 2d 69 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 ry-id...........................
58f80 20 20 20 20 20 6f 77 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 .....owner.name.................
58fa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 6f 73 74 20 61 70 69 68 6f 73 74 0a 20 20 20 ...............:host.apihost....
58fc0 20 20 20 20 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 75 74 ............................:aut
58fe0 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 20 20 20 20 20 20 20 h.'forge........................
59000 20 20 20 20 20 20 20 20 3a 66 6f 72 67 65 20 28 66 6f 72 67 65 2d 2d 67 68 75 62 2d 74 79 70 65 ........:forge.(forge--ghub-type
59020 2d 73 79 6d 62 6f 6c 20 63 6c 61 73 73 29 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 73 20 28 62 61 -symbol.class))))).....(cons.(ba
59040 73 65 36 34 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 se64-encode-string............(f
59060 6f 72 6d 61 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 ormat."%s:%s".id................
59080 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 20 ....(cond.(stub.path)...........
590a0 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 27 66 6f 72 67 65 ...............((eq.class.'forge
590c0 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 20 20 20 -github-repository).............
590e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 69 73 20 69 73 20 62 61 73 65 36 34 20 ..............;;.This.is.base64.
59100 65 6e 63 6f 64 65 64 2c 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 0a 20 20 20 20 20 20 20 20 20 20 encoded,.according.to...........
59120 20 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 64 6f 63 73 2e ................;;.https://docs.
59140 67 69 74 68 75 62 2e 63 6f 6d 2f 65 6e 2f 67 72 61 70 68 71 6c 2f 72 65 66 65 72 65 6e 63 65 2f github.com/en/graphql/reference/
59160 73 63 61 6c 61 72 73 23 69 64 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 scalars#id......................
59180 20 20 20 20 20 20 3b 3b 20 55 6e 66 6f 72 74 75 6e 61 74 65 6c 79 20 74 68 61 74 20 69 73 20 6e ......;;.Unfortunately.that.is.n
591a0 6f 74 20 61 6c 77 61 79 73 20 74 72 75 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ot.always.true..................
591c0 20 20 20 20 20 20 20 20 20 20 3b 3b 20 45 2e 67 2e 2c 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 ..........;;.E.g.,.https://githu
591e0 62 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 b.com/dit7ya/roamex.............
59200 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 73 65 20 6e ...............(condition-case.n
59220 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 20 20 20 20 il..............................
59240 20 28 62 61 73 65 36 34 2d 64 65 63 6f 64 65 2d 73 74 72 69 6e 67 20 74 68 65 69 72 2d 69 64 29 .(base64-decode-string.their-id)
59260 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 28 65 72 .............................(er
59280 72 6f 72 20 74 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 ror.their-id))).................
592a0 20 20 20 20 20 20 20 20 20 28 74 20 74 68 65 69 72 2d 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 .........(t.their-id))).........
592c0 20 20 20 74 29 0a 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 ...t)...........(or.their-id.pat
592e0 68 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 72 65 70 6f h))))..(cl-defmethod.forge--repo
59300 73 69 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 sitory-ids.((_class.(subclass.fo
59320 72 67 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 rge-noapi-repository))..........
59340 20 20 20 20 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 ............................host
59360 20 6f 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 29 0a 20 20 28 .owner.name.&optional._stub)...(
59380 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 28 63 6f 6e 63 61 74 let.((their-id.(if.owner.(concat
593a0 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 20 20 20 20 28 63 6f .owner."/".name).name))).....(co
593c0 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 20 20 20 20 20 20 20 ns.(base64-encode-string........
593e0 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 20 20 20 20 20 ....(format."%s:%s".............
59400 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 2d 66 6f 72 67 65 2d .......(nth.3.(forge--get-forge-
59420 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 20 20 20 host.host.t))...................
59440 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 20 20 20 20 20 20 20 .their-id)............t)........
59460 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 0a 28 64 65 66 75 6e ...their-id)))..;;;.Read..(defun
59480 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 72 6f 6d 70 74 29 0a .forge-read-repository.(prompt).
594a0 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 6d 70 6c 65 74 69 6e ..(let.((choice.(magit-completin
594c0 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 72 6f 6d 70 74 0a 20 g-read..................prompt..
594e0 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 70 63 61 73 65 2d 6c ................(mapcar.(pcase-l
59500 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 6d 65 29 29 0a 20 20 ambda.(`(,host.,owner.,name))...
59520 20 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
59540 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 6f 73 74 29 29 0a 20 ."%s/%s.@%s".owner.name.host))..
59560 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 73 ........................(forge-s
59580 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 72 20 6e 61 6d 65 5d ql.[:select.[githost.owner.name]
595a0 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 ................................
595c0 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 0a 20 20 20 20 20 20 ......:from.repository])).......
595e0 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 20 20 20 20 20 20 20 ...........nil.t.nil.nil........
59600 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 64 65 66 61 75 6c 74 20 28 66 ..........(and-let*.((default.(f
59620 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 72 65 70 6f 73 69 74 6f 72 79 29 29 29 0a 20 20 20 20 20 orge-current-repository)))......
59640 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 2f 25 73 20 40 25 73 ..............(format."%s/%s.@%s
59660 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 28 6f 72 "............................(or
59680 65 66 20 64 65 66 61 75 6c 74 20 6f 77 6e 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ef.default.owner)...............
596a0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 64 65 66 61 75 6c 74 20 6e 61 6d 65 29 .............(oref.default.name)
596c0 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 6f 72 65 ............................(ore
596e0 66 20 64 65 66 61 75 6c 74 20 67 69 74 68 6f 73 74 29 29 29 29 29 29 0a 20 20 20 20 28 73 61 76 f.default.githost)))))).....(sav
59700 65 2d 6d 61 74 63 68 2d 64 61 74 61 0a 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d e-match-data.......(if.(string-m
59720 61 74 63 68 20 22 5c 5c 60 5c 5c 28 2e 2b 5c 5c 29 2f 5c 5c 28 5b 5e 2f 5d 2b 5c 5c 29 20 40 5c atch."\\`\\(.+\\)/\\([^/]+\\).@\
59740 5c 28 2e 2b 5c 5c 29 5c 5c 27 22 20 63 68 6f 69 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 \(.+\\)\\'".choice)...........(f
59760 6f 72 67 65 2d 67 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 28 6c 69 73 74 20 28 6d 61 74 63 68 orge-get-repository.(list.(match
59780 2d 73 74 72 69 6e 67 20 33 20 63 68 6f 69 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -string.3.choice)...............
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 28 6d 61 74 63 68 2d 73 ........................(match-s
597c0 74 72 69 6e 67 20 31 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 tring.1.choice).................
597e0 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 74 63 68 2d 73 74 72 ......................(match-str
59800 69 6e 67 20 32 20 63 68 6f 69 63 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 ing.2.choice))).........(error."
59820 42 55 47 22 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 61 64 2d 68 6f 73 BUG")))))..(defun.forge-read-hos
59840 74 20 28 70 72 6f 6d 70 74 20 26 6f 70 74 69 6f 6e 61 6c 20 63 6c 61 73 73 29 0a 20 20 28 6d 61 t.(prompt.&optional.class)...(ma
59860 67 69 74 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 0a 20 20 20 70 72 6f 6d 70 74 0a 20 20 git-completing-read....prompt...
59880 20 28 69 66 20 63 6c 61 73 73 0a 20 20 20 20 20 20 20 28 73 65 71 2d 6b 65 65 70 20 28 70 63 61 .(if.class........(seq-keep.(pca
598a0 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 67 69 74 68 6f 73 74 20 2c 5f 61 70 69 68 6f 73 74 20 se-lambda.(`(,githost.,_apihost.
598c0 2c 5f 77 65 62 68 6f 73 74 20 2c 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,_webhost.,c))..................
598e0 20 20 28 61 6e 64 20 28 63 68 69 6c 64 2d 6f 66 2d 63 6c 61 73 73 2d 70 20 63 20 63 6c 61 73 73 ..(and.(child-of-class-p.c.class
59900 29 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 20 66 6f 72 ).githost))..................for
59920 67 65 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 66 6f 72 ge-alist)......(mapcar.#'car.for
59940 67 65 2d 61 6c 69 73 74 29 29 0a 20 20 20 6e 69 6c 20 74 29 29 0a 0a 3b 3b 3b 20 4d 69 73 63 65 ge-alist))....nil.t))..;;;.Misce
59960 6c 6c 61 6e 65 6f 75 73 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 61 73 2d 67 69 74 68 6f llaneous..(defun.forge--as-githo
59980 73 74 20 28 68 6f 73 74 29 0a 20 20 28 6f 72 20 28 63 61 72 20 28 63 61 72 20 28 63 6c 2d 6d 65 st.(host)...(or.(car.(car.(cl-me
599a0 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
599c0 75 61 6c 20 3a 6b 65 79 20 23 27 63 61 72 29 29 29 0a 20 20 20 20 20 20 28 63 61 72 20 28 63 61 ual.:key.#'car))).......(car.(ca
599e0 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 74 r.(cl-member.host.forge-alist.:t
59a00 65 73 74 20 23 27 65 71 75 61 6c 20 3a 6b 65 79 20 23 27 63 61 64 72 29 29 29 0a 20 20 20 20 20 est.#'equal.:key.#'cadr)))......
59a20 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 74 20 66 6f 72 67 65 .(car.(car.(cl-member.host.forge
59a40 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 64 -alist.:test.#'equal.:key.#'cadd
59a60 72 29 29 29 0a 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 64 r))).......(user-error."Cannot.d
59a80 65 74 65 72 6d 69 6e 65 20 67 69 74 68 6f 73 74 20 66 6f 72 20 25 53 22 20 68 6f 73 74 29 29 29 etermine.githost.for.%S".host)))
59aa0 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 61 73 2d 61 70 69 68 6f 73 74 20 28 68 6f 73 74 ..(defun.forge--as-apihost.(host
59ac0 29 0a 20 20 28 6f 72 20 28 63 61 64 72 20 28 63 61 72 20 28 63 6c 2d 6d 65 6d 62 65 72 20 68 6f )...(or.(cadr.(car.(cl-member.ho
59ae0 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 6b 65 st.forge-alist.:test.#'equal.:ke
59b00 79 20 23 27 63 61 64 72 29 29 29 0a 20 20 20 20 20 20 28 63 61 64 72 20 28 63 61 72 20 28 63 6c y.#'cadr))).......(cadr.(car.(cl
59b20 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 23 -member.host.forge-alist.:test.#
59b40 27 65 71 75 61 6c 20 3a 6b 65 79 20 23 27 63 61 72 29 29 29 0a 20 20 20 20 20 20 28 63 61 64 72 'equal.:key.#'car))).......(cadr
59b60 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 2d 61 6c 69 73 .(car.(cl-member.host.forge-alis
59b80 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 64 72 29 29 29 0a t.:test.#'equal.:key.#'caddr))).
59ba0 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 64 65 74 65 72 6d ......(user-error."Cannot.determ
59bc0 69 6e 65 20 61 70 69 68 6f 73 74 20 66 6f 72 20 25 53 22 20 68 6f 73 74 29 29 29 0a 0a 28 63 6c ine.apihost.for.%S".host)))..(cl
59be0 2d 64 65 66 6d 65 74 68 6f 64 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 20 28 28 72 65 70 6f 20 -defmethod.forge--format.((repo.
59c00 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 66 6f 72 6d 61 74 2d 6f 72 2d 73 6c 6f 74 forge-repository).format-or-slot
59c20 20 26 6f 70 74 69 6f 6e 61 6c 20 73 70 65 63 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 .&optional.spec)...(pcase-let*.(
59c40 28 28 65 69 65 69 6f 20 28 66 6f 72 67 65 20 77 65 62 68 6f 73 74 29 20 6f 77 6e 65 72 20 6e 61 ((eieio.(forge.webhost).owner.na
59c60 6d 65 29 20 72 65 70 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 74 68 20 28 me).repo)................(path.(
59c80 69 66 20 6f 77 6e 65 72 20 28 63 6f 6e 63 61 74 20 6f 77 6e 65 72 20 22 2f 22 20 6e 61 6d 65 29 if.owner.(concat.owner."/".name)
59ca0 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 2d 73 70 65 63 0a 20 20 20 20 20 28 .name))).....(format-spec......(
59cc0 6c 65 74 20 28 28 66 6f 72 6d 61 74 20 28 69 66 20 28 73 79 6d 62 6f 6c 70 20 66 6f 72 6d 61 74 let.((format.(if.(symbolp.format
59ce0 2d 6f 72 2d 73 6c 6f 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 -or-slot).......................
59d00 20 28 65 69 65 69 6f 2d 6f 72 65 66 20 72 65 70 6f 20 66 6f 72 6d 61 74 2d 6f 72 2d 73 6c 6f 74 .(eieio-oref.repo.format-or-slot
59d20 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 6d 61 74 2d 6f 72 )......................format-or
59d40 2d 73 6c 6f 74 29 29 29 0a 20 20 20 20 20 20 20 28 69 66 20 28 6d 65 6d 62 65 72 20 77 65 62 68 -slot)))........(if.(member.webh
59d60 6f 73 74 20 67 68 75 62 2d 69 6e 73 65 63 75 72 65 2d 68 6f 73 74 73 29 0a 20 20 20 20 20 20 20 ost.ghub-insecure-hosts)........
59d80 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 20 22 5c ....(replace-regexp-in-string."\
59da0 5c 60 68 74 74 70 73 3a 2f 2f 22 20 22 68 74 74 70 3a 2f 2f 22 20 66 6f 72 6d 61 74 20 74 20 74 \`https://"."http://".format.t.t
59dc0 29 0a 20 20 20 20 20 20 20 20 20 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 60 28 2c 40 73 70 65 )..........format))......`(,@spe
59de0 63 0a 20 20 20 20 20 20 20 28 3f 68 20 2e 20 2c 77 65 62 68 6f 73 74 29 0a 20 20 20 20 20 20 20 c........(?h...,webhost)........
59e00 28 3f 6f 20 2e 20 2c 6f 77 6e 65 72 29 0a 20 20 20 20 20 20 20 28 3f 6e 20 2e 20 2c 6e 61 6d 65 (?o...,owner)........(?n...,name
59e20 29 0a 20 20 20 20 20 20 20 28 3f 70 20 2e 20 2c 70 61 74 68 29 0a 20 20 20 20 20 20 20 28 3f 50 )........(?p...,path)........(?P
59e40 20 2e 20 2c 28 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 20 22 2f 22 20 22 25 32 46 22 20 70 61 ...,(string-replace."/"."%2F".pa
59e60 74 68 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 73 65 74 2d 66 69 65 6c th))))))..(defun.forge--set-fiel
59e80 64 2d 63 61 6c 6c 62 61 63 6b 20 28 74 6f 70 69 63 29 0a 20 20 28 6c 65 74 20 28 28 62 75 66 20 d-callback.(topic)...(let.((buf.
59ea0 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 6c 61 6d 62 64 61 20 28 (current-buffer))).....(lambda.(
59ec0 26 72 65 73 74 20 5f 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 &rest._).......(with-current-buf
59ee0 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 fer...........(if.(buffer-live-p
59f00 20 62 75 66 29 20 62 75 66 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 .buf).buf.(current-buffer)).....
59f20 20 20 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 2d 74 6f 70 69 63 0a 20 20 20 20 20 20 20 20 20 ....(forge--pull-topic..........
59f40 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 20 20 (forge-get-repository.topic)....
59f60 20 20 20 20 20 20 74 6f 70 69 63 0a 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 62 61 63 6b 20 28 ......topic..........:callback.(
59f80 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 20 28 lambda.()......................(
59fa0 77 69 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 20 20 with-current-buffer.............
59fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 .............(if.(buffer-live-p.
59fe0 62 75 66 29 20 62 75 66 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 buf).buf.(current-buffer))......
5a000 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 66 72 65 73 68 ..................(forge-refresh
5a020 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 20 20 20 20 -buffer)........................
5a040 28 77 68 65 6e 20 28 61 6e 64 20 74 72 61 6e 73 69 65 6e 74 2d 2d 73 68 6f 77 70 0a 20 20 20 20 (when.(and.transient--showp.....
5a060 20 20 20 20 20 20 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
5a080 65 6d 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 0a 20 20 emq.transient-current-command...
5a0a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5a0c0 20 20 20 20 20 20 27 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 0a 20 20 20 20 20 20 20 ......'(forge-topic-menu........
5a0e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5a100 20 20 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 0a 20 20 20 20 20 20 20 20 20 20 20 ...forge-topics-menu............
5a120 20 20 20 20 20 20 20 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
5a140 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 29 0a 20 20 20 20 20 orge-notifications-menu)))......
5a160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 2d ....................(transient--
5a180 72 65 66 72 65 73 68 2d 74 72 61 6e 73 69 65 6e 74 29 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 refresh-transient)))))))))..(def
5a1a0 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 72 20 6e 69 6c 29 var.forge--mode-line-buffer.nil)
5a1c0 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 65 63 68 6f 20 64 ..(defun.forge--msg.(repo.echo.d
5a1e0 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 6c 65 74 20 28 28 one.format.&rest.args)...(let.((
5a200 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 20 61 72 67 73 29 msg.(apply.#'format.format.args)
5a220 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 65 74 71 20 6d 73 )).....(when.repo.......(setq.ms
5a240 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 20 20 20 20 20 20 g.(string-replace...............
5a260 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 20 28 63 6f 6e 63 ..."REPO"..................(conc
5a280 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 6f 72 65 66 20 72 at.(oref.repo.owner)."/".(oref.r
5a2a0 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 20 20 6d 73 67 29 epo.name))..................msg)
5a2c0 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 29 0a 20 20 20 20 )).....(when.(and.echo.msg).....
5a2e0 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 64 6f 6e 65 20 22 ..(message."%s%s".msg.(if.done."
5a300 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 6e 20 28 62 75 66 ...done"."..."))).....(when.(buf
5a320 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 65 2d 62 75 66 66 fer-live-p.forge--mode-line-buff
5a340 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 66 66 65 72 20 66 er).......(with-current-buffer.f
5a360 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 20 20 20 20 20 28 orge--mode-line-buffer.........(
5a380 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 20 20 20 20 20 20 setq.mode-line-process..........
5a3a0 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 20 20 20 20 20 20 .....(if.done...................
5a3c0 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 74 20 22 20 22 20 nil.................(concat.".".
5a3e0 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 2d 66 61 63 65 0a (propertize.msg.'font-lock-face.
5a400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5a420 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 72 6f 63 65 73 73 ........'magit-mode-line-process
5a440 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 6e 65 2d 75 70 64 ))))).......(force-mode-line-upd
5a460 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 68 75 62 2d 2d 68 ate.t))))..(cl-defmethod.ghub--h
5a480 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 79 29 29 0a 20 20 ost.((repo.forge-repository))...
5a4a0 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 65 2d 2d 67 68 75 (cl-call-next-method.(forge--ghu
5a4c0 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 74 2d 63 6c 61 73 b-type-symbol.(eieio-object-clas
5a4e0 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 67 68 75 62 2d 2d s.repo))))..(cl-defmethod.ghub--
5a500 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 73 69 74 6f 72 79 username.((repo.forge-repository
5a520 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 6f 72 79 20 64 65 ))...(let.((default-directory.de
5a540 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 65 73 73 20 28 66 fault-directory)).....(unless.(f
5a560 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 67 65 2d 67 65 74 orge-repository-equal.(forge-get
5a580 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 20 20 20 20 20 20 -repository.:stub?).repo).......
5a5a0 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 65 2d 67 65 74 2d (when-let.((worktree.(forge-get-
5a5c0 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 73 65 74 71 20 64 worktree.repo))).........(setq.d
5a5e0 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 29 29 0a 20 20 20 efault-directory.worktree)))....
5a600 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 66 20 72 65 70 6f .(cl-call-next-method.(oref.repo
5a620 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 20 20 20 20 20 20 .apihost).......................
5a640 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 6c 20 28 65 69 65 ...(forge--ghub-type-symbol.(eie
5a660 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 0a 28 64 65 66 75 io-object-class.repo)))))..(defu
5a680 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 28 63 6c 61 73 73 n.forge--ghub-type-symbol.(class
5a6a0 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 73 0a 20 20 20 20 )...(pcase-exhaustive.class.....
5a6c0 3b 3b 20 54 68 69 73 20 70 61 63 6b 61 67 65 20 64 6f 65 73 20 6e 6f 74 20 64 65 66 69 6e 65 20 ;;.This.package.does.not.define.
5a6e0 61 20 60 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 68 74 74 70 2d 72 65 70 6f 73 69 74 6f 72 79 27 a.`forge-gitlab-http-repository'
5a700 0a 20 20 20 20 3b 3b 20 63 6c 61 73 73 2c 20 62 75 74 20 77 65 20 75 73 65 64 20 74 6f 20 73 75 .....;;.class,.but.we.used.to.su
5a720 67 67 65 73 74 20 61 74 20 23 39 20 74 68 61 74 20 75 73 65 72 73 20 64 65 66 69 6e 65 20 73 75 ggest.at.#9.that.users.define.su
5a740 63 68 20 61 20 63 6c 61 73 73 0a 20 20 20 20 3b 3b 20 69 66 20 74 68 65 79 20 6d 75 73 74 20 63 ch.a.class.....;;.if.they.must.c
5a760 6f 6e 6e 65 63 74 20 74 6f 20 61 20 47 69 74 6c 61 62 20 69 6e 73 74 61 6e 63 65 20 74 68 61 74 onnect.to.a.Gitlab.instance.that
5a780 20 75 73 65 73 20 68 74 74 70 20 69 6e 73 74 65 61 64 0a 20 20 20 20 3b 3b 20 6f 66 20 68 74 74 .uses.http.instead.....;;.of.htt
5a7a0 70 73 2e 20 20 44 6f 69 6e 67 20 74 68 61 74 20 69 73 6e 27 74 20 6e 65 63 65 73 73 61 72 79 20 ps...Doing.that.isn't.necessary.
5a7c0 61 6e 79 6d 6f 72 65 2c 20 62 75 74 20 77 65 20 68 61 76 65 20 74 6f 20 6b 65 65 70 0a 20 20 20 anymore,.but.we.have.to.keep....
5a7e0 20 3b 3b 20 73 75 70 70 6f 72 74 69 6e 67 20 69 74 20 68 65 72 65 2e 20 20 49 74 20 69 73 20 6e .;;.supporting.it.here...It.is.n
5a800 6f 77 20 73 75 66 66 69 63 69 65 6e 74 20 74 6f 20 61 64 64 20 61 6e 20 65 6e 74 72 79 20 74 6f ow.sufficient.to.add.an.entry.to
5a820 0a 20 20 20 20 3b 3b 20 60 67 68 75 62 2d 69 6e 73 65 63 75 72 65 2d 68 6f 73 74 73 27 2e 0a 20 .....;;.`ghub-insecure-hosts'...
5a840 20 20 20 28 28 6f 72 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 ...((or.'forge-gitlab-repository
5a860 20 27 66 6f 72 67 65 2d 67 69 74 6c 61 62 2d 68 74 74 70 2d 72 65 70 6f 73 69 74 6f 72 79 29 20 .'forge-gitlab-http-repository).
5a880 27 67 69 74 6c 61 62 29 0a 20 20 20 20 28 27 66 6f 72 67 65 2d 67 69 74 68 75 62 2d 72 65 70 6f 'gitlab).....('forge-github-repo
5a8a0 73 69 74 6f 72 79 20 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 sitory....'github).....('forge-g
5a8c0 69 74 65 61 2d 72 65 70 6f 73 69 74 6f 72 79 20 20 20 20 20 27 67 69 74 65 61 29 0a 20 20 20 20 itea-repository.....'gitea).....
5a8e0 28 27 66 6f 72 67 65 2d 67 6f 67 73 2d 72 65 70 6f 73 69 74 6f 72 79 20 20 20 20 20 20 27 67 6f ('forge-gogs-repository......'go
5a900 67 73 29 0a 20 20 20 20 28 27 66 6f 72 67 65 2d 62 69 74 62 75 63 6b 65 74 2d 72 65 70 6f 73 69 gs).....('forge-bitbucket-reposi
5a920 74 6f 72 79 20 27 62 69 74 62 75 63 6b 65 74 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 28 70 72 6f 76 69 tory.'bitbucket)))..;;;._.(provi
5a940 64 65 20 27 66 6f 72 67 65 2d 72 65 70 6f 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 72 65 70 6f 2e 65 de.'forge-repo).;;;.forge-repo.e
5a960 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 00 00 l.ends.here.....................
5a980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5a9a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5a9c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5a9e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5aa00 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 64 69 72 00 00 00 00 00 00 00 00 00 forge-20240405.1509/dir.........
5aa20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5aa40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5aa60 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
5aa80 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 31 00 20 30 00 00 00 0001142.00000000000.012611..0...
5aaa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5aac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5aae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ab00 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...................
5ab20 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...................
5ab40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ab60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ab80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5aba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5abc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5abe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ac00 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
5ac20 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
5ac40 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
5ac60 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
5ac80 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
5aca0 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
5acc0 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
5ace0 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
5ad00 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
5ad20 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
5ad40 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,.
5ad60 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
5ad80 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
5ada0 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
5adc0 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.
5ade0 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
5ae00 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
5ae20 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)............
5ae40 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
5ae60 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 ................................
5ae80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5aea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5aec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5aee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5af00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5af20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5af40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5af60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5af80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5afa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5afc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5afe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b000 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 6c 69 73 74 2e 65 forge-20240405.1509/forge-list.e
5b020 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...............................
5b040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b060 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
5b080 30 30 36 37 34 34 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 35 32 35 00 20 30 00 00 00 0067443.00000000000.014525..0...
5b0a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b0c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b0e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b100 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...................
5b120 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...................
5b140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b1a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b1c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b1e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b200 3b 3b 3b 20 66 6f 72 67 65 2d 6c 69 73 74 2e 65 6c 20 2d 2d 2d 20 54 61 62 75 6c 61 74 65 64 2d ;;;.forge-list.el.---.Tabulated-
5b220 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 69 6e 64 list.interface..-*-.lexical-bind
5b240 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
5b260 2d 32 30 32 34 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 -2024.Jonas.Bernoulli..;;.Author
5b280 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
5b2a0 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
5b2c0 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-
5b2e0 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
5b300 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
5b320 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
5b340 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
5b360 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
5b380 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
5b3a0 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
5b3c0 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
5b3e0 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..;
5b400 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
5b420 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
5b440 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
5b460 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
5b480 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
5b4a0 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
5b4c0 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
5b4e0 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
5b500 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
5b520 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.;;.
5b540 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
5b560 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
5b580 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 68 6c 2d 6c 69 6e />...;;;.Code:..(require.'hl-lin
5b5a0 65 29 0a 28 72 65 71 75 69 72 65 20 27 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 29 0a 0a 28 72 e).(require.'tabulated-list)..(r
5b5c0 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 6f 72 67 65 2d 74 equire.'forge).(require.'forge-t
5b5e0 6f 70 69 63 29 0a 0a 28 64 65 66 76 61 72 20 78 2d 73 74 72 65 74 63 68 2d 63 75 72 73 6f 72 29 opic)..(defvar.x-stretch-cursor)
5b600 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 6f 72 67 65 2d ..;;;.Options..(defcustom.forge-
5b620 74 6f 70 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 27 28 68 6c 2d 6c 69 6e 65 2d 6d topic-list-mode-hook.'(hl-line-m
5b640 6f 64 65 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 20 ode)..."Hook.run.after.entering.
5b660 46 6f 72 67 65 2d 54 6f 70 69 63 2d 4c 69 73 74 20 6d 6f 64 65 2e 22 0a 20 20 3a 70 61 63 6b 61 Forge-Topic-List.mode."...:packa
5b680 67 65 2d 76 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 ge-version.'(forge..."0.1.0")...
5b6a0 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
5b6c0 70 74 69 6f 6e 73 20 27 28 68 6c 2d 6c 69 6e 65 2d 6d 6f 64 65 29 29 0a 0a 28 64 65 66 63 75 73 ptions.'(hl-line-mode))..(defcus
5b6e0 74 6f 6d 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 2d 68 tom.forge-repository-list-mode-h
5b700 6f 6f 6b 20 27 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 ook.'(hl-line-mode)..."Hook.run.
5b720 61 66 74 65 72 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 after.entering.Forge-Repository-
5b740 4c 69 73 74 20 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 List.mode."...:package-version.'
5b760 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 67 (forge..."0.4.0")...:group.'forg
5b780 65 0a 20 20 3a 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 e...:type.'hook...:options.'(hl-
5b7a0 6c 69 6e 65 2d 6d 6f 64 65 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 66 6f 72 67 65 2d 2d 74 61 line-mode))..(defconst.forge--ta
5b7c0 62 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 2d 74 79 70 65 0a 20 20 27 28 72 65 70 65 61 74 0a 20 20 blist-columns-type...'(repeat...
5b7e0 20 20 28 6c 69 73 74 20 3a 74 61 67 20 22 43 6f 6c 75 6d 6e 22 0a 20 20 20 20 20 20 20 20 20 20 ..(list.:tag."Column"...........
5b800 28 73 74 72 69 6e 67 20 20 3a 74 61 67 20 22 48 65 61 64 65 72 20 4c 61 62 65 6c 22 29 0a 20 20 (string..:tag."Header.Label")...
5b820 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 20 20 3a 74 61 67 20 22 56 61 6c 75 65 20 73 6f 75 ........(choice..:tag."Value.sou
5b840 72 63 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 75 6e 63 74 69 6f 6e rce"....................function
5b860 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 6f 6c 20 3a 74 61 67 ....................(symbol.:tag
5b880 20 22 4f 62 6a 65 63 74 20 73 6c 6f 74 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 ."Object.slot"))...........(inte
5b8a0 67 65 72 20 3a 74 61 67 20 22 43 6f 6c 75 6d 6e 20 57 69 64 74 68 22 29 0a 20 20 20 20 20 20 20 ger.:tag."Column.Width")........
5b8c0 20 20 20 28 63 68 6f 69 63 65 20 20 3a 74 61 67 20 22 53 6f 72 74 20 70 72 65 64 69 63 61 74 65 ...(choice..:tag."Sort.predicate
5b8e0 22 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 61 67 "....................(const.:tag
5b900 20 22 44 6f 6e 27 74 20 73 6f 72 74 22 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ."Don't.sort".nil)..............
5b920 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 44 65 66 61 75 6c 74 22 20 74 29 0a 20 ......(const.:tag."Default".t)..
5b940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 ..................function).....
5b960 20 20 20 20 20 20 28 70 6c 69 73 74 20 20 20 3a 74 61 67 20 22 50 72 6f 70 65 72 74 69 65 73 22 ......(plist...:tag."Properties"
5b980 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 65 79 2d 74 79 70 65 20 28 63 ....................:key-type.(c
5b9a0 68 6f 69 63 65 20 3a 74 61 67 20 22 50 72 6f 70 65 72 74 79 22 0a 20 20 20 20 20 20 20 20 20 20 hoice.:tag."Property"...........
5b9c0 20 20 20 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 ...........................(cons
5b9e0 74 20 3a 72 69 67 68 74 2d 61 6c 69 67 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.:right-align).................
5ba00 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 3a 70 61 64 .....................(const.:pad
5ba20 2d 72 69 67 68 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 -right).........................
5ba40 20 20 20 20 20 20 20 20 20 20 20 20 20 73 79 6d 62 6f 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 .............symbol)............
5ba60 20 20 20 20 20 20 20 20 3a 76 61 6c 75 65 2d 74 79 70 65 20 28 73 65 78 70 20 3a 74 61 67 20 22 ........:value-type.(sexp.:tag."
5ba80 56 61 6c 75 65 22 29 29 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 74 6f Value")))))..(defcustom.forge-to
5baa0 70 69 63 2d 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 0a 20 20 27 28 28 22 23 22 20 20 20 20 20 66 6f pic-list-columns...'(("#".....fo
5bac0 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 73 6c 75 67 20 20 20 20 20 20 20 20 20 20 rge--format-topic-slug..........
5bae0 35 20 6e 69 6c 20 6e 69 6c 29 0a 20 20 20 20 28 22 54 69 74 6c 65 22 20 66 6f 72 67 65 2d 2d 66 5.nil.nil).....("Title".forge--f
5bb00 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 74 69 74 6c 65 2b 6c 61 62 65 6c 73 20 33 35 20 6e 69 6c 20 ormat-topic-title+labels.35.nil.
5bb20 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 70 6c 61 79 nil))..."List.of.columns.display
5bb40 65 64 20 77 68 65 6e 20 6c 69 73 74 69 6e 67 20 74 6f 70 69 63 73 20 66 6f 72 20 61 20 73 69 6e ed.when.listing.topics.for.a.sin
5bb60 67 6c 65 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 0a 45 61 63 68 20 65 6c 65 6d 65 6e 74 20 68 61 gle.repository...Each.element.ha
5bb80 73 20 74 68 65 20 66 6f 72 6d 20 28 48 45 41 44 45 52 20 53 4f 55 52 43 45 20 57 49 44 54 48 20 s.the.form.(HEADER.SOURCE.WIDTH.
5bba0 53 4f 52 54 20 50 52 4f 50 53 29 2e 0a 0a 48 45 41 44 45 52 20 69 73 20 74 68 65 20 73 74 72 69 SORT.PROPS)...HEADER.is.the.stri
5bbc0 6e 67 20 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 ng.displayed.in.the.header...WID
5bbe0 54 48 20 69 73 20 74 68 65 20 77 69 64 74 68 0a 6f 66 20 74 68 65 20 63 6f 6c 75 6d 6e 2e 20 20 TH.is.the.width.of.the.column...
5bc00 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 65 2c SOURCE.is.used.to.get.the.value,
5bc20 20 69 74 20 68 61 73 20 74 6f 20 62 65 20 74 68 65 0a 6e 61 6d 65 20 6f 66 20 61 20 73 6c 6f 74 .it.has.to.be.the.name.of.a.slot
5bc40 20 6f 66 20 60 66 6f 72 67 65 2d 74 6f 70 69 63 27 20 6f 72 20 61 20 66 75 6e 63 74 69 6f 6e 20 .of.`forge-topic'.or.a.function.
5bc60 74 68 61 74 20 74 61 6b 65 73 20 73 75 63 68 20 61 6e 0a 6f 62 6a 65 63 74 20 61 73 20 61 72 67 that.takes.such.an.object.as.arg
5bc80 75 6d 65 6e 74 2e 20 20 53 4f 52 54 20 69 73 20 61 20 62 6f 6f 6c 65 61 6e 20 6f 72 20 61 20 66 ument...SORT.is.a.boolean.or.a.f
5bca0 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 6f 20 73 6f 72 74 0a 62 79 20 74 68 69 73 20 63 6f 6c unction.used.to.sort.by.this.col
5bcc0 75 6d 6e 2e 20 20 53 75 70 70 6f 72 74 65 64 20 50 52 4f 50 53 20 69 6e 63 6c 75 64 65 20 60 3a umn...Supported.PROPS.include.`:
5bce0 72 69 67 68 74 2d 61 6c 69 67 6e 27 20 61 6e 64 0a 60 3a 70 61 64 2d 72 69 67 68 74 27 2e 22 0a right-align'.and.`:pad-right'.".
5bd00 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.
5bd20 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 20 66 6f 4.0")...:group.'forge...:type.fo
5bd40 72 67 65 2d 2d 74 61 62 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 2d 74 79 70 65 29 0a 0a 28 64 65 66 rge--tablist-columns-type)..(def
5bd60 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 67 6c 6f 62 61 6c 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 custom.forge-global-topic-list-c
5bd80 6f 6c 75 6d 6e 73 0a 20 20 27 28 28 22 4f 77 6e 65 72 22 20 28 72 65 70 6f 73 69 74 6f 72 79 20 olumns...'(("Owner".(repository.
5bda0 6f 77 6e 65 72 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 35 20 6e 69 6c 20 6e 69 6c 29 owner)...............15.nil.nil)
5bdc0 0a 20 20 20 20 28 22 4e 61 6d 65 22 20 20 28 72 65 70 6f 73 69 74 6f 72 79 20 6e 61 6d 65 29 20 .....("Name"..(repository.name).
5bde0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 30 20 6e 69 6c 20 6e 69 6c 29 0a 20 20 20 20 28 ...............20.nil.nil).....(
5be00 22 23 22 20 20 20 20 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 "#".....forge--format-topic-slug
5be20 20 20 20 20 20 20 20 20 20 20 35 20 6e 69 6c 20 6e 69 6c 29 0a 20 20 20 20 28 22 54 69 74 6c 65 ..........5.nil.nil).....("Title
5be40 22 20 66 6f 72 67 65 2d 2d 66 6f 72 6d 61 74 2d 74 6f 70 69 63 2d 74 69 74 6c 65 2b 6c 61 62 65 ".forge--format-topic-title+labe
5be60 6c 73 20 33 35 20 6e 69 6c 20 6e 69 6c 29 29 0a 20 20 22 4c 69 73 74 20 6f 66 20 63 6f 6c 75 6d ls.35.nil.nil))..."List.of.colum
5be80 6e 73 20 64 69 73 70 6c 61 79 65 64 20 77 68 65 6e 20 6c 69 73 74 69 6e 67 20 74 6f 70 69 63 73 ns.displayed.when.listing.topics
5bea0 20 66 6f 72 20 61 6c 6c 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 0a 0a 45 61 63 68 20 65 6c 65 .for.all.repositories...Each.ele
5bec0 6d 65 6e 74 20 68 61 73 20 74 68 65 20 66 6f 72 6d 20 28 48 45 41 44 45 52 20 53 4f 55 52 43 45 ment.has.the.form.(HEADER.SOURCE
5bee0 20 57 49 44 54 48 20 53 4f 52 54 20 50 52 4f 50 53 29 2e 0a 0a 48 45 41 44 45 52 20 69 73 20 74 .WIDTH.SORT.PROPS)...HEADER.is.t
5bf00 68 65 20 73 74 72 69 6e 67 20 64 69 73 70 6c 61 79 65 64 20 69 6e 20 74 68 65 20 68 65 61 64 65 he.string.displayed.in.the.heade
5bf20 72 2e 20 20 57 49 44 54 48 20 69 73 20 74 68 65 20 77 69 64 74 68 0a 6f 66 20 74 68 65 20 63 6f r...WIDTH.is.the.width.of.the.co
5bf40 6c 75 6d 6e 2e 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 lumn...SOURCE.is.used.to.get.the
5bf60 20 76 61 6c 75 65 2c 20 69 74 20 68 61 73 20 74 6f 20 62 65 20 74 68 65 0a 6e 61 6d 65 20 6f 66 .value,.it.has.to.be.the.name.of
5bf80 20 61 20 73 6c 6f 74 20 6f 66 20 60 66 6f 72 67 65 2d 74 6f 70 69 63 27 20 6f 72 20 61 20 66 75 .a.slot.of.`forge-topic'.or.a.fu
5bfa0 6e 63 74 69 6f 6e 20 74 68 61 74 20 74 61 6b 65 73 20 73 75 63 68 20 61 6e 0a 6f 62 6a 65 63 74 nction.that.takes.such.an.object
5bfc0 20 61 73 20 61 72 67 75 6d 65 6e 74 2e 20 20 53 4f 52 54 20 69 73 20 61 20 62 6f 6f 6c 65 61 6e .as.argument...SORT.is.a.boolean
5bfe0 20 6f 72 20 61 20 66 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 6f 20 73 6f 72 74 0a 62 79 20 74 .or.a.function.used.to.sort.by.t
5c000 68 69 73 20 63 6f 6c 75 6d 6e 2e 20 20 53 75 70 70 6f 72 74 65 64 20 50 52 4f 50 53 20 69 6e 63 his.column...Supported.PROPS.inc
5c020 6c 75 64 65 20 60 3a 72 69 67 68 74 2d 61 6c 69 67 6e 27 20 61 6e 64 0a 60 3a 70 61 64 2d 72 69 lude.`:right-align'.and.`:pad-ri
5c040 67 68 74 27 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 ght'."...:package-version.'(forg
5c060 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...:
5c080 74 79 70 65 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 79 70 65 type.forge--tablist-columns-type
5c0a0 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 6f 72 79 2d 6c )..(defcustom.forge-repository-l
5c0c0 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 20 6f 77 6e 65 ist-columns...'(("Owner"....owne
5c0e0 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 20 20 74 20 6e r.......................20...t.n
5c100 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 20 20 20 20 20 il).....("Name".....name........
5c120 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 0a 20 20 20 20 ................20...t.nil).....
5c140 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 70 6f 2d 63 6f ("T"........forge-format-repo-co
5c160 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 22 20 20 20 20 ndition..1...t.nil).....("S"....
5c180 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 74 69 76 65 20 ....forge-format-repo-selective.
5c1a0 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 20 77 6f 72 6b .1...t.nil).....("Worktree".work
5c1c0 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 20 20 74 20 6e tree....................99...t.n
5c1e0 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 70 6c 61 79 65 il))..."List.of.columns.displaye
5c200 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 2e 0a 0a 45 61 d.when.listing.repositories...Ea
5c220 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 41 44 45 52 20 ch.element.has.the.form.(HEADER.
5c240 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 48 45 41 44 45 SOURCE.WIDTH.SORT.PROPS)...HEADE
5c260 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 6e 20 74 68 65 R.is.the.string.displayed.in.the
5c280 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 68 0a 6f 66 20 .header...WIDTH.is.the.width.of.
5c2a0 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 20 74 6f 20 67 the.column...SOURCE.is.used.to.g
5c2c0 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 74 68 65 0a 6e et.the.value,.it.has.to.be.the.n
5c2e0 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 6f 73 69 74 6f ame.of.a.slot.of.`forge-reposito
5c300 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 73 0a 73 75 63 ry'.or.a.function.that.takes.suc
5c320 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 4f 52 54 20 69 h.an.object.as.argument...SORT.i
5c340 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 64 0a 74 s.a.boolean.or.a.function.used.t
5c360 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 70 6f 72 74 65 o.sort.by.this.column...Supporte
5c380 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 67 6e 27 0a 61 d.PROPS.include.`:right-align'.a
5c3a0 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 65 2d 76 65 72 nd.`:pad-right'."...:package-ver
5c3c0 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 67 72 6f 75 70 sion.'(forge..."0.4.0")...:group
5c3e0 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 69 73 74 2d 63 .'forge...:type.forge--tablist-c
5c400 6f 6c 75 6d 6e 73 2d 74 79 70 65 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 66 6f 72 67 65 2d 6f olumns-type)..(defcustom.forge-o
5c420 77 6e 65 64 2d 61 63 63 6f 75 6e 74 73 20 6e 69 6c 0a 20 20 22 41 6e 20 61 6c 69 73 74 20 6f 66 wned-accounts.nil..."An.alist.of
5c440 20 61 63 63 6f 75 6e 74 73 20 74 68 61 74 20 61 72 65 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 2e .accounts.that.are.owned.by.you.
5c460 0a 54 68 69 73 20 73 68 6f 75 6c 64 20 69 6e 63 6c 75 64 65 20 79 6f 75 72 20 75 73 65 72 6e 61 .This.should.include.your.userna
5c480 6d 65 20 61 73 20 77 65 6c 6c 20 61 73 20 61 6e 79 20 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 0a 74 me.as.well.as.any.organization.t
5c4a0 68 61 74 20 79 6f 75 20 6f 77 6e 2e 20 20 55 73 65 64 20 62 79 20 74 68 65 20 63 6f 6d 6d 61 6e hat.you.own...Used.by.the.comman
5c4c0 64 73 20 60 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 27 2c 0a 60 66 ds.`forge-list-owned-issues',.`f
5c4e0 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 70 75 6c 6c 72 65 71 73 27 20 61 6e 64 20 60 66 orge-list-owned-pullreqs'.and.`f
5c500 6f 72 67 65 2d 66 6f 72 6b 27 2e 0a 0a 45 61 63 68 20 65 6c 65 6d 65 6e 74 20 68 61 73 20 74 68 orge-fork'...Each.element.has.th
5c520 65 20 66 6f 72 6d 20 28 41 43 43 4f 55 4e 54 20 2e 20 50 4c 49 53 54 29 2e 20 20 54 68 65 20 66 e.form.(ACCOUNT...PLIST)...The.f
5c540 6f 6c 6c 6f 77 69 6e 67 0a 70 72 6f 70 65 72 74 69 65 73 20 61 72 65 20 63 75 72 72 65 6e 74 6c ollowing.properties.are.currentl
5c560 79 20 62 65 69 6e 67 20 75 73 65 64 3a 0a 0a 60 72 65 6d 6f 74 65 2d 6e 61 6d 65 27 20 54 68 65 y.being.used:..`remote-name'.The
5c580 20 64 65 66 61 75 6c 74 20 6e 61 6d 65 20 73 75 67 67 65 73 74 65 64 20 62 79 20 60 66 6f 72 67 .default.name.suggested.by.`forg
5c5a0 65 2d 66 6f 72 6b 27 20 66 6f 72 20 61 0a 20 20 66 6f 72 6b 20 63 72 65 61 74 65 64 20 77 69 74 e-fork'.for.a...fork.created.wit
5c5c0 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 65 63 69 66 69 65 hin.this.account...If.unspecifie
5c5e0 64 2c 20 74 68 65 6e 20 74 68 65 0a 20 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 61 63 63 6f 75 6e d,.then.the...name.of.the.accoun
5c600 74 20 69 73 20 75 73 65 64 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 t.is.used."...:package-version.'
5c620 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 27 66 6f 72 67 (forge..."0.2.0")...:group.'forg
5c640 65 0a 20 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74 20 28 63 6f 6e 73 20 28 73 74 72 69 6e 67 e...:type.'(repeat.(cons.(string
5c660 20 3a 74 61 67 20 22 41 63 63 6f 75 6e 74 22 29 20 70 6c 69 73 74 29 29 29 0a 0a 28 64 65 66 63 .:tag."Account").plist)))..(defc
5c680 75 73 74 6f 6d 20 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 69 67 6e 6f 72 65 64 20 6e 69 6c 0a 20 20 ustom.forge-owned-ignored.nil...
5c6a0 22 41 20 6c 69 73 74 20 6f 66 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 74 68 61 74 20 61 72 65 "A.list.of.repositories.that.are
5c6c0 20 69 67 6e 6f 72 65 64 20 77 68 65 6e 20 6c 69 73 74 69 6e 67 20 74 68 6f 73 65 20 6f 77 6e 65 .ignored.when.listing.those.owne
5c6e0 64 20 62 79 20 79 6f 75 2e 0a 54 68 69 73 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 70 61 63 6b d.by.you..This.is.a.list.of.pack
5c700 61 67 65 20 6e 61 6d 65 73 2e 20 20 55 73 65 64 20 62 79 20 74 68 65 20 63 6f 6d 6d 61 6e 64 73 age.names...Used.by.the.commands
5c720 0a 60 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 27 20 61 6e 64 20 60 .`forge-list-owned-issues'.and.`
5c740 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 70 75 6c 6c 72 65 71 73 27 2e 22 0a 20 20 3a forge-list-owned-pullreqs'."...:
5c760 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
5c780 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 72 65 70 ")...:group.'forge...:type.'(rep
5c7a0 65 61 74 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 4e 61 6d 65 22 29 29 29 0a 0a 3b 3b 3b 20 eat.(string.:tag."Name")))..;;;.
5c7c0 46 61 63 65 73 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 61 63 74 69 76 65 2d 73 75 66 Faces..(defface.forge-active-suf
5c7e0 66 69 78 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 76 61 6c 75 fix.'((t.:inherit.transient-valu
5c800 65 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 20 77 68 e))..."Face.used.for.suffixes.wh
5c820 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 76 65 2e ose.effects.is.currently.active.
5c840 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 29 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 "...:group.'forge)..(defface.for
5c860 67 65 2d 74 61 62 6c 69 73 74 2d 68 6c 2d 6c 69 6e 65 0a 20 20 60 28 28 28 28 63 6c 61 73 73 20 ge-tablist-hl-line...`((((class.
5c880 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 72 6f 75 6e 64 20 6c 69 67 68 74 29 29 0a 20 20 20 20 20 color).(background.light))......
5c8a0 2c 40 28 61 6e 64 20 28 3e 3d 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f 6e 20 32 ,@(and.(>=.emacs-major-version.2
5c8c0 37 29 20 27 28 3a 65 78 74 65 6e 64 20 74 29 29 0a 20 20 20 20 20 3a 62 6f 78 20 28 20 3a 6c 69 7).'(:extend.t))......:box.(.:li
5c8e0 6e 65 2d 77 69 64 74 68 20 2c 28 69 66 20 28 3e 3d 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 ne-width.,(if.(>=.emacs-major-ve
5c900 72 73 69 6f 6e 20 32 38 29 20 28 63 6f 6e 73 20 2d 31 20 2d 31 29 20 2d 31 29 0a 20 20 20 20 20 rsion.28).(cons.-1.-1).-1)......
5c920 20 20 20 20 20 20 20 3a 63 6f 6c 6f 72 20 22 67 72 65 79 32 35 22 0a 20 20 20 20 20 20 20 20 20 .......:color."grey25"..........
5c940 20 20 20 3a 73 74 79 6c 65 20 6e 69 6c 29 29 0a 20 20 20 20 28 28 28 63 6c 61 73 73 20 63 6f 6c ...:style.nil)).....(((class.col
5c960 6f 72 29 20 28 62 61 63 6b 67 72 6f 75 6e 64 20 64 61 72 6b 29 29 0a 20 20 20 20 20 2c 40 28 61 or).(background.dark))......,@(a
5c980 6e 64 20 28 3e 3d 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f 6e 20 32 37 29 20 27 nd.(>=.emacs-major-version.27).'
5c9a0 28 3a 65 78 74 65 6e 64 20 74 29 29 0a 20 20 20 20 20 3a 62 6f 78 20 28 20 3a 6c 69 6e 65 2d 77 (:extend.t))......:box.(.:line-w
5c9c0 69 64 74 68 20 2c 28 69 66 20 28 3e 3d 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f idth.,(if.(>=.emacs-major-versio
5c9e0 6e 20 32 38 29 20 28 63 6f 6e 73 20 2d 31 20 2d 31 29 20 2d 31 29 0a 20 20 20 20 20 20 20 20 20 n.28).(cons.-1.-1).-1)..........
5ca00 20 20 20 3a 63 6f 6c 6f 72 20 22 67 72 65 79 37 35 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a ...:color."grey75".............:
5ca20 73 74 79 6c 65 20 6e 69 6c 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 73 20 69 6e 73 74 65 61 style.nil)))..."Face.uses.instea
5ca40 64 20 6f 66 20 60 68 6c 2d 6c 69 6e 65 27 20 69 6e 20 46 6f 72 67 65 27 73 20 60 74 61 62 75 6c d.of.`hl-line'.in.Forge's.`tabul
5ca60 61 74 65 64 2d 6c 69 73 74 2d 6d 6f 64 65 27 20 62 75 66 66 65 72 73 2e 0a 49 74 20 69 73 20 72 ated-list-mode'.buffers..It.is.r
5ca80 65 63 6f 6d 6d 65 6e 64 65 64 20 74 68 61 74 20 79 6f 75 20 73 74 69 63 6b 20 74 6f 20 75 73 69 ecommended.that.you.stick.to.usi
5caa0 6e 67 20 61 20 62 6f 78 20 66 6f 72 20 74 68 69 73 20 70 75 72 70 6f 73 65 2c 0a 61 73 20 75 73 ng.a.box.for.this.purpose,.as.us
5cac0 69 6e 67 20 74 68 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 77 6f 75 6c 64 20 73 ing.the.background.color.would.s
5cae0 68 61 64 6f 77 20 74 68 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 73 0a 75 73 65 64 hadow.the.background.colors.used
5cb00 20 66 6f 72 20 6c 61 62 65 6c 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d 66 61 .for.labels."...:group.'forge-fa
5cb20 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 66 6f 72 67 65 2d 74 61 62 6c 69 73 74 2d 74 6f 70 ces)..(defface.forge-tablist-top
5cb40 69 63 2d 6c 61 62 65 6c 0a 20 20 60 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f 72 67 65 2d 74 ic-label...`((t.:inherit.forge-t
5cb60 6f 70 69 63 2d 6c 61 62 65 6c 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 74 6f opic-label))..."Face.used.for.to
5cb80 70 69 63 20 6c 61 62 65 6c 73 20 69 6e 20 46 6f 72 67 65 27 73 20 60 74 61 62 75 6c 61 74 65 64 pic.labels.in.Forge's.`tabulated
5cba0 2d 6c 69 73 74 2d 6d 6f 64 65 27 20 62 75 66 66 65 72 73 2e 0a 54 68 69 73 20 66 61 63 65 20 63 -list-mode'.buffers..This.face.c
5cbc0 61 6e 20 62 65 20 75 73 65 64 20 74 6f 20 63 6f 6e 74 72 6f 6c 20 77 68 65 74 68 65 72 20 61 20 an.be.used.to.control.whether.a.
5cbe0 62 6f 78 20 69 73 20 61 64 64 65 64 20 74 6f 20 6c 61 62 65 6c 73 0a 61 6e 64 20 68 6f 77 20 74 box.is.added.to.labels.and.how.t
5cc00 68 61 74 20 69 73 20 73 74 79 6c 65 64 2e 20 20 54 68 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 hat.is.styled...The.background.c
5cc20 6f 6c 6f 72 73 20 75 73 65 64 20 66 6f 72 20 61 6e 79 20 67 69 76 65 6e 0a 6c 61 62 65 6c 2c 20 olors.used.for.any.given.label,.
5cc40 63 61 6e 6e 6f 74 20 62 65 20 63 68 61 6e 67 65 64 20 69 6e 64 65 70 65 6e 64 65 6e 74 6c 79 20 cannot.be.changed.independently.
5cc60 6f 66 20 74 68 65 20 63 6f 6c 6f 72 20 75 73 65 64 20 69 6e 20 74 68 65 0a 66 6f 72 67 65 73 20 of.the.color.used.in.the.forges.
5cc80 77 65 62 20 69 6e 74 65 72 66 61 63 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 6f 72 67 65 2d web.interface."...:group.'forge-
5cca0 66 61 63 65 73 29 0a 0a 3b 3b 3b 20 56 61 72 69 61 62 6c 65 73 0a 0a 28 64 65 66 76 61 72 2d 6c faces)..;;;.Variables..(defvar-l
5ccc0 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 74 2d 63 6f 6c 75 6d ocal.forge--tabulated-list-colum
5cce0 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 6c 61 74 65 64 2d 6c ns.nil).(put.'forge--tabulated-l
5cd00 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 63 61 6c 20 74 29 0a ist-columns.'permanent-local.t).
5cd20 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 75 6c 61 74 65 64 2d .(defvar-local.forge--tabulated-
5cd40 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 67 65 2d 2d 74 61 62 list-query.nil).(put.'forge--tab
5cd60 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 65 6e 74 2d 6c 6f 63 ulated-list-query.'permanent-loc
5cd80 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 62 75 66 66 al.t)..(defvar-local.forge--buff
5cda0 65 72 2d 6c 69 73 74 2d 74 79 70 65 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 er-list-type.nil).(defvar-local.
5cdc0 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 6c 29 0a 28 forge--buffer-list-filter.nil).(
5cde0 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 69 73 74 2d defvar-local.forge--buffer-list-
5ce00 67 6c 6f 62 61 6c 20 6e 69 6c 29 0a 0a 3b 3b 3b 20 4d 6f 64 65 73 0a 3b 3b 3b 3b 20 43 6f 6d 6d global.nil)..;;;.Modes.;;;;.Comm
5ce20 6f 6e 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 74 61 62 6c 69 73 74 2d 72 65 66 72 65 73 on..(defun.forge--tablist-refres
5ce40 68 20 28 29 0a 20 20 28 73 65 74 71 20 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 66 6f 72 6d h.()...(setq.tabulated-list-form
5ce60 61 74 0a 20 20 20 20 20 20 20 20 28 76 63 6f 6e 63 61 74 20 28 6d 61 70 63 61 72 20 28 70 63 61 at.........(vconcat.(mapcar.(pca
5ce80 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 6e 61 6d 65 20 2c 5f 67 65 74 20 2c 77 69 64 74 68 20 se-lambda.(`(,name.,_get.,width.
5cea0 2c 73 6f 72 74 20 2c 70 72 6f 70 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,sort.,props))..................
5cec0 20 20 20 20 20 20 20 20 20 20 60 28 2c 6e 61 6d 65 20 2c 77 69 64 74 68 20 2c 73 6f 72 74 20 2e ..........`(,name.,width.,sort..
5cee0 20 2c 70 72 6f 70 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 .,props)).......................
5cf00 20 20 20 66 6f 72 67 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 ...forge--tabulated-list-columns
5cf20 29 29 29 0a 20 20 28 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 69 6e 69 74 2d 68 65 61 64 65 )))...(tabulated-list-init-heade
5cf40 72 29 0a 20 20 28 73 65 74 71 20 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 65 6e 74 72 69 65 r)...(setq.tabulated-list-entrie
5cf60 73 0a 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 s.........(mapcar..........(lamb
5cf80 64 61 20 28 6f 62 6a 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 6f 72 65 66 20 da.(obj)............(list.(oref.
5cfa0 6f 62 6a 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 63 6f 6e 63 61 obj.id)..................(vconca
5cfc0 74 0a 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 70 63 61 t...................(mapcar.(pca
5cfe0 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 5f 6e 61 6d 65 20 2c 67 65 74 20 2c 5f 77 69 64 74 68 se-lambda.(`(,_name.,get.,_width
5d000 20 2c 5f 73 6f 72 74 20 2c 5f 70 72 6f 70 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .,_sort.,_props))...............
5d020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 76 61 6c 20 28 63 6f 6e 64 0a 20 ..............(let.((val.(cond..
5d040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5d060 20 20 20 20 20 20 20 28 28 66 75 6e 63 74 69 6f 6e 70 20 67 65 74 29 0a 20 20 20 20 20 20 20 20 .......((functionp.get).........
5d080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5d0a0 20 28 66 75 6e 63 61 6c 6c 20 67 65 74 20 6f 62 6a 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .(funcall.get.obj)).............
5d0c0 20 20 20 20 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 65 71 ............................((eq
5d0e0 20 28 63 61 72 2d 73 61 66 65 20 67 65 74 29 20 27 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 20 .(car-safe.get).'repository)....
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 20 20 20 ................................
5d120 20 20 20 20 20 20 28 65 69 65 69 6f 2d 6f 72 65 66 20 28 66 6f 72 67 65 2d 67 65 74 2d 72 65 70 ......(eieio-oref.(forge-get-rep
5d140 6f 73 69 74 6f 72 79 20 6f 62 6a 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ository.obj)....................
5d160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5d180 20 20 28 63 61 64 72 20 67 65 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..(cadr.get)))..................
5d1a0 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 65 69 65 69 6f 2d 6f .......................((eieio-o
5d1c0 72 65 66 20 6f 62 6a 20 67 65 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ref.obj.get)))))................
5d1e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 70 20 76 ...............(cond.((stringp.v
5d200 61 6c 29 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 20 al).val)........................
5d220 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 75 6c 6c 20 76 61 6c 29 20 22 22 29 0a 20 20 20 .............((null.val)."")....
5d240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5d260 20 28 28 66 6f 72 6d 61 74 20 22 25 73 22 20 76 61 6c 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 .((format."%s".val))))).........
5d280 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 74 61 62 75 6c 61 74 ..................forge--tabulat
5d2a0 65 64 2d 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 75 ed-list-columns))))..........(fu
5d2c0 6e 63 61 6c 6c 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 ncall.forge--tabulated-list-quer
5d2e0 79 29 29 29 29 0a 0a 3b 3b 3b 3b 20 54 6f 70 69 63 73 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d y))))..;;;;.Topics..(defvar-keym
5d300 61 70 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 3a ap.forge-topic-list-mode-map...:
5d320 64 6f 63 20 22 4c 6f 63 61 6c 20 6b 65 79 6d 61 70 20 66 6f 72 20 46 6f 72 67 65 2d 54 6f 70 69 doc."Local.keymap.for.Forge-Topi
5d340 63 2d 4c 69 73 74 20 6d 6f 64 65 20 62 75 66 66 65 72 73 2e 22 0a 20 20 3a 70 61 72 65 6e 74 20 c-List.mode.buffers."...:parent.
5d360 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 22 52 45 54 22 20 tabulated-list-mode-map..."RET".
5d380 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 63 0a 20 20 .....#'forge-visit-this-topic...
5d3a0 22 3c 72 65 74 75 72 6e 3e 22 20 23 27 66 6f 72 67 65 2d 76 69 73 69 74 2d 74 68 69 73 2d 74 6f "<return>".#'forge-visit-this-to
5d3c0 70 69 63 0a 20 20 22 6f 22 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 62 72 6f 77 73 65 2d pic..."o"........#'forge-browse-
5d3e0 74 68 69 73 2d 74 6f 70 69 63 0a 20 20 22 43 2d 63 20 43 2d 6d 22 20 20 23 27 66 6f 72 67 65 2d this-topic..."C-c.C-m"..#'forge-
5d400 74 6f 70 69 63 73 2d 6d 65 6e 75 0a 20 20 22 27 22 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 topics-menu..."'"........#'forge
5d420 2d 64 69 73 70 61 74 63 68 0a 20 20 22 3f 22 20 20 20 20 20 20 20 20 23 27 6d 61 67 69 74 2d 64 -dispatch..."?"........#'magit-d
5d440 69 73 70 61 74 63 68 29 0a 0a 28 64 65 66 76 61 72 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 ispatch)..(defvar.forge-topic-li
5d460 73 74 2d 6d 6f 64 65 2d 6e 61 6d 65 0a 20 20 27 28 28 3a 65 76 61 6c 0a 20 20 20 20 20 28 6c 65 st-mode-name...'((:eval......(le
5d480 74 20 28 28 69 6e 66 6f 20 28 63 61 70 69 74 61 6c 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 t.((info.(capitalize............
5d4a0 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 69 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 .......(concat.(if.forge--buffer
5d4c0 2d 6c 69 73 74 2d 66 69 6c 74 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -list-filter....................
5d4e0 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 2d 2d ...........(format."%s.".forge--
5d500 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 20 20 buffer-list-filter).............
5d520 20 20 20 20 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 ................"").............
5d540 20 20 20 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 ..............(if.forge--buffer-
5d560 6c 69 73 74 2d 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 list-type.......................
5d580 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 73 22 20 66 6f 72 67 65 2d 2d 62 75 66 ........(format."%ss".forge--buf
5d5a0 66 65 72 2d 6c 69 73 74 2d 74 79 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 fer-list-type)..................
5d5c0 20 20 20 20 20 20 20 20 20 20 20 22 74 6f 70 69 63 73 22 29 29 29 29 29 0a 20 20 20 20 20 20 20 ..........."topics")))))........
5d5e0 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6d 6f 6f 64 79 2d 74 61 62 29 20 28 6d 6f 6f 64 79 2d (if.(fboundp.'moody-tab).(moody-
5d600 74 61 62 20 69 6e 66 6f 29 20 69 6e 66 6f 29 29 29 29 0a 20 20 22 49 6e 66 6f 72 6d 61 74 69 6f tab.info).info))))..."Informatio
5d620 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 66 6f n.shown.in.the.mode-line.for.`fo
5d640 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 27 2e 0a 4d 75 73 74 20 62 65 20 73 65 rge-topic-list-mode'..Must.be.se
5d660 74 20 62 65 66 6f 72 65 20 60 66 6f 72 67 65 2d 6c 69 73 74 27 20 69 73 20 6c 6f 61 64 65 64 2e t.before.`forge-list'.is.loaded.
5d680 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
5d6a0 6f 70 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 20 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 6d 6f opic-list-mode.tabulated-list-mo
5d6c0 64 65 0a 20 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 2d 6e 61 6d 65 0a de...forge-topic-list-mode-name.
5d6e0 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 62 72 6f 77 73 69 6e 67 20 61 20 6c 69 73 .."Major.mode.for.browsing.a.lis
5d700 74 20 6f 66 20 74 6f 70 69 63 73 2e 22 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 68 6c 2d 6c t.of.topics."...(setq-local.hl-l
5d720 69 6e 65 2d 66 61 63 65 20 27 66 6f 72 67 65 2d 74 61 62 6c 69 73 74 2d 68 6c 2d 6c 69 6e 65 29 ine-face.'forge-tablist-hl-line)
5d740 0a 20 20 28 73 65 74 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 ...(setq-local.x-stretch-cursor.
5d760 6e 69 6c 29 0a 20 20 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 nil)...(setq.tabulated-list-padd
5d780 69 6e 67 20 30 29 0a 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 ing.0)...(setq.tabulated-list-so
5d7a0 72 74 2d 6b 65 79 20 28 63 6f 6e 73 20 22 23 22 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 rt-key.(cons."#".nil)))..(defun.
5d7c0 66 6f 72 67 65 2d 74 6f 70 69 63 2d 67 65 74 2d 62 75 66 66 65 72 20 28 26 6f 70 74 69 6f 6e 61 forge-topic-get-buffer.(&optiona
5d7e0 6c 20 72 65 70 6f 20 63 72 65 61 74 65 29 0a 20 20 28 6c 65 74 20 28 28 6e 61 6d 65 20 28 69 66 l.repo.create)...(let.((name.(if
5d800 20 72 65 70 6f 0a 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 .repo...................(format.
5d820 22 2a 66 6f 72 67 65 2d 74 6f 70 69 63 73 3a 20 25 73 2a 22 20 28 6f 72 65 66 20 72 65 70 6f 20 "*forge-topics:.%s*".(oref.repo.
5d840 73 6c 75 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2a 66 6f 72 67 65 2d 74 slug))................."*forge-t
5d860 6f 70 69 63 73 2a 22 29 29 29 0a 20 20 20 20 28 69 66 20 63 72 65 61 74 65 0a 20 20 20 20 20 20 opics*"))).....(if.create.......
5d880 20 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 6e 61 6d 65 29 0a 20 20 20 20 20 ..(get-buffer-create.name)......
5d8a0 20 28 67 65 74 2d 62 75 66 66 65 72 20 6e 61 6d 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f .(get-buffer.name))))..(defun.fo
5d8c0 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 73 65 74 75 70 20 28 74 79 70 65 20 66 69 6c 74 65 rge-topic-list-setup.(type.filte
5d8e0 72 20 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f 20 67 6c 6f 62 61 6c 20 63 6f 6c 75 6d r.fn.&optional.repo.global.colum
5d900 6e 73 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 70 6f 20 28 6f 72 20 72 65 70 6f 0a 20 20 20 20 ns)...(let*.((repo.(or.repo.....
5d920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74 20 67 6c 6f 62 61 6c 29 ...............(and.(not.global)
5d940 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 69 66 2d 6c 65 74 .........................(if-let
5d960 2a 20 28 28 74 6f 70 69 63 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 61 74 2d 70 6f 69 6e 74 29 *.((topic.(forge-topic-at-point)
5d980 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 )...............................
5d9a0 20 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 ....(repo.(forge-get-repository.
5d9c0 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 20 20 topic)))........................
5d9e0 20 20 20 20 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 20 20 20 .....repo.......................
5da00 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 61 63 6b ....(forge-get-repository.:track
5da20 65 64 3f 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 69 72 20 28 6f 72 20 28 61 6e 64 20 ed?)))))..........(dir.(or.(and.
5da40 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 20 repo.(forge-get-worktree.repo)).
5da60 22 2f 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 20 6e 69 6c 29 29 0a 20 20 20 "/"))..........(buffer.nil))....
5da80 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 72 65 70 6f 20 67 6c 6f 62 61 6c 29 0a 20 20 20 20 20 20 .(unless.(or.repo.global).......
5daa0 28 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 72 65 70 6f 73 69 74 (error."Cannot.determine.reposit
5dac0 6f 72 79 22 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 ory")).....(with-current-buffer.
5dae0 28 73 65 74 71 20 62 75 66 66 65 72 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 67 65 74 2d 62 75 (setq.buffer.(forge-topic-get-bu
5db00 66 66 65 72 20 72 65 70 6f 20 74 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 65 66 61 75 6c ffer.repo.t)).......(setq.defaul
5db20 74 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 t-directory.dir).......(setq.for
5db40 67 65 2d 62 75 66 66 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 29 0a 20 20 20 20 20 ge-buffer-repository.repo)......
5db60 20 28 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 63 6f 6c .(setq.forge--tabulated-list-col
5db80 75 6d 6e 73 20 28 6f 72 20 63 6f 6c 75 6d 6e 73 20 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 umns.(or.columns.forge-topic-lis
5dba0 74 2d 63 6f 6c 75 6d 6e 73 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 74 t-columns)).......(setq.forge--t
5dbc0 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 71 75 65 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 abulated-list-query.............
5dbe0 28 63 6f 6e 64 20 28 28 6e 6f 74 20 28 66 75 6e 63 74 69 6f 6e 70 20 66 6e 29 29 0a 20 20 20 20 (cond.((not.(functionp.fn)).....
5dc00 20 20 20 20 20 20 20 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 ...............(lambda.().......
5dc20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 73 6f 72 74 20 28 6d 61 70 63 61 6e 20 ...............(cl-sort.(mapcan.
5dc40 28 2d 63 75 74 20 66 75 6e 63 61 6c 6c 20 3c 3e 20 72 65 70 6f 29 20 66 6e 29 0a 20 20 20 20 20 (-cut.funcall.<>.repo).fn)......
5dc60 20 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 3e 20 3a 6b 65 .........................#'>.:ke
5dc80 79 20 28 2d 63 75 74 20 6f 72 65 66 20 3c 3e 20 6e 75 6d 62 65 72 29 29 29 29 0a 20 20 20 20 20 y.(-cut.oref.<>.number))))......
5dca0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 61 70 70 6c 79 2d 70 61 72 74 69 61 .............(repo.(apply-partia
5dcc0 6c 6c 79 20 66 6e 20 72 65 70 6f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 lly.fn.repo))...................
5dce0 28 66 6e 29 29 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 (fn))).......(cl-letf.(((symbol-
5dd00 66 75 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 function.#'tabulated-list-revert
5dd20 29 20 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 ).#'ignore)).;.see.#229.........
5dd40 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 28 (forge-topic-list-mode)).......(
5dd60 73 65 74 71 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 74 79 70 65 20 74 79 70 setq.forge--buffer-list-type.typ
5dd80 65 29 0a 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 6c 69 73 e).......(setq.forge--buffer-lis
5dda0 74 2d 66 69 6c 74 65 72 20 66 69 6c 74 65 72 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 t-filter.filter).......(setq.for
5ddc0 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 20 67 6c 6f 62 61 6c 29 0a 20 ge--buffer-list-global.global)..
5dde0 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 61 62 6c 69 73 74 2d 72 65 66 72 65 73 68 29 0a 20 20 .....(forge--tablist-refresh)...
5de00 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 72 65 ....(add-hook.'tabulated-list-re
5de20 76 65 72 74 2d 68 6f 6f 6b 20 23 27 66 6f 72 67 65 2d 2d 74 61 62 6c 69 73 74 2d 72 65 66 72 65 vert-hook.#'forge--tablist-refre
5de40 73 68 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 28 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d sh.nil.t).......(tabulated-list-
5de60 70 72 69 6e 74 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 68 6c 2d 6c 69 6e 65 2d 6d 6f 64 65 0a print).......(when.hl-line-mode.
5de80 20 20 20 20 20 20 20 20 28 68 6c 2d 6c 69 6e 65 2d 68 69 67 68 6c 69 67 68 74 29 29 29 0a 20 20 ........(hl-line-highlight)))...
5dea0 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 29 0a 0a 3b ..(switch-to-buffer.buffer)))..;
5dec0 3b 3b 3b 20 52 65 70 6f 73 69 74 6f 72 79 0a 0a 28 64 65 66 76 61 72 2d 6b 65 79 6d 61 70 20 66 ;;;.Repository..(defvar-keymap.f
5dee0 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 6d 61 70 0a 20 20 orge-repository-list-mode-map...
5df00 3a 64 6f 63 20 22 4c 6f 63 61 6c 20 6b 65 79 6d 61 70 20 66 6f 72 20 46 6f 72 67 65 2d 52 65 70 :doc."Local.keymap.for.Forge-Rep
5df20 6f 73 69 74 6f 72 79 2d 4c 69 73 74 20 6d 6f 64 65 20 62 75 66 66 65 72 73 2e 22 0a 20 20 3a 70 ository-List.mode.buffers."...:p
5df40 61 72 65 6e 74 20 74 61 62 75 6c 61 74 65 64 2d 6c 69 73 74 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 arent.tabulated-list-mode-map...
5df60 22 52 45 54 22 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 72 65 "RET"......#'forge-visit-this-re
5df80 70 6f 73 69 74 6f 72 79 0a 20 20 22 3c 72 65 74 75 72 6e 3e 22 20 23 27 66 6f 72 67 65 2d 76 69 pository..."<return>".#'forge-vi
5dfa0 73 69 74 2d 74 68 69 73 2d 72 65 70 6f 73 69 74 6f 72 79 0a 20 20 22 6f 22 20 20 20 20 20 20 20 sit-this-repository..."o".......
5dfc0 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 6f 72 79 0a .#'forge-browse-this-repository.
5dfe0 20 20 22 43 2d 63 20 43 2d 6d 22 20 20 23 27 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 69 65 .."C-c.C-m"..#'forge-repositorie
5e000 73 2d 6d 65 6e 75 0a 20 20 22 27 22 20 20 20 20 20 20 20 20 23 27 66 6f 72 67 65 2d 64 69 73 70 s-menu..."'"........#'forge-disp
5e020 61 74 63 68 0a 20 20 22 3f 22 20 20 20 20 20 20 20 20 23 27 6d 61 67 69 74 2d 64 69 73 70 61 74 atch..."?"........#'magit-dispat
5e040 63 68 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 ch)..(defvar.forge-repository-li
5e060 73 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 st-buffer-name."*forge-repositor
5e080 69 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 ies*"..."Buffer.name.to.use.for.
5e0a0 64 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 displaying.lists.of.repositories
5e0c0 2e 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 .")..(defvar.forge-repository-li
5e0e0 73 74 2d 6d 6f 64 65 2d 6e 61 6d 65 0a 20 20 27 28 28 3a 65 76 61 6c 0a 20 20 20 20 20 28 6c 65 st-mode-name...'((:eval......(le
5e100 74 20 28 28 69 6e 66 6f 20 28 63 61 70 69 74 61 6c 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 t.((info.(capitalize............
5e120 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 69 66 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 .......(concat.(if.forge--buffer
5e140 2d 6c 69 73 74 2d 66 69 6c 74 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -list-filter....................
5e160 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 2d 2d ...........(format."%s.".forge--
5e180 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 20 20 buffer-list-filter).............
5e1a0 20 20 20 20 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 ................"").............
5e1c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 72 65 70 6f 73 69 74 6f 72 69 65 73 22 29 29 29 29 .............."repositories"))))
5e1e0 0a 20 20 20 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6d 6f 6f 64 79 2d 74 61 62 29 ........(if.(fboundp.'moody-tab)
5e200 20 28 6d 6f 6f 64 79 2d 74 61 62 20 69 6e 66 6f 29 20 69 6e 66 6f 29 29 29 29 0a 20 20 22 49 6e .(moody-tab.info).info))))..."In
5e220 66 6f 72 6d 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 formation.shown.in.the.mode-line
5e240 20 66 6f 72 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 .for.`forge-repository-list-mode
5e260 27 2e 0a 4d 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 '..Must.be.set.before.`forge-lis
5e280 74 27 20 69 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 t'.is.loaded.")..(define-derived
5e2a0 2d 6d 6f 64 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 -mode.forge-repository-list-mode
5e2c0 20 74 61 62 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 .tabulated-list-mode...forge-rep
5e2e0 6f 73 69 74 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 ository-list-mode-name..."Major.
5e300 6d 6f 64 65 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 mode.for.browsing.a.list.of.repo
5e320 73 69 74 6f 72 69 65 73 2e 22 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 78 2d 73 74 72 65 74 sitories."...(setq-local.x-stret
5e340 63 68 2d 63 75 72 73 6f 72 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 20 74 61 62 75 6c 61 74 65 64 ch-cursor.nil)...(setq.tabulated
5e360 2d 6c 69 73 74 2d 70 61 64 64 69 6e 67 20 30 29 0a 20 20 28 73 65 74 71 20 74 61 62 75 6c 61 74 -list-padding.0)...(setq.tabulat
5e380 65 64 2d 6c 69 73 74 2d 73 6f 72 74 2d 6b 65 79 20 28 63 6f 6e 73 20 22 4f 77 6e 65 72 22 20 6e ed-list-sort-key.(cons."Owner".n
5e3a0 69 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c il)))..(defun.forge-repository-l
5e3c0 69 73 74 2d 73 65 74 75 70 20 28 66 69 6c 74 65 72 20 66 6e 29 0a 20 20 28 6c 65 74 20 28 28 62 ist-setup.(filter.fn)...(let.((b
5e3e0 75 66 66 65 72 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 66 6f 72 67 65 2d 72 uffer.(get-buffer-create.forge-r
5e400 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 29 29 0a 20 20 epository-list-buffer-name)))...
5e420 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 65 72 0a 20 20 ..(with-current-buffer.buffer...
5e440 20 20 20 20 28 73 65 74 71 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 22 2f 22 29 ....(setq.default-directory."/")
5e460 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 74 61 62 75 6c 61 74 65 64 2d 6c 69 .......(setq.forge--tabulated-li
5e480 73 74 2d 63 6f 6c 75 6d 6e 73 20 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 73 74 st-columns.forge-repository-list
5e4a0 2d 63 6f 6c 75 6d 6e 73 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d 74 61 62 -columns).......(setq.forge--tab
5e4c0 75 6c 61 74 65 64 2d 6c 69 73 74 2d 71 75 65 72 79 20 66 6e 29 0a 20 20 20 20 20 20 28 63 6c 2d ulated-list-query.fn).......(cl-
5e4e0 6c 65 74 66 20 28 28 28 73 79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 23 27 74 61 62 75 6c 61 letf.(((symbol-function.#'tabula
5e500 74 65 64 2d 6c 69 73 74 2d 72 65 76 65 72 74 29 20 23 27 69 67 6e 6f 72 65 29 29 20 3b 20 73 65 ted-list-revert).#'ignore)).;.se
5e520 65 20 23 32 32 39 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 e.#229.........(forge-repository
5e540 2d 6c 69 73 74 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 6f 72 67 65 2d 2d -list-mode)).......(setq.forge--
5e560 62 75 66 66 65 72 2d 6c 69 73 74 2d 74 79 70 65 20 27 72 65 70 6f 29 0a 20 20 20 20 20 20 28 73 buffer-list-type.'repo).......(s
5e580 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 72 20 66 69 etq.forge--buffer-list-filter.fi
5e5a0 6c 74 65 72 29 0a 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 lter).......(setq.forge--buffer-
5e5c0 6c 69 73 74 2d 67 6c 6f 62 61 6c 20 74 29 0a 20 20 20 20 20 20 28 66 6f 72 67 65 2d 2d 74 61 62 list-global.t).......(forge--tab
5e5e0 6c 69 73 74 2d 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 list-refresh).......(add-hook.'t
5e600 61 62 75 6c 61 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 abulated-list-revert-hook.#'forg
5e620 65 2d 2d 74 61 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 e--tablist-refresh.nil.t).......
5e640 28 74 61 62 75 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 (tabulated-list-print).......(wh
5e660 65 6e 20 68 6c 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 en.hl-line-mode.........(hl-line
5e680 2d 68 69 67 68 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 -highlight))).....(switch-to-buf
5e6a0 66 65 72 20 62 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 fer.buffer)))..(defun.forge-form
5e6c0 61 74 2d 72 65 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 at-repo-condition.(repo)..."Retu
5e6e0 72 6e 20 61 20 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 rn.a.character.representing.the.
5e700 76 61 6c 75 65 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 value.of.REPO's.`condition'.slot
5e720 2e 22 0a 20 20 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 ."...(pcase-exhaustive.(oref.rep
5e740 6f 20 63 6f 6e 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 o.condition).....(:tracked."*").
5e760 20 20 20 20 28 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 ....(:known.".").....(:stub.(pro
5e780 70 65 72 74 69 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 pertize."s".'face.'warning))))..
5e7a0 28 64 65 66 75 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 (defun.forge-format-repo-selecti
5e7c0 76 65 20 28 72 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 ve.(repo)..."Return.a.character.
5e7e0 72 65 70 72 65 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 representing.the.value.of.REPO's
5e800 20 60 73 65 6c 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 .`selective-p'.slot."...(pcase-e
5e820 78 68 61 75 73 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 xhaustive.(oref.repo.selective-p
5e840 29 0a 20 20 20 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 ).....('t..."*").....('nil."."))
5e860 29 0a 0a 3b 3b 3b 20 43 6f 6d 6d 61 6e 64 73 0a 3b 3b 3b 3b 20 4d 65 6e 75 73 0a 0a 3b 3b 3b 23 )..;;;.Commands.;;;;.Menus..;;;#
5e880 23 23 61 75 74 6f 6c 6f 61 64 20 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
5e8a0 63 73 2d 6d 65 6e 75 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 cs-menu."forge-list".nil.t).(tra
5e8c0 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
5e8e0 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 6f 66 20 74 6f 70 s-menu.()..."Control.list.of.top
5e900 69 63 73 20 61 6e 64 20 74 68 65 20 74 6f 70 69 63 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 3a ics.and.the.topic.at.point."...:
5e920 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 6e 74 2d transient-suffix.t...:transient-
5e940 6e 6f 6e 2d 73 75 66 66 69 78 20 74 0a 20 20 3a 74 72 61 6e 73 69 65 6e 74 2d 73 77 69 74 63 68 non-suffix.t...:transient-switch
5e960 2d 66 72 61 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 -frame.nil...:refresh-suffixes.t
5e980 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 70 69 63 2d 6d ...:column-widths.forge--topic-m
5e9a0 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 20 61 6c 77 61 enus-column-widths...[:hide.alwa
5e9c0 79 73 0a 20 20 20 28 22 71 22 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6d 65 6e 75 2d 71 75 69 ys....("q"........forge-menu-qui
5e9e0 74 2d 6c 69 73 74 29 0a 20 20 20 28 22 52 45 54 22 20 20 20 20 20 20 66 6f 72 67 65 2d 74 6f 70 t-list)....("RET"......forge-top
5ea00 69 63 2d 6d 65 6e 75 29 0a 20 20 20 28 22 3c 72 65 74 75 72 6e 3e 22 20 66 6f 72 67 65 2d 74 6f ic-menu)....("<return>".forge-to
5ea20 70 69 63 2d 6d 65 6e 75 29 5d 0a 20 20 5b 5b 22 54 79 70 65 22 0a 20 20 20 20 28 3a 69 6e 66 6f pic-menu)]...[["Type".....(:info
5ea40 20 22 74 6f 70 69 63 73 22 20 20 20 20 20 20 20 20 20 20 20 3a 66 61 63 65 20 66 6f 72 67 65 2d ."topics"...........:face.forge-
5ea60 61 63 74 69 76 65 2d 73 75 66 66 69 78 29 0a 20 20 20 20 28 22 6e 22 20 20 20 22 6e 6f 74 69 66 active-suffix).....("n"..."notif
5ea80 69 63 61 74 69 6f 6e 73 2e 2e 2e 22 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 ications...".forge-notifications
5eaa0 2d 6d 65 6e 75 20 3a 74 72 61 6e 73 69 65 6e 74 20 72 65 70 6c 61 63 65 29 0a 20 20 20 20 28 22 -menu.:transient.replace).....("
5eac0 72 22 20 20 20 22 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 2e 2e 22 20 20 66 6f 72 67 65 2d 72 65 r"..."repositories..."..forge-re
5eae0 70 6f 73 69 74 6f 72 69 65 73 2d 6d 65 6e 75 20 20 3a 74 72 61 6e 73 69 65 6e 74 20 72 65 70 6c positories-menu..:transient.repl
5eb00 61 63 65 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 ace)]....[:description.(lambda.(
5eb20 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 66 6f 72 67 65 2d 2d )....................(if.forge--
5eb40 62 75 66 66 65 72 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 buffer-list-global..............
5eb60 20 20 20 20 20 20 20 20 20 20 22 50 65 72 2d 72 65 70 6f 73 69 74 6f 72 79 20 6c 69 73 74 73 22 .........."Per-repository.lists"
5eb80 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 75 62 74 79 70 65 22 29 ......................"Subtype")
5eba0 29 0a 20 20 20 20 28 22 74 22 20 22 74 6f 70 69 63 73 22 20 20 20 20 20 20 20 20 20 20 20 66 6f ).....("t"."topics"...........fo
5ebc0 72 67 65 2d 6c 69 73 74 2d 74 6f 70 69 63 73 29 0a 20 20 20 20 28 22 69 22 20 22 69 73 73 75 65 rge-list-topics).....("i"."issue
5ebe0 73 22 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 69 73 73 75 65 73 29 0a s"...........forge-list-issues).
5ec00 20 20 20 20 28 22 70 22 20 22 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 22 20 20 20 20 66 6f 72 67 ....("p"."pull-requests"....forg
5ec20 65 2d 6c 69 73 74 2d 70 75 6c 6c 72 65 71 73 29 0a 20 20 20 20 22 22 5d 0a 20 20 20 5b 22 46 69 e-list-pullreqs).....""]....["Fi
5ec40 6c 74 65 72 22 0a 20 20 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 61 6e 64 20 28 6e lter".....:if.(lambda.().(and.(n
5ec60 6f 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 29 0a 20 20 ot.forge--buffer-list-global)...
5ec80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 66 6f 72 67 65 2d 2d 62 75 66 66 .................(eq.forge--buff
5eca0 65 72 2d 6c 69 73 74 2d 74 79 70 65 20 27 74 6f 70 69 63 29 29 29 0a 20 20 20 20 28 22 6c 22 20 er-list-type.'topic))).....("l".
5ecc0 22 6c 61 62 65 6c 65 64 22 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6c 61 "labeled"..........forge-list-la
5ece0 62 65 6c 65 64 2d 74 6f 70 69 63 73 29 0a 20 20 20 20 28 22 63 22 20 22 63 72 65 61 74 65 64 22 beled-topics).....("c"."created"
5ed00 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 75 74 68 6f 72 65 64 2d 74 6f ..........forge-list-authored-to
5ed20 70 69 63 73 29 0a 20 20 20 20 28 22 61 22 20 22 61 73 73 69 67 6e 65 64 22 20 20 20 20 20 20 20 pics).....("a"."assigned".......
5ed40 20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 73 73 69 67 6e 65 64 2d 74 6f 70 69 63 73 29 5d 0a 20 ..forge-list-assigned-topics)]..
5ed60 20 20 5b 22 46 69 6c 74 65 72 22 0a 20 20 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 ..["Filter".....:if.(lambda.().(
5ed80 61 6e 64 20 28 6e 6f 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 67 6c 6f 62 and.(not.forge--buffer-list-glob
5eda0 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 66 6f 72 67 65 al)....................(eq.forge
5edc0 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 74 79 70 65 20 27 69 73 73 75 65 29 29 29 0a 20 20 20 --buffer-list-type.'issue)))....
5ede0 20 28 22 6c 22 20 22 6c 61 62 65 6c 65 64 22 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6c .("l"."labeled"..........forge-l
5ee00 69 73 74 2d 6c 61 62 65 6c 65 64 2d 69 73 73 75 65 73 29 0a 20 20 20 20 28 22 63 22 20 22 63 72 ist-labeled-issues).....("c"."cr
5ee20 65 61 74 65 64 22 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 75 74 68 6f eated"..........forge-list-autho
5ee40 72 65 64 2d 69 73 73 75 65 73 29 0a 20 20 20 20 28 22 61 22 20 22 61 73 73 69 67 6e 65 64 22 20 red-issues).....("a"."assigned".
5ee60 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 73 73 69 67 6e 65 64 2d 69 73 73 75 ........forge-list-assigned-issu
5ee80 65 73 29 5d 0a 20 20 20 5b 22 46 69 6c 74 65 72 22 0a 20 20 20 20 3a 69 66 20 28 6c 61 6d 62 64 es)]....["Filter".....:if.(lambd
5eea0 61 20 28 29 20 28 61 6e 64 20 28 6e 6f 74 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 a.().(and.(not.forge--buffer-lis
5eec0 74 2d 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 28 65 71 t-global)....................(eq
5eee0 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 74 79 70 65 20 27 70 75 6c 6c 72 65 .forge--buffer-list-type.'pullre
5ef00 71 29 29 29 0a 20 20 20 20 28 22 6c 22 20 22 6c 61 62 65 6c 65 64 22 20 20 20 20 20 20 20 20 20 q))).....("l"."labeled".........
5ef20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6c 61 62 65 6c 65 64 2d 70 75 6c 6c 72 65 71 73 29 0a 20 20 .forge-list-labeled-pullreqs)...
5ef40 20 20 28 22 63 22 20 22 63 72 65 61 74 65 64 22 20 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d ..("c"."created"..........forge-
5ef60 6c 69 73 74 2d 61 75 74 68 6f 72 65 64 2d 70 75 6c 6c 72 65 71 73 29 0a 20 20 20 20 28 22 61 22 list-authored-pullreqs).....("a"
5ef80 20 22 61 73 73 69 67 6e 65 64 22 20 20 20 20 20 20 20 20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 ."assigned".........forge-list-a
5efa0 73 73 69 67 6e 65 64 2d 70 75 6c 6c 72 65 71 73 29 0a 20 20 20 20 28 22 77 22 20 22 61 77 61 69 ssigned-pullreqs).....("w"."awai
5efc0 74 69 6e 67 20 72 65 76 69 65 77 22 20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 72 65 71 75 65 73 74 ting.review"..forge-list-request
5efe0 65 64 2d 72 65 76 69 65 77 73 29 5d 5d 0a 20 20 5b 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 73 65 ed-reviews)]]...[forge--topic-se
5f000 74 2d 73 74 61 74 65 2d 67 72 6f 75 70 0a 20 20 20 5b 22 47 6c 6f 62 61 6c 20 6c 69 73 74 73 22 t-state-group....["Global.lists"
5f020 0a 20 20 20 20 28 22 6f 20 74 22 20 22 6f 77 6e 65 64 20 74 6f 70 69 63 73 22 20 20 20 20 20 20 .....("o.t"."owned.topics"......
5f040 20 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 74 6f 70 69 63 73 29 0a 20 20 20 20 28 ..forge-list-owned-topics).....(
5f060 22 6f 20 69 22 20 22 6f 77 6e 65 64 20 69 73 73 75 65 73 22 20 20 20 20 20 20 20 20 66 6f 72 67 "o.i"."owned.issues"........forg
5f080 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 29 0a 20 20 20 20 28 22 6f 20 70 22 20 e-list-owned-issues).....("o.p".
5f0a0 22 6f 77 6e 65 64 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 22 20 66 6f 72 67 65 2d 6c 69 73 74 "owned.pull-requests".forge-list
5f0c0 2d 6f 77 6e 65 64 2d 70 75 6c 6c 72 65 71 73 29 5d 0a 20 20 20 5b 22 41 63 74 69 6f 6e 73 22 0a -owned-pullreqs)]....["Actions".
5f0e0 20 20 20 20 28 22 66 22 20 22 66 65 74 63 68 20 61 6c 6c 20 74 6f 70 69 63 73 22 20 20 66 6f 72 ....("f"."fetch.all.topics"..for
5f100 67 65 2d 70 75 6c 6c 29 0a 20 20 20 20 28 22 6d 22 20 22 73 68 6f 77 20 6d 6f 72 65 20 61 63 74 ge-pull).....("m"."show.more.act
5f120 69 6f 6e 73 22 20 66 6f 72 67 65 2d 64 69 73 70 61 74 63 68 29 5d 5d 0a 20 20 5b 66 6f 72 67 65 ions".forge-dispatch)]]...[forge
5f140 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 0a 20 20 28 69 6e 74 --topic-set-status-group]...(int
5f160 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 61 74 63 68 20 27 61 64 64 2d 69 6e 73 74 65 61 64 0a eractive)...(catch.'add-instead.
5f180 20 20 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 ....(unless.(derived-mode-p.'for
5f1a0 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 ge-topic-list-mode).......(let.(
5f1c0 28 72 65 70 6f 20 28 66 6f 72 67 65 2d 63 75 72 72 65 6e 74 2d 72 65 70 6f 73 69 74 6f 72 79 29 (repo.(forge-current-repository)
5f1e0 29 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 28 28 6f 72 20 28 )).........(cond..........((or.(
5f200 6e 6f 74 20 72 65 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 67 not.repo)...............(forge-g
5f220 65 74 2d 72 65 70 6f 73 69 74 6f 72 79 20 72 65 70 6f 20 3a 74 72 61 63 6b 65 64 3f 29 29 29 0a et-repository.repo.:tracked?))).
5f240 20 20 20 20 20 20 20 20 20 28 28 79 65 73 2d 6f 72 2d 6e 6f 2d 70 0a 20 20 20 20 20 20 20 20 20 .........((yes-or-no-p..........
5f260 20 20 28 66 6f 72 6d 61 74 20 22 41 64 64 20 25 73 20 74 6f 20 64 61 74 61 62 61 73 65 2c 20 73 ..(format."Add.%s.to.database,.s
5f280 6f 20 69 74 73 20 74 6f 70 69 63 73 20 63 61 6e 20 62 65 20 6c 69 73 74 65 64 3f 22 0a 20 20 20 o.its.topics.can.be.listed?"....
5f2a0 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 73 6c 75 67 29 ................(oref.repo.slug)
5f2c0 29 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 6f 20 23 ))...........(forge--pull.repo.#
5f2e0 27 69 67 6e 6f 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 68 72 6f 77 20 27 61 64 64 2d 69 'ignore)...........(throw.'add-i
5f300 6e 73 74 65 61 64 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 28 73 65 74 71 20 72 65 70 6f 20 nstead.t))..........((setq.repo.
5f320 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 2d 6c 65 74 20 28 28 62 75 66 66 65 72 20 nil))).........(if-let.((buffer.
5f340 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 67 65 74 2d 62 75 66 66 65 72 20 72 65 70 6f 29 29 29 0a (forge-topic-get-buffer.repo))).
5f360 20 20 20 20 20 20 20 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 ............(switch-to-buffer.bu
5f380 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 72 65 70 6f 0a 20 20 20 20 20 20 20 ffer)...........(if.repo........
5f3a0 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 6c 69 73 74 2d 74 6f 70 69 63 73 20 72 65 70 6f 29 0a .......(forge-list-topics.repo).
5f3c0 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 74 6f ............(forge-list-owned-to
5f3e0 70 69 63 73 29 29 29 29 29 0a 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 pics))))).....(transient-setup.'
5f400 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f forge-topics-menu)))..;;;###auto
5f420 6c 6f 61 64 20 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 load.(autoload.'forge-repositori
5f440 65 73 2d 6d 65 6e 75 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 es-menu."forge-list".nil.t).(tra
5f460 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
5f480 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.
5f4a0 6f 66 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 61 6e 64 20 72 65 70 6f 73 69 74 6f 72 79 20 61 of.repositories.and.repository.a
5f4c0 74 20 70 6f 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 t.point."...:transient-suffix.t.
5f4e0 20 20 3a 74 72 61 6e 73 69 65 6e 74 2d 6e 6f 6e 2d 73 75 66 66 69 78 20 27 63 61 6c 6c 0a 20 20 ..:transient-non-suffix.'call...
5f500 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 0a 20 20 3a 72 :transient-switch-frame.nil...:r
5f520 65 66 72 65 73 68 2d 73 75 66 66 69 78 65 73 20 74 0a 20 20 5b 3a 68 69 64 65 20 61 6c 77 61 79 efresh-suffixes.t...[:hide.alway
5f540 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)]...
5f560 5b 5b 22 54 79 70 65 22 0a 20 20 20 20 28 22 74 22 20 22 74 6f 70 69 63 73 2e 2e 2e 22 20 20 20 [["Type".....("t"."topics..."...
5f580 20 20 20 20 20 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 20 20 20 20 20 20 20 3a 74 72 .....forge-topics-menu.......:tr
5f5a0 61 6e 73 69 65 6e 74 20 72 65 70 6c 61 63 65 29 0a 20 20 20 20 28 22 6e 22 20 22 6e 6f 74 69 66 ansient.replace).....("n"."notif
5f5c0 69 63 61 74 69 6f 6e 73 2e 2e 2e 22 20 66 6f 72 67 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 ications...".forge-notifications
5f5e0 2d 6d 65 6e 75 20 3a 74 72 61 6e 73 69 65 6e 74 20 72 65 70 6c 61 63 65 29 0a 20 20 20 20 28 22 -menu.:transient.replace).....("
5f600 72 22 20 22 72 65 70 6f 73 69 74 6f 72 69 65 73 22 20 20 20 20 20 66 6f 72 67 65 2d 6c 69 73 74 r"."repositories".....forge-list
5f620 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 29 5d 0a 20 20 20 5b 22 46 69 6c 74 65 72 22 0a 20 20 20 -repositories)]....["Filter"....
5f640 20 28 22 6f 22 20 22 6f 77 6e 65 64 22 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 72 .("o"."owned".forge-list-owned-r
5f660 65 70 6f 73 69 74 6f 72 69 65 73 29 5d 5d 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 epositories)]]...(interactive)..
5f680 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 65 2d .(unless.(derived-mode-p.'forge-
5f6a0 72 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 28 69 66 2d 6c 65 repository-list-mode).....(if-le
5f6c0 74 20 28 28 62 75 66 66 65 72 20 28 67 65 74 2d 62 75 66 66 65 72 20 66 6f 72 67 65 2d 72 65 70 t.((buffer.(get-buffer.forge-rep
5f6e0 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 29 29 0a 20 20 20 20 ository-list-buffer-name))).....
5f700 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 0a 20 20 ....(switch-to-buffer.buffer)...
5f720 20 20 20 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 20 3b 20 22 69 6e 74 65 72 61 63 ....(with-no-warnings.;."interac
5f740 74 69 76 65 20 75 73 65 20 6f 6e 6c 79 22 0a 20 20 20 20 20 20 20 20 28 66 6f 72 67 65 2d 6c 69 tive.use.only".........(forge-li
5f760 73 74 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 29 29 29 29 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 st-repositories))))...(transient
5f780 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 29 -setup.'forge-repositories-menu)
5f7a0 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 6d 65 6e 75 2d 71 75 69 74 2d 6c 69 73 74 20 28 )..(defun.forge-menu-quit-list.(
5f7c0 29 0a 20 20 22 46 72 6f 6d 20 61 20 74 72 61 6e 73 69 65 6e 74 20 6d 65 6e 75 2c 20 71 75 69 74 )..."From.a.transient.menu,.quit
5f7e0 20 74 68 65 20 6c 69 73 74 20 62 75 66 66 65 72 20 61 6e 64 20 74 68 65 20 6d 65 6e 75 2e 0a 0a .the.list.buffer.and.the.menu...
5f800 49 66 20 71 75 69 74 74 69 6e 67 20 74 68 65 20 6c 69 73 74 20 62 75 66 66 65 72 20 63 61 75 73 If.quitting.the.list.buffer.caus
5f820 65 73 20 61 6e 6f 74 68 65 72 20 74 6f 70 69 63 2c 20 72 65 70 6f 73 69 74 6f 72 79 0a 6f 72 20 es.another.topic,.repository.or.
5f840 6e 6f 74 69 66 69 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 notification.list.buffer.to.beco
5f860 6d 65 73 20 63 75 72 72 65 6e 74 20 69 6e 20 74 68 65 20 73 65 6c 65 63 74 65 64 0a 77 69 6e 64 mes.current.in.the.selected.wind
5f880 6f 77 2c 20 74 68 65 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 ow,.then.display.the.respective.
5f8a0 6d 65 6e 75 2c 20 6f 74 68 65 72 77 69 73 65 20 64 69 73 70 6c 61 79 20 6e 6f 0a 6d 65 6e 75 2e menu,.otherwise.display.no.menu.
5f8c0 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 77 68 65 6e 20 28 64 65 72 69 76 "...(interactive)...(when.(deriv
5f8e0 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 0a 20 20 20 20 ed-mode-p.'forge-topic-mode.....
5f900 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
5f920 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 20 20 20 20 20 20 -list-mode......................
5f940 20 20 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 0a 20 ...'forge-repository-list-mode..
5f960 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 67 65 2d 6e 6f .......................'forge-no
5f980 74 69 66 69 63 61 74 69 6f 6e 73 2d 6d 6f 64 65 29 0a 20 20 20 20 28 71 75 69 74 2d 77 69 6e 64 tifications-mode).....(quit-wind
5f9a0 6f 77 29 29 0a 20 20 28 63 6f 6e 64 20 28 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 66 ow))...(cond.((derived-mode-p.'f
5f9c0 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 28 73 65 74 71 20 orge-topic-mode)..........(setq.
5f9e0 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 20 20 20 transient--exitp.'replace)......
5fa00 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 74 68 69 73 2d ....(transient-setup.(setq.this-
5fa20 63 6f 6d 6d 61 6e 64 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6d 65 6e 75 29 29 29 0a 20 20 20 command.'forge-topic-menu)))....
5fa40 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 74 6f 70 .....((derived-mode-p.'forge-top
5fa60 69 63 2d 6c 69 73 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 72 61 ic-list-mode)..........(setq.tra
5fa80 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 20 20 20 20 20 20 nsient--exitp.'replace).........
5faa0 20 28 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 .(transient-setup.(setq.this-com
5fac0 6d 61 6e 64 20 27 66 6f 72 67 65 2d 74 6f 70 69 63 73 2d 6d 65 6e 75 29 29 29 0a 20 20 20 20 20 mand.'forge-topics-menu)))......
5fae0 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 73 ...((derived-mode-p.'forge-repos
5fb00 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 28 73 65 74 71 20 itory-list-mode)..........(setq.
5fb20 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 20 20 20 transient--exitp.'replace)......
5fb40 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 74 68 69 73 2d ....(transient-setup.(setq.this-
5fb60 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 2d 6d 65 6e 75 command.'forge-repositories-menu
5fb80 29 29 29 0a 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 ))).........((derived-mode-p.'fo
5fba0 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).........
5fbc0 20 28 73 65 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 .(setq.transient--exitp.'replace
5fbe0 29 0a 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 )..........(transient-setup.(set
5fc00 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 69 q.this-command.'forge-notificati
5fc20 6f 6e 73 2d 6d 65 6e 75 29 29 29 0a 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 ons-menu))).........(t..........
5fc40 28 73 65 74 71 20 74 72 61 6e 73 69 65 6e 74 2d 2d 65 78 69 74 70 20 74 29 0a 20 20 20 20 20 20 (setq.transient--exitp.t).......
5fc60 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 2d 70 72 65 2d 65 78 69 74 29 0a 20 20 20 20 20 20 20 ...(transient--pre-exit)........
5fc80 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 2d 73 74 61 63 6b 2d 7a 61 70 29 29 29 29 0a 0a 3b 3b 3b ..(transient--stack-zap))))..;;;
5fca0 3b 20 53 75 66 66 69 78 20 43 6c 61 73 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 66 6f 72 67 65 2d ;.Suffix.Class..(defclass.forge-
5fcc0 2d 74 6f 70 69 63 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 -topic-list-command.(transient-s
5fce0 75 66 66 69 78 29 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 uffix)...((type.......:initarg.:
5fd00 74 79 70 65 20 20 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 type...:initform.nil)....(filter
5fd20 20 20 20 20 20 3a 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 .....:initarg.:filter.:initform.
5fd40 6e 69 6c 29 0a 20 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 nil)....(global.....:initarg.:gl
5fd60 6f 62 61 6c 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 69 6e 61 70 74 2d 69 66 obal.:initform.nil)....(inapt-if
5fd80 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 27 66 ....................:initform.'f
5fda0 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 69 6e 61 70 74 29 0a 20 20 20 28 69 6e 61 70 orge--topic-list-inapt)....(inap
5fdc0 74 2d 66 61 63 65 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 t-face..................:initfor
5fde0 6d 20 6e 69 6c 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 6c 69 m.nil)))..(defun.forge--topic-li
5fe00 73 74 2d 69 6e 61 70 74 20 28 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 74 79 70 65 20 st-inapt.()...(with-slots.(type.
5fe20 66 69 6c 74 65 72 20 67 6c 6f 62 61 6c 29 20 74 72 61 6e 73 69 65 6e 74 2d 2d 70 65 6e 64 69 6e filter.global).transient--pendin
5fe40 67 2d 73 75 66 66 69 78 0a 20 20 20 20 28 61 6e 64 20 28 65 71 20 74 79 70 65 20 20 20 66 6f 72 g-suffix.....(and.(eq.type...for
5fe60 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 74 79 70 65 29 0a 20 20 20 20 20 20 20 20 20 28 ge--buffer-list-type)..........(
5fe80 65 71 20 66 69 6c 74 65 72 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 66 69 6c eq.filter.forge--buffer-list-fil
5fea0 74 65 72 29 0a 20 20 20 20 20 20 20 20 20 28 65 71 20 67 6c 6f 62 61 6c 20 66 6f 72 67 65 2d 2d ter)..........(eq.global.forge--
5fec0 62 75 66 66 65 72 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d buffer-list-global))))..(cl-defm
5fee0 65 74 68 6f 64 20 74 72 61 6e 73 69 65 6e 74 2d 66 6f 72 6d 61 74 2d 64 65 73 63 72 69 70 74 69 ethod.transient-format-descripti
5ff00 6f 6e 20 28 28 6f 62 6a 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6d 6d 61 on.((obj.forge--topic-list-comma
5ff20 6e 64 29 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 64 65 73 63 72 69 70 74 69 6f 6e 20 nd))...(with-slots.(description.
5ff40 74 79 70 65 20 66 69 6c 74 65 72 20 67 6c 6f 62 61 6c 29 20 6f 62 6a 0a 20 20 20 20 28 69 66 20 type.filter.global).obj.....(if.
5ff60 28 61 6e 64 20 28 65 71 20 20 20 74 79 70 65 20 20 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d (and.(eq...type...forge--buffer-
5ff80 6c 69 73 74 2d 74 79 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 66 69 list-type)..............(memq.fi
5ffa0 6c 74 65 72 20 28 6c 69 73 74 20 6e 69 6c 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 lter.(list.nil.forge--buffer-lis
5ffc0 74 2d 66 69 6c 74 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 20 20 67 6c t-filter))..............(eq...gl
5ffe0 6f 62 61 6c 20 66 6f 72 67 65 2d 2d 62 75 66 66 65 72 2d 6c 69 73 74 2d 67 6c 6f 62 61 6c 29 29 obal.forge--buffer-list-global))
60000 0a 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 64 65 73 63 72 69 70 74 69 6f 6e .........(propertize.description
60020 20 27 66 61 63 65 20 27 66 6f 72 67 65 2d 61 63 74 69 76 65 2d 73 75 66 66 69 78 29 0a 20 20 20 .'face.'forge-active-suffix)....
60040 20 20 20 64 65 73 63 72 69 70 74 69 6f 6e 29 29 29 0a 0a 3b 3b 3b 3b 20 54 6f 70 69 63 0a 0a 28 ...description)))..;;;;.Topic..(
60060 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 73 65 74 75 70 20 28 66 defun.forge--topic-list-setup.(f
60080 69 6c 74 65 72 20 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f 20 67 6c 6f 62 61 6c 20 63 ilter.fn.&optional.repo.global.c
600a0 6f 6c 75 6d 6e 73 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 73 65 74 75 olumns)...(forge-topic-list-setu
600c0 70 20 27 74 6f 70 69 63 20 66 69 6c 74 65 72 20 66 6e 20 72 65 70 6f 20 67 6c 6f 62 61 6c 20 63 p.'topic.filter.fn.repo.global.c
600e0 6f 6c 75 6d 6e 73 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f olumns))..;;;###autoload.(autolo
60100 61 64 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 74 6f 70 69 63 73 20 22 66 6f 72 67 65 2d 6c 69 73 ad.'forge-list-topics."forge-lis
60120 74 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 66 t".nil.t).(transient-define-suff
60140 69 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 74 6f 70 69 63 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 ix.forge-list-topics.(&optional.
60160 72 65 70 6f 73 69 74 6f 72 79 29 0a 20 20 22 4c 69 73 74 20 74 6f 70 69 63 73 20 6f 66 20 74 68 repository)..."List.topics.of.th
60180 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 4e 6f 6e 2d 69 6e 74 65 72 61 e.current.repository..Non-intera
601a0 63 74 69 76 65 6c 79 20 69 66 20 6f 70 74 69 6f 6e 61 6c 20 52 45 50 4f 53 49 54 4f 52 59 20 69 ctively.if.optional.REPOSITORY.i
601c0 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 6c 69 73 74 0a 74 6f 70 69 63 73 20 66 6f 72 20 s.non-nil,.then.list.topics.for.
601e0 74 68 61 74 20 69 6e 73 74 65 61 64 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d that.instead."...:class.'forge--
60200 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 74 6f 70 69 63 0a topic-list-command.:type.'topic.
60220 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 2d 74 6f 70 69 63 2d ..(interactive)...(forge--topic-
60240 6c 69 73 74 2d 73 65 74 75 70 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 list-setup.nil..................
60260 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 69 73 73 75 ..........(list.#'forge--ls-issu
60280 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 20 20 20 20 es..............................
602a0 20 20 20 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 70 75 6c 6c 72 65 71 73 29 0a 20 20 20 20 20 20 ....#'forge--ls-pullreqs).......
602c0 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 73 69 74 6f 72 79 29 .....................repository)
602e0 29 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 74 6f 70 69 63 73 20 27 69 6e 74 65 72 ).(put.'forge-list-topics.'inter
60300 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 6c 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 active-only.nil)..;;;###autoload
60320 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 6c 61 62 65 6c 65 64 2d 74 .(autoload.'forge-list-labeled-t
60340 6f 70 69 63 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 opics."forge-list".nil.t).(trans
60360 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 2d 6c 61 ient-define-suffix.forge-list-la
60380 62 65 6c 65 64 2d 74 6f 70 69 63 73 20 28 6c 61 62 65 6c 29 0a 20 20 22 4c 69 73 74 20 74 6f 70 beled-topics.(label)..."List.top
603a0 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 79 20 74 68 ics.of.the.current.repository.th
603c0 61 74 20 68 61 76 65 20 4c 41 42 45 4c 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d at.have.LABEL."...:class.'forge-
603e0 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 74 6f 70 69 63 -topic-list-command.:type.'topic
60400 20 3a 66 69 6c 74 65 72 20 27 6c 61 62 65 6c 65 64 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 .:filter.'labeled...(interactive
60420 20 28 6c 69 73 74 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 29 29 .(list.(forge-read-topic-label))
60440 29 0a 20 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 73 65 74 75 70 20 27 6c 61 )...(forge--topic-list-setup.'la
60460 62 65 6c 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 beled...........................
60480 20 28 6c 69 73 74 20 28 2d 63 75 74 20 66 6f 72 67 65 2d 2d 6c 73 2d 6c 61 62 65 6c 65 64 2d 69 .(list.(-cut.forge--ls-labeled-i
604a0 73 73 75 65 73 20 20 20 3c 3e 20 6c 61 62 65 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ssues...<>.label)...............
604c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 63 75 74 20 66 6f 72 67 65 2d 2d ...................(-cut.forge--
604e0 6c 73 2d 6c 61 62 65 6c 65 64 2d 70 75 6c 6c 72 65 71 73 20 3c 3e 20 6c 61 62 65 6c 29 29 29 29 ls-labeled-pullreqs.<>.label))))
60500 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 ..;;;###autoload.(autoload.'forg
60520 65 2d 6c 69 73 74 2d 61 73 73 69 67 6e 65 64 2d 74 6f 70 69 63 73 20 22 66 6f 72 67 65 2d 6c 69 e-list-assigned-topics."forge-li
60540 73 74 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 st".nil.t).(transient-define-suf
60560 66 69 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 73 73 69 67 6e 65 64 2d 74 6f 70 69 63 73 20 28 fix.forge-list-assigned-topics.(
60580 29 0a 20 20 22 4c 69 73 74 20 74 6f 70 69 63 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 )..."List.topics.of.the.current.
605a0 72 65 70 6f 73 69 74 6f 72 79 20 74 68 61 74 20 61 72 65 20 61 73 73 69 67 6e 65 64 20 74 6f 20 repository.that.are.assigned.to.
605c0 79 6f 75 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 6c 69 73 you."...:class.'forge--topic-lis
605e0 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 74 6f 70 69 63 20 3a 66 69 6c 74 65 72 20 27 t-command.:type.'topic.:filter.'
60600 61 73 73 69 67 6e 65 64 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 assigned...(interactive)...(forg
60620 65 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 73 65 74 75 70 20 27 61 73 73 69 67 6e 65 64 0a 20 20 e--topic-list-setup.'assigned...
60640 20 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 73 74 20 23 .........................(list.#
60660 27 66 6f 72 67 65 2d 2d 6c 73 2d 61 73 73 69 67 6e 65 64 2d 69 73 73 75 65 73 0a 20 20 20 20 20 'forge--ls-assigned-issues......
60680 20 20 20 20 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 ............................#'fo
606a0 72 67 65 2d 2d 6c 73 2d 61 73 73 69 67 6e 65 64 2d 70 75 6c 6c 72 65 71 73 29 29 29 0a 0a 3b 3b rge--ls-assigned-pullreqs)))..;;
606c0 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 ;###autoload.(autoload.'forge-li
606e0 73 74 2d 61 75 74 68 6f 72 65 64 2d 74 6f 70 69 63 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 st-authored-topics."forge-list".
60700 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 66 69 78 20 nil.t).(transient-define-suffix.
60720 66 6f 72 67 65 2d 6c 69 73 74 2d 61 75 74 68 6f 72 65 64 2d 74 6f 70 69 63 73 20 28 29 0a 20 20 forge-list-authored-topics.()...
60740 22 4c 69 73 74 20 6f 70 65 6e 20 74 6f 70 69 63 73 20 66 72 6f 6d 20 74 68 65 20 63 75 72 72 65 "List.open.topics.from.the.curre
60760 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 20 74 68 61 74 20 61 72 65 20 61 75 74 68 6f 72 65 64 20 nt.repository.that.are.authored.
60780 62 79 20 79 6f 75 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 by.you."...:class.'forge--topic-
607a0 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 74 6f 70 69 63 20 3a 66 69 6c 74 65 list-command.:type.'topic.:filte
607c0 72 20 27 61 75 74 68 6f 72 65 64 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 r.'authored...(interactive)...(f
607e0 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 73 65 74 75 70 20 27 61 75 74 68 6f 72 65 64 orge--topic-list-setup.'authored
60800 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 6c 69 73 ............................(lis
60820 74 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 61 75 74 68 6f 72 65 64 2d 69 73 73 75 65 73 0a 20 20 t.#'forge--ls-authored-issues...
60840 20 20 20 20 20 20 20 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 ...............................#
60860 27 66 6f 72 67 65 2d 2d 6c 73 2d 61 75 74 68 6f 72 65 64 2d 70 75 6c 6c 72 65 71 73 29 29 29 0a 'forge--ls-authored-pullreqs))).
60880 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 .;;;###autoload.(autoload.'forge
608a0 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 74 6f 70 69 63 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 -list-owned-topics."forge-list".
608c0 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 66 69 78 20 nil.t).(transient-define-suffix.
608e0 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 74 6f 70 69 63 73 20 28 29 0a 20 20 22 4c 69 forge-list-owned-topics.()..."Li
60900 73 74 20 6f 70 65 6e 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 66 72 6f 6d 20 61 6c 6c 20 79 st.open.pull-requests.from.all.y
60920 6f 75 72 20 47 69 74 68 75 62 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 0a 4f 70 74 69 6f 6e 73 our.Github.repositories..Options
60940 20 60 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e 74 73 27 20 61 6e 64 20 60 66 6f 72 .`forge-owned-accounts'.and.`for
60960 67 65 2d 6f 77 6e 65 64 2d 69 67 6e 6f 72 65 64 27 0a 63 6f 6e 74 72 6f 6c 73 20 77 68 69 63 68 ge-owned-ignored'.controls.which
60980 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 74 6f 20 .repositories.are.considered.to.
609a0 62 65 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 2e 0a 4f 6e 6c 79 20 47 69 74 68 75 62 20 69 73 20 be.owned.by.you..Only.Github.is.
609c0 73 75 70 70 6f 72 74 65 64 20 66 6f 72 20 6e 6f 77 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f supported.for.now."...:class.'fo
609e0 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 74 rge--topic-list-command.:type.'t
60a00 6f 70 69 63 20 3a 66 69 6c 74 65 72 20 27 6f 77 6e 65 64 20 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 opic.:filter.'owned.:global.t...
60a20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 69 (interactive)...(forge--topic-li
60a40 73 74 2d 73 65 74 75 70 20 27 6f 77 6e 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 st-setup.'owned.................
60a60 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 6c 61 6d 62 64 61 20 28 5f 29 20 28 66 6f ...........(list.(lambda.(_).(fo
60a80 72 67 65 2d 2d 6c 73 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 rge--ls-owned-issues))..........
60aa0 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 61 6d 62 64 61 20 ........................(lambda.
60ac0 28 5f 29 20 28 66 6f 72 67 65 2d 2d 6c 73 2d 6f 77 6e 65 64 2d 70 75 6c 6c 72 65 71 73 29 29 29 (_).(forge--ls-owned-pullreqs)))
60ae0 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 6e 69 6c 20 ............................nil.
60b00 74 20 66 6f 72 67 65 2d 67 6c 6f 62 61 6c 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6c 75 6d 6e t.forge-global-topic-list-column
60b20 73 29 29 0a 28 70 75 74 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 74 6f 70 69 63 s)).(put.'forge-list-owned-topic
60b40 73 20 27 69 6e 74 65 72 61 63 74 69 76 65 2d 6f 6e 6c 79 20 6e 69 6c 29 0a 0a 3b 3b 3b 3b 20 49 s.'interactive-only.nil)..;;;;.I
60b60 73 73 75 65 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 69 73 73 75 65 2d 6c 69 73 74 2d 73 ssue..(defun.forge--issue-list-s
60b80 65 74 75 70 20 28 66 69 6c 74 65 72 20 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 72 65 70 6f 20 67 etup.(filter.fn.&optional.repo.g
60ba0 6c 6f 62 61 6c 20 63 6f 6c 75 6d 6e 73 29 0a 20 20 28 66 6f 72 67 65 2d 74 6f 70 69 63 2d 6c 69 lobal.columns)...(forge-topic-li
60bc0 73 74 2d 73 65 74 75 70 20 27 69 73 73 75 65 20 66 69 6c 74 65 72 20 66 6e 20 72 65 70 6f 20 67 st-setup.'issue.filter.fn.repo.g
60be0 6c 6f 62 61 6c 20 63 6f 6c 75 6d 6e 73 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 lobal.columns))..;;;###autoload.
60c00 28 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 (autoload.'forge-list-issues."fo
60c20 72 67 65 2d 6c 69 73 74 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 rge-list".nil.t).(transient-defi
60c40 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 29 0a 20 ne-suffix.forge-list-issues.()..
60c60 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 74 20 72 65 70 ."List.issues.of.the.current.rep
60c80 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 70 69 63 ository."...:class.'forge--topic
60ca0 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 69 73 73 75 65 0a 20 20 28 69 6e -list-command.:type.'issue...(in
60cc0 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 69 73 73 75 65 2d 6c 69 73 74 2d teractive)...(forge--issue-list-
60ce0 73 65 74 75 70 20 6e 69 6c 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 69 73 73 75 65 73 29 29 0a 0a setup.nil.#'forge--ls-issues))..
60d00 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d ;;;###autoload.(autoload.'forge-
60d20 6c 69 73 74 2d 6c 61 62 65 6c 65 64 2d 69 73 73 75 65 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 list-labeled-issues."forge-list"
60d40 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 66 69 78 .nil.t).(transient-define-suffix
60d60 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6c 61 62 65 6c 65 64 2d 69 73 73 75 65 73 20 28 6c 61 62 65 .forge-list-labeled-issues.(labe
60d80 6c 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 74 l)..."List.issues.of.the.current
60da0 20 72 65 70 6f 73 69 74 6f 72 79 20 74 68 61 74 20 68 61 76 65 20 4c 41 42 45 4c 2e 22 0a 20 20 .repository.that.have.LABEL."...
60dc0 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e :class.'forge--topic-list-comman
60de0 64 20 3a 74 79 70 65 20 27 69 73 73 75 65 20 3a 66 69 6c 74 65 72 20 27 6c 61 62 65 6c 65 64 0a d.:type.'issue.:filter.'labeled.
60e00 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 64 ..(interactive.(list.(forge-read
60e20 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 29 29 29 0a 20 20 28 66 6f 72 67 65 2d 2d 69 73 73 75 65 2d -topic-label)))...(forge--issue-
60e40 6c 69 73 74 2d 73 65 74 75 70 20 27 6c 61 62 65 6c 65 64 20 28 2d 63 75 74 20 66 6f 72 67 65 2d list-setup.'labeled.(-cut.forge-
60e60 2d 6c 73 2d 6c 61 62 65 6c 65 64 2d 69 73 73 75 65 73 20 3c 3e 20 6c 61 62 65 6c 29 29 29 0a 0a -ls-labeled-issues.<>.label)))..
60e80 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d ;;;###autoload.(autoload.'forge-
60ea0 6c 69 73 74 2d 61 73 73 69 67 6e 65 64 2d 69 73 73 75 65 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 list-assigned-issues."forge-list
60ec0 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 66 69 ".nil.t).(transient-define-suffi
60ee0 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 73 73 69 67 6e 65 64 2d 69 73 73 75 65 73 20 28 29 0a x.forge-list-assigned-issues.().
60f00 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 74 20 72 65 .."List.issues.of.the.current.re
60f20 70 6f 73 69 74 6f 72 79 20 74 68 61 74 20 61 72 65 20 61 73 73 69 67 6e 65 64 20 74 6f 20 79 6f pository.that.are.assigned.to.yo
60f40 75 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 6c 69 73 74 2d u."...:class.'forge--topic-list-
60f60 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 69 73 73 75 65 20 3a 66 69 6c 74 65 72 20 27 61 73 command.:type.'issue.:filter.'as
60f80 73 69 67 6e 65 64 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 signed...(interactive)...(forge-
60fa0 2d 69 73 73 75 65 2d 6c 69 73 74 2d 73 65 74 75 70 20 27 61 73 73 69 67 6e 65 64 20 23 27 66 6f -issue-list-setup.'assigned.#'fo
60fc0 72 67 65 2d 2d 6c 73 2d 61 73 73 69 67 6e 65 64 2d 69 73 73 75 65 73 29 29 0a 0a 3b 3b 3b 23 23 rge--ls-assigned-issues))..;;;##
60fe0 23 61 75 74 6f 6c 6f 61 64 20 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-
61000 61 75 74 68 6f 72 65 64 2d 69 73 73 75 65 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 6e 69 6c authored-issues."forge-list".nil
61020 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
61040 67 65 2d 6c 69 73 74 2d 61 75 74 68 6f 72 65 64 2d 69 73 73 75 65 73 20 28 29 0a 20 20 22 4c 69 ge-list-authored-issues.()..."Li
61060 73 74 20 6f 70 65 6e 20 69 73 73 75 65 73 20 66 72 6f 6d 20 74 68 65 20 63 75 72 72 65 6e 74 20 st.open.issues.from.the.current.
61080 72 65 70 6f 73 69 74 6f 72 79 20 74 68 61 74 20 61 72 65 20 61 75 74 68 6f 72 65 64 20 62 79 20 repository.that.are.authored.by.
610a0 79 6f 75 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 6c 69 73 you."...:class.'forge--topic-lis
610c0 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 69 73 73 75 65 20 3a 66 69 6c 74 65 72 20 27 t-command.:type.'issue.:filter.'
610e0 61 75 74 68 6f 72 65 64 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 authored...(interactive)...(forg
61100 65 2d 2d 69 73 73 75 65 2d 6c 69 73 74 2d 73 65 74 75 70 20 27 61 75 74 68 6f 72 65 64 20 23 27 e--issue-list-setup.'authored.#'
61120 66 6f 72 67 65 2d 2d 6c 73 2d 61 75 74 68 6f 72 65 64 2d 69 73 73 75 65 73 29 29 0a 0a 3b 3b 3b forge--ls-authored-issues))..;;;
61140 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 73 ###autoload.(autoload.'forge-lis
61160 74 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 6e 69 6c 20 t-owned-issues."forge-list".nil.
61180 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
611a0 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 20 28 29 0a 20 20 22 4c 69 73 74 20 6f e-list-owned-issues.()..."List.o
611c0 70 65 6e 20 69 73 73 75 65 73 20 66 72 6f 6d 20 61 6c 6c 20 79 6f 75 72 20 47 69 74 68 75 62 20 pen.issues.from.all.your.Github.
611e0 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 0a 4f 70 74 69 6f 6e 73 20 60 66 6f 72 67 65 2d 6f 77 6e repositories..Options.`forge-own
61200 65 64 2d 61 63 63 6f 75 6e 74 73 27 20 61 6e 64 20 60 66 6f 72 67 65 2d 6f 77 6e 65 64 2d 69 67 ed-accounts'.and.`forge-owned-ig
61220 6e 6f 72 65 64 27 0a 63 6f 6e 74 72 6f 6c 73 20 77 68 69 63 68 20 72 65 70 6f 73 69 74 6f 72 69 nored'.controls.which.repositori
61240 65 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 74 6f 20 62 65 20 6f 77 6e 65 64 20 62 79 es.are.considered.to.be.owned.by
61260 20 79 6f 75 2e 0a 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 66 .you..Only.Github.is.supported.f
61280 6f 72 20 6e 6f 77 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 or.now."...:class.'forge--topic-
612a0 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 69 73 73 75 65 20 3a 66 69 6c 74 65 list-command.:type.'issue.:filte
612c0 72 20 27 6f 77 6e 65 64 20 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 r.'owned.:global.t...(interactiv
612e0 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 69 73 73 75 65 2d 6c 69 73 74 2d 73 65 74 75 70 20 27 6f e)...(forge--issue-list-setup.'o
61300 77 6e 65 64 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 6f 77 6e 65 64 2d 69 73 73 75 65 73 0a 20 20 wned.#'forge--ls-owned-issues...
61320 20 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 74 20 66 .........................nil.t.f
61340 6f 72 67 65 2d 67 6c 6f 62 61 6c 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 29 29 orge-global-topic-list-columns))
61360 0a 0a 3b 3b 3b 3b 20 50 75 6c 6c 72 65 71 0a 0a 28 64 65 66 75 6e 20 66 6f 72 67 65 2d 2d 70 75 ..;;;;.Pullreq..(defun.forge--pu
61380 6c 6c 72 65 71 2d 6c 69 73 74 2d 73 65 74 75 70 20 28 66 69 6c 74 65 72 20 66 6e 20 26 6f 70 74 llreq-list-setup.(filter.fn.&opt
613a0 69 6f 6e 61 6c 20 72 65 70 6f 20 67 6c 6f 62 61 6c 20 63 6f 6c 75 6d 6e 73 29 0a 20 20 28 66 6f ional.repo.global.columns)...(fo
613c0 72 67 65 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 73 65 74 75 70 20 27 70 75 6c 6c 72 65 71 20 66 69 rge-topic-list-setup.'pullreq.fi
613e0 6c 74 65 72 20 66 6e 20 72 65 70 6f 20 67 6c 6f 62 61 6c 20 63 6f 6c 75 6d 6e 73 29 29 0a 0a 3b lter.fn.repo.global.columns))..;
61400 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c ;;###autoload.(autoload.'forge-l
61420 69 73 74 2d 70 75 6c 6c 72 65 71 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 6e 69 6c 20 74 29 ist-pullreqs."forge-list".nil.t)
61440 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-
61460 6c 69 73 74 2d 70 75 6c 6c 72 65 71 73 20 28 29 0a 20 20 22 4c 69 73 74 20 70 75 6c 6c 2d 72 65 list-pullreqs.()..."List.pull-re
61480 71 75 65 73 74 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 quests.of.the.current.repository
614a0 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 6c 69 73 74 2d 63 ."...:class.'forge--topic-list-c
614c0 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 70 75 6c 6c 72 65 71 0a 20 20 28 69 6e 74 65 72 61 63 ommand.:type.'pullreq...(interac
614e0 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 6c 69 73 74 2d 73 65 74 tive)...(forge--pullreq-list-set
61500 75 70 20 6e 69 6c 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 70 75 6c 6c 72 65 71 73 29 29 0a 0a 3b up.nil.#'forge--ls-pullreqs))..;
61520 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c ;;###autoload.(autoload.'forge-l
61540 69 73 74 2d 6c 61 62 65 6c 65 64 2d 70 75 6c 6c 72 65 71 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 ist-labeled-pullreqs."forge-list
61560 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 66 69 ".nil.t).(transient-define-suffi
61580 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 6c 61 62 65 6c 65 64 2d 70 75 6c 6c 72 65 71 73 20 28 6c x.forge-list-labeled-pullreqs.(l
615a0 61 62 65 6c 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 abel)..."List.pull-requests.of.t
615c0 68 65 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 20 74 68 61 74 20 68 61 76 65 20 he.current.repository.that.have.
615e0 4c 41 42 45 4c 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 6c LABEL."...:class.'forge--topic-l
61600 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 70 75 6c 6c 72 65 71 20 3a 66 69 6c 74 ist-command.:type.'pullreq.:filt
61620 65 72 20 27 6c 61 62 65 6c 65 64 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 er.'labeled...(interactive.(list
61640 20 28 66 6f 72 67 65 2d 72 65 61 64 2d 74 6f 70 69 63 2d 6c 61 62 65 6c 29 29 29 0a 20 20 28 66 .(forge-read-topic-label)))...(f
61660 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 6c 69 73 74 2d 73 65 74 75 70 20 27 6c 61 62 65 6c 65 orge--pullreq-list-setup.'labele
61680 64 20 28 2d 63 75 74 20 66 6f 72 67 65 2d 2d 6c 73 2d 6c 61 62 65 6c 65 64 2d 70 75 6c 6c 72 65 d.(-cut.forge--ls-labeled-pullre
616a0 71 73 20 3c 3e 20 6c 61 62 65 6c 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 qs.<>.label)))..;;;###autoload.(
616c0 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 61 73 73 69 67 6e 65 64 2d 70 75 autoload.'forge-list-assigned-pu
616e0 6c 6c 72 65 71 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e llreqs."forge-list".nil.t).(tran
61700 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 2d 61 sient-define-suffix.forge-list-a
61720 73 73 69 67 6e 65 64 2d 70 75 6c 6c 72 65 71 73 20 28 29 0a 20 20 22 4c 69 73 74 20 70 75 6c 6c ssigned-pullreqs.()..."List.pull
61740 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 72 65 70 6f 73 69 74 -requests.of.the.current.reposit
61760 6f 72 79 20 74 68 61 74 20 61 72 65 20 61 73 73 69 67 6e 65 64 20 74 6f 20 79 6f 75 2e 22 0a 20 ory.that.are.assigned.to.you."..
61780 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6d 6d 61 .:class.'forge--topic-list-comma
617a0 6e 64 20 3a 74 79 70 65 20 27 70 75 6c 6c 72 65 71 20 3a 66 69 6c 74 65 72 20 27 61 73 73 69 67 nd.:type.'pullreq.:filter.'assig
617c0 6e 65 64 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 2d 70 75 ned...(interactive)...(forge--pu
617e0 6c 6c 72 65 71 2d 6c 69 73 74 2d 73 65 74 75 70 20 27 61 73 73 69 67 6e 65 64 20 23 27 66 6f 72 llreq-list-setup.'assigned.#'for
61800 67 65 2d 2d 6c 73 2d 61 73 73 69 67 6e 65 64 2d 70 75 6c 6c 72 65 71 73 29 29 0a 0a 3b 3b 3b 23 ge--ls-assigned-pullreqs))..;;;#
61820 23 23 61 75 74 6f 6c 6f 61 64 20 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
61840 2d 72 65 71 75 65 73 74 65 64 2d 72 65 76 69 65 77 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 -requested-reviews."forge-list".
61860 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 66 69 78 20 nil.t).(transient-define-suffix.
61880 66 6f 72 67 65 2d 6c 69 73 74 2d 72 65 71 75 65 73 74 65 64 2d 72 65 76 69 65 77 73 20 28 29 0a forge-list-requested-reviews.().
618a0 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 75 72 .."List.pull-requests.of.the.cur
618c0 72 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 20 74 68 61 74 20 61 72 65 20 61 77 61 69 74 69 6e rent.repository.that.are.awaitin
618e0 67 20 79 6f 75 72 20 72 65 76 69 65 77 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d g.your.review."...:class.'forge-
61900 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 70 75 6c 6c 72 -topic-list-command.:type.'pullr
61920 65 71 20 3a 66 69 6c 74 65 72 20 27 72 65 76 69 65 77 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 eq.:filter.'review...(interactiv
61940 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 6c 69 73 74 2d 73 65 74 75 70 20 e)...(forge--pullreq-list-setup.
61960 27 72 65 76 69 65 77 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 72 65 71 75 65 73 74 65 64 2d 72 65 'review.#'forge--ls-requested-re
61980 76 69 65 77 73 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 views))..;;;###autoload.(autoloa
619a0 64 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 61 75 74 68 6f 72 65 64 2d 70 75 6c 6c 72 65 71 73 20 d.'forge-list-authored-pullreqs.
619c0 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 "forge-list".nil.t).(transient-d
619e0 65 66 69 6e 65 2d 73 75 66 66 69 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 61 75 74 68 6f 72 65 64 efine-suffix.forge-list-authored
61a00 2d 70 75 6c 6c 72 65 71 73 20 28 29 0a 20 20 22 4c 69 73 74 20 6f 70 65 6e 20 70 75 6c 6c 2d 72 -pullreqs.()..."List.open.pull-r
61a20 65 71 75 65 73 74 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 equests.of.the.current.repositor
61a40 79 20 74 68 61 74 20 61 72 65 20 61 75 74 68 6f 72 65 64 20 62 79 20 79 6f 75 2e 22 0a 20 20 3a y.that.are.authored.by.you."...:
61a60 63 6c 61 73 73 20 27 66 6f 72 67 65 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 class.'forge--topic-list-command
61a80 20 3a 74 79 70 65 20 27 70 75 6c 6c 72 65 71 20 3a 66 69 6c 74 65 72 20 27 61 75 74 68 6f 72 65 .:type.'pullreq.:filter.'authore
61aa0 64 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 2d 70 75 6c 6c d...(interactive)...(forge--pull
61ac0 72 65 71 2d 6c 69 73 74 2d 73 65 74 75 70 20 27 61 75 74 68 6f 72 65 64 20 23 27 66 6f 72 67 65 req-list-setup.'authored.#'forge
61ae0 2d 2d 6c 73 2d 61 75 74 68 6f 72 65 64 2d 70 75 6c 6c 72 65 71 73 29 29 0a 0a 3b 3b 3b 23 23 23 --ls-authored-pullreqs))..;;;###
61b00 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 6f autoload.(autoload.'forge-list-o
61b20 77 6e 65 64 2d 70 75 6c 6c 72 65 71 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 6e 69 6c 20 74 wned-pullreqs."forge-list".nil.t
61b40 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 65 ).(transient-define-suffix.forge
61b60 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 70 75 6c 6c 72 65 71 73 20 28 29 0a 20 20 22 4c 69 73 74 20 -list-owned-pullreqs.()..."List.
61b80 6f 70 65 6e 20 70 75 6c 6c 2d 72 65 71 75 65 73 74 73 20 66 72 6f 6d 20 61 6c 6c 20 79 6f 75 72 open.pull-requests.from.all.your
61ba0 20 47 69 74 68 75 62 20 72 65 70 6f 73 69 74 6f 72 69 65 73 2e 0a 4f 70 74 69 6f 6e 73 20 60 66 .Github.repositories..Options.`f
61bc0 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e 74 73 27 20 61 6e 64 20 60 66 6f 72 67 65 2d orge-owned-accounts'.and.`forge-
61be0 6f 77 6e 65 64 2d 69 67 6e 6f 72 65 64 27 0a 63 6f 6e 74 72 6f 6c 73 20 77 68 69 63 68 20 72 65 owned-ignored'.controls.which.re
61c00 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 74 6f 20 62 65 20 positories.are.considered.to.be.
61c20 6f 77 6e 65 64 20 62 79 20 79 6f 75 2e 0a 4f 6e 6c 79 20 47 69 74 68 75 62 20 69 73 20 73 75 70 owned.by.you..Only.Github.is.sup
61c40 70 6f 72 74 65 64 20 66 6f 72 20 6e 6f 77 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 ported.for.now."...:class.'forge
61c60 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 70 75 6c 6c --topic-list-command.:type.'pull
61c80 72 65 71 20 3a 66 69 6c 74 65 72 20 27 6f 77 6e 65 64 20 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 28 req.:filter.'owned.:global.t...(
61ca0 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 2d 70 75 6c 6c 72 65 71 2d 6c interactive)...(forge--pullreq-l
61cc0 69 73 74 2d 73 65 74 75 70 20 27 6f 77 6e 65 64 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 6f 77 6e ist-setup.'owned.#'forge--ls-own
61ce0 65 64 2d 70 75 6c 6c 72 65 71 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ed-pullreqs.....................
61d00 20 20 20 20 20 20 20 20 20 6e 69 6c 20 74 20 66 6f 72 67 65 2d 67 6c 6f 62 61 6c 2d 74 6f 70 69 .........nil.t.forge-global-topi
61d20 63 2d 6c 69 73 74 2d 63 6f 6c 75 6d 6e 73 29 29 0a 0a 3b 3b 3b 3b 20 52 65 70 6f 73 69 74 6f 72 c-list-columns))..;;;;.Repositor
61d40 79 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 y..;;;###autoload.(autoload.'for
61d60 67 65 2d 6c 69 73 74 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 ge-list-repositories."forge-list
61d80 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 66 69 ".nil.t).(transient-define-suffi
61da0 78 20 66 6f 72 67 65 2d 6c 69 73 74 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 20 28 29 0a 20 20 22 x.forge-list-repositories.()..."
61dc0 4c 69 73 74 20 6b 6e 6f 77 6e 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 69 6e 20 61 20 73 65 70 List.known.repositories.in.a.sep
61de0 61 72 61 74 65 20 62 75 66 66 65 72 2e 0a 48 65 72 65 20 5c 22 6b 6e 6f 77 6e 5c 22 20 6d 65 61 arate.buffer..Here.\"known\".mea
61e00 6e 73 20 74 68 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 ns.that.an.entry.exists.in.the.l
61e20 6f 63 61 6c 20 64 61 74 61 62 61 73 65 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 2d ocal.database."...:class.'forge-
61e40 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 72 65 70 6f 20 -topic-list-command.:type.'repo.
61e60 3a 67 6c 6f 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 :global.t...(interactive)...(for
61e80 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
61ea0 6f 72 67 65 2d 2d 6c 73 2d 72 65 70 6f 73 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 orge--ls-repos))..;;;###autoload
61ec0 20 28 61 75 74 6f 6c 6f 61 64 20 27 66 6f 72 67 65 2d 6c 69 73 74 2d 6f 77 6e 65 64 2d 72 65 70 .(autoload.'forge-list-owned-rep
61ee0 6f 73 69 74 6f 72 69 65 73 20 22 66 6f 72 67 65 2d 6c 69 73 74 22 20 6e 69 6c 20 74 29 0a 28 74 ositories."forge-list".nil.t).(t
61f00 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 6c 69 73 ransient-define-suffix.forge-lis
61f20 74 2d 6f 77 6e 65 64 2d 72 65 70 6f 73 69 74 6f 72 69 65 73 20 28 29 0a 20 20 22 4c 69 73 74 20 t-owned-repositories.()..."List.
61f40 79 6f 75 72 20 6f 77 6e 20 6b 6e 6f 77 6e 20 72 65 70 6f 73 69 74 6f 72 69 65 73 20 69 6e 20 61 your.own.known.repositories.in.a
61f60 20 73 65 70 61 72 61 74 65 20 62 75 66 66 65 72 2e 0a 48 65 72 65 20 5c 22 6b 6e 6f 77 6e 5c 22 .separate.buffer..Here.\"known\"
61f80 20 6d 65 61 6e 73 20 74 68 61 74 20 61 6e 20 65 6e 74 72 79 20 65 78 69 73 74 73 20 69 6e 20 74 .means.that.an.entry.exists.in.t
61fa0 68 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 0a 61 6e 64 20 6f 70 74 69 6f 6e 73 20 60 66 he.local.database.and.options.`f
61fc0 6f 72 67 65 2d 6f 77 6e 65 64 2d 61 63 63 6f 75 6e 74 73 27 20 61 6e 64 20 60 66 6f 72 67 65 2d orge-owned-accounts'.and.`forge-
61fe0 6f 77 6e 65 64 2d 69 67 6e 6f 72 65 64 27 0a 63 6f 6e 74 72 6f 6c 73 20 77 68 69 63 68 20 72 65 owned-ignored'.controls.which.re
62000 70 6f 73 69 74 6f 72 69 65 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 74 6f 20 62 65 20 positories.are.considered.to.be.
62020 6f 77 6e 65 64 20 62 79 20 79 6f 75 2e 0a 4f 6e 6c 79 20 47 69 74 68 75 62 20 69 73 20 73 75 70 owned.by.you..Only.Github.is.sup
62040 70 6f 72 74 65 64 20 66 6f 72 20 6e 6f 77 2e 22 0a 20 20 3a 63 6c 61 73 73 20 27 66 6f 72 67 65 ported.for.now."...:class.'forge
62060 2d 2d 74 6f 70 69 63 2d 6c 69 73 74 2d 63 6f 6d 6d 61 6e 64 20 3a 74 79 70 65 20 27 72 65 70 6f --topic-list-command.:type.'repo
62080 20 3a 66 69 6c 74 65 72 20 27 6f 77 6e 65 64 20 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 28 69 6e 74 .:filter.'owned.:global.t...(int
620a0 65 72 61 63 74 69 76 65 29 0a 20 20 28 66 6f 72 67 65 2d 72 65 70 6f 73 69 74 6f 72 79 2d 6c 69 eractive)...(forge-repository-li
620c0 73 74 2d 73 65 74 75 70 20 27 6f 77 6e 65 64 20 23 27 66 6f 72 67 65 2d 2d 6c 73 2d 6f 77 6e 65 st-setup.'owned.#'forge--ls-owne
620e0 64 2d 72 65 70 6f 73 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 d-repos))..;;;._.(provide.'forge
62100 2d 6c 69 73 74 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 6c 69 73 74 2e 65 6c 20 65 6e 64 73 20 68 65 -list).;;;.forge-list.el.ends.he
62120 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..............................
62140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
621a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
621c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
621e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62200 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 70 6b 67 2e 65 6c forge-20240405.1509/forge-pkg.el
62220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62260 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
62280 30 30 30 31 31 37 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 33 32 30 00 20 30 00 00 00 0001174.00000000000.014320..0...
622a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
622c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
622e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62300 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...................
62320 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...................
62340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
623a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
623c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
623e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62400 28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 22 66 6f 72 67 65 22 20 22 32 30 32 34 30 34 30 (define-package."forge"."2024040
62420 35 2e 31 35 30 39 22 20 22 41 63 63 65 73 73 20 47 69 74 20 66 6f 72 67 65 73 20 66 72 6f 6d 20 5.1509"."Access.Git.forges.from.
62440 4d 61 67 69 74 2e 22 0a 20 20 27 28 28 65 6d 61 63 73 20 22 32 35 2e 31 22 29 0a 20 20 20 20 28 Magit."...'((emacs."25.1").....(
62460 63 6f 6d 70 61 74 20 22 32 39 2e 31 2e 34 2e 34 22 29 0a 20 20 20 20 28 63 6c 6f 73 71 6c 20 22 compat."29.1.4.4").....(closql."
62480 32 30 32 34 30 31 32 35 22 29 0a 20 20 20 20 28 64 61 73 68 20 22 32 2e 31 39 2e 31 22 29 0a 20 20240125").....(dash."2.19.1")..
624a0 20 20 20 28 65 6d 61 63 73 71 6c 20 22 32 30 32 34 30 31 32 34 22 29 0a 20 20 20 20 28 67 68 75 ...(emacsql."20240124").....(ghu
624c0 62 20 22 32 30 32 34 30 31 30 31 22 29 0a 20 20 20 20 28 6c 65 74 2d 61 6c 69 73 74 20 22 31 2e b."20240101").....(let-alist."1.
624e0 30 2e 36 22 29 0a 20 20 20 20 28 6d 61 67 69 74 20 22 32 30 32 34 30 31 32 35 22 29 0a 20 20 20 0.6").....(magit."20240125")....
62500 20 28 6d 61 72 6b 64 6f 77 6e 2d 6d 6f 64 65 20 22 32 2e 36 22 29 0a 20 20 20 20 28 73 65 71 20 .(markdown-mode."2.6").....(seq.
62520 22 32 2e 32 34 22 29 0a 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 20 22 32 30 32 34 30 32 30 31 "2.24").....(transient."20240201
62540 22 29 0a 20 20 20 20 28 79 61 6d 6c 20 22 30 2e 35 2e 35 22 29 29 0a 20 20 3a 63 6f 6d 6d 69 74 ").....(yaml."0.5.5"))...:commit
62560 20 22 64 32 32 38 35 37 34 30 37 37 36 39 35 66 38 30 31 65 32 66 34 38 38 36 34 32 65 61 31 65 ."d228574077695f801e2f488642ea1e
62580 30 32 31 65 39 39 61 30 63 31 22 20 3a 61 75 74 68 6f 72 73 0a 20 20 27 28 28 22 4a 6f 6e 61 73 021e99a0c1".:authors...'(("Jonas
625a0 20 42 65 72 6e 6f 75 6c 6c 69 22 20 2e 20 22 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 22 .Bernoulli"..."jonas@bernoul.li"
625c0 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 0a 20 20 27 28 22 4a 6f 6e 61 73 20 42 65 72 6e ))...:maintainer...'("Jonas.Bern
625e0 6f 75 6c 6c 69 22 20 2e 20 22 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 22 29 0a 20 20 3a oulli"..."jonas@bernoul.li")...:
62600 6b 65 79 77 6f 72 64 73 0a 20 20 27 28 22 67 69 74 22 20 22 74 6f 6f 6c 73 22 20 22 76 63 22 29 keywords...'("git"."tools"."vc")
62620 0a 20 20 3a 75 72 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 ...:url."https://github.com/magi
62640 74 2f 66 6f 72 67 65 22 29 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b t/forge").;;.Local.Variables:.;;
62660 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 0a 3b 3b 20 45 6e 64 3a 0a 00 00 00 00 .no-byte-compile:.t.;;.End:.....
62680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
626a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
626c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
626e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
627a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
627c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
627e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62800 66 6f 72 67 65 2d 32 30 32 34 30 34 30 35 2e 31 35 30 39 2f 66 6f 72 67 65 2d 72 65 76 6e 6f 74 forge-20240405.1509/forge-revnot
62820 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............................
62840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62860 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
62880 30 30 30 33 31 31 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 32 31 34 00 20 30 00 00 00 0003113.00000000000.015214..0...
628a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
628c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
628e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62900 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...................
62920 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...................
62940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
629a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
629c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
629e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62a00 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
62a20 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.
62a40 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 34 20 -*-..;;.Copyright.(C).2018-2024.
62a60 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
62a80 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 2e 6c 69 3e 0a 3b s.Bernoulli.<jonas@bernoul.li>.;
62aa0 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 6c 6c 69 20 3c 6a ;.Maintainer:.Jonas.Bernoulli.<j
62ac0 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 4c 69 63 65 6e 73 onas@bernoul.li>..;;.SPDX-Licens
62ae0 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 0a e-Identifier:.GPL-3.0-or-later..
62b00 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 79 ;;.This.file.is.free.software:.y
62b20 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 6f ou.can.redistribute.it.and/or.mo
62b40 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 68 dify.;;.it.under.the.terms.of.th
62b60 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 20 e.GNU.General.Public.License.as.
62b80 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 72 published.;;.by.the.Free.Softwar
62ba0 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 6f e.Foundation,.either.version.3.o
62bc0 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 70 f.the.License,.;;.or.(at.your.op
62be0 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 54 tion).any.later.version..;;.;;.T
62c00 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 68 his.file.is.distributed.in.the.h
62c20 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 62 ope.that.it.will.be.useful,.;;.b
62c40 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 74 ut.WITHOUT.ANY.WARRANTY;.without
62c60 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 3b .even.the.implied.warranty.of.;;
62c80 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 20 .MERCHANTABILITY.or.FITNESS.FOR.
62ca0 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 3b A.PARTICULAR.PURPOSE...See.the.;
62cc0 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 72 ;.GNU.General.Public.License.for
62ce0 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 20 .more.details..;;.;;.You.should.
62d00 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 20 have.received.a.copy.of.the.GNU.
62d20 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 20 General.Public.License.;;.along.
62d40 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 74 with.this.file...If.not,.see.<ht
62d60 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 3b tps://www.gnu.org/licenses/>...;
62d80 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 28 72 65 71 75 ;;.Code:..(require.'forge).(requ
62da0 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 27 66 6f 72 67 65 ire.'forge-post).(require.'forge
62dc0 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 61 73 73 20 66 6f -topic)..;;;.Class..(defclass.fo
62de0 72 67 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 rge-revnote.(forge-topic)...((cl
62e00 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 72 65 osql-table.........:initform.'re
62e20 76 6e 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 vnote)....(closql-primary-key...
62e40 3a 69 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 :initform.'id)....;;.(closql-ord
62e60 65 72 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 er-by......:initform.[(desc.numb
62e80 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...:
62ea0 69 6e 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 initform.'repository)....(closql
62ec0 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 2d -class-prefix..:initform."forge-
62ee0 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 20 3a 69 6e 69 ")....(id...................:ini
62f00 74 61 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 targ.:id)....(repository........
62f20 20 20 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 ...:initarg.:repository)....(com
62f40 6d 69 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 mit...............:initarg.:comm
62f60 69 74 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 it)....(file.................:in
62f80 69 74 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 itarg.:file)....(line...........
62fa0 20 20 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 ......:initarg.:line)....(author
62fc0 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 74 68 6f 72 29 ...............:initarg.:author)
62fe0 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 61 ....(body.................:inita
63000 72 67 20 3a 62 6f 64 79 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 28 70 72 6f 76 69 64 65 20 27 66 6f 72 rg.:body)))..;;;._.(provide.'for
63020 67 65 2d 72 65 76 6e 6f 74 65 29 0a 3b 3b 3b 20 66 6f 72 67 65 2d 72 65 76 6e 6f 74 65 2e 65 6c ge-revnote).;;;.forge-revnote.el
63040 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 00 00 00 .ends.here......................
63060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
630a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
630c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
630e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
631a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
631c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
631e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
632a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
632c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
632e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
633a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
633c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
633e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
634a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
634c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
634e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
635a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
635c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
635e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
636a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
636c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
636e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
637a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
637c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
637e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
638a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
638c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
638e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
639a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
639c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
639e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63a00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63c00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63c60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63c80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63e00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63e60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63e80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63f00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63f20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63fe0 00 00 00 00 00 00 00 00 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-11-01 12:21:38 +0000