| ofs | hex dump | ascii |
|---|---|---|
| 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 64 69 72 00 00 00 00 00 00 00 00 00 | forge-20240405.1509/dir......... |
| 0220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0260 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| 0280 | 30 30 30 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... |
| 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 | 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 |
| 0420 | 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 |
| 0440 | 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 |
| 0460 | 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 |
| 0480 | 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 |
| 04a0 | 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 |
| 04c0 | 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 |
| 04e0 | 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 |
| 0500 | 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 |
| 0520 | 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 |
| 0540 | 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,. |
| 0560 | 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 |
| 0580 | 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 |
| 05a0 | 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 |
| 05c0 | 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. |
| 05e0 | 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 |
| 0600 | 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 |
| 0620 | 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)............ |
| 0640 | 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 |
| 0660 | 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 | ................................ |
| 0680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 06a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 06c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 06e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 07a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 07c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 07e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0800 | 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 |
| 0820 | 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.......................... |
| 0840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0860 | 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 |
| 0880 | 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... |
| 08a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 08c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 08e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0900 | 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................... |
| 0920 | 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................... |
| 0940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 09a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 09c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 09e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0a00 | 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 |
| 0a20 | 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 |
| 0a40 | 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 |
| 0a60 | 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:. |
| 0a80 | 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 |
| 0aa0 | 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 |
| 0ac0 | 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 |
| 0ae0 | 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 |
| 0b00 | 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 |
| 0b20 | 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 |
| 0b40 | 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 |
| 0b60 | 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 |
| 0b80 | 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 |
| 0ba0 | 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 |
| 0bc0 | 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 |
| 0be0 | 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..;;. |
| 0c00 | 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 |
| 0c20 | 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,. |
| 0c40 | 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 |
| 0c60 | 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 |
| 0c80 | 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. |
| 0ca0 | 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 |
| 0cc0 | 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 |
| 0ce0 | 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 |
| 0d00 | 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. |
| 0d20 | 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 |
| 0d40 | 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 |
| 0d60 | 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/> |
| 0d80 | 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 |
| 0da0 | 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 |
| 0dc0 | 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. |
| 0de0 | 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 |
| 0e00 | 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 |
| 0e20 | 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")....( |
| 0e40 | 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 |
| 0e60 | 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" |
| 0e80 | 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 |
| 0ea0 | 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 |
| 0ec0 | 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 |
| 0ee0 | 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 |
| 0f00 | 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 |
| 0f20 | 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/ |
| 0f40 | 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 |
| 0f60 | 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 |
| 0f80 | 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 |
| 0fa0 | 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.. |
| 0fc0 | 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 |
| 0fe0 | 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 |
| 1000 | 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 |
| 1020 | 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" |
| 1040 | 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......... |
| 1060 | 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 |
| 1080 | 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... |
| 10a0 | 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/% |
| 10c0 | 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 |
| 10e0 | 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/% |
| 1100 | 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 |
| 1120 | 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:// |
| 1140 | 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"))).. |
| 1160 | 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) |
| 1180 | 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 |
| 11a0 | 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............................... |
| 11c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1200 | 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 |
| 1220 | 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........................... |
| 1240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1260 | 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 |
| 1280 | 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... |
| 12a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1300 | 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................... |
| 1320 | 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................... |
| 1340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1400 | 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 |
| 1420 | 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.-*-..; |
| 1440 | 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. |
| 1460 | 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 |
| 1480 | 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 |
| 14a0 | 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 |
| 14c0 | 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 |
| 14e0 | 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 |
| 1500 | 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 |
| 1520 | 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.; |
| 1540 | 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. |
| 1560 | 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 |
| 1580 | 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 |
| 15a0 | 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. |
| 15c0 | 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). |
| 15e0 | 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 |
| 1600 | 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 |
| 1620 | 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 |
| 1640 | 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. |
| 1660 | 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 |
| 1680 | 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 |
| 16a0 | 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. |
| 16c0 | 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. |
| 16e0 | 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 |
| 1700 | 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 |
| 1720 | 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 |
| 1740 | 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:// |
| 1760 | 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 |
| 1780 | 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 |
| 17a0 | 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- |
| 17c0 | 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 |
| 17e0 | 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 |
| 1800 | 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 |
| 1820 | 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' |
| 1840 | 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 |
| 1860 | 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 |
| 1880 | 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 |
| 18a0 | 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 |
| 18c0 | 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 |
| 18e0 | 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 |
| 1900 | 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. |
| 1920 | 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 |
| 1940 | 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 |
| 1960 | 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 |
| 1980 | 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'.".. |
| 19a0 | 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 |
| 19c0 | 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 |
| 19e0 | 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 |
| 1a00 | 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 |
| 1a20 | 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).... |
| 1a40 | 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 |
| 1a60 | 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 |
| 1a80 | 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 |
| 1aa0 | 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 |
| 1ac0 | 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 |
| 1ae0 | 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. |
| 1b00 | 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 |
| 1b20 | 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. |
| 1b40 | 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 |
| 1b60 | 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 |
| 1b80 | 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" |
| 1ba0 | 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 |
| 1bc0 | 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 |
| 1be0 | 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 |
| 1c00 | 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- |
| 1c20 | 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.(). |
| 1c40 | 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."... |
| 1c60 | 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 |
| 1c80 | 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 |
| 1ca0 | 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 |
| 1cc0 | 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"... |
| 1ce0 | 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 |
| 1d00 | 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"... |
| 1d20 | 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 |
| 1d40 | 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 |
| 1d60 | 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 |
| 1d80 | 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 |
| 1da0 | 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?.... |
| 1dc0 | 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........ |
| 1de0 | 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........ |
| 1e00 | 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 |
| 1e20 | 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 |
| 1e40 | 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). |
| 1e60 | 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 |
| 1e80 | 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 |
| 1ea0 | 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 |
| 1ec0 | 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 |
| 1ee0 | 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....... |
| 1f00 | 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". |
| 1f20 | 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 |
| 1f40 | 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 |
| 1f60 | 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: |
| 1f80 | 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 |
| 1fa0 | 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 |
| 1fc0 | 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".... |
| 1fe0 | 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 |
| 2000 | 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"... |
| 2020 | 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 |
| 2040 | 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- |
| 2060 | 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 |
| 2080 | 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 |
| 20a0 | 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"........ |
| 20c0 | 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". |
| 20e0 | 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 |
| 2100 | 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"." |
| 2120 | 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 |
| 2140 | 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 |
| 2160 | 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"." |
| 2180 | 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 |
| 21a0 | 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. |
| 21c0 | 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?.. |
| 21e0 | 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). |
| 2200 | 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 |
| 2220 | 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 |
| 2240 | 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 |
| 2260 | 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 |
| 2280 | 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). |
| 22a0 | 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 |
| 22c0 | 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 |
| 22e0 | 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. |
| 2300 | 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).................. |
| 2320 | 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. |
| 2340 | 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"........ |
| 2360 | 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. |
| 2380 | 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- |
| 23a0 | 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 |
| 23c0 | 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 |
| 23e0 | 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 |
| 2400 | 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 |
| 2420 | 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 |
| 2440 | 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 |
| 2460 | 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 |
| 2480 | 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 |
| 24a0 | 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 |
| 24c0 | 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 |
| 24e0 | 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. |
| 2500 | 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 |
| 2520 | 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 |
| 2540 | 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 |
| 2560 | 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 |
| 2580 | 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 |
| 25a0 | 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, |
| 25c0 | 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. |
| 25e0 | 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 |
| 2600 | 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 |
| 2620 | 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 |
| 2640 | 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 |
| 2660 | 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 |
| 2680 | 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))).. |
| 26a0 | 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)... |
| 26c0 | 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 |
| 26e0 | 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?)))). |
| 2700 | 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." |
| 2720 | 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. |
| 2740 | 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.( |
| 2760 | 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) |
| 2780 | 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 |
| 27a0 | 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?)))..... |
| 27c0 | 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 |
| 27e0 | 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..... |
| 2800 | 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 |
| 2820 | 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 |
| 2840 | 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 |
| 2860 | 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." |
| 2880 | 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. |
| 28a0 | 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................ |
| 28c0 | 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)....... |
| 28e0 | 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......... |
| 2900 | 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 |
| 2920 | 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 |
| 2940 | 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?"...........................( |
| 2960 | 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)................ |
| 2980 | 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)))).. |
| 29a0 | 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 |
| 29c0 | 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..( |
| 29e0 | 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)).............. |
| 2a00 | 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 |
| 2a20 | 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 |
| 2a40 | 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 |
| 2a60 | 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 |
| 2a80 | 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")))......... |
| 2aa0 | 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 |
| 2ac0 | 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)................. |
| 2ae0 | 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 |
| 2b00 | 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)................. |
| 2b20 | 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 |
| 2b40 | 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))) |
| 2b60 | 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 |
| 2b80 | 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"................... |
| 2ba0 | 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 |
| 2bc0 | 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)....................... |
| 2be0 | 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 |
| 2c00 | 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 |
| 2c20 | 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 |
| 2c40 | 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 |
| 2c60 | 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 |
| 2c80 | 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).. |
| 2ca0 | 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. |
| 2cc0 | 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 |
| 2ce0 | 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 |
| 2d00 | 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."")....... |
| 2d20 | 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))..... |
| 2d40 | 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.... |
| 2d60 | 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\\}[ |
| 2d80 | 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\\}\ |
| 2da0 | 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 |
| 2dc0 | 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 |
| 2de0 | 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 |
| 2e00 | 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. |
| 2e20 | 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 |
| 2e40 | 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) |
| 2e60 | 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 |
| 2e80 | 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 |
| 2ea0 | 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 |
| 2ec0 | 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 |
| 2ee0 | 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 |
| 2f00 | 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 |
| 2f20 | 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 |
| 2f40 | 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 |
| 2f60 | 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. |
| 2f80 | 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 |
| 2fa0 | 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 |
| 2fc0 | 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)... |
| 2fe0 | 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 |
| 3000 | 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 |
| 3020 | 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 |
| 3040 | 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- |
| 3060 | 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 |
| 3080 | 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 |
| 30a0 | 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 |
| 30c0 | 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 |
| 30e0 | 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)............ |
| 3100 | 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))..... |
| 3120 | 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. |
| 3140 | 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)) |
| 3160 | 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 |
| 3180 | 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 |
| 31a0 | 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 |
| 31c0 | 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."...( |
| 31e0 | 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 |
| 3200 | 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?)))... |
| 3220 | 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 |
| 3240 | 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 |
| 3260 | 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).... |
| 3280 | 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 |
| 32a0 | 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)).. |
| 32c0 | 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 |
| 32e0 | 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 |
| 3300 | 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".......................( |
| 3320 | 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-- |
| 3340 | 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 |
| 3360 | 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")))..;;; |
| 3380 | 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 |
| 33a0 | 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). |
| 33c0 | 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 |
| 33e0 | 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 |
| 3400 | 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 |
| 3420 | 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- |
| 3440 | 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 |
| 3460 | 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 |
| 3480 | 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:."....... |
| 34a0 | 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 |
| 34c0 | 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)))....... |
| 34e0 | 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 |
| 3500 | 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.( |
| 3520 | 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 |
| 3540 | 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 |
| 3560 | 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- |
| 3580 | 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 |
| 35a0 | 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. |
| 35c0 | 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. |
| 35e0 | 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 |
| 3600 | 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 |
| 3620 | 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". |
| 3640 | 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.( |
| 3660 | 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 |
| 3680 | 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 |
| 36a0 | 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 |
| 36c0 | 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 |
| 36e0 | 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 |
| 3700 | 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 |
| 3720 | 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".......... |
| 3740 | 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)))..;;; |
| 3760 | 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 |
| 3780 | 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 |
| 37a0 | 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 |
| 37c0 | 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) |
| 37e0 | 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 |
| 3800 | 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)...... |
| 3820 | 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- |
| 3840 | 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 |
| 3860 | 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.()... |
| 3880 | 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. |
| 38a0 | 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.". |
| 38c0 | 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 |
| 38e0 | 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 |
| 3900 | 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)....................... |
| 3920 | 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))).. |
| 3940 | 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 |
| 3960 | 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 |
| 3980 | 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 |
| 39a0 | 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 |
| 39c0 | 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 |
| 39e0 | 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 |
| 3a00 | 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 |
| 3a20 | 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 |
| 3a40 | 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.( |
| 3a60 | 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) |
| 3a80 | 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 |
| 3aa0 | 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. |
| 3ac0 | 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 |
| 3ae0 | 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 |
| 3b00 | 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 |
| 3b20 | 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"))) |
| 3b40 | 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)). |
| 3b60 | 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 |
| 3b80 | 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 |
| 3ba0 | 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 |
| 3bc0 | 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. |
| 3be0 | 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 |
| 3c00 | 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 |
| 3c20 | 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 |
| 3c40 | 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." |
| 3c60 | 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 |
| 3c80 | 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))..( |
| 3ca0 | 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 |
| 3cc0 | 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. |
| 3ce0 | 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- |
| 3d00 | 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 |
| 3d20 | 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. |
| 3d40 | 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 |
| 3d60 | 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 |
| 3d80 | 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 |
| 3da0 | 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 |
| 3dc0 | 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".......... |
| 3de0 | 20 20 20 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 |
| 3e00 | 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)............ |
| 3e20 | 20 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 |
| 3e40 | 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.... |
| 3e60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 3e80 | 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 |
| 3ea0 | 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 |
| 3ec0 | 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 |
| 3ee0 | 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) |
| 3f00 | 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- |
| 3f20 | 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 |
| 3f40 | 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 |
| 3f60 | 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 |
| 3f80 | 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")) |
| 3fa0 | 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.: |
| 3fc0 | 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 |
| 3fe0 | 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 |
| 4000 | 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. |
| 4020 | 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 |
| 4040 | 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 |
| 4060 | 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- |
| 4080 | 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 |
| 40a0 | 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 |
| 40c0 | 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) |
| 40e0 | 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. |
| 4100 | 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 |
| 4120 | 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 |
| 4140 | 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 |
| 4160 | 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) |
| 4180 | 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 |
| 41a0 | 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 |
| 41c0 | 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- |
| 41e0 | 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.( |
| 4200 | 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 |
| 4220 | 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." |
| 4240 | 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 |
| 4260 | 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 |
| 4280 | 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 |
| 42a0 | 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.().. |
| 42c0 | 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. |
| 42e0 | 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 |
| 4300 | 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 |
| 4320 | 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)))..;; |
| 4340 | 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 |
| 4360 | 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 |
| 4380 | 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.".. |
| 43a0 | 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 |
| 43c0 | 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)))...... |
| 43e0 | 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) |
| 4400 | 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))) |
| 4420 | 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)........ |
| 4440 | 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)). |
| 4460 | 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 |
| 4480 | 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 |
| 44a0 | 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 |
| 44c0 | 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 |
| 44e0 | 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. |
| 4500 | 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)) |
| 4520 | 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).... |
| 4540 | 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)...... |
| 4560 | 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 |
| 4580 | 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 |
| 45a0 | 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 |
| 45c0 | 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))).. |
| 45e0 | 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 |
| 4600 | 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 |
| 4620 | 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 |
| 4640 | 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 |
| 4660 | 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 |
| 4680 | 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*.( |
| 46a0 | 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)) |
| 46c0 | 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 |
| 46e0 | 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 |
| 4700 | 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))).... |
| 4720 | 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 |
| 4740 | 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 |
| 4760 | 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)))......... |
| 4780 | 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)). |
| 47a0 | 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)..... |
| 47c0 | 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 |
| 47e0 | 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........ |
| 4800 | 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 |
| 4820 | 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- |
| 4840 | 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 |
| 4860 | 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.( |
| 4880 | 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 |
| 48a0 | 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 |
| 48c0 | 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)). |
| 48e0 | 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 |
| 4900 | 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- |
| 4920 | 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) |
| 4940 | 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 |
| 4960 | 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. |
| 4980 | 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 |
| 49a0 | 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 |
| 49c0 | 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 |
| 49e0 | 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) |
| 4a00 | 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 |
| 4a20 | 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 |
| 4a40 | 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 |
| 4a60 | 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 |
| 4a80 | 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)."/*"))... |
| 4aa0 | 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 |
| 4ac0 | 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 |
| 4ae0 | 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 |
| 4b00 | 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. |
| 4b20 | 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. |
| 4b40 | 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 |
| 4b60 | 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 |
| 4b80 | 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 |
| 4ba0 | 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 |
| 4bc0 | 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 |
| 4be0 | 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 |
| 4c00 | 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.......... |
| 4c20 | 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 |
| 4c40 | 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 |
| 4c60 | 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 |
| 4c80 | 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.( |
| 4ca0 | 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)... |
| 4cc0 | 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 |
| 4ce0 | 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)))...........( |
| 4d00 | 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))......... |
| 4d20 | 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)))..... |
| 4d40 | 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 |
| 4d60 | 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)....... |
| 4d80 | 20 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- |
| 4da0 | 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)))... |
| 4dc0 | 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 |
| 4de0 | 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))).... |
| 4e00 | 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 |
| 4e20 | 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)............. |
| 4e40 | 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....... |
| 4e60 | 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)))) |
| 4e80 | 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.( |
| 4ea0 | 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 |
| 4ec0 | 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. |
| 4ee0 | 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 |
| 4f00 | 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. |
| 4f20 | 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 |
| 4f40 | 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 |
| 4f60 | 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)))................ |
| 4f80 | 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 |
| 4fa0 | 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).............. |
| 4fc0 | 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 |
| 4fe0 | 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)....................... |
| 5000 | 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 |
| 5020 | 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)................... |
| 5040 | 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 |
| 5060 | 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- |
| 5080 | 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 |
| 50a0 | 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))..;;;. |
| 50c0 | 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 |
| 50e0 | 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 |
| 5100 | 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. |
| 5120 | 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 |
| 5140 | 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 |
| 5160 | 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 |
| 5180 | 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. |
| 51a0 | 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 |
| 51c0 | 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))). |
| 51e0 | 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 |
| 5200 | 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 |
| 5220 | 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. |
| 5240 | 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 |
| 5260 | 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 |
| 5280 | 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 |
| 52a0 | 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 |
| 52c0 | 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 |
| 52e0 | 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)))..;;;# |
| 5300 | 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 |
| 5320 | 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 |
| 5340 | 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 |
| 5360 | 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. |
| 5380 | 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 |
| 53a0 | 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 |
| 53c0 | 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 |
| 53e0 | 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 |
| 5400 | 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 |
| 5420 | 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 |
| 5440 | 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 |
| 5460 | 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 |
| 5480 | 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 |
| 54a0 | 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 |
| 54c0 | 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 |
| 54e0 | 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.() |
| 5500 | 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 |
| 5520 | 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 |
| 5540 | 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)). |
| 5560 | 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 |
| 5580 | 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......(( |
| 55a0 | 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 |
| 55c0 | 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 |
| 55e0 | 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 |
| 5600 | 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- |
| 5620 | 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 |
| 5640 | 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 |
| 5660 | 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)). |
| 5680 | 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 |
| 56a0 | 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))...... |
| 56c0 | 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)))))..; |
| 56e0 | 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 |
| 5700 | 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 |
| 5720 | 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 |
| 5740 | 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 |
| 5760 | 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))...... |
| 5780 | 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 |
| 57a0 | 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". |
| 57c0 | 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 |
| 57e0 | 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")))). |
| 5800 | 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 |
| 5820 | 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 |
| 5840 | 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)...... |
| 5860 | 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 |
| 5880 | 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 |
| 58a0 | 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 |
| 58c0 | 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 |
| 58e0 | 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 |
| 5900 | 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. |
| 5920 | 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 |
| 5940 | 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- |
| 5960 | 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 |
| 5980 | 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)).......... |
| 59a0 | 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 |
| 59c0 | 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"... |
| 59e0 | 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 |
| 5a00 | 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" |
| 5a20 | 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)) |
| 5a40 | 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.. |
| 5a60 | 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 |
| 5a80 | 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-- |
| 5aa0 | 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)...... |
| 5ac0 | 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 |
| 5ae0 | 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 |
| 5b00 | 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 |
| 5b20 | 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. |
| 5b40 | 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)).... |
| 5b60 | 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 |
| 5b80 | 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 |
| 5ba0 | 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 |
| 5bc0 | 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 |
| 5be0 | 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 |
| 5c00 | 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 |
| 5c20 | 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.() |
| 5c40 | 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 |
| 5c60 | 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 |
| 5c80 | 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) |
| 5ca0 | 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 |
| 5cc0 | 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 |
| 5ce0 | 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")........... |
| 5d00 | 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 |
| 5d20 | 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 |
| 5d40 | 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-- |
| 5d60 | 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 |
| 5d80 | 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).......... |
| 5da0 | 20 20 20 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 |
| 5dc0 | 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 |
| 5de0 | 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 |
| 5e00 | 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- |
| 5e20 | 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. |
| 5e40 | 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 |
| 5e60 | 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)..... |
| 5e80 | 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- |
| 5ea0 | 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................ |
| 5ec0 | 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 |
| 5ee0 | 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)))................. |
| 5f00 | 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 |
| 5f20 | 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).......................... |
| 5f40 | 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........................... |
| 5f60 | 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))).. |
| 5f80 | 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*. |
| 5fa0 | 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))) |
| 5fc0 | 0a 20 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 |
| 5fe0 | 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)......... |
| 6000 | 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.......... |
| 6020 | 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 |
| 6040 | 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 |
| 6060 | 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 |
| 6080 | 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 |
| 60a0 | 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 |
| 60c0 | 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- |
| 60e0 | 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))).......... |
| 6100 | 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. |
| 6120 | 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 |
| 6140 | 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 |
| 6160 | 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.................... |
| 6180 | 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 |
| 61a0 | 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)))............... |
| 61c0 | 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 |
| 61e0 | 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))...................... |
| 6200 | 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 |
| 6220 | 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))).................. |
| 6240 | 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 |
| 6260 | 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)................ |
| 6280 | 20 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...... |
| 62a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 62c0 | 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))) |
| 62e0 | 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.( |
| 6300 | 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."/"......... |
| 6320 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 6340 | 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 |
| 6360 | 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 | )............................... |
| 6380 | 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"))))).. |
| 63a0 | 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 |
| 63c0 | 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 |
| 63e0 | 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 |
| 6400 | 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 |
| 6420 | 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 |
| 6440 | 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 |
| 6460 | 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 |
| 6480 | 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 |
| 64a0 | 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. |
| 64c0 | 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 |
| 64e0 | 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 |
| 6500 | 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- |
| 6520 | 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 |
| 6540 | 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 |
| 6560 | 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 |
| 6580 | 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 |
| 65a0 | 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....... |
| 65c0 | 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."% |
| 65e0 | 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")................( |
| 6600 | 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 |
| 6620 | 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 |
| 6640 | 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.( |
| 6660 | 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) |
| 6680 | 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 |
| 66a0 | 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 |
| 66c0 | 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 |
| 66e0 | 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).......................... |
| 6700 | 20 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 |
| 6720 | 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. |
| 6740 | 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 |
| 6760 | 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)))...... |
| 6780 | 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 |
| 67a0 | 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 |
| 67c0 | 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 |
| 67e0 | 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)................... |
| 6800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 6820 | 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)))))))).... |
| 6840 | 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....... |
| 6860 | 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. |
| 6880 | 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 |
| 68a0 | 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 |
| 68c0 | 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... |
| 68e0 | 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))... |
| 6900 | 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)...........( |
| 6920 | 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 |
| 6940 | 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."^".">." |
| 6960 | 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 |
| 6980 | 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 |
| 69a0 | 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.()... |
| 69c0 | 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 |
| 69e0 | 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 |
| 6a00 | 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.( |
| 6a20 | 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................ |
| 6a40 | 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..................( |
| 6a60 | 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...... |
| 6a80 | 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 |
| 6aa0 | 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- |
| 6ac0 | 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"))) |
| 6ae0 | 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.... |
| 6b00 | 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 |
| 6b20 | 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 |
| 6b40 | 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")........ |
| 6b60 | 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." |
| 6b80 | 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")))))) |
| 6ba0 | 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... |
| 6bc0 | 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 |
| 6be0 | 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 |
| 6c00 | 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 |
| 6c20 | 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 |
| 6c40 | 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 |
| 6c60 | 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."#.". |
| 6c80 | 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"))...... |
| 6ca0 | 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)))..... |
| 6cc0 | 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) |
| 6ce0 | 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 |
| 6d00 | 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 |
| 6d20 | 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 |
| 6d40 | 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 |
| 6d60 | 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.. |
| 6d80 | 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. |
| 6da0 | 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)))......... |
| 6dc0 | 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."................. |
| 6de0 | 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) |
| 6e00 | 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 |
| 6e20 | 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 |
| 6e40 | 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))................. |
| 6e60 | 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 |
| 6e80 | 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)................... |
| 6ea0 | 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- |
| 6ec0 | 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 |
| 6ee0 | 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- |
| 6f00 | 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. |
| 6f20 | 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..... |
| 6f40 | 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. |
| 6f60 | 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 |
| 6f80 | 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. |
| 6fa0 | 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 |
| 6fc0 | 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 |
| 6fe0 | 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 |
| 7000 | 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 |
| 7020 | 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 |
| 7040 | 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 |
| 7060 | 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 |
| 7080 | 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))))... |
| 70a0 | 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 |
| 70c0 | 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 |
| 70e0 | 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. |
| 7100 | 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 |
| 7120 | 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 |
| 7140 | 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 |
| 7160 | 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)...( |
| 7180 | 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- |
| 71a0 | 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- |
| 71c0 | 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 |
| 71e0 | 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 |
| 7200 | 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 |
| 7220 | 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..; |
| 7240 | 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 |
| 7260 | 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 |
| 7280 | 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. |
| 72a0 | 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 |
| 72c0 | 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 |
| 72e0 | 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 |
| 7300 | 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")))...( |
| 7320 | 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 |
| 7340 | 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 |
| 7360 | 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 |
| 7380 | 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 |
| 73a0 | 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. |
| 73c0 | 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).......... |
| 73e0 | 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 |
| 7400 | 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 |
| 7420 | 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- |
| 7440 | 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 |
| 7460 | 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 |
| 7480 | 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 |
| 74a0 | 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 |
| 74c0 | 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 |
| 74e0 | 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 |
| 7500 | 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 |
| 7520 | 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. |
| 7540 | 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 |
| 7560 | 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))....... |
| 7580 | 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 |
| 75a0 | 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 |
| 75c0 | 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 |
| 75e0 | 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)).. |
| 7600 | 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 |
| 7620 | 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))..... |
| 7640 | 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 |
| 7660 | 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 |
| 7680 | 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."- |
| 76a0 | 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 |
| 76c0 | 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 |
| 76e0 | 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" |
| 7700 | 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 |
| 7720 | 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 |
| 7740 | 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*.(( |
| 7760 | 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))... |
| 7780 | 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" |
| 77a0 | 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.( |
| 77c0 | 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 |
| 77e0 | 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 |
| 7800 | 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/ |
| 7820 | 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 |
| 7840 | 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 |
| 7860 | 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 |
| 7880 | 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))............ |
| 78a0 | 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 |
| 78c0 | 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........ |
| 78e0 | 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 |
| 7900 | 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.... |
| 7920 | 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 |
| 7940 | 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 |
| 7960 | 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, |
| 7980 | 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 |
| 79a0 | 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 |
| 79c0 | 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. |
| 79e0 | 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 |
| 7a00 | 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. |
| 7a20 | 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 |
| 7a40 | 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 |
| 7a60 | 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. |
| 7a80 | 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)).... |
| 7aa0 | 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 |
| 7ac0 | 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))...... |
| 7ae0 | 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 |
| 7b00 | 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))......... |
| 7b20 | 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 |
| 7b40 | 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))..................( |
| 7b60 | 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 |
| 7b80 | 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 |
| 7ba0 | 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))....... |
| 7bc0 | 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 |
| 7be0 | 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))). |
| 7c00 | 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 |
| 7c20 | 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)......... |
| 7c40 | 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. |
| 7c60 | 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)).............. |
| 7c80 | 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 |
| 7ca0 | 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).......... |
| 7cc0 | 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 |
| 7ce0 | 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 |
| 7d00 | 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 |
| 7d20 | 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 |
| 7d40 | 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")....................... |
| 7d60 | 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 |
| 7d80 | 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")))...... |
| 7da0 | 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).. |
| 7dc0 | 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 |
| 7de0 | 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 |
| 7e00 | 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 |
| 7e20 | 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)................. |
| 7e40 | 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)...... |
| 7e60 | 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 |
| 7e80 | 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). |
| 7ea0 | 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 |
| 7ec0 | 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 |
| 7ee0 | 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.... |
| 7f00 | 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 |
| 7f20 | 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 |
| 7f40 | 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 |
| 7f60 | 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 |
| 7f80 | 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.............. |
| 7fa0 | 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 |
| 7fc0 | 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... |
| 7fe0 | 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 |
| 8000 | 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 |
| 8020 | 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.....................;;. |
| 8040 | 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.................. |
| 8060 | 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 |
| 8080 | 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).......... |
| 80a0 | 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 |
| 80c0 | 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)).................. |
| 80e0 | 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)).... |
| 8100 | 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 |
| 8120 | 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).......... |
| 8140 | 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 |
| 8160 | 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 |
| 8180 | 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 |
| 81a0 | 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 |
| 81c0 | 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).... |
| 81e0 | 20 20 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 |
| 8200 | 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))............. |
| 8220 | 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 |
| 8240 | 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").. |
| 8260 | 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. |
| 8280 | 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 |
| 82a0 | 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- |
| 82c0 | 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 |
| 82e0 | 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 |
| 8300 | 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 |
| 8320 | 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. |
| 8340 | 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 |
| 8360 | 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............... |
| 8380 | 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. |
| 83a0 | 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)))............. |
| 83c0 | 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 |
| 83e0 | 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="...................... |
| 8400 | 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 |
| 8420 | 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........ |
| 8440 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 8460 | 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 |
| 8480 | 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 | )))............................. |
| 84a0 | 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 |
| 84c0 | 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)........................ |
| 84e0 | 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))))))).... |
| 8500 | 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 |
| 8520 | 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 |
| 8540 | 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 |
| 8560 | 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 |
| 8580 | 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 |
| 85a0 | 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 |
| 85c0 | 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 |
| 85e0 | 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 |
| 8600 | 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)........ |
| 8620 | 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 |
| 8640 | 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) |
| 8660 | 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 |
| 8680 | 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 |
| 86a0 | 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 |
| 86c0 | 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 |
| 86e0 | 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 |
| 8700 | 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))..........( |
| 8720 | 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 |
| 8740 | 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 |
| 8760 | 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 |
| 8780 | 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 |
| 87a0 | 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)))..... |
| 87c0 | 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).. |
| 87e0 | 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 |
| 8800 | 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 |
| 8820 | 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 |
| 8840 | 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 |
| 8860 | 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 |
| 8880 | 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)...... |
| 88a0 | 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 |
| 88c0 | 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. |
| 88e0 | 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 |
| 8900 | 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 |
| 8920 | 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"......... |
| 8940 | 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)). |
| 8960 | 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 |
| 8980 | 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 |
| 89a0 | 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/*"......................... |
| 89c0 | 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)........ |
| 89e0 | 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)... |
| 8a00 | 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 |
| 8a20 | 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 |
| 8a40 | 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"......................... |
| 8a60 | 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 |
| 8a80 | 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).................... |
| 8aa0 | 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)).............( |
| 8ac0 | 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 |
| 8ae0 | 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).. |
| 8b00 | 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 |
| 8b20 | 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 |
| 8b40 | 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" |
| 8b60 | 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)))).........( |
| 8b80 | 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 |
| 8ba0 | 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" |
| 8bc0 | 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 |
| 8be0 | 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@" |
| 8c00 | 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 |
| 8c20 | 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))... |
| 8c40 | 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 |
| 8c60 | 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))............... |
| 8c80 | 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 |
| 8ca0 | 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 |
| 8cc0 | 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))...... |
| 8ce0 | 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 |
| 8d00 | 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 |
| 8d20 | 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)). |
| 8d40 | 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 |
| 8d60 | 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)................. |
| 8d80 | 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. |
| 8da0 | 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."% |
| 8dc0 | 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) |
| 8de0 | 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 |
| 8e00 | 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). |
| 8e20 | 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 |
| 8e40 | 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 |
| 8e60 | 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 |
| 8e80 | 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. |
| 8ea0 | 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 |
| 8ec0 | 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 |
| 8ee0 | 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.( |
| 8f00 | 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)))...( |
| 8f20 | 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 |
| 8f40 | 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 |
| 8f60 | 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,. |
| 8f80 | 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 |
| 8fa0 | 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. |
| 8fc0 | 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' |
| 8fe0 | 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. |
| 9000 | 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 |
| 9020 | 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 |
| 9040 | 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 |
| 9060 | 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 |
| 9080 | 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- |
| 90a0 | 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 |
| 90c0 | 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 |
| 90e0 | 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))........... |
| 9100 | 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 |
| 9120 | 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. |
| 9140 | 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)......... |
| 9160 | 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 |
| 9180 | 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 |
| 91a0 | 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' |
| 91c0 | 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 |
| 91e0 | 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................. |
| 9200 | 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 |
| 9220 | 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)))) |
| 9240 | 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 |
| 9260 | 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 |
| 9280 | 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 |
| 92a0 | 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)..... |
| 92c0 | 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 |
| 92e0 | 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 |
| 9300 | 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 |
| 9320 | 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).................... |
| 9340 | 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......... |
| 9360 | 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 |
| 9380 | 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))......... |
| 93a0 | 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........... |
| 93c0 | 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 |
| 93e0 | 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 |
| 9400 | 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 |
| 9420 | 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]+\\ |
| 9440 | 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)...................... |
| 9460 | 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) |
| 9480 | 0a 20 20 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 |
| 94a0 | 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............... |
| 94c0 | 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 |
| 94e0 | 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)))))))..... |
| 9500 | 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 |
| 9520 | 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. |
| 9540 | 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))..;;;. |
| 9560 | 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. |
| 9580 | 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 |
| 95a0 | 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. |
| 95c0 | 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.... |
| 95e0 | 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:.").... |
| 9600 | 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 |
| 9620 | 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......... |
| 9640 | 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".......... |
| 9660 | 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 |
| 9680 | 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 |
| 96a0 | 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 |
| 96c0 | 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 |
| 96e0 | 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 |
| 9700 | 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 |
| 9720 | 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 |
| 9740 | 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. |
| 9760 | 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:."))). |
| 9780 | 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. |
| 97a0 | 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 |
| 97c0 | 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]....... |
| 97e0 | 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) |
| 9800 | 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 |
| 9820 | 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. |
| 9840 | 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 |
| 9860 | 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 |
| 9880 | 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. |
| 98a0 | 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 |
| 98c0 | 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 |
| 98e0 | 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. |
| 9900 | 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:." |
| 9920 | 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 |
| 9940 | 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.". |
| 9960 | 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] |
| 9980 | 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 |
| 99a0 | 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 |
| 99c0 | 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 |
| 99e0 | 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".................. |
| 9a00 | 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........... |
| 9a20 | 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:."........... |
| 9a40 | 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)........ |
| 9a60 | 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 |
| 9a80 | 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 |
| 9aa0 | 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 |
| 9ac0 | 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 |
| 9ae0 | 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.( |
| 9b00 | 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:. |
| 9b20 | 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)))........ |
| 9b40 | 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."")). |
| 9b60 | 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 |
| 9b80 | 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. |
| 9ba0 | 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).......... |
| 9bc0 | 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)]......... |
| 9be0 | 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 |
| 9c00 | 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 |
| 9c20 | 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 |
| 9c40 | 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).". |
| 9c60 | 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 |
| 9c80 | 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].: |
| 9ca0 | 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 |
| 9cc0 | 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 |
| 9ce0 | 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. |
| 9d00 | 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))). |
| 9d20 | 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 |
| 9d40 | 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 |
| 9d60 | 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 |
| 9d80 | 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 |
| 9da0 | 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 |
| 9dc0 | 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. |
| 9de0 | 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 |
| 9e00 | 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 |
| 9e20 | 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............. |
| 9e40 | 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. |
| 9e60 | 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........ |
| 9e80 | 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 |
| 9ea0 | 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).",")))))) |
| 9ec0 | 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 |
| 9ee0 | 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 |
| 9f00 | 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- |
| 9f20 | 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 |
| 9f40 | 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 |
| 9f60 | 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 |
| 9f80 | 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)........... |
| 9fa0 | 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)... |
| 9fc0 | 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 |
| 9fe0 | 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.[ |
| a000 | 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]))) |
| a020 | 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 |
| a040 | 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))... |
| a060 | 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)))..;;;. |
| a080 | 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. |
| a0a0 | 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 |
| a0c0 | 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. |
| a0e0 | 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 |
| a100 | 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 |
| a120 | 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 |
| a140 | 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 |
| a160 | 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 |
| a180 | 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 |
| a1a0 | 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"...... |
| a1c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a1e0 | 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 |
| a200 | 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......... |
| a220 | 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:.". |
| a240 | 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 |
| a260 | 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 |
| a280 | 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)).................. |
| a2a0 | 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 |
| a2c0 | 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)............................. |
| a2e0 | 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 |
| a300 | 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 |
| a320 | 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)... |
| a340 | 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...... |
| a360 | 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 |
| a380 | 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 |
| a3a0 | 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.............................. |
| a3c0 | 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 |
| a3e0 | 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. |
| a400 | 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 |
| a420 | 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 |
| a440 | 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 |
| a460 | 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 |
| a480 | 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. |
| a4a0 | 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 |
| a4c0 | 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 |
| a4e0 | 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 |
| a500 | 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 |
| a520 | 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 |
| a540 | 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. |
| a560 | 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 |
| a580 | 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 |
| a5a0 | 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. |
| a5c0 | 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 |
| a5e0 | 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 |
| a600 | 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.( |
| a620 | 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 |
| a640 | 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 |
| a660 | 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 |
| a680 | 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)............................ |
| a6a0 | 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)...... |
| a6c0 | 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 |
| a6e0 | 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................( |
| a700 | 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)........... |
| a720 | 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))... |
| a740 | 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." |
| a760 | 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..............(? |
| a780 | 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)............ |
| a7a0 | 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)....... |
| a7c0 | 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))) |
| a7e0 | 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 |
| a800 | 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 |
| a820 | 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 |
| a840 | 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)...................... |
| a860 | 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.................... |
| a880 | 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.......... |
| a8a0 | 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 |
| a8c0 | 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))..... |
| a8e0 | 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)).. |
| a900 | 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.( |
| a920 | 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 |
| a940 | 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 |
| a960 | 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 |
| a980 | 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 |
| a9a0 | 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 |
| a9c0 | 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. |
| a9e0 | 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 |
| aa00 | 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? |
| aa20 | 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 |
| aa40 | 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)......... |
| aa60 | 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 |
| aa80 | 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 |
| aaa0 | 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'"........................ |
| aac0 | 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))))......... |
| aae0 | 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 |
| ab00 | 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).................. |
| ab20 | 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))... |
| ab40 | 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 |
| ab60 | 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)...................... |
| ab80 | 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 |
| aba0 | 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." |
| abc0 | 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)).. |
| abe0 | 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......... |
| ac00 | 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 |
| ac20 | 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...")....... |
| ac40 | 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" |
| ac60 | 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")..................... |
| ac80 | 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"." |
| aca0 | 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)................. |
| acc0 | 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 |
| ace0 | 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")........... |
| ad00 | 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 |
| ad20 | 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))).. |
| ad40 | 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.... |
| ad60 | 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 |
| ad80 | 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))...... |
| ada0 | 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 |
| adc0 | 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"))).. |
| ade0 | 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 |
| ae00 | 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"))..... |
| ae20 | 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...... |
| ae40 | 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 |
| ae60 | 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:."....... |
| ae80 | 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.... |
| aea0 | 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 |
| aec0 | 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 |
| aee0 | 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 |
| af00 | 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 |
| af20 | 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...")..... |
| af40 | 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. |
| af60 | 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 |
| af80 | 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 |
| afa0 | 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")))..;; |
| afc0 | 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 |
| afe0 | 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.().. |
| b000 | 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. |
| b020 | 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."... |
| b040 | 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 |
| b060 | 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".. |
| b080 | 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.. |
| b0a0 | 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 |
| b0c0 | 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 |
| b0e0 | 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 |
| b100 | 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 |
| b120 | 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. |
| b140 | 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 |
| b160 | 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-- |
| b180 | 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. |
| b1a0 | 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 |
| b1c0 | 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.(). |
| b1e0 | 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 |
| b200 | 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- |
| b220 | 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 |
| b240 | 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 |
| b260 | 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 |
| b280 | 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 |
| b2a0 | 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.()............ |
| b2c0 | 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 |
| b2e0 | 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).................. |
| b300 | 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 |
| b320 | 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.() |
| b340 | 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 |
| b360 | 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............ |
| b380 | 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"..... |
| b3a0 | 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") |
| b3c0 | 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) |
| b3e0 | 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 |
| b400 | 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 |
| b420 | 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 |
| b440 | 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 |
| b460 | 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 |
| b480 | 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 |
| b4a0 | 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 |
| b4c0 | 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 |
| b4e0 | 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.() |
| b500 | 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 |
| b520 | 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.......... |
| b540 | 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 |
| b560 | 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)................ |
| b580 | 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 |
| b5a0 | 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. |
| b5c0 | 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 |
| b5e0 | 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)....... |
| b600 | 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 |
| b620 | 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)).......... |
| b640 | 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" |
| b660 | 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 |
| b680 | 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 |
| b6a0 | 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 |
| b6c0 | 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 |
| b6e0 | 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 |
| b700 | 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 |
| b720 | 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 |
| b740 | 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- |
| b760 | 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 |
| b780 | 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- |
| b7a0 | 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 |
| b7c0 | 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 |
| b7e0 | 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 |
| b800 | 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 |
| b820 | 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 |
| b840 | 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. |
| b860 | 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/ |
| b880 | 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 |
| b8a0 | 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 |
| b8c0 | 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 |
| b8e0 | 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 |
| b900 | 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 |
| b920 | 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 |
| b940 | 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). |
| b960 | 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 |
| b980 | 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 |
| b9a0 | 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))..........( |
| b9c0 | 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". |
| b9e0 | 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 |
| ba00 | 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))) |
| ba20 | 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). |
| ba40 | 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 |
| ba60 | 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")...... |
| ba80 | 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 |
| baa0 | 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. |
| bac0 | 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)....... |
| bae0 | 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).......( |
| bb00 | 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 |
| bb20 | 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 |
| bb40 | 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 |
| bb60 | 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 |
| bb80 | 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 |
| bba0 | 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 |
| bbc0 | 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 |
| bbe0 | 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 |
| bc00 | 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.( |
| bc20 | 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 |
| bc40 | 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.( |
| bc60 | 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." |
| bc80 | 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 |
| bca0 | 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 |
| bcc0 | 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 |
| bce0 | 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. |
| bd00 | 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 |
| bd20 | 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 |
| bd40 | 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 |
| bd60 | 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. |
| bd80 | 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 |
| bda0 | 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 |
| bdc0 | 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. |
| bde0 | 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?)." |
| be00 | 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.. |
| be20 | 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- |
| be40 | 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 |
| be60 | 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)".... |
| be80 | 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 |
| bea0 | 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))...... |
| bec0 | 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 |
| bee0 | 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)))............... |
| bf00 | 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 |
| bf20 | 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 |
| bf40 | 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 |
| bf60 | 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 |
| bf80 | 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 |
| bfa0 | 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 |
| bfc0 | 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 |
| bfe0 | 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 |
| c000 | 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.( |
| c020 | 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. |
| c040 | 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 |
| c060 | 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......... |
| c080 | 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".............( |
| c0a0 | 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."[ |
| c0c0 | 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 |
| c0e0 | 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)"............ |
| c100 | 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)...... |
| c120 | 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)))))).. |
| c140 | 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- |
| c160 | 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)... |
| c180 | 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. |
| c1a0 | 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. |
| c1c0 | 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 |
| c1e0 | 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 |
| c200 | 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- |
| c220 | 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 |
| c240 | 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"........................ |
| c260 | 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).... |
| c280 | 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:."))).. |
| c2a0 | 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 |
| c2c0 | 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))..;; |
| c2e0 | 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 |
| c300 | 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 |
| c320 | 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 |
| c340 | 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. |
| c360 | 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 |
| c380 | 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 |
| c3a0 | 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 |
| c3c0 | 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. |
| c3e0 | 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".. |
| c400 | 20 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- |
| c420 | 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 |
| c440 | 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:.")))...( |
| c460 | 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 |
| c480 | 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 |
| c4a0 | 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 |
| c4c0 | 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 |
| c4e0 | 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. |
| c500 | 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.".. |
| c520 | 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 |
| c540 | 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 |
| c560 | 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"))........ |
| c580 | 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 |
| c5a0 | 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- |
| c5c0 | 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 |
| c5e0 | 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?."..... |
| c600 | 20 20 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. |
| c620 | 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" |
| c640 | 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)........( |
| c660 | 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 |
| c680 | 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 |
| c6a0 | 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 |
| c6c0 | 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. |
| c6e0 | 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 |
| c700 | 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 |
| c720 | 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 |
| c740 | 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 |
| c760 | 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 |
| c780 | 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 |
| c7a0 | 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 |
| c7c0 | 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 |
| c7e0 | 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 |
| c800 | 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 |
| c820 | 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 |
| c840 | 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 |
| c860 | 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 |
| c880 | 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 |
| c8a0 | 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)........ |
| c8c0 | 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)......... |
| c8e0 | 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. |
| c900 | 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 |
| c920 | 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 |
| c940 | 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 |
| c960 | 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 |
| c980 | 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. |
| c9a0 | 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. |
| c9c0 | 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 |
| c9e0 | 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 |
| ca00 | 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 |
| ca20 | 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 |
| ca40 | 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 |
| ca60 | 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).... |
| ca80 | 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 |
| caa0 | 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?.")). |
| cac0 | 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)) |
| cae0 | 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))..... |
| cb00 | 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 |
| cb20 | 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))) |
| cb40 | 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 |
| cb60 | 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- |
| cb80 | 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 |
| cba0 | 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. |
| cbc0 | 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 |
| cbe0 | 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 |
| cc00 | 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 |
| cc20 | 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.......................... |
| cc40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cc60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cc80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ccc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cd00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cd20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cd40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cd60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cd80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cda0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cdc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cde0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ce00 | 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 |
| ce20 | 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............................... |
| ce40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ce60 | 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 |
| ce80 | 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... |
| cea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cf00 | 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................... |
| cf20 | 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................... |
| cf40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cf60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cf80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cfa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cfc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| cfe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d000 | 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 |
| d020 | 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. |
| d040 | 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. |
| d060 | 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 |
| d080 | 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>.; |
| d0a0 | 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 |
| d0c0 | 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 |
| d0e0 | 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.. |
| d100 | 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 |
| d120 | 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 |
| d140 | 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 |
| d160 | 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. |
| d180 | 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 |
| d1a0 | 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 |
| d1c0 | 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 |
| d1e0 | 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 |
| d200 | 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 |
| d220 | 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 |
| d240 | 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 |
| d260 | 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.;; |
| d280 | 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. |
| d2a0 | 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.; |
| d2c0 | 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 |
| d2e0 | 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. |
| d300 | 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. |
| d320 | 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. |
| d340 | 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 |
| d360 | 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/>...; |
| d380 | 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 |
| d3a0 | 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). |
| d3c0 | 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) |
| d3e0 | 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 |
| d400 | 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 |
| d420 | 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 |
| d440 | 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-- |
| d460 | 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. |
| d480 | 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 |
| d4a0 | 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 |
| d4c0 | 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 |
| d4e0 | 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 |
| d500 | 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 |
| d520 | 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 |
| d540 | 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 |
| d560 | 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 |
| d580 | 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 |
| d5a0 | 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. |
| d5c0 | 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 |
| d5e0 | 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 |
| d600 | 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 |
| d620 | 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 |
| d640 | 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 |
| d660 | 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 |
| d680 | 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 |
| d6a0 | 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 |
| d6c0 | 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 |
| d6e0 | 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 |
| d700 | 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 |
| d720 | 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 |
| d740 | 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 |
| d760 | 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 |
| d780 | 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" |
| d7a0 | 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 |
| d7c0 | 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. |
| d7e0 | 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 |
| d800 | 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"..... |
| d820 | 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 |
| d840 | 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". |
| d860 | 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"......" |
| d880 | 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 |
| d8a0 | 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 |
| d8c0 | 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 |
| d8e0 | 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 |
| d900 | 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.....(" |
| d920 | 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......" |
| d940 | 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 |
| d960 | 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. |
| d980 | 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 |
| d9a0 | 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 |
| d9c0 | 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 |
| d9e0 | 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 |
| da00 | 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 |
| da20 | 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 |
| da40 | 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...... |
| da60 | 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 |
| da80 | 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 |
| daa0 | 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 |
| dac0 | 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. |
| dae0 | 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 |
| db00 | 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 |
| db20 | 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 |
| db40 | 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 |
| db60 | 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 |
| db80 | 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 |
| dba0 | 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 |
| dbc0 | 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 |
| dbe0 | 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 |
| dc00 | 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 |
| dc20 | 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. |
| dc40 | 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 |
| dc60 | 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.....- |
| dc80 | 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 |
| dca0 | 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.. |
| dcc0 | 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 |
| dce0 | 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 |
| dd00 | 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 |
| dd20 | 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 |
| dd40 | 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>/ |
| dd60 | 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\ |
| dd80 | 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 |
| dda0 | 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... |
| ddc0 | 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 |
| dde0 | 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 |
| de00 | 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 |
| de20 | 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 |
| de40 | 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 |
| de60 | 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 |
| de80 | 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")... |
| dea0 | 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.( |
| dec0 | 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")... |
| dee0 | 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 |
| df00 | 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")....... |
| df20 | 20 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. |
| df40 | 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))............ |
| df60 | 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").. |
| df80 | 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 |
| dfa0 | 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 |
| dfc0 | 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 |
| dfe0 | 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 |
| e000 | 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) |
| e020 | 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 |
| e040 | 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 |
| e060 | 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 |
| e080 | 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 |
| e0a0 | 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. |
| e0c0 | 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 |
| e0e0 | 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 |
| e100 | 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. |
| e120 | 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"))))..... |
| e140 | 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)) |
| e160 | 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 |
| e180 | 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 |
| e1a0 | 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 |
| e1c0 | 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 |
| e1e0 | 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 |
| e200 | 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 |
| e220 | 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 |
| e240 | 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. |
| e260 | 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 |
| e280 | 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 |
| e2a0 | 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 |
| e2c0 | 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 |
| e2e0 | 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 |
| e300 | 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 |
| e320 | 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 |
| e340 | 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 |
| e360 | 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 |
| e380 | 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. |
| e3a0 | 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 |
| e3c0 | 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 |
| e3e0 | 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 |
| e400 | 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 |
| e420 | 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 |
| e440 | 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 |
| e460 | 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 |
| e480 | 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 |
| e4a0 | 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 |
| e4c0 | 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 |
| e4e0 | 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 |
| e500 | 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 |
| e520 | 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 |
| e540 | 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 |
| e560 | 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 |
| e580 | 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 |
| e5a0 | 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 |
| e5c0 | 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 |
| e5e0 | 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 |
| e600 | 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.` |
| e620 | 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. |
| e640 | 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 |
| e660 | 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 |
| e680 | 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 |
| e6a0 | 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,. |
| e6c0 | 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 |
| e6e0 | 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 |
| e700 | 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 |
| e720 | 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. |
| e740 | 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... |
| e760 | 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 |
| e780 | 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 |
| e7a0 | 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 |
| e7c0 | 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' |
| e7e0 | 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'. |
| e800 | 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 |
| e820 | 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.` |
| e840 | 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 |
| e860 | 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 |
| e880 | 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. |
| e8a0 | 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 |
| e8c0 | 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 |
| e8e0 | 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... |
| e900 | 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,. |
| e920 | 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. |
| e940 | 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 |
| e960 | 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?'. |
| e980 | 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 |
| e9a0 | 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 |
| e9c0 | 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 |
| e9e0 | 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.. |
| ea00 | 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 |
| ea20 | 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. |
| ea40 | 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 |
| ea60 | 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 |
| ea80 | 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 |
| eaa0 | 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 |
| eac0 | 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 |
| eae0 | 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 |
| eb00 | 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 |
| eb20 | 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 |
| eb40 | 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 |
| eb60 | 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 |
| eb80 | 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 |
| eba0 | 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 |
| ebc0 | 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 |
| ebe0 | 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 |
| ec00 | 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 |
| ec20 | 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 |
| ec40 | 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 |
| ec60 | 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. |
| ec80 | 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 |
| eca0 | 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 |
| ecc0 | 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 |
| ece0 | 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 |
| ed00 | 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 |
| ed20 | 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 |
| ed40 | 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 |
| ed60 | 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. |
| ed80 | 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 |
| eda0 | 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' |
| edc0 | 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 |
| ede0 | 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 |
| ee00 | 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 |
| ee20 | 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 |
| ee40 | 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 |
| ee60 | 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 |
| ee80 | 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 |
| eea0 | 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 |
| eec0 | 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. |
| eee0 | 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. |
| ef00 | 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'." |
| ef20 | 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 |
| ef40 | 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. |
| ef60 | 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 |
| ef80 | 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 |
| efa0 | 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 |
| efc0 | 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 |
| efe0 | 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."). |
| f000 | 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 |
| f020 | 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. |
| f040 | 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 |
| f060 | 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 |
| f080 | 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 |
| f0a0 | 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. |
| f0c0 | 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, |
| f0e0 | 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 |
| f100 | 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... |
| f120 | 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 |
| f140 | 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 |
| f160 | 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 |
| f180 | 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 |
| f1a0 | 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 |
| f1c0 | 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 |
| f1e0 | 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 |
| f200 | 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 |
| f220 | 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)......................... |
| f240 | 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 |
| f260 | 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)......................... |
| f280 | 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)))...... |
| f2a0 | 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 |
| f2c0 | 0a 20 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 |
| f2e0 | 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 |
| f300 | 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 |
| f320 | 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 |
| f340 | 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.#' |
| f360 | 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....... |
| f380 | 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\" |
| f3a0 | 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 |
| f3c0 | 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) |
| f3e0 | 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 |
| f400 | 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."\\ |
| f420 | 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:/ |
| f440 | 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 | /\\|"..................."[^/@]+@ |
| f460 | 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 |
| f480 | 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\\)://\\ |
| f4a0 | 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 | (?:[^/@]+@\\)?\\|".............. |
| f4c0 | 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?://\\(?:[^/@]+@\\)?\ |
| f4e0 | 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 |
| f500 | 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) |
| f520 | 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]+ |
| f540 | 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 | \\)?"..................."\\(?:/\ |
| f560 | 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 | \|:/?\\)"..................."~?\ |
| f580 | 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 | \(.+?\\)/"..................."\\ |
| f5a0 | 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 | ([^/]+?\\)"..................."\ |
| f5c0 | 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\\|/\\)?"............. |
| f5e0 | 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)..... |
| f600 | 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 |
| f620 | 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) |
| f640 | 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 |
| f660 | 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 |
| f680 | 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 |
| f6a0 | 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 |
| f6c0 | 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 |
| f6e0 | 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 |
| f700 | 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 |
| f720 | 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 |
| f740 | 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) |
| f760 | 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 |
| f780 | 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 |
| f7a0 | 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 |
| f7c0 | 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 |
| f7e0 | 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 |
| f800 | 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 |
| f820 | 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. |
| f840 | 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 |
| f860 | 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 |
| f880 | 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 |
| f8a0 | 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 |
| f8c0 | 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 |
| f8e0 | 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 |
| f900 | 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. |
| f920 | 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 |
| f940 | 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 |
| f960 | 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 |
| f980 | 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......( |
| f9a0 | 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)............ |
| f9c0 | 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... |
| f9e0 | 20 20 20 20 20 20 20 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 | ...............................( |
| fa00 | 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 |
| fa20 | 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)))).. |
| fa40 | 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 |
| fa60 | 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. |
| fa80 | 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 |
| faa0 | 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. |
| fac0 | 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 |
| fae0 | 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 |
| fb00 | 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. |
| fb20 | 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. |
| fb40 | 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 |
| fb60 | 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 |
| fb80 | 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 |
| fba0 | 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 |
| fbc0 | 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 |
| fbe0 | 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 |
| fc00 | 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)... |
| fc20 | 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 |
| fc40 | 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 |
| fc60 | 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'. |
| fc80 | 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 |
| fca0 | 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 |
| fcc0 | 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 |
| fce0 | 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 |
| fd00 | 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 |
| fd20 | 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 |
| fd40 | 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 |
| fd60 | 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 |
| fd80 | 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' |
| fda0 | 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.. |
| fdc0 | 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. |
| fde0 | 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 |
| fe00 | 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 |
| fe20 | 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 |
| fe40 | 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- |
| fe60 | 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... |
| fe80 | 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 |
| fea0 | 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............":\\([^/]+\\)"..... |
| fec0 | 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)............ |
| fee0 | 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 |
| ff00 | 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 |
| ff20 | 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*........................( |
| ff40 | 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............... |
| ff60 | 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...... |
| ff80 | 20 20 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 |
| ffa0 | 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))......... |
| ffc0 | 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 |
| ffe0 | 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........ |
| 10000 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 10020 | 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 |
| 10040 | 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))....................... |
| 10060 | 20 20 20 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" |
| 10080 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 100a0 | 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 |
| 100c0 | 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))).......................... |
| 100e0 | 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 |
| 10100 | 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)........ |
| 10120 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 10140 | 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)))... |
| 10160 | 20 20 20 20 20 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 | .............................(_. |
| 10180 | 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)) |
| 101a0 | 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 |
| 101c0 | 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 |
| 101e0 | 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)).. |
| 10200 | 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 |
| 10220 | 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 |
| 10240 | 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 |
| 10260 | 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- |
| 10280 | 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 |
| 102a0 | 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 |
| 102c0 | 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"................. |
| 102e0 | 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)...... |
| 10300 | 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. |
| 10320 | 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)))..;;; |
| 10340 | 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 |
| 10360 | 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).. |
| 10380 | 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 |
| 103a0 | 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.. |
| 103c0 | 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- |
| 103e0 | 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',. |
| 10400 | 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 |
| 10420 | 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 |
| 10440 | 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 |
| 10460 | 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 |
| 10480 | 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 |
| 104a0 | 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.... |
| 104c0 | 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 |
| 104e0 | 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 |
| 10500 | 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 |
| 10520 | 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 |
| 10540 | 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).... |
| 10560 | 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))... |
| 10580 | 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 |
| 105a0 | 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 |
| 105c0 | 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 |
| 105e0 | 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............ |
| 10600 | 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- |
| 10620 | 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 |
| 10640 | 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 |
| 10660 | 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 |
| 10680 | 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 |
| 106a0 | 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 |
| 106c0 | 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.( |
| 106e0 | 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.( |
| 10700 | 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 |
| 10720 | 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 |
| 10740 | 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'... |
| 10760 | 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 |
| 10780 | 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"....................... |
| 107a0 | 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).................... |
| 107c0 | 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)........... |
| 107e0 | 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)...... |
| 10800 | 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) |
| 10820 | 0a 20 20 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 |
| 10840 | 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)..................... |
| 10860 | 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......... |
| 10880 | 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)) |
| 108a0 | 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- |
| 108c0 | 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 |
| 108e0 | 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 |
| 10900 | 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. |
| 10920 | 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". |
| 10940 | 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..... |
| 10960 | 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..... |
| 10980 | 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........ |
| 109a0 | 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....... |
| 109c0 | 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 |
| 109e0 | 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 |
| 10a00 | 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))))........... |
| 10a20 | 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)......... |
| 10a40 | 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))))..;; |
| 10a60 | 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 |
| 10a80 | 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........... |
| 10aa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10b00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10c00 | 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. |
| 10c20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10c60 | 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 |
| 10c80 | 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... |
| 10ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10d00 | 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................... |
| 10d20 | 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................... |
| 10d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10e00 | 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 |
| 10e20 | 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 |
| 10e40 | 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 |
| 10e60 | 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 |
| 10e80 | 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 |
| 10ea0 | 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 |
| 10ec0 | 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 |
| 10ee0 | 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 |
| 10f00 | 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 |
| 10f20 | 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 |
| 10f40 | 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 |
| 10f60 | 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. |
| 10f80 | 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 |
| 10fa0 | 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. |
| 10fc0 | 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 |
| 10fe0 | 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..;;.; |
| 11000 | 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 |
| 11020 | 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,.; |
| 11040 | 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 |
| 11060 | 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 |
| 11080 | 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 |
| 110a0 | 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 |
| 110c0 | 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. |
| 110e0 | 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 |
| 11100 | 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 |
| 11120 | 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 |
| 11140 | 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. |
| 11160 | 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/>. |
| 11180 | 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).( |
| 111a0 | 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 |
| 111c0 | 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 |
| 111e0 | 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 |
| 11200 | 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 |
| 11220 | 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 |
| 11240 | 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 |
| 11260 | 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 |
| 11280 | 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 |
| 112a0 | 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". |
| 112c0 | 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... |
| 112e0 | 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 |
| 11300 | 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 |
| 11320 | 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))..;;; |
| 11340 | 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 |
| 11360 | 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 |
| 11380 | 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- |
| 113a0 | 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 |
| 113c0 | 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 |
| 113e0 | 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"). |
| 11400 | 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).. |
| 11420 | 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 |
| 11440 | 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... |
| 11460 | 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 |
| 11480 | 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 |
| 114a0 | 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 |
| 114c0 | 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 |
| 114e0 | 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 |
| 11500 | 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......: |
| 11520 | 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 |
| 11540 | 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)..( |
| 11560 | 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) |
| 11580 | 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 |
| 115a0 | 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 |
| 115c0 | 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 |
| 115e0 | 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)... |
| 11600 | 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.# |
| 11620 | 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.#' |
| 11640 | 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))).. |
| 11660 | 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 |
| 11680 | 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 |
| 116a0 | 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 |
| 116c0 | 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 |
| 116e0 | 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 |
| 11700 | 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)) |
| 11720 | 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 |
| 11740 | 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 |
| 11760 | 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 |
| 11780 | 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. |
| 117a0 | 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)... |
| 117c0 | 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 |
| 117e0 | 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 |
| 11800 | 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 |
| 11820 | 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 |
| 11840 | 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 |
| 11860 | 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... |
| 11880 | 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- |
| 118a0 | 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 |
| 118c0 | 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 |
| 118e0 | 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....... |
| 11900 | 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 |
| 11920 | 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 |
| 11940 | 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..... |
| 11960 | 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...... |
| 11980 | 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.. |
| 119a0 | 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.... |
| 119c0 | 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...... |
| 119e0 | 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....... |
| 11a00 | 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 |
| 11a20 | 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 |
| 11a40 | 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 |
| 11a60 | 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 |
| 11a80 | 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).... |
| 11aa0 | 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 |
| 11ac0 | 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. |
| 11ae0 | 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.. |
| 11b00 | 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 |
| 11b20 | 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.......( |
| 11b40 | 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 |
| 11b60 | 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 |
| 11b80 | 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 |
| 11ba0 | 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). |
| 11bc0 | 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 |
| 11be0 | 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 |
| 11c00 | 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.... |
| 11c20 | 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 |
| 11c40 | 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]. |
| 11c60 | 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))..... |
| 11c80 | 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). |
| 11ca0 | 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 |
| 11cc0 | 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]......( |
| 11ce0 | 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 |
| 11d00 | 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 |
| 11d20 | 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. |
| 11d40 | 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 |
| 11d60 | 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)....... |
| 11d80 | 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 |
| 11da0 | 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.... |
| 11dc0 | 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 |
| 11de0 | 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- |
| 11e00 | 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.... |
| 11e20 | 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- |
| 11e40 | 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 |
| 11e60 | 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 |
| 11e80 | 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) |
| 11ea0 | 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 |
| 11ec0 | 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 |
| 11ee0 | 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).......( |
| 11f00 | 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 |
| 11f20 | 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 |
| 11f40 | 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 |
| 11f60 | 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).... |
| 11f80 | 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- |
| 11fa0 | 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- |
| 11fc0 | 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].... |
| 11fe0 | 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 |
| 12000 | 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].. |
| 12020 | 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))...... |
| 12040 | 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 |
| 12060 | 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)]... |
| 12080 | 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].: |
| 120a0 | 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- |
| 120c0 | 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 |
| 120e0 | 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)..... |
| 12100 | 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 |
| 12120 | 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 |
| 12140 | 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 |
| 12160 | 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 |
| 12180 | 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]....... |
| 121a0 | 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 |
| 121c0 | 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).. |
| 121e0 | 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 |
| 12200 | 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 |
| 12220 | 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 |
| 12240 | 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...... |
| 12260 | 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]..... |
| 12280 | 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 |
| 122a0 | 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) |
| 122c0 | 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 |
| 122e0 | 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..... |
| 12300 | 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 |
| 12320 | 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 |
| 12340 | 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 |
| 12360 | 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)].. |
| 12380 | 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]. |
| 123a0 | 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 |
| 123c0 | 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.. |
| 123e0 | 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)..... |
| 12400 | 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)... |
| 12420 | 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 |
| 12440 | 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...... |
| 12460 | 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 |
| 12480 | 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 |
| 124a0 | 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 |
| 124c0 | 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. |
| 124e0 | 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 |
| 12500 | 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.. |
| 12520 | 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....... |
| 12540 | 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' |
| 12560 | 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.. |
| 12580 | 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.. |
| 125a0 | 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) |
| 125c0 | 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 |
| 125e0 | 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...... |
| 12600 | 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 |
| 12620 | 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)....... |
| 12640 | 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 |
| 12660 | 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 |
| 12680 | 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]......(: |
| 126a0 | 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].: |
| 126c0 | 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]...... |
| 126e0 | 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 |
| 12700 | 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 |
| 12720 | 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 |
| 12740 | 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 |
| 12760 | 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..... |
| 12780 | 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.. |
| 127a0 | 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]... |
| 127c0 | 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 |
| 127e0 | 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]. |
| 12800 | 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))..... |
| 12820 | 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 |
| 12840 | 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 |
| 12860 | 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 |
| 12880 | 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...... |
| 128a0 | 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 |
| 128c0 | 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.... |
| 128e0 | 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 |
| 12900 | 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.... |
| 12920 | 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..... |
| 12940 | 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...... |
| 12960 | 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...... |
| 12980 | 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 |
| 129a0 | 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 |
| 129c0 | 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 |
| 129e0 | 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 |
| 12a00 | 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. |
| 12a20 | 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 |
| 12a40 | 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 |
| 12a60 | 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 |
| 12a80 | 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). |
| 12aa0 | 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. |
| 12ac0 | 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. |
| 12ae0 | 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)... |
| 12b00 | 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 |
| 12b20 | 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..... |
| 12b40 | 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)..... |
| 12b60 | 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 |
| 12b80 | 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......... |
| 12ba0 | 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)....... |
| 12bc0 | 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 |
| 12be0 | 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. |
| 12c00 | 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]......( |
| 12c20 | 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]. |
| 12c40 | 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]..... |
| 12c60 | 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 |
| 12c80 | 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 |
| 12ca0 | 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)].. |
| 12cc0 | 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 |
| 12ce0 | 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]...... |
| 12d00 | 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 |
| 12d20 | 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 |
| 12d40 | 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)]...... |
| 12d60 | 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 |
| 12d80 | 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 |
| 12da0 | 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 |
| 12dc0 | 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 |
| 12de0 | 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 |
| 12e00 | 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 |
| 12e20 | 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 |
| 12e40 | 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.......[ |
| 12e60 | 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 |
| 12e80 | 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).... |
| 12ea0 | 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 |
| 12ec0 | 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 |
| 12ee0 | 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. |
| 12f00 | 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 |
| 12f20 | 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)....... |
| 12f40 | 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 |
| 12f60 | 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... |
| 12f80 | 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 |
| 12fa0 | 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.: |
| 12fc0 | 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 |
| 12fe0 | 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 |
| 13000 | 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 |
| 13020 | 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 |
| 13040 | 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 |
| 13060 | 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)].... |
| 13080 | 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]. |
| 130a0 | 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].......: |
| 130c0 | 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 |
| 130e0 | 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)...... |
| 13100 | 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).... |
| 13120 | 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...... |
| 13140 | 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... |
| 13160 | 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.... |
| 13180 | 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 |
| 131a0 | 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 |
| 131c0 | 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- |
| 131e0 | 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 |
| 13200 | 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 |
| 13220 | 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 |
| 13240 | 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-- |
| 13260 | 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.( |
| 13280 | 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 |
| 132a0 | 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)).....( |
| 132c0 | 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...... |
| 132e0 | 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 |
| 13300 | 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. |
| 13320 | 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...")........ |
| 13340 | 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 |
| 13360 | 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]......... |
| 13380 | 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 |
| 133a0 | 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 |
| 133c0 | 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- |
| 133e0 | 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)).... |
| 13400 | 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 |
| 13420 | 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 |
| 13440 | 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). |
| 13460 | 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 |
| 13480 | 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.. |
| 134a0 | 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 |
| 134c0 | 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 |
| 134e0 | 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 |
| 13500 | 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)........ |
| 13520 | 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 |
| 13540 | 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............................. |
| 13560 | 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)) |
| 13580 | 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 |
| 135a0 | 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))) |
| 135c0 | 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 |
| 135e0 | 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 |
| 13600 | 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)...... |
| 13620 | 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 |
| 13640 | 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. |
| 13660 | 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 |
| 13680 | 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 |
| 136a0 | 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 |
| 136c0 | 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 |
| 136e0 | 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.( |
| 13700 | 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 |
| 13720 | 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 |
| 13740 | 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 |
| 13760 | 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 |
| 13780 | 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 |
| 137a0 | 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 |
| 137c0 | 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))....... |
| 137e0 | 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 |
| 13800 | 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" |
| 13820 | 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).... |
| 13840 | 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 |
| 13860 | 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...") |
| 13880 | 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 |
| 138a0 | 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 |
| 138c0 | 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 |
| 138e0 | 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 |
| 13900 | 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 |
| 13920 | 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 |
| 13940 | 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 |
| 13960 | 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 |
| 13980 | 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 |
| 139a0 | 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 |
| 139c0 | 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 |
| 139e0 | 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])......... |
| 13a00 | 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 |
| 13a20 | 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] |
| 13a40 | 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 |
| 13a60 | 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]............. |
| 13a80 | 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 |
| 13aa0 | 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))).........( |
| 13ac0 | 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 |
| 13ae0 | 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 |
| 13b00 | 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 |
| 13b20 | 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. |
| 13b40 | 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 |
| 13b60 | 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 |
| 13b80 | 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 |
| 13ba0 | 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]......................... |
| 13bc0 | 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......... |
| 13be0 | 20 20 20 20 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 |
| 13c00 | 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)]))....... |
| 13c20 | 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). |
| 13c40 | 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 |
| 13c60 | 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.......... |
| 13c80 | 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- |
| 13ca0 | 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)))))......... |
| 13cc0 | 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 |
| 13ce0 | 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)............... |
| 13d00 | 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 |
| 13d20 | 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]......... |
| 13d40 | 20 20 20 20 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 |
| 13d60 | 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....................... |
| 13d80 | 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 |
| 13da0 | 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 |
| 13dc0 | 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 |
| 13de0 | 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 |
| 13e00 | 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...................( |
| 13e20 | 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 |
| 13e40 | 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 |
| 13e60 | 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 |
| 13e80 | 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 |
| 13ea0 | 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. |
| 13ec0 | 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 |
| 13ee0 | 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 |
| 13f00 | 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. |
| 13f20 | 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.[: |
| 13f40 | 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. |
| 13f60 | 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])......... |
| 13f80 | 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 |
| 13fa0 | 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. |
| 13fc0 | 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 |
| 13fe0 | 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 |
| 14000 | 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 |
| 14020 | 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 |
| 14040 | 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 |
| 14060 | 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 |
| 14080 | 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.(= |
| 140a0 | 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 |
| 140c0 | 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 |
| 140e0 | 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 |
| 14100 | 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 |
| 14120 | 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])... |
| 14140 | 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. |
| 14160 | 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 |
| 14180 | 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- |
| 141a0 | 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)) |
| 141c0 | 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 |
| 141e0 | 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. |
| 14200 | 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 |
| 14220 | 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. |
| 14240 | 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 |
| 14260 | 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 |
| 14280 | 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 |
| 142a0 | 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 |
| 142c0 | 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 |
| 142e0 | 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]).... |
| 14300 | 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 |
| 14320 | 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)........................ |
| 14340 | 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........................ |
| 14360 | 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 |
| 14380 | 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. |
| 143a0 | 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]............... |
| 143c0 | 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........ |
| 143e0 | 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 |
| 14400 | 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. |
| 14420 | 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 |
| 14440 | 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 |
| 14460 | 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..................... |
| 14480 | 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 |
| 144a0 | 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....................... |
| 144c0 | 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- |
| 144e0 | 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)....... |
| 14500 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 14520 | 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 |
| 14540 | 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.$ |
| 14560 | 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)].......... |
| 14580 | 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 |
| 145a0 | 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)......... |
| 145c0 | 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 |
| 145e0 | 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)........ |
| 14600 | 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 |
| 14620 | 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])). |
| 14640 | 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 |
| 14660 | 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.(= |
| 14680 | 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 |
| 146a0 | 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).............. |
| 146c0 | 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 |
| 146e0 | 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)) |
| 14700 | 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 |
| 14720 | 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 |
| 14740 | 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 |
| 14760 | 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 |
| 14780 | 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 |
| 147a0 | 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. |
| 147c0 | 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])..... |
| 147e0 | 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 |
| 14800 | 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]................ |
| 14820 | 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 |
| 14840 | 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))).........( |
| 14860 | 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 |
| 14880 | 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 |
| 148a0 | 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 |
| 148c0 | 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 |
| 148e0 | 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 |
| 14900 | 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.: |
| 14920 | 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] |
| 14940 | 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 |
| 14960 | 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. |
| 14980 | 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-- |
| 149a0 | 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. |
| 149c0 | 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 |
| 149e0 | 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. |
| 14a00 | 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 |
| 14a20 | 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 |
| 14a40 | 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 |
| 14a60 | 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 |
| 14a80 | 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]) |
| 14aa0 | 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 |
| 14ac0 | 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]........... |
| 14ae0 | 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. |
| 14b00 | 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)))..... |
| 14b20 | 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 |
| 14b40 | 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 |
| 14b60 | 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 |
| 14b80 | 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 |
| 14ba0 | 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) |
| 14bc0 | 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))....... |
| 14be0 | 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 |
| 14c00 | 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 |
| 14c20 | 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 |
| 14c40 | 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.' |
| 14c60 | 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)]........ |
| 14c80 | 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 |
| 14ca0 | 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 |
| 14cc0 | 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 |
| 14ce0 | 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 |
| 14d00 | 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 |
| 14d20 | 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)]....... |
| 14d40 | 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 |
| 14d60 | 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 |
| 14d80 | 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 |
| 14da0 | 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 |
| 14dc0 | 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 |
| 14de0 | 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)]............ |
| 14e00 | 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 |
| 14e20 | 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 |
| 14e40 | 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] |
| 14e60 | 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 |
| 14e80 | 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 |
| 14ea0 | 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])........ |
| 14ec0 | 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 |
| 14ee0 | 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. |
| 14f00 | 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 |
| 14f20 | 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"))....... |
| 14f40 | 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 |
| 14f60 | 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. |
| 14f80 | 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...")...... |
| 14fa0 | 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 |
| 14fc0 | 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......... |
| 14fe0 | 20 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. |
| 15000 | 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)]))........ |
| 15020 | 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 |
| 15040 | 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 |
| 15060 | 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)]...... |
| 15080 | 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. |
| 150a0 | 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........... |
| 150c0 | 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 |
| 150e0 | 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).................... |
| 15100 | 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 |
| 15120 | 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)]............................ |
| 15140 | 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]..................... |
| 15160 | 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)).... |
| 15180 | 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 |
| 151a0 | 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....... |
| 151c0 | 20 20 20 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 |
| 151e0 | 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)])).... |
| 15200 | 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.[: |
| 15220 | 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 |
| 15240 | 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)] |
| 15260 | 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 |
| 15280 | 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... |
| 152a0 | 20 20 20 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 |
| 152c0 | 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)............ |
| 152e0 | 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 |
| 15300 | 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)].................... |
| 15320 | 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]............. |
| 15340 | 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))............ |
| 15360 | 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 |
| 15380 | 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 |
| 153a0 | 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])....... |
| 153c0 | 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 |
| 153e0 | 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 |
| 15400 | 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]. |
| 15420 | 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 |
| 15440 | 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 |
| 15460 | 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). |
| 15480 | 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 |
| 154a0 | 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).. |
| 154c0 | 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-- |
| 154e0 | 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. |
| 15500 | 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 |
| 15520 | 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. |
| 15540 | 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- |
| 15560 | 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 |
| 15580 | 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.( |
| 155a0 | 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 |
| 155c0 | 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)..... |
| 155e0 | 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". |
| 15600 | 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 |
| 15620 | 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)............................. |
| 15640 | 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. |
| 15660 | 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])))................ |
| 15680 | 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 |
| 156a0 | 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")......................" |
| 156c0 | 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 |
| 156e0 | 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). |
| 15700 | 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 |
| 15720 | 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 |
| 15740 | 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)) |
| 15760 | 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).;;; |
| 15780 | 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.......... |
| 157a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 157c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 157e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15800 | 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. |
| 15820 | 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.............................. |
| 15840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15860 | 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 |
| 15880 | 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... |
| 158a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 158c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 158e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15900 | 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................... |
| 15920 | 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................... |
| 15940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 159a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 159c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 159e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15a00 | 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 |
| 15a20 | 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.-*-. |
| 15a40 | 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 |
| 15a60 | 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 |
| 15a80 | 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 |
| 15aa0 | 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 |
| 15ac0 | 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 |
| 15ae0 | 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 |
| 15b00 | 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 |
| 15b20 | 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 |
| 15b40 | 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 |
| 15b60 | 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 |
| 15b80 | 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 |
| 15ba0 | 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 |
| 15bc0 | 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 |
| 15be0 | 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. |
| 15c00 | 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. |
| 15c20 | 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 |
| 15c40 | 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 |
| 15c60 | 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 |
| 15c80 | 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 |
| 15ca0 | 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 |
| 15cc0 | 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 |
| 15ce0 | 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 |
| 15d00 | 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 |
| 15d20 | 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 |
| 15d40 | 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: |
| 15d60 | 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 |
| 15d80 | 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.' |
| 15da0 | 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 |
| 15dc0 | 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 |
| 15de0 | 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- |
| 15e00 | 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: |
| 15e20 | 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 |
| 15e40 | 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 |
| 15e60 | 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")....;;. |
| 15e80 | 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. |
| 15ea0 | 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 |
| 15ec0 | 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 |
| 15ee0 | 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 |
| 15f00 | 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 |
| 15f20 | 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/ |
| 15f40 | 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 |
| 15f60 | 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/% |
| 15f80 | 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 |
| 15fa0 | 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:/ |
| 15fc0 | 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- |
| 15fe0 | 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...... |
| 16000 | 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 |
| 16020 | 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 |
| 16040 | 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/% |
| 16060 | 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 |
| 16080 | 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 |
| 160a0 | 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- |
| 160c0 | 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 |
| 160e0 | 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")....( |
| 16100 | 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 |
| 16120 | 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").;. |
| 16140 | 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 |
| 16160 | 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 |
| 16180 | 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- |
| 161a0 | 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 |
| 161c0 | 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............................. |
| 161e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16200 | 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 |
| 16220 | 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............................. |
| 16240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16260 | 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 |
| 16280 | 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... |
| 162a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 162c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 162e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16300 | 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................... |
| 16320 | 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................... |
| 16340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 163a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 163c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 163e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16400 | 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 |
| 16420 | 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.-* |
| 16440 | 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 |
| 16460 | 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. |
| 16480 | 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>.;;. |
| 164a0 | 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 |
| 164c0 | 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- |
| 164e0 | 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..;; |
| 16500 | 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 |
| 16520 | 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 |
| 16540 | 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. |
| 16560 | 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 |
| 16580 | 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. |
| 165a0 | 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. |
| 165c0 | 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 |
| 165e0 | 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 |
| 16600 | 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 |
| 16620 | 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 |
| 16640 | 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 |
| 16660 | 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 |
| 16680 | 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. |
| 166a0 | 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.;;. |
| 166c0 | 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 |
| 166e0 | 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 |
| 16700 | 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 |
| 16720 | 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 |
| 16740 | 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 |
| 16760 | 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/>...;;; |
| 16780 | 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 |
| 167a0 | 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) |
| 167c0 | 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 |
| 167e0 | 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 |
| 16800 | 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 |
| 16820 | 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 |
| 16840 | 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")... |
| 16860 | 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 |
| 16880 | 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/% |
| 168a0 | 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... |
| 168c0 | 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 |
| 168e0 | 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 |
| 16900 | 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 |
| 16920 | 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")....( |
| 16940 | 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 |
| 16960 | 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"). |
| 16980 | 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 |
| 169a0 | 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/% |
| 169c0 | 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 |
| 169e0 | 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 |
| 16a00 | 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 |
| 16a20 | 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 |
| 16a40 | 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") |
| 16a60 | 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.........: |
| 16a80 | 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").... |
| 16aa0 | 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 |
| 16ac0 | 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 |
| 16ae0 | 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 |
| 16b00 | 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 |
| 16b20 | 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..... |
| 16b40 | 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 |
| 16b60 | 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 |
| 16b80 | 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 |
| 16ba0 | 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 |
| 16bc0 | 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 |
| 16be0 | 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 |
| 16c00 | 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 |
| 16c20 | 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)..... |
| 16c40 | 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 |
| 16c60 | 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 |
| 16c80 | 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 |
| 16ca0 | 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 |
| 16cc0 | 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- |
| 16ce0 | 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 |
| 16d00 | 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.( |
| 16d20 | 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 |
| 16d40 | 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 |
| 16d60 | 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)......( |
| 16d80 | 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 |
| 16da0 | 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")..... |
| 16dc0 | 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 |
| 16de0 | 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 |
| 16e00 | 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 |
| 16e20 | 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- |
| 16e40 | 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)... |
| 16e60 | 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 |
| 16e80 | 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)....... |
| 16ea0 | 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 |
| 16ec0 | 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 |
| 16ee0 | 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).. |
| 16f00 | 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 |
| 16f20 | 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)........... |
| 16f40 | 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. |
| 16f60 | 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 |
| 16f80 | 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 |
| 16fa0 | 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- |
| 16fc0 | 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) |
| 16fe0 | 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. |
| 17000 | 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 |
| 17020 | 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")........ |
| 17040 | 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 |
| 17060 | 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 |
| 17080 | 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 |
| 170a0 | 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))))..... |
| 170c0 | 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 |
| 170e0 | 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))).. |
| 17100 | 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 |
| 17120 | 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 |
| 17140 | 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 |
| 17160 | 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 |
| 17180 | 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))))..( |
| 171a0 | 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 |
| 171c0 | 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 |
| 171e0 | 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... |
| 17200 | 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 |
| 17220 | 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.. |
| 17240 | 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 |
| 17260 | 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).....( |
| 17280 | 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 |
| 172a0 | 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 |
| 172c0 | 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)..... |
| 172e0 | 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.( |
| 17300 | 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 |
| 17320 | 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 |
| 17340 | 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 |
| 17360 | 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..... |
| 17380 | 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 |
| 173a0 | 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 |
| 173c0 | 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).... |
| 173e0 | 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 |
| 17400 | 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.. |
| 17420 | 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 |
| 17440 | 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) |
| 17460 | 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.......... |
| 17480 | 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 |
| 174a0 | 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 |
| 174c0 | 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... |
| 174e0 | 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 |
| 17500 | 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 |
| 17520 | 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 |
| 17540 | 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 |
| 17560 | 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 |
| 17580 | 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 |
| 175a0 | 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 |
| 175c0 | 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 |
| 175e0 | 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 |
| 17600 | 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). |
| 17620 | 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 |
| 17640 | 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)...... |
| 17660 | 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.... |
| 17680 | 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- |
| 176a0 | 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 |
| 176c0 | 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).........: |
| 176e0 | 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........ |
| 17700 | 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 |
| 17720 | 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 |
| 17740 | 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........ |
| 17760 | 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)) |
| 17780 | 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- |
| 177a0 | 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 |
| 177c0 | 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 |
| 177e0 | 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). |
| 17800 | 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.( |
| 17820 | 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 |
| 17840 | 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 |
| 17860 | 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)... |
| 17880 | 20 20 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 |
| 178a0 | 0a 20 20 20 20 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 |
| 178c0 | 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.............................. |
| 178e0 | 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- |
| 17900 | 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 |
| 17920 | 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 |
| 17940 | 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. |
| 17960 | 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.( |
| 17980 | 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 |
| 179a0 | 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 |
| 179c0 | 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..................... |
| 179e0 | 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. |
| 17a00 | 20 20 20 20 20 20 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 |
| 17a20 | 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)......... |
| 17a40 | 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 |
| 17a60 | 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)....................... |
| 17a80 | 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............ |
| 17aa0 | 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)....... |
| 17ac0 | 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 |
| 17ae0 | 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....................... |
| 17b00 | 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)))).......... |
| 17b20 | 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))))). |
| 17b40 | 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 |
| 17b60 | 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 |
| 17b80 | 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... |
| 17ba0 | 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..... |
| 17bc0 | 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)..... |
| 17be0 | 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.. |
| 17c00 | 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 |
| 17c20 | 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)............ |
| 17c40 | 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.......... |
| 17c60 | 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."#".( |
| 17c80 | 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))............... |
| 17ca0 | 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)))... |
| 17cc0 | 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 |
| 17ce0 | 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 |
| 17d00 | 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 |
| 17d20 | 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 |
| 17d40 | 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 |
| 17d60 | 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 |
| 17d80 | 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).....................( |
| 17da0 | 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................... |
| 17dc0 | 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.. |
| 17de0 | 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)............................. |
| 17e00 | 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......................... |
| 17e20 | 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...................... |
| 17e40 | 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............... |
| 17e60 | 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........ |
| 17e80 | 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..... |
| 17ea0 | 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 |
| 17ec0 | 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 |
| 17ee0 | 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)))................... |
| 17f00 | 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 |
| 17f20 | 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 |
| 17f40 | 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 |
| 17f60 | 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)............................ |
| 17f80 | 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.(( |
| 17fa0 | 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-- |
| 17fc0 | 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 |
| 17fe0 | 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 |
| 18000 | 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 |
| 18020 | 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)....... |
| 18040 | 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 |
| 18060 | 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 |
| 18080 | 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-- |
| 180a0 | 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...................... |
| 180c0 | 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 |
| 180e0 | 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. |
| 18100 | 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 |
| 18120 | 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 |
| 18140 | 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).................. |
| 18160 | 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 |
| 18180 | 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)............................. |
| 181a0 | 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)... |
| 181c0 | 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))) |
| 181e0 | 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 |
| 18200 | 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 |
| 18220 | 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).... |
| 18240 | 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-- |
| 18260 | 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)........( |
| 18280 | 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 |
| 182a0 | 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))....... |
| 182c0 | 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 |
| 182e0 | 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 |
| 18300 | 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.. |
| 18320 | 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 |
| 18340 | 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 |
| 18360 | 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).... |
| 18380 | 20 20 20 20 20 20 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 |
| 183a0 | 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)............. |
| 183c0 | 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 |
| 183e0 | 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 |
| 18400 | 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 |
| 18420 | 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). |
| 18440 | 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 |
| 18460 | 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 |
| 18480 | 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 |
| 184a0 | 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 |
| 184c0 | 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 |
| 184e0 | 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 |
| 18500 | 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 |
| 18520 | 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) |
| 18540 | 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 |
| 18560 | 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 |
| 18580 | 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 |
| 185a0 | 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)............. |
| 185c0 | 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 |
| 185e0 | 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 |
| 18600 | 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.. |
| 18620 | 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)).......... |
| 18640 | 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 |
| 18660 | 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 |
| 18680 | 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 |
| 186a0 | 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))............. |
| 186c0 | 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 |
| 186e0 | 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))........... |
| 18700 | 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)........ |
| 18720 | 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 |
| 18740 | 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 |
| 18760 | 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))......... |
| 18780 | 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 |
| 187a0 | 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 |
| 187c0 | 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......... |
| 187e0 | 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. |
| 18800 | 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 |
| 18820 | 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 |
| 18840 | 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)))........... |
| 18860 | 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 |
| 18880 | 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 |
| 188a0 | 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))))))). |
| 188c0 | 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 |
| 188e0 | 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 |
| 18900 | 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........... |
| 18920 | 20 20 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 |
| 18940 | 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 |
| 18960 | 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 |
| 18980 | 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 |
| 189a0 | 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) |
| 189c0 | 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 |
| 189e0 | 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 |
| 18a00 | 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 |
| 18a20 | 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 |
| 18a40 | 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............................... |
| 18a60 | 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 |
| 18a80 | 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 |
| 18aa0 | 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 |
| 18ac0 | 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)......... |
| 18ae0 | 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 |
| 18b00 | 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)).... |
| 18b20 | 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- |
| 18b40 | 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)............. |
| 18b60 | 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...... |
| 18b80 | 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).. |
| 18ba0 | 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 |
| 18bc0 | 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....... |
| 18be0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 18c00 | 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)...... |
| 18c20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 18c40 | 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))))........ |
| 18c60 | 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).... |
| 18c80 | 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 |
| 18ca0 | 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 |
| 18cc0 | 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 |
| 18ce0 | 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 |
| 18d00 | 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 |
| 18d20 | 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)....... |
| 18d40 | 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".,_).' |
| 18d60 | 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).................(`(,_ |
| 18d80 | 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)..... |
| 18da0 | 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") |
| 18dc0 | 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 |
| 18de0 | 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)......... |
| 18e00 | 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).. |
| 18e20 | 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 |
| 18e40 | 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 |
| 18e60 | 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 |
| 18e80 | 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)..... |
| 18ea0 | 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. |
| 18ec0 | 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................... |
| 18ee0 | 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 |
| 18f00 | 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).............. |
| 18f20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 18f40 | 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)))....... |
| 18f60 | 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- |
| 18f80 | 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))........ |
| 18fa0 | 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. |
| 18fc0 | 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.( |
| 18fe0 | 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 |
| 19000 | 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.. |
| 19020 | 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).......... |
| 19040 | 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........... |
| 19060 | 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 |
| 19080 | 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)............ |
| 190a0 | 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............ |
| 190c0 | 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......... |
| 190e0 | 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.... |
| 19100 | 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.. |
| 19120 | 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 |
| 19140 | 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-- |
| 19160 | 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))......... |
| 19180 | 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 |
| 191a0 | 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 |
| 191c0 | 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 |
| 191e0 | 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 |
| 19200 | 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)). |
| 19220 | 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 |
| 19240 | 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 |
| 19260 | 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")........... |
| 19280 | 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.' |
| 192a0 | 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)).. |
| 192c0 | 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 |
| 192e0 | 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 |
| 19300 | 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........ |
| 19320 | 20 20 20 20 20 20 20 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 | ...............................& |
| 19340 | 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 |
| 19360 | 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.(( |
| 19380 | 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 |
| 193a0 | 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 |
| 193c0 | 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 |
| 193e0 | 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)) |
| 19400 | 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- |
| 19420 | 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 |
| 19440 | 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.................... |
| 19460 | 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 |
| 19480 | 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 |
| 194a0 | 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.. |
| 194c0 | 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 |
| 194e0 | 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 |
| 19500 | 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 |
| 19520 | 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. |
| 19540 | 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 |
| 19560 | 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).................... |
| 19580 | 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........... |
| 195a0 | 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)..... |
| 195c0 | 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 |
| 195e0 | 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.... |
| 19600 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 19620 | 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 |
| 19640 | 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 | )............................... |
| 19660 | 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) |
| 19680 | 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- |
| 196a0 | 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 |
| 196c0 | 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 |
| 196e0 | 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 |
| 19700 | 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 |
| 19720 | 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.............................. |
| 19740 | 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)...... |
| 19760 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 19780 | 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)............ |
| 197a0 | 20 20 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 |
| 197c0 | 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 |
| 197e0 | 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).. |
| 19800 | 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...... |
| 19820 | 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. |
| 19840 | 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)........ |
| 19860 | 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 |
| 19880 | 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 |
| 198a0 | 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 |
| 198c0 | 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 |
| 198e0 | 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 |
| 19900 | 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 |
| 19920 | 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 |
| 19940 | 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 |
| 19960 | 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)... |
| 19980 | 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.... |
| 199a0 | 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 |
| 199c0 | 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). |
| 199e0 | 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. |
| 19a00 | 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 |
| 19a20 | 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 |
| 19a40 | 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)......... |
| 19a60 | 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 |
| 19a80 | 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 |
| 19aa0 | 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 |
| 19ac0 | 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 |
| 19ae0 | 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 |
| 19b00 | 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. |
| 19b20 | 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 |
| 19b40 | 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......................... |
| 19b60 | 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 |
| 19b80 | 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)................ |
| 19ba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 19bc0 | 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)))..... |
| 19be0 | 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.........( |
| 19c00 | 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)).. |
| 19c20 | 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 |
| 19c40 | 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 |
| 19c60 | 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 |
| 19c80 | 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 |
| 19ca0 | 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).... |
| 19cc0 | 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... |
| 19ce0 | 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 |
| 19d00 | 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).. |
| 19d20 | 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 |
| 19d40 | 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 |
| 19d60 | 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 |
| 19d80 | 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. |
| 19da0 | 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 |
| 19dc0 | 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 |
| 19de0 | 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 |
| 19e00 | 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 |
| 19e20 | 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 |
| 19e40 | 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))....... |
| 19e60 | 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 |
| 19e80 | 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 |
| 19ea0 | 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 |
| 19ec0 | 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 |
| 19ee0 | 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.. |
| 19f00 | 20 20 20 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 |
| 19f20 | 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)))......... |
| 19f40 | 20 20 20 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 |
| 19f60 | 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 |
| 19f80 | 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 |
| 19fa0 | 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 |
| 19fc0 | 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 |
| 19fe0 | 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)) |
| 1a000 | 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 |
| 1a020 | 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- |
| 1a040 | 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 |
| 1a060 | 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 |
| 1a080 | 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 |
| 1a0a0 | 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 |
| 1a0c0 | 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... |
| 1a0e0 | 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 |
| 1a100 | 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 |
| 1a120 | 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 |
| 1a140 | 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 |
| 1a160 | 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. |
| 1a180 | 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 |
| 1a1a0 | 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 |
| 1a1c0 | 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 |
| 1a1e0 | 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.( |
| 1a200 | 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 |
| 1a220 | 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. |
| 1a240 | 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................ |
| 1a260 | 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 |
| 1a280 | 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..... |
| 1a2a0 | 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 |
| 1a2c0 | 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. |
| 1a2e0 | 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,.......................;; |
| 1a300 | 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... |
| 1a320 | 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 |
| 1a340 | 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 |
| 1a360 | 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"....................... |
| 1a380 | 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 |
| 1a3a0 | 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)))............. |
| 1a3c0 | 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 |
| 1a3e0 | 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"................... |
| 1a400 | 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 |
| 1a420 | 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)))... |
| 1a440 | 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.. |
| 1a460 | 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))........... |
| 1a480 | 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)))..... |
| 1a4a0 | 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. |
| 1a4c0 | 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 |
| 1a4e0 | 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))... |
| 1a500 | 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)). |
| 1a520 | 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 |
| 1a540 | 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..... |
| 1a560 | 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 |
| 1a580 | 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)..............( |
| 1a5a0 | 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 |
| 1a5c0 | 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))) |
| 1a5e0 | 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....... |
| 1a600 | 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) |
| 1a620 | 0a 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- |
| 1a640 | 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.................. |
| 1a660 | 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 |
| 1a680 | 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)"......... |
| 1a6a0 | 20 20 20 20 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 |
| 1a6c0 | 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)......................... |
| 1a6e0 | 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........... |
| 1a700 | 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 |
| 1a720 | 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))).... |
| 1a740 | 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 |
| 1a760 | 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)). |
| 1a780 | 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 |
| 1a7a0 | 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")... |
| 1a7c0 | 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 |
| 1a7e0 | 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")..... |
| 1a800 | 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 |
| 1a820 | 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)..... |
| 1a840 | 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." |
| 1a860 | 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")......... |
| 1a880 | 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........... |
| 1a8a0 | 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)))))... |
| 1a8c0 | 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 |
| 1a8e0 | 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).. |
| 1a900 | 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 |
| 1a920 | 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]..... |
| 1a940 | 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 |
| 1a960 | 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]................. |
| 1a980 | 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 |
| 1a9a0 | 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)........................ |
| 1a9c0 | 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 |
| 1a9e0 | 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))............. |
| 1aa00 | 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 |
| 1aa20 | 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)]]................ |
| 1aa40 | 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 |
| 1aa60 | 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 |
| 1aa80 | 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* |
| 1aaa0 | 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 |
| 1aac0 | 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. |
| 1aae0 | 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. |
| 1ab00 | 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.'( |
| 1ab20 | 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* |
| 1ab40 | 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 |
| 1ab60 | 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).......... |
| 1ab80 | 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 |
| 1aba0 | 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 |
| 1abc0 | 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 |
| 1abe0 | 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........ |
| 1ac00 | 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 |
| 1ac20 | 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............................... |
| 1ac40 | 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...... |
| 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 20 20 20 20 2e 72 65 70 | .............................rep |
| 1ac80 | 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)................... |
| 1aca0 | 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!))......... |
| 1acc0 | 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) |
| 1ace0 | 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 |
| 1ad00 | 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)).................. |
| 1ad20 | 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))...... |
| 1ad40 | 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 |
| 1ad60 | 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. |
| 1ad80 | 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. |
| 1ada0 | 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 |
| 1adc0 | 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)))))............ |
| 1ade0 | 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................ |
| 1ae00 | 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)....... |
| 1ae20 | 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).... |
| 1ae40 | 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 |
| 1ae60 | 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. |
| 1ae80 | 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.. |
| 1aea0 | 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 |
| 1aec0 | 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............ |
| 1aee0 | 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 |
| 1af00 | 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...........................( |
| 1af20 | 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)............. |
| 1af40 | 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 |
| 1af60 | 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))........ |
| 1af80 | 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 |
| 1afa0 | 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 |
| 1afc0 | 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)))......................... |
| 1afe0 | 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 |
| 1b000 | 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 |
| 1b020 | 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. |
| 1b040 | 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 |
| 1b060 | 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. |
| 1b080 | 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 |
| 1b0a0 | 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 |
| 1b0c0 | 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 |
| 1b0e0 | 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)........... |
| 1b100 | 20 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 |
| 1b120 | 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.................. |
| 1b140 | 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- |
| 1b160 | 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)........................ |
| 1b180 | 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.................... |
| 1b1a0 | 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 |
| 1b1c0 | 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 |
| 1b1e0 | 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 |
| 1b200 | 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)...........................( |
| 1b220 | 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)........ |
| 1b240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1b260 | 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........... |
| 1b280 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1b2a0 | 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................ |
| 1b2c0 | 20 20 20 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 |
| 1b2e0 | 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.................... |
| 1b300 | 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 |
| 1b320 | 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)............. |
| 1b340 | 20 20 20 20 20 20 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 |
| 1b360 | 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................ |
| 1b380 | 20 20 20 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 |
| 1b3a0 | 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)........ |
| 1b3c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1b3e0 | 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))) |
| 1b400 | 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.. |
| 1b420 | 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 |
| 1b440 | 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 |
| 1b460 | 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. |
| 1b480 | 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).. |
| 1b4a0 | 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.... |
| 1b4c0 | 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 |
| 1b4e0 | 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 |
| 1b500 | 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 |
| 1b520 | 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 |
| 1b540 | 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... |
| 1b560 | 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). |
| 1b580 | 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 |
| 1b5a0 | 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- |
| 1b5c0 | 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 |
| 1b5e0 | 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 |
| 1b600 | 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 |
| 1b620 | 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 |
| 1b640 | 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... |
| 1b660 | 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). |
| 1b680 | 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- |
| 1b6a0 | 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 |
| 1b6c0 | 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 |
| 1b6e0 | 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...((_ |
| 1b700 | 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 |
| 1b720 | 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 |
| 1b740 | 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 |
| 1b760 | 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 |
| 1b780 | 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 |
| 1b7a0 | 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)....... |
| 1b7c0 | 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 |
| 1b7e0 | 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)))....` |
| 1b800 | 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) |
| 1b820 | 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......... |
| 1b840 | 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 |
| 1b860 | 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 |
| 1b880 | 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 |
| 1b8a0 | 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 |
| 1b8c0 | 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 |
| 1b8e0 | 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 |
| 1b900 | 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 |
| 1b920 | 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. |
| 1b940 | 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........ |
| 1b960 | 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!)]... |
| 1b980 | 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 |
| 1b9a0 | 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) |
| 1b9c0 | 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 |
| 1b9e0 | 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 |
| 1ba00 | 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)............... |
| 1ba20 | 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 |
| 1ba40 | 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. |
| 1ba60 | 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 |
| 1ba80 | 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 |
| 1baa0 | 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 |
| 1bac0 | 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)............... |
| 1bae0 | 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 |
| 1bb00 | 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................. |
| 1bb20 | 20 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 |
| 1bb40 | 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)................. |
| 1bb60 | 20 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 |
| 1bb80 | 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!)))........................ |
| 1bba0 | 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 |
| 1bbc0 | 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?))......... |
| 1bbe0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 | ...........................(list |
| 1bc00 | 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))))....................... |
| 1bc20 | 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 |
| 1bc40 | 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.()................( |
| 1bc60 | 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)))... |
| 1bc80 | 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 |
| 1bca0 | 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)))..;;;. |
| 1bcc0 | 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-- |
| 1bce0 | 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 |
| 1bd00 | 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 |
| 1bd20 | 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). |
| 1bd40 | 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 |
| 1bd60 | 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".......`( |
| 1bd80 | 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 |
| 1bda0 | 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 |
| 1bdc0 | 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 |
| 1bde0 | 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 |
| 1be00 | 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 |
| 1be20 | 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 |
| 1be40 | 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 |
| 1be60 | 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 |
| 1be80 | 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- |
| 1bea0 | 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 |
| 1bec0 | 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)...... |
| 1bee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1bf00 | 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).. |
| 1bf20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1bf40 | 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)... |
| 1bf60 | 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..., |
| 1bf80 | 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 |
| 1bfa0 | 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)).. |
| 1bfc0 | 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... |
| 1bfe0 | 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 |
| 1c000 | 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)). |
| 1c020 | 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 |
| 1c040 | 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 |
| 1c060 | 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. |
| 1c080 | 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"..... |
| 1c0a0 | 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 |
| 1c0c0 | 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 |
| 1c0e0 | 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 |
| 1c100 | 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)......... |
| 1c120 | 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....... |
| 1c140 | 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 |
| 1c160 | 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).":"................ |
| 1c180 | 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)))..... |
| 1c1a0 | 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)) |
| 1c1c0 | 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 |
| 1c1e0 | 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 |
| 1c200 | 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).................... |
| 1c220 | 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.( |
| 1c240 | 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)))) |
| 1c260 | 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 |
| 1c280 | 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 |
| 1c2a0 | 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 |
| 1c2c0 | 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 |
| 1c2e0 | 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 |
| 1c300 | 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)).......( |
| 1c320 | 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 |
| 1c340 | 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 |
| 1c360 | 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- |
| 1c380 | 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* |
| 1c3a0 | 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 |
| 1c3c0 | 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 |
| 1c3e0 | 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- |
| 1c400 | 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 |
| 1c420 | 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)....... |
| 1c440 | 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- |
| 1c460 | 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)) |
| 1c480 | 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 |
| 1c4a0 | 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 |
| 1c4c0 | 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 |
| 1c4e0 | 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................. |
| 1c500 | 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 |
| 1c520 | 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 |
| 1c540 | 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 |
| 1c560 | 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 |
| 1c580 | 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". |
| 1c5a0 | 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).... |
| 1c5c0 | 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)........ |
| 1c5e0 | 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)....... |
| 1c600 | 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 |
| 1c620 | 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)............... |
| 1c640 | 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........... |
| 1c660 | 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 |
| 1c680 | 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).":".................. |
| 1c6a0 | 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)))..... |
| 1c6c0 | 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 |
| 1c6e0 | 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).... |
| 1c700 | 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 |
| 1c720 | 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....................... |
| 1c740 | 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 |
| 1c760 | 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 |
| 1c780 | 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) |
| 1c7a0 | 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 |
| 1c7c0 | 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 |
| 1c7e0 | 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. |
| 1c800 | 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 |
| 1c820 | 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."/ |
| 1c840 | 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 |
| 1c860 | 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 |
| 1c880 | 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)))).....: |
| 1c8a0 | 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 |
| 1c8c0 | 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 |
| 1c8e0 | 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 |
| 1c900 | 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.( |
| 1c920 | 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 |
| 1c940 | 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..... |
| 1c960 | 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 |
| 1c980 | 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 |
| 1c9a0 | 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.. |
| 1c9c0 | 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 |
| 1c9e0 | 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 |
| 1ca00 | 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 |
| 1ca20 | 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 |
| 1ca40 | 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 |
| 1ca60 | 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). |
| 1ca80 | 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).. |
| 1caa0 | 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))).. |
| 1cac0 | 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 |
| 1cae0 | 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.. |
| 1cb00 | 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)... |
| 1cb20 | 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 |
| 1cb40 | 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 |
| 1cb60 | 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 |
| 1cb80 | 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 |
| 1cba0 | 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.. |
| 1cbc0 | 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/: |
| 1cbe0 | 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)). |
| 1cc00 | 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- |
| 1cc20 | 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 |
| 1cc40 | 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 |
| 1cc60 | 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 |
| 1cc80 | 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 |
| 1cca0 | 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 |
| 1ccc0 | 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 |
| 1cce0 | 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 |
| 1cd00 | 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 |
| 1cd20 | 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_ |
| 1cd40 | 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"))).......(' |
| 1cd60 | 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").( |
| 1cd80 | 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"))). |
| 1cda0 | 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 |
| 1cdc0 | 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 |
| 1cde0 | 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.( |
| 1ce00 | 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) |
| 1ce20 | 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 |
| 1ce40 | 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- |
| 1ce60 | 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. |
| 1ce80 | 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)))..... |
| 1cea0 | 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.(, |
| 1cec0 | 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....................... |
| 1cee0 | 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...... |
| 1cf00 | 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 |
| 1cf20 | 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).................. |
| 1cf40 | 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....... |
| 1cf60 | 20 20 20 20 20 20 20 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 | ...............................' |
| 1cf80 | 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!. |
| 1cfa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1cfc0 | 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 |
| 1cfe0 | 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 |
| 1d000 | 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 |
| 1d020 | 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. |
| 1d040 | 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 |
| 1d060 | 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 |
| 1d080 | 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 |
| 1d0a0 | 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._)..... |
| 1d0c0 | 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 |
| 1d0e0 | 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-- |
| 1d100 | 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)....... |
| 1d120 | 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 |
| 1d140 | 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 |
| 1d160 | 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))))))..( |
| 1d180 | 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 |
| 1d1a0 | 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 |
| 1d1c0 | 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 |
| 1d1e0 | 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 |
| 1d200 | 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".. |
| 1d220 | 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 |
| 1d240 | 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 |
| 1d260 | 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]..................... |
| 1d280 | 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 |
| 1d2a0 | 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........................... |
| 1d2c0 | 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 |
| 1d2e0 | 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).................. |
| 1d300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1d320 | 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))]............ |
| 1d340 | 20 20 20 20 20 20 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 |
| 1d360 | 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).................... |
| 1d380 | 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) |
| 1d3a0 | 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)) |
| 1d3c0 | 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 |
| 1d3e0 | 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 |
| 1d400 | 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...((_ |
| 1d420 | 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 |
| 1d440 | 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 |
| 1d460 | 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 |
| 1d480 | 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 |
| 1d4a0 | 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 |
| 1d4c0 | 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 |
| 1d4e0 | 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 |
| 1d500 | 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))).. |
| 1d520 | 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 |
| 1d540 | 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- |
| 1d560 | 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)...( |
| 1d580 | 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 |
| 1d5a0 | 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)))).... |
| 1d5c0 | 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..... |
| 1d5e0 | 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 |
| 1d600 | 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 |
| 1d620 | 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 |
| 1d640 | 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/: |
| 1d660 | 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 |
| 1d680 | 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 |
| 1d6a0 | 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 |
| 1d6c0 | 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 |
| 1d6e0 | 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. |
| 1d700 | 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 |
| 1d720 | 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/ |
| 1d740 | 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". |
| 1d760 | 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)) |
| 1d780 | 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 |
| 1d7a0 | 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 |
| 1d7c0 | 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- |
| 1d7e0 | 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- |
| 1d800 | 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)...( |
| 1d820 | 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 |
| 1d840 | 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)) |
| 1d860 | 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 |
| 1d880 | 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 |
| 1d8a0 | 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. |
| 1d8c0 | 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 |
| 1d8e0 | 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/ |
| 1d900 | 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 |
| 1d920 | 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... |
| 1d940 | 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- |
| 1d960 | 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))).... |
| 1d980 | 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 |
| 1d9a0 | 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 |
| 1d9c0 | 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 |
| 1d9e0 | 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/: |
| 1da00 | 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 |
| 1da20 | 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..., |
| 1da40 | 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 |
| 1da60 | 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))))) |
| 1da80 | 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 |
| 1daa0 | 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 |
| 1dac0 | 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 |
| 1dae0 | 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 |
| 1db00 | 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 |
| 1db20 | 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 |
| 1db40 | 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-- |
| 1db60 | 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 |
| 1db80 | 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)............ |
| 1dba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1dbc0 | 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 |
| 1dbe0 | 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- |
| 1dc00 | 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) |
| 1dc20 | 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. |
| 1dc40 | 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 |
| 1dc60 | 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 |
| 1dc80 | 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 |
| 1dca0 | 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). |
| 1dcc0 | 20 20 20 20 20 20 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 |
| 1dce0 | 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).... |
| 1dd00 | 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...............( |
| 1dd20 | 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."\\`\\. |
| 1dd40 | 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) |
| 1dd60 | 0a 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)) |
| 1dd80 | 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 |
| 1dda0 | 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 |
| 1ddc0 | 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)......................... |
| 1dde0 | 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 |
| 1de00 | 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")).............. |
| 1de20 | 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)))............. |
| 1de40 | 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)...... |
| 1de60 | 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))...... |
| 1de80 | 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 |
| 1dea0 | 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 |
| 1dec0 | 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)...... |
| 1dee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1df00 | 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 |
| 1df20 | 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 |
| 1df40 | 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 |
| 1df60 | 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 |
| 1df80 | 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 |
| 1dfa0 | 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."\.\\` |
| 1dfc0 | 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_ |
| 1dfe0 | 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 |
| 1e000 | 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).................. |
| 1e020 | 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)))........... |
| 1e040 | 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 |
| 1e060 | 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 |
| 1e080 | 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 |
| 1e0a0 | 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 |
| 1e0c0 | 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 |
| 1e0e0 | 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 |
| 1e100 | 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 |
| 1e120 | 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 |
| 1e140 | 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. |
| 1e160 | 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 |
| 1e180 | 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)....... |
| 1e1a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1e1c0 | 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 |
| 1e1e0 | 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 |
| 1e200 | 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 |
| 1e220 | 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 |
| 1e240 | 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 |
| 1e260 | 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 |
| 1e280 | 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 |
| 1e2a0 | 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 |
| 1e2c0 | 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").. |
| 1e2e0 | 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 |
| 1e300 | 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- |
| 1e320 | 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 |
| 1e340 | 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 |
| 1e360 | 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- |
| 1e380 | 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. |
| 1e3a0 | 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 |
| 1e3c0 | 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 |
| 1e3e0 | 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)..... |
| 1e400 | 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 |
| 1e420 | 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))))..... |
| 1e440 | 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)) |
| 1e460 | 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 |
| 1e480 | 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 |
| 1e4a0 | 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 |
| 1e4c0 | 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 |
| 1e4e0 | 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).................... |
| 1e500 | 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 |
| 1e520 | 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.... |
| 1e540 | 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 |
| 1e560 | 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.. |
| 1e580 | 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)).......,@ |
| 1e5a0 | 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)))))).. |
| 1e5c0 | 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 |
| 1e5e0 | 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........... |
| 1e600 | 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 |
| 1e620 | 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........................... |
| 1e640 | 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. |
| 1e660 | 20 20 20 20 20 20 20 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 |
| 1e680 | 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. |
| 1e6a0 | 20 20 20 20 20 20 20 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 |
| 1e6c0 | 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............................. |
| 1e6e0 | 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 |
| 1e700 | 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 |
| 1e720 | 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 |
| 1e740 | 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)........... |
| 1e760 | 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 |
| 1e780 | 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. |
| 1e7a0 | 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 |
| 1e7c0 | 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 |
| 1e7e0 | 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 |
| 1e800 | 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 |
| 1e820 | 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............ |
| 1e840 | 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 |
| 1e860 | 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. |
| 1e880 | 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 |
| 1e8a0 | 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. |
| 1e8c0 | 20 20 20 20 20 20 20 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 | ...............................& |
| 1e8e0 | 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................. |
| 1e900 | 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 |
| 1e920 | 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....................... |
| 1e940 | 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 |
| 1e960 | 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....................... |
| 1e980 | 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................... |
| 1e9a0 | 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) |
| 1e9c0 | 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 |
| 1e9e0 | 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 |
| 1ea00 | 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). |
| 1ea20 | 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.............: |
| 1ea40 | 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 |
| 1ea60 | 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))........ |
| 1ea80 | 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 |
| 1eaa0 | 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 |
| 1eac0 | 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 |
| 1eae0 | 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.. |
| 1eb00 | 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 |
| 1eb20 | 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 |
| 1eb40 | 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)) |
| 1eb60 | 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 |
| 1eb80 | 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...................... |
| 1eba0 | 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..... |
| 1ebc0 | 20 20 20 20 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 |
| 1ebe0 | 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.......... |
| 1ec00 | 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 |
| 1ec20 | 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......... |
| 1ec40 | 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 |
| 1ec60 | 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 |
| 1ec80 | 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- |
| 1eca0 | 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).. |
| 1ecc0 | 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.............. |
| 1ece0 | 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- |
| 1ed00 | 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))....... |
| 1ed20 | 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............. |
| 1ed40 | 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.: |
| 1ed60 | 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 |
| 1ed80 | 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 |
| 1eda0 | 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 |
| 1edc0 | 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 |
| 1ede0 | 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 |
| 1ee00 | 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 |
| 1ee20 | 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............... |
| 1ee40 | 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 |
| 1ee60 | 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............................. |
| 1ee80 | 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. |
| 1eea0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1eec0 | 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 |
| 1eee0 | 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............................... |
| 1ef00 | 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 |
| 1ef20 | 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 |
| 1ef40 | 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 |
| 1ef60 | 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. |
| 1ef80 | 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 |
| 1efa0 | 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 |
| 1efc0 | 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 |
| 1efe0 | 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 |
| 1f000 | 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. |
| 1f020 | 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 |
| 1f040 | 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............. |
| 1f060 | 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 |
| 1f080 | 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 |
| 1f0a0 | 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 |
| 1f0c0 | 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 |
| 1f0e0 | 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........................... |
| 1f100 | 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........ |
| 1f120 | 20 20 20 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. |
| 1f140 | 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........... |
| 1f160 | 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 |
| 1f180 | 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........ |
| 1f1a0 | 20 20 20 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. |
| 1f1c0 | 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.( |
| 1f1e0 | 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 |
| 1f200 | 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 |
| 1f220 | 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....... |
| 1f240 | 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 |
| 1f260 | 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 |
| 1f280 | 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.. |
| 1f2a0 | 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 |
| 1f2c0 | 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.... |
| 1f2e0 | 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 |
| 1f300 | 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............... |
| 1f320 | 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 |
| 1f340 | 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 |
| 1f360 | 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))..;;;._ |
| 1f380 | 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 |
| 1f3a0 | 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.......... |
| 1f3c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f3e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f400 | 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 |
| 1f420 | 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............................. |
| 1f440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f460 | 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 |
| 1f480 | 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... |
| 1f4a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f4c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f4e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f500 | 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................... |
| 1f520 | 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................... |
| 1f540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f5a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f5c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f5e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1f600 | 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 |
| 1f620 | 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.-* |
| 1f640 | 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 |
| 1f660 | 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. |
| 1f680 | 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>.;;. |
| 1f6a0 | 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 |
| 1f6c0 | 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- |
| 1f6e0 | 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..;; |
| 1f700 | 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 |
| 1f720 | 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 |
| 1f740 | 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. |
| 1f760 | 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 |
| 1f780 | 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. |
| 1f7a0 | 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. |
| 1f7c0 | 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 |
| 1f7e0 | 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 |
| 1f800 | 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 |
| 1f820 | 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 |
| 1f840 | 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 |
| 1f860 | 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 |
| 1f880 | 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. |
| 1f8a0 | 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.;;. |
| 1f8c0 | 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 |
| 1f8e0 | 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 |
| 1f900 | 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 |
| 1f920 | 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 |
| 1f940 | 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 |
| 1f960 | 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/>...;;; |
| 1f980 | 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 |
| 1f9a0 | 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) |
| 1f9c0 | 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 |
| 1f9e0 | 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 |
| 1fa00 | 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 |
| 1fa20 | 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 |
| 1fa40 | 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")... |
| 1fa60 | 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 |
| 1fa80 | 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/% |
| 1faa0 | 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... |
| 1fac0 | 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 |
| 1fae0 | 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 |
| 1fb00 | 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 |
| 1fb20 | 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").... |
| 1fb40 | 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 |
| 1fb60 | 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 |
| 1fb80 | 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- |
| 1fba0 | 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/% |
| 1fbc0 | 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") |
| 1fbe0 | 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.........: |
| 1fc00 | 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 |
| 1fc20 | 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.... |
| 1fc40 | 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 |
| 1fc60 | 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 |
| 1fc80 | 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://% |
| 1fca0 | 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 |
| 1fcc0 | 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 |
| 1fce0 | 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 |
| 1fd00 | 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: |
| 1fd20 | 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"). |
| 1fd40 | 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."+ |
| 1fd60 | 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/ |
| 1fd80 | 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 |
| 1fda0 | 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 |
| 1fdc0 | 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 |
| 1fde0 | 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)............................& |
| 1fe00 | 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 |
| 1fe20 | 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 |
| 1fe40 | 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?)))).. |
| 1fe60 | 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.( |
| 1fe80 | 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 |
| 1fea0 | 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 |
| 1fec0 | 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 |
| 1fee0 | 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)). |
| 1ff00 | 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 |
| 1ff20 | 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.( |
| 1ff40 | 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) |
| 1ff60 | 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 |
| 1ff80 | 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....... |
| 1ffa0 | 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)......... |
| 1ffc0 | 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 |
| 1ffe0 | 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)).................. |
| 20000 | 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)).. |
| 20020 | 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 |
| 20040 | 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))............ |
| 20060 | 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)) |
| 20080 | 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 |
| 200a0 | 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)).............. |
| 200c0 | 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)). |
| 200e0 | 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 |
| 20100 | 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)).............. |
| 20120 | 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..... |
| 20140 | 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. |
| 20160 | 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))).................. |
| 20180 | 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. |
| 201a0 | 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 |
| 201c0 | 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........ |
| 201e0 | 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 |
| 20200 | 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)))................... |
| 20220 | 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 |
| 20240 | 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.. |
| 20260 | 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 |
| 20280 | 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")....... |
| 202a0 | 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 |
| 202c0 | 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")............ |
| 202e0 | 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 |
| 20300 | 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).................... |
| 20320 | 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 |
| 20340 | 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 |
| 20360 | 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 |
| 20380 | 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 |
| 203a0 | 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 |
| 203c0 | 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 |
| 203e0 | 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 |
| 20400 | 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))................. |
| 20420 | 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 |
| 20440 | 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))..... |
| 20460 | 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 |
| 20480 | 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))............... |
| 204a0 | 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 |
| 204c0 | 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").....................( |
| 204e0 | 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 |
| 20500 | 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))............. |
| 20520 | 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 |
| 20540 | 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 |
| 20560 | 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))) |
| 20580 | 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)))..( |
| 205a0 | 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 |
| 205c0 | 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 |
| 205e0 | 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 |
| 20600 | 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. |
| 20620 | 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 |
| 20640 | 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)............. |
| 20660 | 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- |
| 20680 | 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. |
| 206a0 | 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 |
| 206c0 | 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).................... |
| 206e0 | 20 20 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 |
| 20700 | 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)).................. |
| 20720 | 20 20 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) |
| 20740 | 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 |
| 20760 | 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 |
| 20780 | 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 |
| 207a0 | 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 |
| 207c0 | 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)).................. |
| 207e0 | 20 20 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) |
| 20800 | 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 |
| 20820 | 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 |
| 20840 | 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 |
| 20860 | 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) |
| 20880 | 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 |
| 208a0 | 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_ |
| 208c0 | 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...... |
| 208e0 | 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 |
| 20900 | 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 |
| 20920 | 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 |
| 20940 | 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). |
| 20960 | 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 |
| 20980 | 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 |
| 209a0 | 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 |
| 209c0 | 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)... |
| 209e0 | 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 |
| 20a00 | 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.... |
| 20a20 | 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 |
| 20a40 | 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 |
| 20a60 | 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 |
| 20a80 | 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) |
| 20aa0 | 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......( |
| 20ac0 | 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"))... |
| 20ae0 | 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 |
| 20b00 | 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 |
| 20b20 | 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 |
| 20b40 | 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 |
| 20b60 | 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.... |
| 20b80 | 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.. |
| 20ba0 | 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. |
| 20bc0 | 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). |
| 20be0 | 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.......................... |
| 20c00 | 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 |
| 20c20 | 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)) |
| 20c40 | 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. |
| 20c60 | 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 |
| 20c80 | 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 |
| 20ca0 | 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) |
| 20cc0 | 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 |
| 20ce0 | 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 |
| 20d00 | 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 |
| 20d20 | 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).... |
| 20d40 | 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 |
| 20d60 | 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))...................... |
| 20d80 | 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......................... |
| 20da0 | 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).................... |
| 20dc0 | 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)).... |
| 20de0 | 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 |
| 20e00 | 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/% |
| 20e20 | 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)..................... |
| 20e40 | 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 |
| 20e60 | 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))..................... |
| 20e80 | 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 |
| 20ea0 | 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")..................... |
| 20ec0 | 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 |
| 20ee0 | 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))))................ |
| 20f00 | 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 |
| 20f20 | 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))................. |
| 20f40 | 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.................... |
| 20f60 | 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).............. |
| 20f80 | 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 |
| 20fa0 | 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 |
| 20fc0 | 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 |
| 20fe0 | 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) |
| 21000 | 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 |
| 21020 | 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" |
| 21040 | 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 |
| 21060 | 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 |
| 21080 | 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 |
| 210a0 | 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")... |
| 210c0 | 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 |
| 210e0 | 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 |
| 21100 | 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.. |
| 21120 | 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 |
| 21140 | 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. |
| 21160 | 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)))).............`(( |
| 21180 | 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))))...... |
| 211a0 | 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.( |
| 211c0 | 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._ |
| 211e0 | 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. |
| 21200 | 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. |
| 21220 | 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. |
| 21240 | 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) |
| 21260 | 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 |
| 21280 | 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. |
| 212a0 | 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".. |
| 212c0 | 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 |
| 212e0 | 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.. |
| 21300 | 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 |
| 21320 | 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)............ |
| 21340 | 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.( |
| 21360 | 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)................ |
| 21380 | 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 |
| 213a0 | 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 |
| 213c0 | 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). |
| 213e0 | 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 |
| 21400 | 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....... |
| 21420 | 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- |
| 21440 | 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))..... |
| 21460 | 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 |
| 21480 | 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... |
| 214a0 | 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................ |
| 214c0 | 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.............. |
| 214e0 | 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............ |
| 21500 | 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". |
| 21520 | 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 |
| 21540 | 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)............... |
| 21560 | 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 |
| 21580 | 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......... |
| 215a0 | 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.. |
| 215c0 | 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.... |
| 215e0 | 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 |
| 21600 | 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............. |
| 21620 | 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 |
| 21640 | 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)........................ |
| 21660 | 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))....... |
| 21680 | 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 |
| 216a0 | 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... |
| 216c0 | 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 |
| 216e0 | 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............ |
| 21700 | 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... |
| 21720 | 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 |
| 21740 | 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 |
| 21760 | 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. |
| 21780 | 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 |
| 217a0 | 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. |
| 217c0 | 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.......... |
| 217e0 | 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 |
| 21800 | 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") |
| 21820 | 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... |
| 21840 | 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............ |
| 21860 | 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 |
| 21880 | 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 |
| 218a0 | 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 |
| 218c0 | 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 |
| 218e0 | 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 |
| 21900 | 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 |
| 21920 | 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 |
| 21940 | 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. |
| 21960 | 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 |
| 21980 | 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 |
| 219a0 | 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 |
| 219c0 | 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....... |
| 219e0 | 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)........... |
| 21a00 | 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.(( |
| 21a20 | 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 |
| 21a40 | 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 |
| 21a60 | 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 |
| 21a80 | 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 |
| 21aa0 | 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.................... |
| 21ac0 | 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................... |
| 21ae0 | 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..... |
| 21b00 | 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 |
| 21b20 | 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 |
| 21b40 | 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................... |
| 21b60 | 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 |
| 21b80 | 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 |
| 21ba0 | 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)))). |
| 21bc0 | 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_ |
| 21be0 | 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)).... |
| 21c00 | 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.. |
| 21c20 | 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)))).. |
| 21c40 | 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 |
| 21c60 | 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- |
| 21c80 | 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 |
| 21ca0 | 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 |
| 21cc0 | 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. |
| 21ce0 | 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 |
| 21d00 | 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).. |
| 21d20 | 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.( |
| 21d40 | 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)).................... |
| 21d60 | 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....................... |
| 21d80 | 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).................. |
| 21da0 | 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)).. |
| 21dc0 | 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 |
| 21de0 | 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. |
| 21e00 | 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)................. |
| 21e20 | 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 |
| 21e40 | 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))............... |
| 21e60 | 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 |
| 21e80 | 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")............. |
| 21ea0 | 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 |
| 21ec0 | 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))))...... |
| 21ee0 | 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_ |
| 21f00 | 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)))............. |
| 21f20 | 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 |
| 21f40 | 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))........... |
| 21f60 | 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 |
| 21f80 | 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))).................. |
| 21fa0 | 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 |
| 21fc0 | 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))................ |
| 21fe0 | 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 |
| 22000 | 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))................. |
| 22020 | 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.................... |
| 22040 | 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).............. |
| 22060 | 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 |
| 22080 | 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 |
| 220a0 | 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 |
| 220c0 | 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 |
| 220e0 | 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 |
| 22100 | 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 |
| 22120 | 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 |
| 22140 | 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 |
| 22160 | 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-- |
| 22180 | 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 |
| 221a0 | 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 |
| 221c0 | 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 |
| 221e0 | 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).. |
| 22200 | 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") |
| 22220 | 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 |
| 22240 | 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 |
| 22260 | 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 |
| 22280 | 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 |
| 222a0 | 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 |
| 222c0 | 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)........ |
| 222e0 | 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) |
| 22300 | 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 |
| 22320 | 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 |
| 22340 | 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- |
| 22360 | 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 |
| 22380 | 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 |
| 223a0 | 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".. |
| 223c0 | 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).......'( |
| 223e0 | 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 |
| 22400 | 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 |
| 22420 | 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)..... |
| 22440 | 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.' |
| 22460 | 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)......... |
| 22480 | 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)))))..( |
| 224a0 | 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 |
| 224c0 | 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 |
| 224e0 | 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. |
| 22500 | 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. |
| 22520 | 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....; |
| 22540 | 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 |
| 22560 | 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 |
| 22580 | 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 |
| 225a0 | 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 |
| 225c0 | 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 |
| 225e0 | 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".. |
| 22600 | 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.......... |
| 22620 | 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 |
| 22640 | 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)................ |
| 22660 | 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 |
| 22680 | 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)........ |
| 226a0 | 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)) |
| 226c0 | 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 |
| 226e0 | 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)...... |
| 22700 | 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 |
| 22720 | 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 |
| 22740 | 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 |
| 22760 | 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 |
| 22780 | 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 |
| 227a0 | 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 |
| 227c0 | 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- |
| 227e0 | 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 |
| 22800 | 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 |
| 22820 | 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 |
| 22840 | 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 |
| 22860 | 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 |
| 22880 | 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 |
| 228a0 | 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)....................( |
| 228c0 | 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. |
| 228e0 | 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)................. |
| 22900 | 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 |
| 22920 | 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 |
| 22940 | 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 |
| 22960 | 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 |
| 22980 | 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).................. |
| 229a0 | 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 |
| 229c0 | 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 |
| 229e0 | 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). |
| 22a00 | 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 |
| 22a20 | 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....... |
| 22a40 | 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 |
| 22a60 | 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)). |
| 22a80 | 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........... |
| 22aa0 | 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.............. |
| 22ac0 | 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...... |
| 22ae0 | 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.... |
| 22b00 | 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.. |
| 22b20 | 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 |
| 22b40 | 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)................: |
| 22b60 | 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)..... |
| 22b80 | 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- |
| 22ba0 | 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............... |
| 22bc0 | 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 |
| 22be0 | 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)............................. |
| 22c00 | 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)......... |
| 22c20 | 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" |
| 22c40 | 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. |
| 22c60 | 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.......... |
| 22c80 | 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...... |
| 22ca0 | 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 |
| 22cc0 | 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..... |
| 22ce0 | 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................;;.` |
| 22d00 | 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 |
| 22d20 | 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............... |
| 22d40 | 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 |
| 22d60 | 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............ |
| 22d80 | 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. |
| 22da0 | 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....... |
| 22dc0 | 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 |
| 22de0 | 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....... |
| 22e00 | 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.................. |
| 22e20 | 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 |
| 22e40 | 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))... |
| 22e60 | 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.. |
| 22e80 | 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....................... |
| 22ea0 | 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 |
| 22ec0 | 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 |
| 22ee0 | 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................: |
| 22f00 | 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. |
| 22f20 | 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 |
| 22f40 | 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.......... |
| 22f60 | 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. |
| 22f80 | 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.............. |
| 22fa0 | 20 20 20 20 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 |
| 22fc0 | 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))................ |
| 22fe0 | 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.... |
| 23000 | 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_ |
| 23020 | 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 |
| 23040 | 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 |
| 23060 | 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................: |
| 23080 | 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..... |
| 230a0 | 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 |
| 230c0 | 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 |
| 230e0 | 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. |
| 23100 | 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 |
| 23120 | 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_ |
| 23140 | 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 |
| 23160 | 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........... |
| 23180 | 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 |
| 231a0 | 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))))..... |
| 231c0 | 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 |
| 231e0 | 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- |
| 23200 | 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 |
| 23220 | 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 |
| 23240 | 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 |
| 23260 | 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 |
| 23280 | 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 |
| 232a0 | 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 |
| 232c0 | 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. |
| 232e0 | 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 |
| 23300 | 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.... |
| 23320 | 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)........ |
| 23340 | 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 |
| 23360 | 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 |
| 23380 | 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.................. |
| 233a0 | 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 |
| 233c0 | 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)................... |
| 233e0 | 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........... |
| 23400 | 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.......... |
| 23420 | 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 |
| 23440 | 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 |
| 23460 | 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................... |
| 23480 | 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.......... |
| 234a0 | 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 |
| 234c0 | 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))))........... |
| 234e0 | 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 |
| 23500 | 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>. |
| 23520 | 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- |
| 23540 | 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 |
| 23560 | 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))....... |
| 23580 | 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 |
| 235a0 | 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 |
| 235c0 | 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.; |
| 235e0 | 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 |
| 23600 | 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 |
| 23620 | 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 |
| 23640 | 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 |
| 23660 | 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 |
| 23680 | 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 |
| 236a0 | 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.(( |
| 236c0 | 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 |
| 236e0 | 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. |
| 23700 | 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".....' |
| 23720 | 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 |
| 23740 | 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 |
| 23760 | 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)........ |
| 23780 | 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 |
| 237a0 | 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))))). |
| 237c0 | 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 |
| 237e0 | 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 |
| 23800 | 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 |
| 23820 | 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 |
| 23840 | 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 |
| 23860 | 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 |
| 23880 | 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 |
| 238a0 | 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. |
| 238c0 | 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'...................... |
| 238e0 | 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' |
| 23900 | 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................ |
| 23920 | 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 |
| 23940 | 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 |
| 23960 | 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)..... |
| 23980 | 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 |
| 239a0 | 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 |
| 239c0 | 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............................. |
| 239e0 | 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))) |
| 23a00 | 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 |
| 23a20 | 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 |
| 23a40 | 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 |
| 23a60 | 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" |
| 23a80 | 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 |
| 23aa0 | 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... |
| 23ac0 | 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 |
| 23ae0 | 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)............... |
| 23b00 | 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 |
| 23b20 | 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 |
| 23b40 | 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 |
| 23b60 | 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)... |
| 23b80 | 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 |
| 23ba0 | 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 |
| 23bc0 | 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).................. |
| 23be0 | 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............... |
| 23c00 | 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 |
| 23c20 | 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........................... |
| 23c40 | 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)... |
| 23c60 | 20 20 20 20 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 |
| 23c80 | 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)................. |
| 23ca0 | 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... |
| 23cc0 | 20 20 20 20 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 |
| 23ce0 | 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).............................. |
| 23d00 | 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........... |
| 23d20 | 20 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)) |
| 23d40 | 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))))..( |
| 23d60 | 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 |
| 23d80 | 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) |
| 23da0 | 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 |
| 23dc0 | 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".. |
| 23de0 | 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 |
| 23e00 | 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.( |
| 23e20 | 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).... |
| 23e40 | 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 |
| 23e60 | 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))))) |
| 23e80 | 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 |
| 23ea0 | 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 |
| 23ec0 | 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.. |
| 23ee0 | 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.... |
| 23f00 | 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).... |
| 23f20 | 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. |
| 23f40 | 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 |
| 23f60 | 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. |
| 23f80 | 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.......................;;. |
| 23fa0 | 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 |
| 23fc0 | 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................... |
| 23fe0 | 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 |
| 24000 | 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............ |
| 24020 | 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 |
| 24040 | 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..... |
| 24060 | 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. |
| 24080 | 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 |
| 240a0 | 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 |
| 240c0 | 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 |
| 240e0 | 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..................... |
| 24100 | 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 |
| 24120 | 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............. |
| 24140 | 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 |
| 24160 | 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........... |
| 24180 | 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 |
| 241a0 | 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 |
| 241c0 | 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)....... |
| 241e0 | 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..... |
| 24200 | 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 |
| 24220 | 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)....................... |
| 24240 | 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)))........... |
| 24260 | 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 |
| 24280 | 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.......... |
| 242a0 | 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. |
| 242c0 | 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............................ |
| 242e0 | 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 |
| 24300 | 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)........... |
| 24320 | 20 20 20 20 20 20 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 |
| 24340 | 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 |
| 24360 | 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 |
| 24380 | 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." |
| 243a0 | 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 |
| 243c0 | 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 |
| 243e0 | 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 |
| 24400 | 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 |
| 24420 | 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 |
| 24440 | 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 |
| 24460 | 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 |
| 24480 | 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. |
| 244a0 | 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 |
| 244c0 | 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 |
| 244e0 | 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 |
| 24500 | 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 |
| 24520 | 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- |
| 24540 | 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 |
| 24560 | 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 |
| 24580 | 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 |
| 245a0 | 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/: |
| 245c0 | 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.. |
| 245e0 | 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 |
| 24600 | 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 |
| 24620 | 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) |
| 24640 | 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 |
| 24660 | 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 |
| 24680 | 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. |
| 246a0 | 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 |
| 246c0 | 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 |
| 246e0 | 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* |
| 24700 | 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 |
| 24720 | 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 |
| 24740 | 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- |
| 24760 | 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 |
| 24780 | 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)....... |
| 247a0 | 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- |
| 247c0 | 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)) |
| 247e0 | 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 |
| 24800 | 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 |
| 24820 | 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. |
| 24840 | 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 |
| 24860 | 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.. |
| 24880 | 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 |
| 248a0 | 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).............. |
| 248c0 | 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 |
| 248e0 | 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 |
| 24900 | 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 |
| 24920 | 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)......... |
| 24940 | 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)).......... |
| 24960 | 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)........ |
| 24980 | 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 |
| 249a0 | 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))................. |
| 249c0 | 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 |
| 249e0 | 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))))........... |
| 24a00 | 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).. |
| 24a20 | 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- |
| 24a40 | 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 |
| 24a60 | 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.. |
| 24a80 | 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)... |
| 24aa0 | 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 |
| 24ac0 | 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 |
| 24ae0 | 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.((_ |
| 24b00 | 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) |
| 24b20 | 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.....( |
| 24b40 | 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)........ |
| 24b60 | 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 |
| 24b80 | 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 |
| 24ba0 | 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 |
| 24bc0 | 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. |
| 24be0 | 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 |
| 24c00 | 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). |
| 24c20 | 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 |
| 24c40 | 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 |
| 24c60 | 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 |
| 24c80 | 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 |
| 24ca0 | 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 |
| 24cc0 | 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."/ |
| 24ce0 | 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 |
| 24d00 | 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... |
| 24d20 | 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 |
| 24d40 | 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 |
| 24d60 | 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 |
| 24d80 | 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 |
| 24da0 | 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 |
| 24dc0 | 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 |
| 24de0 | 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 |
| 24e00 | 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 |
| 24e20 | 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)......... |
| 24e40 | 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 |
| 24e60 | 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 |
| 24e80 | 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' |
| 24ea0 | 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 |
| 24ec0 | 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.......... |
| 24ee0 | 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 |
| 24f00 | 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 |
| 24f20 | 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 |
| 24f40 | 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 |
| 24f60 | 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. |
| 24f80 | 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 |
| 24fa0 | 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))))).......` |
| 24fc0 | 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 |
| 24fe0 | 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 |
| 25000 | 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 |
| 25020 | 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 |
| 25040 | 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 |
| 25060 | 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 |
| 25080 | 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 |
| 250a0 | 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.... |
| 250c0 | 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 |
| 250e0 | 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 |
| 25100 | 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 |
| 25120 | 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 |
| 25140 | 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.. |
| 25160 | 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-- |
| 25180 | 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 |
| 251a0 | 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 |
| 251c0 | 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 |
| 251e0 | 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 |
| 25200 | 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 |
| 25220 | 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 |
| 25240 | 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 |
| 25260 | 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 |
| 25280 | 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.' |
| 252a0 | 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..................... |
| 252c0 | 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... |
| 252e0 | 20 20 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 |
| 25300 | 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.... |
| 25320 | 20 20 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 |
| 25340 | 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").................. |
| 25360 | 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"). |
| 25380 | 20 20 20 20 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 |
| 253a0 | 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")................ |
| 253c0 | 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 |
| 253e0 | 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- |
| 25400 | 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 |
| 25420 | 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 |
| 25440 | 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)))... |
| 25460 | 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. |
| 25480 | 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........... |
| 254a0 | 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 |
| 254c0 | 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!)].............. |
| 254e0 | 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))).. |
| 25500 | 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 |
| 25520 | 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".................... |
| 25540 | 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 |
| 25560 | 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)............................ |
| 25580 | 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)))... |
| 255a0 | 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 |
| 255c0 | 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)))..... |
| 255e0 | 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))).... |
| 25600 | 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 |
| 25620 | 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.' |
| 25640 | 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 |
| 25660 | 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 |
| 25680 | 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)............. |
| 256a0 | 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 |
| 256c0 | 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 |
| 256e0 | 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)......... |
| 25700 | 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 |
| 25720 | 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 |
| 25740 | 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 |
| 25760 | 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 |
| 25780 | 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 |
| 257a0 | 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............... |
| 257c0 | 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 |
| 257e0 | 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 |
| 25800 | 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 |
| 25820 | 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 |
| 25840 | 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 |
| 25860 | 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)) |
| 25880 | 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....... |
| 258a0 | 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 |
| 258c0 | 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.........( |
| 258e0 | 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 |
| 25900 | 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.................. |
| 25920 | 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. |
| 25940 | 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))......... |
| 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 30 29 29 29 0a | ...........................0))). |
| 25980 | 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 |
| 259a0 | 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 |
| 259c0 | 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...................... |
| 259e0 | 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 |
| 25a00 | 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)........ |
| 25a20 | 20 20 20 20 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))) |
| 25a40 | 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 |
| 25a60 | 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 |
| 25a80 | 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 |
| 25aa0 | 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.#' |
| 25ac0 | 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)))).... |
| 25ae0 | 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 |
| 25b00 | 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............... |
| 25b20 | 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. |
| 25b40 | 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).... |
| 25b60 | 20 20 20 20 20 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)) |
| 25b80 | 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- |
| 25ba0 | 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 |
| 25bc0 | 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- |
| 25be0 | 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 |
| 25c00 | 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.... |
| 25c20 | 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 |
| 25c40 | 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")... |
| 25c60 | 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 |
| 25c80 | 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 |
| 25ca0 | 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 |
| 25cc0 | 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) |
| 25ce0 | 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 |
| 25d00 | 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 |
| 25d20 | 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).................... |
| 25d40 | 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 |
| 25d60 | 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. |
| 25d80 | 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 |
| 25da0 | 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)... |
| 25dc0 | 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. |
| 25de0 | 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))))..( |
| 25e00 | 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 |
| 25e20 | 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 |
| 25e40 | 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)........................ |
| 25e60 | 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 |
| 25e80 | 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 |
| 25ea0 | 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 |
| 25ec0 | 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\\'". |
| 25ee0 | 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- |
| 25f00 | 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) |
| 25f20 | 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 |
| 25f40 | 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 |
| 25f60 | 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 |
| 25f80 | 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 |
| 25fa0 | 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 |
| 25fc0 | 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).......( |
| 25fe0 | 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 |
| 26000 | 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))))........ |
| 26020 | 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)))..... |
| 26040 | 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 |
| 26060 | 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 |
| 26080 | 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 |
| 260a0 | 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 |
| 260c0 | 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 |
| 260e0 | 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)..... |
| 26100 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 26120 | 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 |
| 26140 | 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 |
| 26160 | 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 |
| 26180 | 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 |
| 261a0 | 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 |
| 261c0 | 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 |
| 261e0 | 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 |
| 26200 | 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........................... |
| 26220 | 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........... |
| 26240 | 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. |
| 26260 | 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................. |
| 26280 | 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 |
| 262a0 | 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................. |
| 262c0 | 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 |
| 262e0 | 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 |
| 26300 | 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 |
| 26320 | 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 |
| 26340 | 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....... |
| 26360 | 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 |
| 26380 | 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)). |
| 263a0 | 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........ |
| 263c0 | 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 |
| 263e0 | 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............. |
| 26400 | 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 |
| 26420 | 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 |
| 26440 | 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 |
| 26460 | 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 |
| 26480 | 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 |
| 264a0 | 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 |
| 264c0 | 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.............. |
| 264e0 | 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 |
| 26500 | 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.............................. |
| 26520 | 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.... |
| 26540 | 20 20 20 20 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 |
| 26560 | 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.... |
| 26580 | 20 20 20 20 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 |
| 265a0 | 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. |
| 265c0 | 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. |
| 265e0 | 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. |
| 26600 | 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)............. |
| 26620 | 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 |
| 26640 | 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 |
| 26660 | 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.' |
| 26680 | 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.: |
| 266a0 | 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 |
| 266c0 | 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 |
| 266e0 | 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.............: |
| 26700 | 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.. |
| 26720 | 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... |
| 26740 | 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 |
| 26760 | 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 |
| 26780 | 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 |
| 267a0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 267c0 | 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............... |
| 267e0 | 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 |
| 26800 | 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.................... |
| 26820 | 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 |
| 26840 | 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................... |
| 26860 | 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 |
| 26880 | 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) |
| 268a0 | 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 |
| 268c0 | 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)............ |
| 268e0 | 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. |
| 26900 | 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 |
| 26920 | 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 |
| 26940 | 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 |
| 26960 | 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 |
| 26980 | 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 |
| 269a0 | 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........ |
| 269c0 | 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 |
| 269e0 | 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 |
| 26a00 | 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 |
| 26a20 | 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)))). |
| 26a40 | 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 |
| 26a60 | 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..................... |
| 26a80 | 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.. |
| 26aa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 26ac0 | 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..... |
| 26ae0 | 20 20 20 20 20 20 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 |
| 26b00 | 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.. |
| 26b20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 26b40 | 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 |
| 26b60 | 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 |
| 26b80 | 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. |
| 26ba0 | 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. |
| 26bc0 | 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 |
| 26be0 | 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 |
| 26c00 | 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 |
| 26c20 | 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 |
| 26c40 | 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 |
| 26c60 | 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 |
| 26c80 | 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......... |
| 26ca0 | 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. |
| 26cc0 | 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. |
| 26ce0 | 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 |
| 26d00 | 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 |
| 26d20 | 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 |
| 26d40 | 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 |
| 26d60 | 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............................... |
| 26d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26e00 | 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 |
| 26e20 | 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............................... |
| 26e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26e60 | 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 |
| 26e80 | 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... |
| 26ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26f00 | 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................... |
| 26f20 | 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................... |
| 26f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27000 | 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 |
| 27020 | 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.-*-..; |
| 27040 | 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. |
| 27060 | 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 |
| 27080 | 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 |
| 270a0 | 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 |
| 270c0 | 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 |
| 270e0 | 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 |
| 27100 | 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 |
| 27120 | 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.; |
| 27140 | 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. |
| 27160 | 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 |
| 27180 | 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 |
| 271a0 | 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. |
| 271c0 | 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). |
| 271e0 | 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 |
| 27200 | 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 |
| 27220 | 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 |
| 27240 | 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. |
| 27260 | 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 |
| 27280 | 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 |
| 272a0 | 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. |
| 272c0 | 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. |
| 272e0 | 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 |
| 27300 | 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 |
| 27320 | 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 |
| 27340 | 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:// |
| 27360 | 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 |
| 27380 | 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 |
| 273a0 | 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 |
| 273c0 | 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 |
| 273e0 | 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 |
| 27400 | 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://% |
| 27420 | 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 |
| 27440 | 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: |
| 27460 | 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 |
| 27480 | 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." |
| 274a0 | 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 |
| 274c0 | 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 |
| 274e0 | 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 |
| 27500 | 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 |
| 27520 | 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:// |
| 27540 | 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- |
| 27560 | 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 |
| 27580 | 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 |
| 275a0 | 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.. |
| 275c0 | 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/ |
| 275e0 | 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 |
| 27600 | 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:// |
| 27620 | 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 |
| 27640 | 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 |
| 27660 | 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 |
| 27680 | 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 |
| 276a0 | 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 |
| 276c0 | 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 |
| 276e0 | 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 |
| 27700 | 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." |
| 27720 | 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/ |
| 27740 | 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 |
| 27760 | 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.. |
| 27780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 277a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 277c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 277e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27800 | 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. |
| 27820 | 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.............................. |
| 27840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27860 | 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 |
| 27880 | 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... |
| 278a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 278c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 278e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27900 | 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................... |
| 27920 | 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................... |
| 27940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 279a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 279c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 279e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27a00 | 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 |
| 27a20 | 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.-*-. |
| 27a40 | 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 |
| 27a60 | 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 |
| 27a80 | 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 |
| 27aa0 | 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 |
| 27ac0 | 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 |
| 27ae0 | 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 |
| 27b00 | 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 |
| 27b20 | 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 |
| 27b40 | 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 |
| 27b60 | 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 |
| 27b80 | 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 |
| 27ba0 | 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 |
| 27bc0 | 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 |
| 27be0 | 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. |
| 27c00 | 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. |
| 27c20 | 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 |
| 27c40 | 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 |
| 27c60 | 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 |
| 27c80 | 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 |
| 27ca0 | 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 |
| 27cc0 | 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 |
| 27ce0 | 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 |
| 27d00 | 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 |
| 27d20 | 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 |
| 27d40 | 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: |
| 27d60 | 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 |
| 27d80 | 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. |
| 27da0 | 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 |
| 27dc0 | 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 |
| 27de0 | 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 |
| 27e00 | 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) |
| 27e20 | 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 |
| 27e40 | 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.... |
| 27e60 | 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)]).... |
| 27e80 | 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. |
| 27ea0 | 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 |
| 27ec0 | 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 |
| 27ee0 | 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) |
| 27f00 | 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 |
| 27f20 | 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...... |
| 27f40 | 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 |
| 27f60 | 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 |
| 27f80 | 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 |
| 27fa0 | 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....... |
| 27fc0 | 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 |
| 27fe0 | 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 |
| 28000 | 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..............: |
| 28020 | 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). |
| 28040 | 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 |
| 28060 | 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........... |
| 28080 | 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 |
| 280a0 | 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 |
| 280c0 | 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.. |
| 280e0 | 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).. |
| 28100 | 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 |
| 28120 | 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........... |
| 28140 | 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 |
| 28160 | 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 |
| 28180 | 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 |
| 281a0 | 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........... |
| 281c0 | 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 |
| 281e0 | 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 |
| 28200 | 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. |
| 28220 | 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) |
| 28240 | 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........ |
| 28260 | 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 |
| 28280 | 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............... |
| 282a0 | 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). |
| 282c0 | 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 |
| 282e0 | 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........... |
| 28300 | 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- |
| 28320 | 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 |
| 28340 | 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 |
| 28360 | 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).. |
| 28380 | 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 |
| 283a0 | 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 |
| 283c0 | 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 |
| 283e0 | 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. |
| 28400 | 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 |
| 28420 | 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- |
| 28440 | 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 |
| 28460 | 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.................. |
| 28480 | 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........ |
| 284a0 | 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 |
| 284c0 | 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 |
| 284e0 | 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 |
| 28500 | 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...... |
| 28520 | 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 |
| 28540 | 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 |
| 28560 | 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................. |
| 28580 | 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 |
| 285a0 | 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.;;;;. |
| 285c0 | 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 |
| 285e0 | 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) |
| 28600 | 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 |
| 28620 | 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 |
| 28640 | 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 |
| 28660 | 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 |
| 28680 | 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 |
| 286a0 | 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 |
| 286c0 | 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 |
| 286e0 | 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 |
| 28700 | 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).... |
| 28720 | 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 |
| 28740 | 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).......... |
| 28760 | 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 |
| 28780 | 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 |
| 287a0 | 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- |
| 287c0 | 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))).....( |
| 287e0 | 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))).. |
| 28800 | 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.(( |
| 28820 | 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 |
| 28840 | 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 |
| 28860 | 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 |
| 28880 | 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 |
| 288a0 | 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 |
| 288c0 | 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 |
| 288e0 | 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 |
| 28900 | 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 |
| 28920 | 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. |
| 28940 | 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 |
| 28960 | 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 |
| 28980 | 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. |
| 289a0 | 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 |
| 289c0 | 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 |
| 289e0 | 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 |
| 28a00 | 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 |
| 28a20 | 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 |
| 28a40 | 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 |
| 28a60 | 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 |
| 28a80 | 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 |
| 28aa0 | 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 |
| 28ac0 | 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 |
| 28ae0 | 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."...( |
| 28b00 | 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) |
| 28b20 | 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.' |
| 28b40 | 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- |
| 28b60 | 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)....... |
| 28b80 | 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 |
| 28ba0 | 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)).................... |
| 28bc0 | 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))) |
| 28be0 | 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- |
| 28c00 | 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 |
| 28c20 | 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 |
| 28c40 | 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. |
| 28c60 | 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 |
| 28c80 | 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 |
| 28ca0 | 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 |
| 28cc0 | 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 |
| 28ce0 | 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 |
| 28d00 | 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]+\\)\\_>" |
| 28d20 | 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 |
| 28d40 | 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 |
| 28d60 | 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 |
| 28d80 | 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 |
| 28da0 | 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 |
| 28dc0 | 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 |
| 28de0 | 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. |
| 28e00 | 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 |
| 28e20 | 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 |
| 28e40 | 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 |
| 28e60 | 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 |
| 28e80 | 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 |
| 28ea0 | 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)................ |
| 28ec0 | 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 |
| 28ee0 | 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 |
| 28f00 | 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. |
| 28f20 | 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 |
| 28f40 | 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)...... |
| 28f60 | 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.' |
| 28f80 | 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 |
| 28fa0 | 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])))] |
| 28fc0 | 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 |
| 28fe0 | 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 |
| 29000 | 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......: |
| 29020 | 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 |
| 29040 | 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)......: |
| 29060 | 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 |
| 29080 | 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).... |
| 290a0 | 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 |
| 290c0 | 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 |
| 290e0 | 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)................ |
| 29100 | 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 |
| 29120 | 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 |
| 29140 | 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).. |
| 29160 | 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..... |
| 29180 | 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. |
| 291a0 | 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)........ |
| 291c0 | 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 |
| 291e0 | 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 |
| 29200 | 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. |
| 29220 | 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 |
| 29240 | 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-- |
| 29260 | 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 |
| 29280 | 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.( |
| 292a0 | 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)... |
| 292c0 | 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 |
| 292e0 | 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 |
| 29300 | 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 |
| 29320 | 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 |
| 29340 | 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 |
| 29360 | 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)) |
| 29380 | 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. |
| 293a0 | 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.. |
| 293c0 | 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].... |
| 293e0 | 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 |
| 29400 | 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)................ |
| 29420 | 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)..... |
| 29440 | 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 |
| 29460 | 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 |
| 29480 | 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- |
| 294a0 | 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)...... |
| 294c0 | 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) |
| 294e0 | 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 |
| 29500 | 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 |
| 29520 | 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 |
| 29540 | 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 |
| 29560 | 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. |
| 29580 | 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 |
| 295a0 | 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 |
| 295c0 | 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 |
| 295e0 | 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 |
| 29600 | 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)) |
| 29620 | 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.. |
| 29640 | 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 |
| 29660 | 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 |
| 29680 | 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...........................( |
| 296a0 | 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 |
| 296c0 | 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))............................. |
| 296e0 | 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)]]) |
| 29700 | 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..... |
| 29720 | 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 |
| 29740 | 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 |
| 29760 | 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- |
| 29780 | 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 |
| 297a0 | 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 |
| 297c0 | 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 |
| 297e0 | 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 |
| 29800 | 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 |
| 29820 | 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 |
| 29840 | 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 |
| 29860 | 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,.\ |
| 29880 | 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 |
| 298a0 | 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 |
| 298c0 | 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 |
| 298e0 | 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 |
| 29900 | 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 |
| 29920 | 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. |
| 29940 | 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 |
| 29960 | 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 |
| 29980 | 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.................. |
| 299a0 | 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... |
| 299c0 | 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 |
| 299e0 | 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- |
| 29a00 | 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 |
| 29a20 | 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 |
| 29a40 | 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 |
| 29a60 | 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....( |
| 29a80 | 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 |
| 29aa0 | 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.( |
| 29ac0 | 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 |
| 29ae0 | 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 |
| 29b00 | 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 |
| 29b20 | 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)))...... |
| 29b40 | 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 |
| 29b60 | 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 |
| 29b80 | 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 |
| 29ba0 | 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 |
| 29bc0 | 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 |
| 29be0 | 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 |
| 29c00 | 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 |
| 29c20 | 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 |
| 29c40 | 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>" |
| 29c60 | 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 |
| 29c80 | 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 |
| 29ca0 | 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".......... |
| 29cc0 | 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 |
| 29ce0 | 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 |
| 29d00 | 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 |
| 29d20 | 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 |
| 29d40 | 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"................. |
| 29d60 | 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 |
| 29d80 | 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 |
| 29da0 | 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 |
| 29dc0 | 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 |
| 29de0 | 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 |
| 29e00 | 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 |
| 29e20 | 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 |
| 29e40 | 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.()... |
| 29e60 | 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 |
| 29e80 | 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 |
| 29ea0 | 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 |
| 29ec0 | 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)) |
| 29ee0 | 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 |
| 29f00 | 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 |
| 29f20 | 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 |
| 29f40 | 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 |
| 29f60 | 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 |
| 29f80 | 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 |
| 29fa0 | 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 |
| 29fc0 | 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 |
| 29fe0 | 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)))... |
| 2a000 | 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. |
| 2a020 | 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)))) |
| 2a040 | 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).; |
| 2a060 | 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..... |
| 2a080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a0a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a0c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a0e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a1a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a1c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a1e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a200 | 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 |
| 2a220 | 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............................... |
| 2a240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a260 | 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 |
| 2a280 | 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... |
| 2a2a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a2c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a2e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a300 | 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................... |
| 2a320 | 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................... |
| 2a340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a3a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a3c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a3e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2a400 | 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- |
| 2a420 | 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 |
| 2a440 | 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 |
| 2a460 | 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 |
| 2a480 | 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 |
| 2a4a0 | 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 |
| 2a4c0 | 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- |
| 2a4e0 | 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 |
| 2a500 | 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 |
| 2a520 | 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 |
| 2a540 | 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 |
| 2a560 | 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 |
| 2a580 | 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 |
| 2a5a0 | 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 |
| 2a5c0 | 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 |
| 2a5e0 | 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..; |
| 2a600 | 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 |
| 2a620 | 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 |
| 2a640 | 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 |
| 2a660 | 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 |
| 2a680 | 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 |
| 2a6a0 | 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 |
| 2a6c0 | 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 |
| 2a6e0 | 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 |
| 2a700 | 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 |
| 2a720 | 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.;;. |
| 2a740 | 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 |
| 2a760 | 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 |
| 2a780 | 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 |
| 2a7a0 | 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 |
| 2a7c0 | 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 |
| 2a7e0 | 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) |
| 2a800 | 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- |
| 2a820 | 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 |
| 2a840 | 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. |
| 2a860 | 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 |
| 2a880 | 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")... |
| 2a8a0 | 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 |
| 2a8c0 | 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 |
| 2a8e0 | 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 |
| 2a900 | 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. |
| 2a920 | 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- |
| 2a940 | 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.' |
| 2a960 | 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 |
| 2a980 | 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- |
| 2a9a0 | 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 |
| 2a9c0 | 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... |
| 2a9e0 | 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"........... |
| 2aa00 | 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")... |
| 2aa20 | 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 |
| 2aa40 | 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 |
| 2aa60 | 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 |
| 2aa80 | 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 |
| 2aaa0 | 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")........ |
| 2aac0 | 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 |
| 2aae0 | 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 |
| 2ab00 | 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).............. |
| 2ab20 | 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).. |
| 2ab40 | 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)..... |
| 2ab60 | 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" |
| 2ab80 | 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 |
| 2aba0 | 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"........... |
| 2abc0 | 20 20 20 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 |
| 2abe0 | 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)................. |
| 2ac00 | 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 |
| 2ac20 | 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)......................... |
| 2ac40 | 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)............ |
| 2ac60 | 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." |
| 2ac80 | 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 |
| 2aca0 | 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 |
| 2acc0 | 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.......... |
| 2ace0 | 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 |
| 2ad00 | 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. |
| 2ad20 | 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 |
| 2ad40 | 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 |
| 2ad60 | 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 |
| 2ad80 | 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. |
| 2ada0 | 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 |
| 2adc0 | 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 |
| 2ade0 | 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... |
| 2ae00 | 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, |
| 2ae20 | 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 |
| 2ae40 | 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. |
| 2ae60 | 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 |
| 2ae80 | 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 |
| 2aea0 | 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 |
| 2aec0 | 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.`: |
| 2aee0 | 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'.". |
| 2af00 | 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. |
| 2af20 | 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 |
| 2af40 | 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 |
| 2af60 | 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 |
| 2af80 | 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. |
| 2afa0 | 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) |
| 2afc0 | 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). |
| 2afe0 | 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).....( |
| 2b000 | 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 |
| 2b020 | 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 |
| 2b040 | 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 |
| 2b060 | 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 |
| 2b080 | 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 |
| 2b0a0 | 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 |
| 2b0c0 | 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 |
| 2b0e0 | 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 |
| 2b100 | 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 |
| 2b120 | 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 |
| 2b140 | 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 |
| 2b160 | 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 |
| 2b180 | 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 |
| 2b1a0 | 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 |
| 2b1c0 | 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 |
| 2b1e0 | 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 |
| 2b200 | 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 |
| 2b220 | 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 |
| 2b240 | 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 |
| 2b260 | 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...: |
| 2b280 | 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 |
| 2b2a0 | 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 |
| 2b2c0 | 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 |
| 2b2e0 | 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 |
| 2b300 | 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........ |
| 2b320 | 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)..... |
| 2b340 | 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 |
| 2b360 | 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".... |
| 2b380 | 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. |
| 2b3a0 | 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 |
| 2b3c0 | 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 |
| 2b3e0 | 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 |
| 2b400 | 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 |
| 2b420 | 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. |
| 2b440 | 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 |
| 2b460 | 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 |
| 2b480 | 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. |
| 2b4a0 | 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 |
| 2b4c0 | 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 |
| 2b4e0 | 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 |
| 2b500 | 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 |
| 2b520 | 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 |
| 2b540 | 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 |
| 2b560 | 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 |
| 2b580 | 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 |
| 2b5a0 | 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 |
| 2b5c0 | 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 |
| 2b5e0 | 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 |
| 2b600 | 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 |
| 2b620 | 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 |
| 2b640 | 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. |
| 2b660 | 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 |
| 2b680 | 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 |
| 2b6a0 | 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 |
| 2b6c0 | 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 |
| 2b6e0 | 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 |
| 2b700 | 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 |
| 2b720 | 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 |
| 2b740 | 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 |
| 2b760 | 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 |
| 2b780 | 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 |
| 2b7a0 | 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 |
| 2b7c0 | 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 |
| 2b7e0 | 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 |
| 2b800 | 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.' |
| 2b820 | 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 |
| 2b840 | 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 |
| 2b860 | 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 |
| 2b880 | 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... |
| 2b8a0 | 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 |
| 2b8c0 | 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 |
| 2b8e0 | 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 |
| 2b900 | 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 |
| 2b920 | 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.` |
| 2b940 | 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'."...: |
| 2b960 | 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 |
| 2b980 | 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 |
| 2b9a0 | 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")))..;;;. |
| 2b9c0 | 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 |
| 2b9e0 | 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 |
| 2ba00 | 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 |
| 2ba20 | 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. |
| 2ba40 | 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 |
| 2ba60 | 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. |
| 2ba80 | 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))...... |
| 2baa0 | 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 |
| 2bac0 | 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 |
| 2bae0 | 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 |
| 2bb00 | 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)...... |
| 2bb20 | 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".......... |
| 2bb40 | 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 |
| 2bb60 | 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 |
| 2bb80 | 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).' |
| 2bba0 | 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 |
| 2bbc0 | 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 |
| 2bbe0 | 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).......... |
| 2bc00 | 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".............: |
| 2bc20 | 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 |
| 2bc40 | 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 |
| 2bc60 | 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 |
| 2bc80 | 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 |
| 2bca0 | 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 |
| 2bcc0 | 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 |
| 2bce0 | 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 |
| 2bd00 | 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 |
| 2bd20 | 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 |
| 2bd40 | 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 |
| 2bd60 | 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 |
| 2bd80 | 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 |
| 2bda0 | 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 |
| 2bdc0 | 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. |
| 2bde0 | 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 |
| 2be00 | 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 |
| 2be20 | 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,. |
| 2be40 | 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. |
| 2be60 | 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. |
| 2be80 | 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- |
| 2bea0 | 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 |
| 2bec0 | 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 |
| 2bee0 | 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 |
| 2bf00 | 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). |
| 2bf20 | 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- |
| 2bf40 | 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 |
| 2bf60 | 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 |
| 2bf80 | 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 |
| 2bfa0 | 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. |
| 2bfc0 | 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).( |
| 2bfe0 | 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- |
| 2c000 | 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 |
| 2c020 | 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 |
| 2c040 | 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 |
| 2c060 | 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 |
| 2c080 | 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. |
| 2c0a0 | 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)).................. |
| 2c0c0 | 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.. |
| 2c0e0 | 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))....................... |
| 2c100 | 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 |
| 2c120 | 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 |
| 2c140 | 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 |
| 2c160 | 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 |
| 2c180 | 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. |
| 2c1a0 | 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 |
| 2c1c0 | 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 |
| 2c1e0 | 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 |
| 2c200 | 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))............... |
| 2c220 | 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.. |
| 2c240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2c260 | 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)......... |
| 2c280 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2c2a0 | 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))............. |
| 2c2c0 | 20 20 20 20 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 |
| 2c2e0 | 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).... |
| 2c300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2c320 | 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 |
| 2c340 | 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).................... |
| 2c360 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2c380 | 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))).................. |
| 2c3a0 | 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 |
| 2c3c0 | 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)))))................ |
| 2c3e0 | 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 |
| 2c400 | 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)........................ |
| 2c420 | 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)."").... |
| 2c440 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2c460 | 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)))))......... |
| 2c480 | 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 |
| 2c4a0 | 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 |
| 2c4c0 | 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 |
| 2c4e0 | 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 |
| 2c500 | 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...: |
| 2c520 | 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 |
| 2c540 | 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. |
| 2c560 | 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". |
| 2c580 | 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... |
| 2c5a0 | 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 |
| 2c5c0 | 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- |
| 2c5e0 | 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- |
| 2c600 | 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 |
| 2c620 | 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 |
| 2c640 | 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 |
| 2c660 | 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 |
| 2c680 | 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............ |
| 2c6a0 | 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 |
| 2c6c0 | 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.................... |
| 2c6e0 | 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-- |
| 2c700 | 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)............. |
| 2c720 | 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 | ................"")............. |
| 2c740 | 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- |
| 2c760 | 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....................... |
| 2c780 | 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 |
| 2c7a0 | 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).................. |
| 2c7c0 | 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")))))........ |
| 2c7e0 | 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- |
| 2c800 | 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 |
| 2c820 | 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 |
| 2c840 | 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 |
| 2c860 | 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. |
| 2c880 | 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 |
| 2c8a0 | 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 |
| 2c8c0 | 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. |
| 2c8e0 | 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 |
| 2c900 | 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 |
| 2c920 | 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) |
| 2c940 | 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. |
| 2c960 | 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 |
| 2c980 | 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 |
| 2c9a0 | 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. |
| 2c9c0 | 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 |
| 2c9e0 | 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 |
| 2ca00 | 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. |
| 2ca20 | 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. |
| 2ca40 | 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 |
| 2ca60 | 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....... |
| 2ca80 | 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)...... |
| 2caa0 | 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 |
| 2cac0 | 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 |
| 2cae0 | 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 |
| 2cb00 | 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..... |
| 2cb20 | 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) |
| 2cb40 | 0a 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 |
| 2cb60 | 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) |
| 2cb80 | 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 | )............................... |
| 2cba0 | 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. |
| 2cbc0 | 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)))........................ |
| 2cbe0 | 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....................... |
| 2cc00 | 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 |
| 2cc20 | 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. |
| 2cc40 | 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)). |
| 2cc60 | 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)).... |
| 2cc80 | 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)....... |
| 2cca0 | 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 |
| 2ccc0 | 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. |
| 2cce0 | 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 |
| 2cd00 | 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 |
| 2cd20 | 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 |
| 2cd40 | 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)...... |
| 2cd60 | 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 |
| 2cd80 | 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 |
| 2cda0 | 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 |
| 2cdc0 | 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............. |
| 2cde0 | 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))..... |
| 2ce00 | 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.()....... |
| 2ce20 | 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. |
| 2ce40 | 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)...... |
| 2ce60 | 20 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 |
| 2ce80 | 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))))...... |
| 2cea0 | 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 |
| 2cec0 | 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))................... |
| 2cee0 | 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- |
| 2cf00 | 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 |
| 2cf20 | 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......... |
| 2cf40 | 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)).......( |
| 2cf60 | 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 |
| 2cf80 | 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 |
| 2cfa0 | 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 |
| 2cfc0 | 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).. |
| 2cfe0 | 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)... |
| 2d000 | 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 |
| 2d020 | 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 |
| 2d040 | 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- |
| 2d060 | 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. |
| 2d080 | 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)))... |
| 2d0a0 | 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)))..; |
| 2d0c0 | 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 |
| 2d0e0 | 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... |
| 2d100 | 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 |
| 2d120 | 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 |
| 2d140 | 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... |
| 2d160 | 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 |
| 2d180 | 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 |
| 2d1a0 | 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"....... |
| 2d1c0 | 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. |
| 2d1e0 | 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 |
| 2d200 | 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 |
| 2d220 | 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 |
| 2d240 | 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 |
| 2d260 | 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 |
| 2d280 | 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. |
| 2d2a0 | 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 |
| 2d2c0 | 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 |
| 2d2e0 | 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 |
| 2d300 | 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............ |
| 2d320 | 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 |
| 2d340 | 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.................... |
| 2d360 | 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-- |
| 2d380 | 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)............. |
| 2d3a0 | 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 | ................"")............. |
| 2d3c0 | 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")))) |
| 2d3e0 | 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) |
| 2d400 | 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 |
| 2d420 | 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 |
| 2d440 | 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 |
| 2d460 | 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 |
| 2d480 | 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 |
| 2d4a0 | 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 |
| 2d4c0 | 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 |
| 2d4e0 | 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. |
| 2d500 | 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 |
| 2d520 | 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 |
| 2d540 | 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 |
| 2d560 | 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 |
| 2d580 | 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 |
| 2d5a0 | 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 |
| 2d5c0 | 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 |
| 2d5e0 | 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 |
| 2d600 | 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)))... |
| 2d620 | 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... |
| 2d640 | 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."/") |
| 2d660 | 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 |
| 2d680 | 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 |
| 2d6a0 | 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 |
| 2d6c0 | 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- |
| 2d6e0 | 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 |
| 2d700 | 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 |
| 2d720 | 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 |
| 2d740 | 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-- |
| 2d760 | 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 |
| 2d780 | 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 |
| 2d7a0 | 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- |
| 2d7c0 | 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 |
| 2d7e0 | 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 |
| 2d800 | 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 |
| 2d820 | 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)....... |
| 2d840 | 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 |
| 2d860 | 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 |
| 2d880 | 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 |
| 2d8a0 | 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 |
| 2d8c0 | 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 |
| 2d8e0 | 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. |
| 2d900 | 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 |
| 2d920 | 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 |
| 2d940 | 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."*"). |
| 2d960 | 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 |
| 2d980 | 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)))).. |
| 2d9a0 | 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 |
| 2d9c0 | 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. |
| 2d9e0 | 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 |
| 2da00 | 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 |
| 2da20 | 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 |
| 2da40 | 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.".")) |
| 2da60 | 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..;;;# |
| 2da80 | 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 |
| 2daa0 | 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 |
| 2dac0 | 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 |
| 2dae0 | 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 |
| 2db00 | 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."...: |
| 2db20 | 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- |
| 2db40 | 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 |
| 2db60 | 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 |
| 2db80 | 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 |
| 2dba0 | 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 |
| 2dbc0 | 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 |
| 2dbe0 | 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 |
| 2dc00 | 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 |
| 2dc20 | 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 |
| 2dc40 | 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- |
| 2dc60 | 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 |
| 2dc80 | 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 |
| 2dca0 | 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).....(" |
| 2dcc0 | 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 |
| 2dce0 | 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 |
| 2dd00 | 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.( |
| 2dd20 | 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-- |
| 2dd40 | 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.............. |
| 2dd60 | 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" |
| 2dd80 | 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") |
| 2dda0 | 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 |
| 2ddc0 | 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 |
| 2dde0 | 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). |
| 2de00 | 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 |
| 2de20 | 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 |
| 2de40 | 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 |
| 2de60 | 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)... |
| 2de80 | 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 |
| 2dea0 | 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". |
| 2dec0 | 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 |
| 2dee0 | 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" |
| 2df00 | 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 |
| 2df20 | 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"....... |
| 2df40 | 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)].. |
| 2df60 | 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.().( |
| 2df80 | 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 |
| 2dfa0 | 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 |
| 2dfc0 | 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))).... |
| 2dfe0 | 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 |
| 2e000 | 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 |
| 2e020 | 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 |
| 2e040 | 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". |
| 2e060 | 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 |
| 2e080 | 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 |
| 2e0a0 | 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 |
| 2e0c0 | 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 |
| 2e0e0 | 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 |
| 2e100 | 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"......... |
| 2e120 | 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)... |
| 2e140 | 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- |
| 2e160 | 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" |
| 2e180 | 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 |
| 2e1a0 | 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 |
| 2e1c0 | 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 |
| 2e1e0 | 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 |
| 2e200 | 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" |
| 2e220 | 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"...... |
| 2e240 | 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).....( |
| 2e260 | 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 |
| 2e280 | 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". |
| 2e2a0 | 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 |
| 2e2c0 | 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". |
| 2e2e0 | 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 |
| 2e300 | 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 |
| 2e320 | 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 |
| 2e340 | 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 |
| 2e360 | 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. |
| 2e380 | 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 |
| 2e3a0 | 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.( |
| 2e3c0 | 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) |
| 2e3e0 | 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.( |
| 2e400 | 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 |
| 2e420 | 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?))). |
| 2e440 | 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.......... |
| 2e460 | 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 |
| 2e480 | 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?".... |
| 2e4a0 | 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) |
| 2e4c0 | 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.# |
| 2e4e0 | 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 |
| 2e500 | 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. |
| 2e520 | 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. |
| 2e540 | 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))). |
| 2e560 | 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 |
| 2e580 | 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........ |
| 2e5a0 | 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). |
| 2e5c0 | 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 |
| 2e5e0 | 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.' |
| 2e600 | 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 |
| 2e620 | 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 |
| 2e640 | 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 |
| 2e660 | 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 |
| 2e680 | 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. |
| 2e6a0 | 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 |
| 2e6c0 | 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. |
| 2e6e0 | 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... |
| 2e700 | 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 |
| 2e720 | 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 |
| 2e740 | 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)]... |
| 2e760 | 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..."... |
| 2e780 | 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 |
| 2e7a0 | 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 |
| 2e7c0 | 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 |
| 2e7e0 | 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).....(" |
| 2e800 | 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 |
| 2e820 | 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".... |
| 2e840 | 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 |
| 2e860 | 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).. |
| 2e880 | 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- |
| 2e8a0 | 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 |
| 2e8c0 | 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 |
| 2e8e0 | 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)))..... |
| 2e900 | 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)... |
| 2e920 | 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 |
| 2e940 | 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 |
| 2e960 | 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 |
| 2e980 | 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) |
| 2e9a0 | 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.( |
| 2e9c0 | 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 |
| 2e9e0 | 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... |
| 2ea00 | 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 |
| 2ea20 | 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. |
| 2ea40 | 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 |
| 2ea60 | 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 |
| 2ea80 | 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. |
| 2eaa0 | 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. |
| 2eac0 | 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 |
| 2eae0 | 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..... |
| 2eb00 | 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 |
| 2eb20 | 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...................... |
| 2eb40 | 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.. |
| 2eb60 | 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 |
| 2eb80 | 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 |
| 2eba0 | 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 |
| 2ebc0 | 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. |
| 2ebe0 | 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)...... |
| 2ec00 | 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- |
| 2ec20 | 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))).... |
| 2ec40 | 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 |
| 2ec60 | 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 |
| 2ec80 | 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)......... |
| 2eca0 | 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 |
| 2ecc0 | 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)))...... |
| 2ece0 | 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 |
| 2ed00 | 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. |
| 2ed20 | 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)...... |
| 2ed40 | 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- |
| 2ed60 | 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 |
| 2ed80 | 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 |
| 2eda0 | 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)......... |
| 2edc0 | 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 |
| 2ede0 | 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 |
| 2ee00 | 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 |
| 2ee20 | 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.......... |
| 2ee40 | 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)....... |
| 2ee60 | 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)........ |
| 2ee80 | 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))))..;;; |
| 2eea0 | 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- |
| 2eec0 | 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 |
| 2eee0 | 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.: |
| 2ef00 | 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 |
| 2ef20 | 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. |
| 2ef40 | 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 |
| 2ef60 | 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 |
| 2ef80 | 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 |
| 2efa0 | 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 |
| 2efc0 | 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 |
| 2efe0 | 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 |
| 2f000 | 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. |
| 2f020 | 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 |
| 2f040 | 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 |
| 2f060 | 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)..........( |
| 2f080 | 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 |
| 2f0a0 | 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-- |
| 2f0c0 | 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 |
| 2f0e0 | 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 |
| 2f100 | 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 |
| 2f120 | 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. |
| 2f140 | 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. |
| 2f160 | 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- |
| 2f180 | 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 |
| 2f1a0 | 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 |
| 2f1c0 | 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 |
| 2f1e0 | 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)) |
| 2f200 | 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 |
| 2f220 | 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).... |
| 2f240 | 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..( |
| 2f260 | 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 |
| 2f280 | 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 |
| 2f2a0 | 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 |
| 2f2c0 | 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 |
| 2f2e0 | 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 |
| 2f300 | 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 |
| 2f320 | 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 |
| 2f340 | 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. |
| 2f360 | 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 |
| 2f380 | 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 |
| 2f3a0 | 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 |
| 2f3c0 | 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. |
| 2f3e0 | 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-- |
| 2f400 | 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. |
| 2f420 | 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- |
| 2f440 | 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.................. |
| 2f460 | 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 |
| 2f480 | 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.............................. |
| 2f4a0 | 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)....... |
| 2f4c0 | 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) |
| 2f4e0 | 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 |
| 2f500 | 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 |
| 2f520 | 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 |
| 2f540 | 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 |
| 2f560 | 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 |
| 2f580 | 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 |
| 2f5a0 | 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 |
| 2f5c0 | 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- |
| 2f5e0 | 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 |
| 2f600 | 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 |
| 2f620 | 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)) |
| 2f640 | 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 |
| 2f660 | 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........................... |
| 2f680 | 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 |
| 2f6a0 | 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)............... |
| 2f6c0 | 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-- |
| 2f6e0 | 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)))) |
| 2f700 | 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 |
| 2f720 | 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 |
| 2f740 | 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 |
| 2f760 | 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.( |
| 2f780 | 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. |
| 2f7a0 | 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. |
| 2f7c0 | 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 |
| 2f7e0 | 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.' |
| 2f800 | 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 |
| 2f820 | 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... |
| 2f840 | 20 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.# |
| 2f860 | 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...... |
| 2f880 | 20 20 20 20 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 |
| 2f8a0 | 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)))..;; |
| 2f8c0 | 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 |
| 2f8e0 | 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". |
| 2f900 | 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. |
| 2f920 | 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.()... |
| 2f940 | 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 |
| 2f960 | 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. |
| 2f980 | 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- |
| 2f9a0 | 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 |
| 2f9c0 | 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 |
| 2f9e0 | 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 |
| 2fa00 | 0a 20 20 20 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 |
| 2fa20 | 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... |
| 2fa40 | 20 20 20 20 20 20 20 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 | ...............................# |
| 2fa60 | 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))). |
| 2fa80 | 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 |
| 2faa0 | 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". |
| 2fac0 | 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. |
| 2fae0 | 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 |
| 2fb00 | 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 |
| 2fb20 | 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 |
| 2fb40 | 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 |
| 2fb60 | 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 |
| 2fb80 | 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. |
| 2fba0 | 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. |
| 2fbc0 | 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 |
| 2fbe0 | 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 |
| 2fc00 | 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... |
| 2fc20 | 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 |
| 2fc40 | 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................. |
| 2fc60 | 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 |
| 2fc80 | 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)).......... |
| 2fca0 | 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. |
| 2fcc0 | 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))) |
| 2fce0 | 0a 20 20 20 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. |
| 2fd00 | 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 |
| 2fd20 | 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 |
| 2fd40 | 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 |
| 2fd60 | 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 |
| 2fd80 | 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 |
| 2fda0 | 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 |
| 2fdc0 | 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 |
| 2fde0 | 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. |
| 2fe00 | 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 |
| 2fe20 | 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 |
| 2fe40 | 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.().. |
| 2fe60 | 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 |
| 2fe80 | 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 |
| 2fea0 | 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 |
| 2fec0 | 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- |
| 2fee0 | 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)).. |
| 2ff00 | 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- |
| 2ff20 | 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" |
| 2ff40 | 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 |
| 2ff60 | 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 |
| 2ff80 | 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 |
| 2ffa0 | 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."... |
| 2ffc0 | 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 |
| 2ffe0 | 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. |
| 30000 | 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 |
| 30020 | 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- |
| 30040 | 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- |
| 30060 | 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))).. |
| 30080 | 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- |
| 300a0 | 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 |
| 300c0 | 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 |
| 300e0 | 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.(). |
| 30100 | 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 |
| 30120 | 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 |
| 30140 | 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- |
| 30160 | 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 |
| 30180 | 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- |
| 301a0 | 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 |
| 301c0 | 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))..;;;## |
| 301e0 | 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- |
| 30200 | 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 |
| 30220 | 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 |
| 30240 | 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 |
| 30260 | 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. |
| 30280 | 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. |
| 302a0 | 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 |
| 302c0 | 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.' |
| 302e0 | 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 |
| 30300 | 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.#' |
| 30320 | 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))..;;; |
| 30340 | 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 |
| 30360 | 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. |
| 30380 | 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 |
| 303a0 | 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 |
| 303c0 | 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. |
| 303e0 | 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 |
| 30400 | 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 |
| 30420 | 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 |
| 30440 | 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 |
| 30460 | 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 |
| 30480 | 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- |
| 304a0 | 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 |
| 304c0 | 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 |
| 304e0 | 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 |
| 30500 | 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... |
| 30520 | 20 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 |
| 30540 | 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)) |
| 30560 | 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 |
| 30580 | 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 |
| 305a0 | 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 |
| 305c0 | 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 |
| 305e0 | 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))..; |
| 30600 | 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 |
| 30620 | 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) |
| 30640 | 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- |
| 30660 | 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 |
| 30680 | 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 |
| 306a0 | 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 |
| 306c0 | 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 |
| 306e0 | 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 |
| 30700 | 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))..; |
| 30720 | 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 |
| 30740 | 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 |
| 30760 | 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 |
| 30780 | 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 |
| 307a0 | 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 |
| 307c0 | 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. |
| 307e0 | 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 |
| 30800 | 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 |
| 30820 | 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 |
| 30840 | 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 |
| 30860 | 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 |
| 30880 | 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 |
| 308a0 | 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.( |
| 308c0 | 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 |
| 308e0 | 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 |
| 30900 | 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 |
| 30920 | 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 |
| 30940 | 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 |
| 30960 | 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.".. |
| 30980 | 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 |
| 309a0 | 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 |
| 309c0 | 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 |
| 309e0 | 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 |
| 30a00 | 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))..;;;# |
| 30a20 | 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 |
| 30a40 | 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". |
| 30a60 | 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. |
| 30a80 | 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.(). |
| 30aa0 | 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 |
| 30ac0 | 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 |
| 30ae0 | 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- |
| 30b00 | 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 |
| 30b20 | 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 |
| 30b40 | 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. |
| 30b60 | 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 |
| 30b80 | 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 |
| 30ba0 | 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. |
| 30bc0 | 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 |
| 30be0 | 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 |
| 30c00 | 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 |
| 30c20 | 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 |
| 30c40 | 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."...: |
| 30c60 | 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 |
| 30c80 | 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 |
| 30ca0 | 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 |
| 30cc0 | 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 |
| 30ce0 | 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))..;;;### |
| 30d00 | 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 |
| 30d20 | 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 |
| 30d40 | 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 |
| 30d60 | 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. |
| 30d80 | 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 |
| 30da0 | 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 |
| 30dc0 | 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- |
| 30de0 | 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 |
| 30e00 | 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. |
| 30e20 | 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 |
| 30e40 | 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 |
| 30e60 | 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 |
| 30e80 | 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...( |
| 30ea0 | 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 |
| 30ec0 | 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 |
| 30ee0 | 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..................... |
| 30f00 | 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 |
| 30f20 | 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 |
| 30f40 | 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 |
| 30f60 | 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 |
| 30f80 | 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 |
| 30fa0 | 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.()..." |
| 30fc0 | 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 |
| 30fe0 | 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 |
| 31000 | 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 |
| 31020 | 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- |
| 31040 | 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. |
| 31060 | 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 |
| 31080 | 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 |
| 310a0 | 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 |
| 310c0 | 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 |
| 310e0 | 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 |
| 31100 | 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 |
| 31120 | 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. |
| 31140 | 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 |
| 31160 | 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\" |
| 31180 | 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 |
| 311a0 | 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 |
| 311c0 | 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- |
| 311e0 | 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 |
| 31200 | 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. |
| 31220 | 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 |
| 31240 | 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 |
| 31260 | 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 |
| 31280 | 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 |
| 312a0 | 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 |
| 312c0 | 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 |
| 312e0 | 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 |
| 31300 | 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 |
| 31320 | 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.............................. |
| 31340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 31360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 31380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 313a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 313c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 313e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 31400 | 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 |
| 31420 | 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............................. |
| 31440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 31460 | 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 |
| 31480 | 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... |
| 314a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 314c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 314e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 31500 | 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................... |
| 31520 | 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................... |
| 31540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 31560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 31580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 315a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 315c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 315e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 31600 | 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 |
| 31620 | 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.-* |
| 31640 | 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 |
| 31660 | 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. |
| 31680 | 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>.;;. |
| 316a0 | 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 |
| 316c0 | 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- |
| 316e0 | 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..;; |
| 31700 | 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 |
| 31720 | 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 |
| 31740 | 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. |
| 31760 | 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 |
| 31780 | 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. |
| 317a0 | 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. |
| 317c0 | 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 |
| 317e0 | 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 |
| 31800 | 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 |
| 31820 | 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 |
| 31840 | 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 |
| 31860 | 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 |
| 31880 | 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. |
| 318a0 | 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.;;. |
| 318c0 | 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 |
| 318e0 | 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 |
| 31900 | 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 |
| 31920 | 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 |
| 31940 | 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 |
| 31960 | 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/>...;;; |
| 31980 | 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 |
| 319a0 | 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 |
| 319c0 | 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 |
| 319e0 | 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 |
| 31a00 | 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 |
| 31a20 | 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- |
| 31a40 | 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 |
| 31a60 | 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 |
| 31a80 | 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 |
| 31aa0 | 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 |
| 31ac0 | 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)...( |
| 31ae0 | 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 |
| 31b00 | 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. |
| 31b20 | 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 |
| 31b40 | 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.... |
| 31b60 | 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 |
| 31b80 | 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 |
| 31ba0 | 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.................. |
| 31bc0 | 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 |
| 31be0 | 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 |
| 31c00 | 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........... |
| 31c20 | 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 |
| 31c40 | 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 |
| 31c60 | 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.............. |
| 31c80 | 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. |
| 31ca0 | 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.: |
| 31cc0 | 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.................. |
| 31ce0 | 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.. |
| 31d00 | 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 |
| 31d20 | 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............... |
| 31d40 | 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 |
| 31d60 | 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 |
| 31d80 | 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..( |
| 31da0 | 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 |
| 31dc0 | 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)). |
| 31de0 | 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 |
| 31e00 | 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." |
| 31e20 | 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 |
| 31e40 | 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 |
| 31e60 | 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))). |
| 31e80 | 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.( |
| 31ea0 | 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))...( |
| 31ec0 | 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 |
| 31ee0 | 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 |
| 31f00 | 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)))) |
| 31f20 | 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 |
| 31f40 | 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 |
| 31f60 | 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 |
| 31f80 | 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- |
| 31fa0 | 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 |
| 31fc0 | 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 |
| 31fe0 | 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 |
| 32000 | 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.............................. |
| 32020 | 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. |
| 32040 | 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)............................ |
| 32060 | 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 |
| 32080 | 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 | ))]............................. |
| 320a0 | 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)... |
| 320c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 320e0 | 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 |
| 32100 | 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 |
| 32120 | 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)))..;;;; |
| 32140 | 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 |
| 32160 | 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).. |
| 32180 | 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 |
| 321a0 | 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. |
| 321c0 | 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 |
| 321e0 | 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 |
| 32200 | 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 |
| 32220 | 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).... |
| 32240 | 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 |
| 32260 | 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- |
| 32280 | 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. |
| 322a0 | 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 |
| 322c0 | 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 |
| 322e0 | 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. |
| 32300 | 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 |
| 32320 | 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. |
| 32340 | 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 |
| 32360 | 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 |
| 32380 | 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. |
| 323a0 | 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 |
| 323c0 | 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.( |
| 323e0 | 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)))......... |
| 32400 | 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)). |
| 32420 | 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 |
| 32440 | 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"))))..;; |
| 32460 | 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 |
| 32480 | 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 |
| 324a0 | 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))......... |
| 324c0 | 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)).. |
| 324e0 | 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 |
| 32500 | 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. |
| 32520 | 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.' |
| 32540 | 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 |
| 32560 | 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 |
| 32580 | 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 |
| 325a0 | 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.* |
| 325c0 | 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.[( |
| 325e0 | 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 |
| 32600 | 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 |
| 32620 | 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 |
| 32640 | 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)]... |
| 32660 | 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 |
| 32680 | 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)............. |
| 326a0 | 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 |
| 326c0 | 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)))............... |
| 326e0 | 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 |
| 32700 | 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 |
| 32720 | 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 |
| 32740 | 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 |
| 32760 | 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)]... |
| 32780 | 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 |
| 327a0 | 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)............. |
| 327c0 | 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 |
| 327e0 | 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)))............... |
| 32800 | 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 |
| 32820 | 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 |
| 32840 | 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) |
| 32860 | 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)))))) |
| 32880 | 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 |
| 328a0 | 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." |
| 328c0 | 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- |
| 328e0 | 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 |
| 32900 | 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 |
| 32920 | 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". |
| 32940 | 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 |
| 32960 | 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 |
| 32980 | 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 |
| 329a0 | 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 |
| 329c0 | 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 |
| 329e0 | 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 |
| 32a00 | 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 |
| 32a20 | 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. |
| 32a40 | 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 |
| 32a60 | 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*")...... |
| 32a80 | 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- |
| 32aa0 | 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). |
| 32ac0 | 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 |
| 32ae0 | 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......... |
| 32b00 | 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 |
| 32b20 | 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....... |
| 32b40 | 20 20 20 20 20 20 20 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 | ...............................' |
| 32b60 | 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) |
| 32b80 | 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 | )............................... |
| 32ba0 | 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 |
| 32bc0 | 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 |
| 32be0 | 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 |
| 32c00 | 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 |
| 32c20 | 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 |
| 32c40 | 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 |
| 32c60 | 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)) |
| 32c80 | 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 |
| 32ca0 | 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 |
| 32cc0 | 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 |
| 32ce0 | 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. |
| 32d00 | 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 |
| 32d20 | 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 |
| 32d40 | 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 |
| 32d60 | 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 |
| 32d80 | 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 |
| 32da0 | 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 |
| 32dc0 | 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 |
| 32de0 | 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 |
| 32e00 | 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".....( |
| 32e20 | 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 |
| 32e40 | 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 |
| 32e60 | 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".. |
| 32e80 | 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)..... |
| 32ea0 | 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 |
| 32ec0 | 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 |
| 32ee0 | 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".... |
| 32f00 | 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 |
| 32f20 | 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 |
| 32f40 | 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 |
| 32f60 | 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). |
| 32f80 | 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 |
| 32fa0 | 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- |
| 32fc0 | 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" |
| 32fe0 | 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) |
| 33000 | 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 |
| 33020 | 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 |
| 33040 | 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). |
| 33060 | 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 |
| 33080 | 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- |
| 330a0 | 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 |
| 330c0 | 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 |
| 330e0 | 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 |
| 33100 | 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 |
| 33120 | 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).. |
| 33140 | 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 |
| 33160 | 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 |
| 33180 | 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 |
| 331a0 | 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 |
| 331c0 | 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. |
| 331e0 | 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.().( |
| 33200 | 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 |
| 33220 | 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 |
| 33240 | 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 |
| 33260 | 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 |
| 33280 | 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). |
| 332a0 | 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 |
| 332c0 | 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 |
| 332e0 | 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 |
| 33300 | 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) |
| 33320 | 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 |
| 33340 | 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.() |
| 33360 | 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.".. |
| 33380 | 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 |
| 333a0 | 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 |
| 333c0 | 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 |
| 333e0 | 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 |
| 33400 | 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 |
| 33420 | 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). |
| 33440 | 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 |
| 33460 | 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 |
| 33480 | 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)...( |
| 334a0 | 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 |
| 334c0 | 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 |
| 334e0 | 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 |
| 33500 | 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 |
| 33520 | 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.().( |
| 33540 | 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 |
| 33560 | 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 |
| 33580 | 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 |
| 335a0 | 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 |
| 335c0 | 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 |
| 335e0 | 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")). |
| 33600 | 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 |
| 33620 | 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 |
| 33640 | 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 |
| 33660 | 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 |
| 33680 | 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.". |
| 336a0 | 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 |
| 336c0 | 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 |
| 336e0 | 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 |
| 33700 | 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 |
| 33720 | 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)...( |
| 33740 | 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 |
| 33760 | 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 |
| 33780 | 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")) |
| 337a0 | 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 |
| 337c0 | 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)).. |
| 337e0 | 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 |
| 33800 | 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 |
| 33820 | 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 |
| 33840 | 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 |
| 33860 | 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.( |
| 33880 | 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 |
| 338a0 | 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 |
| 338c0 | 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 |
| 338e0 | 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 |
| 33900 | 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). |
| 33920 | 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 |
| 33940 | 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 |
| 33960 | 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). |
| 33980 | 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 |
| 339a0 | 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 |
| 339c0 | 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 |
| 339e0 | 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.".. |
| 33a00 | 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"... |
| 33a20 | 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 |
| 33a40 | 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 |
| 33a60 | 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 |
| 33a80 | 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 |
| 33aa0 | 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 |
| 33ac0 | 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 |
| 33ae0 | 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 |
| 33b00 | 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- |
| 33b20 | 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- |
| 33b40 | 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 |
| 33b60 | 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 |
| 33b80 | 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. |
| 33ba0 | 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 |
| 33bc0 | 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) |
| 33be0 | 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 |
| 33c00 | 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 |
| 33c20 | 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 |
| 33c40 | 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 |
| 33c60 | 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... |
| 33c80 | 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>".# |
| 33ca0 | 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... |
| 33cc0 | 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>"..# |
| 33ce0 | 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)..( |
| 33d00 | 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 |
| 33d20 | 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 |
| 33d40 | 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 |
| 33d60 | 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 |
| 33d80 | 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 |
| 33da0 | 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 |
| 33dc0 | 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..... |
| 33de0 | 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))...... |
| 33e00 | 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". |
| 33e20 | 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) |
| 33e40 | 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 |
| 33e60 | 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" |
| 33e80 | 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 |
| 33ea0 | 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 |
| 33ec0 | 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 |
| 33ee0 | 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)))) |
| 33f00 | 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 |
| 33f20 | 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)......... |
| 33f40 | 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.... |
| 33f60 | 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)....... |
| 33f80 | 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").. |
| 33fa0 | 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 |
| 33fc0 | 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 |
| 33fe0 | 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)).......... |
| 34000 | 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 |
| 34020 | 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)...... |
| 34040 | 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 |
| 34060 | 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))..... |
| 34080 | 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 |
| 340a0 | 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))))......... |
| 340c0 | 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 |
| 340e0 | 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 |
| 34100 | 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................. |
| 34120 | 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/ |
| 34140 | 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"............................. |
| 34160 | 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 |
| 34180 | 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 | )............................... |
| 341a0 | 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)). |
| 341c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 341e0 | 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)...... |
| 34200 | 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 |
| 34220 | 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))))........... |
| 34240 | 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.. |
| 34260 | 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 |
| 34280 | 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 |
| 342a0 | 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))...... |
| 342c0 | 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))))))))). |
| 342e0 | 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 |
| 34300 | 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 |
| 34320 | 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.. |
| 34340 | 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)...... |
| 34360 | 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 |
| 34380 | 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. |
| 343a0 | 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 |
| 343c0 | 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 |
| 343e0 | 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)..... |
| 34400 | 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." |
| 34420 | 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 |
| 34440 | 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. |
| 34460 | 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).......................... |
| 34480 | 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- |
| 344a0 | 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))........................ |
| 344c0 | 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 |
| 344e0 | 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 |
| 34500 | 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............ |
| 34520 | 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....................( |
| 34540 | 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 |
| 34560 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 34580 | 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 |
| 345a0 | 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))............................. |
| 345c0 | 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 |
| 345e0 | 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)))................. |
| 34600 | 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- |
| 34620 | 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.......................... |
| 34640 | 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))))))) |
| 34660 | 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 |
| 34680 | 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 |
| 346a0 | 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 |
| 346c0 | 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.... |
| 346e0 | 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 |
| 34700 | 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- |
| 34720 | 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 |
| 34740 | 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 |
| 34760 | 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) |
| 34780 | 0a 20 20 20 20 20 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 |
| 347a0 | 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)))))))..;;; |
| 347c0 | 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 |
| 347e0 | 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........ |
| 34800 | 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 |
| 34820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34860 | 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 |
| 34880 | 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... |
| 348a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 348c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 348e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34900 | 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................... |
| 34920 | 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................... |
| 34940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 349a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 349c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 349e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34a00 | 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 |
| 34a20 | 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. |
| 34a40 | 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").....( |
| 34a60 | 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." |
| 34a80 | 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").. |
| 34aa0 | 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 |
| 34ac0 | 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. |
| 34ae0 | 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").... |
| 34b00 | 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. |
| 34b20 | 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 |
| 34b40 | 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 |
| 34b60 | 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 |
| 34b80 | 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 |
| 34ba0 | 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" |
| 34bc0 | 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 |
| 34be0 | 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")...: |
| 34c00 | 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") |
| 34c20 | 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 |
| 34c40 | 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:.;; |
| 34c60 | 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:..... |
| 34c80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34d20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 | 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 |
| 34e20 | 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............................... |
| 34e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34e60 | 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 |
| 34e80 | 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... |
| 34ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34f00 | 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................... |
| 34f20 | 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................... |
| 34f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 34fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 35000 | 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 |
| 35020 | 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.-*-..; |
| 35040 | 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. |
| 35060 | 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 |
| 35080 | 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 |
| 350a0 | 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 |
| 350c0 | 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 |
| 350e0 | 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 |
| 35100 | 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 |
| 35120 | 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.; |
| 35140 | 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. |
| 35160 | 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 |
| 35180 | 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 |
| 351a0 | 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. |
| 351c0 | 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). |
| 351e0 | 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 |
| 35200 | 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 |
| 35220 | 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 |
| 35240 | 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. |
| 35260 | 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 |
| 35280 | 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 |
| 352a0 | 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. |
| 352c0 | 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. |
| 352e0 | 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 |
| 35300 | 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 |
| 35320 | 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 |
| 35340 | 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:// |
| 35360 | 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 |
| 35380 | 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 |
| 353a0 | 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 |
| 353c0 | 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...' |
| 353e0 | 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 |
| 35400 | 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 |
| 35420 | 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- |
| 35440 | 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 |
| 35460 | 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 |
| 35480 | 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.......... |
| 354a0 | 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 |
| 354c0 | 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 |
| 354e0 | 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 |
| 35500 | 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 |
| 35520 | 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. |
| 35540 | 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 |
| 35560 | 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 |
| 35580 | 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")... |
| 355a0 | 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). |
| 355c0 | 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 |
| 355e0 | 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). |
| 35600 | 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 |
| 35620 | 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 |
| 35640 | 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) |
| 35660 | 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 |
| 35680 | 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 |
| 356a0 | 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 |
| 356c0 | 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 |
| 356e0 | 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. |
| 35700 | 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 |
| 35720 | 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 |
| 35740 | 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 |
| 35760 | 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 |
| 35780 | 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)) |
| 357a0 | 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." |
| 357c0 | 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")))).. |
| 357e0 | 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.(& |
| 35800 | 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 |
| 35820 | 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. |
| 35840 | 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 |
| 35860 | 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 |
| 35880 | 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.'( |
| 358a0 | 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 |
| 358c0 | 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 |
| 358e0 | 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 |
| 35900 | 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).......... |
| 35920 | 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 |
| 35940 | 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)) |
| 35960 | 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. |
| 35980 | 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")) |
| 359a0 | 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 |
| 359c0 | 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 |
| 359e0 | 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- |
| 35a00 | 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 |
| 35a20 | 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.(? |
| 35a40 | 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)))))..;;; |
| 35a60 | 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 |
| 35a80 | 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"........... |
| 35aa0 | 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 |
| 35ac0 | 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".......... |
| 35ae0 | 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 |
| 35b00 | 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- |
| 35b20 | 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 |
| 35b40 | 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 |
| 35b60 | 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 |
| 35b80 | 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"............. |
| 35ba0 | 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- |
| 35bc0 | 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>" |
| 35be0 | 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 |
| 35c00 | 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 |
| 35c20 | 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 |
| 35c40 | 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 |
| 35c60 | 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 |
| 35c80 | 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>"..... |
| 35ca0 | 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 |
| 35cc0 | 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- |
| 35ce0 | 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". |
| 35d00 | 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 |
| 35d20 | 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. |
| 35d40 | 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).( |
| 35d60 | 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- |
| 35d80 | 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- |
| 35da0 | 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 |
| 35dc0 | 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 |
| 35de0 | 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 |
| 35e00 | 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 |
| 35e20 | 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 |
| 35e40 | 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 |
| 35e60 | 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 |
| 35e80 | 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 |
| 35ea0 | 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 |
| 35ec0 | 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 |
| 35ee0 | 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- |
| 35f00 | 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 |
| 35f20 | 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)........................... |
| 35f40 | 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 |
| 35f60 | 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 |
| 35f80 | 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.( |
| 35fa0 | 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 |
| 35fc0 | 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).... |
| 35fe0 | 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 |
| 36000 | 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 |
| 36020 | 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 |
| 36040 | 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- |
| 36060 | 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 |
| 36080 | 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 |
| 360a0 | 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 |
| 360c0 | 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 |
| 360e0 | 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) |
| 36100 | 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........... |
| 36120 | 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) |
| 36140 | 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 |
| 36160 | 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.. |
| 36180 | 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 |
| 361a0 | 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"). |
| 361c0 | 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 |
| 361e0 | 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))...... |
| 36200 | 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)........... |
| 36220 | 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 |
| 36240 | 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 |
| 36260 | 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))......... |
| 36280 | 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 |
| 362a0 | 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 |
| 362c0 | 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)....... |
| 362e0 | 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 |
| 36300 | 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))........ |
| 36320 | 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... |
| 36340 | 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)... |
| 36360 | 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). |
| 36380 | 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).... |
| 363a0 | 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 |
| 363c0 | 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 |
| 363e0 | 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"..................... |
| 36400 | 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... |
| 36420 | 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 |
| 36440 | 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............. |
| 36460 | 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 |
| 36480 | 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 |
| 364a0 | 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)... |
| 364c0 | 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 |
| 364e0 | 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).......... |
| 36500 | 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).... |
| 36520 | 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:.\ |
| 36540 | 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- |
| 36560 | 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........ |
| 36580 | 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."#.")............ |
| 365a0 | 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................ |
| 365c0 | 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............... |
| 365e0 | 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 |
| 36600 | 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)))). |
| 36620 | 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. |
| 36640 | 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.. |
| 36660 | 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 |
| 36680 | 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 |
| 366a0 | 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)) |
| 366c0 | 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.. |
| 366e0 | 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... |
| 36700 | 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."- |
| 36720 | 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")...................... |
| 36740 | 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"))................. |
| 36760 | 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))))))))). |
| 36780 | 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 |
| 367a0 | 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 |
| 367c0 | 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 |
| 367e0 | 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.( |
| 36800 | 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 |
| 36820 | 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. |
| 36840 | 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 |
| 36860 | 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 |
| 36880 | 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 |
| 368a0 | 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)..... |
| 368c0 | 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))) |
| 368e0 | 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.()... |
| 36900 | 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 |
| 36920 | 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."... |
| 36940 | 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)... |
| 36960 | 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- |
| 36980 | 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.... |
| 369a0 | 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 |
| 369c0 | 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).... |
| 369e0 | 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 |
| 36a00 | 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 |
| 36a20 | 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 |
| 36a40 | 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.() |
| 36a60 | 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 |
| 36a80 | 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- |
| 36aa0 | 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 |
| 36ac0 | 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 |
| 36ae0 | 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 |
| 36b00 | 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)) |
| 36b20 | 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 |
| 36b40 | 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.( |
| 36b60 | 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)....... |
| 36b80 | 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- |
| 36ba0 | 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............ |
| 36bc0 | 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 |
| 36be0 | 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 |
| 36c00 | 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- |
| 36c20 | 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 |
| 36c40 | 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 |
| 36c60 | 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 |
| 36c80 | 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 |
| 36ca0 | 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 |
| 36cc0 | 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...... |
| 36ce0 | 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 |
| 36d00 | 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 |
| 36d20 | 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 |
| 36d40 | 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)) |
| 36d60 | 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......... |
| 36d80 | 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 |
| 36da0 | 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).......... |
| 36dc0 | 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 |
| 36de0 | 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)..................... |
| 36e00 | 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)).. |
| 36e20 | 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 |
| 36e40 | 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 |
| 36e60 | 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)........ |
| 36e80 | 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 |
| 36ea0 | 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.()...( |
| 36ec0 | 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 |
| 36ee0 | 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 |
| 36f00 | 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 |
| 36f20 | 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 |
| 36f40 | 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."... |
| 36f60 | 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 |
| 36f80 | 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)]... |
| 36fa0 | 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- |
| 36fc0 | 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". |
| 36fe0 | 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 |
| 37000 | 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- |
| 37020 | 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 |
| 37040 | 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 |
| 37060 | 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- |
| 37080 | 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 |
| 370a0 | 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 |
| 370c0 | 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 |
| 370e0 | 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 |
| 37100 | 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 |
| 37120 | 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 |
| 37140 | 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 |
| 37160 | 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 |
| 37180 | 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 |
| 371a0 | 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 |
| 371c0 | 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. |
| 371e0 | 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 |
| 37200 | 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 |
| 37220 | 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....................... |
| 37240 | 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).............. |
| 37260 | 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))))). |
| 37280 | 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. |
| 372a0 | 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 |
| 372c0 | 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 |
| 372e0 | 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 |
| 37300 | 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 |
| 37320 | 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 |
| 37340 | 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)) |
| 37360 | 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 |
| 37380 | 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 |
| 373a0 | 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 |
| 373c0 | 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 |
| 373e0 | 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. |
| 37400 | 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.................... |
| 37420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 37480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 37520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 | 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 |
| 37620 | 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............................ |
| 37640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 37660 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| 37680 | 30 30 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... |
| 376a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 376c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 376e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 37700 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 37720 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 37740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 37760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 37780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 377a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 377c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 377e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 37800 | 3b 3b 3b 20 66 6f 72 67 65 2d 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 |
| 37820 | 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. |
| 37840 | 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. |
| 37860 | 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 |
| 37880 | 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>.; |
| 378a0 | 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 |
| 378c0 | 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 |
| 378e0 | 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.. |
| 37900 | 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 |
| 37920 | 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 |
| 37940 | 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 |
| 37960 | 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. |
| 37980 | 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 |
| 379a0 | 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 |
| 379c0 | 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 |
| 379e0 | 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 |
| 37a00 | 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 |
| 37a20 | 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 |
| 37a40 | 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 |
| 37a60 | 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.;; |
| 37a80 | 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. |
| 37aa0 | 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.; |
| 37ac0 | 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 |
| 37ae0 | 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. |
| 37b00 | 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. |
| 37b20 | 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. |
| 37b40 | 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 |
| 37b60 | 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/>...; |
| 37b80 | 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 |
| 37ba0 | 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 |
| 37bc0 | 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. |
| 37be0 | 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)...(( |
| 37c00 | 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.' |
| 37c20 | 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. |
| 37c40 | 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 |
| 37c60 | 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 |
| 37c80 | 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 |
| 37ca0 | 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- |
| 37cc0 | 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-" |
| 37ce0 | 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 |
| 37d00 | 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......... |
| 37d20 | 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 |
| 37d40 | 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 |
| 37d60 | 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 |
| 37d80 | 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......... |
| 37da0 | 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 |
| 37dc0 | 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 |
| 37de0 | 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 |
| 37e00 | 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....... |
| 37e20 | 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 |
| 37e40 | 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.............. |
| 37e60 | 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... |
| 37e80 | 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)... |
| 37ea0 | 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. |
| 37ec0 | 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 |
| 37ee0 | 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 |
| 37f00 | 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 |
| 37f20 | 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 |
| 37f40 | 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 |
| 37f60 | 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 |
| 37f80 | 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.. |
| 37fa0 | 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).. |
| 37fc0 | 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 |
| 37fe0 | 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....... |
| 38000 | 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 |
| 38020 | 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 |
| 38040 | 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........... |
| 38060 | 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.. |
| 38080 | 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).. |
| 380a0 | 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- |
| 380c0 | 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 |
| 380e0 | 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 |
| 38100 | 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).;. |
| 38120 | 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..... |
| 38140 | 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 |
| 38160 | 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) |
| 38180 | 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 |
| 381a0 | 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)....( |
| 381c0 | 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.. |
| 381e0 | 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 |
| 38200 | 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 |
| 38220 | 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....... |
| 38240 | 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- |
| 38260 | 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............ |
| 38280 | 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 |
| 382a0 | 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 |
| 382c0 | 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.... |
| 382e0 | 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).... |
| 38300 | 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.: |
| 38320 | 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........... |
| 38340 | 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.. |
| 38360 | 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).. |
| 38380 | 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 |
| 383a0 | 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)....)).. |
| 383c0 | 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 |
| 383e0 | 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...... |
| 38400 | 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)....( |
| 38420 | 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.' |
| 38440 | 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 |
| 38460 | 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 |
| 38480 | 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 |
| 384a0 | 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 |
| 384c0 | 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. |
| 384e0 | 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). |
| 38500 | 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 |
| 38520 | 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.......... |
| 38540 | 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 |
| 38560 | 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 |
| 38580 | 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 |
| 385a0 | 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....... |
| 385c0 | 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 |
| 385e0 | 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 |
| 38600 | 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).... |
| 38620 | 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 |
| 38640 | 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 |
| 38660 | 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- |
| 38680 | 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 |
| 386a0 | 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 |
| 386c0 | 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 |
| 386e0 | 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)) |
| 38700 | 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 |
| 38720 | 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 |
| 38740 | 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- |
| 38760 | 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) |
| 38780 | 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 |
| 387a0 | 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 |
| 387c0 | 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)... |
| 387e0 | 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 |
| 38800 | 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.(( |
| 38820 | 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 |
| 38840 | 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 |
| 38860 | 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 |
| 38880 | 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 |
| 388a0 | 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 |
| 388c0 | 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 |
| 388e0 | 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 |
| 38900 | 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 |
| 38920 | 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)... |
| 38940 | 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). |
| 38960 | 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)).. |
| 38980 | 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. |
| 389a0 | 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 |
| 389c0 | 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 |
| 389e0 | 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. |
| 38a00 | 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 |
| 38a20 | 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." |
| 38a40 | 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- |
| 38a60 | 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 |
| 38a80 | 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. |
| 38aa0 | 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 |
| 38ac0 | 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 |
| 38ae0 | 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 |
| 38b00 | 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. |
| 38b20 | 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 |
| 38b40 | 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 |
| 38b60 | 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 |
| 38b80 | 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)...... |
| 38ba0 | 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 |
| 38bc0 | 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 |
| 38be0 | 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 |
| 38c00 | 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 |
| 38c20 | 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 |
| 38c40 | 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 |
| 38c60 | 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. |
| 38c80 | 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 |
| 38ca0 | 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 |
| 38cc0 | 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 |
| 38ce0 | 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 |
| 38d00 | 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)....... |
| 38d20 | 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 |
| 38d40 | 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.( |
| 38d60 | 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 |
| 38d80 | 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 |
| 38da0 | 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))....... |
| 38dc0 | 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 |
| 38de0 | 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. |
| 38e00 | 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)......... |
| 38e20 | 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 |
| 38e40 | 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 |
| 38e60 | 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 |
| 38e80 | 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 |
| 38ea0 | 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 |
| 38ec0 | 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*. |
| 38ee0 | 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 |
| 38f00 | 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 |
| 38f20 | 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 |
| 38f40 | 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 |
| 38f60 | 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]+ |
| 38f80 | 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]+ |
| 38fa0 | 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 |
| 38fc0 | 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 |
| 38fe0 | 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.. |
| 39000 | 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 |
| 39020 | 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 |
| 39040 | 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- |
| 39060 | 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 |
| 39080 | 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 |
| 390a0 | 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 |
| 390c0 | 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 |
| 390e0 | 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 |
| 39100 | 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 |
| 39120 | 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 |
| 39140 | 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)............... |
| 39160 | 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).. |
| 39180 | 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: |
| 391a0 | 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])))]))..( |
| 391c0 | 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 |
| 391e0 | 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 |
| 39200 | 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...... |
| 39220 | 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 |
| 39240 | 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 |
| 39260 | 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.........: |
| 39280 | 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 |
| 392a0 | 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.(=. |
| 392c0 | 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)......... |
| 392e0 | 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.....$ |
| 39300 | 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 |
| 39320 | 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 |
| 39340 | 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 |
| 39360 | 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-- |
| 39380 | 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. |
| 393a0 | 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 |
| 393c0 | 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_ |
| 393e0 | 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)..... |
| 39400 | 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 |
| 39420 | 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.. |
| 39440 | 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 |
| 39460 | 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).... |
| 39480 | 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. |
| 394a0 | 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 |
| 394c0 | 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 |
| 394e0 | 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 |
| 39500 | 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 |
| 39520 | 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.....[: |
| 39540 | 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. |
| 39560 | 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)...... |
| 39580 | 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... |
| 395a0 | 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. |
| 395c0 | 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 |
| 395e0 | 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- |
| 39600 | 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)... |
| 39620 | 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.... |
| 39640 | 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 |
| 39660 | 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 |
| 39680 | 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 |
| 396a0 | 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: |
| 396c0 | 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 |
| 396e0 | 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).. |
| 39700 | 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... |
| 39720 | 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 |
| 39740 | 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)) |
| 39760 | 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 |
| 39780 | 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 |
| 397a0 | 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 |
| 397c0 | 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 |
| 397e0 | 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)........ |
| 39800 | 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.$ |
| 39820 | 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 |
| 39840 | 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))............. |
| 39860 | 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))... |
| 39880 | 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 |
| 398a0 | 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 |
| 398c0 | 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 |
| 398e0 | 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. |
| 39900 | 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 |
| 39920 | 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 |
| 39940 | 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 |
| 39960 | 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). |
| 39980 | 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 |
| 399a0 | 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)))......... |
| 399c0 | 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)............... |
| 399e0 | 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- |
| 39a00 | 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 |
| 39a20 | 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.................. |
| 39a40 | 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.*]............ |
| 39a60 | 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............ |
| 39a80 | 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 |
| 39aa0 | 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))............. |
| 39ac0 | 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.[( |
| 39ae0 | 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)]]))............... |
| 39b00 | 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..................... |
| 39b20 | 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)..... |
| 39b40 | 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 |
| 39b60 | 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 |
| 39b80 | 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 |
| 39ba0 | 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 |
| 39bc0 | 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 |
| 39be0 | 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 |
| 39c00 | 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 |
| 39c20 | 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... |
| 39c40 | 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 |
| 39c60 | 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 |
| 39c80 | 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 |
| 39ca0 | 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 |
| 39cc0 | 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 |
| 39ce0 | 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 |
| 39d00 | 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, |
| 39d20 | 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 |
| 39d40 | 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-- |
| 39d60 | 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............... |
| 39d80 | 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.. |
| 39da0 | 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- |
| 39dc0 | 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................. |
| 39de0 | 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))..;;; |
| 39e00 | 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 |
| 39e20 | 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 |
| 39e40 | 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 |
| 39e60 | 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 |
| 39e80 | 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 |
| 39ea0 | 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 |
| 39ec0 | 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 |
| 39ee0 | 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 |
| 39f00 | 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 |
| 39f20 | 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. |
| 39f40 | 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 |
| 39f60 | 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)))..( |
| 39f80 | 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 |
| 39fa0 | 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 |
| 39fc0 | 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 |
| 39fe0 | 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 |
| 3a000 | 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 |
| 3a020 | 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 |
| 3a040 | 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 |
| 3a060 | 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)............ |
| 3a080 | 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 |
| 3a0a0 | 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)...... |
| 3a0c0 | 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 |
| 3a0e0 | 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).......... |
| 3a100 | 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 |
| 3a120 | 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).. |
| 3a140 | 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 |
| 3a160 | 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)... |
| 3a180 | 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 |
| 3a1a0 | 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)))).. |
| 3a1c0 | 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 |
| 3a1e0 | 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 |
| 3a200 | 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) |
| 3a220 | 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 |
| 3a240 | 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.( |
| 3a260 | 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 |
| 3a280 | 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 |
| 3a2a0 | 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."..."."..")............ |
| 3a2c0 | 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 |
| 3a2e0 | 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. |
| 3a300 | 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>" |
| 3a320 | 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 |
| 3a340 | 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 |
| 3a360 | 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"..... |
| 3a380 | 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- |
| 3a3a0 | 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"................ |
| 3a3c0 | 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)..( |
| 3a3e0 | 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 |
| 3a400 | 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- |
| 3a420 | 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 |
| 3a440 | 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"................... |
| 3a460 | 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 |
| 3a480 | 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 |
| 3a4a0 | 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 |
| 3a4c0 | 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 |
| 3a4e0 | 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'.". |
| 3a500 | 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. |
| 3a520 | 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"....................... |
| 3a540 | 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) |
| 3a560 | 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- |
| 3a580 | 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. |
| 3a5a0 | 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 |
| 3a5c0 | 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 |
| 3a5e0 | 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" |
| 3a600 | 0a 20 20 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 |
| 3a620 | 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 |
| 3a640 | 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 |
| 3a660 | 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 |
| 3a680 | 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 |
| 3a6a0 | 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 |
| 3a6c0 | 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" |
| 3a6e0 | 0a 20 20 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 |
| 3a700 | 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 |
| 3a720 | 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 |
| 3a740 | 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 |
| 3a760 | 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. |
| 3a780 | 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 |
| 3a7a0 | 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"................. |
| 3a7c0 | 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 |
| 3a7e0 | 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- |
| 3a800 | 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 |
| 3a820 | 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 |
| 3a840 | 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)))..... |
| 3a860 | 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. |
| 3a880 | 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)))) |
| 3a8a0 | 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 |
| 3a8c0 | 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).. |
| 3a8e0 | 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 |
| 3a900 | 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.()) |
| 3a920 | 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 |
| 3a940 | 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 |
| 3a960 | 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 |
| 3a980 | 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 |
| 3a9a0 | 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 |
| 3a9c0 | 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 |
| 3a9e0 | 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 |
| 3aa00 | 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 |
| 3aa20 | 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).................. |
| 3aa40 | 20 20 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 |
| 3aa60 | 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)."/"....... |
| 3aa80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 3aaa0 | 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- |
| 3aac0 | 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))))......................... |
| 3aae0 | 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). |
| 3ab00 | 20 20 20 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 |
| 3ab20 | 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 |
| 3ab40 | 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 |
| 3ab60 | 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 |
| 3ab80 | 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)))....................... |
| 3aba0 | 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- |
| 3abc0 | 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))))............ |
| 3abe0 | 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- |
| 3ac00 | 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 |
| 3ac20 | 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)). |
| 3ac40 | 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-- |
| 3ac60 | 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)))........ |
| 3ac80 | 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..... |
| 3aca0 | 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 |
| 3acc0 | 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)....... |
| 3ace0 | 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 |
| 3ad00 | 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 |
| 3ad20 | 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. |
| 3ad40 | 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....................... |
| 3ad60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3ad80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3ada0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3adc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3ade0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3ae00 | 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 |
| 3ae20 | 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............................... |
| 3ae40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3ae60 | 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 |
| 3ae80 | 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... |
| 3aea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3aec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3aee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3af00 | 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................... |
| 3af20 | 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................... |
| 3af40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3af60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3af80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3afa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3afc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3afe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 3b000 | 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 |
| 3b020 | 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. |
| 3b040 | 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. |
| 3b060 | 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 |
| 3b080 | 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>.; |
| 3b0a0 | 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 |
| 3b0c0 | 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 |
| 3b0e0 | 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.. |
| 3b100 | 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 |
| 3b120 | 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 |
| 3b140 | 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 |
| 3b160 | 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. |
| 3b180 | 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 |
| 3b1a0 | 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 |
| 3b1c0 | 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 |
| 3b1e0 | 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 |
| 3b200 | 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 |
| 3b220 | 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 |
| 3b240 | 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 |
| 3b260 | 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.;; |
| 3b280 | 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. |
| 3b2a0 | 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.; |
| 3b2c0 | 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 |
| 3b2e0 | 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. |
| 3b300 | 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. |
| 3b320 | 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. |
| 3b340 | 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 |
| 3b360 | 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/>...; |
| 3b380 | 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 |
| 3b3a0 | 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 |
| 3b3c0 | 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 |
| 3b3e0 | 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..... |
| 3b400 | 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 |
| 3b420 | 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."- |
| 3b440 | 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... |
| 3b460 | 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 |
| 3b480 | 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........ |
| 3b4a0 | 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 |
| 3b4c0 | 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 |
| 3b4e0 | 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 |
| 3b500 | 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 |
| 3b520 | 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 |
| 3b540 | 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 |
| 3b560 | 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- |
| 3b580 | 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 |
| 3b5a0 | 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 |
| 3b5c0 | 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 |
| 3b5e0 | 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- |
| 3b600 | 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 |
| 3b620 | 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 |
| 3b640 | 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 |
| 3b660 | 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 |
| 3b680 | 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 |
| 3b6a0 | 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 |
| 3b6c0 | 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 |
| 3b6e0 | 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- |
| 3b700 | 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 |
| 3b720 | 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 |
| 3b740 | 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 |
| 3b760 | 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 |
| 3b780 | 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 |
| 3b7a0 | 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........... |
| 3b7c0 | 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 |
| 3b7e0 | 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........... |
| 3b800 | 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 |
| 3b820 | 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.............. |
| 3b840 | 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 |
| 3b860 | 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................. |
| 3b880 | 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 |
| 3b8a0 | 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..................... |
| 3b8c0 | 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).. |
| 3b8e0 | 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 |
| 3b900 | 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)... |
| 3b920 | 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 |
| 3b940 | 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).... |
| 3b960 | 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 |
| 3b980 | 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 |
| 3b9a0 | 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 |
| 3b9c0 | 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........... |
| 3b9e0 | 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 |
| 3ba00 | 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 |
| 3ba20 | 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.................. |
| 3ba40 | 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..... |
| 3ba60 | 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)... |
| 3ba80 | 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 |
| 3baa0 | 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......... |
| 3bac0 | 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 |
| 3bae0 | 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. |
| 3bb00 | 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............. |
| 3bb20 | 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.... |
| 3bb40 | 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).. |
| 3bb60 | 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 |
| 3bb80 | 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........ |
| 3bba0 | 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 |
| 3bbc0 | 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 |
| 3bbe0 | 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.............. |
| 3bc00 | 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..... |
| 3bc20 | 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)... |
| 3bc40 | 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 |
| 3bc60 | 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......... |
| 3bc80 | 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 |
| 3bca0 | 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 |
| 3bcc0 | 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......... |
| 3bce0 | 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). |
| 3bd00 | 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 |
| 3bd20 | 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 |
| 3bd40 | 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 |
| 3bd60 | 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........ |
| 3bd80 | 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 |
| 3bda0 | 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............. |
| 3bdc0 | 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 |
| 3bde0 | 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............... |
| 3be00 | 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..... |
| 3be20 | 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)....( |
| 3be40 | 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 |
| 3be60 | 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 |
| 3be80 | 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). |
| 3bea0 | 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 |
| 3bec0 | 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 |
| 3bee0 | 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 |
| 3bf00 | 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 |
| 3bf20 | 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 |
| 3bf40 | 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 |
| 3bf60 | 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 |
| 3bf80 | 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 |
| 3bfa0 | 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 |
| 3bfc0 | 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 |
| 3bfe0 | 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 |
| 3c000 | 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 |
| 3c020 | 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 |
| 3c040 | 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 |
| 3c060 | 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 |
| 3c080 | 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 |
| 3c0a0 | 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 |
| 3c0c0 | 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- |
| 3c0e0 | 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).. |
| 3c100 | 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 |
| 3c120 | 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- |
| 3c140 | 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 |
| 3c160 | 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- |
| 3c180 | 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*. |
| 3c1a0 | 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)). |
| 3c1c0 | 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 |
| 3c1e0 | 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 |
| 3c200 | 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)................. |
| 3c220 | 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 |
| 3c240 | 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)).......................... |
| 3c260 | 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) |
| 3c280 | 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. |
| 3c2a0 | 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)))..... |
| 3c2c0 | 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)))). |
| 3c2e0 | 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 |
| 3c300 | 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))).. |
| 3c320 | 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 |
| 3c340 | 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. |
| 3c360 | 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:/ |
| 3c380 | 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 |
| 3c3a0 | 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)) |
| 3c3c0 | 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 |
| 3c3e0 | 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 |
| 3c400 | 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 |
| 3c420 | 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)) |
| 3c440 | 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 |
| 3c460 | 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) |
| 3c480 | 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. |
| 3c4a0 | 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... |
| 3c4c0 | 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, |
| 3c4e0 | 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... |
| 3c500 | 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 |
| 3c520 | 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 |
| 3c540 | 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 |
| 3c560 | 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 |
| 3c580 | 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 |
| 3c5a0 | 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' |
| 3c5c0 | 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 |
| 3c5e0 | 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 |
| 3c600 | 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 |
| 3c620 | 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 |
| 3c640 | 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.` |
| 3c660 | 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 |
| 3c680 | 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 |
| 3c6a0 | 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. |
| 3c6c0 | 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 |
| 3c6e0 | 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 |
| 3c700 | 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....... |
| 3c720 | 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- |
| 3c740 | 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.................... |
| 3c760 | 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 |
| 3c780 | 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)))))...... |
| 3c7a0 | 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 |
| 3c7c0 | 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 |
| 3c7e0 | 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 |
| 3c800 | 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 |
| 3c820 | 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 |
| 3c840 | 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 |
| 3c860 | 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 |
| 3c880 | 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... |
| 3c8a0 | 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 |
| 3c8c0 | 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 |
| 3c8e0 | 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 |
| 3c900 | 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.( |
| 3c920 | 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)))...... |
| 3c940 | 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.. |
| 3c960 | 20 20 20 20 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 |
| 3c980 | 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" |
| 3c9a0 | 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 |
| 3c9c0 | 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 |
| 3c9e0 | 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)))........... |
| 3ca00 | 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 |
| 3ca20 | 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 |
| 3ca40 | 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)) |
| 3ca60 | 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))....... |
| 3ca80 | 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-- |
| 3caa0 | 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)...............( |
| 3cac0 | 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 |
| 3cae0 | 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 |
| 3cb00 | 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 |
| 3cb20 | 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 |
| 3cb40 | 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))................ |
| 3cb60 | 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 |
| 3cb80 | 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"))).......... |
| 3cba0 | 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 |
| 3cbc0 | 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"... |
| 3cbe0 | 20 20 20 20 20 20 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 |
| 3cc00 | 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 |
| 3cc20 | 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 |
| 3cc40 | 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. |
| 3cc60 | 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.")............. |
| 3cc80 | 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 |
| 3cca0 | 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 |
| 3ccc0 | 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 |
| 3cce0 | 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 |
| 3cd00 | 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. |
| 3cd20 | 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) |
| 3cd40 | 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 |
| 3cd60 | 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 |
| 3cd80 | 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 |
| 3cda0 | 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 |
| 3cdc0 | 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 |
| 3cde0 | 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) |
| 3ce00 | 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. |
| 3ce20 | 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 |
| 3ce40 | 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." |
| 3ce60 | 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 |
| 3ce80 | 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 |
| 3cea0 | 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 |
| 3cec0 | 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)................... |
| 3cee0 | 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 |
| 3cf00 | 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) |
| 3cf20 | 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 |
| 3cf40 | 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 |
| 3cf60 | 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- |
| 3cf80 | 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."...( |
| 3cfa0 | 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 |
| 3cfc0 | 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 |
| 3cfe0 | 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 |
| 3d000 | 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 |
| 3d020 | 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.' |
| 3d040 | 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 |
| 3d060 | 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. |
| 3d080 | 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............. |
| 3d0a0 | 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)...... |
| 3d0c0 | 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 |
| 3d0e0 | 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.... |
| 3d100 | 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 |
| 3d120 | 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!)................. |
| 3d140 | 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)............. |
| 3d160 | 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?))))..... |
| 3d180 | 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 |
| 3d1a0 | 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:. |
| 3d1c0 | 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"......... |
| 3d1e0 | 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 |
| 3d200 | 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 |
| 3d220 | 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. |
| 3d240 | 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'"... |
| 3d260 | 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 |
| 3d280 | 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 |
| 3d2a0 | 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))).... |
| 3d2c0 | 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 |
| 3d2e0 | 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))..... |
| 3d300 | 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. |
| 3d320 | 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 |
| 3d340 | 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. |
| 3d360 | 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... |
| 3d380 | 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. |
| 3d3a0 | 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 |
| 3d3c0 | 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 |
| 3d3e0 | 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 |
| 3d400 | 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......................... |
| 3d420 | 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 |
| 3d440 | 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).......................... |
| 3d460 | 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 |
| 3d480 | 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)........................... |
| 3d4a0 | 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.. |
| 3d4c0 | 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))].......................... |
| 3d4e0 | 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))) |
| 3d500 | 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 |
| 3d520 | 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 |
| 3d540 | 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 |
| 3d560 | 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 |
| 3d580 | 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'........... |
| 3d5a0 | 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 |
| 3d5c0 | 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.... |
| 3d5e0 | 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 |
| 3d600 | 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 |
| 3d620 | 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. |
| 3d640 | 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......... |
| 3d660 | 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 |
| 3d680 | 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)............. |
| 3d6a0 | 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)...... |
| 3d6c0 | 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) |
| 3d6e0 | 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. |
| 3d700 | 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 |
| 3d720 | 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 |
| 3d740 | 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))..... |
| 3d760 | 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)....... |
| 3d780 | 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 |
| 3d7a0 | 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".................. |
| 3d7c0 | 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) |
| 3d7e0 | 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 |
| 3d800 | 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 |
| 3d820 | 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 |
| 3d840 | 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 |
| 3d860 | 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?))......................( |
| 3d880 | 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 |
| 3d8a0 | 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)........... |
| 3d8c0 | 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 |
| 3d8e0 | 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........................... |
| 3d900 | 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........ |
| 3d920 | 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. |
| 3d940 | 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?)))))............. |
| 3d960 | 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 |
| 3d980 | 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....... |
| 3d9a0 | 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 |
| 3d9c0 | 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))........ |
| 3d9e0 | 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 |
| 3da00 | 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............................... |
| 3da20 | 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............... |
| 3da40 | 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 |
| 3da60 | 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......................... |
| 3da80 | 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.... |
| 3daa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 3dac0 | 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................. |
| 3dae0 | 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 |
| 3db00 | 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............................... |
| 3db20 | 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.......... |
| 3db40 | 20 20 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 |
| 3db60 | 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..................... |
| 3db80 | 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) |
| 3dba0 | 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 |
| 3dbc0 | 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!)...................( |
| 3dbe0 | 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)... |
| 3dc00 | 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 |
| 3dc20 | 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)). |
| 3dc40 | 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 |
| 3dc60 | 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 |
| 3dc80 | 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.. |
| 3dca0 | 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"......... |
| 3dcc0 | 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- |
| 3dce0 | 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.( |
| 3dd00 | 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)......... |
| 3dd20 | 20 20 20 20 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 |
| 3dd40 | 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 |
| 3dd60 | 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 |
| 3dd80 | 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.....( |
| 3dda0 | 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 |
| 3ddc0 | 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 |
| 3dde0 | 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)) |
| 3de00 | 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 |
| 3de20 | 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)........... |
| 3de40 | 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. |
| 3de60 | 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 |
| 3de80 | 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 |
| 3dea0 | 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).... |
| 3dec0 | 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.......,_............ |
| 3dee0 | 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).........(`(: |
| 3df00 | 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............... |
| 3df20 | 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?. |
| 3df40 | 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 |
| 3df60 | 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. |
| 3df80 | 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)........ |
| 3dfa0 | 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..,_................ |
| 3dfc0 | 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 |
| 3dfe0 | 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). |
| 3e000 | 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 |
| 3e020 | 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)... |
| 3e040 | 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?...,_........... |
| 3e060 | 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).........(`( |
| 3e080 | 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). |
| 3e0a0 | 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!. |
| 3e0c0 | 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 |
| 3e0e0 | 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?....,_...... |
| 3e100 | 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)....... |
| 3e120 | 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.....,_............... |
| 3e140 | 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 |
| 3e160 | 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?.().. |
| 3e180 | 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? |
| 3e1a0 | 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 |
| 3e1c0 | 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. |
| 3e1e0 | 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 |
| 3e200 | 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 |
| 3e220 | 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 |
| 3e240 | 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 |
| 3e260 | 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 |
| 3e280 | 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 |
| 3e2a0 | 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)))... |
| 3e2c0 | 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 |
| 3e2e0 | 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 |
| 3e300 | 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))).. |
| 3e320 | 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 |
| 3e340 | 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 |
| 3e360 | 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 |
| 3e380 | 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 |
| 3e3a0 | 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 |
| 3e3c0 | 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 |
| 3e3e0 | 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 |
| 3e400 | 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. |
| 3e420 | 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 |
| 3e440 | 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 |
| 3e460 | 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 |
| 3e480 | 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).. |
| 3e4a0 | 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 |
| 3e4c0 | 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) |
| 3e4e0 | 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 |
| 3e500 | 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 |
| 3e520 | 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) |
| 3e540 | 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 |
| 3e560 | 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)))............ |
| 3e580 | 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)) |
| 3e5a0 | 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. |
| 3e5c0 | 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"))))..;; |
| 3e5e0 | 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. |
| 3e600 | 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 |
| 3e620 | 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)... |
| 3e640 | 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 |
| 3e660 | 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))) |
| 3e680 | 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.* |
| 3e6a0 | 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............... |
| 3e6c0 | 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).( |
| 3e6e0 | 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 |
| 3e700 | 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.( |
| 3e720 | 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 |
| 3e740 | 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 |
| 3e760 | 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 |
| 3e780 | 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 |
| 3e7a0 | 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.. |
| 3e7c0 | 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 |
| 3e7e0 | 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)................. |
| 3e800 | 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. |
| 3e820 | 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 |
| 3e840 | 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)]] |
| 3e860 | 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.( |
| 3e880 | 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 |
| 3e8a0 | 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 |
| 3e8c0 | 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 |
| 3e8e0 | 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 |
| 3e900 | 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 |
| 3e920 | 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 |
| 3e940 | 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. |
| 3e960 | 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 |
| 3e980 | 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.. |
| 3e9a0 | 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 |
| 3e9c0 | 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))..... |
| 3e9e0 | 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 |
| 3ea00 | 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))... |
| 3ea20 | 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 |
| 3ea40 | 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))... |
| 3ea60 | 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 |
| 3ea80 | 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)))))) |
| 3eaa0 | 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 |
| 3eac0 | 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 |
| 3eae0 | 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))...................... |
| 3eb00 | 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. |
| 3eb20 | 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 |
| 3eb40 | 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 |
| 3eb60 | 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 |
| 3eb80 | 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 |
| 3eba0 | 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 |
| 3ebc0 | 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. |
| 3ebe0 | 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 |
| 3ec00 | 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.. |
| 3ec20 | 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 |
| 3ec40 | 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. |
| 3ec60 | 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- |
| 3ec80 | 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. |
| 3eca0 | 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- |
| 3ecc0 | 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))........ |
| 3ece0 | 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 |
| 3ed00 | 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 |
| 3ed20 | 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)............. |
| 3ed40 | 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 |
| 3ed60 | 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........................... |
| 3ed80 | 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................. |
| 3eda0 | 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.... |
| 3edc0 | 20 20 20 20 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 |
| 3ede0 | 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........................ |
| 3ee00 | 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 |
| 3ee20 | 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 |
| 3ee40 | 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 |
| 3ee60 | 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................ |
| 3ee80 | 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)........... |
| 3eea0 | 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 |
| 3eec0 | 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)............. |
| 3eee0 | 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. |
| 3ef00 | 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........... |
| 3ef20 | 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. |
| 3ef40 | 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/ |
| 3ef60 | 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...................... |
| 3ef80 | 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 |
| 3efa0 | 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.................. |
| 3efc0 | 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 |
| 3efe0 | 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............. |
| 3f000 | 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 |
| 3f020 | 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.............................. |
| 3f040 | 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) |
| 3f060 | 0a 20 20 20 20 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 |
| 3f080 | 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)))................. |
| 3f0a0 | 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)))......... |
| 3f0c0 | 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 |
| 3f0e0 | 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 |
| 3f100 | 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 |
| 3f120 | 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)).......... |
| 3f140 | 20 20 20 20 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 |
| 3f160 | 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)...( |
| 3f180 | 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 |
| 3f1a0 | 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 |
| 3f1c0 | 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........ |
| 3f1e0 | 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"............. |
| 3f200 | 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- |
| 3f220 | 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))................... |
| 3f240 | 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)........ |
| 3f260 | 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 |
| 3f280 | 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). |
| 3f2a0 | 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 |
| 3f2c0 | 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.. |
| 3f2e0 | 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 |
| 3f300 | 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))... |
| 3f320 | 20 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 |
| 3f340 | 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)).. |
| 3f360 | 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 |
| 3f380 | 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] |
| 3f3a0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 3f3c0 | 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]))....... |
| 3f3e0 | 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........ |
| 3f400 | 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 |
| 3f420 | 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)))...... |
| 3f440 | 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 |
| 3f460 | 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 |
| 3f480 | 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)............... |
| 3f4a0 | 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) |
| 3f4c0 | 0a 20 20 20 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 |
| 3f4e0 | 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 |
| 3f500 | 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 |
| 3f520 | 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."\\`\\(.+\\)/\\([^/]+\\).@\ |
| 3f540 | 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 |
| 3f560 | 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 |
| 3f580 | 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)............... |
| 3f5a0 | 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 |
| 3f5c0 | 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)................. |
| 3f5e0 | 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 |
| 3f600 | 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." |
| 3f620 | 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 |
| 3f640 | 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 |
| 3f660 | 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... |
| 3f680 | 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 |
| 3f6a0 | 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. |
| 3f6c0 | 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)).................. |
| 3f6e0 | 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 |
| 3f700 | 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 |
| 3f720 | 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 |
| 3f740 | 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 |
| 3f760 | 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 |
| 3f780 | 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 |
| 3f7a0 | 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 |
| 3f7c0 | 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 |
| 3f7e0 | 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 |
| 3f800 | 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)))...... |
| 3f820 | 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 |
| 3f840 | 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 |
| 3f860 | 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 |
| 3f880 | 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))) |
| 3f8a0 | 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 |
| 3f8c0 | 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 |
| 3f8e0 | 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 |
| 3f900 | 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 |
| 3f920 | 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.# |
| 3f940 | 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 |
| 3f960 | 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 |
| 3f980 | 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))). |
| 3f9a0 | 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 |
| 3f9c0 | 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 |
| 3f9e0 | 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. |
| 3fa00 | 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 |
| 3fa20 | 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*.( |
| 3fa40 | 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 |
| 3fa60 | 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.( |
| 3fa80 | 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) |
| 3faa0 | 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......( |
| 3fac0 | 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 |
| 3fae0 | 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)....................... |
| 3fb00 | 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 |
| 3fb20 | 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 |
| 3fb40 | 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 |
| 3fb60 | 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)........ |
| 3fb80 | 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."\ |
| 3fba0 | 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 |
| 3fbc0 | 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 |
| 3fbe0 | 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)........ |
| 3fc00 | 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 |
| 3fc20 | 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 |
| 3fc40 | 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 |
| 3fc60 | 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 |
| 3fc80 | 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. |
| 3fca0 | 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.( |
| 3fcc0 | 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 |
| 3fce0 | 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 |
| 3fd00 | 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))..... |
| 3fd20 | 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.......... |
| 3fd40 | 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).... |
| 3fd60 | 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.( |
| 3fd80 | 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.()......................( |
| 3fda0 | 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............. |
| 3fdc0 | 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. |
| 3fde0 | 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))...... |
| 3fe00 | 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 |
| 3fe20 | 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)........................ |
| 3fe40 | 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..... |
| 3fe60 | 20 20 20 20 20 20 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 |
| 3fe80 | 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... |
| 3fea0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 3fec0 | 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........ |
| 3fee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 3ff00 | 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............ |
| 3ff20 | 20 20 20 20 20 20 20 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 |
| 3ff40 | 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)))...... |
| 3ff60 | 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-- |
| 3ff80 | 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 |
| 3ffa0 | 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) |
| 3ffc0 | 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 |
| 3ffe0 | 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.(( |
| 40000 | 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) |
| 40020 | 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 |
| 40040 | 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............... |
| 40060 | 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 |
| 40080 | 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 |
| 400a0 | 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) |
| 400c0 | 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)..... |
| 400e0 | 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." |
| 40100 | 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 |
| 40120 | 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 |
| 40140 | 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 |
| 40160 | 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.........( |
| 40180 | 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.......... |
| 401a0 | 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................... |
| 401c0 | 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.".". |
| 401e0 | 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. |
| 40200 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 40220 | 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 |
| 40240 | 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 |
| 40260 | 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 |
| 40280 | 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))... |
| 402a0 | 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 |
| 402c0 | 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 |
| 402e0 | 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-- |
| 40300 | 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 |
| 40320 | 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 |
| 40340 | 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 |
| 40360 | 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 |
| 40380 | 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)....... |
| 403a0 | 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- |
| 403c0 | 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 |
| 403e0 | 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))).... |
| 40400 | 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 |
| 40420 | 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)....................... |
| 40440 | 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 |
| 40460 | 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 |
| 40480 | 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 |
| 404a0 | 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..... |
| 404c0 | 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. |
| 404e0 | 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' |
| 40500 | 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 |
| 40520 | 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 |
| 40540 | 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 |
| 40560 | 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 |
| 40580 | 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 |
| 405a0 | 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. |
| 405c0 | 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.... |
| 405e0 | 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 |
| 40600 | 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 |
| 40620 | 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'... |
| 40640 | 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 |
| 40660 | 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). |
| 40680 | 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 |
| 406a0 | 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 |
| 406c0 | 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)..... |
| 406e0 | 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 |
| 40700 | 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 |
| 40720 | 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 |
| 40740 | 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 |
| 40760 | 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..................... |
| 40780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 407a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 407c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 407e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 40800 | 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 |
| 40820 | 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............................ |
| 40840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 40860 | 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 |
| 40880 | 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... |
| 408a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 408c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 408e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 40900 | 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................... |
| 40920 | 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................... |
| 40940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 40960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 40980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 409a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 409c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 409e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 40a00 | 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 |
| 40a20 | 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. |
| 40a40 | 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. |
| 40a60 | 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 |
| 40a80 | 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>.; |
| 40aa0 | 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 |
| 40ac0 | 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 |
| 40ae0 | 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.. |
| 40b00 | 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 |
| 40b20 | 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 |
| 40b40 | 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 |
| 40b60 | 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. |
| 40b80 | 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 |
| 40ba0 | 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 |
| 40bc0 | 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 |
| 40be0 | 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 |
| 40c00 | 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 |
| 40c20 | 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 |
| 40c40 | 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 |
| 40c60 | 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.;; |
| 40c80 | 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. |
| 40ca0 | 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.; |
| 40cc0 | 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 |
| 40ce0 | 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. |
| 40d00 | 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. |
| 40d20 | 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. |
| 40d40 | 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 |
| 40d60 | 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/>...; |
| 40d80 | 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 |
| 40da0 | 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 |
| 40dc0 | 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 |
| 40de0 | 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 |
| 40e00 | 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 |
| 40e20 | 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... |
| 40e40 | 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 |
| 40e60 | 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 |
| 40e80 | 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...: |
| 40ea0 | 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 |
| 40ec0 | 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- |
| 40ee0 | 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 |
| 40f00 | 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........ |
| 40f20 | 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 |
| 40f40 | 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 |
| 40f60 | 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 |
| 40f80 | 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........... |
| 40fa0 | 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 |
| 40fc0 | 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) |
| 40fe0 | 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 |
| 41000 | 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 |
| 41020 | 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 |
| 41040 | 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...................... |
| 41060 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 410a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 410c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 410e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 411a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 411c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 411e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41200 | 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 |
| 41220 | 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............................... |
| 41240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41260 | 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 |
| 41280 | 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... |
| 412a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 412c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 412e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41300 | 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................... |
| 41320 | 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................... |
| 41340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 413a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 413c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 413e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 41400 | 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 |
| 41420 | 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 |
| 41440 | 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- |
| 41460 | 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: |
| 41480 | 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. |
| 414a0 | 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 |
| 414c0 | 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 |
| 414e0 | 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 |
| 41500 | 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 |
| 41520 | 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/ |
| 41540 | 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. |
| 41560 | 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 |
| 41580 | 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 |
| 415a0 | 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 |
| 415c0 | 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 |
| 415e0 | 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..;; |
| 41600 | 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. |
| 41620 | 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, |
| 41640 | 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 |
| 41660 | 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. |
| 41680 | 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 |
| 416a0 | 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. |
| 416c0 | 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 |
| 416e0 | 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 |
| 41700 | 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 |
| 41720 | 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 |
| 41740 | 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 |
| 41760 | 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/ |
| 41780 | 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). |
| 417a0 | 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 |
| 417c0 | 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 |
| 417e0 | 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.: |
| 41800 | 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=% |
| 41820 | 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 |
| 41840 | 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 |
| 41860 | 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 |
| 41880 | 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 |
| 418a0 | 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 |
| 418c0 | 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 |
| 418e0 | 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 |
| 41900 | 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 |
| 41920 | 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 |
| 41940 | 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 |
| 41960 | 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/? |
| 41980 | 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 |
| 419a0 | 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/? |
| 419c0 | 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 |
| 419e0 | 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" |
| 41a00 | 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 |
| 41a20 | 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 |
| 41a40 | 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 |
| 41a60 | 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. |
| 41a80 | 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 |
| 41aa0 | 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* |
| 41ac0 | 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 |
| 41ae0 | 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 |
| 41b00 | 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 |
| 41b20 | 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 |
| 41b40 | 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. |
| 41b60 | 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 |
| 41b80 | 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 |
| 41ba0 | 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 |
| 41bc0 | 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.. |
| 41be0 | 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 |
| 41c00 | 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. |
| 41c20 | 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. |
| 41c40 | 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 |
| 41c60 | 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 |
| 41c80 | 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 |
| 41ca0 | 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 |
| 41cc0 | 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 |
| 41ce0 | 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 |
| 41d00 | 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").. |
| 41d20 | 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." |
| 41d40 | 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")). |
| 41d60 | 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 |
| 41d80 | 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 |
| 41da0 | 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 |
| 41dc0 | 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 |
| 41de0 | 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 |
| 41e00 | 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 |
| 41e20 | 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 |
| 41e40 | 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 |
| 41e60 | 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 |
| 41e80 | 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 |
| 41ea0 | 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").. |
| 41ec0 | 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." |
| 41ee0 | 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 |
| 41f00 | 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 |
| 41f20 | 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 |
| 41f40 | 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 |
| 41f60 | 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 |
| 41f80 | 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\".").. |
| 41fa0 | 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 |
| 41fc0 | 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 |
| 41fe0 | 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 |
| 42000 | 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 |
| 42020 | 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 |
| 42040 | 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 |
| 42060 | 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://% |
| 42080 | 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 |
| 420a0 | 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/ |
| 420c0 | 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 |
| 420e0 | 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. |
| 42100 | 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 |
| 42120 | 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 |
| 42140 | 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 |
| 42160 | 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 |
| 42180 | 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 |
| 421a0 | 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/ |
| 421c0 | 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 |
| 421e0 | 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/~ |
| 42200 | 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 |
| 42220 | 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/% |
| 42240 | 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." |
| 42260 | 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).; |
| 42280 | 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...... |
| 422a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 422c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 422e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 42300 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 42320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 42340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 42360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 42380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 423a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 423c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 423e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 42400 | 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. |
| 42420 | 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.............................. |
| 42440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 42460 | 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 |
| 42480 | 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... |
| 424a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 424c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 424e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 42500 | 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................... |
| 42520 | 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................... |
| 42540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 42560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 42580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 425a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 425c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 425e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 42600 | 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 |
| 42620 | 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.-*- |
| 42640 | 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 |
| 42660 | 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 |
| 42680 | 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 |
| 426a0 | 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 |
| 426c0 | 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 |
| 426e0 | 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..;;. |
| 42700 | 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. |
| 42720 | 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 |
| 42740 | 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 |
| 42760 | 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 |
| 42780 | 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 |
| 427a0 | 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 |
| 427c0 | 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 |
| 427e0 | 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 |
| 42800 | 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 |
| 42820 | 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. |
| 42840 | 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 |
| 42860 | 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 |
| 42880 | 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 |
| 428a0 | 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 |
| 428c0 | 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 |
| 428e0 | 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 |
| 42900 | 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 |
| 42920 | 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 |
| 42940 | 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 |
| 42960 | 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/>...;;;. |
| 42980 | 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). |
| 429a0 | 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 |
| 429c0 | 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).. |
| 429e0 | 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 |
| 42a00 | 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 |
| 42a20 | 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 |
| 42a40 | 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 |
| 42a60 | 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 |
| 42a80 | 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 |
| 42aa0 | 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 |
| 42ac0 | 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. |
| 42ae0 | 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 |
| 42b00 | 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 |
| 42b20 | 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 |
| 42b40 | 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 |
| 42b60 | 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.. |
| 42b80 | 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.' |
| 42ba0 | 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 |
| 42bc0 | 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. |
| 42be0 | 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 |
| 42c00 | 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 |
| 42c20 | 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 |
| 42c40 | 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. |
| 42c60 | 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 |
| 42c80 | 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 |
| 42ca0 | 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 |
| 42cc0 | 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 |
| 42ce0 | 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 |
| 42d00 | 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 |
| 42d20 | 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 |
| 42d40 | 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 |
| 42d60 | 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 |
| 42d80 | 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 |
| 42da0 | 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 |
| 42dc0 | 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 |
| 42de0 | 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 |
| 42e00 | 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 |
| 42e20 | 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 |
| 42e40 | 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.. |
| 42e60 | 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 |
| 42e80 | 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"). |
| 42ea0 | 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.: |
| 42ec0 | 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 |
| 42ee0 | 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 |
| 42f00 | 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 |
| 42f20 | 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 |
| 42f40 | 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 |
| 42f60 | 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. |
| 42f80 | 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."... |
| 42fa0 | 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. |
| 42fc0 | 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 |
| 42fe0 | 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 |
| 43000 | 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. |
| 43020 | 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. |
| 43040 | 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. |
| 43060 | 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 |
| 43080 | 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 |
| 430a0 | 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 |
| 430c0 | 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 |
| 430e0 | 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 |
| 43100 | 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 |
| 43120 | 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. |
| 43140 | 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 |
| 43160 | 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 |
| 43180 | 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... |
| 431a0 | 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 |
| 431c0 | 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 |
| 431e0 | 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 |
| 43200 | 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.... |
| 43220 | 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 |
| 43240 | 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 |
| 43260 | 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 |
| 43280 | 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 |
| 432a0 | 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. |
| 432c0 | 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..." |
| 432e0 | 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 |
| 43300 | 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............. |
| 43320 | 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........... |
| 43340 | 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........ |
| 43360 | 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.' |
| 43380 | 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 |
| 433a0 | 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 |
| 433c0 | 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 |
| 433e0 | 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. |
| 43400 | 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 |
| 43420 | 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 |
| 43440 | 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).. |
| 43460 | 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 |
| 43480 | 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 |
| 434a0 | 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 |
| 434c0 | 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 |
| 434e0 | 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 |
| 43500 | 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.. |
| 43520 | 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 |
| 43540 | 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. |
| 43560 | 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 |
| 43580 | 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 |
| 435a0 | 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 |
| 435c0 | 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 |
| 435e0 | 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 |
| 43600 | 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 |
| 43620 | 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 |
| 43640 | 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 |
| 43660 | 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 |
| 43680 | 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'." |
| 436a0 | 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 |
| 436c0 | 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 |
| 436e0 | 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..... |
| 43700 | 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 |
| 43720 | 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))))... |
| 43740 | 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.` |
| 43760 | 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 |
| 43780 | 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 |
| 437a0 | 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. |
| 437c0 | 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 |
| 437e0 | 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 |
| 43800 | 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."...: |
| 43820 | 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 |
| 43840 | 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. |
| 43860 | 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. |
| 43880 | 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 |
| 438a0 | 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 |
| 438c0 | 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 |
| 438e0 | 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 |
| 43900 | 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 |
| 43920 | 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. |
| 43940 | 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 |
| 43960 | 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 |
| 43980 | 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." |
| 439a0 | 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 |
| 439c0 | 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. |
| 439e0 | 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 |
| 43a00 | 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 |
| 43a20 | 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 |
| 43a40 | 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- |
| 43a60 | 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) |
| 43a80 | 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 |
| 43aa0 | 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.".. |
| 43ac0 | 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 |
| 43ae0 | 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.;;; |
| 43b00 | 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 |
| 43b20 | 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 |
| 43b40 | 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 |
| 43b60 | 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. |
| 43b80 | 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)............ |
| 43ba0 | 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 |
| 43bc0 | 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 |
| 43be0 | 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. |
| 43c00 | 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 |
| 43c20 | 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[- |
| 43c40 | 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 |
| 43c60 | 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 |
| 43c80 | 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 |
| 43ca0 | 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. |
| 43cc0 | 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 |
| 43ce0 | 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 |
| 43d00 | 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 |
| 43d20 | 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)).. |
| 43d40 | 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 |
| 43d60 | 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 |
| 43d80 | 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 |
| 43da0 | 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 |
| 43dc0 | 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 |
| 43de0 | 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 |
| 43e00 | 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 |
| 43e20 | 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 |
| 43e40 | 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 |
| 43e60 | 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 |
| 43e80 | 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- |
| 43ea0 | 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. |
| 43ec0 | 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 |
| 43ee0 | 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 |
| 43f00 | 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 |
| 43f20 | 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 |
| 43f40 | 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 |
| 43f60 | 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'. |
| 43f80 | 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. |
| 43fa0 | 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 |
| 43fc0 | 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 |
| 43fe0 | 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' |
| 44000 | 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 |
| 44020 | 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 |
| 44040 | 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. |
| 44060 | 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 |
| 44080 | 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 |
| 440a0 | 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...'(( |
| 440c0 | 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 |
| 440e0 | 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 |
| 44100 | 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 |
| 44120 | 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 |
| 44140 | 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 |
| 44160 | 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))..." |
| 44180 | 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 |
| 441a0 | 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 |
| 441c0 | 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 |
| 441e0 | 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 |
| 44200 | 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") |
| 44220 | 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. |
| 44240 | 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 |
| 44260 | 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 |
| 44280 | 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 |
| 442a0 | 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. |
| 442c0 | 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 |
| 442e0 | 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 |
| 44300 | 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...'( |
| 44320 | 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 |
| 44340 | 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 |
| 44360 | 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 |
| 44380 | 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 |
| 443a0 | 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. |
| 443c0 | 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...`( |
| 443e0 | 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 |
| 44400 | 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. |
| 44420 | 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 |
| 44440 | 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 |
| 44460 | 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- |
| 44480 | 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 |
| 444a0 | 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 |
| 444c0 | 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 |
| 444e0 | 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 |
| 44500 | 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 |
| 44520 | 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 |
| 44540 | 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 |
| 44560 | 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 |
| 44580 | 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 |
| 445a0 | 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 |
| 445c0 | 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 |
| 445e0 | 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 |
| 44600 | 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. |
| 44620 | 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 |
| 44640 | 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 |
| 44660 | 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 |
| 44680 | 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".. |
| 446a0 | 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 |
| 446c0 | 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 |
| 446e0 | 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)..... |
| 44700 | 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 |
| 44720 | 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 |
| 44740 | 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 |
| 44760 | 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 |
| 44780 | 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 |
| 447a0 | 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 |
| 447c0 | 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.... |
| 447e0 | 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 |
| 44800 | 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)...... |
| 44820 | 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 |
| 44840 | 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.. |
| 44860 | 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. |
| 44880 | 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 |
| 448a0 | 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. |
| 448c0 | 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 |
| 448e0 | 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 |
| 44900 | 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 |
| 44920 | 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 |
| 44940 | 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 |
| 44960 | 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................ |
| 44980 | 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 |
| 449a0 | 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))......... |
| 449c0 | 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 |
| 449e0 | 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 |
| 44a00 | 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- |
| 44a20 | 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. |
| 44a40 | 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 |
| 44a60 | 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 |
| 44a80 | 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 |
| 44aa0 | 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) |
| 44ac0 | 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 |
| 44ae0 | 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 |
| 44b00 | 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 |
| 44b20 | 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)). |
| 44b40 | 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)). |
| 44b60 | 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 |
| 44b80 | 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 |
| 44ba0 | 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).............. |
| 44bc0 | 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)........ |
| 44be0 | 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- |
| 44c00 | 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 |
| 44c20 | 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 |
| 44c40 | 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 |
| 44c60 | 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).. |
| 44c80 | 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)..... |
| 44ca0 | 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)........ |
| 44cc0 | 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. |
| 44ce0 | 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 |
| 44d00 | 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).. |
| 44d20 | 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 |
| 44d40 | 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 |
| 44d60 | 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)....... |
| 44d80 | 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 |
| 44da0 | 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 |
| 44dc0 | 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.(< |
| 44de0 | 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 |
| 44e00 | 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 |
| 44e20 | 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 |
| 44e40 | 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 |
| 44e60 | 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 |
| 44e80 | 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) |
| 44ea0 | 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))). |
| 44ec0 | 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 |
| 44ee0 | 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)..." |
| 44f00 | 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 |
| 44f20 | 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. |
| 44f40 | 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 |
| 44f60 | 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 |
| 44f80 | 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 |
| 44fa0 | 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).. |
| 44fc0 | 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)... |
| 44fe0 | 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. |
| 45000 | 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 |
| 45020 | 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 |
| 45040 | 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 |
| 45060 | 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 |
| 45080 | 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,. |
| 450a0 | 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 |
| 450c0 | 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 |
| 450e0 | 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 |
| 45100 | 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)............ |
| 45120 | 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)).. |
| 45140 | 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 |
| 45160 | 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- |
| 45180 | 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 |
| 451a0 | 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 |
| 451c0 | 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)..... |
| 451e0 | 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 |
| 45200 | 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 |
| 45220 | 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 |
| 45240 | 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 |
| 45260 | 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 |
| 45280 | 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-- |
| 452a0 | 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 |
| 452c0 | 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 |
| 452e0 | 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 |
| 45300 | 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.... |
| 45320 | 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 |
| 45340 | 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)......... |
| 45360 | 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]+\\)\\_>".... |
| 45380 | 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]+\\)\\_>")).. |
| 453a0 | 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 |
| 453c0 | 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) |
| 453e0 | 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 |
| 45400 | 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 |
| 45420 | 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 |
| 45440 | 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.' |
| 45460 | 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- |
| 45480 | 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 |
| 454a0 | 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 |
| 454c0 | 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 |
| 454e0 | 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 |
| 45500 | 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 |
| 45520 | 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 |
| 45540 | 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. |
| 45560 | 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 |
| 45580 | 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 |
| 455a0 | 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)). |
| 455c0 | 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 |
| 455e0 | 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)). |
| 45600 | 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 |
| 45620 | 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 |
| 45640 | 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). |
| 45660 | 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.( |
| 45680 | 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)))........ |
| 456a0 | 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). |
| 456c0 | 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 |
| 456e0 | 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))) |
| 45700 | 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- |
| 45720 | 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 |
| 45740 | 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))......... |
| 45760 | 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). |
| 45780 | 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 |
| 457a0 | 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)).... |
| 457c0 | 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 |
| 457e0 | 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))....... |
| 45800 | 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.* |
| 45820 | 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...................... |
| 45840 | 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 |
| 45860 | 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).......................... |
| 45880 | 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 |
| 458a0 | 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))]............................ |
| 458c0 | 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.( |
| 458e0 | 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 |
| 45900 | 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))......... |
| 45920 | 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)............. |
| 45940 | 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 |
| 45960 | 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 |
| 45980 | 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)...... |
| 459a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 459c0 | 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))............... |
| 459e0 | 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 |
| 45a00 | 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)].......................... |
| 45a20 | 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].................... |
| 45a40 | 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)...... |
| 45a60 | 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 |
| 45a80 | 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.........................: |
| 45aa0 | 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)... |
| 45ac0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 45ae0 | 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))]............. |
| 45b00 | 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 |
| 45b20 | 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. |
| 45b40 | 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- |
| 45b60 | 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 |
| 45b80 | 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 |
| 45ba0 | 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.................. |
| 45bc0 | 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 |
| 45be0 | 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)........................... |
| 45c00 | 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))..... |
| 45c20 | 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.[( |
| 45c40 | 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)].................. |
| 45c60 | 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].............. |
| 45c80 | 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) |
| 45ca0 | 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 |
| 45cc0 | 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).... |
| 45ce0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 45d00 | 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............... |
| 45d20 | 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 |
| 45d40 | 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 |
| 45d60 | 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)...................... |
| 45d80 | 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 |
| 45da0 | 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)))............ |
| 45dc0 | 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)..............( |
| 45de0 | 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)..... |
| 45e00 | 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 |
| 45e20 | 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- |
| 45e40 | 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 |
| 45e60 | 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 |
| 45e80 | 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)........... |
| 45ea0 | 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 |
| 45ec0 | 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 |
| 45ee0 | 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 |
| 45f00 | 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 |
| 45f20 | 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 |
| 45f40 | 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- |
| 45f60 | 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))...... |
| 45f80 | 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 |
| 45fa0 | 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 |
| 45fc0 | 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 |
| 45fe0 | 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 |
| 46000 | 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 |
| 46020 | 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. |
| 46040 | 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 |
| 46060 | 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 |
| 46080 | 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 |
| 460a0 | 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,.\\ |
| 460c0 | 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 |
| 460e0 | 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 |
| 46100 | 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 |
| 46120 | 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 |
| 46140 | 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 |
| 46160 | 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 |
| 46180 | 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 |
| 461a0 | 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- |
| 461c0 | 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................... |
| 461e0 | 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.... |
| 46200 | 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 |
| 46220 | 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 |
| 46240 | 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)...( |
| 46260 | 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) |
| 46280 | 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 |
| 462a0 | 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)) |
| 462c0 | 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 |
| 462e0 | 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 |
| 46300 | 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-- |
| 46320 | 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................ |
| 46340 | 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 |
| 46360 | 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).......... |
| 46380 | 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)))...... |
| 463a0 | 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 |
| 463c0 | 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 |
| 463e0 | 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...... |
| 46400 | 20 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 |
| 46420 | 0a 20 20 20 20 20 20 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 | ...............................( |
| 46440 | 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))).. |
| 46460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 63 | ........................(push.(c |
| 46480 | 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 |
| 464a0 | 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)..........................( |
| 464c0 | 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)).......... |
| 464e0 | 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)))...... |
| 46500 | 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- |
| 46520 | 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............. |
| 46540 | 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... |
| 46560 | 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.()...... |
| 46580 | 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 |
| 465a0 | 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............. |
| 465c0 | 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 |
| 465e0 | 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......... |
| 46600 | 20 20 20 20 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 |
| 46620 | 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)))).............. |
| 46640 | 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....... |
| 46660 | 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 |
| 46680 | 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."% |
| 466a0 | 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 |
| 466c0 | 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 |
| 466e0 | 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.... |
| 46700 | 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 |
| 46720 | 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))........... |
| 46740 | 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 |
| 46760 | 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 |
| 46780 | 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 |
| 467a0 | 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)..................... |
| 467c0 | 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........................( |
| 467e0 | 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).................... |
| 46800 | 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 |
| 46820 | 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)........................( |
| 46840 | 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 |
| 46860 | 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 |
| 46880 | 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.":."))............... |
| 468a0 | 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 |
| 468c0 | 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 |
| 468e0 | 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 |
| 46900 | 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 |
| 46920 | 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. |
| 46940 | 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 |
| 46960 | 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 |
| 46980 | 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))))... |
| 469a0 | 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)))).. |
| 469c0 | 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.( |
| 469e0 | 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 |
| 46a00 | 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 |
| 46a20 | 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)............ |
| 46a40 | 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)))........ |
| 46a60 | 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 |
| 46a80 | 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..."+ |
| 46aa0 | 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) |
| 46ac0 | 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 |
| 46ae0 | 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 |
| 46b00 | 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 |
| 46b20 | 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 |
| 46b40 | 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 |
| 46b60 | 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 |
| 46b80 | 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 |
| 46ba0 | 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- |
| 46bc0 | 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)............ |
| 46be0 | 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).... |
| 46c00 | 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 |
| 46c20 | 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 |
| 46c40 | 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)) |
| 46c60 | 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 |
| 46c80 | 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 |
| 46ca0 | 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 |
| 46cc0 | 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. |
| 46ce0 | 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 |
| 46d00 | 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 |
| 46d20 | 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 |
| 46d40 | 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 |
| 46d60 | 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 |
| 46d80 | 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 |
| 46da0 | 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 |
| 46dc0 | 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. |
| 46de0 | 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)... |
| 46e00 | 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 |
| 46e20 | 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 |
| 46e40 | 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)). |
| 46e60 | 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...........( |
| 46e80 | 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)).......... |
| 46ea0 | 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)))....... |
| 46ec0 | 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)........ |
| 46ee0 | 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 |
| 46f00 | 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)............ |
| 46f20 | 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. |
| 46f40 | 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 |
| 46f60 | 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 |
| 46f80 | 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))))).. |
| 46fa0 | 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 |
| 46fc0 | 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 |
| 46fe0 | 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). |
| 47000 | 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 |
| 47020 | 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 |
| 47040 | 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)............. |
| 47060 | 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 |
| 47080 | 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 |
| 470a0 | 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 |
| 470c0 | 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.( |
| 470e0 | 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 |
| 47100 | 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)................ |
| 47120 | 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: |
| 47140 | 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]*\\)"...................... |
| 47160 | 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]*\\)")......... |
| 47180 | 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 |
| 471a0 | 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).......... |
| 471c0 | 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)............. |
| 471e0 | 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)........ |
| 47200 | 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 |
| 47220 | 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))...... |
| 47240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 47260 | 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)) |
| 47280 | 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 |
| 472a0 | 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- |
| 472c0 | 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)..................... |
| 472e0 | 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 |
| 47300 | 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]....................... |
| 47320 | 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...... |
| 47340 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 47360 | 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)..... |
| 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 20 20 20 20 | ................................ |
| 473a0 | 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)]].. |
| 473c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 473e0 | 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) |
| 47400 | 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 | ."#")........................... |
| 47420 | 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.......... |
| 47440 | 20 20 20 20 20 20 20 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 | ...............................' |
| 47460 | 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)........................ |
| 47480 | 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)).. |
| 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 28 66 6f 72 67 65 2d 73 | ........................(forge-s |
| 474c0 | 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 |
| 474e0 | 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].............................. |
| 47500 | 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........... |
| 47520 | 20 20 20 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 |
| 47540 | 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)............ |
| 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 3a 75 6e 69 6f 6e | ..........................:union |
| 47580 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 475a0 | 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 |
| 475c0 | 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]............................ |
| 475e0 | 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........... |
| 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 3a 77 68 65 72 | ...........................:wher |
| 47620 | 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)............ |
| 47640 | 20 20 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 |
| 47660 | 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)]]........... |
| 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 28 6f 72 65 66 20 | ..........................(oref. |
| 476a0 | 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 |
| 476c0 | 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 |
| 476e0 | 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)))))). |
| 47700 | 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.( |
| 47720 | 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- |
| 47740 | 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 |
| 47760 | 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 |
| 47780 | 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 |
| 477a0 | 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 |
| 477c0 | 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.. |
| 477e0 | 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 |
| 47800 | 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 |
| 47820 | 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 |
| 47840 | 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)) |
| 47860 | 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 |
| 47880 | 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).. |
| 478a0 | 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 |
| 478c0 | 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")..................... |
| 478e0 | 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- |
| 47900 | 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......................... |
| 47920 | 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 |
| 47940 | 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))).............. |
| 47960 | 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 |
| 47980 | 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 |
| 479a0 | 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 |
| 479c0 | 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 |
| 479e0 | 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 |
| 47a00 | 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:."...... |
| 47a20 | 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 |
| 47a40 | 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.#' |
| 47a60 | 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) |
| 47a80 | 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 |
| 47aa0 | 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 |
| 47ac0 | 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 |
| 47ae0 | 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) |
| 47b00 | 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 |
| 47b20 | 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 |
| 47b40 | 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)).. |
| 47b60 | 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. |
| 47b80 | 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)))......... |
| 47ba0 | 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 |
| 47bc0 | 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......" |
| 47be0 | 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 |
| 47c00 | 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 |
| 47c20 | 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 |
| 47c40 | 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 |
| 47c60 | 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)..... |
| 47c80 | 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.",")))). |
| 47ca0 | 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- |
| 47cc0 | 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. |
| 47ce0 | 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))... |
| 47d00 | 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 |
| 47d20 | 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 |
| 47d40 | 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 |
| 47d60 | 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 |
| 47d80 | 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 |
| 47da0 | 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 |
| 47dc0 | 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 |
| 47de0 | 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 |
| 47e00 | 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 |
| 47e20 | 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 |
| 47e40 | 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......................... |
| 47e60 | 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. |
| 47e80 | 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................... |
| 47ea0 | 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 |
| 47ec0 | 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 |
| 47ee0 | 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 |
| 47f00 | 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 |
| 47f20 | 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.( |
| 47f40 | 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 |
| 47f60 | 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.........................( |
| 47f80 | 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.":.")............. |
| 47fa0 | 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 |
| 47fc0 | 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)))......... |
| 47fe0 | 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 |
| 48000 | 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)....................... |
| 48020 | 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)................. |
| 48040 | 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............... |
| 48060 | 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- |
| 48080 | 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 |
| 480a0 | 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 |
| 480c0 | 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 |
| 480e0 | 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 |
| 48100 | 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) |
| 48120 | 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 |
| 48140 | 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 |
| 48160 | 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 |
| 48180 | 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 |
| 481a0 | 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........... |
| 481c0 | 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 |
| 481e0 | 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 |
| 48200 | 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 |
| 48220 | 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 |
| 48240 | 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 |
| 48260 | 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 |
| 48280 | 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)....... |
| 482a0 | 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 |
| 482c0 | 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 |
| 482e0 | 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)... |
| 48300 | 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 |
| 48320 | 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.............. |
| 48340 | 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)................." |
| 48360 | 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 |
| 48380 | 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.... |
| 483a0 | 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).... |
| 483c0 | 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 |
| 483e0 | 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.".' |
| 48400 | 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 |
| 48420 | 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 |
| 48440 | 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)) |
| 48460 | 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................. |
| 48480 | 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."* |
| 484a0 | 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 |
| 484c0 | 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 |
| 484e0 | 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 |
| 48500 | 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 |
| 48520 | 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 |
| 48540 | 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 |
| 48560 | 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 |
| 48580 | 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......`(, |
| 485a0 | 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 |
| 485c0 | 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))........,@ |
| 485e0 | 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 |
| 48600 | 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))........,( |
| 48620 | 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.... |
| 48640 | 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 |
| 48660 | 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 |
| 48680 | 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- |
| 486a0 | 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 |
| 486c0 | 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 |
| 486e0 | 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- |
| 48700 | 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 |
| 48720 | 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 |
| 48740 | 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 |
| 48760 | 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 |
| 48780 | 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.":". |
| 487a0 | 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. |
| 487c0 | 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 |
| 487e0 | 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 |
| 48800 | 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............... |
| 48820 | 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 |
| 48840 | 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). |
| 48860 | 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 |
| 48880 | 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)........ |
| 488a0 | 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........... |
| 488c0 | 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 |
| 488e0 | 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 |
| 48900 | 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).... |
| 48920 | 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)......... |
| 48940 | 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))))). |
| 48960 | 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 |
| 48980 | 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 |
| 489a0 | 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 |
| 489c0 | 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 |
| 489e0 | 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)) |
| 48a00 | 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 |
| 48a20 | 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 |
| 48a40 | 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- |
| 48a60 | 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 |
| 48a80 | 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... |
| 48aa0 | 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 |
| 48ac0 | 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 |
| 48ae0 | 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 |
| 48b00 | 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 |
| 48b20 | 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- |
| 48b40 | 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 |
| 48b60 | 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 |
| 48b80 | 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- |
| 48ba0 | 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- |
| 48bc0 | 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. |
| 48be0 | 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 |
| 48c00 | 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.. |
| 48c20 | 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 |
| 48c40 | 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. |
| 48c60 | 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). |
| 48c80 | 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 |
| 48ca0 | 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)... |
| 48cc0 | 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 |
| 48ce0 | 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)))) |
| 48d00 | 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- |
| 48d20 | 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.( |
| 48d40 | 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 |
| 48d60 | 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 |
| 48d80 | 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 |
| 48da0 | 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 |
| 48dc0 | 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 |
| 48de0 | 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.( |
| 48e00 | 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 |
| 48e20 | 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)]... |
| 48e40 | 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))).... |
| 48e60 | 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. |
| 48e80 | 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....... |
| 48ea0 | 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. |
| 48ec0 | 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 |
| 48ee0 | 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 |
| 48f00 | 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).. |
| 48f20 | 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 |
| 48f40 | 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 |
| 48f60 | 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. |
| 48f80 | 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))................. |
| 48fa0 | 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 |
| 48fc0 | 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)).............. |
| 48fe0 | 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 |
| 49000 | 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)))..... |
| 49020 | 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 |
| 49040 | 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. |
| 49060 | 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..... |
| 49080 | 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 |
| 490a0 | 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................ |
| 490c0 | 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 |
| 490e0 | 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 |
| 49100 | 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 |
| 49120 | 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 |
| 49140 | 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., |
| 49160 | 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))........... |
| 49180 | 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 |
| 491a0 | 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))............. |
| 491c0 | 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 |
| 491e0 | 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)))......... |
| 49200 | 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... |
| 49220 | 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 |
| 49240 | 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.................... |
| 49260 | 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)))). |
| 49280 | 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))).. |
| 492a0 | 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 |
| 492c0 | 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 |
| 492e0 | 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))).....( |
| 49300 | 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 |
| 49320 | 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)).......... |
| 49340 | 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. |
| 49360 | 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 |
| 49380 | 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))). |
| 493a0 | 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 |
| 493c0 | 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 |
| 493e0 | 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 |
| 49400 | 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... |
| 49420 | 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 |
| 49440 | 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 |
| 49460 | 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)...... |
| 49480 | 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 |
| 494a0 | 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 |
| 494c0 | 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). |
| 494e0 | 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 |
| 49500 | 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 |
| 49520 | 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 |
| 49540 | 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 |
| 49560 | 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)..... |
| 49580 | 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- |
| 495a0 | 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 |
| 495c0 | 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 |
| 495e0 | 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- |
| 49600 | 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 |
| 49620 | 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 |
| 49640 | 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. |
| 49660 | 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...... |
| 49680 | 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- |
| 496a0 | 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- |
| 496c0 | 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 |
| 496e0 | 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) |
| 49700 | 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 |
| 49720 | 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*.( |
| 49740 | 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.' |
| 49760 | 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 |
| 49780 | 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.",. |
| 497a0 | 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 |
| 497c0 | 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- |
| 497e0 | 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-- |
| 49800 | 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))).. |
| 49820 | 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 |
| 49840 | 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 |
| 49860 | 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 |
| 49880 | 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 |
| 498a0 | 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.(@% |
| 498c0 | 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 |
| 498e0 | 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 |
| 49900 | 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 |
| 49920 | 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- |
| 49940 | 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 |
| 49960 | 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 |
| 49980 | 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 |
| 499a0 | 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 |
| 499c0 | 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.....( |
| 499e0 | 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. |
| 49a00 | 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)) |
| 49a20 | 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.( |
| 49a40 | 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 |
| 49a60 | 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 |
| 49a80 | 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 |
| 49aa0 | 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.".")................. |
| 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 27 6d 61 67 69 74 | ..........................'magit |
| 49ae0 | 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)............... |
| 49b00 | 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 |
| 49b20 | 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))..... |
| 49b40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 49b60 | 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 |
| 49b80 | 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 |
| 49ba0 | 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 |
| 49bc0 | 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 |
| 49be0 | 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 |
| 49c00 | 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)) |
| 49c20 | 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)......... |
| 49c40 | 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 |
| 49c60 | 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 |
| 49c80 | 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)...( |
| 49ca0 | 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 |
| 49cc0 | 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). |
| 49ce0 | 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 |
| 49d00 | 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))).....( |
| 49d20 | 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. |
| 49d40 | 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 |
| 49d60 | 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")... |
| 49d80 | 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 |
| 49da0 | 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)...... |
| 49dc0 | 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- |
| 49de0 | 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. |
| 49e00 | 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 |
| 49e20 | 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). |
| 49e40 | 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. |
| 49e60 | 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 |
| 49e80 | 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 |
| 49ea0 | 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 |
| 49ec0 | 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. |
| 49ee0 | 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*. |
| 49f00 | 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 |
| 49f20 | 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 |
| 49f40 | 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 |
| 49f60 | 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 |
| 49f80 | 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 |
| 49fa0 | 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 |
| 49fc0 | 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 |
| 49fe0 | 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. |
| 4a000 | 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)). |
| 4a020 | 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)......... |
| 4a040 | 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 |
| 4a060 | 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))))... |
| 4a080 | 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 |
| 4a0a0 | 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 |
| 4a0c0 | 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 |
| 4a0e0 | 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....... |
| 4a100 | 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 |
| 4a120 | 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.................. |
| 4a140 | 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 |
| 4a160 | 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)............................ |
| 4a180 | 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))............. |
| 4a1a0 | 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............... |
| 4a1c0 | 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 |
| 4a1e0 | 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 |
| 4a200 | 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 |
| 4a220 | 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.( |
| 4a240 | 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))).... |
| 4a260 | 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.(` |
| 4a280 | 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 |
| 4a2a0 | 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." |
| 4a2c0 | 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)).........( |
| 4a2e0 | 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 |
| 4a300 | 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 |
| 4a320 | 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 |
| 4a340 | 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).......... |
| 4a360 | 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)... |
| 4a380 | 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 |
| 4a3a0 | 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 |
| 4a3c0 | 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 |
| 4a3e0 | 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 |
| 4a400 | 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 |
| 4a420 | 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- |
| 4a440 | 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 |
| 4a460 | 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)........( |
| 4a480 | 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 |
| 4a4a0 | 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 |
| 4a4c0 | 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 |
| 4a4e0 | 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 |
| 4a500 | 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. |
| 4a520 | 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).............. |
| 4a540 | 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))...... |
| 4a560 | 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 |
| 4a580 | 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- |
| 4a5a0 | 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 |
| 4a5c0 | 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- |
| 4a5e0 | 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- |
| 4a600 | 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. |
| 4a620 | 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>. |
| 4a640 | 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 |
| 4a660 | 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- |
| 4a680 | 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 |
| 4a6a0 | 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- |
| 4a6c0 | 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- |
| 4a6e0 | 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".......... |
| 4a700 | 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. |
| 4a720 | 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"..................... |
| 4a740 | 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 |
| 4a760 | 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 |
| 4a780 | 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 |
| 4a7a0 | 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'.. |
| 4a7c0 | 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 |
| 4a7e0 | 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 |
| 4a800 | 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 |
| 4a820 | 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 |
| 4a840 | 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.. |
| 4a860 | 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 |
| 4a880 | 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 |
| 4a8a0 | 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 |
| 4a8c0 | 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"..." |
| 4a8e0 | 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 |
| 4a900 | 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 |
| 4a920 | 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 |
| 4a940 | 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 |
| 4a960 | 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 |
| 4a980 | 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 |
| 4a9a0 | 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 |
| 4a9c0 | 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- |
| 4a9e0 | 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 |
| 4aa00 | 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 |
| 4aa20 | 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 |
| 4aa40 | 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 |
| 4aa60 | 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 |
| 4aa80 | 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. |
| 4aaa0 | 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 |
| 4aac0 | 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 |
| 4aae0 | 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 |
| 4ab00 | 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 |
| 4ab20 | 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 |
| 4ab40 | 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- |
| 4ab60 | 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 |
| 4ab80 | 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 |
| 4aba0 | 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 |
| 4abc0 | 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 |
| 4abe0 | 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.. |
| 4ac00 | 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. |
| 4ac20 | 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... |
| 4ac40 | 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 |
| 4ac60 | 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..... |
| 4ac80 | 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 |
| 4aca0 | 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 |
| 4acc0 | 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- |
| 4ace0 | 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 |
| 4ad00 | 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) |
| 4ad20 | 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 |
| 4ad40 | 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 |
| 4ad60 | 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 |
| 4ad80 | 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 |
| 4ada0 | 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))...... |
| 4adc0 | 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 |
| 4ade0 | 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 |
| 4ae00 | 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 |
| 4ae20 | 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).... |
| 4ae40 | 20 20 20 20 20 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 |
| 4ae60 | 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.................. |
| 4ae80 | 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 |
| 4aea0 | 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)...................... |
| 4aec0 | 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)) |
| 4aee0 | 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 |
| 4af00 | 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 |
| 4af20 | 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 |
| 4af40 | 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 |
| 4af60 | 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 |
| 4af80 | 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 |
| 4afa0 | 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.( |
| 4afc0 | 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. |
| 4afe0 | 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. |
| 4b000 | 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 |
| 4b020 | 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 |
| 4b040 | 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))... |
| 4b060 | 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 |
| 4b080 | 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.. |
| 4b0a0 | 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 |
| 4b0c0 | 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"........................( |
| 4b0e0 | 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 |
| 4b100 | 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 |
| 4b120 | 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 |
| 4b140 | 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)... |
| 4b160 | 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 |
| 4b180 | 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 |
| 4b1a0 | 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))).... |
| 4b1c0 | 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. |
| 4b1e0 | 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 |
| 4b200 | 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 |
| 4b220 | 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")...........( |
| 4b240 | 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. |
| 4b260 | 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 |
| 4b280 | 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 |
| 4b2a0 | 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 |
| 4b2c0 | 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 |
| 4b2e0 | 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 |
| 4b300 | 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 |
| 4b320 | 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........ |
| 4b340 | 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 |
| 4b360 | 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. |
| 4b380 | 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 |
| 4b3a0 | 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 |
| 4b3c0 | 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......... |
| 4b3e0 | 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 |
| 4b400 | 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 |
| 4b420 | 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).......................... |
| 4b440 | 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 |
| 4b460 | 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)")).................. |
| 4b480 | 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 |
| 4b4a0 | 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)).... |
| 4b4c0 | 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 |
| 4b4e0 | 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 |
| 4b500 | 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))................ |
| 4b520 | 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 |
| 4b540 | 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"........... |
| 4b560 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 4b580 | 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............... |
| 4b5a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 4b5c0 | 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.................. |
| 4b5e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 4b600 | 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))))...... |
| 4b620 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 4b640 | 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- |
| 4b660 | 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 |
| 4b680 | 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........ |
| 4b6a0 | 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)...... |
| 4b6c0 | 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 |
| 4b6e0 | 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)..... |
| 4b700 | 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. |
| 4b720 | 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 |
| 4b740 | 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 |
| 4b760 | 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 |
| 4b780 | 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 |
| 4b7a0 | 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 |
| 4b7c0 | 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- |
| 4b7e0 | 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))....... |
| 4b800 | 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 |
| 4b820 | 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 |
| 4b840 | 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 |
| 4b860 | 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 |
| 4b880 | 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 |
| 4b8a0 | 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- |
| 4b8c0 | 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 |
| 4b8e0 | 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?) |
| 4b900 | 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))...( |
| 4b920 | 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 |
| 4b940 | 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)))....... |
| 4b960 | 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 |
| 4b980 | 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)))..... |
| 4b9a0 | 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- |
| 4b9c0 | 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 |
| 4b9e0 | 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 |
| 4ba00 | 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)). |
| 4ba20 | 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.( |
| 4ba40 | 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 |
| 4ba60 | 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 |
| 4ba80 | 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 |
| 4baa0 | 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.... |
| 4bac0 | 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............... |
| 4bae0 | 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) |
| 4bb00 | 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 |
| 4bb20 | 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- |
| 4bb40 | 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. |
| 4bb60 | 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 |
| 4bb80 | 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).............. |
| 4bba0 | 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 |
| 4bbc0 | 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))))). |
| 4bbe0 | 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)))....... |
| 4bc00 | 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). |
| 4bc20 | 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., |
| 4bc40 | 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>" |
| 4bc60 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 4bc80 | 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))). |
| 4bca0 | 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 |
| 4bcc0 | 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 |
| 4bce0 | 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) |
| 4bd00 | 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 |
| 4bd20 | 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.# |
| 4bd40 | 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 |
| 4bd60 | 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... |
| 4bd80 | 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 |
| 4bda0 | 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 |
| 4bdc0 | 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 |
| 4bde0 | 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 |
| 4be00 | 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 |
| 4be20 | 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 |
| 4be40 | 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...: |
| 4be60 | 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 |
| 4be80 | 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 |
| 4bea0 | 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- |
| 4bec0 | 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 |
| 4bee0 | 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 |
| 4bf00 | 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. |
| 4bf20 | 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- |
| 4bf40 | 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 |
| 4bf60 | 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 |
| 4bf80 | 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 |
| 4bfa0 | 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 |
| 4bfc0 | 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 |
| 4bfe0 | 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 |
| 4c000 | 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 |
| 4c020 | 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 |
| 4c040 | 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 |
| 4c060 | 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 |
| 4c080 | 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 |
| 4c0a0 | 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 |
| 4c0c0 | 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 |
| 4c0e0 | 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 |
| 4c100 | 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 |
| 4c120 | 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 |
| 4c140 | 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 |
| 4c160 | 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 |
| 4c180 | 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 |
| 4c1a0 | 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 |
| 4c1c0 | 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 |
| 4c1e0 | 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 |
| 4c200 | 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)]) |
| 4c220 | 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 |
| 4c240 | 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 |
| 4c260 | 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 |
| 4c280 | 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 |
| 4c2a0 | 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 |
| 4c2c0 | 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).. |
| 4c2e0 | 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- |
| 4c300 | 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- |
| 4c320 | 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 |
| 4c340 | 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. |
| 4c360 | 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 |
| 4c380 | 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 |
| 4c3a0 | 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 |
| 4c3c0 | 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- |
| 4c3e0 | 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) |
| 4c400 | 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 |
| 4c420 | 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. |
| 4c440 | 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 |
| 4c460 | 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 |
| 4c480 | 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 |
| 4c4a0 | 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...: |
| 4c4c0 | 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 |
| 4c4e0 | 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 |
| 4c500 | 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 |
| 4c520 | 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 |
| 4c540 | 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". |
| 4c560 | 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). |
| 4c580 | 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 |
| 4c5a0 | 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) |
| 4c5c0 | 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 |
| 4c5e0 | 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 |
| 4c600 | 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 |
| 4c620 | 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 |
| 4c640 | 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 |
| 4c660 | 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 |
| 4c680 | 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]...( |
| 4c6a0 | 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- |
| 4c6c0 | 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 |
| 4c6e0 | 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 |
| 4c700 | 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 |
| 4c720 | 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 |
| 4c740 | 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 |
| 4c760 | 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)).. |
| 4c780 | 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- |
| 4c7a0 | 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 |
| 4c7c0 | 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 |
| 4c7e0 | 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. |
| 4c800 | 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."...[ |
| 4c820 | 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) |
| 4c840 | 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 |
| 4c860 | 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 |
| 4c880 | 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 |
| 4c8a0 | 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)....(" |
| 4c8c0 | 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 |
| 4c8e0 | 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 |
| 4c900 | 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 |
| 4c920 | 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 |
| 4c940 | 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. |
| 4c960 | 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. |
| 4c980 | 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 |
| 4c9a0 | 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 |
| 4c9c0 | 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 |
| 4c9e0 | 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)])..; |
| 4ca00 | 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 |
| 4ca20 | 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 |
| 4ca40 | 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 |
| 4ca60 | 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).. |
| 4ca80 | 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 |
| 4caa0 | 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 |
| 4cac0 | 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 |
| 4cae0 | 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 |
| 4cb00 | 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 |
| 4cb20 | 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)))... |
| 4cb40 | 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 |
| 4cb60 | 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. |
| 4cb80 | 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).......................... |
| 4cba0 | 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)) |
| 4cbc0 | 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 |
| 4cbe0 | 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)................. |
| 4cc00 | 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)))) |
| 4cc20 | 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 |
| 4cc40 | 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 |
| 4cc60 | 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)................ |
| 4cc80 | 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). |
| 4cca0 | 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)....... |
| 4ccc0 | 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. |
| 4cce0 | 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))).............. |
| 4cd00 | 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 |
| 4cd20 | 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,.................. |
| 4cd40 | 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. |
| 4cd60 | 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................. |
| 4cd80 | 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 |
| 4cda0 | 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))....... |
| 4cdc0 | 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 |
| 4cde0 | 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 |
| 4ce00 | 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. |
| 4ce20 | 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 |
| 4ce40 | 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.( |
| 4ce60 | 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)). |
| 4ce80 | 20 20 20 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- |
| 4cea0 | 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))). |
| 4cec0 | 20 20 20 20 20 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 |
| 4cee0 | 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))).... |
| 4cf00 | 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 |
| 4cf20 | 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 |
| 4cf40 | 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 |
| 4cf60 | 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- |
| 4cf80 | 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 |
| 4cfa0 | 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 |
| 4cfc0 | 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 |
| 4cfe0 | 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 |
| 4d000 | 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 |
| 4d020 | 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 |
| 4d040 | 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 |
| 4d060 | 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. |
| 4d080 | 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 |
| 4d0a0 | 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 |
| 4d0c0 | 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- |
| 4d0e0 | 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 |
| 4d100 | 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 |
| 4d120 | 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. |
| 4d140 | 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' |
| 4d160 | 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 |
| 4d180 | 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. |
| 4d1a0 | 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) |
| 4d1c0 | 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 |
| 4d1e0 | 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.()..." |
| 4d200 | 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 |
| 4d220 | 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."...: |
| 4d240 | 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 |
| 4d260 | 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 |
| 4d280 | 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 |
| 4d2a0 | 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. |
| 4d2c0 | 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 |
| 4d2e0 | 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 |
| 4d300 | 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 |
| 4d320 | 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 |
| 4d340 | 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. |
| 4d360 | 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. |
| 4d380 | 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 |
| 4d3a0 | 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 |
| 4d3c0 | 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 |
| 4d3e0 | 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) |
| 4d400 | 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)... |
| 4d420 | 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 |
| 4d440 | 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 |
| 4d460 | 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. |
| 4d480 | 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 |
| 4d4a0 | 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 |
| 4d4c0 | 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)))... |
| 4d4e0 | 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 |
| 4d500 | 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)...................... |
| 4d520 | 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)).. |
| 4d540 | 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- |
| 4d560 | 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)) |
| 4d580 | 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 |
| 4d5a0 | 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.....: |
| 4d5c0 | 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).......... |
| 4d5e0 | 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 |
| 4d600 | 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 |
| 4d620 | 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.().................( |
| 4d640 | 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)). |
| 4d660 | 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 |
| 4d680 | 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))).... |
| 4d6a0 | 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. |
| 4d6c0 | 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)................... |
| 4d6e0 | 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 |
| 4d700 | 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))............. |
| 4d720 | 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. |
| 4d740 | 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.()........ |
| 4d760 | 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 |
| 4d780 | 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 |
| 4d7a0 | 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 |
| 4d7c0 | 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 |
| 4d7e0 | 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 |
| 4d800 | 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 |
| 4d820 | 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 |
| 4d840 | 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 |
| 4d860 | 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 |
| 4d880 | 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 |
| 4d8a0 | 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- |
| 4d8c0 | 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 |
| 4d8e0 | 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 |
| 4d900 | 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 |
| 4d920 | 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 |
| 4d940 | 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 |
| 4d960 | 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 |
| 4d980 | 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 |
| 4d9a0 | 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 |
| 4d9c0 | 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 |
| 4d9e0 | 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). |
| 4da00 | 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 |
| 4da20 | 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 |
| 4da40 | 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).. |
| 4da60 | 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 |
| 4da80 | 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 |
| 4daa0 | 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.( |
| 4dac0 | 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 |
| 4dae0 | 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 |
| 4db00 | 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 |
| 4db20 | 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)..................... |
| 4db40 | 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 |
| 4db60 | 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 |
| 4db80 | 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)))... |
| 4dba0 | 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.( |
| 4dbc0 | 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) |
| 4dbe0 | 0a 20 20 20 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 |
| 4dc00 | 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)........ |
| 4dc20 | 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) |
| 4dc40 | 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 |
| 4dc60 | 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)................. |
| 4dc80 | 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). |
| 4dca0 | 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*.( |
| 4dcc0 | 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......... |
| 4dce0 | 20 20 20 20 20 20 20 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 | ...............................( |
| 4dd00 | 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)........... |
| 4dd20 | 20 20 20 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 |
| 4dd40 | 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))))............. |
| 4dd60 | 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.. |
| 4dd80 | 20 20 20 20 20 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 |
| 4dda0 | 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 |
| 4ddc0 | 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)........................... |
| 4dde0 | 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 |
| 4de00 | 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)))............... |
| 4de20 | 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))))))).. |
| 4de40 | 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 |
| 4de60 | 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 |
| 4de80 | 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 |
| 4dea0 | 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.....( |
| 4dec0 | 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. |
| 4dee0 | 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)))... |
| 4df00 | 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 |
| 4df20 | 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))) |
| 4df40 | 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 |
| 4df60 | 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 |
| 4df80 | 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 |
| 4dfa0 | 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 |
| 4dfc0 | 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 |
| 4dfe0 | 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 |
| 4e000 | 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 |
| 4e020 | 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 |
| 4e040 | 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 |
| 4e060 | 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 |
| 4e080 | 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 |
| 4e0a0 | 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)......................... |
| 4e0c0 | 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) |
| 4e0e0 | 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 |
| 4e100 | 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 |
| 4e120 | 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 |
| 4e140 | 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 |
| 4e160 | 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 |
| 4e180 | 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 |
| 4e1a0 | 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 |
| 4e1c0 | 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. |
| 4e1e0 | 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. |
| 4e200 | 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.: |
| 4e220 | 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 |
| 4e240 | 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 |
| 4e260 | 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 |
| 4e280 | 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-- |
| 4e2a0 | 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 |
| 4e2c0 | 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 |
| 4e2e0 | 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 |
| 4e300 | 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 |
| 4e320 | 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 |
| 4e340 | 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. |
| 4e360 | 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 |
| 4e380 | 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 |
| 4e3a0 | 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. |
| 4e3c0 | 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 |
| 4e3e0 | 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 |
| 4e400 | 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. |
| 4e420 | 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 |
| 4e440 | 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 |
| 4e460 | 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- |
| 4e480 | 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 |
| 4e4a0 | 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. |
| 4e4c0 | 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- |
| 4e4e0 | 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.. |
| 4e500 | 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 |
| 4e520 | 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)))..... |
| 4e540 | 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]".' |
| 4e560 | 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)...... |
| 4e580 | 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".' |
| 4e5a0 | 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............................ |
| 4e5c0 | 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)..... |
| 4e5e0 | 20 20 20 20 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 |
| 4e600 | 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.................... |
| 4e620 | 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 |
| 4e640 | 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 |
| 4e660 | 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 |
| 4e680 | 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 |
| 4e6a0 | 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 |
| 4e6c0 | 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 |
| 4e6e0 | 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 |
| 4e700 | 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.(). |
| 4e720 | 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. |
| 4e740 | 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 |
| 4e760 | 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 |
| 4e780 | 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. |
| 4e7a0 | 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))). |
| 4e7c0 | 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 |
| 4e7e0 | 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).. |
| 4e800 | 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 |
| 4e820 | 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........................ |
| 4e840 | 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)... |
| 4e860 | 20 20 20 20 20 20 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 |
| 4e880 | 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.................. |
| 4e8a0 | 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 |
| 4e8c0 | 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 |
| 4e8e0 | 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 |
| 4e900 | 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 |
| 4e920 | 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 |
| 4e940 | 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 |
| 4e960 | 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 |
| 4e980 | 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).. |
| 4e9a0 | 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 |
| 4e9c0 | 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 |
| 4e9e0 | 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 |
| 4ea00 | 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 |
| 4ea20 | 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 |
| 4ea40 | 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 |
| 4ea60 | 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))..... |
| 4ea80 | 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 |
| 4eaa0 | 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 |
| 4eac0 | 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 |
| 4eae0 | 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 |
| 4eb00 | 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. |
| 4eb20 | 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 |
| 4eb40 | 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" |
| 4eb60 | 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- |
| 4eb80 | 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 |
| 4eba0 | 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 |
| 4ebc0 | 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 |
| 4ebe0 | 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\").. |
| 4ec00 | 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." |
| 4ec20 | 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 |
| 4ec40 | 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 |
| 4ec60 | 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).... |
| 4ec80 | 20 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 |
| 4eca0 | 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)............... |
| 4ecc0 | 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). |
| 4ece0 | 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 |
| 4ed00 | 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 |
| 4ed20 | 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 |
| 4ed40 | 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 |
| 4ed60 | 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)... |
| 4ed80 | 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 |
| 4eda0 | 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 |
| 4edc0 | 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. |
| 4ede0 | 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 |
| 4ee00 | 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)). |
| 4ee20 | 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. |
| 4ee40 | 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).. |
| 4ee60 | 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 |
| 4ee80 | 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)).....( |
| 4eea0 | 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 |
| 4eec0 | 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 |
| 4eee0 | 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 |
| 4ef00 | 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 |
| 4ef20 | 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- |
| 4ef40 | 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 |
| 4ef60 | 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 |
| 4ef80 | 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 |
| 4efa0 | 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 |
| 4efc0 | 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 |
| 4efe0 | 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 |
| 4f000 | 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:/ |
| 4f020 | 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 |
| 4f040 | 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 |
| 4f060 | 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))."/")...... |
| 4f080 | 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 |
| 4f0a0 | 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 |
| 4f0c0 | 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 |
| 4f0e0 | 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...... |
| 4f100 | 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)).......( |
| 4f120 | 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 |
| 4f140 | 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))))........ |
| 4f160 | 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 |
| 4f180 | 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)......... |
| 4f1a0 | 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 |
| 4f1c0 | 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))))..... |
| 4f1e0 | 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 |
| 4f200 | 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 |
| 4f220 | 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 |
| 4f240 | 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. |
| 4f260 | 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 |
| 4f280 | 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 |
| 4f2a0 | 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)............ |
| 4f2c0 | 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.( |
| 4f2e0 | 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)))). |
| 4f300 | 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 |
| 4f320 | 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. |
| 4f340 | 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 |
| 4f360 | 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 |
| 4f380 | 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). |
| 4f3a0 | 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 |
| 4f3c0 | 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 |
| 4f3e0 | 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)..... |
| 4f400 | 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: |
| 4f420 | 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. |
| 4f440 | 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 |
| 4f460 | 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 |
| 4f480 | 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 |
| 4f4a0 | 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 |
| 4f4c0 | 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 |
| 4f4e0 | 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)...... |
| 4f500 | 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) |
| 4f520 | 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 |
| 4f540 | 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 |
| 4f560 | 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 |
| 4f580 | 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 |
| 4f5a0 | 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................. |
| 4f5c0 | 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....... |
| 4f5e0 | 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 |
| 4f600 | 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................ |
| 4f620 | 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 |
| 4f640 | 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................ |
| 4f660 | 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))...... |
| 4f680 | 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 |
| 4f6a0 | 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).......... |
| 4f6c0 | 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 |
| 4f6e0 | 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."[% |
| 4f700 | 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))).......... |
| 4f720 | 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 |
| 4f740 | 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 |
| 4f760 | 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))) |
| 4f780 | 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 |
| 4f7a0 | 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))............. |
| 4f7c0 | 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 |
| 4f7e0 | 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))))......... |
| 4f800 | 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 |
| 4f820 | 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)) |
| 4f840 | 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. |
| 4f860 | 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. |
| 4f880 | 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.( |
| 4f8a0 | 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)......... |
| 4f8c0 | 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............ |
| 4f8e0 | 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 |
| 4f900 | 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))).... |
| 4f920 | 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)).........( |
| 4f940 | 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).... |
| 4f960 | 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-- |
| 4f980 | 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))) |
| 4f9a0 | 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 |
| 4f9c0 | 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 |
| 4f9e0 | 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."\\ |
| 4fa00 | 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 |
| 4fa20 | 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 |
| 4fa40 | 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 |
| 4fa60 | 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). |
| 4fa80 | 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 |
| 4faa0 | 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 |
| 4fac0 | 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))..... |
| 4fae0 | 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))) |
| 4fb00 | 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 |
| 4fb20 | 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. |
| 4fb40 | 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- |
| 4fb60 | 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. |
| 4fb80 | 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)................. |
| 4fba0 | 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 |
| 4fbc0 | 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).".--."...... |
| 4fbe0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 4fc00 | 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)) |
| 4fc20 | 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)). |
| 4fc40 | 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 |
| 4fc60 | 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- |
| 4fc80 | 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 |
| 4fca0 | 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.......... |
| 4fcc0 | 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 |
| 4fce0 | 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.......... |
| 4fd00 | 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 |
| 4fd20 | 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)............................. |
| 4fd40 | 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))............... |
| 4fd60 | 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.' |
| 4fd80 | 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........................... |
| 4fda0 | 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)))..( |
| 4fdc0 | 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 |
| 4fde0 | 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 |
| 4fe00 | 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. |
| 4fe20 | 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.") |
| 4fe40 | 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 |
| 4fe60 | 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. |
| 4fe80 | 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 |
| 4fea0 | 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 |
| 4fec0 | 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 |
| 4fee0 | 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 |
| 4ff00 | 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 |
| 4ff20 | 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 |
| 4ff40 | 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 |
| 4ff60 | 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 |
| 4ff80 | 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. |
| 4ffa0 | 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 |
| 4ffc0 | 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)... |
| 4ffe0 | 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... |
| 50000 | 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. |
| 50020 | 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." |
| 50040 | 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 |
| 50060 | 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 |
| 50080 | 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").....................( |
| 500a0 | 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). |
| 500c0 | 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-- |
| 500e0 | 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)))))....... |
| 50100 | 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 |
| 50120 | 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 |
| 50140 | 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 |
| 50160 | 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)................. |
| 50180 | 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 |
| 501a0 | 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 |
| 501c0 | 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 |
| 501e0 | 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 |
| 50200 | 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 |
| 50220 | 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.................. |
| 50240 | 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).. |
| 50260 | 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 |
| 50280 | 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"............. |
| 502a0 | 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") |
| 502c0 | 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 |
| 502e0 | 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)....... |
| 50300 | 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)))...........( |
| 50320 | 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 |
| 50340 | 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 |
| 50360 | 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 |
| 50380 | 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).. |
| 503a0 | 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 |
| 503c0 | 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 |
| 503e0 | 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 |
| 50400 | 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 |
| 50420 | 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 |
| 50440 | 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))).......... |
| 50460 | 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 |
| 50480 | 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))))...... |
| 504a0 | 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....... |
| 504c0 | 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- |
| 504e0 | 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 |
| 50500 | 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. |
| 50520 | 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)............ |
| 50540 | 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- |
| 50560 | 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 |
| 50580 | 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.( |
| 505a0 | 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).... |
| 505c0 | 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 |
| 505e0 | 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. |
| 50600 | 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.......................... |
| 50620 | 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)))......... |
| 50640 | 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 |
| 50660 | 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 |
| 50680 | 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 |
| 506a0 | 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 |
| 506c0 | 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".......................( |
| 506e0 | 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- |
| 50700 | 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..................... |
| 50720 | 20 20 20 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 |
| 50740 | 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)........... |
| 50760 | 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 |
| 50780 | 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)..................... |
| 507a0 | 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 |
| 507c0 | 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))))...................... |
| 507e0 | 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............. |
| 50800 | 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 |
| 50820 | 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 |
| 50840 | 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).......... |
| 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 20 20 20 20 | ................................ |
| 50880 | 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 |
| 508a0 | 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 |
| 508c0 | 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 |
| 508e0 | 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 |
| 50900 | 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 |
| 50920 | 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................. |
| 50940 | 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 |
| 50960 | 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......................... |
| 50980 | 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- |
| 509a0 | 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)..................... |
| 509c0 | 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 |
| 509e0 | 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................... |
| 50a00 | 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 |
| 50a20 | 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)).......... |
| 50a40 | 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 |
| 50a60 | 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))))))))) |
| 50a80 | 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 |
| 50aa0 | 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' |
| 50ac0 | 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 |
| 50ae0 | 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 |
| 50b00 | 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.` |
| 50b20 | 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 |
| 50b40 | 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 |
| 50b60 | 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 |
| 50b80 | 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 |
| 50ba0 | 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 |
| 50bc0 | 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))...............;; |
| 50be0 | 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 |
| 50c00 | 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- |
| 50c20 | 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))... |
| 50c40 | 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 |
| 50c60 | 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 |
| 50c80 | 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? |
| 50ca0 | 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- |
| 50cc0 | 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 |
| 50ce0 | 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 |
| 50d00 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 50d20 | 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)... |
| 50d40 | 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......... |
| 50d60 | 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- |
| 50d80 | 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.(( |
| 50da0 | 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 |
| 50dc0 | 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 |
| 50de0 | 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.()..................... |
| 50e00 | 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 |
| 50e20 | 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:................ |
| 50e40 | 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 |
| 50e60 | 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)........... |
| 50e80 | 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.. |
| 50ea0 | 20 20 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 |
| 50ec0 | 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)...................... |
| 50ee0 | 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)....... |
| 50f00 | 20 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 |
| 50f20 | 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......... |
| 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 28 63 6f | .............................(co |
| 50f60 | 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 |
| 50f80 | 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))............................. |
| 50fa0 | 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)))))))))... |
| 50fc0 | 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 |
| 50fe0 | 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.................... |
| 51000 | 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 |
| 51020 | 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)............ |
| 51040 | 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.()....... |
| 51060 | 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 |
| 51080 | 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....................... |
| 510a0 | 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. |
| 510c0 | 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)."#")........... |
| 510e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 51100 | 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.......... |
| 51120 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 51140 | 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)........ |
| 51160 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 51180 | 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)))) |
| 511a0 | 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 |
| 511c0 | 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. |
| 511e0 | 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 |
| 51200 | 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 |
| 51220 | 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 |
| 51240 | 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 |
| 51260 | 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)........................ |
| 51280 | 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]+\\) |
| 512a0 | 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 | "........................."#\\(? |
| 512c0 | 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 |
| 512e0 | 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)......... |
| 51300 | 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). |
| 51320 | 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) |
| 51340 | 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- |
| 51360 | 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.............. |
| 51380 | 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 |
| 513a0 | 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 |
| 513c0 | 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- |
| 513e0 | 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 |
| 51400 | 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 |
| 51420 | 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 |
| 51440 | 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 |
| 51460 | 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............................... |
| 51480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 514a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 514c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 514e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 515a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 515c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 515e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51600 | 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.... |
| 51620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51660 | 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 |
| 51680 | 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... |
| 516a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 516c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 516e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51700 | 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................... |
| 51720 | 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................... |
| 51740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 517a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 517c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 517e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51800 | 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 |
| 51820 | 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 |
| 51840 | 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- |
| 51860 | 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: |
| 51880 | 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. |
| 518a0 | 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 |
| 518c0 | 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 |
| 518e0 | 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 |
| 51900 | 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..;;. |
| 51920 | 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 |
| 51940 | 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. |
| 51960 | 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 |
| 51980 | 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. |
| 519a0 | 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. |
| 519c0 | 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 |
| 519e0 | 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. |
| 51a00 | 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. |
| 51a20 | 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 |
| 51a40 | 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 |
| 51a60 | 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 |
| 51a80 | 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 |
| 51aa0 | 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 |
| 51ac0 | 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 |
| 51ae0 | 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. |
| 51b00 | 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. |
| 51b20 | 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..;;.;;. |
| 51b40 | 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. |
| 51b60 | 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 |
| 51b80 | 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 |
| 51ba0 | 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 |
| 51bc0 | 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 |
| 51be0 | 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 |
| 51c00 | 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. |
| 51c20 | 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 |
| 51c40 | 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 |
| 51c60 | 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 |
| 51c80 | 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 |
| 51ca0 | 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 |
| 51cc0 | 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 |
| 51ce0 | 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 |
| 51d00 | 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. |
| 51d20 | 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 |
| 51d40 | 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 |
| 51d60 | 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) |
| 51d80 | 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 |
| 51da0 | 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 |
| 51dc0 | 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 |
| 51de0 | 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 |
| 51e00 | 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 |
| 51e20 | 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).( |
| 51e40 | 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. |
| 51e60 | 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 |
| 51e80 | 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).( |
| 51ea0 | 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.' |
| 51ec0 | 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- |
| 51ee0 | 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 |
| 51f00 | 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... |
| 51f20 | 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 |
| 51f40 | 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' |
| 51f60 | 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,. |
| 51f80 | 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 |
| 51fa0 | 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 |
| 51fc0 | 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 |
| 51fe0 | 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 |
| 52000 | 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 |
| 52020 | 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.` |
| 52040 | 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'. |
| 52060 | 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 |
| 52080 | 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 |
| 520a0 | 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. |
| 520c0 | 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 |
| 520e0 | 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 |
| 52100 | 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- |
| 52120 | 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 |
| 52140 | 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 |
| 52160 | 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 |
| 52180 | 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 |
| 521a0 | 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 |
| 521c0 | 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 |
| 521e0 | 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 |
| 52200 | 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 |
| 52220 | 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 |
| 52240 | 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.. |
| 52260 | 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 |
| 52280 | 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.` |
| 522a0 | 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 |
| 522c0 | 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 |
| 522e0 | 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 |
| 52300 | 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 |
| 52320 | 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 |
| 52340 | 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).....( |
| 52360 | 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".#' |
| 52380 | 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. |
| 523a0 | 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 |
| 523c0 | 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>".................#' |
| 523e0 | 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 |
| 52400 | 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 |
| 52420 | 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 |
| 52440 | 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))).. |
| 52460 | 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- |
| 52480 | 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 |
| 524a0 | 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- |
| 524c0 | 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 |
| 524e0 | 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. |
| 52500 | 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 |
| 52520 | 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 |
| 52540 | 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) |
| 52560 | 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 |
| 52580 | 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- |
| 525a0 | 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 |
| 525c0 | 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" |
| 525e0 | 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 |
| 52600 | 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 |
| 52620 | 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". |
| 52640 | 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 |
| 52660 | 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".....'(" |
| 52680 | 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 |
| 526a0 | 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 |
| 526c0 | 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". |
| 526e0 | 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 |
| 52700 | 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 |
| 52720 | 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 |
| 52740 | 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 |
| 52760 | 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 |
| 52780 | 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".....'( |
| 527a0 | 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 |
| 527c0 | 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- |
| 527e0 | 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".....'(" |
| 52800 | 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 |
| 52820 | 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 |
| 52840 | 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 |
| 52860 | 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")... |
| 52880 | 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- |
| 528a0 | 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 |
| 528c0 | 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 |
| 528e0 | 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 |
| 52900 | 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".. |
| 52920 | 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" |
| 52940 | 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 |
| 52960 | 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 |
| 52980 | 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 |
| 529a0 | 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) |
| 529c0 | 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 |
| 529e0 | 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". |
| 52a00 | 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)). |
| 52a20 | 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 |
| 52a40 | 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. |
| 52a60 | 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 |
| 52a80 | 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- |
| 52aa0 | 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 |
| 52ac0 | 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.(( |
| 52ae0 | 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)))... |
| 52b00 | 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............ |
| 52b20 | 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 |
| 52b40 | 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 |
| 52b60 | 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"))) |
| 52b80 | 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.( |
| 52ba0 | 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.>=. |
| 52bc0 | 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 |
| 52be0 | 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 |
| 52c00 | 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. |
| 52c20 | 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 |
| 52c40 | 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 |
| 52c60 | 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. |
| 52c80 | 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 |
| 52ca0 | 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. |
| 52cc0 | 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 |
| 52ce0 | 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 |
| 52d00 | 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 |
| 52d20 | 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 |
| 52d40 | 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. |
| 52d60 | 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 |
| 52d80 | 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 |
| 52da0 | 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... |
| 52dc0 | 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. |
| 52de0 | 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 |
| 52e00 | 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 |
| 52e20 | 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 |
| 52e40 | 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 |
| 52e60 | 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 |
| 52e80 | 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 |
| 52ea0 | 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.# |
| 52ec0 | 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))..;;;. |
| 52ee0 | 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.............. |
| 52f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 52f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 52f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 52f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 52f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 52fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 52fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 52fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 53000 | 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.. |
| 53020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 53040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 53060 | 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 |
| 53080 | 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... |
| 530a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 530c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 530e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 53100 | 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................... |
| 53120 | 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................... |
| 53140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 53160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 53180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 531a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 531c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 531e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 53200 | 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. |
| 53220 | 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. |
| 53240 | 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 |
| 53260 | 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 |
| 53280 | 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 |
| 532a0 | 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 |
| 532c0 | 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 |
| 532e0 | 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 |
| 53300 | 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 |
| 53320 | 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 |
| 53340 | 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). |
| 53360 | 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 |
| 53380 | 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 |
| 533a0 | 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,.. |
| 533c0 | 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 |
| 533e0 | 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. |
| 53400 | 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 |
| 53420 | 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 |
| 53440 | 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 |
| 53460 | 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 |
| 53480 | 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 |
| 534a0 | 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 |
| 534c0 | 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 |
| 534e0 | 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 |
| 53500 | 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 |
| 53520 | 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 |
| 53540 | 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.**************** |
| 53560 | 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 |
| 53580 | 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. |
| 535a0 | 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 |
| 535c0 | 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. |
| 535e0 | 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 |
| 53600 | 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 |
| 53620 | 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 |
| 53640 | 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 |
| 53660 | 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 |
| 53680 | 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 |
| 536a0 | 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 |
| 536c0 | 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 |
| 536e0 | 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 |
| 53700 | 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. |
| 53720 | 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. |
| 53740 | 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. |
| 53760 | 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. |
| 53780 | 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 |
| 537a0 | 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. |
| 537c0 | 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 |
| 537e0 | 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 |
| 53800 | 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...... |
| 53820 | 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. |
| 53840 | 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 |
| 53860 | 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 |
| 53880 | 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:: |
| 538a0 | 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 |
| 538c0 | 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 |
| 538e0 | 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 |
| 53900 | 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 |
| 53920 | 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 |
| 53940 | 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 |
| 53960 | 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 |
| 53980 | 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:: |
| 539a0 | 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 |
| 539c0 | 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::.*. |
| 539e0 | 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::.*. |
| 53a00 | 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 |
| 53a20 | 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 |
| 53a40 | 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::. |
| 53a60 | 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 |
| 53a80 | 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 |
| 53aa0 | 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 |
| 53ac0 | 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 |
| 53ae0 | 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 |
| 53b00 | 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 |
| 53b20 | 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 |
| 53b40 | 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 |
| 53b60 | 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". |
| 53b80 | 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 |
| 53ba0 | 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 |
| 53bc0 | 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:. |
| 53be0 | 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.************ |
| 53c00 | 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 |
| 53c20 | 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 |
| 53c40 | 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 |
| 53c60 | 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 |
| 53c80 | 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 |
| 53ca0 | 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 |
| 53cc0 | 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 |
| 53ce0 | 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 |
| 53d00 | 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 |
| 53d20 | 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. |
| 53d40 | 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 |
| 53d60 | 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 |
| 53d80 | 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 |
| 53da0 | 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 |
| 53dc0 | 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 |
| 53de0 | 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 |
| 53e00 | 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 |
| 53e20 | 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 |
| 53e40 | 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 |
| 53e60 | 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 |
| 53e80 | 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 |
| 53ea0 | 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 |
| 53ec0 | 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 |
| 53ee0 | 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. |
| 53f00 | 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 |
| 53f20 | 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 |
| 53f40 | 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 |
| 53f60 | 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 |
| 53f80 | 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 |
| 53fa0 | 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 |
| 53fc0 | 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. |
| 53fe0 | 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 |
| 54000 | 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 |
| 54020 | 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 |
| 54040 | 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 |
| 54060 | 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 |
| 54080 | 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...... |
| 540a0 | 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. |
| 540c0 | 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 |
| 540e0 | 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 |
| 54100 | 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. |
| 54120 | 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... |
| 54140 | 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 |
| 54160 | 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 |
| 54180 | 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 |
| 541a0 | 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 |
| 541c0 | 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 |
| 541e0 | 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 |
| 54200 | 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 |
| 54220 | 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). |
| 54240 | 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:: |
| 54260 | 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:: |
| 54280 | 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::. |
| 542a0 | 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 |
| 542c0 | 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. |
| 542e0 | 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 |
| 54300 | 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 |
| 54320 | 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 |
| 54340 | 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.-- |
| 54360 | 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 |
| 54380 | 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 |
| 543a0 | 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 |
| 543c0 | 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. |
| 543e0 | 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............ |
| 54400 | 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 |
| 54420 | 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. |
| 54440 | 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 |
| 54460 | 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. |
| 54480 | 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. |
| 544a0 | 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 |
| 544c0 | 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 |
| 544e0 | 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 |
| 54500 | 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. |
| 54520 | 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,... |
| 54540 | 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 |
| 54560 | 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 |
| 54580 | 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 |
| 545a0 | 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 |
| 545c0 | 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 |
| 545e0 | 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 |
| 54600 | 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 |
| 54620 | 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 |
| 54640 | 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. |
| 54660 | 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........ |
| 54680 | 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 |
| 546a0 | 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 |
| 546c0 | 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 |
| 546e0 | 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 |
| 54700 | 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..... |
| 54720 | 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.... |
| 54740 | 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 |
| 54760 | 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 |
| 54780 | 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 |
| 547a0 | 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 |
| 547c0 | 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,.. |
| 547e0 | 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 |
| 54800 | 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 |
| 54820 | 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 |
| 54840 | 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.========== |
| 54860 | 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 |
| 54880 | 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.------------------- |
| 548a0 | 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 |
| 548c0 | 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. |
| 548e0 | 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 |
| 54900 | 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 |
| 54920 | 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 |
| 54940 | 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 |
| 54960 | 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. |
| 54980 | 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 |
| 549a0 | 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 |
| 549c0 | 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 |
| 549e0 | 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 |
| 54a00 | 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 |
| 54a20 | 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.--------- |
| 54a40 | 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... |
| 54a60 | 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. |
| 54a80 | 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 |
| 54aa0 | 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. |
| 54ac0 | 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 |
| 54ae0 | 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.................. |
| 54b00 | 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 |
| 54b20 | 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 |
| 54b40 | 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. |
| 54b60 | 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. |
| 54b80 | 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 |
| 54ba0 | 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 |
| 54bc0 | 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 |
| 54be0 | 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 |
| 54c00 | 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 |
| 54c20 | 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 |
| 54c40 | 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 |
| 54c60 | 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 |
| 54c80 | 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 |
| 54ca0 | 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 |
| 54cc0 | 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 |
| 54ce0 | 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.... |
| 54d00 | 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 |
| 54d20 | 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. |
| 54d40 | 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 |
| 54d60 | 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 |
| 54d80 | 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. |
| 54da0 | 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 |
| 54dc0 | 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 |
| 54de0 | 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 |
| 54e00 | 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 |
| 54e20 | 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 |
| 54e40 | 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 |
| 54e60 | 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................... |
| 54e80 | 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>... |
| 54ea0 | 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 |
| 54ec0 | 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 |
| 54ee0 | 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 |
| 54f00 | 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 |
| 54f20 | 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.================= |
| 54f40 | 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 |
| 54f60 | 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.--------------- |
| 54f80 | 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. |
| 54fa0 | 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 |
| 54fc0 | 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 |
| 54fe0 | 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 |
| 55000 | 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 |
| 55020 | 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 |
| 55040 | 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 |
| 55060 | 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 |
| 55080 | 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. |
| 550a0 | 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.----------------- |
| 550c0 | 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 |
| 550e0 | 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 |
| 55100 | 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 |
| 55120 | 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 |
| 55140 | 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 |
| 55160 | 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.. |
| 55180 | 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 |
| 551a0 | 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 |
| 551c0 | 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 |
| 551e0 | 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 |
| 55200 | 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 |
| 55220 | 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... |
| 55240 | 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 |
| 55260 | 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 |
| 55280 | 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 |
| 552a0 | 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:// |
| 552c0 | 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/ |
| 552e0 | 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.-------------------- |
| 55300 | 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 | -------------------------------- |
| 55320 | 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............ |
| 55340 | 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 |
| 55360 | 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".. |
| 55380 | 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 |
| 553a0 | 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 |
| 553c0 | 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 |
| 553e0 | 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 |
| 55400 | 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. |
| 55420 | 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 |
| 55440 | 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................ |
| 55460 | 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>. |
| 55480 | 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.------- |
| 554a0 | 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.. |
| 554c0 | 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. |
| 554e0 | 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 |
| 55500 | 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 |
| 55520 | 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 |
| 55540 | 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 |
| 55560 | 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 |
| 55580 | 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.. |
| 555a0 | 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 |
| 555c0 | 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......... |
| 555e0 | 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>.. |
| 55600 | 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 |
| 55620 | 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: |
| 55640 | 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 |
| 55660 | 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.******* |
| 55680 | 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 |
| 556a0 | 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 |
| 556c0 | 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. |
| 556e0 | 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 |
| 55700 | 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 |
| 55720 | 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 |
| 55740 | 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 |
| 55760 | 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 |
| 55780 | 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 |
| 557a0 | 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 |
| 557c0 | 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 |
| 557e0 | 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 |
| 55800 | 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 |
| 55820 | 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 |
| 55840 | 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. |
| 55860 | 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 |
| 55880 | 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 |
| 558a0 | 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 |
| 558c0 | 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 |
| 558e0 | 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 |
| 55900 | 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 |
| 55920 | 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 |
| 55940 | 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- |
| 55960 | 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.. |
| 55980 | 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 |
| 559a0 | 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::. |
| 559c0 | 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 |
| 559e0 | 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: |
| 55a00 | 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 |
| 55a20 | 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 |
| 55a40 | 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.================= |
| 55a60 | 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. |
| 55a80 | 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 |
| 55aa0 | 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 |
| 55ac0 | 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 |
| 55ae0 | 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. |
| 55b00 | 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)). |
| 55b20 | 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... |
| 55b40 | 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...... |
| 55b60 | 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 |
| 55b80 | 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 |
| 55ba0 | 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. |
| 55bc0 | 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 |
| 55be0 | 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.================ |
| 55c00 | 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. |
| 55c20 | 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. |
| 55c40 | 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 |
| 55c60 | 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 |
| 55c80 | 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 |
| 55ca0 | 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. |
| 55cc0 | 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 |
| 55ce0 | 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 |
| 55d00 | 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 |
| 55d20 | 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 |
| 55d40 | 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 |
| 55d60 | 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 |
| 55d80 | 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 |
| 55da0 | 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 |
| 55dc0 | 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.. |
| 55de0 | 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 |
| 55e00 | 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 |
| 55e20 | 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 |
| 55e40 | 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 |
| 55e60 | 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. |
| 55e80 | 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 |
| 55ea0 | 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 |
| 55ec0 | 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 |
| 55ee0 | 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 |
| 55f00 | 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: |
| 55f20 | 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/ |
| 55f40 | 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>..... |
| 55f60 | 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 |
| 55f80 | 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.. |
| 55fa0 | 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 |
| 55fc0 | 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. |
| 55fe0 | 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 |
| 56000 | 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, |
| 56020 | 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...... |
| 56040 | 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 |
| 56060 | 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 |
| 56080 | 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:. |
| 560a0 | 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 |
| 560c0 | 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 |
| 560e0 | 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.============ |
| 56100 | 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. |
| 56120 | 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 |
| 56140 | 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 |
| 56160 | 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 |
| 56180 | 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 |
| 561a0 | 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 |
| 561c0 | 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 |
| 561e0 | 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 |
| 56200 | 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 |
| 56220 | 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 |
| 56240 | 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 |
| 56260 | 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 |
| 56280 | 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.* |
| 562a0 | 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 |
| 562c0 | 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 |
| 562e0 | 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. |
| 56300 | 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. |
| 56320 | 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 |
| 56340 | 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. |
| 56360 | 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 |
| 56380 | 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 |
| 563a0 | 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 |
| 563c0 | 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 |
| 563e0 | 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 |
| 56400 | 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. |
| 56420 | 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 |
| 56440 | 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 |
| 56460 | 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 |
| 56480 | 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. |
| 564a0 | 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. |
| 564c0 | 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 |
| 564e0 | 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. |
| 56500 | 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 |
| 56520 | 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 |
| 56540 | 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 |
| 56560 | 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 |
| 56580 | 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 |
| 565a0 | 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. |
| 565c0 | 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 |
| 565e0 | 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 |
| 56600 | 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 |
| 56620 | 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 |
| 56640 | 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 |
| 56660 | 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.======================== |
| 56680 | 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 |
| 566a0 | 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 |
| 566c0 | 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 |
| 566e0 | 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. |
| 56700 | 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 |
| 56720 | 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 |
| 56740 | 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. |
| 56760 | 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... |
| 56780 | 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 |
| 567a0 | 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)...... |
| 567c0 | 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 |
| 567e0 | 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 |
| 56800 | 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. |
| 56820 | 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. |
| 56840 | 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 |
| 56860 | 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 |
| 56880 | 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 |
| 568a0 | 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... |
| 568c0 | 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. |
| 568e0 | 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. |
| 56900 | 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 |
| 56920 | 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 |
| 56940 | 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 |
| 56960 | 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 |
| 56980 | 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 |
| 569a0 | 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 |
| 569c0 | 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 |
| 569e0 | 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 |
| 56a00 | 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 |
| 56a20 | 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 |
| 56a40 | 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", |
| 56a60 | 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 |
| 56a80 | 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 |
| 56aa0 | 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 |
| 56ac0 | 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 |
| 56ae0 | 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 |
| 56b00 | 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 |
| 56b20 | 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 |
| 56b40 | 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 |
| 56b60 | 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 |
| 56b80 | 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. |
| 56ba0 | 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. |
| 56bc0 | 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 |
| 56be0 | 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. |
| 56c00 | 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.... |
| 56c20 | 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 |
| 56c40 | 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. |
| 56c60 | 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 |
| 56c80 | 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 |
| 56ca0 | 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....... |
| 56cc0 | 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. |
| 56ce0 | 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 |
| 56d00 | 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 |
| 56d20 | 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 |
| 56d40 | 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...... |
| 56d60 | 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. |
| 56d80 | 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 |
| 56da0 | 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... |
| 56dc0 | 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 |
| 56de0 | 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 |
| 56e00 | 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 |
| 56e20 | 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 |
| 56e40 | 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 |
| 56e60 | 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 |
| 56e80 | 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.. |
| 56ea0 | 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. |
| 56ec0 | 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 |
| 56ee0 | 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 |
| 56f00 | 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 |
| 56f20 | 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 |
| 56f40 | 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 |
| 56f60 | 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 |
| 56f80 | 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 |
| 56fa0 | 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 |
| 56fc0 | 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 |
| 56fe0 | 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 |
| 57000 | 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 |
| 57020 | 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 |
| 57040 | 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. |
| 57060 | 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 |
| 57080 | 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 |
| 570a0 | 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 |
| 570c0 | 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 |
| 570e0 | 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 |
| 57100 | 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 |
| 57120 | 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 |
| 57140 | 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 |
| 57160 | 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 |
| 57180 | 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 |
| 571a0 | 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. |
| 571c0 | 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 |
| 571e0 | 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 |
| 57200 | 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...... |
| 57220 | 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 |
| 57240 | 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 |
| 57260 | 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 |
| 57280 | 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. |
| 572a0 | 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 |
| 572c0 | 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 |
| 572e0 | 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 |
| 57300 | 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 |
| 57320 | 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 |
| 57340 | 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. |
| 57360 | 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 |
| 57380 | 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 |
| 573a0 | 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 |
| 573c0 | 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 |
| 573e0 | 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 |
| 57400 | 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 |
| 57420 | 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 |
| 57440 | 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 |
| 57460 | 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 |
| 57480 | 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 |
| 574a0 | 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 |
| 574c0 | 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 |
| 574e0 | 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.. |
| 57500 | 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 |
| 57520 | 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 |
| 57540 | 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 |
| 57560 | 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 |
| 57580 | 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 |
| 575a0 | 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 |
| 575c0 | 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 |
| 575e0 | 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 |
| 57600 | 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 |
| 57620 | 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 |
| 57640 | 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.. |
| 57660 | 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... |
| 57680 | 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) |
| 576a0 | 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 |
| 576c0 | 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 |
| 576e0 | 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 |
| 57700 | 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. |
| 57720 | 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... |
| 57740 | 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 |
| 57760 | 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 |
| 57780 | 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...... |
| 577a0 | 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.... |
| 577c0 | 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 |
| 577e0 | 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 |
| 57800 | 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 |
| 57820 | 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 |
| 57840 | 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 |
| 57860 | 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 |
| 57880 | 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.......... |
| 578a0 | 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 |
| 578c0 | 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 |
| 578e0 | 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:........ |
| 57900 | 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 |
| 57920 | 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. |
| 57940 | 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." |
| 57960 | 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 |
| 57980 | 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 |
| 579a0 | 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 |
| 579c0 | 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 |
| 579e0 | 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 |
| 57a00 | 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. |
| 57a20 | 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 |
| 57a40 | 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 |
| 57a60 | 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 |
| 57a80 | 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........... |
| 57aa0 | 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 |
| 57ac0 | 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 |
| 57ae0 | 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 |
| 57b00 | 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:. |
| 57b20 | 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.=== |
| 57b40 | 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 |
| 57b60 | 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 |
| 57b80 | 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 |
| 57ba0 | 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. |
| 57bc0 | 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... |
| 57be0 | 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. |
| 57c00 | 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 |
| 57c20 | 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 |
| 57c40 | 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. |
| 57c60 | 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 |
| 57c80 | 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 |
| 57ca0 | 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 |
| 57cc0 | 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 |
| 57ce0 | 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.... |
| 57d00 | 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. |
| 57d20 | 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 |
| 57d40 | 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. |
| 57d60 | 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 |
| 57d80 | 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 |
| 57da0 | 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 |
| 57dc0 | 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 |
| 57de0 | 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 |
| 57e00 | 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 |
| 57e20 | 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 |
| 57e40 | 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 |
| 57e60 | 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:. |
| 57e80 | 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: |
| 57ea0 | 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 |
| 57ec0 | 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 |
| 57ee0 | 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 |
| 57f00 | 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 |
| 57f20 | 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 |
| 57f40 | 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 |
| 57f60 | 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 |
| 57f80 | 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 |
| 57fa0 | 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 |
| 57fc0 | 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. |
| 57fe0 | 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 |
| 58000 | 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 |
| 58020 | 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- |
| 58040 | 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 |
| 58060 | 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 |
| 58080 | 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 |
| 580a0 | 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 |
| 580c0 | 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 |
| 580e0 | 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.. |
| 58100 | 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. |
| 58120 | 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 |
| 58140 | 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 |
| 58160 | 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 |
| 58180 | 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. |
| 581a0 | 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 |
| 581c0 | 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 |
| 581e0 | 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 |
| 58200 | 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 |
| 58220 | 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 |
| 58240 | 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 |
| 58260 | 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 |
| 58280 | 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 |
| 582a0 | 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 |
| 582c0 | 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 |
| 582e0 | 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 |
| 58300 | 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...... |
| 58320 | 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 |
| 58340 | 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. |
| 58360 | 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 |
| 58380 | 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 |
| 583a0 | 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 |
| 583c0 | 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 |
| 583e0 | 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::.* |
| 58400 | 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 |
| 58420 | 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:. |
| 58440 | 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 |
| 58460 | 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 |
| 58480 | 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. |
| 584a0 | 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 |
| 584c0 | 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 |
| 584e0 | 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 |
| 58500 | 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. |
| 58520 | 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 |
| 58540 | 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 |
| 58560 | 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. |
| 58580 | 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.. |
| 585a0 | 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 |
| 585c0 | 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 |
| 585e0 | 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 |
| 58600 | 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 |
| 58620 | 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 |
| 58640 | 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 |
| 58660 | 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 |
| 58680 | 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 |
| 586a0 | 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 |
| 586c0 | 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 |
| 586e0 | 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 |
| 58700 | 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 |
| 58720 | 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 |
| 58740 | 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 |
| 58760 | 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 |
| 58780 | 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 |
| 587a0 | 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- |
| 587c0 | 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. |
| 587e0 | 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 |
| 58800 | 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 |
| 58820 | 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 |
| 58840 | 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 |
| 58860 | 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 |
| 58880 | 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 |
| 588a0 | 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 |
| 588c0 | 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. |
| 588e0 | 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 |
| 58900 | 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 |
| 58920 | 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 |
| 58940 | 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 |
| 58960 | 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... |
| 58980 | 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 |
| 589a0 | 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 |
| 589c0 | 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 |
| 589e0 | 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 |
| 58a00 | 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 |
| 58a20 | 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 |
| 58a40 | 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 |
| 58a60 | 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. |
| 58a80 | 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 |
| 58aa0 | 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, |
| 58ac0 | 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 |
| 58ae0 | 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 |
| 58b00 | 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 |
| 58b20 | 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 |
| 58b40 | 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 |
| 58b60 | 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 |
| 58b80 | 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 |
| 58ba0 | 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 |
| 58bc0 | 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 |
| 58be0 | 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 |
| 58c00 | 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 |
| 58c20 | 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 |
| 58c40 | 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 |
| 58c60 | 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 |
| 58c80 | 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...... |
| 58ca0 | 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....... |
| 58cc0 | 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 |
| 58ce0 | 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 |
| 58d00 | 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. |
| 58d20 | 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 |
| 58d40 | 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 |
| 58d60 | 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 |
| 58d80 | 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... |
| 58da0 | 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 |
| 58dc0 | 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 |
| 58de0 | 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 |
| 58e00 | 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 |
| 58e20 | 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 |
| 58e40 | 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 |
| 58e60 | 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- |
| 58e80 | 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 |
| 58ea0 | 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 |
| 58ec0 | 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:. |
| 58ee0 | 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 |
| 58f00 | 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.= |
| 58f20 | 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 |
| 58f40 | 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. |
| 58f60 | 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 |
| 58f80 | 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 |
| 58fa0 | 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 |
| 58fc0 | 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. |
| 58fe0 | 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 |
| 59000 | 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 |
| 59020 | 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.( |
| 59040 | 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 |
| 59060 | 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....%.. |
| 59080 | 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- |
| 590a0 | 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 |
| 590c0 | 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 |
| 590e0 | 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 |
| 59100 | 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 |
| 59120 | 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 |
| 59140 | 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 |
| 59160 | 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 |
| 59180 | 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 |
| 591a0 | 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.. |
| 591c0 | 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 |
| 591e0 | 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 |
| 59200 | 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 |
| 59220 | 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 |
| 59240 | 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 |
| 59260 | 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 |
| 59280 | 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 |
| 592a0 | 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. |
| 592c0 | 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.. |
| 592e0 | 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..... |
| 59300 | 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 |
| 59320 | 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:.............. |
| 59340 | 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.... |
| 59360 | 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 |
| 59380 | 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>. |
| 593a0 | 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 |
| 593c0 | 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 |
| 593e0 | 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. |
| 59400 | 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 |
| 59420 | 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 |
| 59440 | 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 |
| 59460 | 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 |
| 59480 | 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 |
| 594a0 | 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 |
| 594c0 | 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> |
| 594e0 | 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 |
| 59500 | 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................ |
| 59520 | 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. |
| 59540 | 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 |
| 59560 | 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 |
| 59580 | 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 |
| 595a0 | 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 |
| 595c0 | 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 |
| 595e0 | 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 |
| 59600 | 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 |
| 59620 | 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 |
| 59640 | 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... |
| 59660 | 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. |
| 59680 | 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. |
| 596a0 | 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 |
| 596c0 | 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 |
| 596e0 | 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 |
| 59700 | 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 |
| 59720 | 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 |
| 59740 | 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 |
| 59760 | 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. |
| 59780 | 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 |
| 597a0 | 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 |
| 597c0 | 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 |
| 597e0 | 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 |
| 59800 | 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.. |
| 59820 | 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 |
| 59840 | 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- |
| 59860 | 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 |
| 59880 | 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. |
| 598a0 | 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 |
| 598c0 | 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 |
| 598e0 | 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... |
| 59900 | 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 |
| 59920 | 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.. |
| 59940 | 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 |
| 59960 | 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 |
| 59980 | 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 |
| 599a0 | 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 |
| 599c0 | 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 |
| 599e0 | 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 |
| 59a00 | 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 |
| 59a20 | 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 |
| 59a40 | 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 |
| 59a60 | 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 |
| 59a80 | 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 |
| 59aa0 | 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 |
| 59ac0 | 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 |
| 59ae0 | 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............ |
| 59b00 | 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 |
| 59b20 | 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 |
| 59b40 | 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 |
| 59b60 | 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 |
| 59b80 | 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 |
| 59ba0 | 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 |
| 59bc0 | 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 |
| 59be0 | 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 |
| 59c00 | 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 |
| 59c20 | 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. |
| 59c40 | 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.................... |
| 59c60 | 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 |
| 59c80 | 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....... |
| 59ca0 | 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 |
| 59cc0 | 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. |
| 59ce0 | 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 |
| 59d00 | 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 |
| 59d20 | 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 |
| 59d40 | 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 |
| 59d60 | 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 |
| 59d80 | 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. |
| 59da0 | 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.......... |
| 59dc0 | 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.......... |
| 59de0 | 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 |
| 59e00 | 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 |
| 59e20 | 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. |
| 59e40 | 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/ |
| 59e60 | 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 |
| 59e80 | 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 |
| 59ea0 | 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 |
| 59ec0 | 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 |
| 59ee0 | 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........... |
| 59f00 | 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 |
| 59f20 | 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..... |
| 59f40 | 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........ |
| 59f60 | 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 |
| 59f80 | 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 |
| 59fa0 | 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 |
| 59fc0 | 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 |
| 59fe0 | 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 |
| 5a000 | 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 |
| 5a020 | 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 |
| 5a040 | 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 |
| 5a060 | 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. |
| 5a080 | 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............. |
| 5a0a0 | 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 |
| 5a0c0 | 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........ |
| 5a0e0 | 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 |
| 5a100 | 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.... |
| 5a120 | 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......... |
| 5a140 | 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 |
| 5a160 | 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 |
| 5a180 | 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 |
| 5a1a0 | 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. |
| 5a1c0 | 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 |
| 5a1e0 | 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........... |
| 5a200 | 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 |
| 5a220 | 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...... |
| 5a240 | 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 |
| 5a260 | 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 |
| 5a280 | 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. |
| 5a2a0 | 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.. |
| 5a2c0 | 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 |
| 5a2e0 | 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 |
| 5a300 | 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. |
| 5a320 | 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 |
| 5a340 | 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... |
| 5a360 | 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 |
| 5a380 | 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.. |
| 5a3a0 | 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... |
| 5a3c0 | 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. |
| 5a3e0 | 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.. |
| 5a400 | 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... |
| 5a420 | 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... |
| 5a440 | 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 |
| 5a460 | 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 |
| 5a480 | 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- |
| 5a4a0 | 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 |
| 5a4c0 | 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. |
| 5a4e0 | 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 |
| 5a500 | 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. |
| 5a520 | 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 |
| 5a540 | 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..... |
| 5a560 | 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 |
| 5a580 | 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.. |
| 5a5a0 | 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 |
| 5a5c0 | 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. |
| 5a5e0 | 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 |
| 5a600 | 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 |
| 5a620 | 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 |
| 5a640 | 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 |
| 5a660 | 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. |
| 5a680 | 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 |
| 5a6a0 | 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 |
| 5a6c0 | 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 |
| 5a6e0 | 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 |
| 5a700 | 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 |
| 5a720 | 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 |
| 5a740 | 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 |
| 5a760 | 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/ |
| 5a780 | 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 |
| 5a7a0 | 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 |
| 5a7c0 | 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 |
| 5a7e0 | 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 |
| 5a800 | 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 |
| 5a820 | 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.====================== |
| 5a840 | 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- |
| 5a860 | 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 |
| 5a880 | 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 |
| 5a8a0 | 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 |
| 5a8c0 | 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 |
| 5a8e0 | 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 |
| 5a900 | 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: |
| 5a920 | 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 |
| 5a940 | 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 |
| 5a960 | 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 |
| 5a980 | 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 |
| 5a9a0 | 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 |
| 5a9c0 | 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. |
| 5a9e0 | 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 |
| 5aa00 | 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 |
| 5aa20 | 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 |
| 5aa40 | 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 |
| 5aa60 | 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 |
| 5aa80 | 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 |
| 5aaa0 | 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. |
| 5aac0 | 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 |
| 5aae0 | 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. |
| 5ab00 | 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 |
| 5ab20 | 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 |
| 5ab40 | 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 |
| 5ab60 | 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....( |
| 5ab80 | 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. |
| 5aba0 | 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.. |
| 5abc0 | 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- |
| 5abe0 | 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 |
| 5ac00 | 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.... |
| 5ac20 | 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. |
| 5ac40 | 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. |
| 5ac60 | 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 |
| 5ac80 | 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( |
| 5aca0 | 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 |
| 5acc0 | 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.. |
| 5ace0 | 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. |
| 5ad00 | 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 |
| 5ad20 | 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 |
| 5ad40 | 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 |
| 5ad60 | 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....( |
| 5ad80 | 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) |
| 5ada0 | 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 |
| 5adc0 | 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 |
| 5ade0 | 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.... |
| 5ae00 | 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 |
| 5ae20 | 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>....( |
| 5ae40 | 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 |
| 5ae60 | 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...). |
| 5ae80 | 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 |
| 5aea0 | 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 |
| 5aec0 | 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 |
| 5aee0 | 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 |
| 5af00 | 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 |
| 5af20 | 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...... |
| 5af40 | 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. |
| 5af60 | 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 |
| 5af80 | 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. |
| 5afa0 | 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 |
| 5afc0 | 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 |
| 5afe0 | 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 |
| 5b000 | 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 |
| 5b020 | 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 |
| 5b040 | 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 |
| 5b060 | 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..... |
| 5b080 | 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 |
| 5b0a0 | 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 |
| 5b0c0 | 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 |
| 5b0e0 | 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 |
| 5b100 | 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 |
| 5b120 | 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...)... |
| 5b140 | 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 |
| 5b160 | 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 |
| 5b180 | 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 |
| 5b1a0 | 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 |
| 5b1c0 | 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. |
| 5b1e0 | 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.------------------ |
| 5b200 | 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 |
| 5b220 | 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. |
| 5b240 | 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 |
| 5b260 | 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. |
| 5b280 | 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 |
| 5b2a0 | 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. |
| 5b2c0 | 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. |
| 5b2e0 | 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... |
| 5b300 | 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 |
| 5b320 | 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 |
| 5b340 | 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/ |
| 5b360 | 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....-- |
| 5b380 | 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.. |
| 5b3a0 | 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 |
| 5b3c0 | 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. |
| 5b3e0 | 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- |
| 5b400 | 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 |
| 5b420 | 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 |
| 5b440 | 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 |
| 5b460 | 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 |
| 5b480 | 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 |
| 5b4a0 | 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 |
| 5b4c0 | 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 |
| 5b4e0 | 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 |
| 5b500 | 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... |
| 5b520 | 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 |
| 5b540 | 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... |
| 5b560 | 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 |
| 5b580 | 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 |
| 5b5a0 | 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 |
| 5b5c0 | 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. |
| 5b5e0 | 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 |
| 5b600 | 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 |
| 5b620 | 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 |
| 5b640 | 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.. |
| 5b660 | 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 |
| 5b680 | 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 |
| 5b6a0 | 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 |
| 5b6c0 | 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...:...- |
| 5b6e0 | 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 |
| 5b700 | 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 |
| 5b720 | 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 |
| 5b740 | 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 |
| 5b760 | 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 |
| 5b780 | 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 |
| 5b7a0 | 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 |
| 5b7c0 | 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 |
| 5b7e0 | 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 |
| 5b800 | 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 |
| 5b820 | 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 |
| 5b840 | 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...... |
| 5b860 | 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:. |
| 5b880 | 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.... |
| 5b8a0 | 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 |
| 5b8c0 | 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. |
| 5b8e0 | 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 |
| 5b900 | 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 |
| 5b920 | 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 |
| 5b940 | 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.. |
| 5b960 | 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 |
| 5b980 | 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 |
| 5b9a0 | 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 |
| 5b9c0 | 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 |
| 5b9e0 | 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 |
| 5ba00 | 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 |
| 5ba20 | 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. |
| 5ba40 | 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 |
| 5ba60 | 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 |
| 5ba80 | 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 |
| 5baa0 | 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. |
| 5bac0 | 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.. |
| 5bae0 | 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 |
| 5bb00 | 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 |
| 5bb20 | 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... |
| 5bb40 | 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 |
| 5bb60 | 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 |
| 5bb80 | 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. |
| 5bba0 | 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....--. |
| 5bbc0 | 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 |
| 5bbe0 | 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 |
| 5bc00 | 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 |
| 5bc20 | 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 |
| 5bc40 | 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 |
| 5bc60 | 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 |
| 5bc80 | 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 |
| 5bca0 | 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 |
| 5bcc0 | 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 |
| 5bce0 | 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.. |
| 5bd00 | 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 |
| 5bd20 | 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 |
| 5bd40 | 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 |
| 5bd60 | 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 |
| 5bd80 | 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 |
| 5bda0 | 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 |
| 5bdc0 | 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. |
| 5bde0 | 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 |
| 5be00 | 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 |
| 5be20 | 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. |
| 5be40 | 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 |
| 5be60 | 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 |
| 5be80 | 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 |
| 5bea0 | 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 |
| 5bec0 | 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 |
| 5bee0 | 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 |
| 5bf00 | 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 |
| 5bf20 | 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.. |
| 5bf40 | 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...... |
| 5bf60 | 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 |
| 5bf80 | 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 |
| 5bfa0 | 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 |
| 5bfc0 | 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 |
| 5bfe0 | 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...... |
| 5c000 | 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 |
| 5c020 | 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 |
| 5c040 | 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. |
| 5c060 | 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 |
| 5c080 | 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 |
| 5c0a0 | 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 |
| 5c0c0 | 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 |
| 5c0e0 | 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 |
| 5c100 | 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...... |
| 5c120 | 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 |
| 5c140 | 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 |
| 5c160 | 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 |
| 5c180 | 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 |
| 5c1a0 | 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 |
| 5c1c0 | 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 |
| 5c1e0 | 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 |
| 5c200 | 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 |
| 5c220 | 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. |
| 5c240 | 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 |
| 5c260 | 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 |
| 5c280 | 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.. |
| 5c2a0 | 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 |
| 5c2c0 | 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 |
| 5c2e0 | 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. |
| 5c300 | 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 |
| 5c320 | 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 |
| 5c340 | 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.. |
| 5c360 | 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 |
| 5c380 | 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....... |
| 5c3a0 | 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... |
| 5c3c0 | 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 |
| 5c3e0 | 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 |
| 5c400 | 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:................. |
| 5c420 | 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. |
| 5c440 | 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 |
| 5c460 | 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 |
| 5c480 | 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, |
| 5c4a0 | 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. |
| 5c4c0 | 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:. |
| 5c4e0 | 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 |
| 5c500 | 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 |
| 5c520 | 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. |
| 5c540 | 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 |
| 5c560 | 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 |
| 5c580 | 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 |
| 5c5a0 | 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 |
| 5c5c0 | 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 |
| 5c5e0 | 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.... |
| 5c600 | 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 |
| 5c620 | 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 |
| 5c640 | 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 |
| 5c660 | 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 |
| 5c680 | 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 |
| 5c6a0 | 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.---------------------... |
| 5c6c0 | 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 |
| 5c6e0 | 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 |
| 5c700 | 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 |
| 5c720 | 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. |
| 5c740 | 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...... |
| 5c760 | 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. |
| 5c780 | 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 |
| 5c7a0 | 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 |
| 5c7c0 | 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 |
| 5c7e0 | 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,.. |
| 5c800 | 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,. |
| 5c820 | 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 |
| 5c840 | 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. |
| 5c860 | 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.--------------- |
| 5c880 | 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 |
| 5c8a0 | 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". |
| 5c8c0 | 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 |
| 5c8e0 | 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 |
| 5c900 | 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 |
| 5c920 | 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..... |
| 5c940 | 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 |
| 5c960 | 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.,. |
| 5c980 | 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 |
| 5c9a0 | 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 |
| 5c9c0 | 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 |
| 5c9e0 | 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. |
| 5ca00 | 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. |
| 5ca20 | 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... |
| 5ca40 | 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 |
| 5ca60 | 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. |
| 5ca80 | 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 |
| 5caa0 | 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 |
| 5cac0 | 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 |
| 5cae0 | 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.... |
| 5cb00 | 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 |
| 5cb20 | 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 |
| 5cb40 | 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 |
| 5cb60 | 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 |
| 5cb80 | 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 |
| 5cba0 | 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 |
| 5cbc0 | 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 |
| 5cbe0 | 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 |
| 5cc00 | 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..... |
| 5cc20 | 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 |
| 5cc40 | 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 |
| 5cc60 | 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. |
| 5cc80 | 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 |
| 5cca0 | 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 |
| 5ccc0 | 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 |
| 5cce0 | 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- |
| 5cd00 | 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 |
| 5cd20 | 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 |
| 5cd40 | 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 |
| 5cd60 | 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 |
| 5cd80 | 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... |
| 5cda0 | 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]. |
| 5cdc0 | 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... |
| 5cde0 | 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. |
| 5ce00 | 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 |
| 5ce20 | 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"..... |
| 5ce40 | 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]... |
| 5ce60 | 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...). |
| 5ce80 | 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 |
| 5cea0 | 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 |
| 5cec0 | 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". |
| 5cee0 | 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 |
| 5cf00 | 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 |
| 5cf20 | 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 |
| 5cf40 | 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 |
| 5cf60 | 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 |
| 5cf80 | 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 |
| 5cfa0 | 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. |
| 5cfc0 | 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 |
| 5cfe0 | 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...... |
| 5d000 | 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 |
| 5d020 | 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 |
| 5d040 | 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 |
| 5d060 | 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 |
| 5d080 | 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 |
| 5d0a0 | 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 |
| 5d0c0 | 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 |
| 5d0e0 | 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 |
| 5d100 | 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 |
| 5d120 | 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 |
| 5d140 | 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 |
| 5d160 | 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 |
| 5d180 | 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...... |
| 5d1a0 | 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 |
| 5d1c0 | 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 |
| 5d1e0 | 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.. |
| 5d200 | 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 |
| 5d220 | 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 |
| 5d240 | 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. |
| 5d260 | 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.[ |
| 5d280 | 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 |
| 5d2a0 | 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. |
| 5d2c0 | 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. |
| 5d2e0 | 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 |
| 5d300 | 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 |
| 5d320 | 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 |
| 5d340 | 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 |
| 5d360 | 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 |
| 5d380 | 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 |
| 5d3a0 | 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 |
| 5d3c0 | 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 |
| 5d3e0 | 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 |
| 5d400 | 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 |
| 5d420 | 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 |
| 5d440 | 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 |
| 5d460 | 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" |
| 5d480 | 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 |
| 5d4a0 | 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. |
| 5d4c0 | 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. |
| 5d4e0 | 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 |
| 5d500 | 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 |
| 5d520 | 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 |
| 5d540 | 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 |
| 5d560 | 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 |
| 5d580 | 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. |
| 5d5a0 | 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..... |
| 5d5c0 | 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 |
| 5d5e0 | 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 |
| 5d600 | 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 |
| 5d620 | 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 |
| 5d640 | 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 |
| 5d660 | 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 |
| 5d680 | 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 |
| 5d6a0 | 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 |
| 5d6c0 | 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 |
| 5d6e0 | 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 |
| 5d700 | 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 |
| 5d720 | 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 |
| 5d740 | 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 |
| 5d760 | 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 |
| 5d780 | 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 |
| 5d7a0 | 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- |
| 5d7c0 | 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 |
| 5d7e0 | 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 |
| 5d800 | 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 |
| 5d820 | 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 |
| 5d840 | 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. |
| 5d860 | 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 |
| 5d880 | 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 |
| 5d8a0 | 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. |
| 5d8c0 | 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.... |
| 5d8e0 | 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 |
| 5d900 | 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- |
| 5d920 | 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 |
| 5d940 | 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 |
| 5d960 | 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. |
| 5d980 | 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 |
| 5d9a0 | 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 |
| 5d9c0 | 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,. |
| 5d9e0 | 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.== |
| 5da00 | 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....(.. |
| 5da20 | 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 |
| 5da40 | 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 |
| 5da60 | 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. |
| 5da80 | 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 |
| 5daa0 | 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... |
| 5dac0 | 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 |
| 5dae0 | 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. |
| 5db00 | 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 |
| 5db20 | 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 |
| 5db40 | 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 |
| 5db60 | 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 |
| 5db80 | 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. |
| 5dba0 | 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 |
| 5dbc0 | 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 |
| 5dbe0 | 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.. |
| 5dc00 | 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 |
| 5dc20 | 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 |
| 5dc40 | 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 |
| 5dc60 | 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. |
| 5dc80 | 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 |
| 5dca0 | 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 |
| 5dcc0 | 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 |
| 5dce0 | 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 |
| 5dd00 | 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 |
| 5dd20 | 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 |
| 5dd40 | 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 |
| 5dd60 | 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 |
| 5dd80 | 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 |
| 5dda0 | 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...). |
| 5ddc0 | 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 |
| 5dde0 | 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 |
| 5de00 | 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....--. |
| 5de20 | 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 |
| 5de40 | 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 |
| 5de60 | 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 |
| 5de80 | 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. |
| 5dea0 | 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 |
| 5dec0 | 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. |
| 5dee0 | 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 |
| 5df00 | 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....--. |
| 5df20 | 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- |
| 5df40 | 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 |
| 5df60 | 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. |
| 5df80 | 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. |
| 5dfa0 | 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 |
| 5dfc0 | 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..... |
| 5dfe0 | 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 |
| 5e000 | 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 |
| 5e020 | 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 |
| 5e040 | 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 |
| 5e060 | 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. |
| 5e080 | 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 |
| 5e0a0 | 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 |
| 5e0c0 | 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 |
| 5e0e0 | 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 |
| 5e100 | 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 |
| 5e120 | 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 |
| 5e140 | 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...... |
| 5e160 | 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. |
| 5e180 | 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 |
| 5e1a0 | 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, |
| 5e1c0 | 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... |
| 5e1e0 | 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 |
| 5e200 | 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 |
| 5e220 | 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 |
| 5e240 | 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. |
| 5e260 | 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 |
| 5e280 | 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.... |
| 5e2a0 | 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 |
| 5e2c0 | 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 |
| 5e2e0 | 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. |
| 5e300 | 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 |
| 5e320 | 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 |
| 5e340 | 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 |
| 5e360 | 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. |
| 5e380 | 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 |
| 5e3a0 | 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 |
| 5e3c0 | 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: |
| 5e3e0 | 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:. |
| 5e400 | 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,.. |
| 5e420 | 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.******** |
| 5e440 | 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. |
| 5e460 | 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 |
| 5e480 | 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 |
| 5e4a0 | 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 |
| 5e4c0 | 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...* |
| 5e4e0 | 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 |
| 5e500 | 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 |
| 5e520 | 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 |
| 5e540 | 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 |
| 5e560 | 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 |
| 5e580 | 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 |
| 5e5a0 | 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, |
| 5e5c0 | 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 |
| 5e5e0 | 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 |
| 5e600 | 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 |
| 5e620 | 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 |
| 5e640 | 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 |
| 5e660 | 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 |
| 5e680 | 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 |
| 5e6a0 | 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?.====================== |
| 5e6c0 | 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 | ================================ |
| 5e6e0 | 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... |
| 5e700 | 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 |
| 5e720 | 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 |
| 5e740 | 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. |
| 5e760 | 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.... |
| 5e780 | 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. |
| 5e7a0 | 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 |
| 5e7c0 | 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 |
| 5e7e0 | 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 |
| 5e800 | 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 |
| 5e820 | 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 |
| 5e840 | 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 |
| 5e860 | 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"....================= |
| 5e880 | 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 | ================================ |
| 5e8a0 | 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 |
| 5e8c0 | 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 |
| 5e8e0 | 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:.. |
| 5e900 | 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 |
| 5e920 | 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 |
| 5e940 | 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 |
| 5e960 | 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").... |
| 5e980 | 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 |
| 5e9a0 | 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 |
| 5e9c0 | 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 |
| 5e9e0 | 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 |
| 5ea00 | 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.......... |
| 5ea20 | 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 |
| 5ea40 | 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`.......... |
| 5ea60 | 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."))) |
| 5ea80 | 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 |
| 5eaa0 | 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 |
| 5eac0 | 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 |
| 5eae0 | 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 |
| 5eb00 | 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 |
| 5eb20 | 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. |
| 5eb40 | 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 |
| 5eb60 | 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. |
| 5eb80 | 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 |
| 5eba0 | 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. |
| 5ebc0 | 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. |
| 5ebe0 | 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 |
| 5ec00 | 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 |
| 5ec20 | 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 |
| 5ec40 | 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 |
| 5ec60 | 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 |
| 5ec80 | 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. |
| 5eca0 | 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 |
| 5ecc0 | 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 |
| 5ece0 | 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 |
| 5ed00 | 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. |
| 5ed20 | 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 |
| 5ed40 | 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 |
| 5ed60 | 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. |
| 5ed80 | 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 |
| 5eda0 | 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 |
| 5edc0 | 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. |
| 5ede0 | 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. |
| 5ee00 | 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 |
| 5ee20 | 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 |
| 5ee40 | 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 |
| 5ee60 | 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. |
| 5ee80 | 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 |
| 5eea0 | 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 |
| 5eec0 | 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.. |
| 5eee0 | 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 |
| 5ef00 | 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. |
| 5ef20 | 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 |
| 5ef40 | 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 |
| 5ef60 | 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 |
| 5ef80 | 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 |
| 5efa0 | 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 |
| 5efc0 | 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 |
| 5efe0 | 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 |
| 5f000 | 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 |
| 5f020 | 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 |
| 5f040 | 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 |
| 5f060 | 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 |
| 5f080 | 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 |
| 5f0a0 | 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>. |
| 5f0c0 | 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 |
| 5f0e0 | 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 |
| 5f100 | 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 |
| 5f120 | 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 |
| 5f140 | 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.**************************.... |
| 5f160 | 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:....... |
| 5f180 | 20 20 20 20 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 |
| 5f1a0 | 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. |
| 5f1c0 | 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:.............................. |
| 5f1e0 | 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. |
| 5f200 | 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:................. |
| 5f220 | 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 |
| 5f240 | 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.......................... |
| 5f260 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f280 | 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:..... |
| 5f2a0 | 20 20 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 |
| 5f2c0 | 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.............. |
| 5f2e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f300 | 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 |
| 5f320 | 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:....................... |
| 5f340 | 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.. |
| 5f360 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f380 | 20 20 20 20 20 20 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 |
| 5f3a0 | 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 |
| 5f3c0 | 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 |
| 5f3e0 | 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...................... |
| 5f400 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f420 | 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.[ |
| 5f440 | 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 |
| 5f460 | 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.......... |
| 5f480 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f4a0 | 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) |
| 5f4c0 | 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] |
| 5f4e0 | 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 |
| 5f500 | 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.............................. |
| 5f520 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f540 | 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 |
| 5f560 | 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 |
| 5f580 | 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.................. |
| 5f5a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f5c0 | 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 |
| 5f5e0 | 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]:......... |
| 5f600 | 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...... |
| 5f620 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f640 | 20 20 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. |
| 5f660 | 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 |
| 5f680 | 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 |
| 5f6a0 | 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......................... |
| 5f6c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f6e0 | 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. |
| 5f700 | 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 |
| 5f720 | 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............. |
| 5f740 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f760 | 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).*. |
| 5f780 | 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]:... |
| 5f7a0 | 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. |
| 5f7c0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f7e0 | 20 20 20 20 20 20 20 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 | ...............................( |
| 5f800 | 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 |
| 5f820 | 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 |
| 5f840 | 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..................... |
| 5f860 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f880 | 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: |
| 5f8a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 | ...............................E |
| 5f8c0 | 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......... |
| 5f8e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f900 | 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 |
| 5f920 | 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 |
| 5f940 | 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 |
| 5f960 | 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............................. |
| 5f980 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5f9a0 | 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:........ |
| 5f9c0 | 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 |
| 5f9e0 | 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................. |
| 5fa00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5fa20 | 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. |
| 5fa40 | 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]:...... |
| 5fa60 | 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 |
| 5fa80 | 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" |
| 5faa0 | 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..... |
| 5fac0 | 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:.......... |
| 5fae0 | 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 |
| 5fb00 | 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................... |
| 5fb20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5fb40 | 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- |
| 5fb60 | 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:.............................. |
| 5fb80 | 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) |
| 5fba0 | 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:..................... |
| 5fbc0 | 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......( |
| 5fbe0 | 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>:........ |
| 5fc00 | 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 |
| 5fc20 | 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:....... |
| 5fc40 | 20 20 20 20 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 |
| 5fc60 | 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. |
| 5fc80 | 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:.............................. |
| 5fca0 | 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. |
| 5fcc0 | 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]:........ |
| 5fce0 | 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 |
| 5fd00 | 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.......................... |
| 5fd20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5fd40 | 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:........... |
| 5fd60 | 20 20 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. |
| 5fd80 | 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: |
| 5fda0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5fdc0 | 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 |
| 5fde0 | 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>:................... |
| 5fe00 | 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....... |
| 5fe20 | 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:............ |
| 5fe40 | 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 |
| 5fe60 | 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:... |
| 5fe80 | 20 20 20 20 20 20 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 |
| 5fea0 | 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).*. |
| 5fec0 | 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:.......................... |
| 5fee0 | 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 |
| 5ff00 | 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:................. |
| 5ff20 | 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. |
| 5ff40 | 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:........ |
| 5ff60 | 20 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 |
| 5ff80 | 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 |
| 5ffa0 | 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 | :............................... |
| 5ffc0 | 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 |
| 5ffe0 | 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:...................... |
| 60000 | 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........ |
| 60020 | 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:............. |
| 60040 | 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 |
| 60060 | 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:.... |
| 60080 | 20 20 20 20 20 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 |
| 600a0 | 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 |
| 600c0 | 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:........................... |
| 600e0 | 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 |
| 60100 | 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:.................. |
| 60120 | 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.......... |
| 60140 | 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:......... |
| 60160 | 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. |
| 60180 | 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: |
| 601a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 601c0 | 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 |
| 601e0 | 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............................... |
| 60200 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 60220 | 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:............ |
| 60240 | 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 |
| 60260 | 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........... |
| 60280 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 602a0 | 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). |
| 602c0 | 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:........................ |
| 602e0 | 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 |
| 60300 | 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....................... |
| 60320 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 60340 | 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:.... |
| 60360 | 20 20 20 20 20 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 |
| 60380 | 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... |
| 603a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 603c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 | .............................(li |
| 603e0 | 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]:..... |
| 60400 | 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. |
| 60420 | 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....................... |
| 60440 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 60460 | 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:...... |
| 60480 | 20 20 20 20 20 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 |
| 604a0 | 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............... |
| 604c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 604e0 | 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. |
| 60500 | 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:............................ |
| 60520 | 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. |
| 60540 | 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:................... |
| 60560 | 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..... |
| 60580 | 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:.......... |
| 605a0 | 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. |
| 605c0 | 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:. |
| 605e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 60600 | 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). |
| 60620 | 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:........................ |
| 60640 | 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 |
| 60660 | 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:................. |
| 60680 | 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 |
| 606a0 | 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:........ |
| 606c0 | 20 20 20 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 |
| 606e0 | 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 |
| 60700 | 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. |
| 60720 | 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 |
| 60740 | 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 |
| 60760 | 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. |
| 60780 | 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.************** |
| 607a0 | 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 |
| 607c0 | 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 |
| 607e0 | 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 |
| 60800 | 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 |
| 60820 | 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:.................. |
| 60840 | 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). |
| 60860 | 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>:..... |
| 60880 | 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 |
| 608a0 | 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 |
| 608c0 | 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. |
| 608e0 | 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 |
| 60900 | 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 |
| 60920 | 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 |
| 60940 | 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:................. |
| 60960 | 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.. |
| 60980 | 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:....... |
| 609a0 | 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.... |
| 609c0 | 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 |
| 609e0 | 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 |
| 60a00 | 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 |
| 60a20 | 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 |
| 60a40 | 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).* |
| 60a60 | 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:......... |
| 60a80 | 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 |
| 60aa0 | 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:.. |
| 60ac0 | 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 |
| 60ae0 | 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- |
| 60b00 | 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 |
| 60b20 | 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 |
| 60b40 | 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:.................. |
| 60b60 | 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 |
| 60b80 | 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:.... |
| 60ba0 | 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........... |
| 60bc0 | 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 |
| 60be0 | 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.. |
| 60c00 | 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 |
| 60c20 | 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 |
| 60c40 | 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).*. |
| 60c60 | 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:.............. |
| 60c80 | 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. |
| 60ca0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 60cc0 | 20 20 20 20 20 20 20 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 | ...............................( |
| 60ce0 | 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 |
| 60d00 | 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 |
| 60d20 | 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 |
| 60d40 | 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 |
| 60d60 | 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............ |
| 60d80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 60da0 | 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).* |
| 60dc0 | 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:................ |
| 60de0 | 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 |
| 60e00 | 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:...... |
| 60e20 | 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. |
| 60e40 | 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....................... |
| 60e60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 60e80 | 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 |
| 60ea0 | 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 |
| 60ec0 | 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........... |
| 60ee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 60f00 | 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). |
| 60f20 | 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:....... |
| 60f40 | 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 |
| 60f60 | 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............................... |
| 60f80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 60fa0 | 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 |
| 60fc0 | 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 |
| 60fe0 | 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................... |
| 61000 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61020 | 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- |
| 61040 | 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:............... |
| 61060 | 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....... |
| 61080 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 610a0 | 20 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.. |
| 610c0 | 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:.... |
| 610e0 | 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. |
| 61100 | 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........................... |
| 61120 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61140 | 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 |
| 61160 | 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 |
| 61180 | 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............... |
| 611a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 611c0 | 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 |
| 611e0 | 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:........... |
| 61200 | 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... |
| 61220 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61240 | 20 20 20 20 20 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 |
| 61260 | 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 |
| 61280 | 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. |
| 612a0 | 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....................... |
| 612c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 612e0 | 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 |
| 61300 | 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 |
| 61320 | 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............... |
| 61340 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61360 | 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 |
| 61380 | 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:....................... |
| 613a0 | 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. |
| 613c0 | 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 |
| 613e0 | 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 |
| 61400 | 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.................. |
| 61420 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61440 | 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 |
| 61460 | 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:...... |
| 61480 | 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 |
| 614a0 | 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.............................. |
| 614c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 614e0 | 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 |
| 61500 | 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 |
| 61520 | 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.......... |
| 61540 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61560 | 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) |
| 61580 | 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 |
| 615a0 | 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 |
| 615c0 | 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...................... |
| 615e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61600 | 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 |
| 61620 | 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 |
| 61640 | 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.. |
| 61660 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61680 | 20 20 20 20 20 20 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 |
| 616a0 | 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 |
| 616c0 | 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 |
| 616e0 | 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.............. |
| 61700 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61720 | 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 |
| 61740 | 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:.. |
| 61760 | 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 |
| 61780 | 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.......................... |
| 617a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 617c0 | 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 |
| 617e0 | 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 |
| 61800 | 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...... |
| 61820 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61840 | 20 20 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. |
| 61860 | 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 |
| 61880 | 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 |
| 618a0 | 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.................. |
| 618c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 618e0 | 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 |
| 61900 | 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:.......... |
| 61920 | 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 |
| 61940 | 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.............................. |
| 61960 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61980 | 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 |
| 619a0 | 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 |
| 619c0 | 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.......... |
| 619e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61a00 | 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) |
| 61a20 | 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:........... |
| 61a40 | 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 |
| 61a60 | 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...................... |
| 61a80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61aa0 | 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 |
| 61ac0 | 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 |
| 61ae0 | 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.. |
| 61b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61b20 | 20 20 20 20 20 20 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 |
| 61b40 | 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 |
| 61b60 | 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 |
| 61b80 | 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.............. |
| 61ba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61bc0 | 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 |
| 61be0 | 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:........ |
| 61c00 | 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 |
| 61c20 | 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.......................... |
| 61c40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61c60 | 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 |
| 61c80 | 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 |
| 61ca0 | 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...... |
| 61cc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61ce0 | 20 20 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. |
| 61d00 | 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 |
| 61d20 | 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 |
| 61d40 | 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.................. |
| 61d60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61d80 | 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 |
| 61da0 | 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:................. |
| 61dc0 | 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 |
| 61de0 | 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.............................. |
| 61e00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61e20 | 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 |
| 61e40 | 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 |
| 61e60 | 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.......... |
| 61e80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61ea0 | 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) |
| 61ec0 | 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: |
| 61ee0 | 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 |
| 61f00 | 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...................... |
| 61f20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61f40 | 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 |
| 61f60 | 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 |
| 61f80 | 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.......... |
| 61fa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61fc0 | 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) |
| 61fe0 | 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:........... |
| 62000 | 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 |
| 62020 | 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.............................. |
| 62040 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 62060 | 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 |
| 62080 | 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 |
| 620a0 | 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.................. |
| 620c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 620e0 | 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 |
| 62100 | 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:................... |
| 62120 | 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...... |
| 62140 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 62160 | 20 20 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. |
| 62180 | 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:. |
| 621a0 | 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 |
| 621c0 | 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.......................... |
| 621e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 62200 | 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:.. |
| 62220 | 20 20 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 |
| 62240 | 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 |
| 62260 | 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:........... |
| 62280 | 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 |
| 622a0 | 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:.......... |
| 622c0 | 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............. |
| 622e0 | 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 |
| 62300 | 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 |
| 62320 | 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 |
| 62340 | 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 |
| 62360 | 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).*. |
| 62380 | 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:........... |
| 623a0 | 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 |
| 623c0 | 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 |
| 623e0 | 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 |
| 62400 | 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................ |
| 62420 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 62440 | 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 |
| 62460 | 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>: |
| 62480 | 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.. |
| 624a0 | 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 |
| 624c0 | 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...... |
| 624e0 | 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 |
| 62500 | 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 |
| 62520 | 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 |
| 62540 | 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 |
| 62560 | 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).* |
| 62580 | 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:............. |
| 625a0 | 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 |
| 625c0 | 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:..... |
| 625e0 | 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 |
| 62600 | 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. |
| 62620 | 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 |
| 62640 | 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,. |
| 62660 | 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 |
| 62680 | 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.*************************... |
| 626a0 | 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 |
| 626c0 | 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 |
| 626e0 | 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............... |
| 62700 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 62720 | 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 |
| 62740 | 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 |
| 62760 | 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. |
| 62780 | 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:.... |
| 627a0 | 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 |
| 627c0 | 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.................. |
| 627e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 62800 | 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 |
| 62820 | 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:................. |
| 62840 | 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 |
| 62860 | 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.............................. |
| 62880 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 628a0 | 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- |
| 628c0 | 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 |
| 628e0 | 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.......... |
| 62900 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 62920 | 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) |
| 62940 | 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:................ |
| 62960 | 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.. |
| 62980 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 629a0 | 20 20 20 20 20 20 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 |
| 629c0 | 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 |
| 629e0 | 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 |
| 62a00 | 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 |
| 62a20 | 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. |
| 62a40 | 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 |
| 62a60 | 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 |
| 62a80 | 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 |
| 62aa0 | 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 |
| 62ac0 | 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 |
| 62ae0 | 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 |
| 62b00 | 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 |
| 62b20 | 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 |
| 62b40 | 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 |
| 62b60 | 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 |
| 62b80 | 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 |
| 62ba0 | 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 |
| 62bc0 | 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/ |
| 62be0 | 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 |
| 62c00 | 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. |
| 62c20 | 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 |
| 62c40 | 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 |
| 62c60 | 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/ |
| 62c80 | 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/ |
| 62ca0 | 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 |
| 62cc0 | 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 |
| 62ce0 | 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 |
| 62d00 | 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 |
| 62d20 | 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 |
| 62d40 | 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 |
| 62d60 | 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 |
| 62d80 | 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 |
| 62da0 | 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 |
| 62dc0 | 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 |
| 62de0 | 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 |
| 62e00 | 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 |
| 62e20 | 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 |
| 62e40 | 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 |
| 62e60 | 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 |
| 62e80 | 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 |
| 62ea0 | 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 |
| 62ec0 | 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. |
| 62ee0 | 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 |
| 62f00 | 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 |
| 62f20 | 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 |
| 62f40 | 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. |
| 62f60 | 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 |
| 62f80 | 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 |
| 62fa0 | 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 |
| 62fc0 | 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.... |
| 62fe0 | 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 |
| 63000 | 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:............................. |
| 63020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 63040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 | ................................ |
 |
index : dotemacs.git | |
| my Emacs configuration | Craig Jennings |
| summaryrefslogtreecommitdiff |
blob: 3ba4388a46e8c4e88f99ddf3e4a7e7d1aaa4bcb3 (plain)