| ofs | hex dump | ascii |
|---|---|---|
| 0000 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 00 00 00 00 00 00 00 00 00 | calibredb-20240331.409/......... |
| 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 36 33 33 00 20 35 00 00 00 | 0000000.00000000000.012633..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 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 0220 | 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | -annotation.el.................. |
| 0240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0260 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| 0280 | 30 30 31 33 36 37 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 32 34 35 00 20 30 00 00 00 | 0013672.00000000000.017245..0... |
| 02a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0300 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0320 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0400 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2e 65 6c 20 2d 2d 2d 20 | ;;;.calibredb-annotation.el.---. |
| 0420 | 41 6e 6e 6f 74 61 74 69 6f 6e 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c 65 78 | Annotation.for.calibredb.-*-.lex |
| 0440 | 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 | ical-binding:.t;.-*-..;;.Copyrig |
| 0460 | 68 74 20 28 43 29 20 32 30 32 30 20 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 68 6f | ht.(C).2020.Damon.Chan..;;.Autho |
| 0480 | 72 3a 20 44 61 6d 6f 6e 20 43 68 61 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f | r:.Damon.Chan.<elecming@gmail.co |
| 04a0 | 6d 3e 0a 3b 3b 20 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 | m>.;;.URL:.https://github.com/ch |
| 04c0 | 65 6e 79 61 6e 6d 69 6e 67 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 6f 72 | enyanming/calibredb.el.;;.Keywor |
| 04e0 | 64 73 3a 20 74 6f 6f 6c 73 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a 3b 3b | ds:.tools.;;.Version:.2.12.0..;; |
| 0500 | 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d | .This.file.is.NOT.part.of.GNU.Em |
| 0520 | 61 63 73 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f | acs...;;.This.program.is.free.so |
| 0540 | 66 74 77 61 72 65 3b 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 | ftware;.you.can.redistribute.it. |
| 0560 | 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 74 65 | and/or.modify.;;.it.under.the.te |
| 0580 | 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 4c 69 | rms.of.the.GNU.General.Public.Li |
| 05a0 | 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 | cense.as.published.by.;;.the.Fre |
| 05c0 | 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 76 65 | e.Software.Foundation,.either.ve |
| 05e0 | 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 0a 3b 3b 20 28 61 | rsion.3.of.the.License,.or.;;.(a |
| 0600 | 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 6f 6e | t.your.option).any.later.version |
| 0620 | 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 | ...;;.This.program.is.distribute |
| 0640 | 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 73 | d.in.the.hope.that.it.will.be.us |
| 0660 | 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 54 | eful,.;;.but.WITHOUT.ANY.WARRANT |
| 0680 | 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 72 | Y;.without.even.the.implied.warr |
| 06a0 | 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 49 | anty.of.;;.MERCHANTABILITY.or.FI |
| 06c0 | 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 20 | TNESS.FOR.A.PARTICULAR.PURPOSE.. |
| 06e0 | 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 4c | .See.the.;;.GNU.General.Public.L |
| 0700 | 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 0a 3b 3b 20 59 6f 75 | icense.for.more.details...;;.You |
| 0720 | 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 6f 66 20 | .should.have.received.a.copy.of. |
| 0740 | 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 0a 3b | the.GNU.General.Public.License.; |
| 0760 | 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e | ;.along.with.this.program...If.n |
| 0780 | 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 |
| 07a0 | 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 3b 20 43 | enses/>...;;;.Commentary:..;;;.C |
| 07c0 | 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 29 0a | ode:..(require.'calibredb-core). |
| 07e0 | 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 67 65 74 | .(declare-function.calibredb-get |
| 0800 | 2d 69 6e 69 74 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 | -init."calibredb-utils.el").(dec |
| 0820 | 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e | lare-function.calibredb-find-can |
| 0840 | 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 | didate-at-point."calibredb-utils |
| 0860 | 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 | .el").(declare-function.calibred |
| 0880 | 62 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 73 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c | b-read-metadatas."calibredb-util |
| 08a0 | 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 | s.el").(declare-function.calibre |
| 08c0 | 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 20 22 63 61 6c | db-search-refresh-or-resume."cal |
| 08e0 | 69 62 72 65 64 62 2d 73 65 61 72 63 68 2e 65 6c 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 | ibredb-search.el")..(defvar.cali |
| 0900 | 62 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 63 61 6e 64 69 64 61 74 65 20 6e 69 6c 0a 20 | bredb-annotation-candidate.nil.. |
| 0920 | 20 22 4c 6f 63 61 6c 20 76 61 72 69 61 62 6c 65 20 75 73 65 64 20 69 6e 20 2a 63 61 6c 69 62 72 | ."Local.variable.used.in.*calibr |
| 0940 | 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2a 2e 22 29 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 | edb-annotation*.").(defvar.calib |
| 0960 | 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 70 61 72 61 6d 65 74 65 72 20 6e 69 6c 0a 20 20 | redb-annotation-parameter.nil... |
| 0980 | 22 4c 6f 63 61 6c 20 76 61 72 69 61 62 6c 65 20 75 73 65 64 20 69 6e 20 2a 63 61 6c 69 62 72 65 | "Local.variable.used.in.*calibre |
| 09a0 | 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2a 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 | db-annotation*.")..(defvar.calib |
| 09c0 | 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 68 65 61 64 65 72 2d 66 75 6e 63 | redb-edit-annotation-header-func |
| 09e0 | 74 69 6f 6e 20 23 27 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e | tion.#'calibredb-edit-annotation |
| 0a00 | 2d 68 65 61 64 65 72 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 74 68 61 74 20 72 65 74 75 72 6e 73 | -header..."Function.that.returns |
| 0a20 | 20 74 68 65 20 73 74 72 69 6e 67 20 74 6f 20 62 65 20 75 73 65 64 20 66 6f 72 20 74 68 65 20 43 | .the.string.to.be.used.for.the.C |
| 0a40 | 61 6c 69 62 72 65 64 62 20 65 64 69 74 20 61 6e 6e 6f 74 61 74 69 6f 6e 20 68 65 61 64 65 72 2e | alibredb.edit.annotation.header. |
| 0a60 | 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 | ")..(defvar.calibredb-edit-annot |
| 0a80 | 61 74 69 6f 6e 2d 74 65 78 74 2d 66 75 6e 63 20 6e 69 6c 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 | ation-text-func.nil..."Function. |
| 0aa0 | 74 6f 20 72 65 74 75 72 6e 20 64 65 66 61 75 6c 74 20 74 65 78 74 20 74 6f 20 75 73 65 20 66 6f | to.return.default.text.to.use.fo |
| 0ac0 | 72 20 61 6e 20 65 62 6f 6f 6b 20 61 6e 6e 6f 74 61 74 69 6f 6e 2e 0a 49 74 20 74 61 6b 65 73 20 | r.an.ebook.annotation..It.takes. |
| 0ae0 | 6f 6e 65 20 61 72 67 75 6d 65 6e 74 2c 20 74 68 65 20 74 69 74 6c 65 20 6f 66 20 74 68 65 20 65 | one.argument,.the.title.of.the.e |
| 0b00 | 62 6f 6f 6b 2c 20 61 73 20 61 20 73 74 72 69 6e 67 2e 0a 49 74 20 63 6f 75 6c 64 20 62 65 20 66 | book,.as.a.string..It.could.be.f |
| 0b20 | 75 6e 63 74 69 6f 6e 20 60 63 61 6c 69 62 72 65 64 62 2d 64 65 66 61 75 6c 74 2d 61 6e 6e 6f 74 | unction.`calibredb-default-annot |
| 0b40 | 61 74 69 6f 6e 2d 74 65 78 74 27 22 29 0a 0a 3b 3b 20 61 6e 6e 6f 74 61 74 69 6f 6e 0a 0a 28 64 | ation-text'")..;;.annotation..(d |
| 0b60 | 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 63 61 6c 69 62 72 65 64 62 2d 65 64 69 | efine-derived-mode.calibredb-edi |
| 0b80 | 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 6d 6f 64 65 20 6f 72 67 2d 6d 6f 64 65 20 22 63 61 6c 69 | t-annotation-mode.org-mode."cali |
| 0ba0 | 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 61 74 61 74 69 6f 6e 22 0a 20 20 22 4d 6f 64 65 20 66 | bredb-edit-annatation"..."Mode.f |
| 0bc0 | 6f 72 20 65 64 69 74 69 6e 67 20 74 68 65 20 61 6e 6e 6f 74 61 74 69 6f 6e 20 6f 66 20 61 20 65 | or.editing.the.annotation.of.a.e |
| 0be0 | 62 6f 6f 6b 2e 0a 57 68 65 6e 20 79 6f 75 20 68 61 76 65 20 66 69 6e 69 73 68 65 64 20 63 6f 6d | book..When.you.have.finished.com |
| 0c00 | 70 6f 73 69 6e 67 2c 20 75 73 65 20 60 43 2d 63 20 43 2d 63 27 2e 0a 5c 5c 7b 63 61 6c 69 62 72 | posing,.use.`C-c.C-c'..\\{calibr |
| 0c20 | 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 6d 6f 64 65 2d 6d 61 70 7d 22 0a 20 | edb-edit-annotation-mode-map}".. |
| 0c40 | 20 28 73 65 74 71 20 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 20 27 28 3a 65 76 61 | .(setq.header-line-format.'(:eva |
| 0c60 | 6c 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 | l.(funcall.calibredb-edit-annota |
| 0c80 | 74 69 6f 6e 2d 68 65 61 64 65 72 2d 66 75 6e 63 74 69 6f 6e 29 29 29 29 0a 0a 28 64 65 66 75 6e | tion-header-function))))..(defun |
| 0ca0 | 20 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 68 65 61 64 65 | .calibredb-edit-annotation-heade |
| 0cc0 | 72 20 28 29 0a 20 20 22 54 4f 44 4f 3a 20 52 65 74 75 72 6e 20 74 68 65 20 73 74 72 69 6e 67 20 | r.()..."TODO:.Return.the.string. |
| 0ce0 | 74 6f 20 62 65 20 75 73 65 64 20 61 73 20 74 68 65 20 43 61 6c 69 62 72 65 64 62 20 65 64 69 74 | to.be.used.as.the.Calibredb.edit |
| 0d00 | 20 61 6e 6e 6f 74 61 74 69 6f 6e 20 68 65 61 64 65 72 2e 22 0a 20 20 28 66 6f 72 6d 61 74 20 22 | .annotation.header."...(format." |
| 0d20 | 25 73 20 2d 3e 20 45 64 69 74 20 41 6e 6e 6f 74 61 74 69 6f 6e 2e 20 25 73 20 25 73 22 0a 20 20 | %s.->.Edit.Annotation..%s.%s"... |
| 0d40 | 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 | ........(propertize.(calibredb-g |
| 0d60 | 65 74 2d 69 6e 69 74 20 22 74 69 74 6c 65 22 20 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f 74 61 | et-init."title".calibredb-annota |
| 0d80 | 74 69 6f 6e 2d 63 61 6e 64 69 64 61 74 65 29 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 | tion-candidate).'face.'calibredb |
| 0da0 | 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 68 65 61 64 65 72 2d 74 69 74 6c 65 2d 66 61 | -edit-annotation-header-title-fa |
| 0dc0 | 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 46 69 6e 69 73 68 20 27 43 2d 63 20 43 2d 63 27 | ce)............"Finish.'C-c.C-c' |
| 0de0 | 2c 22 0a 20 20 20 20 20 20 20 20 20 20 20 22 61 62 6f 72 74 20 27 43 2d 63 20 43 2d 6b 27 2e 22 | ,"............"abort.'C-c.C-k'." |
| 0e00 | 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 | ))..(defun.calibredb-edit-annota |
| 0e20 | 74 69 6f 6e 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 50 6f | tion.(&optional.candidate)..."Po |
| 0e40 | 70 20 75 70 20 61 20 62 75 66 66 65 72 20 66 6f 72 20 65 64 69 74 69 6e 67 20 65 62 6f 6f 6b 20 | p.up.a.buffer.for.editing.ebook. |
| 0e60 | 43 41 4e 44 49 44 41 54 45 27 73 20 61 6e 6e 6f 74 61 74 69 6f 6e 2e 22 0a 20 20 28 69 6e 74 65 | CANDIDATE's.annotation."...(inte |
| 0e80 | 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 62 65 67 20 70 6f 73 29 0a 20 20 20 20 3b 3b | ractive)...(let.(beg.pos).....;; |
| 0ea0 | 20 73 61 76 65 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 20 70 6f 73 69 74 69 6f 6e 20 74 65 6d 70 | .save.the.original.position.temp |
| 0ec0 | 6f 72 61 72 79 2e 0a 20 20 20 20 28 73 65 74 71 20 62 65 67 20 28 70 6f 69 6e 74 29 29 0a 20 20 | orary......(setq.beg.(point))... |
| 0ee0 | 20 20 28 73 65 74 71 20 70 6f 73 20 28 77 69 6e 64 6f 77 2d 73 74 61 72 74 29 29 0a 20 20 20 20 | ..(setq.pos.(window-start))..... |
| 0f00 | 28 75 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 | (unless.candidate.......(setq.ca |
| 0f20 | 6e 64 69 64 61 74 65 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e | ndidate.(car.(calibredb-find-can |
| 0f40 | 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 28 70 6f 70 2d 74 6f 2d | didate-at-point)))).....(pop-to- |
| 0f60 | 62 75 66 66 65 72 20 28 67 65 6e 65 72 61 74 65 2d 6e 65 77 2d 62 75 66 66 65 72 2d 6e 61 6d 65 | buffer.(generate-new-buffer-name |
| 0f80 | 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 61 74 61 74 69 6f 6e 2a 22 29 29 | ."*calibredb-edit-annatation*")) |
| 0fa0 | 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 69 6e 73 65 72 74 2d 61 6e 6e 6f 74 61 74 69 6f | .....(calibredb-insert-annotatio |
| 0fc0 | 6e 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 | n.candidate).....(calibredb-edit |
| 0fe0 | 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 6d 6f 64 65 29 0a 20 20 20 20 28 73 65 74 20 28 6d 61 6b 65 | -annotation-mode).....(set.(make |
| 1000 | 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f 74 | -local-variable.'calibredb-annot |
| 1020 | 61 74 69 6f 6e 2d 63 61 6e 64 69 64 61 74 65 29 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 | ation-candidate).candidate)..... |
| 1040 | 28 73 65 74 20 28 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 63 61 6c 69 62 | (set.(make-local-variable.'calib |
| 1060 | 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 70 61 72 61 6d 65 74 65 72 29 20 60 28 2c 62 65 | redb-annotation-parameter).`(,be |
| 1080 | 67 20 2e 20 2c 70 6f 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 64 | g...,pos))))..(defun.calibredb-d |
| 10a0 | 65 66 61 75 6c 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 74 65 78 74 20 28 74 69 74 6c 65 29 0a 20 | efault-annotation-text.(title).. |
| 10c0 | 20 22 52 65 74 75 72 6e 20 64 65 66 61 75 6c 74 20 61 6e 6e 6f 74 61 74 69 6f 6e 20 74 65 78 74 | ."Return.default.annotation.text |
| 10e0 | 20 66 6f 72 20 54 49 54 4c 45 2e 0a 54 68 65 20 64 65 66 61 75 6c 74 20 61 6e 6e 6f 74 61 74 69 | .for.TITLE..The.default.annotati |
| 1100 | 6f 6e 20 74 65 78 74 20 69 73 20 73 69 6d 70 6c 79 20 73 6f 6d 65 20 74 65 78 74 20 65 78 70 6c | on.text.is.simply.some.text.expl |
| 1120 | 61 69 6e 69 6e 67 20 68 6f 77 20 74 6f 20 75 73 65 0a 61 6e 6e 6f 74 61 74 69 6f 6e 73 2e 22 0a | aining.how.to.use.annotations.". |
| 1140 | 20 20 28 63 6f 6e 63 61 74 20 22 23 20 20 54 79 70 65 20 74 68 65 20 61 6e 6e 6f 74 61 74 69 6f | ..(concat."#..Type.the.annotatio |
| 1160 | 6e 20 66 6f 72 20 69 74 65 6d 20 60 22 20 74 69 74 6c 65 20 22 27 20 68 65 72 65 2e 5c 6e 22 0a | n.for.item.`".title."'.here.\n". |
| 1180 | 20 20 20 20 20 20 20 20 20 20 22 23 20 20 41 6c 6c 20 6c 69 6e 65 73 20 74 68 61 74 20 73 74 61 | .........."#..All.lines.that.sta |
| 11a0 | 72 74 20 77 69 74 68 20 61 20 60 23 27 20 77 69 6c 6c 20 62 65 20 64 65 6c 65 74 65 64 2e 5c 6e | rt.with.a.`#'.will.be.deleted.\n |
| 11c0 | 22 0a 20 20 20 20 20 20 20 20 20 20 22 23 20 20 54 79 70 65 20 60 43 2d 63 20 43 2d 63 27 20 77 | "..........."#..Type.`C-c.C-c'.w |
| 11e0 | 68 65 6e 20 64 6f 6e 65 2e 5c 6e 23 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 22 23 20 20 41 75 | hen.done.\n#\n"..........."#..Au |
| 1200 | 74 68 6f 72 3a 20 22 20 28 75 73 65 72 2d 66 75 6c 6c 2d 6e 61 6d 65 29 20 22 20 3c 22 20 28 75 | thor:.".(user-full-name).".<".(u |
| 1220 | 73 65 72 2d 6c 6f 67 69 6e 2d 6e 61 6d 65 29 20 22 40 22 0a 20 20 20 20 20 20 20 20 20 20 28 73 | ser-login-name)."@"...........(s |
| 1240 | 79 73 74 65 6d 2d 6e 61 6d 65 29 20 22 3e 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 22 23 20 20 | ystem-name).">\n"..........."#.. |
| 1260 | 44 61 74 65 3a 20 20 20 20 22 20 28 63 75 72 72 65 6e 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 29 | Date:....".(current-time-string) |
| 1280 | 20 22 5c 6e 22 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 69 6e 73 65 72 74 | ."\n"))..(defun.calibredb-insert |
| 12a0 | 2d 61 6e 6e 6f 74 61 74 69 6f 6e 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 49 6e 73 65 72 | -annotation.(candidate)..."Inser |
| 12c0 | 74 20 61 6e 6e 6f 74 61 74 69 6f 6e 20 66 6f 72 20 43 41 4e 44 49 44 41 54 45 2e 22 0a 20 20 28 | t.annotation.for.CANDIDATE."...( |
| 12e0 | 77 68 65 6e 20 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 74 | when.calibredb-edit-annotation-t |
| 1300 | 65 78 74 2d 66 75 6e 63 0a 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 75 6e 63 61 6c 6c 20 63 61 | ext-func.....(insert.(funcall.ca |
| 1320 | 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 74 65 78 74 2d 66 75 6e | libredb-edit-annotation-text-fun |
| 1340 | 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 | c......................(calibred |
| 1360 | 62 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 73 20 22 74 69 74 6c 65 22 20 63 61 6e 64 69 64 61 | b-read-metadatas."title".candida |
| 1380 | 74 65 29 29 29 29 0a 20 20 28 6c 65 74 20 28 28 61 6e 6e 6f 74 61 74 69 6f 6e 20 20 28 63 61 6c | te))))...(let.((annotation..(cal |
| 13a0 | 69 62 72 65 64 62 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 73 20 22 63 6f 6d 6d 65 6e 74 73 22 | ibredb-read-metadatas."comments" |
| 13c0 | 20 63 61 6e 64 69 64 61 74 65 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 61 6e 6e | .candidate))).....(when.(and.ann |
| 13e0 | 6f 74 61 74 69 6f 6e 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 65 71 75 61 6c 20 61 6e 6e 6f | otation..(not.(string-equal.anno |
| 1400 | 74 61 74 69 6f 6e 20 22 22 29 29 29 20 28 69 6e 73 65 72 74 20 61 6e 6e 6f 74 61 74 69 6f 6e 29 | tation.""))).(insert.annotation) |
| 1420 | 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 6b 69 6c 6c 2d 6c 69 6e 65 20 | )))..(defun.calibredb-kill-line. |
| 1440 | 28 26 6f 70 74 69 6f 6e 61 6c 20 6e 65 77 6c 69 6e 65 2d 74 6f 6f 29 0a 20 20 22 4b 69 6c 6c 20 | (&optional.newline-too)..."Kill. |
| 1460 | 66 72 6f 6d 20 70 6f 69 6e 74 20 74 6f 20 65 6e 64 20 6f 66 20 6c 69 6e 65 2e 0a 49 66 20 6f 70 | from.point.to.end.of.line..If.op |
| 1480 | 74 69 6f 6e 61 6c 20 61 72 67 20 4e 45 57 4c 49 4e 45 2d 54 4f 4f 20 69 73 20 6e 6f 6e 2d 6e 69 | tional.arg.NEWLINE-TOO.is.non-ni |
| 14a0 | 6c 2c 20 64 65 6c 65 74 65 20 74 68 65 20 6e 65 77 6c 69 6e 65 20 74 6f 6f 2e 0a 44 6f 65 73 20 | l,.delete.the.newline.too..Does. |
| 14c0 | 6e 6f 74 20 61 66 66 65 63 74 20 74 68 65 20 6b 69 6c 6c 20 72 69 6e 67 2e 22 0a 20 20 28 6c 65 | not.affect.the.kill.ring."...(le |
| 14e0 | 74 20 28 28 65 6f 6c 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 20 20 | t.((eol.(line-end-position)))... |
| 1500 | 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 29 20 65 6f 6c 29 0a 20 20 | ..(delete-region.(point).eol)... |
| 1520 | 20 20 28 77 68 65 6e 20 28 61 6e 64 20 6e 65 77 6c 69 6e 65 2d 74 6f 6f 20 28 3d 20 28 66 6f 6c | ..(when.(and.newline-too.(=.(fol |
| 1540 | 6c 6f 77 69 6e 67 2d 63 68 61 72 29 20 3f 5c 6e 29 29 0a 20 20 20 20 20 20 28 64 65 6c 65 74 65 | lowing-char).?\n)).......(delete |
| 1560 | 2d 63 68 61 72 20 31 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 | -char.1))))..(defun.calibredb-se |
| 1580 | 6e 64 2d 65 64 69 74 65 64 2d 61 6e 6e 6f 74 61 74 69 6f 6e 20 28 29 0a 20 20 22 55 73 65 20 62 | nd-edited-annotation.()..."Use.b |
| 15a0 | 75 66 66 65 72 20 63 6f 6e 74 65 6e 74 73 20 61 73 20 61 6e 6e 6f 74 61 74 69 6f 6e 20 66 6f 72 | uffer.contents.as.annotation.for |
| 15c0 | 20 61 6e 20 65 62 6f 6f 6b 2e 0a 4c 69 6e 65 73 20 62 65 67 69 6e 6e 69 6e 67 20 77 69 74 68 20 | .an.ebook..Lines.beginning.with. |
| 15e0 | 60 23 27 20 61 72 65 20 69 67 6e 6f 72 65 64 2e 0a 42 6f 75 6e 64 20 74 6f 20 5c 5c 3c 43 2d 63 | `#'.are.ignored..Bound.to.\\<C-c |
| 1600 | 43 2d 63 3e 20 69 6e 20 60 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 | C-c>.in.`calibredb-edit-annotati |
| 1620 | 6f 6e 2d 6d 6f 64 65 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e | on-mode'."...(interactive)...(un |
| 1640 | 6c 65 73 73 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 63 61 6c 69 62 72 65 64 62 2d | less.(derived-mode-p.'calibredb- |
| 1660 | 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 6d 6f 64 65 29 0a 20 20 20 20 28 65 72 72 6f 72 | edit-annotation-mode).....(error |
| 1680 | 20 22 4e 6f 74 20 69 6e 20 6d 6f 64 65 20 64 65 72 69 76 65 64 20 66 72 6f 6d 20 60 63 61 6c 69 | ."Not.in.mode.derived.from.`cali |
| 16a0 | 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 6d 6f 64 65 27 22 29 29 0a 20 | bredb-edit-annotation-mode'")).. |
| 16c0 | 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 3b 3b 20 28 77 | .(goto-char.(point-min))...;;.(w |
| 16e0 | 68 69 6c 65 20 28 3c 20 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 20 28 69 66 | hile.(<.(point).(point-max)).(if |
| 1700 | 20 28 3d 20 28 66 6f 6c 6c 6f 77 69 6e 67 2d 63 68 61 72 29 20 3f 23 29 20 28 63 61 6c 69 62 72 | .(=.(following-char).?#).(calibr |
| 1720 | 65 64 62 2d 6b 69 6c 6c 2d 6c 69 6e 65 20 74 29 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 | edb-kill-line.t).(forward-line.1 |
| 1740 | 29 29 29 0a 20 20 28 6c 65 74 20 28 28 61 6e 6e 6f 74 61 74 69 6f 6e 20 20 20 20 20 20 28 62 75 | )))...(let.((annotation......(bu |
| 1760 | 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 28 70 6f | ffer-substring-no-properties.(po |
| 1780 | 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 20 20 28 | int-min).(point-max))).........( |
| 17a0 | 63 61 6e 64 69 64 61 74 65 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f 74 | candidate........calibredb-annot |
| 17c0 | 61 74 69 6f 6e 2d 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 20 20 20 20 28 62 65 67 20 20 20 | ation-candidate).........(beg... |
| 17e0 | 20 20 20 20 20 28 63 61 72 20 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 70 | .....(car.calibredb-annotation-p |
| 1800 | 61 72 61 6d 65 74 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 70 6f 73 20 20 20 20 20 20 20 20 28 | arameter)).........(pos........( |
| 1820 | 63 64 72 20 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 70 61 72 61 6d 65 74 | cdr.calibredb-annotation-paramet |
| 1840 | 65 72 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 3d 20 61 6e 6e 6f 74 61 74 | er))).....(when.(string=.annotat |
| 1860 | 69 6f 6e 20 22 22 29 20 28 73 65 74 71 20 61 6e 6e 6f 74 61 74 69 6f 6e 20 6e 69 6c 29 29 0a 20 | ion."").(setq.annotation.nil)).. |
| 1880 | 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 61 6e 64 20 3a 63 6f 6d 6d 61 6e 64 20 22 | ...(calibredb-command.:command." |
| 18a0 | 73 65 74 5f 6d 65 74 61 64 61 74 61 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | set_metadata"................... |
| 18c0 | 20 20 20 20 20 3a 6f 70 74 69 6f 6e 20 28 66 6f 72 6d 61 74 20 22 2d 2d 66 69 65 6c 64 20 25 73 | .....:option.(format."--field.%s |
| 18e0 | 3a 25 73 20 22 20 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 66 69 65 6c 64 | :%s.".calibredb-annotation-field |
| 1900 | 20 28 70 72 69 6e 31 2d 74 6f 2d 73 74 72 69 6e 67 20 61 6e 6e 6f 74 61 74 69 6f 6e 29 29 0a 20 | .(prin1-to-string.annotation)).. |
| 1920 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 28 63 61 6c 69 62 | ......................:id.(calib |
| 1940 | 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 3a 69 64 29 0a 20 20 20 20 | redb-getattr.candidate.:id)..... |
| 1960 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 | ...................:library.(for |
| 1980 | 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 20 5c 22 25 73 5c 22 22 20 63 61 6c 69 | mat."--library-path.\"%s\"".cali |
| 19a0 | 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 29 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d | bredb-root-dir)).....(calibredb- |
| 19c0 | 61 6e 6e 6f 74 61 74 69 6f 6e 2d 71 75 69 74 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d | annotation-quit).....(calibredb- |
| 19e0 | 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 20 62 65 67 20 70 6f 73 | search-refresh-or-resume.beg.pos |
| 1a00 | 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e | )))..(defun.calibredb-annotation |
| 1a20 | 2d 71 75 69 74 20 28 29 0a 20 20 22 51 75 69 74 20 2a 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 | -quit.()..."Quit.*calibredb-edit |
| 1a40 | 2d 61 6e 6e 61 74 61 74 69 6f 6e 2a 2e 0a 42 6f 75 6e 64 20 74 6f 20 5c 5c 3c 43 2d 63 43 2d 6b | -annatation*..Bound.to.\\<C-cC-k |
| 1a60 | 3e 20 69 6e 20 60 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d | >.in.`calibredb-edit-annotation- |
| 1a80 | 6d 6f 64 65 27 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 | mode'."...(interactive)...(when. |
| 1aa0 | 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 | (eq.major-mode.'calibredb-edit-a |
| 1ac0 | 6e 6e 6f 74 61 74 69 6f 6e 2d 6d 6f 64 65 29 0a 20 20 20 20 28 69 66 20 28 3c 20 28 6c 65 6e 67 | nnotation-mode).....(if.(<.(leng |
| 1ae0 | 74 68 20 28 77 69 6e 64 6f 77 2d 70 72 65 76 2d 62 75 66 66 65 72 73 29 29 20 32 29 0a 20 20 20 | th.(window-prev-buffers)).2).... |
| 1b00 | 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 71 75 69 74 2d 77 69 6e 64 | .....(progn...........(quit-wind |
| 1b20 | 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 22 2a 63 61 6c | ow)...........(kill-buffer."*cal |
| 1b40 | 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 61 74 61 74 69 6f 6e 2a 22 29 29 0a 20 20 20 20 20 | ibredb-edit-annatation*"))...... |
| 1b60 | 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c | .(kill-buffer))))..(provide.'cal |
| 1b80 | 69 62 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 29 0a 0a 3b 3b 3b 20 63 61 6c 69 62 72 65 64 | ibredb-annotation)..;;;.calibred |
| 1ba0 | 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 | b-annotation.el.ends.here....... |
| 1bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1c00 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 1c20 | 2d 63 6f 6e 73 75 6c 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 | -consult.el..................... |
| 1c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1c60 | 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 |
| 1c80 | 30 30 30 33 35 35 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 35 36 32 00 20 30 00 00 00 | 0003556.00000000000.016562..0... |
| 1ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1d00 | 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................... |
| 1d20 | 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................... |
| 1d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 1e00 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 73 75 6c 74 2e 65 6c 20 2d 2d 2d 20 53 75 70 | ;;;.calibredb-consult.el.---.Sup |
| 1e20 | 70 6f 72 74 20 63 6f 6e 73 75 6c 74 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c | port.consult.for.calibredb.-*-.l |
| 1e40 | 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 | exical-binding:.t;.-*-..;;.Copyr |
| 1e60 | 69 67 68 74 20 28 43 29 20 32 30 32 30 20 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 | ight.(C).2020.Damon.Chan..;;.Aut |
| 1e80 | 68 6f 72 3a 20 44 61 6d 6f 6e 20 43 68 61 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e | hor:.Damon.Chan.<elecming@gmail. |
| 1ea0 | 63 6f 6d 3e 0a 3b 3b 20 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f | com>.;;.URL:.https://github.com/ |
| 1ec0 | 63 68 65 6e 79 61 6e 6d 69 6e 67 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 | chenyanming/calibredb.el.;;.Keyw |
| 1ee0 | 6f 72 64 73 3a 20 74 6f 6f 6c 73 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a | ords:.tools.;;.Version:.2.12.0.. |
| 1f00 | 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 | ;;.This.file.is.NOT.part.of.GNU. |
| 1f20 | 45 6d 61 63 73 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 | Emacs...;;.This.program.is.free. |
| 1f40 | 73 6f 66 74 77 61 72 65 3b 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 |
| 1f60 | 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. |
| 1f80 | 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. |
| 1fa0 | 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 | License.as.published.by.;;.the.F |
| 1fc0 | 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. |
| 1fe0 | 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 0a 3b 3b 20 | version.3.of.the.License,.or.;;. |
| 2000 | 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 |
| 2020 | 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 | on...;;.This.program.is.distribu |
| 2040 | 74 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 | ted.in.the.hope.that.it.will.be. |
| 2060 | 75 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 | useful,.;;.but.WITHOUT.ANY.WARRA |
| 2080 | 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 | NTY;.without.even.the.implied.wa |
| 20a0 | 72 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 | rranty.of.;;.MERCHANTABILITY.or. |
| 20c0 | 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 | FITNESS.FOR.A.PARTICULAR.PURPOSE |
| 20e0 | 2e 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 | ...See.the.;;.GNU.General.Public |
| 2100 | 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 | .License.for.more.details...;;.Y |
| 2120 | 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 6f | ou.should.have.received.a.copy.o |
| 2140 | 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 |
| 2160 | 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 | .;;.along.with.this.program...If |
| 2180 | 20 6e 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 | .not,.see.<https://www.gnu.org/l |
| 21a0 | 69 63 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 3b | icenses/>...;;;.Commentary:..;;; |
| 21c0 | 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 | .Code:..(require.'calibredb-core |
| 21e0 | 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 29 0a 28 72 | ).(require.'calibredb-search).(r |
| 2200 | 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 29 0a 0a 28 65 76 61 6c 2d | equire.'calibredb-utils)..(eval- |
| 2220 | 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 73 | when-compile.(defvar.calibredb-s |
| 2240 | 65 61 72 63 68 2d 65 6e 74 72 69 65 73 29 29 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 | earch-entries)).(eval-when-compi |
| 2260 | 6c 65 20 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 | le.(defvar.calibredb-full-entrie |
| 2280 | 73 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 73 75 6c 74 2d 72 65 | s))..(defun.calibredb-consult-re |
| 22a0 | 61 64 20 28 61 72 67 29 0a 20 20 22 63 6f 6e 73 75 6c 74 20 72 65 61 64 20 66 6f 72 20 63 61 6c | ad.(arg)..."consult.read.for.cal |
| 22c0 | 69 62 72 65 64 62 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 | ibredb."...(interactive."P")...( |
| 22e0 | 69 66 20 28 66 62 6f 75 6e 64 70 20 27 63 6f 6e 73 75 6c 74 2d 2d 72 65 61 64 29 0a 20 20 20 20 | if.(fboundp.'consult--read)..... |
| 2300 | 20 20 28 6c 65 74 20 28 28 63 61 6e 64 69 64 61 74 65 73 20 28 69 66 20 63 61 6c 69 62 72 65 64 | ..(let.((candidates.(if.calibred |
| 2320 | 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | b-search-entries................ |
| 2340 | 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 0a | .......calibredb-search-entries. |
| 2360 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 | ....................(progn...... |
| 2380 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 | .................(setq.calibredb |
| 23a0 | 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 | -search-entries.(calibredb-candi |
| 23c0 | 64 61 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 28 73 | dates)).......................(s |
| 23e0 | 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 20 63 61 6c 69 62 | etq.calibredb-full-entries.calib |
| 2400 | 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 29 29 29 29 29 0a 20 20 20 20 20 20 20 | redb-search-entries)))))........ |
| 2420 | 20 28 69 66 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c | .(if.candidates.............(cal |
| 2440 | 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 20 28 63 6f 6e 73 75 6c 74 2d 2d 72 65 61 64 20 | ibredb-find-file.(consult--read. |
| 2460 | 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | candidates...................... |
| 2480 | 20 20 20 20 20 20 3a 70 72 6f 6d 70 74 20 22 50 69 63 6b 20 61 20 62 6f 6f 6b 3a 20 22 0a 20 20 | ......:prompt."Pick.a.book:."... |
| 24a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 6f 6f 6b 75 70 | .........................:lookup |
| 24c0 | 20 23 27 63 6f 6e 73 75 6c 74 2d 2d 6c 6f 6f 6b 75 70 2d 63 64 72 0a 20 20 20 20 20 20 20 20 20 | .#'consult--lookup-cdr.......... |
| 24e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 6f 72 74 20 6e 69 6c 29 20 61 72 67 | ..................:sort.nil).arg |
| 2500 | 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 49 4e 56 41 4c 49 44 20 4c 49 | )...........(message."INVALID.LI |
| 2520 | 42 52 41 52 59 22 29 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 65 64 62 | BRARY")))))..(provide.'calibredb |
| 2540 | 2d 63 6f 6e 73 75 6c 74 29 0a 0a 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 73 75 6c 74 | -consult)..;;;.calibredb-consult |
| 2560 | 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .el.ends.here................... |
| 2580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 25a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 25c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 25e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2600 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 2620 | 2d 63 6f 72 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 | -core.el........................ |
| 2640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2660 | 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 |
| 2680 | 30 31 30 31 34 31 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 30 31 32 00 20 30 00 00 00 | 0101413.00000000000.016012..0... |
| 26a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2700 | 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................... |
| 2720 | 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................... |
| 2740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2800 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 2e 65 6c 20 2d 2d 2d 20 43 6f 72 65 20 66 | ;;;.calibredb-core.el.---.Core.f |
| 2820 | 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 | or.calibredb.-*-.lexical-binding |
| 2840 | 3a 20 74 3b 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 32 30 20 | :.t;.-*-..;;.Copyright.(C).2020. |
| 2860 | 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 44 61 6d 6f 6e 20 43 68 61 | Damon.Chan..;;.Author:.Damon.Cha |
| 2880 | 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 55 52 4c 3a 20 68 | n.<elecming@gmail.com>.;;.URL:.h |
| 28a0 | 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 65 6e 79 61 6e 6d 69 6e 67 2f 63 61 | ttps://github.com/chenyanming/ca |
| 28c0 | 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 74 6f 6f 6c 73 0a 3b 3b | libredb.el.;;.Keywords:.tools.;; |
| 28e0 | 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 | .Version:.2.12.0..;;.This.file.i |
| 2900 | 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 73 2e 0a 0a 3b 3b 20 54 68 69 | s.NOT.part.of.GNU.Emacs...;;.Thi |
| 2920 | 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 | s.program.is.free.software;.you. |
| 2940 | 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 |
| 2960 | 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 |
| 2980 | 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 |
| 29a0 | 6c 69 73 68 65 64 20 62 79 0a 3b 3b 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 |
| 29c0 | 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 |
| 29e0 | 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f | he.License,.or.;;.(at.your.optio |
| 2a00 | 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 | n).any.later.version...;;.This.p |
| 2a20 | 72 6f 67 72 61 6d 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 | rogram.is.distributed.in.the.hop |
| 2a40 | 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 |
| 2a60 | 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 |
| 2a80 | 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 |
| 2aa0 | 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. |
| 2ac0 | 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.;;. |
| 2ae0 | 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 |
| 2b00 | 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 | ore.details...;;.You.should.have |
| 2b20 | 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 |
| 2b40 | 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 |
| 2b60 | 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 | .this.program...If.not,.see.<htt |
| 2b80 | 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 3b | ps://www.gnu.org/licenses/>...;; |
| 2ba0 | 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 | ;.Commentary:..;;;.Code:..(requi |
| 2bc0 | 72 65 20 27 73 29 0a 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 | re.'s).(require.'dash).(require. |
| 2be0 | 27 63 6c 2d 6c 69 62 29 0a 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6d 61 63 73 29 0a 28 72 65 71 | 'cl-lib).(require.'cl-macs).(req |
| 2c00 | 75 69 72 65 20 27 73 71 6c 29 0a 28 72 65 71 75 69 72 65 20 27 68 6c 2d 6c 69 6e 65 29 0a 28 72 | uire.'sql).(require.'hl-line).(r |
| 2c20 | 65 71 75 69 72 65 20 27 74 72 61 6e 73 69 65 6e 74 29 0a 28 72 65 71 75 69 72 65 20 27 73 65 6e | equire.'transient).(require.'sen |
| 2c40 | 64 6d 61 69 6c 29 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 65 64 29 0a 28 72 65 71 75 69 72 65 | dmail).(require.'dired).(require |
| 2c60 | 20 27 74 68 69 6e 67 61 74 70 74 29 0a 28 72 65 71 75 69 72 65 20 27 70 63 61 73 65 29 0a 28 72 | .'thingatpt).(require.'pcase).(r |
| 2c80 | 65 71 75 69 72 65 20 27 6d 61 69 6c 63 61 70 29 0a 0a 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 | equire.'mailcap)..(ignore-errors |
| 2ca0 | 0a 20 20 28 72 65 71 75 69 72 65 20 27 68 65 6c 6d 29 0a 20 20 28 72 65 71 75 69 72 65 20 27 69 | ...(require.'helm)...(require.'i |
| 2cc0 | 76 79 29 0a 20 20 28 72 65 71 75 69 72 65 20 27 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 29 0a 20 | vy)...(require.'all-the-icons).. |
| 2ce0 | 20 28 72 65 71 75 69 72 65 20 27 69 63 6f 6e 73 2d 69 6e 2d 74 65 72 6d 69 6e 61 6c 29 29 0a 0a | .(require.'icons-in-terminal)).. |
| 2d00 | 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 20 63 61 6c 69 62 | (eval-when-compile.(defvar.calib |
| 2d20 | 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 29 29 0a 28 65 76 61 6c 2d 77 68 65 6e 2d | redb-detailed-view)).(eval-when- |
| 2d40 | 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 | compile.(defvar.calibredb-full-e |
| 2d60 | 6e 74 72 69 65 73 29 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 | ntries)).(declare-function.calib |
| 2d80 | 72 65 64 62 2d 63 6f 6e 64 65 6e 73 65 2d 63 6f 6d 6d 65 6e 74 73 20 22 63 61 6c 69 62 72 65 64 | redb-condense-comments."calibred |
| 2da0 | 62 2d 73 65 61 72 63 68 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 | b-search.el").(declare-function. |
| 2dc0 | 63 61 6c 69 62 72 65 64 62 2d 61 74 74 61 63 68 2d 69 63 6f 6e 2d 66 6f 72 20 22 63 61 6c 69 62 | calibredb-attach-icon-for."calib |
| 2de0 | 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f | redb-utils.el").(declare-functio |
| 2e00 | 6e 20 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 22 63 61 6c 69 62 | n.calibredb-get-file-path."calib |
| 2e20 | 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 0a 0a 28 64 65 66 67 72 6f 75 70 20 63 61 6c 69 | redb-utils.el")...(defgroup.cali |
| 2e40 | 62 72 65 64 62 20 6e 69 6c 0a 20 20 22 63 61 6c 69 62 72 65 64 62 20 67 72 6f 75 70 22 0a 20 20 | bredb.nil..."calibredb.group"... |
| 2e60 | 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 | :group.'calibredb)..(defcustom.c |
| 2e80 | 61 6c 69 62 72 65 64 62 2d 64 62 2d 64 69 72 20 6e 69 6c 0a 20 20 22 4c 6f 63 61 74 69 6f 6e 20 | alibredb-db-dir.nil..."Location. |
| 2ea0 | 6f 66 20 5c 22 6d 65 74 61 64 61 74 61 2e 64 62 5c 22 20 69 6e 20 79 6f 75 72 20 63 61 6c 69 62 | of.\"metadata.db\".in.your.calib |
| 2ec0 | 72 65 20 6c 69 62 72 61 72 79 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 69 6c 65 0a 20 20 3a 67 72 | re.library."...:type.'file...:gr |
| 2ee0 | 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c | oup.'calibredb)...(defcustom.cal |
| 2f00 | 69 62 72 65 64 62 2d 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 20 | ibredb-ref-default-bibliography. |
| 2f20 | 6e 69 6c 0a 20 20 22 42 69 62 54 65 78 20 66 69 6c 65 20 66 6f 72 20 63 75 72 72 65 6e 74 20 6c | nil..."BibTex.file.for.current.l |
| 2f40 | 69 62 72 61 72 79 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 69 6c 65 0a 20 20 3a 67 72 6f 75 70 20 | ibrary."...:type.'file...:group. |
| 2f60 | 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 72 | 'calibredb)..(defvar.calibredb-r |
| 2f80 | 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 20 6e 69 6c 0a 20 20 22 4c 6f 63 61 74 69 6f 6e 20 6f 66 | oot-dir-quote.nil..."Location.of |
| 2fa0 | 20 69 6e 20 79 6f 75 72 20 63 61 6c 69 62 72 65 20 6c 69 62 72 61 72 79 20 28 65 78 70 61 6e 64 | .in.your.calibre.library.(expand |
| 2fc0 | 65 64 20 61 6e 64 20 71 75 6f 74 65 64 29 2e 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 | ed.and.quoted).")..(defcustom.ca |
| 2fe0 | 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 20 22 7e 2f 44 6f 63 75 6d 65 6e 74 73 2f 43 61 | libredb-root-dir."~/Documents/Ca |
| 3000 | 6c 69 62 72 65 2f 22 0a 20 20 22 44 69 72 65 63 74 6f 72 79 20 63 6f 6e 74 61 69 6e 69 6e 67 20 | libre/"..."Directory.containing. |
| 3020 | 79 6f 75 72 20 63 61 6c 69 62 72 65 20 6c 69 62 72 61 72 79 2e 22 0a 20 20 3a 74 79 70 65 20 27 | your.calibre.library."...:type.' |
| 3040 | 64 69 72 65 63 74 6f 72 79 0a 20 20 3a 73 65 74 20 28 6c 61 6d 62 64 61 20 28 76 61 72 20 76 61 | directory...:set.(lambda.(var.va |
| 3060 | 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 20 76 61 72 20 76 61 6c 75 65 29 0a 20 20 | lue)..........(set.var.value)... |
| 3080 | 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 64 69 72 20 28 65 | .......(setq.calibredb-db-dir.(e |
| 30a0 | 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 6d 65 74 61 64 61 74 61 2e 64 62 22 0a 20 20 | xpand-file-name."metadata.db"... |
| 30c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 30e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 | ................calibredb-root-d |
| 3100 | 69 72 29 29 29 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 | ir)))...:group.'calibredb)..(def |
| 3120 | 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 | custom.calibredb-virtual-library |
| 3140 | 2d 64 65 66 61 75 6c 74 2d 6e 61 6d 65 20 22 4c 69 62 72 61 72 79 22 0a 20 20 22 54 68 65 20 64 | -default-name."Library"..."The.d |
| 3160 | 65 66 61 75 6c 74 20 76 69 72 74 75 61 6c 20 6c 69 62 72 61 72 79 20 6e 61 6d 65 2e 22 0a 20 20 | efault.virtual.library.name."... |
| 3180 | 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e | :group.'calibredb...:type.'strin |
| 31a0 | 67 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 | g)..(defvar.calibredb-virtual-li |
| 31c0 | 62 72 61 72 79 2d 6e 61 6d 65 20 60 2c 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c | brary-name.`,calibredb-virtual-l |
| 31e0 | 69 62 72 61 72 79 2d 64 65 66 61 75 6c 74 2d 6e 61 6d 65 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d | ibrary-default-name)..(defcustom |
| 3200 | 20 63 61 6c 69 62 72 65 64 62 2d 64 6f 77 6e 6c 6f 61 64 2d 64 69 72 20 6e 69 6c 0a 20 20 22 53 | .calibredb-download-dir.nil..."S |
| 3220 | 74 72 69 6e 67 20 77 69 74 68 20 74 68 65 20 70 61 74 68 20 74 6f 20 6d 61 69 6e 20 64 6f 77 6e | tring.with.the.path.to.main.down |
| 3240 | 6c 6f 61 64 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 65 62 6f 6f 6b 73 2e 22 0a 20 20 3a 74 | load.directory.for.ebooks."...:t |
| 3260 | 79 70 65 20 27 66 69 6c 65 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a | ype.'file...:group.'calibredb).. |
| 3280 | 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 61 64 64 2d 64 65 6c 65 74 65 2d | (defcustom.calibredb-add-delete- |
| 32a0 | 6f 72 69 67 69 6e 61 6c 2d 66 69 6c 65 20 6e 69 6c 0a 20 20 22 41 66 74 65 72 20 61 64 64 69 6e | original-file.nil..."After.addin |
| 32c0 | 67 20 66 69 6c 65 2c 20 64 65 6c 65 74 65 20 6f 72 69 67 69 6e 61 6c 20 66 69 6c 65 3f 20 28 73 | g.file,.delete.original.file?.(s |
| 32e0 | 74 72 69 6e 67 20 5c 22 79 65 73 5c 22 2f 5c 22 6e 6f 5c 22 29 2e 0a 79 65 73 3a 20 44 65 6c 65 | tring.\"yes\"/\"no\")..yes:.Dele |
| 3300 | 74 65 20 77 69 74 68 6f 75 74 20 70 72 6f 6d 70 74 2e 0a 6e 6f 3a 20 4e 6f 20 64 65 6c 65 74 69 | te.without.prompt..no:.No.deleti |
| 3320 | 6f 6e 20 77 69 74 68 6f 75 74 20 70 72 6f 6d 70 74 2e 0a 6e 69 6c 3a 20 50 72 6f 6d 70 74 20 64 | on.without.prompt..nil:.Prompt.d |
| 3340 | 65 6c 65 74 65 20 6f 72 20 6e 6f 74 2e 22 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 0a 20 | elete.or.not."...:type.'string.. |
| 3360 | 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 | .:group.'calibredb)..(defcustom. |
| 3380 | 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 63 6f 76 65 72 73 20 6e 69 6c 0a 20 20 22 46 65 | calibredb-fetch-covers.nil..."Fe |
| 33a0 | 74 63 68 20 63 6f 76 65 72 20 77 68 65 6e 20 66 65 74 63 68 69 6e 67 20 6d 65 74 61 64 61 74 61 | tch.cover.when.fetching.metadata |
| 33c0 | 3f 20 28 73 74 72 69 6e 67 20 5c 22 79 65 73 5c 22 2f 5c 22 6e 6f 5c 22 29 2e 22 0a 20 20 3a 74 | ?.(string.\"yes\"/\"no\")."...:t |
| 33e0 | 79 70 65 20 27 73 74 72 69 6e 67 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 | ype.'string...:group.'calibredb) |
| 3400 | 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 72 65 73 75 | ..(defcustom.calibredb-show-resu |
| 3420 | 6c 74 73 20 6e 69 6c 0a 20 20 22 53 65 74 20 4e 6f 6e 2d 6e 69 6c 20 74 6f 20 73 68 6f 77 20 72 | lts.nil..."Set.Non-nil.to.show.r |
| 3440 | 65 73 75 6c 74 73 20 61 66 74 65 72 20 66 65 74 63 68 69 6e 67 20 6d 65 74 61 64 61 74 61 2e 22 | esults.after.fetching.metadata." |
| 3460 | 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 | ...:type.'boolean...:group.'cali |
| 3480 | 62 72 65 64 62 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 70 72 65 | bredb)..(defcustom.calibredb-pre |
| 34a0 | 66 65 72 72 65 64 2d 66 6f 72 6d 61 74 20 6e 69 6c 0a 20 20 22 53 65 74 20 74 6f 20 79 6f 75 72 | ferred-format.nil..."Set.to.your |
| 34c0 | 20 70 72 65 66 65 72 72 65 64 20 62 6f 6f 6b 20 66 6f 72 6d 61 74 2e 22 0a 20 20 3a 74 79 70 65 | .preferred.book.format."...:type |
| 34e0 | 20 27 73 74 72 69 6e 67 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 | .'string...:group.'calibredb)..( |
| 3500 | 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 | defcustom.calibredb-library-alis |
| 3520 | 74 20 60 28 28 2c 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 29 29 0a 20 20 22 41 6c | t.`((,calibredb-root-dir))..."Al |
| 3540 | 69 73 74 20 66 6f 72 20 61 6c 6c 20 79 6f 75 72 20 63 61 6c 69 62 72 65 20 6c 69 62 72 61 72 69 | ist.for.all.your.calibre.librari |
| 3560 | 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 61 6c 69 73 74 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 | es."...:type.'alist...:group.'ca |
| 3580 | 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 76 | libredb)..(defcustom.calibredb-v |
| 35a0 | 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 20 27 28 29 0a 20 20 22 41 6c 69 73 | irtual-library-alist.'()..."Alis |
| 35c0 | 74 20 66 6f 72 20 61 6c 6c 20 79 6f 75 72 20 63 61 6c 69 62 72 65 20 76 69 72 74 75 61 6c 20 6c | t.for.all.your.calibre.virtual.l |
| 35e0 | 69 62 72 61 72 69 65 73 2e 0a 31 2e 20 4c 65 66 74 20 69 73 20 74 68 65 20 76 69 72 74 75 61 6c | ibraries..1..Left.is.the.virtual |
| 3600 | 20 6c 69 62 72 61 72 79 20 6e 61 6d 65 20 74 68 61 74 20 73 68 6f 77 73 20 69 6e 20 74 68 65 20 | .library.name.that.shows.in.the. |
| 3620 | 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 20 68 65 61 64 65 72 2e 0a 32 2e 20 52 69 | *calibredb-search*.header..2..Ri |
| 3640 | 67 68 74 20 69 73 20 74 68 65 20 66 69 6c 74 65 72 20 6b 65 79 77 6f 72 64 73 20 2d 20 60 63 61 | ght.is.the.filter.keywords.-.`ca |
| 3660 | 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 72 27 2e 22 0a 20 20 3a 74 79 70 65 | libredb-search-filter'."...:type |
| 3680 | 20 27 61 6c 69 73 74 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 | .'alist...:group.'calibredb)..(d |
| 36a0 | 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 70 72 6f 67 72 61 6d 0a 20 20 28 63 6f | efcustom.calibredb-program...(co |
| 36c0 | 6e 64 0a 20 20 20 28 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 64 61 72 77 69 6e 29 0a | nd....((eq.system-type.'darwin). |
| 36e0 | 20 20 20 20 22 2f 41 70 70 6c 69 63 61 74 69 6f 6e 73 2f 63 61 6c 69 62 72 65 2e 61 70 70 2f 43 | ...."/Applications/calibre.app/C |
| 3700 | 6f 6e 74 65 6e 74 73 2f 4d 61 63 4f 53 2f 63 61 6c 69 62 72 65 64 62 22 29 0a 20 20 20 28 74 0a | ontents/MacOS/calibredb")....(t. |
| 3720 | 20 20 20 20 22 63 61 6c 69 62 72 65 64 62 22 29 29 0a 20 20 22 45 78 65 63 75 74 61 62 6c 65 20 | ...."calibredb"))..."Executable. |
| 3740 | 75 73 65 64 20 74 6f 20 61 63 63 65 73 73 20 74 68 65 20 63 61 6c 69 62 72 65 64 62 2e 22 0a 20 | used.to.access.the.calibredb.".. |
| 3760 | 20 3a 74 79 70 65 20 27 66 69 6c 65 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 | .:type.'file...:group.'calibredb |
| 3780 | 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d | )..(defcustom.calibredb-convert- |
| 37a0 | 70 72 6f 67 72 61 6d 0a 20 20 28 63 6f 6e 64 0a 20 20 20 28 28 65 71 20 73 79 73 74 65 6d 2d 74 | program...(cond....((eq.system-t |
| 37c0 | 79 70 65 20 27 64 61 72 77 69 6e 29 0a 20 20 20 20 22 2f 41 70 70 6c 69 63 61 74 69 6f 6e 73 2f | ype.'darwin)....."/Applications/ |
| 37e0 | 63 61 6c 69 62 72 65 2e 61 70 70 2f 43 6f 6e 74 65 6e 74 73 2f 4d 61 63 4f 53 2f 65 62 6f 6f 6b | calibre.app/Contents/MacOS/ebook |
| 3800 | 2d 63 6f 6e 76 65 72 74 22 29 0a 20 20 20 28 74 0a 20 20 20 20 22 65 62 6f 6f 6b 2d 63 6f 6e 76 | -convert")....(t....."ebook-conv |
| 3820 | 65 72 74 22 29 29 0a 20 20 22 45 78 65 63 75 74 61 62 6c 65 20 75 73 65 64 20 74 6f 20 63 6f 6e | ert"))..."Executable.used.to.con |
| 3840 | 76 65 72 74 20 65 62 6f 6f 6b 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 69 6c 65 0a 20 20 3a 67 | vert.ebooks."...:type.'file...:g |
| 3860 | 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c | roup.'calibredb)..(defcustom.cal |
| 3880 | 69 62 72 65 64 62 2d 64 65 76 69 63 65 2d 64 69 72 0a 20 20 28 63 6f 6e 64 20 28 28 65 71 20 73 | ibredb-device-dir...(cond.((eq.s |
| 38a0 | 79 73 74 65 6d 2d 74 79 70 65 20 27 67 6e 75 2f 6c 69 6e 75 78 29 0a 20 20 20 20 20 20 20 20 20 | ystem-type.'gnu/linux).......... |
| 38c0 | 22 2f 54 4f 44 4f 22 29 0a 20 20 20 20 20 20 20 20 28 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 | "/TODO").........((eq.system-typ |
| 38e0 | 65 20 27 77 69 6e 64 6f 77 73 2d 6e 74 29 0a 20 20 20 20 20 20 20 20 20 22 2f 54 4f 44 4f 22 29 | e.'windows-nt).........."/TODO") |
| 3900 | 0a 20 20 20 20 20 20 20 20 28 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 64 61 72 77 69 | .........((eq.system-type.'darwi |
| 3920 | 6e 29 0a 20 20 20 20 20 20 20 20 20 22 2f 56 6f 6c 75 6d 65 73 2f 4b 69 6e 64 6c 65 2f 64 6f 63 | n).........."/Volumes/Kindle/doc |
| 3940 | 75 6d 65 6e 74 73 2f 22 29 0a 20 20 20 20 20 20 20 20 28 74 20 22 2f 54 4f 44 4f 22 29 29 0a 20 | uments/").........(t."/TODO")).. |
| 3960 | 20 22 44 69 72 65 63 74 6f 72 79 20 6f 66 20 65 6c 65 63 74 72 6f 6e 69 63 20 64 65 76 69 63 65 | ."Directory.of.electronic.device |
| 3980 | 2c 20 65 2e 67 2e 20 6b 69 6e 64 6c 65 2e 22 0a 20 20 3a 74 79 70 65 20 27 64 69 72 65 63 74 6f | ,.e.g..kindle."...:type.'directo |
| 39a0 | 72 79 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 63 75 73 | ry...:group.'calibredb)..(defcus |
| 39c0 | 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 64 65 62 75 67 2d 70 72 6f 67 72 61 6d 0a 20 20 28 63 | tom.calibredb-debug-program...(c |
| 39e0 | 6f 6e 64 0a 20 20 20 28 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 64 61 72 77 69 6e 29 | ond....((eq.system-type.'darwin) |
| 3a00 | 0a 20 20 20 20 22 2f 41 70 70 6c 69 63 61 74 69 6f 6e 73 2f 63 61 6c 69 62 72 65 2e 61 70 70 2f | ....."/Applications/calibre.app/ |
| 3a20 | 43 6f 6e 74 65 6e 74 73 2f 4d 61 63 4f 53 2f 63 61 6c 69 62 72 65 2d 64 65 62 75 67 22 29 0a 20 | Contents/MacOS/calibre-debug").. |
| 3a40 | 20 20 28 74 0a 20 20 20 20 22 63 61 6c 69 62 72 65 2d 64 65 62 75 67 22 29 29 0a 20 20 22 45 78 | ..(t....."calibre-debug"))..."Ex |
| 3a60 | 65 63 75 74 61 62 6c 65 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 2d 64 65 62 75 67 20 77 68 69 | ecutable.for.calibredb-debug.whi |
| 3a80 | 63 68 20 69 73 20 75 73 65 64 20 66 6f 72 20 61 75 74 68 6f 72 5f 73 6f 72 74 20 61 6c 67 6f 72 | ch.is.used.for.author_sort.algor |
| 3aa0 | 69 74 68 6d 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 69 6c 65 0a 20 20 3a 67 72 6f 75 70 20 27 63 | ithm."...:type.'file...:group.'c |
| 3ac0 | 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d | alibredb)..(defcustom.calibredb- |
| 3ae0 | 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 2d 70 72 6f 67 72 61 6d 0a 20 20 28 63 6f 6e 64 0a 20 | fetch-metadata-program...(cond.. |
| 3b00 | 20 20 28 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 64 61 72 77 69 6e 29 0a 20 20 20 20 | ..((eq.system-type.'darwin)..... |
| 3b20 | 22 2f 41 70 70 6c 69 63 61 74 69 6f 6e 73 2f 63 61 6c 69 62 72 65 2e 61 70 70 2f 43 6f 6e 74 65 | "/Applications/calibre.app/Conte |
| 3b40 | 6e 74 73 2f 4d 61 63 4f 53 2f 66 65 74 63 68 2d 65 62 6f 6f 6b 2d 6d 65 74 61 64 61 74 61 22 29 | nts/MacOS/fetch-ebook-metadata") |
| 3b60 | 0a 20 20 20 28 74 0a 20 20 20 20 22 66 65 74 63 68 2d 65 62 6f 6f 6b 2d 6d 65 74 61 64 61 74 61 | ....(t....."fetch-ebook-metadata |
| 3b80 | 22 29 29 0a 20 20 22 45 78 65 63 75 74 61 62 6c 65 20 75 73 65 64 20 74 6f 20 66 65 74 63 68 20 | "))..."Executable.used.to.fetch. |
| 3ba0 | 65 62 6f 6f 6b 20 6d 65 74 61 64 61 74 61 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 69 6c 65 0a 20 | ebook.metadata."...:type.'file.. |
| 3bc0 | 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 | .:group.'calibredb)..(defcustom. |
| 3be0 | 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 2d 73 6f 75 72 63 65 2d | calibredb-fetch-metadata-source- |
| 3c00 | 6c 69 73 74 20 27 28 22 47 6f 6f 67 6c 65 22 20 22 41 6d 61 7a 6f 6e 2e 63 6f 6d 22 29 0a 20 20 | list.'("Google"."Amazon.com")... |
| 3c20 | 22 53 6f 75 72 63 65 20 61 6c 69 73 74 20 75 73 65 64 20 74 6f 20 66 65 74 63 68 20 65 62 6f 6f | "Source.alist.used.to.fetch.eboo |
| 3c40 | 6b 20 6d 65 74 61 64 61 74 61 2e 22 0a 20 20 3a 74 79 70 65 20 27 73 65 78 70 0a 20 20 3a 67 72 | k.metadata."...:type.'sexp...:gr |
| 3c60 | 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 | oup.'calibredb)..(defcustom.cali |
| 3c80 | 62 72 65 64 62 2d 73 71 6c 2d 73 65 70 61 72 61 74 6f 72 20 22 5c 33 22 0a 20 20 22 53 51 4c 20 | bredb-sql-separator."\3"..."SQL. |
| 3ca0 | 73 65 70 61 72 61 74 6f 72 2c 20 75 73 65 64 20 69 6e 20 70 61 72 73 69 6e 67 20 53 51 4c 20 72 | separator,.used.in.parsing.SQL.r |
| 3cc0 | 65 73 75 6c 74 20 69 6e 74 6f 20 6c 69 73 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 | esult.into.list."...:group.'cali |
| 3ce0 | 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 | bredb...:type.'string)..(defcust |
| 3d00 | 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 73 71 6c 2d 6e 65 77 6c 69 6e 65 20 22 5c 32 22 0a 20 20 | om.calibredb-sql-newline."\2"... |
| 3d20 | 22 53 51 4c 20 6e 65 77 6c 69 6e 65 2c 20 75 73 65 64 20 69 6e 20 70 61 72 73 69 6e 67 20 53 51 | "SQL.newline,.used.in.parsing.SQ |
| 3d40 | 4c 20 72 65 73 75 6c 74 20 69 6e 74 6f 20 6c 69 73 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 | L.result.into.list."...:group.'c |
| 3d60 | 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 63 | alibredb...:type.'string)..(defc |
| 3d80 | 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 69 64 2d 77 69 64 74 68 20 34 0a 20 20 22 57 69 | ustom.calibredb-id-width.4..."Wi |
| 3da0 | 64 74 68 20 66 6f 72 20 69 64 2e 0a 53 65 74 20 30 20 74 6f 20 68 69 64 65 2c 0a 53 65 74 20 6e | dth.for.id..Set.0.to.hide,.Set.n |
| 3dc0 | 65 67 61 74 69 76 65 20 74 6f 20 6b 65 65 70 20 6f 72 69 67 69 6e 61 6c 20 6c 65 6e 67 74 68 2e | egative.to.keep.original.length. |
| 3de0 | 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 69 | "...:group.'calibredb...:type.'i |
| 3e00 | 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 66 6f | nteger)..(defcustom.calibredb-fo |
| 3e20 | 72 6d 61 74 2d 77 69 64 74 68 20 35 0a 20 20 22 57 69 64 74 68 20 66 6f 72 20 66 69 6c 65 20 66 | rmat-width.5..."Width.for.file.f |
| 3e40 | 6f 72 6d 61 74 2e 0a 53 65 74 20 30 20 74 6f 20 68 69 64 65 2c 0a 53 65 74 20 6e 65 67 61 74 69 | ormat..Set.0.to.hide,.Set.negati |
| 3e60 | 76 65 20 74 6f 20 6b 65 65 70 20 6f 72 69 67 69 6e 61 6c 20 6c 65 6e 67 74 68 2e 22 0a 20 20 3a | ve.to.keep.original.length."...: |
| 3e80 | 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 | group.'calibredb...:type.'intege |
| 3ea0 | 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 77 69 64 | r)..(defcustom.calibredb-tag-wid |
| 3ec0 | 74 68 20 2d 31 0a 20 20 22 57 69 64 74 68 20 66 6f 72 20 74 61 67 2e 0a 53 65 74 20 30 20 74 6f | th.-1..."Width.for.tag..Set.0.to |
| 3ee0 | 20 68 69 64 65 2c 0a 53 65 74 20 6e 65 67 61 74 69 76 65 20 74 6f 20 6b 65 65 70 20 6f 72 69 67 | .hide,.Set.negative.to.keep.orig |
| 3f00 | 69 6e 61 6c 20 6c 65 6e 67 74 68 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 | inal.length."...:group.'calibred |
| 3f20 | 62 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 | b...:type.'integer)..(defcustom. |
| 3f40 | 63 61 6c 69 62 72 65 64 62 2d 69 64 73 2d 77 69 64 74 68 20 30 0a 20 20 22 57 69 64 74 68 20 66 | calibredb-ids-width.0..."Width.f |
| 3f60 | 6f 72 20 69 64 73 2e 0a 53 65 74 20 30 20 74 6f 20 68 69 64 65 2c 0a 53 65 74 20 6e 65 67 61 74 | or.ids..Set.0.to.hide,.Set.negat |
| 3f80 | 69 76 65 20 74 6f 20 6b 65 65 70 20 6f 72 69 67 69 6e 61 6c 20 6c 65 6e 67 74 68 2e 22 0a 20 20 | ive.to.keep.original.length."... |
| 3fa0 | 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 | :group.'calibredb...:type.'integ |
| 3fc0 | 65 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 74 69 74 6c 65 2d | er)..(defcustom.calibredb-title- |
| 3fe0 | 77 69 64 74 68 20 35 30 0a 20 20 22 57 69 64 74 68 20 66 6f 72 20 74 69 74 6c 65 2e 0a 53 65 74 | width.50..."Width.for.title..Set |
| 4000 | 20 30 20 74 6f 20 68 69 64 65 2c 0a 53 65 74 20 6e 65 67 61 74 69 76 65 20 74 6f 20 6b 65 65 70 | .0.to.hide,.Set.negative.to.keep |
| 4020 | 20 6f 72 69 67 69 6e 61 6c 20 6c 65 6e 67 74 68 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c | .original.length."...:group.'cal |
| 4040 | 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 63 75 | ibredb...:type.'integer)..(defcu |
| 4060 | 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 77 69 64 74 68 20 2d 31 0a 20 | stom.calibredb-author-width.-1.. |
| 4080 | 20 22 57 69 64 74 68 20 66 6f 72 20 61 75 74 68 6f 72 2e 0a 53 65 74 20 30 20 74 6f 20 68 69 64 | ."Width.for.author..Set.0.to.hid |
| 40a0 | 65 2c 0a 53 65 74 20 6e 65 67 61 74 69 76 65 20 74 6f 20 6b 65 65 70 20 6f 72 69 67 69 6e 61 6c | e,.Set.negative.to.keep.original |
| 40c0 | 20 6c 65 6e 67 74 68 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 | .length."...:group.'calibredb... |
| 40e0 | 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 | :type.'integer)..(defcustom.cali |
| 4100 | 62 72 65 64 62 2d 63 6f 6d 6d 65 6e 74 2d 77 69 64 74 68 20 31 30 30 0a 20 20 22 57 69 64 74 68 | bredb-comment-width.100..."Width |
| 4120 | 20 66 6f 72 20 63 6f 6d 6d 65 6e 74 2e 0a 53 65 74 20 30 20 74 6f 20 68 69 64 65 2c 0a 53 65 74 | .for.comment..Set.0.to.hide,.Set |
| 4140 | 20 6e 65 67 61 74 69 76 65 20 74 6f 20 6b 65 65 70 20 6f 72 69 67 69 6e 61 6c 20 6c 65 6e 67 74 | .negative.to.keep.original.lengt |
| 4160 | 68 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 | h."...:group.'calibredb...:type. |
| 4180 | 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d | 'integer)..(defcustom.calibredb- |
| 41a0 | 64 61 74 65 2d 77 69 64 74 68 20 31 31 0a 20 20 22 57 69 64 74 68 20 66 6f 72 20 6c 61 73 74 5f | date-width.11..."Width.for.last_ |
| 41c0 | 6d 6f 64 69 66 69 65 64 20 64 61 74 65 2e 0a 53 65 74 20 30 20 74 6f 20 68 69 64 65 2c 0a 53 65 | modified.date..Set.0.to.hide,.Se |
| 41e0 | 74 20 6e 65 67 61 74 69 76 65 20 74 6f 20 6b 65 65 70 20 6f 72 69 67 69 6e 61 6c 20 6c 65 6e 67 | t.negative.to.keep.original.leng |
| 4200 | 74 68 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 | th."...:group.'calibredb...:type |
| 4220 | 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 | .'integer)..(defcustom.calibredb |
| 4240 | 2d 73 69 7a 65 2d 73 68 6f 77 20 6e 69 6c 0a 20 20 22 53 65 74 20 4e 6f 6e 2d 6e 69 6c 20 74 6f | -size-show.nil..."Set.Non-nil.to |
| 4260 | 20 73 68 6f 77 20 73 69 7a 65 20 69 6e 64 69 63 61 74 6f 72 2e 22 0a 20 20 3a 67 72 6f 75 70 20 | .show.size.indicator."...:group. |
| 4280 | 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 | 'calibredb...:type.'boolean)..(d |
| 42a0 | 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 69 61 73 20 27 63 | efine-obsolete-variable-alias.'c |
| 42c0 | 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 69 63 6f 6e 73 0a 20 20 27 63 61 6c 69 62 72 65 | alibredb-format-icons...'calibre |
| 42e0 | 64 62 2d 66 6f 72 6d 61 74 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 20 22 63 61 6c 69 62 72 65 | db-format-all-the-icons."calibre |
| 4300 | 64 62 20 32 2e 33 2e 32 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 | db.2.3.2")..(defcustom.calibredb |
| 4320 | 2d 66 6f 72 6d 61 74 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 20 6e 69 6c 0a 20 20 22 53 65 74 | -format-all-the-icons.nil..."Set |
| 4340 | 20 4e 6f 6e 2d 6e 69 6c 20 74 6f 20 73 68 6f 77 20 66 69 6c 65 20 66 6f 72 6d 61 74 20 69 63 6f | .Non-nil.to.show.file.format.ico |
| 4360 | 6e 73 20 77 69 74 68 20 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2e 22 0a 20 20 3a 67 72 6f 75 70 | ns.with.all-the-icons."...:group |
| 4380 | 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 | .'calibredb...:type.'boolean)..( |
| 43a0 | 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 69 63 6f 6e 73 | defcustom.calibredb-format-icons |
| 43c0 | 2d 69 6e 2d 74 65 72 6d 69 6e 61 6c 20 6e 69 6c 0a 20 20 22 53 65 74 20 4e 6f 6e 2d 6e 69 6c 20 | -in-terminal.nil..."Set.Non-nil. |
| 43e0 | 74 6f 20 73 68 6f 77 20 66 69 6c 65 20 66 6f 72 6d 61 74 20 69 63 6f 6e 73 20 77 69 74 68 20 69 | to.show.file.format.icons.with.i |
| 4400 | 63 6f 6e 73 2d 69 6e 2d 74 65 72 6d 69 6e 61 6c 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c | cons-in-terminal."...:group.'cal |
| 4420 | 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 75 | ibredb...:type.'boolean)..(defcu |
| 4440 | 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 63 68 61 72 61 63 74 65 72 2d | stom.calibredb-format-character- |
| 4460 | 69 63 6f 6e 73 20 6e 69 6c 0a 20 20 22 53 65 74 20 4e 6f 6e 2d 6e 69 6c 20 74 6f 20 73 68 6f 77 | icons.nil..."Set.Non-nil.to.show |
| 4480 | 20 66 69 6c 65 20 66 6f 72 6d 61 74 20 69 63 6f 6e 73 20 77 69 74 68 20 62 75 69 6c 74 2d 69 6e | .file.format.icons.with.built-in |
| 44a0 | 20 63 68 61 72 61 63 74 65 72 20 69 63 6f 6e 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c | .character.icons."...:group.'cal |
| 44c0 | 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 75 | ibredb...:type.'boolean)..(defcu |
| 44e0 | 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d 6b 65 79 77 6f 72 64 20 | stom.calibredb-favorite-keyword. |
| 4500 | 22 66 61 76 6f 72 69 74 65 22 0a 20 20 22 54 68 65 20 66 61 76 6f 72 69 74 65 20 74 61 67 2e 22 | "favorite"..."The.favorite.tag." |
| 4520 | 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 73 74 | ...:group.'calibredb...:type.'st |
| 4540 | 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f | ring)..(defcustom.calibredb-favo |
| 4560 | 72 69 74 65 2d 69 63 6f 6e 20 22 e2 98 85 22 0a 20 20 22 54 68 65 20 66 61 76 6f 72 69 74 65 20 | rite-icon."..."..."The.favorite. |
| 4580 | 69 63 6f 6e 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 | icon."...:group.'calibredb...:ty |
| 45a0 | 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 | pe.'string)..(defcustom.calibred |
| 45c0 | 62 2d 61 72 63 68 69 76 65 2d 6b 65 79 77 6f 72 64 20 22 61 72 63 68 69 76 65 22 0a 20 20 22 54 | b-archive-keyword."archive"..."T |
| 45e0 | 68 65 20 61 72 63 68 69 76 65 20 74 61 67 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 | he.archive.tag."...:group.'calib |
| 4600 | 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f | redb...:type.'string)..(defcusto |
| 4620 | 6d 20 63 61 6c 69 62 72 65 64 62 2d 68 69 67 68 6c 69 67 68 74 2d 6b 65 79 77 6f 72 64 20 22 68 | m.calibredb-highlight-keyword."h |
| 4640 | 69 67 68 6c 69 67 68 74 22 0a 20 20 22 54 68 65 20 68 69 67 68 6c 69 67 68 74 20 74 61 67 2e 22 | ighlight"..."The.highlight.tag." |
| 4660 | 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 73 74 | ...:group.'calibredb...:type.'st |
| 4680 | 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f | ring)..(defcustom.calibredb-anno |
| 46a0 | 74 61 74 69 6f 6e 2d 66 69 65 6c 64 20 22 63 6f 6d 6d 65 6e 74 73 22 0a 20 20 22 54 68 65 20 66 | tation-field."comments"..."The.f |
| 46c0 | 69 65 6c 64 20 74 6f 20 62 65 20 73 61 76 65 64 20 74 68 65 20 61 6e 6e 6f 74 61 74 69 6f 6e 2e | ield.to.be.saved.the.annotation. |
| 46e0 | 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 73 | "...:group.'calibredb...:type.'s |
| 4700 | 74 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e | tring)..(defcustom.calibredb-con |
| 4720 | 64 65 6e 73 65 2d 63 6f 6d 6d 65 6e 74 73 20 74 0a 20 20 22 43 6f 6e 64 65 6e 73 65 20 63 6f 6d | dense-comments.t..."Condense.com |
| 4740 | 6d 65 6e 74 73 20 69 6e 74 6f 20 6f 6e 65 20 6c 69 6e 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 | ments.into.one.line."...:group.' |
| 4760 | 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 | calibredb...:type.'boolean)..(de |
| 4780 | 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2d 72 65 6e 64 65 72 2d 63 | fcustom.calibredb-entry-render-c |
| 47a0 | 6f 6d 6d 65 6e 74 73 20 22 73 68 72 22 0a 20 20 22 52 65 6e 64 65 72 20 63 6f 6d 6d 65 6e 74 73 | omments."shr"..."Render.comments |
| 47c0 | 20 69 6e 20 2a 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2a 20 62 75 66 66 65 72 2e 0a 31 2e | .in.*calibredb-entry*.buffer..1. |
| 47e0 | 20 66 61 63 65 3a 20 52 65 6e 64 65 72 20 77 69 74 68 20 66 61 63 65 20 60 63 61 6c 69 62 72 65 | .face:.Render.with.face.`calibre |
| 4800 | 64 62 2d 63 6f 6d 6d 65 6e 74 2d 66 61 63 65 27 2e 0a 32 2e 20 73 68 72 3a 20 52 65 6e 64 65 72 | db-comment-face'..2..shr:.Render |
| 4820 | 20 77 69 74 68 20 73 68 72 20 28 53 69 6d 70 6c 65 20 48 54 4d 4c 20 52 65 6e 64 65 72 29 2e 0a | .with.shr.(Simple.HTML.Render).. |
| 4840 | 33 2e 20 61 6e 6e 6f 74 61 74 69 6f 6e 3a 20 52 65 6e 64 65 72 20 77 69 74 68 20 60 63 61 6c 69 | 3..annotation:.Render.with.`cali |
| 4860 | 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 6d 6f 64 65 27 2e 22 0a 20 20 | bredb-edit-annotation-mode'."... |
| 4880 | 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e | :group.'calibredb...:type.'strin |
| 48a0 | 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 61 64 64 2d 64 75 70 | g)..(defcustom.calibredb-add-dup |
| 48c0 | 6c 69 63 61 74 65 20 74 0a 20 20 22 41 64 64 20 66 69 6c 65 20 74 6f 20 63 61 6c 69 62 72 65 64 | licate.t..."Add.file.to.calibred |
| 48e0 | 62 20 65 76 65 6e 20 69 74 20 69 73 20 64 75 70 6c 69 63 61 74 65 64 2c 20 77 68 65 6e 20 75 73 | b.even.it.is.duplicated,.when.us |
| 4900 | 69 6e 67 20 60 63 61 6c 69 62 72 65 64 62 2d 61 64 64 27 2e 20 53 65 74 20 6e 69 6c 20 74 6f 20 | ing.`calibredb-add'..Set.nil.to. |
| 4920 | 44 69 73 61 62 6c 65 20 69 74 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 | Disable.it."...:type.'boolean... |
| 4940 | 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 | :group.'calibredb)..(defcustom.c |
| 4960 | 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 27 69 64 0a 20 20 22 53 6f 72 74 20 74 68 65 | alibredb-sort-by.'id..."Sort.the |
| 4980 | 20 72 65 73 75 6c 74 73 20 62 79 20 6d 65 74 61 64 61 74 61 2e 22 0a 20 20 3a 74 79 70 65 20 27 | .results.by.metadata."...:type.' |
| 49a0 | 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 69 64 29 0a 20 20 20 | (choice...........(const.id).... |
| 49c0 | 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 | .......(const.title)...........( |
| 49e0 | 63 6f 6e 73 74 20 66 6f 72 6d 61 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 61 | const.format)...........(const.a |
| 4a00 | 75 74 68 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 64 61 74 65 29 0a 20 20 | uthor)...........(const.date)... |
| 4a20 | 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 70 75 62 64 61 74 65 29 0a 20 20 20 20 20 20 20 20 | ........(const.pubdate)......... |
| 4a40 | 20 20 28 63 6f 6e 73 74 20 74 61 67 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 73 | ..(const.tag)...........(const.s |
| 4a60 | 69 7a 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 6c 61 6e 67 75 61 67 65 29 29 | ize)...........(const.language)) |
| 4a80 | 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 63 75 73 74 6f | ...:group.'calibredb)..(defcusto |
| 4aa0 | 6d 20 63 61 6c 69 62 72 65 64 62 2d 6f 72 64 65 72 20 27 64 65 73 63 0a 20 20 22 53 6f 72 74 20 | m.calibredb-order.'desc..."Sort. |
| 4ac0 | 74 68 65 20 72 65 73 75 6c 74 73 20 62 79 20 6f 72 64 65 72 2e 22 0a 20 20 3a 74 79 70 65 20 27 | the.results.by.order."...:type.' |
| 4ae0 | 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 61 73 63 29 0a 20 20 | (choice...........(const.asc)... |
| 4b00 | 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 64 65 73 63 29 29 0a 20 20 3a 67 72 6f 75 70 20 27 | ........(const.desc))...:group.' |
| 4b20 | 63 61 6c 69 62 72 65 64 62 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 71 75 | calibredb)..(defvar.calibredb-qu |
| 4b40 | 65 72 79 2d 73 74 72 69 6e 67 2d 6f 6c 64 20 22 0a 53 45 4c 45 43 54 20 69 64 2c 20 61 75 74 68 | ery-string-old.".SELECT.id,.auth |
| 4b60 | 6f 72 5f 73 6f 72 74 2c 20 70 61 74 68 2c 20 6e 61 6d 65 2c 20 66 6f 72 6d 61 74 2c 20 70 75 62 | or_sort,.path,.name,.format,.pub |
| 4b80 | 64 61 74 65 2c 20 74 69 74 6c 65 2c 20 67 72 6f 75 70 5f 63 6f 6e 63 61 74 28 44 49 53 54 49 4e | date,.title,.group_concat(DISTIN |
| 4ba0 | 43 54 20 74 61 67 29 20 41 53 20 74 61 67 2c 20 75 6e 63 6f 6d 70 72 65 73 73 65 64 5f 73 69 7a | CT.tag).AS.tag,.uncompressed_siz |
| 4bc0 | 65 2c 20 74 65 78 74 2c 20 6c 61 73 74 5f 6d 6f 64 69 66 69 65 64 0a 46 52 4f 4d 0a 20 20 28 53 | e,.text,.last_modified.FROM...(S |
| 4be0 | 45 4c 45 43 54 20 73 75 62 32 2e 69 64 2c 20 73 75 62 32 2e 61 75 74 68 6f 72 5f 73 6f 72 74 2c | ELECT.sub2.id,.sub2.author_sort, |
| 4c00 | 20 73 75 62 32 2e 70 61 74 68 2c 20 73 75 62 32 2e 6e 61 6d 65 2c 20 73 75 62 32 2e 66 6f 72 6d | .sub2.path,.sub2.name,.sub2.form |
| 4c20 | 61 74 2c 20 73 75 62 32 2e 70 75 62 64 61 74 65 2c 20 73 75 62 32 2e 74 69 74 6c 65 2c 20 73 75 | at,.sub2.pubdate,.sub2.title,.su |
| 4c40 | 62 32 2e 74 61 67 2c 20 73 75 62 32 2e 75 6e 63 6f 6d 70 72 65 73 73 65 64 5f 73 69 7a 65 2c 20 | b2.tag,.sub2.uncompressed_size,. |
| 4c60 | 63 6f 6d 6d 65 6e 74 73 2e 74 65 78 74 2c 20 73 75 62 32 2e 6c 61 73 74 5f 6d 6f 64 69 66 69 65 | comments.text,.sub2.last_modifie |
| 4c80 | 64 0a 20 20 46 52 4f 4d 0a 20 20 20 20 28 53 45 4c 45 43 54 20 63 68 69 6c 64 2e 69 64 2c 20 63 | d...FROM.....(SELECT.child.id,.c |
| 4ca0 | 68 69 6c 64 2e 61 75 74 68 6f 72 5f 73 6f 72 74 2c 20 63 68 69 6c 64 2e 70 61 74 68 2c 20 63 68 | hild.author_sort,.child.path,.ch |
| 4cc0 | 69 6c 64 2e 6e 61 6d 65 2c 20 63 68 69 6c 64 2e 66 6f 72 6d 61 74 2c 20 63 68 69 6c 64 2e 70 75 | ild.name,.child.format,.child.pu |
| 4ce0 | 62 64 61 74 65 2c 20 63 68 69 6c 64 2e 74 69 74 6c 65 2c 20 63 68 69 6c 64 2e 6c 61 73 74 5f 6d | bdate,.child.title,.child.last_m |
| 4d00 | 6f 64 69 66 69 65 64 2c 20 74 61 67 73 2e 6e 61 6d 65 20 41 53 20 74 61 67 2c 20 63 68 69 6c 64 | odified,.tags.name.AS.tag,.child |
| 4d20 | 2e 75 6e 63 6f 6d 70 72 65 73 73 65 64 5f 73 69 7a 65 0a 20 20 20 20 46 52 4f 4d 0a 20 20 20 20 | .uncompressed_size.....FROM..... |
| 4d40 | 20 20 28 53 45 4c 45 43 54 20 73 75 62 2e 69 64 2c 20 73 75 62 2e 61 75 74 68 6f 72 5f 73 6f 72 | ..(SELECT.sub.id,.sub.author_sor |
| 4d60 | 74 2c 20 73 75 62 2e 70 61 74 68 2c 20 73 75 62 2e 6e 61 6d 65 2c 20 73 75 62 2e 66 6f 72 6d 61 | t,.sub.path,.sub.name,.sub.forma |
| 4d80 | 74 2c 20 73 75 62 2e 70 75 62 64 61 74 65 2c 20 73 75 62 2e 74 69 74 6c 65 2c 20 73 75 62 2e 6c | t,.sub.pubdate,.sub.title,.sub.l |
| 4da0 | 61 73 74 5f 6d 6f 64 69 66 69 65 64 2c 20 73 75 62 2e 75 6e 63 6f 6d 70 72 65 73 73 65 64 5f 73 | ast_modified,.sub.uncompressed_s |
| 4dc0 | 69 7a 65 2c 20 62 6f 6f 6b 73 5f 74 61 67 73 5f 6c 69 6e 6b 2e 74 61 67 0a 20 20 20 20 20 20 46 | ize,.books_tags_link.tag.......F |
| 4de0 | 52 4f 4d 0a 20 20 20 20 20 20 20 20 28 53 45 4c 45 43 54 20 62 2e 69 64 2c 20 62 2e 61 75 74 68 | ROM.........(SELECT.b.id,.b.auth |
| 4e00 | 6f 72 5f 73 6f 72 74 2c 20 62 2e 70 61 74 68 2c 20 64 2e 6e 61 6d 65 2c 20 64 2e 66 6f 72 6d 61 | or_sort,.b.path,.d.name,.d.forma |
| 4e20 | 74 2c 20 62 2e 70 75 62 64 61 74 65 2c 20 62 2e 74 69 74 6c 65 2c 20 62 2e 6c 61 73 74 5f 6d 6f | t,.b.pubdate,.b.title,.b.last_mo |
| 4e40 | 64 69 66 69 65 64 2c 20 64 2e 75 6e 63 6f 6d 70 72 65 73 73 65 64 5f 73 69 7a 65 0a 20 20 20 20 | dified,.d.uncompressed_size..... |
| 4e60 | 20 20 20 20 46 52 4f 4d 20 64 61 74 61 20 41 53 20 64 0a 20 20 20 20 20 20 20 20 4c 45 46 54 20 | ....FROM.data.AS.d.........LEFT. |
| 4e80 | 4f 55 54 45 52 20 4a 4f 49 4e 20 62 6f 6f 6b 73 20 41 53 20 62 0a 20 20 20 20 20 20 20 20 4f 4e | OUTER.JOIN.books.AS.b.........ON |
| 4ea0 | 20 64 2e 62 6f 6f 6b 20 3d 20 62 2e 69 64 29 20 41 53 20 73 75 62 0a 20 20 20 20 20 20 20 20 4c | .d.book.=.b.id).AS.sub.........L |
| 4ec0 | 45 46 54 20 4f 55 54 45 52 20 4a 4f 49 4e 20 62 6f 6f 6b 73 5f 74 61 67 73 5f 6c 69 6e 6b 0a 20 | EFT.OUTER.JOIN.books_tags_link.. |
| 4ee0 | 20 20 20 20 20 20 20 4f 4e 20 73 75 62 2e 69 64 20 3d 20 62 6f 6f 6b 73 5f 74 61 67 73 5f 6c 69 | .......ON.sub.id.=.books_tags_li |
| 4f00 | 6e 6b 2e 62 6f 6f 6b 29 20 41 53 20 63 68 69 6c 64 0a 20 20 20 20 20 20 4c 45 46 54 20 4f 55 54 | nk.book).AS.child.......LEFT.OUT |
| 4f20 | 45 52 20 4a 4f 49 4e 20 74 61 67 73 0a 20 20 20 20 20 20 4f 4e 20 63 68 69 6c 64 2e 74 61 67 20 | ER.JOIN.tags.......ON.child.tag. |
| 4f40 | 3d 20 74 61 67 73 2e 69 64 29 20 61 73 20 73 75 62 32 0a 20 20 20 20 4c 45 46 54 20 4f 55 54 45 | =.tags.id).as.sub2.....LEFT.OUTE |
| 4f60 | 52 20 4a 4f 49 4e 20 63 6f 6d 6d 65 6e 74 73 0a 20 20 20 20 4f 4e 20 73 75 62 32 2e 69 64 20 3d | R.JOIN.comments.....ON.sub2.id.= |
| 4f80 | 20 63 6f 6d 6d 65 6e 74 73 2e 62 6f 6f 6b 29 0a 47 52 4f 55 50 20 42 59 20 69 64 2c 20 66 6f 72 | .comments.book).GROUP.BY.id,.for |
| 4fa0 | 6d 61 74 22 0a 20 20 22 54 4f 44 4f 20 63 61 6c 69 62 72 65 20 64 61 74 61 62 61 73 65 20 71 75 | mat"..."TODO.calibre.database.qu |
| 4fc0 | 65 72 79 20 73 74 61 74 65 6d 65 6e 74 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 | ery.statement.")..(defvar.calibr |
| 4fe0 | 65 64 62 2d 71 75 65 72 79 2d 73 74 72 69 6e 67 20 22 0a 57 49 54 48 20 64 20 41 53 20 28 0a 20 | edb-query-string.".WITH.d.AS.(.. |
| 5000 | 20 20 20 53 45 4c 45 43 54 20 62 6f 6f 6b 73 2e 69 64 2c 20 62 6f 6f 6b 73 2e 69 64 20 61 73 20 | ...SELECT.books.id,.books.id.as. |
| 5020 | 62 6f 6f 6b 2c 20 66 6f 72 6d 61 74 2c 20 75 6e 63 6f 6d 70 72 65 73 73 65 64 5f 73 69 7a 65 2c | book,.format,.uncompressed_size, |
| 5040 | 20 6e 61 6d 65 0a 20 20 20 20 46 52 4f 4d 20 62 6f 6f 6b 73 0a 20 20 20 20 4c 45 46 54 20 4a 4f | .name.....FROM.books.....LEFT.JO |
| 5060 | 49 4e 20 64 61 74 61 0a 20 20 20 20 4f 4e 20 62 6f 6f 6b 73 2e 69 64 20 3d 20 64 61 74 61 2e 62 | IN.data.....ON.books.id.=.data.b |
| 5080 | 6f 6f 6b 0a 20 20 20 20 57 48 45 52 45 20 64 61 74 61 2e 62 6f 6f 6b 20 49 53 20 4e 55 4c 4c 0a | ook.....WHERE.data.book.IS.NULL. |
| 50a0 | 20 20 20 20 55 4e 49 4f 4e 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 0a 20 20 20 20 46 52 4f 4d 20 | ....UNION.....SELECT.*.....FROM. |
| 50c0 | 64 61 74 61 0a 29 2c 20 74 20 41 53 20 28 0a 20 20 20 20 53 45 4c 45 43 54 20 62 6f 6f 6b 73 5f | data.),.t.AS.(.....SELECT.books_ |
| 50e0 | 74 61 67 73 5f 6c 69 6e 6b 2e 62 6f 6f 6b 2c 20 67 72 6f 75 70 5f 63 6f 6e 63 61 74 28 44 49 53 | tags_link.book,.group_concat(DIS |
| 5100 | 54 49 4e 43 54 20 74 61 67 73 2e 6e 61 6d 65 29 20 41 53 20 74 61 67 0a 20 20 20 20 46 52 4f 4d | TINCT.tags.name).AS.tag.....FROM |
| 5120 | 20 62 6f 6f 6b 73 5f 74 61 67 73 5f 6c 69 6e 6b 0a 20 20 20 20 4c 45 46 54 20 4a 4f 49 4e 20 74 | .books_tags_link.....LEFT.JOIN.t |
| 5140 | 61 67 73 0a 20 20 20 20 4f 4e 20 62 6f 6f 6b 73 5f 74 61 67 73 5f 6c 69 6e 6b 2e 74 61 67 20 3d | ags.....ON.books_tags_link.tag.= |
| 5160 | 20 74 61 67 73 2e 69 64 0a 20 20 20 20 47 52 4f 55 50 20 42 59 20 62 6f 6f 6b 73 5f 74 61 67 73 | .tags.id.....GROUP.BY.books_tags |
| 5180 | 5f 6c 69 6e 6b 2e 62 6f 6f 6b 0a 29 2c 20 70 20 41 53 20 28 0a 20 20 20 20 53 45 4c 45 43 54 20 | _link.book.),.p.AS.(.....SELECT. |
| 51a0 | 62 6f 6f 6b 73 5f 70 75 62 6c 69 73 68 65 72 73 5f 6c 69 6e 6b 2e 62 6f 6f 6b 2c 20 70 75 62 6c | books_publishers_link.book,.publ |
| 51c0 | 69 73 68 65 72 73 2e 6e 61 6d 65 0a 20 20 20 20 46 52 4f 4d 20 62 6f 6f 6b 73 5f 70 75 62 6c 69 | ishers.name.....FROM.books_publi |
| 51e0 | 73 68 65 72 73 5f 6c 69 6e 6b 0a 20 20 20 20 4c 45 46 54 20 4a 4f 49 4e 20 70 75 62 6c 69 73 68 | shers_link.....LEFT.JOIN.publish |
| 5200 | 65 72 73 0a 20 20 20 20 4f 4e 20 62 6f 6f 6b 73 5f 70 75 62 6c 69 73 68 65 72 73 5f 6c 69 6e 6b | ers.....ON.books_publishers_link |
| 5220 | 2e 70 75 62 6c 69 73 68 65 72 20 3d 20 70 75 62 6c 69 73 68 65 72 73 2e 69 64 0a 29 2c 20 73 20 | .publisher.=.publishers.id.),.s. |
| 5240 | 41 53 20 28 0a 20 20 20 20 53 45 4c 45 43 54 20 62 6f 6f 6b 73 5f 73 65 72 69 65 73 5f 6c 69 6e | AS.(.....SELECT.books_series_lin |
| 5260 | 6b 2e 62 6f 6f 6b 2c 20 73 65 72 69 65 73 2e 6e 61 6d 65 0a 20 20 20 20 46 52 4f 4d 20 62 6f 6f | k.book,.series.name.....FROM.boo |
| 5280 | 6b 73 5f 73 65 72 69 65 73 5f 6c 69 6e 6b 0a 20 20 20 20 4c 45 46 54 20 4a 4f 49 4e 20 73 65 72 | ks_series_link.....LEFT.JOIN.ser |
| 52a0 | 69 65 73 0a 20 20 20 20 4f 4e 20 62 6f 6f 6b 73 5f 73 65 72 69 65 73 5f 6c 69 6e 6b 2e 73 65 72 | ies.....ON.books_series_link.ser |
| 52c0 | 69 65 73 20 3d 20 73 65 72 69 65 73 2e 69 64 0a 29 2c 20 6c 20 41 53 20 28 0a 20 20 20 20 53 45 | ies.=.series.id.),.l.AS.(.....SE |
| 52e0 | 4c 45 43 54 20 62 6f 6f 6b 73 5f 6c 61 6e 67 75 61 67 65 73 5f 6c 69 6e 6b 2e 62 6f 6f 6b 2c 20 | LECT.books_languages_link.book,. |
| 5300 | 6c 61 6e 67 75 61 67 65 73 2e 6c 61 6e 67 5f 63 6f 64 65 0a 20 20 20 20 46 52 4f 4d 20 62 6f 6f | languages.lang_code.....FROM.boo |
| 5320 | 6b 73 5f 6c 61 6e 67 75 61 67 65 73 5f 6c 69 6e 6b 0a 20 20 20 20 4c 45 46 54 20 4a 4f 49 4e 20 | ks_languages_link.....LEFT.JOIN. |
| 5340 | 6c 61 6e 67 75 61 67 65 73 0a 20 20 20 20 4f 4e 20 62 6f 6f 6b 73 5f 6c 61 6e 67 75 61 67 65 73 | languages.....ON.books_languages |
| 5360 | 5f 6c 69 6e 6b 2e 6c 61 6e 67 5f 63 6f 64 65 20 3d 20 6c 61 6e 67 75 61 67 65 73 2e 69 64 0a 29 | _link.lang_code.=.languages.id.) |
| 5380 | 2c 20 62 20 41 53 20 28 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 0a 20 20 20 20 46 52 4f 4d 20 62 | ,.b.AS.(.....SELECT.*.....FROM.b |
| 53a0 | 6f 6f 6b 73 0a 29 0a 53 45 4c 45 43 54 20 64 2e 62 6f 6f 6b 20 41 53 20 69 64 2c 20 62 2e 61 75 | ooks.).SELECT.d.book.AS.id,.b.au |
| 53c0 | 74 68 6f 72 5f 73 6f 72 74 2c 20 62 2e 70 61 74 68 2c 20 64 2e 6e 61 6d 65 2c 20 67 72 6f 75 70 | thor_sort,.b.path,.d.name,.group |
| 53e0 | 5f 63 6f 6e 63 61 74 28 44 49 53 54 49 4e 43 54 20 64 2e 66 6f 72 6d 61 74 29 20 61 73 20 66 6f | _concat(DISTINCT.d.format).as.fo |
| 5400 | 72 6d 61 74 2c 20 62 2e 70 75 62 64 61 74 65 2c 20 62 2e 74 69 74 6c 65 2c 20 74 2e 74 61 67 2c | rmat,.b.pubdate,.b.title,.t.tag, |
| 5420 | 20 64 2e 75 6e 63 6f 6d 70 72 65 73 73 65 64 5f 73 69 7a 65 2c 20 63 2e 74 65 78 74 2c 20 67 72 | .d.uncompressed_size,.c.text,.gr |
| 5440 | 6f 75 70 5f 63 6f 6e 63 61 74 28 69 2e 74 79 70 65 20 7c 7c 20 27 3a 27 20 7c 7c 20 69 2e 76 61 | oup_concat(i.type.||.':'.||.i.va |
| 5460 | 6c 29 20 41 53 20 69 64 73 2c 20 70 2e 6e 61 6d 65 20 41 53 20 70 75 62 6c 69 73 68 65 72 2c 20 | l).AS.ids,.p.name.AS.publisher,. |
| 5480 | 73 2e 6e 61 6d 65 20 41 53 20 73 65 72 69 65 73 2c 20 6c 2e 6c 61 6e 67 5f 63 6f 64 65 2c 20 62 | s.name.AS.series,.l.lang_code,.b |
| 54a0 | 2e 6c 61 73 74 5f 6d 6f 64 69 66 69 65 64 0a 46 52 4f 4d 20 64 0a 4c 45 46 54 20 4a 4f 49 4e 20 | .last_modified.FROM.d.LEFT.JOIN. |
| 54c0 | 70 0a 4f 4e 20 64 2e 62 6f 6f 6b 20 3d 20 70 2e 62 6f 6f 6b 0a 4c 45 46 54 20 4a 4f 49 4e 20 73 | p.ON.d.book.=.p.book.LEFT.JOIN.s |
| 54e0 | 0a 4f 4e 20 64 2e 62 6f 6f 6b 20 3d 20 73 2e 62 6f 6f 6b 0a 4c 45 46 54 20 4a 4f 49 4e 20 74 0a | .ON.d.book.=.s.book.LEFT.JOIN.t. |
| 5500 | 4f 4e 20 64 2e 62 6f 6f 6b 20 3d 20 74 2e 62 6f 6f 6b 0a 4c 45 46 54 20 4a 4f 49 4e 20 6c 0a 4f | ON.d.book.=.t.book.LEFT.JOIN.l.O |
| 5520 | 4e 20 64 2e 62 6f 6f 6b 20 3d 20 6c 2e 62 6f 6f 6b 0a 4c 45 46 54 20 4a 4f 49 4e 20 63 6f 6d 6d | N.d.book.=.l.book.LEFT.JOIN.comm |
| 5540 | 65 6e 74 73 20 41 53 20 63 0a 4f 4e 20 64 2e 62 6f 6f 6b 20 3d 20 63 2e 62 6f 6f 6b 0a 4c 45 46 | ents.AS.c.ON.d.book.=.c.book.LEF |
| 5560 | 54 20 4a 4f 49 4e 20 62 0a 4f 4e 20 64 2e 62 6f 6f 6b 20 3d 20 62 2e 69 64 0a 4c 45 46 54 20 4a | T.JOIN.b.ON.d.book.=.b.id.LEFT.J |
| 5580 | 4f 49 4e 20 69 64 65 6e 74 69 66 69 65 72 73 20 41 53 20 69 0a 4f 4e 20 64 2e 62 6f 6f 6b 20 3d | OIN.identifiers.AS.i.ON.d.book.= |
| 55a0 | 20 69 2e 62 6f 6f 6b 0a 47 52 4f 55 50 20 42 59 20 64 2e 62 6f 6f 6b 22 0a 20 20 22 54 4f 44 4f | .i.book.GROUP.BY.d.book"..."TODO |
| 55c0 | 20 63 61 6c 69 62 72 65 20 64 61 74 61 62 61 73 65 20 71 75 65 72 79 20 73 74 61 74 65 6d 65 6e | .calibre.database.query.statemen |
| 55e0 | 74 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 2d 73 65 61 | t.")..(defun.calibredb-query-sea |
| 5600 | 72 63 68 2d 73 74 72 69 6e 67 20 28 66 69 6c 74 65 72 29 0a 20 20 22 44 45 50 52 45 43 41 54 45 | rch-string.(filter)..."DEPRECATE |
| 5620 | 44 20 52 65 74 75 72 6e 20 74 68 65 20 77 68 65 72 65 20 70 61 72 74 20 6f 66 20 53 51 4c 20 62 | D.Return.the.where.part.of.SQL.b |
| 5640 | 61 73 65 64 20 6f 6e 20 46 49 4c 54 45 52 2e 22 0a 20 20 28 66 6f 72 6d 61 74 0a 20 20 20 22 0a | ased.on.FILTER."...(format....". |
| 5660 | 57 48 45 52 45 20 69 64 20 4c 49 4b 45 20 27 25 25 25 73 25 25 27 0a 4f 52 20 74 65 78 74 20 4c | WHERE.id.LIKE.'%%%s%%'.OR.text.L |
| 5680 | 49 4b 45 20 27 25 25 25 73 25 25 27 0a 4f 52 20 74 61 67 20 4c 49 4b 45 20 27 25 25 25 73 25 25 | IKE.'%%%s%%'.OR.tag.LIKE.'%%%s%% |
| 56a0 | 27 0a 4f 52 20 74 69 74 6c 65 20 4c 49 4b 45 20 27 25 25 25 73 25 25 27 0a 4f 52 20 66 6f 72 6d | '.OR.title.LIKE.'%%%s%%'.OR.form |
| 56c0 | 61 74 20 4c 49 4b 45 20 27 25 25 25 73 25 25 27 0a 4f 52 20 61 75 74 68 6f 72 5f 73 6f 72 74 20 | at.LIKE.'%%%s%%'.OR.author_sort. |
| 56e0 | 4c 49 4b 45 20 27 25 25 25 73 25 25 27 0a 22 20 66 69 6c 74 65 72 20 66 69 6c 74 65 72 20 66 69 | LIKE.'%%%s%%'.".filter.filter.fi |
| 5700 | 6c 74 65 72 20 66 69 6c 74 65 72 20 66 69 6c 74 65 72 20 66 69 6c 74 65 72 29 29 0a 0a 28 64 65 | lter.filter.filter.filter))..(de |
| 5720 | 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 20 28 29 0a | fun.calibredb-root-dir-quote.(). |
| 5740 | 20 20 22 52 65 74 75 72 6e 20 65 78 70 61 6e 64 65 64 20 61 6e 64 20 71 75 6f 74 65 64 20 63 61 | .."Return.expanded.and.quoted.ca |
| 5760 | 6c 69 62 72 65 64 62 20 72 6f 6f 74 20 64 69 72 2e 22 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 | libredb.root.dir."...(setq.calib |
| 5780 | 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 | redb-root-dir-quote.(shell-quote |
| 57a0 | 2d 61 72 67 75 6d 65 6e 74 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 63 61 6c 69 | -argument.(expand-file-name.cali |
| 57c0 | 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 73 74 72 75 63 | bredb-root-dir))))..(cl-defstruc |
| 57e0 | 74 20 63 61 6c 69 62 72 65 64 62 2d 73 74 72 75 63 74 0a 20 20 63 6f 6d 6d 61 6e 64 20 6f 70 74 | t.calibredb-struct...command.opt |
| 5800 | 69 6f 6e 20 69 6e 70 75 74 20 69 64 20 6c 69 62 72 61 72 79 20 61 63 74 69 6f 6e 29 0a 0a 28 63 | ion.input.id.library.action)..(c |
| 5820 | 6c 2d 64 65 66 73 74 72 75 63 74 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 73 74 | l-defstruct.calibredb-convert-st |
| 5840 | 72 75 63 74 0a 20 20 69 6e 70 75 74 20 6f 75 74 70 75 74 20 6f 70 74 69 6f 6e 29 0a 0a 28 64 65 | ruct...input.output.option)..(de |
| 5860 | 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 61 63 74 69 6f 6e 20 28 73 74 61 74 65 29 | fun.calibredb-get-action.(state) |
| 5880 | 0a 20 20 22 47 65 74 20 74 68 65 20 61 63 74 69 6f 6e 20 66 75 6e 63 74 69 6f 6e 20 66 72 6f 6d | ..."Get.the.action.function.from |
| 58a0 | 20 53 54 41 54 45 2e 22 0a 20 20 28 6c 65 74 20 28 28 61 63 74 69 6f 6e 20 28 63 61 6c 69 62 72 | .STATE."...(let.((action.(calibr |
| 58c0 | 65 64 62 2d 73 74 72 75 63 74 2d 61 63 74 69 6f 6e 20 73 74 61 74 65 29 29 29 0a 20 20 20 20 28 | edb-struct-action.state))).....( |
| 58e0 | 77 68 65 6e 20 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 28 69 66 20 28 66 75 6e 63 74 69 6f 6e 70 | when.action.......(if.(functionp |
| 5900 | 20 61 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 | .action)...........action....... |
| 5920 | 20 20 28 63 61 64 72 20 28 6e 74 68 20 28 63 61 72 20 61 63 74 69 6f 6e 29 20 61 63 74 69 6f 6e | ..(cadr.(nth.(car.action).action |
| 5940 | 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d | ))))))..(cl-defun.calibredb-comm |
| 5960 | 61 6e 64 20 28 26 6b 65 79 20 63 6f 6d 6d 61 6e 64 20 6f 70 74 69 6f 6e 20 69 6e 70 75 74 20 69 | and.(&key.command.option.input.i |
| 5980 | 64 20 6c 69 62 72 61 72 79 20 61 63 74 69 6f 6e 29 0a 20 20 28 6c 65 74 2a 20 28 28 63 6f 6d 6d | d.library.action)...(let*.((comm |
| 59a0 | 61 6e 64 2d 73 74 72 69 6e 67 20 28 6d 61 6b 65 2d 63 61 6c 69 62 72 65 64 62 2d 73 74 72 75 63 | and-string.(make-calibredb-struc |
| 59c0 | 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 3a 63 6f 6d | t...........................:com |
| 59e0 | 6d 61 6e 64 20 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mand.command.................... |
| 5a00 | 20 20 20 20 20 20 20 3a 6f 70 74 69 6f 6e 20 6f 70 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 | .......:option.option........... |
| 5a20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 70 75 74 20 69 6e 70 75 74 0a 20 20 20 | ................:input.input.... |
| 5a40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 69 64 0a 20 20 | .......................:id.id... |
| 5a60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 | ........................:library |
| 5a80 | 20 6c 69 62 72 61 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 | .library........................ |
| 5aa0 | 20 20 20 3a 61 63 74 69 6f 6e 20 61 63 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 69 | ...:action.action))..........(li |
| 5ac0 | 6e 65 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 79 0a 20 20 20 20 20 20 20 | ne.(mapconcat.#'identity........ |
| 5ae0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 2c 63 61 6c 69 62 72 65 64 62 2d | ...................`(,calibredb- |
| 5b00 | 70 72 6f 67 72 61 6d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | program......................... |
| 5b20 | 20 20 20 20 2c 28 63 61 6c 69 62 72 65 64 62 2d 73 74 72 75 63 74 2d 63 6f 6d 6d 61 6e 64 20 63 | ....,(calibredb-struct-command.c |
| 5b40 | 6f 6d 6d 61 6e 64 2d 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 | ommand-string).................. |
| 5b60 | 20 20 20 20 20 20 20 20 20 20 20 2c 28 63 61 6c 69 62 72 65 64 62 2d 73 74 72 75 63 74 2d 6f 70 | ...........,(calibredb-struct-op |
| 5b80 | 74 69 6f 6e 20 63 6f 6d 6d 61 6e 64 2d 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 | tion.command-string)............ |
| 5ba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 63 61 6c 69 62 72 65 64 62 2d 73 74 72 | .................,(calibredb-str |
| 5bc0 | 75 63 74 2d 69 6e 70 75 74 20 63 6f 6d 6d 61 6e 64 2d 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 | uct-input.command-string)....... |
| 5be0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 63 61 6c 69 62 72 65 64 | ......................,(calibred |
| 5c00 | 62 2d 73 74 72 75 63 74 2d 69 64 20 63 6f 6d 6d 61 6e 64 2d 73 74 72 69 6e 67 29 0a 20 20 20 20 | b-struct-id.command-string)..... |
| 5c20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 63 61 6c 69 62 72 | ........................,(calibr |
| 5c40 | 65 64 62 2d 73 74 72 75 63 74 2d 6c 69 62 72 61 72 79 20 63 6f 6d 6d 61 6e 64 2d 73 74 72 69 6e | edb-struct-library.command-strin |
| 5c60 | 67 29 29 20 22 20 22 29 29 29 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 69 6e 68 69 62 | g))."."))).....(setq-local.inhib |
| 5c80 | 69 74 2d 6d 65 73 73 61 67 65 20 74 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 22 20 | it-message.t).....(message."%s". |
| 5ca0 | 6c 69 6e 65 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 22 20 28 73 68 65 6c 6c 2d 63 | line).....(message."%s".(shell-c |
| 5cc0 | 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74 72 69 6e 67 20 6c 69 6e 65 29 29 29 29 0a 0a 28 63 6c 2d 64 | ommand-to-string.line))))..(cl-d |
| 5ce0 | 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 70 72 6f 63 65 73 73 20 28 26 6b 65 79 20 63 6f 6d | efun.calibredb-process.(&key.com |
| 5d00 | 6d 61 6e 64 20 6f 70 74 69 6f 6e 20 69 6e 70 75 74 20 69 64 20 6c 69 62 72 61 72 79 20 61 63 74 | mand.option.input.id.library.act |
| 5d20 | 69 6f 6e 29 0a 20 20 28 6c 65 74 2a 20 28 28 63 6f 6d 6d 61 6e 64 2d 73 74 72 69 6e 67 20 28 6d | ion)...(let*.((command-string.(m |
| 5d40 | 61 6b 65 2d 63 61 6c 69 62 72 65 64 62 2d 73 74 72 75 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 | ake-calibredb-struct............ |
| 5d60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6f 6d 6d 61 6e 64 20 63 6f 6d 6d 61 6e 64 0a | ...............:command.command. |
| 5d80 | 20 20 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 70 74 69 6f | ..........................:optio |
| 5da0 | 6e 20 6f 70 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 | n.option........................ |
| 5dc0 | 20 20 20 3a 69 6e 70 75 74 20 69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...:input.input................. |
| 5de0 | 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..........:id.id................ |
| 5e00 | 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 6c 69 62 72 61 72 79 0a 20 20 20 20 | ...........:library.library..... |
| 5e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 61 63 | ......................:action.ac |
| 5e40 | 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 28 6d 61 70 63 6f 6e 63 61 74 | tion))..........(line.(mapconcat |
| 5e60 | 20 23 27 69 64 65 6e 74 69 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .#'identity..................... |
| 5e80 | 20 20 20 20 20 20 60 28 2c 63 61 6c 69 62 72 65 64 62 2d 70 72 6f 67 72 61 6d 0a 20 20 20 20 20 | ......`(,calibredb-program...... |
| 5ea0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 63 61 6c 69 62 72 65 | .......................,(calibre |
| 5ec0 | 64 62 2d 73 74 72 75 63 74 2d 63 6f 6d 6d 61 6e 64 20 63 6f 6d 6d 61 6e 64 2d 73 74 72 69 6e 67 | db-struct-command.command-string |
| 5ee0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 | ).............................,( |
| 5f00 | 63 61 6c 69 62 72 65 64 62 2d 73 74 72 75 63 74 2d 6f 70 74 69 6f 6e 20 63 6f 6d 6d 61 6e 64 2d | calibredb-struct-option.command- |
| 5f20 | 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 20 20 20 20 | string)......................... |
| 5f40 | 20 20 20 20 2c 28 63 61 6c 69 62 72 65 64 62 2d 73 74 72 75 63 74 2d 69 6e 70 75 74 20 63 6f 6d | ....,(calibredb-struct-input.com |
| 5f60 | 6d 61 6e 64 2d 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 | mand-string).................... |
| 5f80 | 20 20 20 20 20 20 20 20 20 2c 28 63 61 6c 69 62 72 65 64 62 2d 73 74 72 75 63 74 2d 69 64 20 63 | .........,(calibredb-struct-id.c |
| 5fa0 | 6f 6d 6d 61 6e 64 2d 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 | ommand-string).................. |
| 5fc0 | 20 20 20 20 20 20 20 20 20 20 20 2c 28 63 61 6c 69 62 72 65 64 62 2d 73 74 72 75 63 74 2d 6c 69 | ...........,(calibredb-struct-li |
| 5fe0 | 62 72 61 72 79 20 63 6f 6d 6d 61 6e 64 2d 73 74 72 69 6e 67 29 29 20 22 20 22 29 29 29 0a 20 20 | brary.command-string)).".")))... |
| 6000 | 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 69 6e 68 69 62 69 74 2d 6d 65 73 73 61 67 65 20 74 29 | ..(setq-local.inhibit-message.t) |
| 6020 | 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 22 20 6c 69 6e 65 29 0a 20 20 20 20 28 73 74 | .....(message."%s".line).....(st |
| 6040 | 61 72 74 2d 70 72 6f 63 65 73 73 2d 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 20 22 63 61 6c 69 62 | art-process-shell-command."calib |
| 6060 | 72 65 64 62 22 20 22 2a 63 61 6c 69 62 72 65 64 62 2a 22 20 6c 69 6e 65 29 29 29 0a 0a 3b 3b 20 | redb"."*calibredb*".line)))..;;. |
| 6080 | 54 4f 44 4f 0a 28 63 6c 2d 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 | TODO.(cl-defun.calibredb-convert |
| 60a0 | 2d 70 72 6f 63 65 73 73 20 28 26 6b 65 79 20 69 6e 70 75 74 20 6f 75 74 70 75 74 20 6f 70 74 69 | -process.(&key.input.output.opti |
| 60c0 | 6f 6e 29 0a 20 20 28 6c 65 74 2a 20 28 28 63 6f 6d 6d 61 6e 64 2d 73 74 72 69 6e 67 20 28 6d 61 | on)...(let*.((command-string.(ma |
| 60e0 | 6b 65 2d 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 73 74 72 75 63 74 0a 20 20 20 20 | ke-calibredb-convert-struct..... |
| 6100 | 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 70 75 74 20 69 6e 70 | ......................:input.inp |
| 6120 | 75 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 3a 6f 75 | ut...........................:ou |
| 6140 | 74 70 75 74 20 6f 75 74 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | tput.output..................... |
| 6160 | 20 20 20 20 20 20 3a 6f 70 74 69 6f 6e 20 6f 70 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 | ......:option.option)).......... |
| 6180 | 28 6c 69 6e 65 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 79 0a 20 20 20 20 | (line.(mapconcat.#'identity..... |
| 61a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 2c 63 61 6c 69 62 72 65 | ......................`(,calibre |
| 61c0 | 64 62 2d 63 6f 6e 76 65 72 74 2d 70 72 6f 67 72 61 6d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | db-convert-program.............. |
| 61e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 | ...............,(calibredb-conve |
| 6200 | 72 74 2d 73 74 72 75 63 74 2d 69 6e 70 75 74 20 63 6f 6d 6d 61 6e 64 2d 73 74 72 69 6e 67 29 0a | rt-struct-input.command-string). |
| 6220 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 63 61 | ............................,(ca |
| 6240 | 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 73 74 72 75 63 74 2d 6f 75 74 70 75 74 20 63 6f | libredb-convert-struct-output.co |
| 6260 | 6d 6d 61 6e 64 2d 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 | mmand-string)................... |
| 6280 | 20 20 20 20 20 20 20 20 20 20 2c 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 73 74 | ..........,(calibredb-convert-st |
| 62a0 | 72 75 63 74 2d 6f 70 74 69 6f 6e 20 63 6f 6d 6d 61 6e 64 2d 73 74 72 69 6e 67 29 29 20 22 20 22 | ruct-option.command-string))."." |
| 62c0 | 29 29 29 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 69 6e 68 69 62 69 74 2d 6d 65 73 73 | ))).....(setq-local.inhibit-mess |
| 62e0 | 61 67 65 20 74 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 22 20 6c 69 6e 65 29 0a 20 | age.t).....(message."%s".line).. |
| 6300 | 20 20 20 28 73 74 61 72 74 2d 70 72 6f 63 65 73 73 2d 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 20 | ...(start-process-shell-command. |
| 6320 | 22 65 62 6f 6f 6b 2d 63 6f 6e 76 65 72 74 22 20 22 2a 65 62 6f 6f 6b 2d 63 6f 6e 76 65 72 74 2a | "ebook-convert"."*ebook-convert* |
| 6340 | 22 20 6c 69 6e 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 68 6f 6d | ".line)))..(defun.calibredb-chom |
| 6360 | 70 20 28 73 29 0a 20 20 22 41 72 67 75 6d 65 6e 74 20 53 20 69 73 20 73 74 72 69 6e 67 2e 22 0a | p.(s)..."Argument.S.is.string.". |
| 6380 | 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 5b 5c 73 | ..(replace-regexp-in-string."[\s |
| 63a0 | 5c 6e 5d 2b 24 22 20 22 22 20 73 29 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 | \n]+$"."".s))..(defvar.calibredb |
| 63c0 | 2d 64 62 2d 63 6f 6e 6e 65 63 74 69 6f 6e 20 6e 69 6c 0a 20 20 22 54 68 65 20 45 6d 61 63 53 51 | -db-connection.nil..."The.EmacSQ |
| 63e0 | 4c 20 64 61 74 61 62 61 73 65 20 63 6f 6e 6e 65 63 74 69 6f 6e 2e 22 29 0a 0a 28 64 65 66 75 6e | L.database.connection.")..(defun |
| 6400 | 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 63 6f 6e 6e 65 63 74 69 6f 6e 20 28 29 0a 20 20 28 73 | .calibredb-db-connection.()...(s |
| 6420 | 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 63 6f 6e 6e 65 63 74 69 6f 6e 20 28 66 75 6e | etq.calibredb-db-connection.(fun |
| 6440 | 63 61 6c 6c 20 27 73 71 6c 69 74 65 2d 6f 70 65 6e 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 64 | call.'sqlite-open.calibredb-db-d |
| 6460 | 69 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 20 28 73 | ir)))..(defun.calibredb-query.(s |
| 6480 | 71 6c 2d 71 75 65 72 79 29 0a 20 20 22 51 75 65 72 79 20 63 61 6c 69 62 72 65 20 64 61 74 61 62 | ql-query)..."Query.calibre.datab |
| 64a0 | 61 73 65 20 61 6e 64 20 72 65 74 75 72 6e 20 74 68 65 20 72 65 73 75 6c 74 2e 0a 41 72 67 75 6d | ase.and.return.the.result..Argum |
| 64c0 | 65 6e 74 20 53 51 4c 2d 51 55 45 52 59 20 69 73 20 74 68 65 20 73 71 6c 69 74 65 20 73 71 6c 20 | ent.SQL-QUERY.is.the.sqlite.sql. |
| 64e0 | 71 75 65 72 79 20 73 74 72 69 6e 67 2e 0a 0a 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 77 6f 72 6b | query.string...The.function.work |
| 6500 | 73 20 62 79 20 73 65 6e 64 69 6e 67 20 53 51 4c 2d 51 55 45 52 59 20 74 6f 20 60 73 71 6c 2d 73 | s.by.sending.SQL-QUERY.to.`sql-s |
| 6520 | 71 6c 69 74 65 2d 70 72 6f 67 72 61 6d 27 20 69 66 20 65 6d 61 63 73 20 3c 20 32 39 20 66 6f 72 | qlite-program'.if.emacs.<.29.for |
| 6540 | 20 74 68 65 0a 64 61 74 61 62 61 73 65 20 66 69 6c 65 20 64 65 66 69 6e 65 64 20 62 79 20 60 63 | .the.database.file.defined.by.`c |
| 6560 | 61 6c 69 62 72 65 64 62 2d 64 62 2d 64 69 72 27 2c 20 64 75 6d 70 20 74 68 65 20 6f 75 74 70 75 | alibredb-db-dir',.dump.the.outpu |
| 6580 | 74 20 74 6f 20 61 20 68 69 64 64 65 6e 0a 62 75 66 66 65 72 20 63 61 6c 6c 65 64 20 2a 63 61 6c | t.to.a.hidden.buffer.called.*cal |
| 65a0 | 69 62 72 65 64 62 2d 71 75 65 72 79 2d 6f 75 74 70 75 74 2a 2c 20 74 68 65 6e 20 69 66 20 74 68 | ibredb-query-output*,.then.if.th |
| 65c0 | 65 20 73 71 6c 69 74 65 20 70 72 6f 67 72 61 6d 0a 74 65 72 6d 69 6e 61 74 65 73 20 73 75 63 63 | e.sqlite.program.terminates.succ |
| 65e0 | 65 73 73 66 75 6c 6c 79 2c 20 69 74 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 74 68 65 20 73 74 72 | essfully,.it.will.return.the.str |
| 6600 | 69 6e 67 20 6f 66 20 74 68 65 20 6f 75 74 70 75 74 0a 62 75 66 66 65 72 2e 20 49 66 20 74 68 65 | ing.of.the.output.buffer..If.the |
| 6620 | 20 70 72 6f 67 72 61 6d 20 66 61 69 6c 73 2c 20 69 74 20 77 69 6c 6c 20 73 77 69 74 63 68 20 74 | .program.fails,.it.will.switch.t |
| 6640 | 6f 20 74 68 65 20 6f 75 74 70 75 74 20 62 75 66 66 65 72 20 61 6e 64 0a 74 65 6c 6c 20 75 73 65 | o.the.output.buffer.and.tell.use |
| 6660 | 72 20 73 6f 6d 65 74 68 69 6e 67 e2 80 99 73 20 77 72 6f 6e 67 2e 22 0a 20 20 28 69 66 20 28 61 | r.something...s.wrong."...(if.(a |
| 6680 | 6e 64 20 28 66 75 6e 63 74 69 6f 6e 70 20 27 73 71 6c 69 74 65 2d 61 76 61 69 6c 61 62 6c 65 2d | nd.(functionp.'sqlite-available- |
| 66a0 | 70 29 20 28 73 71 6c 69 74 65 2d 61 76 61 69 6c 61 62 6c 65 2d 70 29 29 0a 20 20 20 20 20 20 28 | p).(sqlite-available-p)).......( |
| 66c0 | 73 71 6c 69 74 65 2d 65 78 65 63 75 74 65 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 63 6f 6e 6e | sqlite-execute.calibredb-db-conn |
| 66e0 | 65 63 74 69 6f 6e 20 73 71 6c 2d 71 75 65 72 79 29 0a 20 20 20 28 6c 65 74 20 28 28 6f 75 74 2d | ection.sql-query)....(let.((out- |
| 6700 | 62 75 66 20 22 20 2a 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 2d 6f 75 74 70 75 74 2a 22 29 | buf.".*calibredb-query-output*") |
| 6720 | 29 0a 20 20 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 72 20 6f 75 74 2d 62 75 66 29 | ).....(when.(get-buffer.out-buf) |
| 6740 | 0a 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 6f 75 74 2d 62 75 66 29 29 0a 20 20 | .......(kill-buffer.out-buf))... |
| 6760 | 20 20 28 69 66 20 28 6e 6f 74 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 63 61 6c 69 62 72 | ..(if.(not.(file-exists-p.calibr |
| 6780 | 65 64 62 2d 64 62 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 63 | edb-db-dir)).........(message."c |
| 67a0 | 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 3a 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 64 69 72 | alibredb-query:.calibredb-db-dir |
| 67c0 | 20 69 73 20 6e 69 6c 21 20 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 20 77 6f 6e 27 74 20 77 | .is.nil!.calibredb-query.won't.w |
| 67e0 | 6f 72 6b 20 77 69 74 68 6f 75 74 20 69 74 2e 22 29 0a 20 20 20 20 20 20 28 69 66 20 28 7a 65 72 | ork.without.it.").......(if.(zer |
| 6800 | 6f 70 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 2d 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 0a 20 | op.(call-process-shell-command.. |
| 6820 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 2d 73 65 | .................(format."%s.-se |
| 6840 | 70 61 72 61 74 6f 72 20 25 73 20 2d 6e 65 77 6c 69 6e 65 20 25 73 20 2d 6c 69 73 74 20 2d 6e 75 | parator.%s.-newline.%s.-list.-nu |
| 6860 | 6c 6c 76 61 6c 75 65 20 27 27 20 2d 6e 6f 68 65 61 64 65 72 20 25 73 20 5c 22 25 73 5c 22 22 0a | llvalue.''.-noheader.%s.\"%s\"". |
| 6880 | 20 20 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 71 6c 2d 73 71 | ..........................sql-sq |
| 68a0 | 6c 69 74 65 2d 70 72 6f 67 72 61 6d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | lite-program.................... |
| 68c0 | 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 71 6c 2d 73 65 70 61 72 61 74 6f 72 0a 20 | .......calibredb-sql-separator.. |
| 68e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 | .........................calibre |
| 6900 | 64 62 2d 73 71 6c 2d 6e 65 77 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | db-sql-newline.................. |
| 6920 | 20 20 20 20 20 20 20 20 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 28 | .........(shell-quote-argument.( |
| 6940 | 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 64 69 | expand-file-name.calibredb-db-di |
| 6960 | 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 71 | r))...........................sq |
| 6980 | 6c 2d 71 75 65 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 28 | l-query)...................nil.( |
| 69a0 | 6c 69 73 74 20 6f 75 74 2d 62 75 66 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 | list.out-buf.t)))...........;;.I |
| 69c0 | 66 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20 74 65 72 6d 69 6e 61 74 65 73 20 73 75 63 63 65 73 | f.this.command.terminates.succes |
| 69e0 | 73 66 75 6c 6c 79 20 28 72 65 74 75 72 6e 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 52 | sfully.(return.0)...........;;.R |
| 6a00 | 65 74 75 72 6e 20 74 68 65 20 6f 75 74 70 75 74 27 73 20 73 74 72 69 6e 67 0a 20 20 20 20 20 20 | eturn.the.output's.string....... |
| 6a20 | 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 6f 75 74 2d 62 75 66 | ....(with-current-buffer.out-buf |
| 6a40 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 0a 20 20 | .............(buffer-string))... |
| 6a60 | 20 20 20 20 20 20 3b 3b 20 49 66 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20 66 61 69 6c 73 20 72 | ......;;.If.this.command.fails.r |
| 6a80 | 65 74 75 72 6e 20 27 65 72 72 6f 72 0a 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d | eturn.'error.........(switch-to- |
| 6aa0 | 62 75 66 66 65 72 20 6f 75 74 2d 62 75 66 29 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 | buffer.out-buf).........(goto-ch |
| 6ac0 | 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 | ar.(point-min)).........(error." |
| 6ae0 | 45 72 72 6f 72 3a 20 60 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 27 20 63 61 6e 27 74 20 71 | Error:.`calibredb-query'.can't.q |
| 6b00 | 75 65 72 79 20 5c 22 25 73 5c 22 2e 20 73 77 69 74 63 68 69 6e 67 20 74 6f 20 69 74 73 20 65 72 | uery.\"%s\"..switching.to.its.er |
| 6b20 | 72 6f 72 20 62 75 66 66 65 72 22 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 63 61 | ror.buffer".(expand-file-name.ca |
| 6b40 | 6c 69 62 72 65 64 62 2d 64 62 2d 64 69 72 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 | libredb-db-dir)))))))..(defun.ca |
| 6b60 | 6c 69 62 72 65 64 62 2d 71 75 65 72 79 2d 74 6f 2d 61 6c 69 73 74 20 28 71 75 65 72 79 2d 72 65 | libredb-query-to-alist.(query-re |
| 6b80 | 73 75 6c 74 29 0a 20 20 22 42 75 69 6c 64 73 20 61 6c 69 73 74 20 6f 75 74 20 6f 66 20 61 20 66 | sult)..."Builds.alist.out.of.a.f |
| 6ba0 | 75 6c 6c 20 60 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 27 20 71 75 65 72 79 20 72 65 63 6f | ull.`calibredb-query'.query.reco |
| 6bc0 | 72 64 20 72 65 73 75 6c 74 2e 0a 41 72 67 75 6d 65 6e 74 20 51 55 45 52 59 2d 52 45 53 55 4c 54 | rd.result..Argument.QUERY-RESULT |
| 6be0 | 20 69 73 20 74 68 65 20 71 75 65 72 79 20 72 65 73 75 6c 74 20 67 65 6e 65 72 61 74 65 20 62 79 | .is.the.query.result.generate.by |
| 6c00 | 20 73 71 6c 69 74 65 2e 22 0a 20 20 28 69 66 20 71 75 65 72 79 2d 72 65 73 75 6c 74 0a 20 20 20 | .sqlite."...(if.query-result.... |
| 6c20 | 20 20 20 28 6c 65 74 20 28 28 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 20 28 69 66 20 28 | ...(let.((spl-query-result.(if.( |
| 6c40 | 61 6e 64 20 28 66 75 6e 63 74 69 6f 6e 70 20 27 73 71 6c 69 74 65 2d 61 76 61 69 6c 61 62 6c 65 | and.(functionp.'sqlite-available |
| 6c60 | 2d 70 29 20 28 73 71 6c 69 74 65 2d 61 76 61 69 6c 61 62 6c 65 2d 70 29 29 0a 20 20 20 20 20 20 | -p).(sqlite-available-p))....... |
| 6c80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 71 75 65 72 | ............................quer |
| 6ca0 | 79 2d 72 65 73 75 6c 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | y-result........................ |
| 6cc0 | 20 20 20 20 20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 63 61 6c 69 62 72 65 64 | .........(split-string.(calibred |
| 6ce0 | 62 2d 63 68 6f 6d 70 20 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 63 61 6c 69 62 72 65 64 62 2d | b-chomp.query-result).calibredb- |
| 6d00 | 73 71 6c 2d 73 65 70 61 72 61 74 6f 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 60 28 28 3a 69 64 | sql-separator)))).........`((:id |
| 6d20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 6c 65 74 20 28 28 69 64 20 | .....................,(let.((id. |
| 6d40 | 28 6e 74 68 20 30 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 29 29 0a 20 20 20 20 20 | (nth.0.spl-query-result)))...... |
| 6d60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 6d80 | 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(if.(stringp.id)............... |
| 6da0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 0a 20 | ............................id.. |
| 6dc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 6de0 | 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 69 64 29 29 29 29 0a | .......(number-to-string.id)))). |
| 6e00 | 20 20 20 20 20 20 20 20 20 20 28 3a 61 75 74 68 6f 72 2d 73 6f 72 74 20 20 20 20 20 20 20 20 20 | ..........(:author-sort......... |
| 6e20 | 20 20 20 2c 28 6e 74 68 20 31 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 29 0a 20 20 | ...,(nth.1.spl-query-result))... |
| 6e40 | 20 20 20 20 20 20 20 20 28 3a 62 6f 6f 6b 2d 64 69 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ........(:book-dir.............. |
| 6e60 | 20 2c 28 6e 74 68 20 32 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 29 0a 20 20 20 20 | .,(nth.2.spl-query-result))..... |
| 6e80 | 20 20 20 20 20 20 28 3a 62 6f 6f 6b 2d 6e 61 6d 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c | ......(:book-name.............., |
| 6ea0 | 28 6e 74 68 20 33 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 29 0a 20 20 20 20 20 20 | (nth.3.spl-query-result))....... |
| 6ec0 | 20 20 20 20 28 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 20 20 2c 28 64 6f 77 6e 63 61 73 65 20 28 6f | ....(:book-format..,(downcase.(o |
| 6ee0 | 72 20 28 6e 74 68 20 34 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 22 22 29 29 29 | r.(nth.4.spl-query-result).""))) |
| 6f00 | 0a 20 20 20 20 20 20 20 20 20 20 28 3a 62 6f 6f 6b 2d 70 75 62 64 61 74 65 20 20 20 20 20 20 20 | ...........(:book-pubdate....... |
| 6f20 | 20 20 20 20 2c 28 6e 74 68 20 35 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 29 0a 20 | ....,(nth.5.spl-query-result)).. |
| 6f40 | 20 20 20 20 20 20 20 20 20 28 3a 62 6f 6f 6b 2d 74 69 74 6c 65 20 20 20 20 20 20 20 20 20 20 20 | .........(:book-title........... |
| 6f60 | 20 20 2c 28 6e 74 68 20 36 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 29 0a 20 20 20 | ..,(nth.6.spl-query-result)).... |
| 6f80 | 20 20 20 20 20 20 20 28 3a 66 69 6c 65 2d 70 61 74 68 20 20 20 20 2c 28 63 6f 6e 63 61 74 20 28 | .......(:file-path....,(concat.( |
| 6fa0 | 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 63 61 6c 69 62 72 65 64 62 | file-name-as-directory.calibredb |
| 6fc0 | 2d 72 6f 6f 74 2d 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -root-dir)...................... |
| 6fe0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 | .............(file-name-as-direc |
| 7000 | 74 6f 72 79 20 28 6e 74 68 20 32 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 29 0a 20 | tory.(nth.2.spl-query-result)).. |
| 7020 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7040 | 20 28 6e 74 68 20 33 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 22 2e 22 20 28 64 | .(nth.3.spl-query-result).".".(d |
| 7060 | 6f 77 6e 63 61 73 65 20 28 6f 72 20 28 6e 74 68 20 34 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 | owncase.(or.(nth.4.spl-query-res |
| 7080 | 75 6c 74 29 20 22 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 3a 74 61 67 20 20 20 20 20 | ult).""))))...........(:tag..... |
| 70a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 6f 72 20 28 6e 74 68 20 37 20 73 70 6c 2d 71 | ...............,(or.(nth.7.spl-q |
| 70c0 | 75 65 72 79 2d 72 65 73 75 6c 74 29 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 3a 73 69 | uery-result).""))...........(:si |
| 70e0 | 7a 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 66 6f 72 6d 61 74 20 22 25 | ze...................,(format."% |
| 7100 | 2e 32 66 22 20 28 2f 20 28 6c 65 74 20 28 28 73 69 7a 65 20 28 6f 72 20 28 6e 74 68 20 38 20 73 | .2f".(/.(let.((size.(or.(nth.8.s |
| 7120 | 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 22 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 | pl-query-result).""))).......... |
| 7140 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7160 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 73 69 7a 65 | ...............(if.(stringp.size |
| 7180 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | )............................... |
| 71a0 | 20 20 20 20 20 20 20 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 | ..............................(s |
| 71c0 | 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 73 69 7a 65 29 20 73 69 7a 65 29 29 20 31 30 34 | tring-to-number.size).size)).104 |
| 71e0 | 38 35 37 36 2e 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 3a 63 6f 6d 6d 65 6e 74 20 20 20 | 8576.0)))...........(:comment... |
| 7200 | 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 6f 72 20 28 6e 74 68 20 39 20 73 70 6c 2d 71 75 65 | .............,(or.(nth.9.spl-que |
| 7220 | 72 79 2d 72 65 73 75 6c 74 29 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 3a 69 64 73 20 | ry-result).""))...........(:ids. |
| 7240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 6f 72 20 28 6e 74 68 20 31 30 20 | ...................,(or.(nth.10. |
| 7260 | 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 | spl-query-result)."")).......... |
| 7280 | 20 28 3a 70 75 62 6c 69 73 68 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 6f 72 20 28 | .(:publisher..............,(or.( |
| 72a0 | 6e 74 68 20 31 31 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 22 22 29 29 0a 20 20 | nth.11.spl-query-result).""))... |
| 72c0 | 20 20 20 20 20 20 20 20 28 3a 73 65 72 69 65 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ........(:series................ |
| 72e0 | 20 2c 28 6f 72 20 28 6e 74 68 20 31 32 20 73 70 6c 2d 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 | .,(or.(nth.12.spl-query-result). |
| 7300 | 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 3a 6c 61 6e 67 5f 63 6f 64 65 20 20 20 20 20 20 | ""))...........(:lang_code...... |
| 7320 | 20 20 20 20 20 20 20 20 2c 28 6f 72 20 28 6e 74 68 20 31 33 20 73 70 6c 2d 71 75 65 72 79 2d 72 | ........,(or.(nth.13.spl-query-r |
| 7340 | 65 73 75 6c 74 29 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 3a 6c 61 73 74 5f 6d 6f 64 | esult).""))...........(:last_mod |
| 7360 | 69 66 69 65 64 20 20 20 20 20 20 20 20 20 20 2c 28 6f 72 20 28 6e 74 68 20 31 34 20 73 70 6c 2d | ified..........,(or.(nth.14.spl- |
| 7380 | 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 22 22 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 | query-result).""))))))..(defun.c |
| 73a0 | 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 6d 79 2d 61 6c 69 73 74 20 6b 65 79 29 0a | alibredb-getattr.(my-alist.key). |
| 73c0 | 20 20 22 47 65 74 20 74 68 65 20 61 74 74 72 69 62 75 74 65 2e 0a 41 72 67 75 6d 65 6e 74 20 4d | .."Get.the.attribute..Argument.M |
| 73e0 | 59 2d 41 4c 49 53 54 20 69 73 20 74 68 65 20 61 6c 69 73 74 2e 0a 41 72 67 75 6d 65 6e 74 20 4b | Y-ALIST.is.the.alist..Argument.K |
| 7400 | 45 59 20 69 73 20 74 68 65 20 6b 65 79 2e 22 0a 20 20 28 63 61 64 72 20 28 61 73 73 71 20 6b 65 | EY.is.the.key."...(cadr.(assq.ke |
| 7420 | 79 20 28 63 61 72 20 6d 79 2d 61 6c 69 73 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 | y.(car.my-alist))))..(defun.cali |
| 7440 | 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 63 6f 6c 75 6d 6e 20 28 73 74 72 69 6e 67 20 77 69 64 74 | bredb-format-column.(string.widt |
| 7460 | 68 20 26 6f 70 74 69 6f 6e 61 6c 20 61 6c 69 67 6e 29 0a 20 20 22 52 65 74 75 72 6e 20 53 54 52 | h.&optional.align)..."Return.STR |
| 7480 | 49 4e 47 20 74 72 75 6e 63 61 74 65 64 20 6f 72 20 70 61 64 64 65 64 20 74 6f 20 57 49 44 54 48 | ING.truncated.or.padded.to.WIDTH |
| 74a0 | 20 66 6f 6c 6c 6f 77 69 6e 67 20 41 4c 49 47 4e 6d 65 6e 74 2e 0a 41 4c 49 47 4e 20 73 68 6f 75 | .following.ALIGNment..ALIGN.shou |
| 74c0 | 6c 64 20 62 65 20 61 20 6b 65 79 77 6f 72 64 20 3a 6c 65 66 74 20 6f 72 20 3a 72 69 67 68 74 2e | ld.be.a.keyword.:left.or.:right. |
| 74e0 | 22 0a 20 20 28 63 6f 6e 64 20 28 28 3c 20 77 69 64 74 68 20 30 29 20 73 74 72 69 6e 67 29 0a 20 | "...(cond.((<.width.0).string).. |
| 7500 | 20 20 20 20 20 20 20 28 28 3d 20 77 69 64 74 68 20 30 29 20 22 22 29 0a 20 20 20 20 20 20 20 20 | .......((=.width.0)."")......... |
| 7520 | 28 74 20 28 66 6f 72 6d 61 74 20 28 66 6f 72 6d 61 74 20 22 25 25 25 73 25 64 2e 25 64 73 22 20 | (t.(format.(format."%%%s%d.%ds". |
| 7540 | 28 69 66 20 28 65 71 20 61 6c 69 67 6e 20 3a 6c 65 66 74 29 20 22 2d 22 20 22 22 29 20 77 69 64 | (if.(eq.align.:left)."-"."").wid |
| 7560 | 74 68 20 77 69 64 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 72 | th.width)....................str |
| 7580 | 69 6e 67 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 69 74 6c 65 2d | ing))))..(defun.calibredb-title- |
| 75a0 | 66 61 63 65 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 74 69 74 6c 65 20 66 61 63 65 | face.()..."Return.the.title.face |
| 75c0 | 20 62 61 73 65 20 6f 6e 20 74 68 65 20 76 69 65 77 2e 22 0a 20 20 28 69 66 20 63 61 6c 69 62 72 | .base.on.the.view."...(if.calibr |
| 75e0 | 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 0a 20 20 20 20 20 20 27 63 61 6c 69 62 72 65 | edb-detailed-view.......'calibre |
| 7600 | 64 62 2d 74 69 74 6c 65 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 66 61 63 65 0a 20 20 20 20 | db-title-detailed-view-face..... |
| 7620 | 20 20 27 63 61 6c 69 62 72 65 64 62 2d 74 69 74 6c 65 2d 66 61 63 65 29 29 0a 0a 28 64 65 66 75 | ..'calibredb-title-face))..(defu |
| 7640 | 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 69 74 6c 65 2d 77 69 64 74 68 20 28 29 0a 20 20 22 52 65 | n.calibredb-title-width.()..."Re |
| 7660 | 74 75 72 6e 20 74 68 65 20 74 69 74 6c 65 20 77 69 64 74 68 20 62 61 73 65 20 6f 6e 20 74 68 65 | turn.the.title.width.base.on.the |
| 7680 | 20 76 69 65 77 2e 22 0a 20 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 | .view."...(if.calibredb-detailed |
| 76a0 | 2d 76 69 65 77 0a 20 20 20 20 20 20 2d 31 0a 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 74 69 74 | -view.......-1.....calibredb-tit |
| 76c0 | 6c 65 2d 77 69 64 74 68 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 | le-width))..(defun.calibredb-for |
| 76e0 | 6d 61 74 2d 77 69 64 74 68 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 66 6f 72 6d 61 | mat-width.()..."Return.the.forma |
| 7700 | 74 20 77 69 64 74 68 20 62 61 73 65 20 6f 6e 20 74 68 65 20 76 69 65 77 2e 22 0a 20 20 28 69 66 | t.width.base.on.the.view."...(if |
| 7720 | 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 0a 20 20 20 20 20 20 2d | .calibredb-detailed-view.......- |
| 7740 | 31 0a 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 77 69 64 74 68 29 29 0a 0a | 1.....calibredb-format-width)).. |
| 7760 | 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 77 69 64 74 68 20 28 29 0a 20 20 | (defun.calibredb-tag-width.()... |
| 7780 | 22 52 65 74 75 72 6e 20 74 68 65 20 74 61 67 20 77 69 64 74 68 20 62 61 73 65 20 6f 6e 20 74 68 | "Return.the.tag.width.base.on.th |
| 77a0 | 65 20 76 69 65 77 2e 22 0a 20 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 | e.view."...(if.calibredb-detaile |
| 77c0 | 64 2d 76 69 65 77 0a 20 20 20 20 20 20 2d 31 0a 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 74 61 | d-view.......-1.....calibredb-ta |
| 77e0 | 67 2d 77 69 64 74 68 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 69 64 73 2d | g-width))..(defun.calibredb-ids- |
| 7800 | 77 69 64 74 68 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 69 64 73 20 77 69 64 74 68 | width.()..."Return.the.ids.width |
| 7820 | 20 62 61 73 65 20 6f 6e 20 74 68 65 20 76 69 65 77 2e 22 0a 20 20 28 69 66 20 63 61 6c 69 62 72 | .base.on.the.view."...(if.calibr |
| 7840 | 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 0a 20 20 20 20 20 20 2d 31 0a 20 20 20 20 63 | edb-detailed-view.......-1.....c |
| 7860 | 61 6c 69 62 72 65 64 62 2d 69 64 73 2d 77 69 64 74 68 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c | alibredb-ids-width))..(defun.cal |
| 7880 | 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 77 69 64 74 68 20 28 29 0a 20 20 22 52 65 74 75 72 6e | ibredb-author-width.()..."Return |
| 78a0 | 20 74 68 65 20 61 75 74 68 6f 72 20 77 69 64 74 68 20 62 61 73 65 20 6f 6e 20 74 68 65 20 76 69 | .the.author.width.base.on.the.vi |
| 78c0 | 65 77 2e 22 0a 20 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 | ew."...(if.calibredb-detailed-vi |
| 78e0 | 65 77 0a 20 20 20 20 20 20 2d 31 0a 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 | ew.......-1.....calibredb-author |
| 7900 | 2d 77 69 64 74 68 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 65 | -width))..(defun.calibredb-comme |
| 7920 | 6e 74 2d 77 69 64 74 68 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 63 6f 6d 6d 65 6e | nt-width.()..."Return.the.commen |
| 7940 | 74 20 77 69 64 74 68 20 62 61 73 65 20 6f 6e 20 74 68 65 20 76 69 65 77 2e 22 0a 20 20 28 69 66 | t.width.base.on.the.view."...(if |
| 7960 | 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 0a 20 20 20 20 20 20 2d | .calibredb-detailed-view.......- |
| 7980 | 31 0a 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 65 6e 74 2d 77 69 64 74 68 29 29 0a | 1.....calibredb-comment-width)). |
| 79a0 | 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 77 69 64 74 68 20 28 29 0a | .(defun.calibredb-date-width.(). |
| 79c0 | 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6c 61 73 74 5f 6d 6f 64 69 66 69 65 64 20 64 61 74 65 | .."Return.the.last_modified.date |
| 79e0 | 20 77 69 64 74 68 20 62 61 73 65 20 6f 6e 20 74 68 65 20 76 69 65 77 2e 22 0a 20 20 28 69 66 20 | .width.base.on.the.view."...(if. |
| 7a00 | 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 0a 20 20 20 20 20 20 2d 31 | calibredb-detailed-view.......-1 |
| 7a20 | 0a 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 77 69 64 74 68 29 29 0a 0a 28 64 65 | .....calibredb-date-width))..(de |
| 7a40 | 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 67 65 74 62 6f 6f 6b 6c 69 73 74 20 28 63 61 6c 69 62 | fun.calibredb-getbooklist.(calib |
| 7a60 | 72 65 2d 69 74 65 6d 2d 6c 69 73 74 29 0a 20 20 22 47 65 74 20 62 6f 6f 6b 20 6c 69 73 74 2e 0a | re-item-list)..."Get.book.list.. |
| 7a80 | 41 72 67 75 6d 65 6e 74 20 43 41 4c 49 42 52 45 2d 49 54 45 4d 2d 4c 49 53 54 20 69 73 20 74 68 | Argument.CALIBRE-ITEM-LIST.is.th |
| 7aa0 | 65 20 63 61 6c 69 62 72 65 64 20 69 74 65 6d 20 6c 69 73 74 2e 22 0a 20 20 28 6c 65 74 20 28 64 | e.calibred.item.list."...(let.(d |
| 7ac0 | 69 73 70 6c 61 79 2d 61 6c 69 73 74 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 69 74 65 6d 20 | isplay-alist).....(dolist.(item. |
| 7ae0 | 63 61 6c 69 62 72 65 2d 69 74 65 6d 2d 6c 69 73 74 20 64 69 73 70 6c 61 79 2d 61 6c 69 73 74 29 | calibre-item-list.display-alist) |
| 7b00 | 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 69 73 70 6c 61 79 2d 61 6c 69 73 74 0a 20 20 20 20 20 | .......(setq.display-alist...... |
| 7b20 | 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 6c 69 73 74 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f | .......(cons.(list.(calibredb-fo |
| 7b40 | 72 6d 61 74 2d 69 74 65 6d 20 69 74 65 6d 29 20 69 74 65 6d 29 20 64 69 73 70 6c 61 79 2d 61 6c | rmat-item.item).item).display-al |
| 7b60 | 69 73 74 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 | ist)))))..(defun.calibredb-candi |
| 7b80 | 64 61 74 65 73 20 28 29 0a 20 20 22 47 65 6e 65 72 61 74 65 20 65 62 6f 6f 6b 73 20 63 61 6e 64 | dates.()..."Generate.ebooks.cand |
| 7ba0 | 69 64 61 74 65 73 20 61 6c 69 73 74 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 71 75 65 72 79 2d 72 | idates.alist."...(let*.((query-r |
| 7bc0 | 65 73 75 6c 74 20 28 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 20 28 63 6f 6e 63 61 74 20 63 | esult.(calibredb-query.(concat.c |
| 7be0 | 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 | alibredb-query-string........... |
| 7c00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7c20 | 20 20 20 20 20 20 28 70 63 61 73 65 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 0a 20 | ......(pcase.calibredb-sort-by.. |
| 7c40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7c60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 69 64 20 22 20 4f 52 44 45 52 20 42 59 | .................('id.".ORDER.BY |
| 7c80 | 20 69 64 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 | .id")........................... |
| 7ca0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 74 69 74 6c 65 20 | ........................('title. |
| 7cc0 | 22 20 4f 52 44 45 52 20 42 59 20 74 69 74 6c 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ".ORDER.BY.title").............. |
| 7ce0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7d00 | 20 20 20 20 20 28 27 61 75 74 68 6f 72 20 22 20 4f 52 44 45 52 20 42 59 20 61 75 74 68 6f 72 5f | .....('author.".ORDER.BY.author_ |
| 7d20 | 73 6f 72 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | sort").......................... |
| 7d40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 66 6f 72 6d 61 | .........................('forma |
| 7d60 | 74 20 22 20 4f 52 44 45 52 20 42 59 20 66 6f 72 6d 61 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 | t.".ORDER.BY.format")........... |
| 7d80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7da0 | 20 20 20 20 20 20 20 20 28 27 64 61 74 65 20 22 20 4f 52 44 45 52 20 42 59 20 6c 61 73 74 5f 6d | ........('date.".ORDER.BY.last_m |
| 7dc0 | 6f 64 69 66 69 65 64 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 | odified")....................... |
| 7de0 | 20 20 20 20 20 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 75 | ............................('pu |
| 7e00 | 62 64 61 74 65 20 22 20 4f 52 44 45 52 20 42 59 20 70 75 62 64 61 74 65 22 29 0a 20 20 20 20 20 | bdate.".ORDER.BY.pubdate")...... |
| 7e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7e40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 74 61 67 20 22 20 4f 52 44 45 52 20 42 59 20 74 61 | .............('tag.".ORDER.BY.ta |
| 7e60 | 67 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | g")............................. |
| 7e80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 73 69 7a 65 20 22 20 4f | ......................('size.".O |
| 7ea0 | 52 44 45 52 20 42 59 20 75 6e 63 6f 6d 70 72 65 73 73 65 64 5f 73 69 7a 65 22 29 0a 20 20 20 20 | RDER.BY.uncompressed_size")..... |
| 7ec0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7ee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 6c 61 6e 67 75 61 67 65 20 22 20 4f 52 44 45 52 | ..............('language.".ORDER |
| 7f00 | 20 42 59 20 6c 61 6e 67 5f 63 6f 64 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .BY.lang_code")................. |
| 7f20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7f40 | 20 20 28 5f 20 22 20 4f 52 44 45 52 20 42 59 20 69 64 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 | ..(_.".ORDER.BY.id"))........... |
| 7f60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7f80 | 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 63 61 6c 69 62 72 65 64 62 2d 6f 72 64 65 72 20 | ......(when.(eq.calibredb-order. |
| 7fa0 | 27 64 65 73 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 | 'desc).......................... |
| 7fc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 44 45 53 43 22 | .........................".DESC" |
| 7fe0 | 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 6c 69 73 74 20 28 69 66 20 28 61 6e | ))))..........(line-list.(if.(an |
| 8000 | 64 20 28 66 75 6e 63 74 69 6f 6e 70 20 27 73 71 6c 69 74 65 2d 61 76 61 69 6c 61 62 6c 65 2d 70 | d.(functionp.'sqlite-available-p |
| 8020 | 29 20 28 73 71 6c 69 74 65 2d 61 76 61 69 6c 61 62 6c 65 2d 70 29 29 0a 20 20 20 20 20 20 20 20 | ).(sqlite-available-p))......... |
| 8040 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 71 75 65 72 79 2d 72 65 73 75 6c 74 0a 20 20 20 | ................query-result.... |
| 8060 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 | ...................(split-string |
| 8080 | 20 28 63 61 6c 69 62 72 65 64 62 2d 63 68 6f 6d 70 20 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 | .(calibredb-chomp.query-result). |
| 80a0 | 63 61 6c 69 62 72 65 64 62 2d 73 71 6c 2d 6e 65 77 6c 69 6e 65 29 20 29 29 29 0a 20 20 20 20 28 | calibredb-sql-newline).))).....( |
| 80c0 | 63 6f 6e 64 20 28 28 65 71 75 61 6c 20 22 22 20 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 27 28 | cond.((equal."".query-result).'( |
| 80e0 | 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 65 71 75 61 6c 20 6e 69 6c 20 71 75 65 72 79 | ""))...........((equal.nil.query |
| 8100 | 2d 72 65 73 75 6c 74 29 20 27 28 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 28 6c 65 | -result).'(""))...........(t.(le |
| 8120 | 74 20 28 72 65 73 2d 6c 69 73 74 20 68 2d 6c 69 73 74 20 66 2d 6c 69 73 74 20 61 2d 6c 69 73 74 | t.(res-list.h-list.f-list.a-list |
| 8140 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 6c 69 6e 65 20 6c | )................(dolist.(line.l |
| 8160 | 69 6e 65 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 | ine-list)..................(if.( |
| 8180 | 61 6e 64 20 28 66 75 6e 63 74 69 6f 6e 70 20 27 73 71 6c 69 74 65 2d 61 76 61 69 6c 61 62 6c 65 | and.(functionp.'sqlite-available |
| 81a0 | 2d 70 29 20 28 73 71 6c 69 74 65 2d 61 76 61 69 6c 61 62 6c 65 2d 70 29 29 0a 20 20 20 20 20 20 | -p).(sqlite-available-p))....... |
| 81c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 63 61 6c 69 62 72 65 64 62 2d | ...............(push.(calibredb- |
| 81e0 | 71 75 65 72 79 2d 74 6f 2d 61 6c 69 73 74 20 6c 69 6e 65 29 20 72 65 73 2d 6c 69 73 74 29 0a 20 | query-to-alist.line).res-list).. |
| 8200 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 76 61 6c 69 64 61 74 65 20 69 66 | ..................;;.validate.if |
| 8220 | 20 69 74 20 69 73 20 72 69 67 68 74 20 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .it.is.right.format............. |
| 8240 | 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 28 63 6f 6e 63 | .......(if.(string-match-p.(conc |
| 8260 | 61 74 20 22 5e 5b 30 2d 39 5d 5c 5c 7b 31 2c 31 30 5c 5c 7d 22 20 63 61 6c 69 62 72 65 64 62 2d | at."^[0-9]\\{1,10\\}".calibredb- |
| 8280 | 73 71 6c 2d 73 65 70 61 72 61 74 6f 72 29 20 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 | sql-separator).line)............ |
| 82a0 | 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 64 65 63 6f 64 65 20 61 6e 64 20 70 75 73 68 20 74 | ............;;.decode.and.push.t |
| 82c0 | 6f 20 72 65 73 2d 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 | o.res-list...................... |
| 82e0 | 20 20 28 70 75 73 68 20 28 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 2d 74 6f 2d 61 6c 69 73 | ..(push.(calibredb-query-to-alis |
| 8300 | 74 20 6c 69 6e 65 29 20 72 65 73 2d 6c 69 73 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | t.line).res-list))))............ |
| 8320 | 20 20 20 20 3b 3b 20 66 69 6c 74 65 72 20 61 72 63 68 69 76 65 2f 68 69 67 68 6c 69 67 68 74 2f | ....;;.filter.archive/highlight/ |
| 8340 | 66 61 76 6f 72 69 74 65 20 69 74 65 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 | favorite.items................(d |
| 8360 | 6f 6c 69 73 74 20 28 69 74 65 6d 20 72 65 73 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 | olist.(item.res-list)........... |
| 8380 | 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 61 | .......(cond.((string-match-p."a |
| 83a0 | 72 63 68 69 76 65 22 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 6c 69 73 74 | rchive".(calibredb-getattr.(list |
| 83c0 | 20 69 74 65 6d 29 20 3a 74 61 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .item).:tag))................... |
| 83e0 | 20 20 20 20 20 20 28 73 65 74 71 20 72 65 73 2d 6c 69 73 74 20 28 72 65 6d 6f 76 65 20 69 74 65 | ......(setq.res-list.(remove.ite |
| 8400 | 6d 20 72 65 73 2d 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | m.res-list)).................... |
| 8420 | 20 20 20 20 20 28 73 65 74 71 20 61 2d 6c 69 73 74 20 28 63 6f 6e 73 20 69 74 65 6d 20 61 2d 6c | .....(setq.a-list.(cons.item.a-l |
| 8440 | 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 | ist)))........................(( |
| 8460 | 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 66 61 76 6f 72 69 74 65 22 20 28 63 61 6c 69 62 | string-match-p."favorite".(calib |
| 8480 | 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 6c 69 73 74 20 69 74 65 6d 29 20 3a 74 61 67 29 29 0a | redb-getattr.(list.item).:tag)). |
| 84a0 | 20 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 72 65 | ........................(setq.re |
| 84c0 | 73 2d 6c 69 73 74 20 28 72 65 6d 6f 76 65 20 69 74 65 6d 20 72 65 73 2d 6c 69 73 74 29 29 0a 20 | s-list.(remove.item.res-list)).. |
| 84e0 | 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 66 2d 6c | .......................(setq.f-l |
| 8500 | 69 73 74 20 28 63 6f 6e 73 20 69 74 65 6d 20 66 2d 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 | ist.(cons.item.f-list)))........ |
| 8520 | 20 20 20 20 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 | ................((string-match-p |
| 8540 | 20 22 68 69 67 68 6c 69 67 68 74 22 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 | ."highlight".(calibredb-getattr. |
| 8560 | 28 6c 69 73 74 20 69 74 65 6d 29 20 3a 74 61 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | (list.item).:tag)).............. |
| 8580 | 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 72 65 73 2d 6c 69 73 74 20 28 72 65 6d 6f 76 | ...........(setq.res-list.(remov |
| 85a0 | 65 20 69 74 65 6d 20 72 65 73 2d 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e.item.res-list))............... |
| 85c0 | 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 68 2d 6c 69 73 74 20 28 63 6f 6e 73 20 69 74 65 | ..........(setq.h-list.(cons.ite |
| 85e0 | 6d 20 68 2d 6c 69 73 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 | m.h-list)))))................;;. |
| 8600 | 6d 65 72 67 65 20 61 72 63 68 69 76 65 2f 68 69 67 68 6c 69 67 68 74 2f 66 61 76 6f 72 69 74 65 | merge.archive/highlight/favorite |
| 8620 | 2f 72 65 73 74 20 69 74 65 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 | /rest.items................(setq |
| 8640 | 20 72 65 73 2d 6c 69 73 74 20 28 6e 63 6f 6e 63 20 61 2d 6c 69 73 74 20 72 65 73 2d 6c 69 73 74 | .res-list.(nconc.a-list.res-list |
| 8660 | 20 68 2d 6c 69 73 74 20 66 2d 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .h-list.f-list))................ |
| 8680 | 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 62 6f 6f 6b 6c 69 73 74 20 72 65 73 2d 6c 69 73 74 29 | (calibredb-getbooklist.res-list) |
| 86a0 | 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 64 61 74 | )))))..(defun.calibredb-candidat |
| 86c0 | 65 28 69 64 29 0a 20 20 22 47 65 6e 65 72 61 74 65 20 6f 6e 65 20 65 62 6f 6f 6b 20 63 61 6e 64 | e(id)..."Generate.one.ebook.cand |
| 86e0 | 69 64 61 74 65 20 61 6c 69 73 74 2e 0a 41 52 47 55 4d 45 4e 54 20 49 44 20 69 73 20 74 68 65 20 | idate.alist..ARGUMENT.ID.is.the. |
| 8700 | 69 64 20 6f 66 20 74 68 65 20 65 62 6f 6f 6b 20 69 6e 20 73 74 72 69 6e 67 2e 22 0a 20 20 28 6c | id.of.the.ebook.in.string."...(l |
| 8720 | 65 74 2a 20 28 28 71 75 65 72 79 2d 72 65 73 75 6c 74 20 28 63 61 6c 69 62 72 65 64 62 2d 71 75 | et*.((query-result.(calibredb-qu |
| 8740 | 65 72 79 20 28 66 6f 72 6d 61 74 20 22 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 28 25 73 29 20 | ery.(format."SELECT.*.FROM.(%s). |
| 8760 | 57 48 45 52 45 20 69 64 20 3d 20 25 73 22 20 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 2d 73 | WHERE.id.=.%s".calibredb-query-s |
| 8780 | 74 72 69 6e 67 20 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 6c 69 73 74 20 | tring.id)))..........(line-list. |
| 87a0 | 28 69 66 20 28 61 6e 64 20 28 66 75 6e 63 74 69 6f 6e 70 20 27 73 71 6c 69 74 65 2d 61 76 61 69 | (if.(and.(functionp.'sqlite-avai |
| 87c0 | 6c 61 62 6c 65 2d 70 29 20 28 73 71 6c 69 74 65 2d 61 76 61 69 6c 61 62 6c 65 2d 70 29 29 0a 20 | lable-p).(sqlite-available-p)).. |
| 87e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 71 75 65 72 79 2d 72 65 73 | .......................query-res |
| 8800 | 75 6c 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 71 75 | ult.......................(if.qu |
| 8820 | 65 72 79 2d 72 65 73 75 6c 74 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 63 61 6c 69 62 72 | ery-result.(split-string.(calibr |
| 8840 | 65 64 62 2d 63 68 6f 6d 70 20 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 63 61 6c 69 62 72 65 64 | edb-chomp.query-result).calibred |
| 8860 | 62 2d 73 71 6c 2d 6e 65 77 6c 69 6e 65 29 29 20 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 | b-sql-newline)).))).....(cond.(( |
| 8880 | 65 71 75 61 6c 20 22 22 20 71 75 65 72 79 2d 72 65 73 75 6c 74 29 20 27 28 22 22 29 29 0a 20 20 | equal."".query-result).'(""))... |
| 88a0 | 20 20 20 20 20 20 20 20 28 28 65 71 75 61 6c 20 6e 69 6c 20 71 75 65 72 79 2d 72 65 73 75 6c 74 | ........((equal.nil.query-result |
| 88c0 | 29 20 27 28 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 28 6c 65 74 20 28 72 65 73 2d | ).'(""))...........(t.(let.(res- |
| 88e0 | 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 6c 69 | list)................(dolist.(li |
| 8900 | 6e 65 20 6c 69 6e 65 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ne.line-list)..................( |
| 8920 | 69 66 20 28 61 6e 64 20 28 66 75 6e 63 74 69 6f 6e 70 20 27 73 71 6c 69 74 65 2d 61 76 61 69 6c | if.(and.(functionp.'sqlite-avail |
| 8940 | 61 62 6c 65 2d 70 29 20 28 73 71 6c 69 74 65 2d 61 76 61 69 6c 61 62 6c 65 2d 70 29 29 0a 20 20 | able-p).(sqlite-available-p))... |
| 8960 | 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 61 6c 69 62 72 | ...................(push.(calibr |
| 8980 | 65 64 62 2d 71 75 65 72 79 2d 74 6f 2d 61 6c 69 73 74 20 6c 69 6e 65 29 20 72 65 73 2d 6c 69 73 | edb-query-to-alist.line).res-lis |
| 89a0 | 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 76 61 6c 69 64 61 74 | t)....................;;.validat |
| 89c0 | 65 20 69 66 20 69 74 20 69 73 20 72 69 67 68 74 20 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 | e.if.it.is.right.format......... |
| 89e0 | 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 28 | ...........(if.(string-match-p.( |
| 8a00 | 63 6f 6e 63 61 74 20 22 5e 5b 30 2d 39 5d 5c 5c 7b 31 2c 31 30 5c 5c 7d 22 20 63 61 6c 69 62 72 | concat."^[0-9]\\{1,10\\}".calibr |
| 8a20 | 65 64 62 2d 73 71 6c 2d 73 65 70 61 72 61 74 6f 72 29 20 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 | edb-sql-separator).line)........ |
| 8a40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 64 65 63 6f 64 65 20 61 6e 64 20 70 75 | ................;;.decode.and.pu |
| 8a60 | 73 68 20 74 6f 20 72 65 73 2d 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | sh.to.res-list.................. |
| 8a80 | 20 20 20 20 20 20 28 70 75 73 68 20 28 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 2d 74 6f 2d | ......(push.(calibredb-query-to- |
| 8aa0 | 61 6c 69 73 74 20 6c 69 6e 65 29 20 72 65 73 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 | alist.line).res-list)........... |
| 8ac0 | 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 63 6f 6e 63 61 74 20 74 68 65 20 69 6e 76 61 6c 69 64 | ...........;;.concat.the.invalid |
| 8ae0 | 20 66 6f 72 6d 61 74 20 73 74 72 69 6e 67 73 20 69 6e 74 6f 20 6c 61 73 74 20 6c 69 6e 65 0a 20 | .format.strings.into.last.line.. |
| 8b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 73 65 74 66 20 28 63 61 | ....................;;.(setf.(ca |
| 8b20 | 64 72 20 28 61 73 73 6f 63 20 3a 63 6f 6d 6d 65 6e 74 20 28 63 61 72 20 72 65 73 2d 6c 69 73 74 | dr.(assoc.:comment.(car.res-list |
| 8b40 | 29 29 29 20 28 63 6f 6e 63 61 74 20 28 63 61 64 72 20 28 61 73 73 6f 63 20 3a 63 6f 6d 6d 65 6e | ))).(concat.(cadr.(assoc.:commen |
| 8b60 | 74 20 28 63 61 72 20 72 65 73 2d 6c 69 73 74 29 29 29 20 6c 69 6e 65 29 29 0a 20 20 20 20 20 20 | t.(car.res-list))).line))....... |
| 8b80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...............))).............. |
| 8ba0 | 20 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 62 6f 6f 6b 6c 69 73 74 20 72 65 73 2d 6c 69 73 | ..(calibredb-getbooklist.res-lis |
| 8bc0 | 74 29 29 20 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 | t)).))))..(defun.calibredb-candi |
| 8be0 | 64 61 74 65 2d 71 75 65 72 79 2d 66 69 6c 74 65 72 20 28 66 69 6c 74 65 72 29 0a 20 20 22 44 45 | date-query-filter.(filter)..."DE |
| 8c00 | 50 52 45 43 41 54 45 44 20 47 65 6e 65 72 61 74 65 20 65 62 6f 6f 6b 20 63 61 6e 64 69 64 61 74 | PRECATED.Generate.ebook.candidat |
| 8c20 | 65 20 61 6c 69 73 74 2e 0a 41 52 47 55 4d 45 4e 54 20 46 49 4c 54 45 52 20 69 73 20 74 68 65 20 | e.alist..ARGUMENT.FILTER.is.the. |
| 8c40 | 66 69 6c 74 65 72 20 73 74 72 69 6e 67 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 71 75 65 72 79 2d | filter.string."...(let*.((query- |
| 8c60 | 72 65 73 75 6c 74 20 28 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 20 28 66 6f 72 6d 61 74 20 | result.(calibredb-query.(format. |
| 8c80 | 22 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 28 25 73 29 20 25 73 22 20 63 61 6c 69 62 72 65 64 | "SELECT.*.FROM.(%s).%s".calibred |
| 8ca0 | 62 2d 71 75 65 72 79 2d 73 74 72 69 6e 67 20 28 63 61 6c 69 62 72 65 64 62 2d 71 75 65 72 79 2d | b-query-string.(calibredb-query- |
| 8cc0 | 73 65 61 72 63 68 2d 73 74 72 69 6e 67 20 66 69 6c 74 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 | search-string.filter))))........ |
| 8ce0 | 20 20 28 6c 69 6e 65 2d 6c 69 73 74 20 28 69 66 20 71 75 65 72 79 2d 72 65 73 75 6c 74 20 28 73 | ..(line-list.(if.query-result.(s |
| 8d00 | 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 63 61 6c 69 62 72 65 64 62 2d 63 68 6f 6d 70 20 71 75 65 | plit-string.(calibredb-chomp.que |
| 8d20 | 72 79 2d 72 65 73 75 6c 74 29 20 63 61 6c 69 62 72 65 64 62 2d 73 71 6c 2d 6e 65 77 6c 69 6e 65 | ry-result).calibredb-sql-newline |
| 8d40 | 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 65 71 75 61 6c 20 22 22 20 71 75 65 72 79 2d | )))).....(cond.((equal."".query- |
| 8d60 | 72 65 73 75 6c 74 29 20 27 28 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 28 6c 65 74 | result).'(""))...........(t.(let |
| 8d80 | 20 28 72 65 73 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 | .(res-list)................(doli |
| 8da0 | 73 74 20 28 6c 69 6e 65 20 6c 69 6e 65 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | st.(line.line-list)............. |
| 8dc0 | 20 20 20 20 20 3b 3b 20 76 61 6c 69 64 61 74 65 20 69 66 20 69 74 20 69 73 20 72 69 67 68 74 20 | .....;;.validate.if.it.is.right. |
| 8de0 | 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 | format..................(if.(str |
| 8e00 | 69 6e 67 2d 6d 61 74 63 68 2d 70 20 28 63 6f 6e 63 61 74 20 22 5e 5b 30 2d 39 5d 5c 5c 7b 31 2c | ing-match-p.(concat."^[0-9]\\{1, |
| 8e20 | 31 30 5c 5c 7d 22 20 63 61 6c 69 62 72 65 64 62 2d 73 71 6c 2d 73 65 70 61 72 61 74 6f 72 29 20 | 10\\}".calibredb-sql-separator). |
| 8e40 | 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 3b 3b 20 64 65 | line)......................;;.de |
| 8e60 | 63 6f 64 65 20 61 6e 64 20 70 75 73 68 20 74 6f 20 72 65 73 2d 6c 69 73 74 0a 20 20 20 20 20 20 | code.and.push.to.res-list....... |
| 8e80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 63 61 6c 69 62 72 65 64 62 2d | ...............(push.(calibredb- |
| 8ea0 | 71 75 65 72 79 2d 74 6f 2d 61 6c 69 73 74 20 6c 69 6e 65 29 20 72 65 73 2d 6c 69 73 74 29 0a 20 | query-to-alist.line).res-list).. |
| 8ec0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 63 6f 6e 63 61 74 20 74 68 65 20 | ..................;;.concat.the. |
| 8ee0 | 69 6e 76 61 6c 69 64 20 66 6f 72 6d 61 74 20 73 74 72 69 6e 67 73 20 69 6e 74 6f 20 6c 61 73 74 | invalid.format.strings.into.last |
| 8f00 | 20 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 73 65 74 | .line....................;;.(set |
| 8f20 | 66 20 28 63 61 64 72 20 28 61 73 73 6f 63 20 3a 63 6f 6d 6d 65 6e 74 20 28 63 61 72 20 72 65 73 | f.(cadr.(assoc.:comment.(car.res |
| 8f40 | 2d 6c 69 73 74 29 29 29 20 28 63 6f 6e 63 61 74 20 28 63 61 64 72 20 28 61 73 73 6f 63 20 3a 63 | -list))).(concat.(cadr.(assoc.:c |
| 8f60 | 6f 6d 6d 65 6e 74 20 28 63 61 72 20 72 65 73 2d 6c 69 73 74 29 29 29 20 6c 69 6e 65 29 29 0a 20 | omment.(car.res-list))).line)).. |
| 8f80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ..................))............ |
| 8fa0 | 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 62 6f 6f 6b 6c 69 73 74 20 72 65 73 2d 6c | ....(calibredb-getbooklist.res-l |
| 8fc0 | 69 73 74 29 29 20 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 | ist)).))))..(defun.calibredb-for |
| 8fe0 | 6d 61 74 2d 69 74 65 6d 20 28 62 6f 6f 6b 2d 61 6c 69 73 74 29 0a 20 20 22 46 6f 72 6d 61 74 20 | mat-item.(book-alist)..."Format. |
| 9000 | 74 68 65 20 63 61 6e 64 69 64 61 74 65 20 73 74 72 69 6e 67 20 73 68 6f 77 6e 20 69 6e 20 68 65 | the.candidate.string.shown.in.he |
| 9020 | 6c 6d 20 6f 72 20 69 76 79 2e 0a 41 72 67 75 6d 65 6e 74 20 42 4f 4f 4b 2d 41 4c 49 53 54 20 2e | lm.or.ivy..Argument.BOOK-ALIST.. |
| 9040 | 22 0a 20 20 28 6c 65 74 20 28 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 | "...(let.((id.(calibredb-getattr |
| 9060 | 20 28 6c 69 73 74 20 62 6f 6f 6b 2d 61 6c 69 73 74 29 20 3a 69 64 29 29 0a 20 20 20 20 20 20 20 | .(list.book-alist).:id))........ |
| 9080 | 20 28 74 69 74 6c 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 6c 69 73 74 | .(title.(calibredb-getattr.(list |
| 90a0 | 20 62 6f 6f 6b 2d 61 6c 69 73 74 29 20 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 29 0a 20 20 20 20 20 | .book-alist).:book-title))...... |
| 90c0 | 20 20 20 28 66 6f 72 6d 61 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 6c | ...(format.(calibredb-getattr.(l |
| 90e0 | 69 73 74 20 62 6f 6f 6b 2d 61 6c 69 73 74 29 20 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 0a 20 | ist.book-alist).:book-format)).. |
| 9100 | 20 20 20 20 20 20 20 28 61 75 74 68 6f 72 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 | .......(author.(calibredb-getatt |
| 9120 | 72 20 28 6c 69 73 74 20 62 6f 6f 6b 2d 61 6c 69 73 74 29 20 3a 61 75 74 68 6f 72 2d 73 6f 72 74 | r.(list.book-alist).:author-sort |
| 9140 | 29 29 0a 20 20 20 20 20 20 20 20 28 74 61 67 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 | )).........(tag.(calibredb-getat |
| 9160 | 74 72 20 28 6c 69 73 74 20 62 6f 6f 6b 2d 61 6c 69 73 74 29 20 3a 74 61 67 29 29 0a 20 20 20 20 | tr.(list.book-alist).:tag))..... |
| 9180 | 20 20 20 20 28 63 6f 6d 6d 65 6e 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 | ....(comment.(calibredb-getattr. |
| 91a0 | 28 6c 69 73 74 20 62 6f 6f 6b 2d 61 6c 69 73 74 29 20 3a 63 6f 6d 6d 65 6e 74 29 29 0a 20 20 20 | (list.book-alist).:comment)).... |
| 91c0 | 20 20 20 20 20 28 73 69 7a 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 6c | .....(size.(calibredb-getattr.(l |
| 91e0 | 69 73 74 20 62 6f 6f 6b 2d 61 6c 69 73 74 29 20 3a 73 69 7a 65 29 29 0a 20 20 20 20 20 20 20 20 | ist.book-alist).:size))......... |
| 9200 | 28 69 64 73 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 6c 69 73 74 20 62 6f | (ids.(calibredb-getattr.(list.bo |
| 9220 | 6f 6b 2d 61 6c 69 73 74 29 20 3a 69 64 73 29 29 0a 20 20 20 20 20 20 20 20 28 64 61 74 65 20 28 | ok-alist).:ids)).........(date.( |
| 9240 | 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 6c 69 73 74 20 62 6f 6f 6b 2d 61 6c 69 | calibredb-getattr.(list.book-ali |
| 9260 | 73 74 29 20 3a 6c 61 73 74 5f 6d 6f 64 69 66 69 65 64 29 29 0a 20 20 20 20 20 20 20 20 28 66 61 | st).:last_modified)).........(fa |
| 9280 | 76 6f 72 69 74 65 2d 6d 61 70 20 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 | vorite-map.(make-sparse-keymap)) |
| 92a0 | 0a 20 20 20 20 20 20 20 20 28 74 61 67 2d 6d 61 70 20 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b | .........(tag-map.(make-sparse-k |
| 92c0 | 65 79 6d 61 70 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 2d 6d 61 70 20 28 6d 61 6b | eymap)).........(format-map.(mak |
| 92e0 | 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 0a 20 20 20 20 20 20 20 20 28 61 75 74 68 6f | e-sparse-keymap)).........(autho |
| 9300 | 72 2d 6d 61 70 20 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 0a 20 20 20 20 | r-map.(make-sparse-keymap))..... |
| 9320 | 20 20 20 20 28 64 61 74 65 2d 6d 61 70 20 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 | ....(date-map.(make-sparse-keyma |
| 9340 | 70 29 29 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 66 61 76 6f 72 69 74 65 2d 6d 61 | p))).....(define-key.favorite-ma |
| 9360 | 70 20 5b 6d 6f 75 73 65 2d 31 5d 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d | p.[mouse-1].'calibredb-favorite- |
| 9380 | 6d 6f 75 73 65 2d 31 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 74 61 67 2d 6d 61 70 | mouse-1).....(define-key.tag-map |
| 93a0 | 20 5b 6d 6f 75 73 65 2d 31 5d 20 27 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 6d 6f 75 73 65 2d | .[mouse-1].'calibredb-tag-mouse- |
| 93c0 | 31 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 66 6f 72 6d 61 74 2d 6d 61 70 20 5b 6d | 1).....(define-key.format-map.[m |
| 93e0 | 6f 75 73 65 2d 31 5d 20 27 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 6d 6f 75 73 65 2d | ouse-1].'calibredb-format-mouse- |
| 9400 | 31 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 61 75 74 68 6f 72 2d 6d 61 70 20 5b 6d | 1).....(define-key.author-map.[m |
| 9420 | 6f 75 73 65 2d 31 5d 20 27 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 6d 6f 75 73 65 2d | ouse-1].'calibredb-author-mouse- |
| 9440 | 31 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 64 61 74 65 2d 6d 61 70 20 5b 6d 6f 75 | 1).....(define-key.date-map.[mou |
| 9460 | 73 65 2d 31 5d 20 27 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 6d 6f 75 73 65 2d 31 29 0a 20 | se-1].'calibredb-date-mouse-1).. |
| 9480 | 20 20 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 0a 20 | ...(if.calibredb-detailed-view.. |
| 94a0 | 20 20 20 20 20 20 20 28 73 65 74 71 20 74 69 74 6c 65 20 28 63 6f 6e 63 61 74 20 74 69 74 6c 65 | .......(setq.title.(concat.title |
| 94c0 | 20 22 5c 6e 22 29 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 0a 20 20 20 20 20 28 69 66 20 63 61 | ."\n"))).....(format......(if.ca |
| 94e0 | 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 0a 20 20 20 20 20 20 20 20 20 28 | libredb-detailed-view..........( |
| 9500 | 6c 65 74 20 28 28 6e 75 6d 20 28 63 6f 6e 64 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 | let.((num.(cond.(calibredb-forma |
| 9520 | 74 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | t-all-the-icons.3).............. |
| 9540 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 69 | .............(calibredb-format-i |
| 9560 | 63 6f 6e 73 2d 69 6e 2d 74 65 72 6d 69 6e 61 6c 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | cons-in-terminal.3)............. |
| 9580 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 3e 3d 20 63 61 6c 69 62 72 65 64 62 2d 69 64 2d | ..............((>=.calibredb-id- |
| 95a0 | 77 69 64 74 68 20 30 29 20 63 61 6c 69 62 72 65 64 62 2d 69 64 2d 77 69 64 74 68 29 0a 20 20 20 | width.0).calibredb-id-width).... |
| 95c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 30 20 29 29 29 29 | .......................(t.0.)))) |
| 95e0 | 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ............(concat............. |
| 9600 | 22 25 73 25 73 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d | "%s%s%s".............(calibredb- |
| 9620 | 66 6f 72 6d 61 74 2d 63 6f 6c 75 6d 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 46 6f 72 6d 61 74 3a | format-column.(format."%sFormat: |
| 9640 | 22 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 6e 75 6d 20 3f 20 29 29 20 28 2b 20 38 20 6e 75 6d | ".(make-string.num.?.)).(+.8.num |
| 9660 | 29 20 3a 6c 65 66 74 29 20 22 25 73 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c | ).:left)."%s\n".............(cal |
| 9680 | 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 63 6f 6c 75 6d 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 | ibredb-format-column.(format."%s |
| 96a0 | 44 61 74 65 3a 22 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 6e 75 6d 20 3f 20 29 29 20 28 2b 20 | Date:".(make-string.num.?.)).(+. |
| 96c0 | 38 20 6e 75 6d 29 20 3a 6c 65 66 74 29 20 22 25 73 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 | 8.num).:left)."%s\n"............ |
| 96e0 | 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 63 6f 6c 75 6d 6e 20 28 66 6f 72 6d 61 | .(calibredb-format-column.(forma |
| 9700 | 74 20 22 25 73 41 75 74 68 6f 72 3a 22 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 6e 75 6d 20 3f | t."%sAuthor:".(make-string.num.? |
| 9720 | 20 29 29 20 20 28 2b 20 38 20 6e 75 6d 29 20 3a 6c 65 66 74 29 20 22 25 73 5c 6e 22 0a 20 20 20 | .))..(+.8.num).:left)."%s\n".... |
| 9740 | 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 63 6f 6c 75 6d | .........(calibredb-format-colum |
| 9760 | 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 54 61 67 3a 22 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 | n.(format."%sTag:".(make-string. |
| 9780 | 6e 75 6d 20 3f 20 29 29 20 28 2b 20 38 20 6e 75 6d 29 20 3a 6c 65 66 74 29 20 22 25 73 5c 6e 22 | num.?.)).(+.8.num).:left)."%s\n" |
| 97a0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 63 | .............(calibredb-format-c |
| 97c0 | 6f 6c 75 6d 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 49 64 73 3a 22 20 28 6d 61 6b 65 2d 73 74 72 | olumn.(format."%sIds:".(make-str |
| 97e0 | 69 6e 67 20 6e 75 6d 20 3f 20 29 29 20 28 2b 20 38 20 6e 75 6d 29 20 3a 6c 65 66 74 29 20 22 25 | ing.num.?.)).(+.8.num).:left)."% |
| 9800 | 73 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d | s\n".............(calibredb-form |
| 9820 | 61 74 2d 63 6f 6c 75 6d 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 43 6f 6d 6d 65 6e 74 3a 22 20 28 | at-column.(format."%sComment:".( |
| 9840 | 6d 61 6b 65 2d 73 74 72 69 6e 67 20 6e 75 6d 20 3f 20 29 29 20 28 2b 20 38 20 6e 75 6d 29 20 3a | make-string.num.?.)).(+.8.num).: |
| 9860 | 6c 65 66 74 29 20 22 25 73 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 | left)."%s\n".............(calibr |
| 9880 | 65 64 62 2d 66 6f 72 6d 61 74 2d 63 6f 6c 75 6d 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 53 69 7a | edb-format-column.(format."%sSiz |
| 98a0 | 65 3a 22 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 6e 75 6d 20 3f 20 29 29 20 28 2b 20 38 20 6e | e:".(make-string.num.?.)).(+.8.n |
| 98c0 | 75 6d 29 20 3a 6c 65 66 74 29 20 22 25 73 22 29 29 0a 20 20 20 20 20 20 20 22 25 73 25 73 25 73 | um).:left)."%s"))........"%s%s%s |
| 98e0 | 20 25 73 20 25 73 20 25 73 20 28 25 73 29 20 25 73 20 25 73 20 25 73 22 29 0a 20 20 20 20 20 28 | .%s.%s.%s.(%s).%s.%s.%s")......( |
| 9900 | 63 6f 6e 64 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 61 6c 6c 2d 74 68 65 2d 69 | cond.(calibredb-format-all-the-i |
| 9920 | 63 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 69 66 20 28 66 62 | cons.............(concat.(if.(fb |
| 9940 | 6f 75 6e 64 70 20 27 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 | oundp.'all-the-icons-icon-for-fi |
| 9960 | 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 6c | le).........................(all |
| 9980 | 2d 74 68 65 2d 69 63 6f 6e 73 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 6c 65 20 28 63 61 6c 69 62 72 | -the-icons-icon-for-file.(calibr |
| 99a0 | 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 28 6c 69 73 74 20 62 6f 6f 6b 2d 61 6c 69 | edb-get-file-path.(list.book-ali |
| 99c0 | 73 74 29 29 29 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 | st)))."").....................". |
| 99e0 | 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 | "))............(calibredb-format |
| 9a00 | 2d 69 63 6f 6e 73 2d 69 6e 2d 74 65 72 6d 69 6e 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 | -icons-in-terminal.............( |
| 9a20 | 63 6f 6e 63 61 74 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 69 63 6f 6e 73 2d 69 6e 2d 74 65 | concat.(if.(fboundp.'icons-in-te |
| 9a40 | 72 6d 69 6e 61 6c 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 | rminal-icon-for-file)........... |
| 9a60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 63 6f 6e 73 2d 69 6e 2d 74 65 72 6d 69 6e 61 6c | ..............(icons-in-terminal |
| 9a80 | 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 6c 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 | -icon-for-file.(calibredb-get-fi |
| 9aa0 | 6c 65 2d 70 61 74 68 20 28 6c 69 73 74 20 62 6f 6f 6b 2d 61 6c 69 73 74 29 20 29 20 3a 76 2d 61 | le-path.(list.book-alist).).:v-a |
| 9ac0 | 64 6a 75 73 74 20 30 20 3a 68 65 69 67 68 74 20 31 29 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 | djust.0.:height.1)."").......... |
| 9ae0 | 20 20 20 20 20 20 20 20 20 20 20 22 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c | ..........."."))............(cal |
| 9b00 | 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 63 68 61 72 61 63 74 65 72 2d 69 63 6f 6e 73 0a 20 20 | ibredb-format-character-icons... |
| 9b20 | 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 63 61 6c 69 62 72 65 64 62 2d 61 74 74 | ..........(concat.(calibredb-att |
| 9b40 | 61 63 68 2d 69 63 6f 6e 2d 66 6f 72 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 | ach-icon-for.(calibredb-get-file |
| 9b60 | 2d 70 61 74 68 20 28 6c 69 73 74 20 62 6f 6f 6b 2d 61 6c 69 73 74 29 29 29 20 22 20 22 29 29 0a | -path.(list.book-alist))).".")). |
| 9b80 | 20 20 20 20 20 20 20 20 20 20 20 28 74 20 22 22 29 29 0a 20 20 20 20 20 28 63 61 6c 69 62 72 65 | ...........(t.""))......(calibre |
| 9ba0 | 64 62 2d 66 6f 72 6d 61 74 2d 63 6f 6c 75 6d 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 28 70 | db-format-column.(format."%s".(p |
| 9bc0 | 72 6f 70 65 72 74 69 7a 65 20 69 64 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 69 64 | ropertize.id.'face.'calibredb-id |
| 9be0 | 2d 66 61 63 65 20 27 69 64 20 69 64 29 29 20 63 61 6c 69 62 72 65 64 62 2d 69 64 2d 77 69 64 74 | -face.'id.id)).calibredb-id-widt |
| 9c00 | 68 20 3a 6c 65 66 74 29 0a 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d | h.:left)......(calibredb-format- |
| 9c20 | 63 6f 6c 75 6d 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 | column.(format."%s%s"........... |
| 9c40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 | ............................(if. |
| 9c60 | 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d | (s-contains?.calibredb-favorite- |
| 9c80 | 6b 65 79 77 6f 72 64 20 74 61 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | keyword.tag).................... |
| 9ca0 | 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 20 22 | .......................(format." |
| 9cc0 | 25 73 20 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 | %s.".(propertize.calibredb-favor |
| 9ce0 | 69 74 65 2d 69 63 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 | ite-icon........................ |
| 9d00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 9d20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 | .............'face.'calibredb-fa |
| 9d40 | 76 6f 72 69 74 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 | vorite-face..................... |
| 9d60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 9d80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6d 6f 75 73 65 2d 66 61 63 65 20 27 63 61 6c | ................'mouse-face.'cal |
| 9da0 | 69 62 72 65 64 62 2d 6d 6f 75 73 65 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ibredb-mouse-face............... |
| 9dc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 9de0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 68 65 6c 70 2d 65 63 68 6f | ......................'help-echo |
| 9e00 | 20 22 46 69 6c 74 65 72 20 74 68 65 20 66 61 76 6f 72 69 74 65 20 69 74 65 6d 73 22 0a 20 20 20 | ."Filter.the.favorite.items".... |
| 9e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 9e40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 9e60 | 20 27 6b 65 79 6d 61 70 20 66 61 76 6f 72 69 74 65 2d 6d 61 70 29 29 20 22 22 29 0a 20 20 20 20 | .'keymap.favorite-map))."")..... |
| 9e80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 9ea0 | 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 20 | ..(cond......................... |
| 9ec0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 63 61 6c | ...............((s-contains?.cal |
| 9ee0 | 69 62 72 65 64 62 2d 61 72 63 68 69 76 65 2d 6b 65 79 77 6f 72 64 20 74 61 67 29 0a 20 20 20 20 | ibredb-archive-keyword.tag)..... |
| 9f00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 9f20 | 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 74 69 74 6c 65 20 27 66 61 63 65 20 27 63 61 6c | ....(propertize.title.'face.'cal |
| 9f40 | 69 62 72 65 64 62 2d 61 72 63 68 69 76 65 2d 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 | ibredb-archive-face))........... |
| 9f60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 | .............................((s |
| 9f80 | 2d 63 6f 6e 74 61 69 6e 73 3f 20 63 61 6c 69 62 72 65 64 62 2d 68 69 67 68 6c 69 67 68 74 2d 6b | -contains?.calibredb-highlight-k |
| 9fa0 | 65 79 77 6f 72 64 20 74 61 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | eyword.tag)..................... |
| 9fc0 | 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 7a 65 20 | ....................(propertize. |
| 9fe0 | 74 69 74 6c 65 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 68 69 67 68 6c 69 67 68 74 | title.'face.'calibredb-highlight |
| a000 | 2d 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -face))......................... |
| a020 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...............(t............... |
| a040 | 20 20 20 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 70 65 | ..........................(prope |
| a060 | 72 74 69 7a 65 20 74 69 74 6c 65 20 27 66 61 63 65 20 28 63 61 6c 69 62 72 65 64 62 2d 74 69 74 | rtize.title.'face.(calibredb-tit |
| a080 | 6c 65 2d 66 61 63 65 29 29 29 29 29 20 28 63 61 6c 69 62 72 65 64 62 2d 74 69 74 6c 65 2d 77 69 | le-face))))).(calibredb-title-wi |
| a0a0 | 64 74 68 29 20 3a 6c 65 66 74 29 0a 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d | dth).:left)......(calibredb-form |
| a0c0 | 61 74 2d 63 6f 6c 75 6d 6e 20 28 70 72 6f 70 65 72 74 69 7a 65 20 66 6f 72 6d 61 74 0a 20 20 20 | at-column.(propertize.format.... |
| a0e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a100 | 20 20 20 20 20 20 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 | .......'face.'calibredb-format-f |
| a120 | 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 20 | ace............................. |
| a140 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6d 6f 75 73 65 2d 66 61 63 65 20 27 63 61 6c 69 62 | ..............'mouse-face.'calib |
| a160 | 72 65 64 62 2d 6d 6f 75 73 65 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | redb-mouse-face................. |
| a180 | 20 20 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 68 65 6c 70 2d | ..........................'help- |
| a1a0 | 65 63 68 6f 20 22 46 69 6c 74 65 72 20 77 69 74 68 20 74 68 69 73 20 66 6f 72 6d 61 74 22 0a 20 | echo."Filter.with.this.format".. |
| 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 20 20 20 20 20 20 20 20 27 6b 65 79 6d 61 70 20 66 6f 72 6d 61 74 2d 6d 61 70 29 20 28 63 61 | .........'keymap.format-map).(ca |
| a200 | 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 77 69 64 74 68 29 20 3a 6c 65 66 74 29 0a 20 20 20 | libredb-format-width).:left).... |
| a220 | 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 63 6f 6c 75 6d 6e 20 28 70 72 6f 70 | ..(calibredb-format-column.(prop |
| a240 | 65 72 74 69 7a 65 20 28 73 2d 6c 65 66 74 20 31 30 20 64 61 74 65 29 20 27 66 61 63 65 20 27 63 | ertize.(s-left.10.date).'face.'c |
| a260 | 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 61 63 65 20 3b 20 6f 6e 6c 79 20 6b 65 65 70 20 59 | alibredb-date-face.;.only.keep.Y |
| a280 | 59 59 59 2d 4d 4d 2d 44 44 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | YYY-MM-DD....................... |
| a2a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6d 6f 75 73 65 2d 66 61 63 65 20 | ....................'mouse-face. |
| a2c0 | 27 63 61 6c 69 62 72 65 64 62 2d 6d 6f 75 73 65 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 | 'calibredb-mouse-face........... |
| a2e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a300 | 27 68 65 6c 70 2d 65 63 68 6f 20 22 46 69 6c 74 65 72 20 77 69 74 68 20 74 68 69 73 20 64 61 74 | 'help-echo."Filter.with.this.dat |
| a320 | 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 20 20 20 20 | e".............................. |
| a340 | 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6b 65 79 6d 61 70 20 64 61 74 65 2d 6d 61 70 29 20 28 | .............'keymap.date-map).( |
| a360 | 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 77 69 64 74 68 29 20 3a 6c 65 66 74 29 0a 20 20 20 | calibredb-date-width).:left).... |
| a380 | 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 63 6f 6c 75 6d 6e 20 28 6d 61 70 63 | ..(calibredb-format-column.(mapc |
| a3a0 | 6f 6e 63 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 20 20 20 20 | oncat........................... |
| a3c0 | 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 61 75 74 68 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 | .....(lambda.(author)........... |
| a3e0 | 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 70 65 72 74 69 | .......................(properti |
| a400 | 7a 65 20 61 75 74 68 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ze.author....................... |
| a420 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 61 75 74 68 6f 72 20 61 | .......................'author.a |
| a440 | 75 74 68 6f 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 | uthor........................... |
| a460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 | ...................'face.'calibr |
| a480 | 65 64 62 2d 61 75 74 68 6f 72 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | edb-author-face................. |
| a4a0 | 20 20 20 20 20 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 6f | .............................'mo |
| a4c0 | 75 73 65 2d 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 6d 6f 75 73 65 2d 66 61 63 65 0a 20 | use-face.'calibredb-mouse-face.. |
| a4e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a500 | 20 20 20 20 20 20 20 20 20 20 20 20 27 68 65 6c 70 2d 65 63 68 6f 20 28 66 6f 72 6d 61 74 20 22 | ............'help-echo.(format." |
| a520 | 46 69 6c 74 65 72 20 77 69 74 68 20 74 68 69 73 20 61 75 74 68 6f 72 3a 20 25 73 22 20 61 75 74 | Filter.with.this.author:.%s".aut |
| a540 | 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 20 20 | hor)............................ |
| a560 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6b 65 79 6d 61 70 20 61 75 74 68 6f 72 | ..................'keymap.author |
| a580 | 2d 6d 61 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 | -map)).......................... |
| a5a0 | 20 20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 61 75 74 68 6f 72 20 22 2c 22 29 20 | ......(split-string.author.","). |
| a5c0 | 22 2c 22 29 20 28 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 77 69 64 74 68 29 20 3a 6c | ",").(calibredb-author-width).:l |
| a5e0 | 65 66 74 29 0a 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 63 6f 6c 75 | eft)......(calibredb-format-colu |
| a600 | 6d 6e 20 28 6d 61 70 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mn.(mapconcat................... |
| a620 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 74 61 67 29 0a 20 20 20 20 20 | .............(lambda.(tag)...... |
| a640 | 20 20 20 20 20 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 | ............................(pro |
| a660 | 70 65 72 74 69 7a 65 20 74 61 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | pertize.tag..................... |
| a680 | 20 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 61 67 20 74 61 | .........................'tag.ta |
| a6a0 | 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | g............................... |
| a6c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d | ...............'face.'calibredb- |
| a6e0 | 74 61 67 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | tag-face........................ |
| a700 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6d 6f 75 73 65 2d 66 61 63 | ......................'mouse-fac |
| a720 | 65 20 27 63 61 6c 69 62 72 65 64 62 2d 6d 6f 75 73 65 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 | e.'calibredb-mouse-face......... |
| a740 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a760 | 20 20 20 20 20 27 68 65 6c 70 2d 65 63 68 6f 20 28 66 6f 72 6d 61 74 20 22 46 69 6c 74 65 72 20 | .....'help-echo.(format."Filter. |
| a780 | 77 69 74 68 20 74 68 69 73 20 74 61 67 3a 20 25 73 22 20 74 61 67 29 0a 20 20 20 20 20 20 20 20 | with.this.tag:.%s".tag)......... |
| a7a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a7c0 | 20 20 20 20 20 27 6b 65 79 6d 61 70 20 74 61 67 2d 6d 61 70 29 29 0a 20 20 20 20 20 20 20 20 20 | .....'keymap.tag-map)).......... |
| a7e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 | ......................(split-str |
| a800 | 69 6e 67 20 74 61 67 20 22 2c 22 29 20 22 2c 22 29 20 28 63 61 6c 69 62 72 65 64 62 2d 74 61 67 | ing.tag.",").",").(calibredb-tag |
| a820 | 2d 77 69 64 74 68 29 20 3a 6c 65 66 74 29 0a 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 | -width).:left)......(calibredb-f |
| a840 | 6f 72 6d 61 74 2d 63 6f 6c 75 6d 6e 20 28 70 72 6f 70 65 72 74 69 7a 65 20 69 64 73 20 27 66 61 | ormat-column.(propertize.ids.'fa |
| a860 | 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 69 64 73 2d 66 61 63 65 29 20 28 63 61 6c 69 62 72 65 | ce.'calibredb-ids-face).(calibre |
| a880 | 64 62 2d 69 64 73 2d 77 69 64 74 68 29 20 3a 6c 65 66 74 29 0a 20 20 20 20 20 28 69 66 20 28 73 | db-ids-width).:left)......(if.(s |
| a8a0 | 74 72 69 6e 67 70 20 63 6f 6d 6d 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 | tringp.comment)..........(proper |
| a8c0 | 74 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 20 28 69 66 20 63 61 6c 69 | tize...........(let.((c.(if.cali |
| a8e0 | 62 72 65 64 62 2d 63 6f 6e 64 65 6e 73 65 2d 63 6f 6d 6d 65 6e 74 73 20 28 63 61 6c 69 62 72 65 | bredb-condense-comments.(calibre |
| a900 | 64 62 2d 63 6f 6e 64 65 6e 73 65 2d 63 6f 6d 6d 65 6e 74 73 20 63 6f 6d 6d 65 6e 74 29 20 63 6f | db-condense-comments.comment).co |
| a920 | 6d 6d 65 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 20 63 61 6c 69 62 | mment)).................(w.calib |
| a940 | 72 65 64 62 2d 63 6f 6d 6d 65 6e 74 2d 77 69 64 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | redb-comment-width))............ |
| a960 | 20 28 63 6f 6e 64 20 28 28 3e 20 77 20 30 29 20 28 73 2d 74 72 75 6e 63 61 74 65 20 77 20 63 29 | .(cond.((>.w.0).(s-truncate.w.c) |
| a980 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 3d 20 77 20 30 29 20 22 22 29 | )...................((=.w.0)."") |
| a9a0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 63 29 29 29 0a 20 20 20 20 20 | ...................(t.c)))...... |
| a9c0 | 20 20 20 20 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 65 6e 74 2d 66 61 | .....'face.'calibredb-comment-fa |
| a9e0 | 63 65 29 20 22 22 29 0a 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 22 0a 20 20 20 20 | ce)."")......(format."%s%s"..... |
| aa00 | 20 20 20 20 20 20 20 20 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 73 69 7a 65 2d 73 68 6f 77 | .........(if.calibredb-size-show |
| aa20 | 0a 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 73 69 | ..................(propertize.si |
| aa40 | 7a 65 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 69 7a 65 2d 66 61 63 65 29 20 22 | ze.'face.'calibredb-size-face)." |
| aa60 | 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 73 69 | ")..............(if.calibredb-si |
| aa80 | 7a 65 2d 73 68 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 | ze-show..................(proper |
| aaa0 | 74 69 7a 65 20 22 4d 62 22 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 69 7a 65 2d | tize."Mb".'face.'calibredb-size- |
| aac0 | 66 61 63 65 29 20 22 22 29 29 29 20 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 | face).""))).))..(provide.'calibr |
| aae0 | 65 64 62 2d 63 6f 72 65 29 0a 0a 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 2e 65 6c | edb-core)..;;;.calibredb-core.el |
| ab00 | 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...................... |
| ab20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ab40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ab60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ab80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| aba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| abc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| abe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ac00 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| ac20 | 2d 64 69 72 65 64 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 | -dired.el....................... |
| ac40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ac60 | 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 |
| ac80 | 30 30 30 36 32 36 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 31 36 33 00 20 30 00 00 00 | 0006266.00000000000.016163..0... |
| aca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| acc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ace0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ad00 | 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................... |
| ad20 | 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................... |
| ad40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ad60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ad80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ada0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| adc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ade0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ae00 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 64 69 72 65 64 2e 65 6c 20 2d 2d 2d 20 44 69 72 65 64 | ;;;.calibredb-dired.el.---.Dired |
| ae20 | 20 73 75 70 70 6f 72 74 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c 65 78 69 63 | .support.for.calibredb.-*-.lexic |
| ae40 | 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 | al-binding:.t;.-*-..;;.Copyright |
| ae60 | 20 28 43 29 20 32 30 32 30 20 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a | .(C).2020.Damon.Chan..;;.Author: |
| ae80 | 20 44 61 6d 6f 6e 20 43 68 61 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e | .Damon.Chan.<elecming@gmail.com> |
| aea0 | 0a 3b 3b 20 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 65 6e | .;;.URL:.https://github.com/chen |
| aec0 | 79 61 6e 6d 69 6e 67 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 | yanming/calibredb.el.;;.Keywords |
| aee0 | 3a 20 74 6f 6f 6c 73 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a 3b 3b 20 54 | :.tools.;;.Version:.2.12.0..;;.T |
| af00 | 68 69 73 20 66 69 6c 65 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 | his.file.is.NOT.part.of.GNU.Emac |
| af20 | 73 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 | s...;;.This.program.is.free.soft |
| af40 | 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e | ware;.you.can.redistribute.it.an |
| af60 | 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d | d/or.modify.;;.it.under.the.term |
| af80 | 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 | s.of.the.GNU.General.Public.Lice |
| afa0 | 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 | nse.as.published.by.;;.the.Free. |
| afc0 | 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 | Software.Foundation,.either.vers |
| afe0 | 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 | ion.3.of.the.License,.or.;;.(at. |
| b000 | 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a | your.option).any.later.version.. |
| b020 | 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 | .;;.This.program.is.distributed. |
| b040 | 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 73 65 66 | in.the.hope.that.it.will.be.usef |
| b060 | 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 54 59 3b | ul,.;;.but.WITHOUT.ANY.WARRANTY; |
| b080 | 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 72 61 6e | .without.even.the.implied.warran |
| b0a0 | 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 49 54 4e | ty.of.;;.MERCHANTABILITY.or.FITN |
| b0c0 | 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 20 20 53 | ESS.FOR.A.PARTICULAR.PURPOSE...S |
| b0e0 | 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 4c 69 63 | ee.the.;;.GNU.General.Public.Lic |
| b100 | 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 | ense.for.more.details...;;.You.s |
| b120 | 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 |
| b140 | 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.;;. |
| b160 | 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 | along.with.this.program...If.not |
| b180 | 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 65 6e | ,.see.<https://www.gnu.org/licen |
| b1a0 | 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 3b 20 43 6f 64 | ses/>...;;;.Commentary:..;;;.Cod |
| b1c0 | 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 29 0a 0a 28 | e:..(require.'calibredb-core)..( |
| b1e0 | 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 | eval-when-compile.(defvar.calibr |
| b200 | 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 29 29 0a 28 65 76 61 6c 2d 77 68 65 6e 2d | edb-search-entries)).(eval-when- |
| b220 | 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 | compile.(defvar.calibredb-full-e |
| b240 | 6e 74 72 69 65 73 29 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 | ntries)).(declare-function.calib |
| b260 | 72 65 64 62 2d 73 65 61 72 63 68 2d 63 6c 65 61 72 2d 66 69 6c 74 65 72 20 22 63 61 6c 69 62 72 | redb-search-clear-filter."calibr |
| b280 | 65 64 62 2d 73 65 61 72 63 68 2e 65 6c 22 29 0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 | edb-search.el")..(define-obsolet |
| b2a0 | 65 2d 66 75 6e 63 74 69 6f 6e 2d 61 6c 69 61 73 20 23 27 63 61 6c 69 62 72 65 64 62 2d 6f 70 65 | e-function-alias.#'calibredb-ope |
| b2c0 | 6e 2d 64 69 72 65 64 0a 20 20 27 63 61 6c 69 62 72 65 64 62 2d 64 69 72 65 64 2d 6f 70 65 6e 20 | n-dired...'calibredb-dired-open. |
| b2e0 | 22 63 61 6c 69 62 72 65 64 62 20 32 2e 31 32 2e 30 22 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 | "calibredb.2.12.0")..(defun.cali |
| b300 | 62 72 65 64 62 2d 64 69 72 65 64 2d 6f 70 65 6e 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 | bredb-dired-open.(&optional.cand |
| b320 | 69 64 61 74 65 20 61 72 67 29 0a 20 20 22 4f 70 65 6e 20 64 69 72 65 64 20 6f 66 20 74 68 65 20 | idate.arg)..."Open.dired.of.the. |
| b340 | 73 65 6c 65 63 74 65 64 20 69 74 65 6d 2e 0a 49 66 20 74 68 65 20 75 6e 69 76 65 72 73 61 6c 20 | selected.item..If.the.universal. |
| b360 | 70 72 65 66 69 78 20 41 52 47 20 69 73 20 75 73 65 64 20 74 68 65 6e 20 6f 70 65 6e 20 74 68 65 | prefix.ARG.is.used.then.open.the |
| b380 | 20 66 6f 6c 64 65 72 0a 63 6f 6e 74 61 69 6e 69 6e 67 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 | .folder.containing.the.current.f |
| b3a0 | 69 6c 65 20 62 79 20 74 68 65 20 64 65 66 61 75 6c 74 20 65 78 70 6c 6f 72 65 72 2e 0a 4f 70 74 | ile.by.the.default.explorer..Opt |
| b3c0 | 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 43 41 4e 44 49 44 41 54 45 20 69 73 20 74 68 65 20 | ional.argument.CANDIDATE.is.the. |
| b3e0 | 73 65 6c 65 63 74 65 64 20 69 74 65 6d 2e 0a 4f 70 65 6e 73 20 61 20 64 69 72 65 64 20 62 75 66 | selected.item..Opens.a.dired.buf |
| b400 | 66 65 72 20 69 6e 20 46 49 4c 45 27 73 20 64 69 72 65 63 74 6f 72 79 2e 20 20 49 66 20 46 49 4c | fer.in.FILE's.directory...If.FIL |
| b420 | 45 20 69 73 20 61 0a 64 69 72 65 63 74 6f 72 79 2c 20 6f 70 65 6e 20 74 68 69 73 20 64 69 72 65 | E.is.a.directory,.open.this.dire |
| b440 | 63 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c 69 73 74 20 | ctory."...(interactive....(list. |
| b460 | 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 | (car.(calibredb-find-candidate-a |
| b480 | 74 2d 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 | t-point))..........current-prefi |
| b4a0 | 78 2d 61 72 67 29 29 0a 20 20 28 69 66 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 | x-arg))...(if.current-prefix-arg |
| b4c0 | 0a 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 77 69 74 68 2d 64 65 66 61 | .......(calibredb-open-with-defa |
| b4e0 | 75 6c 74 2d 74 6f 6f 6c 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 28 63 | ult-tool.(file-name-directory.(c |
| b500 | 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 63 61 6e 64 69 64 61 74 65 | alibredb-get-file-path.candidate |
| b520 | 20 74 29 20 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 66 69 6c 65 20 28 63 61 6c 69 62 72 65 64 | .t).)).....(let.((file.(calibred |
| b540 | 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 3a 66 69 6c 65 2d 70 61 74 68 29 29 | b-getattr.candidate.:file-path)) |
| b560 | 29 0a 20 20 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 66 69 | ).......(if.(file-directory-p.fi |
| b580 | 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 20 66 69 6c 65 29 0a 20 20 20 20 20 | le)...........(dired.file)...... |
| b5a0 | 20 20 20 28 64 69 72 65 64 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 66 | ...(dired.(file-name-directory.f |
| b5c0 | 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 67 6f 74 6f 2d 66 69 6c 65 20 66 | ile)).........(dired-goto-file.f |
| b5e0 | 69 6c 65 29 29 29 29 29 0a 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 64 69 72 65 | ile)))))...(defun.calibredb-dire |
| b600 | 64 2d 61 64 64 20 28 29 0a 20 20 22 41 64 64 20 6d 61 72 6b 65 64 20 66 69 6c 65 73 20 69 6e 20 | d-add.()..."Add.marked.files.in. |
| b620 | 64 69 72 65 64 20 74 6f 20 63 75 72 72 65 6e 74 20 63 61 6c 69 62 72 65 20 6c 69 62 72 61 72 79 | dired.to.current.calibre.library |
| b640 | 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 66 20 28 64 65 72 69 76 65 | ."...(interactive)...(if.(derive |
| b660 | 64 2d 6d 6f 64 65 2d 70 20 27 64 69 72 65 64 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 63 61 6c | d-mode-p.'dired-mode).......(cal |
| b680 | 69 62 72 65 64 62 2d 64 69 72 65 64 2d 61 64 64 2d 70 72 6f 63 65 73 73 20 28 64 69 72 65 64 2d | ibredb-dired-add-process.(dired- |
| b6a0 | 67 65 74 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c | get-marked-files))))..(defun.cal |
| b6c0 | 69 62 72 65 64 62 2d 64 69 72 65 64 2d 61 64 64 2d 70 72 6f 63 65 73 73 20 28 66 69 6c 65 73 29 | ibredb-dired-add-process.(files) |
| b6e0 | 0a 20 20 22 54 68 65 20 70 72 6f 63 65 73 73 20 6f 66 20 61 64 64 69 6e 67 20 6d 61 72 6b 65 64 | ..."The.process.of.adding.marked |
| b700 | 20 46 49 4c 45 53 20 69 6e 20 64 69 72 65 64 20 74 6f 20 63 75 72 72 65 6e 74 20 63 61 6c 69 62 | .FILES.in.dired.to.current.calib |
| b720 | 72 65 0a 6c 69 62 72 61 72 79 2e 22 0a 20 20 28 6c 65 74 20 28 28 66 69 6c 65 73 20 28 6d 61 70 | re.library."...(let.((files.(map |
| b740 | 63 6f 6e 63 61 74 0a 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 | concat.................(lambda.( |
| b760 | 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 68 65 6c 6c 2d 71 | file)...................(shell-q |
| b780 | 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 | uote-argument.(expand-file-name. |
| b7a0 | 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 73 20 22 20 | file))).................files.". |
| b7c0 | 22 29 29 0a 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 | ")).........(buffer.(current-buf |
| b7e0 | 66 65 72 29 29 29 0a 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c | fer))).....(set-process-sentinel |
| b800 | 0a 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 70 72 6f 63 65 73 73 20 3a 63 6f 6d 6d 61 6e | ......(calibredb-process.:comman |
| b820 | 64 20 22 61 64 64 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 | d."add"......................... |
| b840 | 3a 69 6e 70 75 74 20 66 69 6c 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | :input.files.................... |
| b860 | 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 61 64 64 2d | .....:library.(if.calibredb-add- |
| b880 | 64 75 70 6c 69 63 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | duplicate....................... |
| b8a0 | 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 2d 6c 69 62 72 61 72 | ...............(format."--librar |
| b8c0 | 79 2d 70 61 74 68 20 25 73 20 2d 64 22 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 | y-path.%s.-d".(calibredb-root-di |
| b8e0 | 72 2d 71 75 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | r-quote))....................... |
| b900 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d | .............(format."--library- |
| b920 | 70 61 74 68 20 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f | path.%s".(calibredb-root-dir-quo |
| b940 | 74 65 29 29 29 29 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 70 20 65 29 0a 20 20 20 20 20 20 | te))))......(lambda.(p.e)....... |
| b960 | 20 28 77 68 65 6e 20 28 3d 20 30 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 74 75 73 | .(when.(=.0.(process-exit-status |
| b980 | 20 70 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 73 65 | .p))..........(setq.calibredb-se |
| b9a0 | 61 72 63 68 2d 65 6e 74 72 69 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 64 61 74 | arch-entries.(calibredb-candidat |
| b9c0 | 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 75 | es))..........(setq.calibredb-fu |
| b9e0 | 6c 6c 2d 65 6e 74 72 69 65 73 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 | ll-entries.calibredb-search-entr |
| ba00 | 69 65 73 29 0a 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d | ies)..........(calibredb-search- |
| ba20 | 63 6c 65 61 72 2d 66 69 6c 74 65 72 29 0a 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 | clear-filter)..........(with-cur |
| ba40 | 72 65 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 20 20 20 20 20 | rent-buffer.buffer.............. |
| ba60 | 28 64 69 72 65 64 2d 64 6f 2d 64 65 6c 65 74 65 29 29 29 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 | (dired-do-delete)))))))..(provid |
| ba80 | 65 20 27 63 61 6c 69 62 72 65 64 62 2d 64 69 72 65 64 29 0a 0a 3b 3b 3b 20 63 61 6c 69 62 72 65 | e.'calibredb-dired)..;;;.calibre |
| baa0 | 64 62 2d 64 69 72 65 64 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 | db-dired.el.ends.here........... |
| bac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bbc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bbe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bc00 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| bc20 | 2d 66 61 63 65 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 | -faces.el....................... |
| bc40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bc60 | 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 |
| bc80 | 30 30 31 34 35 35 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 31 35 33 00 20 30 00 00 00 | 0014553.00000000000.016153..0... |
| bca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bcc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bd00 | 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................... |
| bd20 | 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................... |
| bd40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bd60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bd80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bda0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bdc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bde0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| be00 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 2e 65 6c 20 2d 2d 2d 20 46 61 63 65 73 | ;;;.calibredb-faces.el.---.Faces |
| be20 | 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 | .for.calibredb.-*-.lexical-bindi |
| be40 | 6e 67 3a 20 74 3b 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 32 | ng:.t;.-*-..;;.Copyright.(C).202 |
| be60 | 30 20 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 44 61 6d 6f 6e 20 43 | 0.Damon.Chan..;;.Author:.Damon.C |
| be80 | 68 61 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 55 52 4c 3a | han.<elecming@gmail.com>.;;.URL: |
| bea0 | 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 65 6e 79 61 6e 6d 69 6e 67 2f | .https://github.com/chenyanming/ |
| bec0 | 63 61 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 74 6f 6f 6c 73 0a | calibredb.el.;;.Keywords:.tools. |
| bee0 | 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 | ;;.Version:.2.12.0..;;.This.file |
| bf00 | 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 73 2e 0a 0a 3b 3b 20 54 | .is.NOT.part.of.GNU.Emacs...;;.T |
| bf20 | 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f | his.program.is.free.software;.yo |
| bf40 | 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 64 | u.can.redistribute.it.and/or.mod |
| bf60 | 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 65 | ify.;;.it.under.the.terms.of.the |
| bf80 | 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 70 | .GNU.General.Public.License.as.p |
| bfa0 | 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 | ublished.by.;;.the.Free.Software |
| bfc0 | 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 66 | .Foundation,.either.version.3.of |
| bfe0 | 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 | .the.License,.or.;;.(at.your.opt |
| c000 | 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 | ion).any.later.version...;;.This |
| c020 | 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 | .program.is.distributed.in.the.h |
| c040 | 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 |
| c060 | 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 |
| c080 | 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.;; |
| c0a0 | 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. |
| c0c0 | 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.; |
| c0e0 | 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 |
| c100 | 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 | .more.details...;;.You.should.ha |
| c120 | 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 |
| c140 | 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 |
| c160 | 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 | th.this.program...If.not,.see.<h |
| c180 | 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a | ttps://www.gnu.org/licenses/>... |
| c1a0 | 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 64 65 66 | ;;;.Commentary:..;;;.Code:..(def |
| c1c0 | 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 2d 68 69 67 | face.calibredb-search-header-hig |
| c1e0 | 68 6c 69 67 68 74 2d 66 61 63 65 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 72 65 67 69 | hlight-face...'((t.:inherit.regi |
| c200 | 6f 6e 20 3a 77 65 69 67 68 74 20 62 6f 6c 64 20 3a 75 6e 64 65 72 6c 69 6e 65 20 74 29 29 0a 20 | on.:weight.bold.:underline.t)).. |
| c220 | 20 22 46 61 63 65 20 66 6f 72 20 74 68 65 20 68 65 61 64 65 72 20 61 74 20 70 6f 69 6e 74 2e 22 | ."Face.for.the.header.at.point." |
| c240 | 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 | ...:group.'calibredb-faces)..(de |
| c260 | 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 69 64 2d 66 61 63 65 0a 20 20 27 28 28 28 28 63 | fface.calibredb-id-face...'((((c |
| c280 | 6c 61 73 73 20 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 | lass.color).(background.light)). |
| c2a0 | 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 33 42 36 45 41 38 22 29 0a 20 20 20 20 | .....:foreground."#3B6EA8")..... |
| c2c0 | 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 72 6f 75 6e 64 20 64 61 72 6b | (((class.color).(background.dark |
| c2e0 | 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 38 31 41 31 43 31 22 29 0a 20 | ))......:foreground."#81A1C1").. |
| c300 | 20 20 20 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 75 6c 74 29 29 0a 20 20 22 46 61 63 65 | ...(t.:inherit.default))..."Face |
| c320 | 20 75 73 65 64 20 66 6f 72 20 69 64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 | .used.for.id."...:group.'calibre |
| c340 | 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 74 69 | db-faces)..(defface.calibredb-ti |
| c360 | 74 6c 65 2d 66 61 63 65 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 75 6c 74 29 29 | tle-face.'((t.:inherit.default)) |
| c380 | 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 74 69 74 6c 65 20 6f 6e 20 63 6f 6d 70 61 | ..."Face.used.for.title.on.compa |
| c3a0 | 63 74 20 76 69 65 77 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 | ct.view."...:group.'calibredb-fa |
| c3c0 | 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 74 69 74 6c 65 2d 64 | ces)..(defface.calibredb-title-d |
| c3e0 | 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 66 61 63 65 0a 20 20 27 28 28 28 28 63 6c 61 73 73 20 63 | etailed-view-face...'((((class.c |
| c400 | 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 3a | olor).(background.light))......: |
| c420 | 62 61 63 6b 67 72 6f 75 6e 64 20 22 67 72 61 79 38 35 22 29 0a 20 20 20 20 28 28 28 63 6c 61 73 | background."gray85").....(((clas |
| c440 | 73 20 63 6f 6c 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 | s.color).(background.dark))..... |
| c460 | 20 3a 62 61 63 6b 67 72 6f 75 6e 64 20 22 67 72 61 79 32 35 22 29 0a 20 20 20 20 28 74 20 3a 69 | .:background."gray25").....(t.:i |
| c480 | 6e 68 65 72 69 74 20 63 61 6c 69 62 72 65 64 62 2d 74 69 74 6c 65 2d 66 61 63 65 29 29 0a 20 20 | nherit.calibredb-title-face))... |
| c4a0 | 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 74 69 74 6c 65 20 6f 6e 20 64 65 74 61 69 6c 65 64 | "Face.used.for.title.on.detailed |
| c4c0 | 20 76 69 65 77 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 | .view."...:group.'calibredb-face |
| c4e0 | 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 61 | s)..(defface.calibredb-author-fa |
| c500 | 63 65 0a 20 20 27 28 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 72 6f 75 | ce...'((((class.color).(backgrou |
| c520 | 6e 64 20 6c 69 67 68 74 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 33 42 | nd.light))......:foreground."#3B |
| c540 | 36 45 41 38 22 29 0a 20 20 20 20 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b | 6EA8").....(((class.color).(back |
| c560 | 67 72 6f 75 6e 64 20 64 61 72 6b 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 | ground.dark))......:foreground." |
| c580 | 23 64 39 63 36 64 36 22 29 0a 20 20 20 20 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 75 6c | #d9c6d6").....(t.:inherit.defaul |
| c5a0 | 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 61 75 74 68 6f 72 2e 22 0a 20 20 | t))..."Face.used.for.author."... |
| c5c0 | 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 | :group.'calibredb-faces)..(deffa |
| c5e0 | 63 65 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 61 63 65 0a 20 20 27 28 28 28 28 | ce.calibredb-format-face...'(((( |
| c600 | 63 6c 61 73 73 20 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 | class.color).(background.light)) |
| c620 | 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 34 46 38 39 34 43 22 29 0a 20 20 20 | ......:foreground."#4F894C").... |
| c640 | 20 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 72 6f 75 6e 64 20 64 61 72 | .(((class.color).(background.dar |
| c660 | 6b 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 41 33 42 45 38 43 22 29 0a | k))......:foreground."#A3BE8C"). |
| c680 | 20 20 20 20 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 75 6c 74 29 29 0a 20 20 22 46 61 63 | ....(t.:inherit.default))..."Fac |
| c6a0 | 65 20 75 73 65 64 20 66 6f 72 20 66 6f 72 6d 61 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 | e.used.for.format."...:group.'ca |
| c6c0 | 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 | libredb-faces)..(defface.calibre |
| c6e0 | 64 62 2d 63 6f 6d 6d 65 6e 74 2d 66 61 63 65 0a 20 20 27 28 28 28 28 63 6c 61 73 73 20 63 6f 6c | db-comment-face...'((((class.col |
| c700 | 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 3a 66 6f | or).(background.light))......:fo |
| c720 | 72 65 67 72 6f 75 6e 64 20 22 44 61 72 6b 43 79 61 6e 22 29 0a 20 20 20 20 28 28 28 63 6c 61 73 | reground."DarkCyan").....(((clas |
| c740 | 73 20 63 6f 6c 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 | s.color).(background.dark))..... |
| c760 | 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 38 46 42 43 42 42 22 29 0a 20 20 20 20 28 74 20 3a | .:foreground."#8FBCBB").....(t.: |
| c780 | 69 6e 68 65 72 69 74 20 64 65 66 61 75 6c 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 | inherit.default))..."Face.used.f |
| c7a0 | 6f 72 20 63 6f 6d 6d 65 6e 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 | or.comment."...:group.'calibredb |
| c7c0 | 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d | -faces)..(defface.calibredb-tag- |
| c7e0 | 66 61 63 65 0a 20 20 27 28 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 72 | face...'((((class.color).(backgr |
| c800 | 6f 75 6e 64 20 6c 69 67 68 74 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 | ound.light))......:foreground."# |
| c820 | 38 62 39 34 61 35 22 29 0a 20 20 20 20 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 | 8b94a5").....(((class.color).(ba |
| c840 | 63 6b 67 72 6f 75 6e 64 20 64 61 72 6b 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 | ckground.dark))......:foreground |
| c860 | 20 22 23 45 42 43 42 38 42 22 29 0a 20 20 20 20 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 | ."#EBCB8B").....(t.:inherit.defa |
| c880 | 75 6c 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 74 61 67 2e 22 0a 20 20 3a | ult))..."Face.used.for.tag."...: |
| c8a0 | 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 | group.'calibredb-faces)..(deffac |
| c8c0 | 65 20 63 61 6c 69 62 72 65 64 62 2d 69 64 73 2d 66 61 63 65 0a 20 20 27 28 28 28 28 63 6c 61 73 | e.calibredb-ids-face...'((((clas |
| c8e0 | 73 20 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 | s.color).(background.light)).... |
| c900 | 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 38 62 39 34 61 35 22 29 0a 20 20 20 20 28 28 28 | ..:foreground."#8b94a5").....((( |
| c920 | 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 72 6f 75 6e 64 20 64 61 72 6b 29 29 0a | class.color).(background.dark)). |
| c940 | 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 45 42 43 42 38 42 22 29 0a 20 20 20 20 | .....:foreground."#EBCB8B")..... |
| c960 | 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 75 6c 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 | (t.:inherit.default))..."Face.us |
| c980 | 65 64 20 66 6f 72 20 69 64 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 | ed.for.ids."...:group.'calibredb |
| c9a0 | 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 73 69 7a 65 | -faces)..(defface.calibredb-size |
| c9c0 | 2d 66 61 63 65 0a 20 20 27 28 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 | -face...'((((class.color).(backg |
| c9e0 | 72 6f 75 6e 64 20 6c 69 67 68 74 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 | round.light))......:foreground." |
| ca00 | 23 38 62 39 34 61 35 22 29 0a 20 20 20 20 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 | #8b94a5").....(((class.color).(b |
| ca20 | 61 63 6b 67 72 6f 75 6e 64 20 64 61 72 6b 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e | ackground.dark))......:foregroun |
| ca40 | 64 20 22 23 36 66 37 37 38 37 22 29 0a 20 20 20 20 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 | d."#6f7787").....(t.:inherit.def |
| ca60 | 61 75 6c 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 69 7a 65 2e 22 0a 20 | ault))..."Face.used.for.size.".. |
| ca80 | 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 | .:group.'calibredb-faces)..(deff |
| caa0 | 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 70 75 62 64 61 74 65 2d 66 61 63 65 20 27 28 28 74 20 | ace.calibredb-pubdate-face.'((t. |
| cac0 | 3a 69 6e 68 65 72 69 74 20 64 65 66 61 75 6c 74 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 74 | :inherit.default))..."Face.for.t |
| cae0 | 68 65 20 70 75 62 6c 69 73 68 20 64 61 74 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 | he.publish.date."...:group.'cali |
| cb00 | 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 | bredb-faces)..(defface.calibredb |
| cb20 | 2d 70 75 62 6c 69 73 68 65 72 2d 66 61 63 65 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 | -publisher-face.'((t.:inherit.de |
| cb40 | 66 61 75 6c 74 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 74 68 65 20 70 75 62 6c 69 73 68 65 | fault))..."Face.for.the.publishe |
| cb60 | 72 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a | r."...:group.'calibredb-faces).. |
| cb80 | 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 72 69 65 73 2d 66 61 63 65 20 27 | (defface.calibredb-series-face.' |
| cba0 | 28 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 75 6c 74 29 29 0a 20 20 22 46 61 63 65 20 66 | ((t.:inherit.default))..."Face.f |
| cbc0 | 6f 72 20 74 68 65 20 73 65 72 69 65 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 | or.the.series."...:group.'calibr |
| cbe0 | 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 6c | edb-faces)..(defface.calibredb-l |
| cc00 | 61 6e 67 75 61 67 65 2d 66 61 63 65 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 75 | anguage-face.'((t.:inherit.defau |
| cc20 | 6c 74 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 74 68 65 20 6c 61 6e 67 75 61 67 65 2e 22 0a | lt))..."Face.for.the.language.". |
| cc40 | 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 | ..:group.'calibredb-faces)..(def |
| cc60 | 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 61 63 65 0a 20 20 27 28 28 28 28 | face.calibredb-date-face...'(((( |
| cc80 | 63 6c 61 73 73 20 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 | class.color).(background.light)) |
| cca0 | 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 32 39 38 33 38 44 22 29 0a 20 20 20 | ......:foreground."#29838D").... |
| ccc0 | 20 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 72 6f 75 6e 64 20 64 61 72 | .(((class.color).(background.dar |
| cce0 | 6b 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 38 46 42 43 42 42 22 29 0a | k))......:foreground."#8FBCBB"). |
| cd00 | 20 20 20 20 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 75 6c 74 29 29 0a 20 20 22 46 61 63 | ....(t.:inherit.default))..."Fac |
| cd20 | 65 20 66 6f 72 20 74 68 65 20 64 61 74 65 20 28 6c 61 73 74 5f 6d 6f 64 69 66 69 65 64 29 2e 22 | e.for.the.date.(last_modified)." |
| cd40 | 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 | ...:group.'calibredb-faces)..(de |
| cd60 | 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6c 65 2d 66 61 63 65 0a 20 20 27 28 28 28 | fface.calibredb-file-face...'((( |
| cd80 | 28 63 6c 61 73 73 20 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 | (class.color).(background.light) |
| cda0 | 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 32 39 38 33 38 44 22 29 0a 20 20 | )......:foreground."#29838D")... |
| cdc0 | 20 20 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 72 6f 75 6e 64 20 64 61 | ..(((class.color).(background.da |
| cde0 | 72 6b 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 38 46 42 43 42 42 22 29 | rk))......:foreground."#8FBCBB") |
| ce00 | 0a 20 20 20 20 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 75 6c 74 29 29 0a 20 20 22 46 61 | .....(t.:inherit.default))..."Fa |
| ce20 | 63 65 20 66 6f 72 20 74 68 65 20 66 69 6c 65 20 70 61 74 68 2e 22 0a 20 20 3a 67 72 6f 75 70 20 | ce.for.the.file.path."...:group. |
| ce40 | 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 | 'calibredb-faces)..(defface.cali |
| ce60 | 62 72 65 64 62 2d 6d 61 72 6b 2d 66 61 63 65 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 68 69 | bredb-mark-face.'((t.:inherit.hi |
| ce80 | 67 68 6c 69 67 68 74 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 74 68 65 20 6d 61 72 6b 20 63 | ghlight))..."Face.for.the.mark.c |
| cea0 | 61 6e 64 69 64 61 74 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 | andidate."...:group.'calibredb-f |
| cec0 | 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 | aces)..(defface.calibredb-favori |
| cee0 | 74 65 2d 66 61 63 65 0a 20 20 27 28 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 | te-face...'((((class.color).(bac |
| cf00 | 6b 67 72 6f 75 6e 64 20 6c 69 67 68 74 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 | kground.light))......:foreground |
| cf20 | 20 22 62 6c 61 63 6b 22 29 0a 20 20 20 20 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 | ."black").....(((class.color).(b |
| cf40 | 61 63 6b 67 72 6f 75 6e 64 20 64 61 72 6b 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e | ackground.dark))......:foregroun |
| cf60 | 64 20 22 79 65 6c 6c 6f 77 22 29 0a 20 20 20 20 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 | d."yellow").....(t.:inherit.defa |
| cf80 | 75 6c 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 74 69 74 6c 65 2e 22 0a 20 | ult))..."Face.used.for.title.".. |
| cfa0 | 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 | .:group.'calibredb-faces)..(deff |
| cfc0 | 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 68 69 67 68 6c 69 67 68 74 2d 66 61 63 65 0a 20 20 27 | ace.calibredb-highlight-face...' |
| cfe0 | 28 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 72 6f 75 6e 64 20 6c 69 67 | ((((class.color).(background.lig |
| d000 | 68 74 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 4d 65 64 69 75 6d 53 6c 61 | ht))......:foreground."MediumSla |
| d020 | 74 65 42 6c 75 65 22 0a 20 20 20 20 20 3a 77 65 69 67 68 74 20 62 6f 6c 64 29 0a 20 20 20 20 28 | teBlue"......:weight.bold).....( |
| d040 | 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 72 6f 75 6e 64 20 64 61 72 6b 29 | ((class.color).(background.dark) |
| d060 | 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 63 79 61 6e 22 0a 20 20 20 20 20 3a | )......:foreground."cyan"......: |
| d080 | 77 65 69 67 68 74 20 62 6f 6c 64 29 0a 20 20 20 20 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 | weight.bold).....(t.:inherit.def |
| d0a0 | 61 75 6c 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 68 69 67 68 74 6c 69 67 | ault))..."Face.used.for.hightlig |
| d0c0 | 68 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a | ht."...:group.'calibredb-faces). |
| d0e0 | 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 61 72 63 68 69 76 65 2d 66 61 63 65 | .(defface.calibredb-archive-face |
| d100 | 0a 20 20 27 28 28 28 28 63 6c 61 73 73 20 63 6f 6c 6f 72 29 20 28 62 61 63 6b 67 72 6f 75 6e 64 | ...'((((class.color).(background |
| d120 | 20 6c 69 67 68 74 29 29 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 67 72 65 79 22 | .light))......:foreground."grey" |
| d140 | 0a 20 20 20 20 20 3a 77 65 69 67 68 74 20 6c 69 67 68 74 29 0a 20 20 20 20 28 28 28 63 6c 61 73 | ......:weight.light).....(((clas |
| d160 | 73 20 63 6f 6c 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 | s.color).(background.dark))..... |
| d180 | 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 64 69 6d 20 67 72 65 79 22 0a 20 20 20 20 20 3a 77 65 | .:foreground."dim.grey"......:we |
| d1a0 | 69 67 68 74 20 6c 69 67 68 74 29 0a 20 20 20 20 28 74 20 3a 69 6e 68 65 72 69 74 20 64 65 66 61 | ight.light).....(t.:inherit.defa |
| d1c0 | 75 6c 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 61 72 63 68 69 76 65 2e 22 | ult))..."Face.used.for.archive." |
| d1e0 | 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 | ...:group.'calibredb-faces)..(de |
| d200 | 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 2d 6c 69 | fface.calibredb-search-header-li |
| d220 | 62 72 61 72 79 2d 6e 61 6d 65 2d 66 61 63 65 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f | brary-name-face.'((t.:inherit.fo |
| d240 | 6e 74 2d 6c 6f 63 6b 2d 70 72 65 70 72 6f 63 65 73 73 6f 72 2d 66 61 63 65 29 29 0a 20 20 22 46 | nt-lock-preprocessor-face))..."F |
| d260 | 61 63 65 20 75 73 65 64 20 66 6f 72 20 6c 69 62 72 61 72 79 20 6e 61 6d 65 20 69 6e 20 2a 63 61 | ace.used.for.library.name.in.*ca |
| d280 | 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 20 68 65 61 64 65 72 2e 22 0a 20 20 3a 67 72 6f 75 | libredb-search*.header."...:grou |
| d2a0 | 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 | p.'calibredb-faces)..(defface.ca |
| d2c0 | 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 2d 6c 69 62 72 61 72 79 2d 70 61 | libredb-search-header-library-pa |
| d2e0 | 74 68 2d 66 61 63 65 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d | th-face.'((t.:inherit.font-lock- |
| d300 | 74 79 70 65 2d 66 61 63 65 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 6c 69 62 | type-face))..."Face.used.for.lib |
| d320 | 72 61 72 79 20 70 61 74 68 20 69 6e 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 20 | rary.path.in.*calibredb-search*. |
| d340 | 68 65 61 64 65 72 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 | header."...:group.'calibredb-fac |
| d360 | 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 | es)..(defface.calibredb-search-h |
| d380 | 65 61 64 65 72 2d 74 6f 74 61 6c 2d 66 61 63 65 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 | eader-total-face.'((t.:inherit.f |
| d3a0 | 6f 6e 74 2d 6c 6f 63 6b 2d 77 61 72 6e 69 6e 67 2d 66 61 63 65 29 29 0a 20 20 22 46 61 63 65 20 | ont-lock-warning-face))..."Face. |
| d3c0 | 75 73 65 64 20 66 6f 72 20 74 6f 74 61 6c 20 63 6f 75 6e 74 20 69 6e 20 2a 63 61 6c 69 62 72 65 | used.for.total.count.in.*calibre |
| d3e0 | 64 62 2d 73 65 61 72 63 68 2a 20 68 65 61 64 65 72 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 | db-search*.header."...:group.'ca |
| d400 | 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 | libredb-faces)..(defface.calibre |
| d420 | 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 2d 73 6f 72 74 2d 66 61 63 65 20 27 28 28 74 20 | db-search-header-sort-face.'((t. |
| d440 | 3a 69 6e 68 65 72 69 74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 29 | :inherit.font-lock-keyword-face) |
| d460 | 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 73 6f 72 74 20 66 69 65 6c 64 20 69 6e | )..."Face.used.for.sort.field.in |
| d480 | 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 20 68 65 61 64 65 72 2e 22 0a 20 20 3a | .*calibredb-search*.header."...: |
| d4a0 | 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 | group.'calibredb-faces)..(deffac |
| d4c0 | 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 2d 66 69 6c 74 65 72 | e.calibredb-search-header-filter |
| d4e0 | 2d 66 61 63 65 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 6e 65 | -face.'((t.:inherit.font-lock-ne |
| d500 | 67 61 74 69 6f 6e 2d 63 68 61 72 2d 66 61 63 65 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 | gation-char-face))..."Face.used. |
| d520 | 66 6f 72 20 66 69 6c 74 65 72 20 66 69 65 6c 64 20 69 6e 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 | for.filter.field.in.*calibredb-s |
| d540 | 65 61 72 63 68 2a 20 68 65 61 64 65 72 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 | earch*.header."...:group.'calibr |
| d560 | 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 6d | edb-faces)..(defface.calibredb-m |
| d580 | 6f 75 73 65 2d 66 61 63 65 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 6d 6f 64 65 2d 6c 69 6e | ouse-face.'((t.:inherit.mode-lin |
| d5a0 | 65 2d 68 69 67 68 6c 69 67 68 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 2a | e-highlight))..."Face.used.for.* |
| d5c0 | 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 20 6d 6f 75 73 65 20 66 61 63 65 2e 22 0a 20 | calibredb-search*.mouse.face.".. |
| d5e0 | 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 | .:group.'calibredb-faces)..(deff |
| d600 | 61 63 65 20 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 68 65 | ace.calibredb-edit-annotation-he |
| d620 | 61 64 65 72 2d 74 69 74 6c 65 2d 66 61 63 65 0a 20 20 27 28 28 28 28 63 6c 61 73 73 20 63 6f 6c | ader-title-face...'((((class.col |
| d640 | 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 3a 66 6f | or).(background.light))......:fo |
| d660 | 72 65 67 72 6f 75 6e 64 20 22 23 34 46 38 39 34 43 22 29 0a 20 20 20 20 28 28 28 63 6c 61 73 73 | reground."#4F894C").....(((class |
| d680 | 20 63 6f 6c 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 | .color).(background.dark))...... |
| d6a0 | 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 23 41 33 42 45 38 43 22 29 0a 20 20 20 20 28 74 20 3a 69 | :foreground."#A3BE8C").....(t.:i |
| d6c0 | 6e 68 65 72 69 74 20 64 65 66 61 75 6c 74 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f | nherit.default))..."Face.used.fo |
| d6e0 | 72 20 2a 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2a 20 68 65 | r.*calibredb-edit-annotation*.he |
| d700 | 61 64 65 72 20 74 69 74 6c 65 20 66 61 63 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 | ader.title.face."...:group.'cali |
| d720 | 62 72 65 64 62 2d 66 61 63 65 73 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 65 64 | bredb-faces)..(provide.'calibred |
| d740 | 62 2d 66 61 63 65 73 29 0a 0a 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 2e 65 6c | b-faces)..;;;.calibredb-faces.el |
| d760 | 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...................... |
| d780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d7a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d7c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d7e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d800 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| d820 | 2d 68 65 6c 6d 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 | -helm.el........................ |
| d840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d860 | 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 |
| d880 | 30 30 31 33 32 30 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 30 30 35 00 20 30 00 00 00 | 0013202.00000000000.016005..0... |
| d8a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d8c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d8e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d900 | 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................... |
| d920 | 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................... |
| d940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d9a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d9c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| d9e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| da00 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2e 65 6c 20 2d 2d 2d 20 48 65 6c 6d 20 66 | ;;;.calibredb-show.el.---.Helm.f |
| da20 | 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 | or.calibredb.-*-.lexical-binding |
| da40 | 3a 20 74 3b 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 32 30 20 | :.t;.-*-..;;.Copyright.(C).2020. |
| da60 | 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 44 61 6d 6f 6e 20 43 68 61 | Damon.Chan..;;.Author:.Damon.Cha |
| da80 | 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 55 52 4c 3a 20 68 | n.<elecming@gmail.com>.;;.URL:.h |
| daa0 | 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 65 6e 79 61 6e 6d 69 6e 67 2f 63 61 | ttps://github.com/chenyanming/ca |
| dac0 | 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 74 6f 6f 6c 73 0a 3b 3b | libredb.el.;;.Keywords:.tools.;; |
| dae0 | 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 | .Version:.2.12.0..;;.This.file.i |
| db00 | 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 73 2e 0a 0a 3b 3b 20 54 68 69 | s.NOT.part.of.GNU.Emacs...;;.Thi |
| db20 | 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 | s.program.is.free.software;.you. |
| db40 | 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 |
| db60 | 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 |
| db80 | 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 |
| dba0 | 6c 69 73 68 65 64 20 62 79 0a 3b 3b 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 |
| dbc0 | 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 |
| dbe0 | 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f | he.License,.or.;;.(at.your.optio |
| dc00 | 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 | n).any.later.version...;;.This.p |
| dc20 | 72 6f 67 72 61 6d 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 | rogram.is.distributed.in.the.hop |
| dc40 | 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 |
| dc60 | 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 |
| dc80 | 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 |
| dca0 | 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. |
| dcc0 | 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.;;. |
| dce0 | 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 |
| dd00 | 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 | ore.details...;;.You.should.have |
| dd20 | 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 |
| dd40 | 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 |
| dd60 | 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 | .this.program...If.not,.see.<htt |
| dd80 | 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 3b | ps://www.gnu.org/licenses/>...;; |
| dda0 | 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 | ;.Commentary:..;;;.Code:..(requi |
| ddc0 | 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 29 0a 0a 28 65 76 61 6c 2d 77 68 65 6e 2d | re.'calibredb-core)..(eval-when- |
| dde0 | 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 | compile.(defvar.calibredb-search |
| de00 | 2d 65 6e 74 72 69 65 73 29 29 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 64 | -entries)).(eval-when-compile.(d |
| de20 | 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 29 29 0a 0a | efvar.calibredb-full-entries)).. |
| de40 | 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d | (declare-function.calibredb-set- |
| de60 | 6d 65 74 61 64 61 74 61 2d 2d 74 61 67 73 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e | metadata--tags."calibredb-utils. |
| de80 | 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 | el").(declare-function.calibredb |
| dea0 | 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 63 6f 6d 6d 65 6e 74 73 20 22 63 61 6c 69 62 72 65 | -set-metadata--comments."calibre |
| dec0 | 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 | db-utils.el").(declare-function. |
| dee0 | 63 61 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 66 69 6c 65 2d 77 69 74 68 2d 64 65 66 61 75 6c 74 | calibredb-open-file-with-default |
| df00 | 2d 74 6f 6f 6c 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 | -tool."calibredb-utils.el").(dec |
| df20 | 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 | lare-function.calibredb-show-ent |
| df40 | 72 79 20 22 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2e 65 6c 22 29 0a 28 64 65 63 6c 61 | ry."calibredb-search.el").(decla |
| df60 | 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 | re-function.calibredb-get-file-p |
| df80 | 61 74 68 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 0a 28 64 65 66 76 | ath."calibredb-utils.el")..(defv |
| dfa0 | 61 72 20 63 61 6c 69 62 72 65 64 62 2d 68 65 6c 6d 2d 6d 61 70 0a 20 20 28 69 66 20 28 62 6f 75 | ar.calibredb-helm-map...(if.(bou |
| dfc0 | 6e 64 70 20 27 68 65 6c 6d 2d 6d 61 70 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 61 70 20 | ndp.'helm-map).......(let.((map. |
| dfe0 | 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 29 0a 20 20 20 20 20 20 20 20 28 | (make-sparse-keymap))).........( |
| e000 | 73 65 74 2d 6b 65 79 6d 61 70 2d 70 61 72 65 6e 74 20 6d 61 70 20 68 65 6c 6d 2d 6d 61 70 29 0a | set-keymap-parent.map.helm-map). |
| e020 | 20 20 20 20 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5c 4d 2d 74 22 20 23 | ........(define-key.map."\M-t".# |
| e040 | 27 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 61 67 73 2d 31 29 | 'calibredb-set-metadata--tags-1) |
| e060 | 0a 20 20 20 20 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5c 4d 2d 63 22 20 | .........(define-key.map."\M-c". |
| e080 | 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 63 6f 6d 6d 65 6e | #'calibredb-set-metadata--commen |
| e0a0 | 74 73 2d 31 29 0a 20 20 20 20 20 20 20 20 6d 61 70 29 29 0a 20 20 22 4b 65 79 6d 61 70 20 66 6f | ts-1).........map))..."Keymap.fo |
| e0c0 | 72 20 60 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 68 65 6c 6d 27 2e 22 29 0a 0a 28 64 65 66 | r.`calibredb-find-helm'.")..(def |
| e0e0 | 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 68 65 6c 6d 2d 61 63 74 69 6f 6e 73 0a 20 20 | custom.calibredb-helm-actions... |
| e100 | 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 68 65 6c 6d 2d 6d 61 6b 65 2d 61 63 74 69 6f 6e 73 29 | (if.(fboundp.'helm-make-actions) |
| e120 | 0a 20 20 20 20 20 20 28 68 65 6c 6d 2d 6d 61 6b 65 2d 61 63 74 69 6f 6e 73 0a 20 20 20 20 20 20 | .......(helm-make-actions....... |
| e140 | 20 22 4f 70 65 6e 20 66 69 6c 65 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 | ."Open.file"...................' |
| e160 | 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 0a 20 20 20 20 20 20 20 22 56 69 65 77 | calibredb-find-file........"View |
| e180 | 20 64 65 74 61 69 6c 73 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 63 61 6c 69 62 72 | .details"................'calibr |
| e1a0 | 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 0a 20 20 20 20 20 20 20 22 4f 70 65 6e 20 66 69 6c 65 | edb-show-entry........"Open.file |
| e1c0 | 20 6f 74 68 65 72 20 66 72 61 6d 65 22 20 20 20 20 20 20 20 27 63 61 6c 69 62 72 65 64 62 2d 66 | .other.frame".......'calibredb-f |
| e1e0 | 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 66 72 61 6d 65 0a 20 20 20 20 20 20 20 22 4f 70 65 | ind-file-other-frame........"Ope |
| e200 | 6e 20 66 69 6c 65 20 77 69 74 68 20 64 65 66 61 75 6c 74 20 74 6f 6f 6c 22 20 28 6c 61 6d 62 64 | n.file.with.default.tool".(lambd |
| e220 | 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | a.(candidate)................... |
| e240 | 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 6c 69 62 72 65 64 62 | ......................(calibredb |
| e260 | 2d 6f 70 65 6e 2d 66 69 6c 65 2d 77 69 74 68 2d 64 65 66 61 75 6c 74 2d 74 6f 6f 6c 20 6e 69 6c | -open-file-with-default-tool.nil |
| e280 | 20 63 61 6e 64 69 64 61 74 65 29 29 0a 20 20 20 20 20 20 20 22 4f 70 65 6e 20 43 6f 76 65 72 20 | .candidate))........"Open.Cover. |
| e2a0 | 50 61 67 65 22 20 20 20 20 20 20 20 20 20 20 20 20 20 27 63 61 6c 69 62 72 65 64 62 2d 66 69 6e | Page".............'calibredb-fin |
| e2c0 | 64 2d 63 6f 76 65 72 0a 20 20 20 20 20 20 20 22 53 65 74 20 74 61 67 73 22 20 20 20 20 20 20 20 | d-cover........"Set.tags"....... |
| e2e0 | 20 20 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 61 67 73 | ...'calibredb-set-metadata--tags |
| e300 | 0a 20 20 20 20 20 20 20 22 53 65 74 20 63 6f 6d 6d 65 6e 74 73 22 20 20 20 20 20 20 27 63 61 6c | ........"Set.comments"......'cal |
| e320 | 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 63 6f 6d 6d 65 6e 74 73 0a 20 20 | ibredb-set-metadata--comments... |
| e340 | 20 20 20 20 20 22 4c 69 73 74 20 66 69 6c 65 64 73 22 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 | ....."List.fileds".'calibredb-se |
| e360 | 74 2d 6d 65 74 61 64 61 74 61 2d 2d 6c 69 73 74 2d 66 69 65 6c 64 73 0a 20 20 20 20 20 20 20 22 | t-metadata--list-fields........" |
| e380 | 53 68 6f 77 20 6d 65 74 61 64 61 74 61 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 63 61 | Show.metadata"...............'ca |
| e3a0 | 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 65 74 61 64 61 74 61 0a 20 20 20 20 20 20 20 22 45 78 | libredb-show-metadata........"Ex |
| e3c0 | 70 6f 72 74 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 63 61 6c 69 | port"......................'cali |
| e3e0 | 62 72 65 64 62 2d 65 78 70 6f 72 74 0a 20 20 20 20 20 20 20 22 52 65 6d 6f 76 65 22 20 20 20 20 | bredb-export........"Remove".... |
| e400 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 63 61 6c 69 62 72 65 64 62 2d 72 65 6d | ..................'calibredb-rem |
| e420 | 6f 76 65 0a 20 20 20 20 20 20 20 22 49 6e 73 65 72 74 20 61 6e 20 6f 72 67 20 6c 69 6e 6b 22 20 | ove........"Insert.an.org.link". |
| e440 | 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 | .........(lambda.(candidate).... |
| e460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| e480 | 20 20 20 20 28 75 6e 6c 65 73 73 20 28 66 65 61 74 75 72 65 70 20 27 6f 72 67 29 0a 20 20 20 20 | ....(unless.(featurep.'org)..... |
| e4a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| e4c0 | 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 6f 72 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | .....(require.'org))............ |
| e4e0 | 20 20 20 20 20 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 | ............................(if. |
| e500 | 28 66 62 6f 75 6e 64 70 20 27 6f 72 67 2d 69 6e 73 65 72 74 2d 6c 69 6e 6b 29 0a 20 20 20 20 20 | (fboundp.'org-insert-link)...... |
| e520 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| e540 | 20 20 20 20 20 20 28 6f 72 67 2d 69 6e 73 65 72 74 2d 6c 69 6e 6b 20 6e 69 6c 20 28 63 61 6c 69 | ......(org-insert-link.nil.(cali |
| e560 | 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 63 61 6e 64 69 64 61 74 65 20 74 29 | bredb-get-file-path.candidate.t) |
| e580 | 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 3a 62 | .(calibredb-getattr.candidate.:b |
| e5a0 | 6f 6f 6b 2d 74 69 74 6c 65 29 29 29 29 0a 20 20 20 20 20 20 20 22 4d 61 69 6c 20 41 64 64 20 61 | ook-title))))........"Mail.Add.a |
| e5c0 | 74 74 61 63 68 6d 65 6e 74 22 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 | ttachment".........(lambda.(cand |
| e5e0 | 69 64 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | idate).......................... |
| e600 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 69 6c 2d 61 64 64 2d 61 74 74 61 63 68 6d 65 | ..............(mail-add-attachme |
| e620 | 6e 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 63 61 6e 64 | nt.(calibredb-get-file-path.cand |
| e640 | 69 64 61 74 65 20 74 29 29 29 29 29 0a 20 20 22 44 65 66 61 75 6c 74 20 61 63 74 69 6f 6e 73 20 | idate.t)))))..."Default.actions. |
| e660 | 66 6f 72 20 63 61 6c 69 62 72 65 64 62 20 68 65 6c 6d 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 | for.calibredb.helm."...:group.'c |
| e680 | 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 28 61 6c 69 73 74 20 3a 6b 65 79 2d 74 79 | alibredb...:type.'(alist.:key-ty |
| e6a0 | 70 65 20 73 74 72 69 6e 67 20 3a 76 61 6c 75 65 2d 74 79 70 65 20 66 75 6e 63 74 69 6f 6e 29 29 | pe.string.:value-type.function)) |
| e6c0 | 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 68 65 6c 6d 2d 72 65 61 64 20 28 29 0a | ..(defun.calibredb-helm-read.(). |
| e6e0 | 20 20 22 48 65 6c 6d 20 72 65 61 64 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 2e 22 0a 20 20 28 | .."Helm.read.for.calibredb."...( |
| e700 | 77 68 65 6e 20 28 66 62 6f 75 6e 64 70 20 27 68 65 6c 6d 29 0a 20 20 20 20 28 77 68 65 6e 20 28 | when.(fboundp.'helm).....(when.( |
| e720 | 67 65 74 2d 62 75 66 66 65 72 20 22 2a 68 65 6c 6d 20 61 63 74 69 6f 6e 2a 22 29 0a 20 20 20 20 | get-buffer."*helm.action*")..... |
| e740 | 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 22 2a 68 65 6c 6d 20 61 63 74 69 6f 6e 2a 22 29 29 | ..(kill-buffer."*helm.action*")) |
| e760 | 0a 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 28 68 65 | .....(unwind-protect.........(he |
| e780 | 6c 6d 20 3a 73 6f 75 72 63 65 73 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 68 65 6c 6d 2d 62 | lm.:sources.(if.(fboundp.'helm-b |
| e7a0 | 75 69 6c 64 2d 73 79 6e 63 2d 73 6f 75 72 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | uild-sync-source)............... |
| e7c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 65 6c 6d 2d 62 75 69 6c 64 2d 73 79 6e 63 2d 73 6f | .............(helm-build-sync-so |
| e7e0 | 75 72 63 65 20 22 63 61 6c 69 62 72 65 64 62 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | urce."calibredb"................ |
| e800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 65 61 64 65 72 2d 6e 61 6d 65 20 28 6c 61 6d 62 | ..............:header-name.(lamb |
| e820 | 64 61 20 28 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 | da.(name)....................... |
| e840 | 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 74 20 6e 61 | ......................(concat.na |
| e860 | 6d 65 20 22 20 69 6e 20 5b 22 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 20 22 5d | me.".in.[".calibredb-root-dir."] |
| e880 | 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | "))............................. |
| e8a0 | 20 3a 63 61 6e 64 69 64 61 74 65 73 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 | .:candidates.(lambda.()......... |
| e8c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| e8e0 | 20 20 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 0a | ...(if.calibredb-search-entries. |
| e900 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| e920 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d | ...............calibredb-search- |
| e940 | 65 6e 74 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | entries......................... |
| e960 | 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 67 6e 0a 20 20 20 20 | .....................(progn..... |
| e980 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| e9a0 | 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 | ...........(setq.calibredb-searc |
| e9c0 | 68 2d 65 6e 74 72 69 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 64 61 74 65 73 29 | h-entries.(calibredb-candidates) |
| e9e0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | )............................... |
| ea00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 | .................(setq.calibredb |
| ea20 | 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 | -full-entries.calibredb-search-e |
| ea40 | 6e 74 72 69 65 73 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 | ntries))))...................... |
| ea60 | 20 20 20 20 20 20 20 20 3b 3b 20 3a 66 69 6c 74 65 72 65 64 2d 63 61 6e 64 69 64 61 74 65 2d 74 | ........;;.:filtered-candidate-t |
| ea80 | 72 61 6e 73 66 6f 72 6d 65 72 20 27 68 65 6c 6d 2d 66 69 6e 64 75 74 69 6c 73 2d 74 72 61 6e 73 | ransformer.'helm-findutils-trans |
| eaa0 | 66 6f 72 6d 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | former.......................... |
| eac0 | 20 20 20 20 3b 3b 20 3a 61 63 74 69 6f 6e 2d 74 72 61 6e 73 66 6f 72 6d 65 72 20 27 68 65 6c 6d | ....;;.:action-transformer.'helm |
| eae0 | 2d 74 72 61 6e 73 66 6f 72 6d 2d 66 69 6c 65 2d 6c 6f 61 64 2d 65 6c 0a 20 20 20 20 20 20 20 20 | -transform-file-load-el......... |
| eb00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 65 72 73 69 73 74 65 6e 74 | .....................:persistent |
| eb20 | 2d 61 63 74 69 6f 6e 20 27 63 61 6c 69 62 72 65 64 62 2d 76 69 65 77 2d 2d 68 65 6c 6d 0a 20 20 | -action.'calibredb-view--helm... |
| eb40 | 20 20 20 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 63 74 69 | ...........................:acti |
| eb60 | 6f 6e 20 27 63 61 6c 69 62 72 65 64 62 2d 68 65 6c 6d 2d 61 63 74 69 6f 6e 73 0a 20 20 20 20 20 | on.'calibredb-helm-actions...... |
| eb80 | 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 3a 68 65 6c 70 | ........................;;.:help |
| eba0 | 2d 6d 65 73 73 61 67 65 20 27 68 65 6c 6d 2d 67 65 6e 65 72 69 63 2d 66 69 6c 65 2d 68 65 6c 70 | -message.'helm-generic-file-help |
| ebc0 | 2d 6d 65 73 73 61 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 | -message........................ |
| ebe0 | 20 20 20 20 20 20 3a 6b 65 79 6d 61 70 20 63 61 6c 69 62 72 65 64 62 2d 68 65 6c 6d 2d 6d 61 70 | ......:keymap.calibredb-helm-map |
| ec00 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 | ..............................:c |
| ec20 | 61 6e 64 69 64 61 74 65 2d 6e 75 6d 62 65 72 2d 6c 69 6d 69 74 20 39 39 39 39 0a 20 20 20 20 20 | andidate-number-limit.9999...... |
| ec40 | 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 3a 72 65 71 75 | ........................;;.:requ |
| ec60 | 69 72 65 73 2d 70 61 74 74 65 72 6e 20 33 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ires-pattern.3.................. |
| ec80 | 20 20 20 20 20 20 20 20 20 20 20 20 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 75 | ............))...............:bu |
| eca0 | 66 66 65 72 20 22 2a 68 65 6c 6d 20 63 61 6c 69 62 72 65 64 62 2a 22 29 20 29 29 29 0a 0a 28 64 | ffer."*helm.calibredb*").)))..(d |
| ecc0 | 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 68 65 6c 6d 20 28 29 0a 20 20 22 55 | efun.calibredb-find-helm.()..."U |
| ece0 | 73 65 20 68 65 6c 6d 20 74 6f 20 6c 69 73 74 20 61 6c 6c 20 65 62 6f 6f 6b 73 20 64 65 74 61 69 | se.helm.to.list.all.ebooks.detai |
| ed00 | 6c 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 | ls."...(interactive)...(calibred |
| ed20 | 62 2d 68 65 6c 6d 2d 72 65 61 64 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d | b-helm-read))..(defun.calibredb- |
| ed40 | 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 61 67 73 2d 31 20 28 29 0a 20 20 22 53 65 74 20 6d | set-metadata--tags-1.()..."Set.m |
| ed60 | 65 74 61 64 61 74 61 20 74 61 67 20 66 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 69 6e 20 68 65 6c | etadata.tag.function.used.in.hel |
| ed80 | 6d 20 61 63 74 69 6f 6e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 66 | m.action."...(interactive)...(if |
| eda0 | 20 28 66 62 6f 75 6e 64 70 20 27 77 69 74 68 2d 68 65 6c 6d 2d 61 6c 69 76 65 2d 70 29 0a 20 20 | .(fboundp.'with-helm-alive-p)... |
| edc0 | 20 20 20 20 28 77 69 74 68 2d 68 65 6c 6d 2d 61 6c 69 76 65 2d 70 0a 20 20 20 20 20 20 20 20 28 | ....(with-helm-alive-p.........( |
| ede0 | 69 66 20 28 66 62 6f 75 6e 64 70 20 27 68 65 6c 6d 2d 65 78 69 74 2d 61 6e 64 2d 65 78 65 63 75 | if.(fboundp.'helm-exit-and-execu |
| ee00 | 74 65 2d 61 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 68 65 6c 6d 2d 65 78 69 | te-action).............(helm-exi |
| ee20 | 74 2d 61 6e 64 2d 65 78 65 63 75 74 65 2d 61 63 74 69 6f 6e 20 23 27 63 61 6c 69 62 72 65 64 62 | t-and-execute-action.#'calibredb |
| ee40 | 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 61 67 73 29 29 29 29 29 0a 0a 28 64 65 66 75 6e | -set-metadata--tags)))))..(defun |
| ee60 | 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 63 6f 6d 6d 65 6e 74 | .calibredb-set-metadata--comment |
| ee80 | 73 2d 31 20 28 29 0a 20 20 22 53 65 74 20 6d 65 74 61 64 61 74 61 20 63 6f 6d 6d 65 6e 74 73 20 | s-1.()..."Set.metadata.comments. |
| eea0 | 66 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 69 6e 20 68 65 6c 6d 20 61 63 74 69 6f 6e 73 2e 22 0a | function.used.in.helm.actions.". |
| eec0 | 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 | ..(interactive)...(if.(fboundp.' |
| eee0 | 77 69 74 68 2d 68 65 6c 6d 2d 61 6c 69 76 65 2d 70 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 68 | with-helm-alive-p).......(with-h |
| ef00 | 65 6c 6d 2d 61 6c 69 76 65 2d 70 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 | elm-alive-p.........(if.(fboundp |
| ef20 | 20 27 68 65 6c 6d 2d 65 78 69 74 2d 61 6e 64 2d 65 78 65 63 75 74 65 2d 61 63 74 69 6f 6e 29 0a | .'helm-exit-and-execute-action). |
| ef40 | 20 20 20 20 20 20 20 20 20 20 20 20 28 68 65 6c 6d 2d 65 78 69 74 2d 61 6e 64 2d 65 78 65 63 75 | ............(helm-exit-and-execu |
| ef60 | 74 65 2d 61 63 74 69 6f 6e 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 | te-action.#'calibredb-set-metada |
| ef80 | 74 61 2d 2d 63 6f 6d 6d 65 6e 74 73 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 | ta--comments)))))..(defun.calibr |
| efa0 | 65 64 62 2d 76 69 65 77 2d 2d 68 65 6c 6d 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 56 69 | edb-view--helm.(candidate)..."Vi |
| efc0 | 73 69 74 20 74 68 65 20 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 77 69 74 68 20 68 65 6c | sit.the.calibredb-entry.with.hel |
| efe0 | 6d 2e 0a 41 72 67 75 6d 65 6e 74 20 43 41 4e 44 49 44 41 54 45 20 69 73 20 74 68 65 20 73 65 6c | m..Argument.CANDIDATE.is.the.sel |
| f000 | 65 63 74 65 64 20 63 61 6e 64 69 64 61 74 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 | ected.candidate."...(interactive |
| f020 | 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 20 63 61 6e 64 69 64 | )...(calibredb-show-entry.candid |
| f040 | 61 74 65 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 68 65 6c 6d 29 | ate))..(provide.'calibredb-helm) |
| f060 | 0a 0a 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 68 65 6c 6d 2e 65 6c 20 65 6e 64 73 20 68 65 72 | ..;;;.calibredb-helm.el.ends.her |
| f080 | 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............................... |
| f0a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f0c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f0e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f1a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f1c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f1e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f200 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| f220 | 2d 69 76 79 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 | -ivy.el......................... |
| f240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f260 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| f280 | 30 30 31 35 33 31 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 36 37 31 00 20 30 00 00 00 | 0015310.00000000000.015671..0... |
| f2a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f2c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f2e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f300 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| f320 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| f340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f3a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f3c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f3e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| f400 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 69 76 79 2e 65 6c 20 2d 2d 2d 20 49 76 79 2f 63 6f 75 | ;;;.calibredb-ivy.el.---.Ivy/cou |
| f420 | 6e 73 65 6c 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 | nsel.for.calibredb.-*-.lexical-b |
| f440 | 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 | inding:.t;.-*-..;;.Copyright.(C) |
| f460 | 20 32 30 32 30 20 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 44 61 6d | .2020.Damon.Chan..;;.Author:.Dam |
| f480 | 6f 6e 20 43 68 61 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 | on.Chan.<elecming@gmail.com>.;;. |
| f4a0 | 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 65 6e 79 61 6e 6d | URL:.https://github.com/chenyanm |
| f4c0 | 69 6e 67 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 74 6f | ing/calibredb.el.;;.Keywords:.to |
| f4e0 | 6f 6c 73 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a 3b 3b 20 54 68 69 73 20 | ols.;;.Version:.2.12.0..;;.This. |
| f500 | 66 69 6c 65 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 73 2e 0a 0a | file.is.NOT.part.of.GNU.Emacs... |
| f520 | 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 | ;;.This.program.is.free.software |
| f540 | 3b 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 |
| f560 | 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 |
| f580 | 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. |
| f5a0 | 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 | as.published.by.;;.the.Free.Soft |
| f5c0 | 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. |
| f5e0 | 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 | 3.of.the.License,.or.;;.(at.your |
| f600 | 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 0a 3b 3b 20 | .option).any.later.version...;;. |
| f620 | 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 | This.program.is.distributed.in.t |
| f640 | 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,. |
| f660 | 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 |
| f680 | 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 |
| f6a0 | 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. |
| f6c0 | 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 |
| f6e0 | 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 |
| f700 | 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c | .for.more.details...;;.You.shoul |
| f720 | 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e | d.have.received.a.copy.of.the.GN |
| f740 | 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e | U.General.Public.License.;;.alon |
| f760 | 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 | g.with.this.program...If.not,.se |
| f780 | 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/ |
| f7a0 | 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a | >...;;;.Commentary:..;;;.Code:.. |
| f7c0 | 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 29 0a 28 72 65 71 75 69 | (require.'calibredb-core).(requi |
| f7e0 | 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 29 0a 28 72 65 71 75 69 72 65 20 27 | re.'calibredb-search).(require.' |
| f800 | 63 61 6c 69 62 72 65 64 62 2d 66 61 63 65 73 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 | calibredb-faces).(require.'calib |
| f820 | 72 65 64 62 2d 75 74 69 6c 73 29 0a 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 20 | redb-utils)..(eval-when-compile. |
| f840 | 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 | (defvar.calibredb-search-entries |
| f860 | 29 29 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 20 63 61 | )).(eval-when-compile.(defvar.ca |
| f880 | 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 29 29 0a 28 65 76 61 6c 2d 77 68 65 | libredb-full-entries)).(eval-whe |
| f8a0 | 6e 2d 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 62 61 73 | n-compile.(defvar.counsel-ag-bas |
| f8c0 | 65 2d 63 6f 6d 6d 61 6e 64 29 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 6f | e-command)).(declare-function.co |
| f8e0 | 75 6e 73 65 6c 2d 61 67 20 22 63 6f 75 6e 73 65 6c 22 29 0a 0a 28 69 66 20 28 66 62 6f 75 6e 64 | unsel-ag."counsel")..(if.(fbound |
| f900 | 70 20 27 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 29 0a 20 20 20 20 28 69 76 79 2d 73 65 74 | p.'ivy-set-actions).....(ivy-set |
| f920 | 2d 61 63 74 69 6f 6e 73 0a 20 20 20 20 20 27 63 61 6c 69 62 72 65 64 62 2d 69 76 79 2d 72 65 61 | -actions......'calibredb-ivy-rea |
| f940 | 64 0a 20 20 20 20 20 27 28 28 22 6f 22 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 | d......'(("o".(lambda.(candidate |
| f960 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d | )...............(calibredb-find- |
| f980 | 66 69 6c 65 20 28 63 64 72 20 63 61 6e 64 69 64 61 74 65 29 29 29 20 22 4f 70 65 6e 22 29 0a 20 | file.(cdr.candidate)))."Open").. |
| f9a0 | 20 20 20 20 20 20 28 22 4f 22 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 | ......("O".(lambda.(candidate).. |
| f9c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c | .............(calibredb-find-fil |
| f9e0 | 65 2d 6f 74 68 65 72 2d 66 72 61 6d 65 20 28 63 64 72 20 63 61 6e 64 69 64 61 74 65 29 29 29 20 | e-other-frame.(cdr.candidate))). |
| fa00 | 22 46 69 6e 64 20 66 69 6c 65 20 6f 74 68 65 72 20 66 72 61 6d 65 22 29 0a 20 20 20 20 20 20 20 | "Find.file.other.frame")........ |
| fa20 | 28 22 76 22 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 20 20 20 | ("v".(lambda.(candidate)........ |
| fa40 | 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 20 28 63 64 | .......(calibredb-show-entry.(cd |
| fa60 | 72 20 63 61 6e 64 69 64 61 74 65 29 29 29 20 22 56 69 65 77 20 64 65 74 61 69 6c 73 22 29 0a 20 | r.candidate)))."View.details").. |
| fa80 | 20 20 20 20 20 20 28 22 56 22 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 | ......("V".(lambda.(candidate).. |
| faa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 66 69 6c | .............(calibredb-open-fil |
| fac0 | 65 2d 77 69 74 68 2d 64 65 66 61 75 6c 74 2d 74 6f 6f 6c 20 28 63 64 72 20 63 61 6e 64 69 64 61 | e-with-default-tool.(cdr.candida |
| fae0 | 74 65 29 29 29 20 22 4f 70 65 6e 20 77 69 74 68 20 64 65 66 61 75 6c 74 20 74 6f 6f 6c 22 29 0a | te)))."Open.with.default.tool"). |
| fb00 | 20 20 20 20 20 20 20 28 22 64 22 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a | .......("d".(lambda.(candidate). |
| fb20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 72 65 6d 6f 76 65 20 | ..............(calibredb-remove. |
| fb40 | 28 63 64 72 20 63 61 6e 64 69 64 61 74 65 29 29 29 20 22 44 65 6c 65 74 65 20 65 62 6f 6f 6b 22 | (cdr.candidate)))."Delete.ebook" |
| fb60 | 29 0a 20 20 20 20 20 20 20 28 22 74 22 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 | )........("t".(lambda.(candidate |
| fb80 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d | )...............(calibredb-set-m |
| fba0 | 65 74 61 64 61 74 61 2d 2d 74 61 67 73 20 28 63 64 72 20 63 61 6e 64 69 64 61 74 65 29 29 29 20 | etadata--tags.(cdr.candidate))). |
| fbc0 | 22 54 61 67 20 65 62 6f 6f 6b 22 29 0a 20 20 20 20 20 20 20 28 22 63 22 20 28 6c 61 6d 62 64 61 | "Tag.ebook")........("c".(lambda |
| fbe0 | 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 | .(candidate)...............(cali |
| fc00 | 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 63 6f 6d 6d 65 6e 74 73 20 28 63 64 | bredb-set-metadata--comments.(cd |
| fc20 | 72 20 63 61 6e 64 69 64 61 74 65 29 29 29 22 43 6f 6d 6d 65 6e 74 20 65 62 6f 6f 6b 22 29 0a 20 | r.candidate)))"Comment.ebook").. |
| fc40 | 20 20 20 20 20 20 28 22 65 22 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 | ......("e".(lambda.(candidate).. |
| fc60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f 72 74 20 28 | .............(calibredb-export.( |
| fc80 | 63 64 72 20 63 61 6e 64 69 64 61 74 65 29 29 29 20 22 45 78 70 6f 72 74 22 29 0a 20 20 20 20 20 | cdr.candidate)))."Export")...... |
| fca0 | 20 20 28 22 6d 22 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 20 | ..("m".(lambda.(candidate)...... |
| fcc0 | 20 20 20 20 20 20 20 20 20 28 6d 61 69 6c 2d 61 64 64 2d 61 74 74 61 63 68 6d 65 6e 74 20 28 63 | .........(mail-add-attachment.(c |
| fce0 | 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 28 63 64 72 20 63 61 6e 64 | alibredb-get-file-path.(cdr.cand |
| fd00 | 69 64 61 74 65 29 20 74 29 29 29 20 22 4d 61 69 6c 20 61 64 64 20 61 74 74 61 63 68 6d 65 6e 74 | idate).t)))."Mail.add.attachment |
| fd20 | 22 29 0a 20 20 20 20 20 20 20 28 22 69 22 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 | ")........("i".(lambda.(candidat |
| fd40 | 65 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 66 65 61 74 75 72 | e)...............(unless.(featur |
| fd60 | 65 70 20 27 6f 72 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 | ep.'org).................(requir |
| fd80 | 65 20 27 6f 72 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 62 6f 75 | e.'org))...............(if.(fbou |
| fda0 | 6e 64 70 20 27 6f 72 67 2d 69 6e 73 65 72 74 2d 6c 69 6e 6b 29 0a 20 20 20 20 20 20 20 20 20 20 | ndp.'org-insert-link)........... |
| fdc0 | 20 20 20 20 20 20 20 20 28 6f 72 67 2d 69 6e 73 65 72 74 2d 6c 69 6e 6b 20 6e 69 6c 20 28 63 61 | ........(org-insert-link.nil.(ca |
| fde0 | 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 28 63 64 72 20 63 61 6e 64 69 | libredb-get-file-path.(cdr.candi |
| fe00 | 64 61 74 65 29 20 74 29 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 | date).t).(calibredb-getattr.(cdr |
| fe20 | 20 63 61 6e 64 69 64 61 74 65 29 20 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 29 20 29 29 20 22 49 6e | .candidate).:book-title)).))."In |
| fe40 | 73 65 72 74 20 61 6e 20 6f 72 67 20 6c 69 6e 6b 22 29 29 29 29 0a 0a 0a 28 64 65 66 75 6e 20 63 | sert.an.org.link"))))...(defun.c |
| fe60 | 61 6c 69 62 72 65 64 62 2d 63 6f 75 6e 73 65 6c 2d 61 64 64 2d 66 69 6c 65 2d 61 63 74 69 6f 6e | alibredb-counsel-add-file-action |
| fe80 | 20 28 61 72 67 20 66 69 6c 65 29 0a 20 20 22 41 64 64 20 6d 61 72 6b 65 64 20 46 49 4c 45 73 2e | .(arg.file)..."Add.marked.FILEs. |
| fea0 | 0a 49 66 20 70 72 65 66 69 78 20 41 52 47 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 6b 65 65 70 20 | .If.prefix.ARG.is.non-nil,.keep. |
| fec0 | 74 68 65 20 66 69 6c 65 73 20 61 66 74 65 72 20 61 64 64 69 6e 67 20 77 69 74 68 6f 75 74 20 70 | the.files.after.adding.without.p |
| fee0 | 72 6f 6d 70 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 6c | rompt."...(interactive."P")...(l |
| ff00 | 65 74 20 28 28 6f 75 74 70 75 74 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 61 6e 64 20 3a | et.((output.(calibredb-command.: |
| ff20 | 63 6f 6d 6d 61 6e 64 20 22 61 64 64 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | command."add"................... |
| ff40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 70 75 74 20 28 73 68 65 6c 6c 2d 71 | .................:input.(shell-q |
| ff60 | 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 | uote-argument.(expand-file-name. |
| ff80 | 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | file)).......................... |
| ffa0 | 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 | ..........:library.(if.calibredb |
| ffc0 | 2d 61 64 64 2d 64 75 70 6c 69 63 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -add-duplicate.................. |
| ffe0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ...............................( |
| 10000 | 66 6f 72 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 20 25 73 20 2d 64 22 20 28 63 | format."--library-path.%s.-d".(c |
| 10020 | 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 29 0a 20 20 20 20 20 20 | alibredb-root-dir-quote))....... |
| 10040 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 10060 | 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 20 | ........(format."--library-path. |
| 10080 | 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 29 29 | %s".(calibredb-root-dir-quote))) |
| 100a0 | 29 29 29 0a 20 20 20 20 28 69 66 20 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 22 41 64 64 65 64 20 | ))).....(if.(s-contains?."Added. |
| 100c0 | 62 6f 6f 6b 20 69 64 73 22 20 6f 75 74 70 75 74 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 | book.ids".output).........(cond. |
| 100e0 | 28 28 73 74 72 69 6e 67 3d 20 63 61 6c 69 62 72 65 64 62 2d 61 64 64 2d 64 65 6c 65 74 65 2d 6f | ((string=.calibredb-add-delete-o |
| 10100 | 72 69 67 69 6e 61 6c 2d 66 69 6c 65 20 22 79 65 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | riginal-file."yes")............. |
| 10120 | 20 20 20 28 69 66 20 61 72 67 20 28 6d 65 73 73 61 67 65 20 22 41 64 64 69 6e 67 20 66 69 6c 65 | ...(if.arg.(message."Adding.file |
| 10140 | 73 20 73 75 63 63 65 65 64 65 64 2c 20 66 69 6c 65 73 20 77 65 72 65 20 6b 65 70 74 2e 22 29 0a | s.succeeded,.files.were.kept."). |
| 10160 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6d 6f 76 65 | .................(calibredb-move |
| 10180 | 2d 74 6f 2d 74 72 61 73 68 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -to-trash.file)))............... |
| 101a0 | 28 28 73 74 72 69 6e 67 3d 20 63 61 6c 69 62 72 65 64 62 2d 61 64 64 2d 64 65 6c 65 74 65 2d 6f | ((string=.calibredb-add-delete-o |
| 101c0 | 72 69 67 69 6e 61 6c 2d 66 69 6c 65 20 22 6e 6f 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | riginal-file."no"))............. |
| 101e0 | 20 20 28 74 20 28 75 6e 6c 65 73 73 20 61 72 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..(t.(unless.arg................ |
| 10200 | 20 20 20 20 28 69 66 20 28 79 65 73 2d 6f 72 2d 6e 6f 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 | ....(if.(yes-or-no-p............ |
| 10220 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 46 69 6c 65 20 68 61 73 20 62 | .............(concat."File.has.b |
| 10240 | 65 65 6e 20 63 6f 70 69 65 64 20 74 6f 20 64 61 74 61 62 61 73 65 2e 20 53 75 62 73 65 71 75 65 | een.copied.to.database..Subseque |
| 10260 | 6e 74 6c 79 20 64 65 6c 65 74 65 20 6f 72 69 67 69 6e 61 6c 20 66 69 6c 65 3f 20 22 20 66 69 6c | ntly.delete.original.file?.".fil |
| 10280 | 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 | e))........................(cali |
| 102a0 | 62 72 65 64 62 2d 6d 6f 76 65 2d 74 6f 2d 74 72 61 73 68 20 66 69 6c 65 29 29 29 29 29 0a 20 20 | bredb-move-to-trash.file)))))... |
| 102c0 | 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 41 64 64 69 6e 67 20 62 6f 6f 6b 20 66 61 69 6c 65 64 | ....(message."Adding.book.failed |
| 102e0 | 2c 20 70 6c 65 61 73 65 20 61 64 64 20 69 74 20 6d 61 6e 75 61 6c 6c 79 2e 22 29 29 29 29 0a 0a | ,.please.add.it.manually.")))).. |
| 10300 | 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 6d 6f 76 65 2d 74 6f 2d 74 72 61 73 68 20 28 | (defun.calibredb-move-to-trash.( |
| 10320 | 66 69 6c 65 29 0a 20 20 22 4d 6f 76 65 20 74 68 65 20 46 49 4c 45 20 74 6f 20 74 72 61 73 68 2e | file)..."Move.the.FILE.to.trash. |
| 10340 | 22 0a 20 20 28 6c 65 74 20 28 28 64 65 6c 65 74 65 2d 62 79 2d 6d 6f 76 69 6e 67 2d 74 6f 2d 74 | "...(let.((delete-by-moving-to-t |
| 10360 | 72 61 73 68 20 74 29 29 0a 20 20 20 20 28 70 63 61 73 65 20 73 79 73 74 65 6d 2d 74 79 70 65 0a | rash.t)).....(pcase.system-type. |
| 10380 | 20 20 20 20 20 20 28 27 77 69 6e 64 6f 77 73 2d 6e 74 0a 20 20 20 20 20 20 20 28 69 66 20 28 66 | ......('windows-nt........(if.(f |
| 103a0 | 62 6f 75 6e 64 70 20 27 73 79 73 74 65 6d 2d 6d 6f 76 65 2d 66 69 6c 65 2d 74 6f 2d 74 72 61 73 | boundp.'system-move-file-to-tras |
| 103c0 | 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 79 73 74 65 6d 2d 6d 6f 76 65 2d 66 69 6c 65 2d | h)............(system-move-file- |
| 103e0 | 74 6f 2d 74 72 61 73 68 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 28 27 67 6e 75 2f 6c 69 6e | to-trash.file))).......('gnu/lin |
| 10400 | 75 78 0a 20 20 20 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6d 6f 76 65 2d 66 69 6c | ux........(if.(fboundp.'move-fil |
| 10420 | 65 2d 74 6f 2d 74 72 61 73 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 6f 76 65 2d 66 69 6c | e-to-trash)............(move-fil |
| 10440 | 65 2d 74 6f 2d 74 72 61 73 68 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 28 27 64 61 72 77 69 | e-to-trash.file))).......('darwi |
| 10460 | 6e 0a 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 74 72 61 73 68 2d 64 69 72 65 63 74 6f 72 79 20 | n........(let.((trash-directory. |
| 10480 | 22 7e 2f 2e 54 72 61 73 68 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 66 65 | "~/.Trash"))..........(cond.((fe |
| 104a0 | 61 74 75 72 65 70 20 27 6f 73 78 2d 74 72 61 73 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | aturep.'osx-trash).............. |
| 104c0 | 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6f 73 78 2d 74 72 61 73 68 2d 6d 6f 76 65 2d | ...(if.(fboundp.'osx-trash-move- |
| 104e0 | 66 69 6c 65 2d 74 6f 2d 74 72 61 73 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | file-to-trash).................. |
| 10500 | 20 20 20 28 6f 73 78 2d 74 72 61 73 68 2d 6d 6f 76 65 2d 66 69 6c 65 2d 74 6f 2d 74 72 61 73 68 | ...(osx-trash-move-file-to-trash |
| 10520 | 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 78 65 63 75 74 | .file)))................((execut |
| 10540 | 61 62 6c 65 2d 66 69 6e 64 20 22 74 72 61 73 68 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | able-find."trash").............. |
| 10560 | 20 20 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 22 74 72 61 73 68 22 20 6e 69 6c 20 6e 69 6c | ...(call-process."trash".nil.nil |
| 10580 | 20 6e 69 6c 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 28 6d | .nil.file))................(t.(m |
| 105a0 | 6f 76 65 2d 66 69 6c 65 2d 74 6f 2d 74 72 61 73 68 20 66 69 6c 65 29 29 29 29 29 29 29 29 0a 0a | ove-file-to-trash.file)))))))).. |
| 105c0 | 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 69 76 79 2d 72 65 61 64 20 28 29 0a 20 20 22 | (defun.calibredb-ivy-read.()..." |
| 105e0 | 49 76 79 20 72 65 61 64 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 2e 22 0a 20 20 28 69 66 20 28 | Ivy.read.for.calibredb."...(if.( |
| 10600 | 66 62 6f 75 6e 64 70 20 27 69 76 79 2d 72 65 61 64 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 | fboundp.'ivy-read).......(let.(( |
| 10620 | 63 61 6e 64 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 | cand.(if.calibredb-search-entrie |
| 10640 | 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 | s.......................calibred |
| 10660 | 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | b-search-entries................ |
| 10680 | 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 20 | .....(progn..................... |
| 106a0 | 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 | ..(setq.calibredb-search-entries |
| 106c0 | 20 28 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 64 61 74 65 73 29 29 0a 20 20 20 20 20 20 20 | .(calibredb-candidates))........ |
| 106e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 | ...............(setq.calibredb-f |
| 10700 | 75 6c 6c 2d 65 6e 74 72 69 65 73 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 | ull-entries.calibredb-search-ent |
| 10720 | 72 69 65 73 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 63 61 6e 64 0a 20 20 20 20 20 | ries))))).........(if.cand...... |
| 10740 | 20 20 20 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 50 69 63 6b 20 61 20 62 6f 6f 6b 3a 20 22 | .......(ivy-read."Pick.a.book:." |
| 10760 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6e 64 0a 20 20 20 20 | .......................cand..... |
| 10780 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 6f 72 74 20 6e 69 6c 20 20 20 20 20 | ..................:sort.nil..... |
| 107a0 | 20 20 20 20 3b 20 61 63 74 75 61 6c 6c 79 20 73 6f 72 74 20 74 68 65 6d 0a 20 20 20 20 20 20 20 | ....;.actually.sort.them........ |
| 107c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 61 6c 69 62 72 65 64 | ...............:caller.'calibred |
| 107e0 | 62 2d 69 76 79 2d 72 65 61 64 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 | b-ivy-read)...........(message." |
| 10800 | 49 4e 56 41 4c 49 44 20 4c 49 42 52 41 52 59 22 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 | INVALID.LIBRARY")))))..;;;###aut |
| 10820 | 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 6f 75 6e | oload.(defun.calibredb-find-coun |
| 10840 | 73 65 6c 20 28 29 0a 20 20 22 55 73 65 20 63 6f 75 6e 73 65 6c 20 74 6f 20 6c 69 73 74 20 61 6c | sel.()..."Use.counsel.to.list.al |
| 10860 | 6c 20 65 62 6f 6f 6b 73 20 64 65 74 61 69 6c 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 | l.ebooks.details."...(interactiv |
| 10880 | 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 69 76 79 2d 72 65 61 64 29 29 0a 0a 28 64 65 66 | e)...(calibredb-ivy-read))..(def |
| 108a0 | 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 72 67 61 20 28 29 0a 20 20 22 53 65 61 72 63 68 20 63 61 | un.calibredb-rga.()..."Search.ca |
| 108c0 | 6c 69 62 72 65 64 62 20 77 69 74 68 20 72 67 61 2c 20 75 73 69 6e 67 20 60 63 6f 75 6e 73 65 6c | libredb.with.rga,.using.`counsel |
| 108e0 | 2d 61 67 27 2e 0a 31 2e 20 49 6e 20 60 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f | -ag'..1..In.`calibredb-search-mo |
| 10900 | 64 65 27 2c 20 73 65 61 72 63 68 20 69 6e 20 74 68 65 0a 60 63 61 6c 69 62 72 65 64 62 2d 72 6f | de',.search.in.the.`calibredb-ro |
| 10920 | 6f 74 2d 64 69 72 27 2e 0a 32 2e 20 49 6e 20 60 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d | ot-dir'..2..In.`calibredb-show-m |
| 10940 | 6f 64 65 27 2c 20 73 65 61 72 63 68 20 69 6e 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e | ode',.search.in.the.correspondin |
| 10960 | 67 20 66 6f 72 6d 61 74 0a 75 6e 64 65 72 20 74 68 65 20 77 6f 72 6b 69 6e 67 20 64 69 72 65 63 | g.format.under.the.working.direc |
| 10980 | 74 6f 72 79 2e 0a 33 2e 20 49 6e 20 60 70 64 66 2d 76 69 65 77 2d 6d 6f 64 65 27 2c 20 73 65 61 | tory..3..In.`pdf-view-mode',.sea |
| 109a0 | 72 63 68 20 69 6e 20 50 44 46 20 66 69 6c 65 73 20 75 6e 64 65 72 20 74 68 65 20 77 6f 72 6b 69 | rch.in.PDF.files.under.the.worki |
| 109c0 | 6e 67 0a 64 69 72 65 63 74 6f 72 79 2e 0a 34 2e 20 49 6e 20 60 6e 6f 76 2d 6d 6f 64 65 27 2c 20 | ng.directory..4..In.`nov-mode',. |
| 109e0 | 73 65 61 72 63 68 20 69 6e 20 45 50 55 42 20 66 69 6c 65 73 20 75 6e 64 65 72 20 74 68 65 20 77 | search.in.EPUB.files.under.the.w |
| 10a00 | 6f 72 6b 69 6e 67 0a 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 | orking.directory."...(interactiv |
| 10a20 | 65 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 62 61 73 65 | e)...(setq-local.counsel-ag-base |
| 10a40 | 2d 63 6f 6d 6d 61 6e 64 20 22 72 67 61 20 2d 2d 63 6f 6c 6f 72 20 6e 65 76 65 72 20 2d 2d 6e 6f | -command."rga.--color.never.--no |
| 10a60 | 2d 68 65 61 64 69 6e 67 20 2d 2d 73 6d 61 72 74 2d 63 61 73 65 20 2d 2d 6c 69 6e 65 2d 6e 75 6d | -heading.--smart-case.--line-num |
| 10a80 | 62 65 72 20 2d 2d 77 69 74 68 2d 66 69 6c 65 6e 61 6d 65 20 25 73 22 29 0a 20 20 28 63 6f 6e 64 | ber.--with-filename.%s")...(cond |
| 10aa0 | 0a 20 20 20 28 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 | ....((eq.major-mode.'calibredb-s |
| 10ac0 | 65 61 72 63 68 2d 6d 6f 64 65 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 61 67 20 6e 69 6c 20 | earch-mode).....(counsel-ag.nil. |
| 10ae0 | 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 20 6e 69 6c 20 22 53 65 61 72 63 68 20 43 | calibredb-root-dir.nil."Search.C |
| 10b00 | 61 6c 69 62 72 65 64 62 3a 20 22 29 29 0a 20 20 20 28 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 | alibredb:."))....((eq.major-mode |
| 10b20 | 20 27 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 6f 64 65 29 0a 20 20 20 20 28 6c 65 74 20 | .'calibredb-show-mode).....(let. |
| 10b40 | 28 28 66 6f 72 6d 61 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 61 72 | ((format.(calibredb-getattr.(car |
| 10b60 | 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f | .(calibredb-find-candidate-at-po |
| 10b80 | 69 6e 74 29 29 20 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 | int)).:book-format))...........( |
| 10ba0 | 70 61 74 68 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 61 72 20 28 63 61 | path.(calibredb-getattr.(car.(ca |
| 10bc0 | 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 | libredb-find-candidate-at-point) |
| 10be0 | 29 20 3a 66 69 6c 65 2d 70 61 74 68 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 65 71 | ).:file-path))).......(cond.((eq |
| 10c00 | 75 61 6c 20 66 6f 72 6d 61 74 20 22 65 70 75 62 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ual.format."epub").............. |
| 10c20 | 28 63 6f 75 6e 73 65 6c 2d 61 67 20 6e 69 6c 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 | (counsel-ag.nil.(file-name-direc |
| 10c40 | 74 6f 72 79 20 70 61 74 68 29 20 22 2d 2d 72 67 61 2d 61 64 61 70 74 65 72 73 3d 70 61 6e 64 6f | tory.path)."--rga-adapters=pando |
| 10c60 | 63 22 20 22 53 65 61 72 63 68 20 45 50 55 42 3a 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | c"."Search.EPUB:."))............ |
| 10c80 | 20 28 28 65 71 75 61 6c 20 66 6f 72 6d 61 74 20 22 70 64 66 22 29 0a 20 20 20 20 20 20 20 20 20 | .((equal.format."pdf").......... |
| 10ca0 | 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 61 67 20 6e 69 6c 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 | ....(counsel-ag.nil.(file-name-d |
| 10cc0 | 69 72 65 63 74 6f 72 79 20 70 61 74 68 29 20 22 2d 2d 72 67 61 2d 61 64 61 70 74 65 72 73 3d 70 | irectory.path)."--rga-adapters=p |
| 10ce0 | 6f 70 70 6c 65 72 22 20 22 53 65 61 72 63 68 20 50 44 46 3a 20 22 29 29 0a 20 20 20 20 20 20 20 | oppler"."Search.PDF:."))........ |
| 10d00 | 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 61 67 | .....(t..............(counsel-ag |
| 10d20 | 20 6e 69 6c 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 70 61 74 68 29 20 | .nil.(file-name-directory.path). |
| 10d40 | 6e 69 6c 20 28 63 6f 6e 63 61 74 20 22 53 65 61 72 63 68 20 22 20 66 6f 72 6d 61 74 20 22 3a 20 | nil.(concat."Search.".format.":. |
| 10d60 | 22 29 29 29 29 29 29 0a 20 20 20 28 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 70 64 66 2d | "))))))....((eq.major-mode.'pdf- |
| 10d80 | 76 69 65 77 2d 6d 6f 64 65 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 61 67 20 6e 69 6c 20 6e | view-mode).....(counsel-ag.nil.n |
| 10da0 | 69 6c 20 22 2d 2d 72 67 61 2d 61 64 61 70 74 65 72 73 3d 70 6f 70 70 6c 65 72 22 20 22 53 65 61 | il."--rga-adapters=poppler"."Sea |
| 10dc0 | 72 63 68 20 50 44 46 3a 20 22 29 29 0a 20 20 20 28 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 | rch.PDF:."))....((eq.major-mode. |
| 10de0 | 27 6e 6f 76 2d 6d 6f 64 65 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 61 67 20 6e 69 6c 20 6e | 'nov-mode).....(counsel-ag.nil.n |
| 10e00 | 69 6c 20 22 2d 2d 72 67 61 2d 61 64 61 70 74 65 72 73 3d 70 61 6e 64 6f 63 22 20 22 53 65 61 72 | il."--rga-adapters=pandoc"."Sear |
| 10e20 | 63 68 20 45 50 55 42 3a 20 22 29 29 0a 20 20 20 28 74 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 | ch.EPUB:."))....(t.....(message. |
| 10e40 | 28 63 6f 6e 63 61 74 20 22 43 61 6c 69 62 72 65 64 62 2d 63 6f 75 6e 73 65 6c 2d 61 67 20 64 6f | (concat."Calibredb-counsel-ag.do |
| 10e60 | 65 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 20 22 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 6d 61 | es.not.support.".(symbol-name.ma |
| 10e80 | 6a 6f 72 2d 6d 6f 64 65 29 29 29 29 29 29 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 65 | jor-mode)))))).(provide.'calibre |
| 10ea0 | 64 62 2d 69 76 79 29 0a 0a 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 69 76 79 2e 65 6c 20 65 6e | db-ivy)..;;;.calibredb-ivy.el.en |
| 10ec0 | 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ds.here......................... |
| 10ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11000 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 11020 | 2d 6c 69 62 72 61 72 79 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | -library.el..................... |
| 11040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11060 | 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 |
| 11080 | 30 30 31 35 36 34 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 35 33 34 00 20 30 00 00 00 | 0015640.00000000000.016534..0... |
| 110a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 110c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 110e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11100 | 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................... |
| 11120 | 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................... |
| 11140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 111a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 111c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 111e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11200 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2e 65 6c 20 2d 2d 2d 20 4c 69 62 | ;;;.calibredb-library.el.---.Lib |
| 11220 | 72 61 72 79 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 | rary.for.calibredb.-*-.lexical-b |
| 11240 | 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 | inding:.t;.-*-..;;.Copyright.(C) |
| 11260 | 20 32 30 32 30 20 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 44 61 6d | .2020.Damon.Chan..;;.Author:.Dam |
| 11280 | 6f 6e 20 43 68 61 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 | on.Chan.<elecming@gmail.com>.;;. |
| 112a0 | 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 65 6e 79 61 6e 6d | URL:.https://github.com/chenyanm |
| 112c0 | 69 6e 67 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 74 6f | ing/calibredb.el.;;.Keywords:.to |
| 112e0 | 6f 6c 73 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a 3b 3b 20 54 68 69 73 20 | ols.;;.Version:.2.12.0..;;.This. |
| 11300 | 66 69 6c 65 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 73 2e 0a 0a | file.is.NOT.part.of.GNU.Emacs... |
| 11320 | 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 | ;;.This.program.is.free.software |
| 11340 | 3b 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 |
| 11360 | 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 |
| 11380 | 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. |
| 113a0 | 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 | as.published.by.;;.the.Free.Soft |
| 113c0 | 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. |
| 113e0 | 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 | 3.of.the.License,.or.;;.(at.your |
| 11400 | 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 0a 3b 3b 20 | .option).any.later.version...;;. |
| 11420 | 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 | This.program.is.distributed.in.t |
| 11440 | 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,. |
| 11460 | 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 |
| 11480 | 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 |
| 114a0 | 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. |
| 114c0 | 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 |
| 114e0 | 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 |
| 11500 | 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c | .for.more.details...;;.You.shoul |
| 11520 | 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e | d.have.received.a.copy.of.the.GN |
| 11540 | 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e | U.General.Public.License.;;.alon |
| 11560 | 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 | g.with.this.program...If.not,.se |
| 11580 | 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/ |
| 115a0 | 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a | >...;;;.Commentary:..;;;.Code:.. |
| 115c0 | 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 29 0a 0a 28 64 65 66 76 | (require.'calibredb-core)..(defv |
| 115e0 | 61 72 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 20 30 29 0a 28 64 | ar.calibredb-library-index.0).(d |
| 11600 | 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d | efvar.calibredb-virtual-library- |
| 11620 | 69 6e 64 65 78 20 30 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 | index.0)..(declare-function.cali |
| 11640 | 62 72 65 64 62 2d 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 20 22 | bredb-ref-default-bibliography." |
| 11660 | 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 | calibredb-utils.el").(declare-fu |
| 11680 | 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d | nction.calibredb-search-refresh- |
| 116a0 | 6f 72 2d 72 65 73 75 6d 65 20 22 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2e 65 6c 22 29 | or-resume."calibredb-search.el") |
| 116c0 | 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | .(declare-function.calibredb-sea |
| 116e0 | 72 63 68 2d 6b 65 79 77 6f 72 64 2d 66 69 6c 74 65 72 20 22 63 61 6c 69 62 72 65 64 62 2d 73 65 | rch-keyword-filter."calibredb-se |
| 11700 | 61 72 63 68 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 | arch.el").(declare-function.cali |
| 11720 | 62 72 65 64 62 2d 6f 70 64 73 2d 72 65 71 75 65 73 74 2d 70 61 67 65 20 22 63 61 6c 69 62 72 65 | bredb-opds-request-page."calibre |
| 11740 | 64 62 2d 6f 70 64 73 2e 65 6c 22 29 0a 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 | db-opds.el")...;;;###autoload.(d |
| 11760 | 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 77 69 74 63 68 2d 6c 69 62 72 61 72 79 20 28 29 | efun.calibredb-switch-library.() |
| 11780 | 0a 20 20 22 53 77 69 63 68 20 43 61 6c 69 62 72 65 20 4c 69 62 72 61 72 79 2e 22 0a 20 20 28 69 | ..."Swich.Calibre.Library."...(i |
| 117a0 | 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 72 65 73 75 6c 74 20 28 72 65 61 | nteractive)...(let.((result.(rea |
| 117c0 | 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 51 75 69 63 6b 20 73 77 69 74 63 68 20 6c 69 62 72 61 72 | d-file-name."Quick.switch.librar |
| 117e0 | 79 3a 20 22 29 29 29 0a 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 28 | y:."))).....(if.(file-exists-p.( |
| 11800 | 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 72 | concat.(file-name-as-directory.r |
| 11820 | 65 73 75 6c 74 29 20 22 6d 65 74 61 64 61 74 61 2e 64 62 22 29 29 0a 20 20 20 20 20 20 20 20 28 | esult)."metadata.db")).........( |
| 11840 | 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d | progn...........(setq.calibredb- |
| 11860 | 72 6f 6f 74 2d 64 69 72 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 | root-dir.result)...........(cali |
| 11880 | 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 | bredb-root-dir-quote)........... |
| 118a0 | 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 64 69 72 20 28 63 6f 6e 63 61 74 20 28 | (setq.calibredb-db-dir.(concat.( |
| 118c0 | 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 63 61 6c 69 62 72 65 64 62 | file-name-as-directory.calibredb |
| 118e0 | 2d 72 6f 6f 74 2d 64 69 72 29 20 22 6d 65 74 61 64 61 74 61 2e 64 62 22 29 29 0a 20 20 20 20 20 | -root-dir)."metadata.db"))...... |
| 11900 | 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c | .....(calibredb-ref-default-bibl |
| 11920 | 69 6f 67 72 61 70 68 79 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 | iography)...........(calibredb-s |
| 11940 | 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 29 0a 20 20 20 20 20 20 | earch-refresh-or-resume))....... |
| 11960 | 28 6d 65 73 73 61 67 65 20 22 49 4e 56 41 4c 49 44 20 4c 49 42 52 41 52 59 22 29 29 29 29 0a 0a | (message."INVALID.LIBRARY")))).. |
| 11980 | 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d | ;;;###autoload.(defun.calibredb- |
| 119a0 | 6c 69 62 72 61 72 79 2d 6c 69 73 74 20 28 29 0a 20 20 22 53 77 69 74 63 68 20 6c 69 62 72 61 72 | library-list.()..."Switch.librar |
| 119c0 | 79 20 66 72 6f 6d 20 76 61 72 69 61 62 6c 65 20 60 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 | y.from.variable.`calibredb-libra |
| 119e0 | 72 79 2d 61 6c 69 73 74 27 2e 0a 49 66 20 75 6e 64 65 72 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 | ry-alist'..If.under.*calibredb-s |
| 11a00 | 65 61 72 63 68 2a 20 62 75 66 66 65 72 2c 20 69 74 20 77 69 6c 6c 20 61 75 74 6f 20 72 65 66 72 | earch*.buffer,.it.will.auto.refr |
| 11a20 | 65 73 68 20 61 66 74 65 72 0a 73 65 6c 65 63 74 69 6e 67 20 74 68 65 20 6e 65 77 20 69 74 65 6d | esh.after.selecting.the.new.item |
| 11a40 | 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 72 65 73 75 | ."...(interactive)...(let.((resu |
| 11a60 | 6c 74 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 51 75 69 63 6b 20 73 77 69 74 63 | lt.(completing-read."Quick.switc |
| 11a80 | 68 20 6c 69 62 72 61 72 79 3a 20 22 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 61 | h.library:.".calibredb-library-a |
| 11aa0 | 6c 69 73 74 29 29 20 29 0a 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 | list)).).....(if.(file-exists-p. |
| 11ac0 | 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 | (concat.(file-name-as-directory. |
| 11ae0 | 72 65 73 75 6c 74 29 20 22 6d 65 74 61 64 61 74 61 2e 64 62 22 29 29 0a 20 20 20 20 20 20 20 20 | result)."metadata.db"))......... |
| 11b00 | 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 | (progn...........(setq.calibredb |
| 11b20 | 2d 72 6f 6f 74 2d 64 69 72 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c | -root-dir.result)...........(cal |
| 11b40 | 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 | ibredb-root-dir-quote).......... |
| 11b60 | 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 64 69 72 20 28 63 6f 6e 63 61 74 20 | .(setq.calibredb-db-dir.(concat. |
| 11b80 | 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 63 61 6c 69 62 72 65 64 | (file-name-as-directory.calibred |
| 11ba0 | 62 2d 72 6f 6f 74 2d 64 69 72 29 20 22 6d 65 74 61 64 61 74 61 2e 64 62 22 29 29 0a 20 20 20 20 | b-root-dir)."metadata.db"))..... |
| 11bc0 | 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 | ......(calibredb-ref-default-bib |
| 11be0 | 6c 69 6f 67 72 61 70 68 79 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d | liography)...........(calibredb- |
| 11c00 | 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 29 0a 20 20 20 20 20 | search-refresh-or-resume))...... |
| 11c20 | 20 28 69 66 20 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 22 68 74 74 70 22 20 72 65 73 75 6c 74 29 | .(if.(s-contains?."http".result) |
| 11c40 | 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6c 69 62 72 61 72 79 20 28 2d 66 69 72 73 | ...........(let.((library.(-firs |
| 11c60 | 74 20 28 6c 61 6d 62 64 61 20 28 6c 69 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | t.(lambda.(lib)................. |
| 11c80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 | ...................(s-contains?. |
| 11ca0 | 28 63 61 72 20 6c 69 62 29 20 72 65 73 75 6c 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | (car.lib).result)).............. |
| 11cc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 | ....................calibredb-li |
| 11ce0 | 62 72 61 72 79 2d 61 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 | brary-alist))).............(setq |
| 11d00 | 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 20 28 63 61 72 20 6c 69 62 72 61 72 79 | .calibredb-root-dir.(car.library |
| 11d20 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 72 | )).............(calibredb-opds-r |
| 11d40 | 65 71 75 65 73 74 2d 70 61 67 65 20 72 65 73 75 6c 74 20 28 6e 74 68 20 31 20 6c 69 62 72 61 72 | equest-page.result.(nth.1.librar |
| 11d60 | 79 29 20 28 6e 74 68 20 32 20 6c 69 62 72 61 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 28 6d 65 | y).(nth.2.library))).........(me |
| 11d80 | 73 73 61 67 65 20 22 49 4e 56 41 4c 49 44 20 4c 49 42 52 41 52 59 22 29 29 29 29 29 0a 0a 28 64 | ssage."INVALID.LIBRARY")))))..(d |
| 11da0 | 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 70 72 65 76 69 6f 75 73 20 | efun.calibredb-library-previous. |
| 11dc0 | 28 29 0a 20 20 22 4e 65 78 74 20 6c 69 62 72 61 72 79 20 66 72 6f 6d 20 76 61 72 69 61 62 6c 65 | ()..."Next.library.from.variable |
| 11de0 | 20 60 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 27 2e 0a 49 66 20 75 | .`calibredb-library-alist'..If.u |
| 11e00 | 6e 64 65 72 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 20 62 75 66 66 65 72 2c 20 | nder.*calibredb-search*.buffer,. |
| 11e20 | 69 74 20 77 69 6c 6c 20 61 75 74 6f 20 72 65 66 72 65 73 68 20 61 66 74 65 72 0a 73 65 6c 65 63 | it.will.auto.refresh.after.selec |
| 11e40 | 74 69 6e 67 20 74 68 65 20 6e 65 77 20 69 74 65 6d 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 | ting.the.new.item."...(interacti |
| 11e60 | 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 69 6e 64 65 78 20 28 73 65 74 71 20 63 61 6c 69 62 72 | ve)...(let*.((index.(setq.calibr |
| 11e80 | 65 64 62 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 20 28 69 66 20 28 3e 20 63 61 6c 69 62 72 65 | edb-library-index.(if.(>.calibre |
| 11ea0 | 64 62 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | db-library-index.0)............. |
| 11ec0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 11ee0 | 20 20 20 20 20 20 28 31 2d 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 | ......(1-.calibredb-library-inde |
| 11f00 | 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | x).............................. |
| 11f20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 31 2d 20 28 6c 65 6e 67 74 68 20 63 | ...................(1-.(length.c |
| 11f40 | 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 29 29 29 29 0a 20 20 20 20 | alibredb-library-alist)))))..... |
| 11f60 | 20 20 20 20 28 72 65 73 75 6c 74 20 28 63 61 72 20 28 6e 74 68 20 69 6e 64 65 78 20 63 61 6c 69 | ....(result.(car.(nth.index.cali |
| 11f80 | 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 | bredb-library-alist)))).....(if. |
| 11fa0 | 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d | (file-exists-p.(concat.(file-nam |
| 11fc0 | 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 72 65 73 75 6c 74 29 20 22 6d 65 74 61 64 61 74 61 | e-as-directory.result)."metadata |
| 11fe0 | 2e 64 62 22 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 | .db")).........(progn........... |
| 12000 | 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 20 72 65 73 75 6c 74 29 | (setq.calibredb-root-dir.result) |
| 12020 | 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 | ...........(calibredb-root-dir-q |
| 12040 | 75 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d | uote)...........(setq.calibredb- |
| 12060 | 64 62 2d 64 69 72 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 | db-dir.(concat.(file-name-as-dir |
| 12080 | 65 63 74 6f 72 79 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 29 20 22 6d 65 74 61 | ectory.calibredb-root-dir)."meta |
| 120a0 | 64 61 74 61 2e 64 62 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d | data.db"))...........(calibredb- |
| 120c0 | 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 29 0a 20 20 20 20 20 20 | ref-default-bibliography)....... |
| 120e0 | 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 6f 72 | ....(calibredb-search-refresh-or |
| 12100 | 2d 72 65 73 75 6d 65 29 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 49 4e 56 41 4c 49 | -resume)).......(message."INVALI |
| 12120 | 44 20 4c 49 42 52 41 52 59 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 | D.LIBRARY"))))..(defun.calibredb |
| 12140 | 2d 6c 69 62 72 61 72 79 2d 6e 65 78 74 20 28 29 0a 20 20 22 4e 65 78 74 20 6c 69 62 72 61 72 79 | -library-next.()..."Next.library |
| 12160 | 20 66 72 6f 6d 20 76 61 72 69 61 62 6c 65 20 60 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 | .from.variable.`calibredb-librar |
| 12180 | 79 2d 61 6c 69 73 74 27 2e 0a 49 66 20 75 6e 64 65 72 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 | y-alist'..If.under.*calibredb-se |
| 121a0 | 61 72 63 68 2a 20 62 75 66 66 65 72 2c 20 69 74 20 77 69 6c 6c 20 61 75 74 6f 20 72 65 66 72 65 | arch*.buffer,.it.will.auto.refre |
| 121c0 | 73 68 20 61 66 74 65 72 0a 73 65 6c 65 63 74 69 6e 67 20 74 68 65 20 6e 65 77 20 69 74 65 6d 2e | sh.after.selecting.the.new.item. |
| 121e0 | 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 69 6e 64 65 | "...(interactive)...(let*.((inde |
| 12200 | 78 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 20 | x.(setq.calibredb-library-index. |
| 12220 | 28 69 66 20 28 3c 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 20 28 | (if.(<.calibredb-library-index.( |
| 12240 | 31 2d 20 28 6c 65 6e 67 74 68 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 61 6c 69 | 1-.(length.calibredb-library-ali |
| 12260 | 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | st)))........................... |
| 12280 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 31 2b 20 63 61 6c 69 | ........................(1+.cali |
| 122a0 | 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 29 20 30 29 29 29 0a 20 20 20 20 20 20 | bredb-library-index).0)))....... |
| 122c0 | 20 20 28 72 65 73 75 6c 74 20 28 63 61 72 20 28 6e 74 68 20 69 6e 64 65 78 20 63 61 6c 69 62 72 | ..(result.(car.(nth.index.calibr |
| 122e0 | 65 64 62 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 66 | edb-library-alist)))).....(if.(f |
| 12300 | 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d | ile-exists-p.(concat.(file-name- |
| 12320 | 61 73 2d 64 69 72 65 63 74 6f 72 79 20 72 65 73 75 6c 74 29 20 22 6d 65 74 61 64 61 74 61 2e 64 | as-directory.result)."metadata.d |
| 12340 | 62 22 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 73 | b")).........(progn...........(s |
| 12360 | 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 20 72 65 73 75 6c 74 29 0a 20 | etq.calibredb-root-dir.result).. |
| 12380 | 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f | .........(calibredb-root-dir-quo |
| 123a0 | 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 62 | te)...........(setq.calibredb-db |
| 123c0 | 2d 64 69 72 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 | -dir.(concat.(file-name-as-direc |
| 123e0 | 74 6f 72 79 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 29 20 22 6d 65 74 61 64 61 | tory.calibredb-root-dir)."metada |
| 12400 | 74 61 2e 64 62 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 72 65 | ta.db"))...........(calibredb-re |
| 12420 | 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 29 0a 20 20 20 20 20 20 20 20 | f-default-bibliography)......... |
| 12440 | 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 6f 72 2d 72 | ..(calibredb-search-refresh-or-r |
| 12460 | 65 73 75 6d 65 29 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 49 4e 56 41 4c 49 44 20 | esume)).......(message."INVALID. |
| 12480 | 4c 49 42 52 41 52 59 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 76 | LIBRARY"))))..(defun.calibredb-v |
| 124a0 | 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 66 69 6c 74 65 72 20 28 6b 65 79 77 6f 72 64 29 0a | irtual-library-filter.(keyword). |
| 124c0 | 20 20 22 46 69 6c 74 65 72 20 74 68 65 20 76 69 72 74 75 61 6c 20 6c 69 62 72 61 72 79 20 62 61 | .."Filter.the.virtual.library.ba |
| 124e0 | 73 65 64 20 6f 6e 20 4b 45 59 57 4f 52 44 2e 22 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 | sed.on.KEYWORD."...(setq.calibre |
| 12500 | 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 6e 61 6d 65 20 6b 65 79 77 6f 72 64 29 | db-virtual-library-name.keyword) |
| 12520 | 20 3b 20 73 65 74 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 | .;.set.calibredb-virtual-library |
| 12540 | 2d 6e 61 6d 65 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 66 69 6c 74 | -name...(setq.calibredb-tag-filt |
| 12560 | 65 72 2d 70 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f | er-p.nil)...(setq.calibredb-favo |
| 12580 | 72 69 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 | rite-filter-p.nil)...(setq.calib |
| 125a0 | 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 28 73 65 74 | redb-author-filter-p.nil)...(set |
| 125c0 | 71 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 | q.calibredb-date-filter-p.nil).. |
| 125e0 | 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 69 6c 74 65 72 2d 70 | .(setq.calibredb-format-filter-p |
| 12600 | 20 6e 69 6c 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6b 65 79 77 6f 72 | .nil)...(calibredb-search-keywor |
| 12620 | 64 2d 66 69 6c 74 65 72 0a 20 20 20 28 63 64 72 20 28 61 73 73 6f 63 20 6b 65 79 77 6f 72 64 20 | d-filter....(cdr.(assoc.keyword. |
| 12640 | 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 | calibredb-virtual-library-alist) |
| 12660 | 29 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 29 29 0a | ))...(calibredb-search-header)). |
| 12680 | 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 | .(defun.calibredb-virtual-librar |
| 126a0 | 79 2d 6c 69 73 74 20 28 29 0a 20 20 22 4c 69 73 74 20 61 6c 6c 20 76 69 72 74 75 61 6c 20 6c 69 | y-list.()..."List.all.virtual.li |
| 126c0 | 62 72 61 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 28 69 66 20 | braries."...(interactive)...(if. |
| 126e0 | 28 65 71 20 28 6c 65 6e 67 74 68 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 | (eq.(length.calibredb-virtual-li |
| 12700 | 62 72 61 72 79 2d 61 6c 69 73 74 29 20 30 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 | brary-alist).0).......(message." |
| 12720 | 4e 6f 20 76 69 72 74 75 61 6c 20 6c 69 62 72 61 72 69 65 73 2e 20 53 65 74 20 60 63 61 6c 69 62 | No.virtual.libraries..Set.`calib |
| 12740 | 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 27 20 77 69 74 68 | redb-virtual-library-alist'.with |
| 12760 | 20 27 28 28 6e 61 6d 65 20 2e 20 6b 65 79 77 6f 72 64 73 29 29 2e 22 20 29 0a 20 20 20 20 28 6c | .'((name...keywords)).".).....(l |
| 12780 | 65 74 20 28 28 6b 65 79 77 6f 72 64 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 53 | et.((keyword.(completing-read."S |
| 127a0 | 77 69 74 63 68 20 56 69 72 75 74 61 6c 20 4c 69 62 72 61 72 79 3a 20 22 20 63 61 6c 69 62 72 65 | witch.Virutal.Library:.".calibre |
| 127c0 | 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 29 29 0a 20 20 20 20 | db-virtual-library-alist)))..... |
| 127e0 | 20 20 28 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 66 69 6c | ..(calibredb-virtual-library-fil |
| 12800 | 74 65 72 20 6b 65 79 77 6f 72 64 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 6b 65 79 77 | ter.keyword).......(message.keyw |
| 12820 | 6f 72 64 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 | ord))))..(defun.calibredb-virtua |
| 12840 | 6c 2d 6c 69 62 72 61 72 79 2d 6e 65 78 74 20 28 29 0a 20 20 22 53 77 69 74 68 20 74 6f 20 6e 65 | l-library-next.()..."Swith.to.ne |
| 12860 | 78 74 20 76 69 72 74 75 61 6c 20 6c 69 62 72 61 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 | xt.virtual.library."...(interact |
| 12880 | 69 76 65 29 0a 20 20 28 69 66 20 28 65 71 20 28 6c 65 6e 67 74 68 20 63 61 6c 69 62 72 65 64 62 | ive)...(if.(eq.(length.calibredb |
| 128a0 | 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 20 30 29 0a 20 20 20 20 20 | -virtual-library-alist).0)...... |
| 128c0 | 20 28 6d 65 73 73 61 67 65 20 22 4e 6f 20 76 69 72 74 75 61 6c 20 6c 69 62 72 61 72 69 65 73 2e | .(message."No.virtual.libraries. |
| 128e0 | 20 53 65 74 20 60 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d | .Set.`calibredb-virtual-library- |
| 12900 | 61 6c 69 73 74 27 20 77 69 74 68 20 27 28 28 6e 61 6d 65 20 2e 20 6b 65 79 77 6f 72 64 73 29 29 | alist'.with.'((name...keywords)) |
| 12920 | 2e 22 20 29 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 69 6e 64 65 78 20 28 73 65 74 71 20 63 | .".).......(let*.((index.(setq.c |
| 12940 | 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 0a 20 | alibredb-virtual-library-index.. |
| 12960 | 20 20 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 3c 20 | .........................(if.(<. |
| 12980 | 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 20 | calibredb-virtual-library-index. |
| 129a0 | 28 31 2d 20 28 6c 65 6e 67 74 68 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 | (1-.(length.calibredb-virtual-li |
| 129c0 | 62 72 61 72 79 2d 61 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | brary-alist))).................. |
| 129e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 31 2b 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 | .............(1+.calibredb-virtu |
| 12a00 | 61 6c 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 29 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 | al-library-index).0))).......... |
| 12a20 | 20 20 20 20 28 6b 65 79 77 6f 72 64 20 28 63 61 72 20 28 6e 74 68 20 69 6e 64 65 78 20 63 61 6c | ....(keyword.(car.(nth.index.cal |
| 12a40 | 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 29 29 29 | ibredb-virtual-library-alist)))) |
| 12a60 | 0a 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 | .........(calibredb-virtual-libr |
| 12a80 | 61 72 79 2d 66 69 6c 74 65 72 20 6b 65 79 77 6f 72 64 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 | ary-filter.keyword).........(mes |
| 12aa0 | 73 61 67 65 20 6b 65 79 77 6f 72 64 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 | sage.keyword))))..(defun.calibre |
| 12ac0 | 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 70 72 65 76 69 6f 75 73 20 28 29 0a 20 | db-virtual-library-previous.().. |
| 12ae0 | 20 22 53 77 69 74 68 20 74 6f 20 70 72 65 76 69 6f 75 73 20 76 69 72 74 75 61 6c 20 6c 69 62 72 | ."Swith.to.previous.virtual.libr |
| 12b00 | 61 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 66 20 28 65 71 20 | ary."...(interactive)...(if.(eq. |
| 12b20 | 28 6c 65 6e 67 74 68 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 | (length.calibredb-virtual-librar |
| 12b40 | 79 2d 61 6c 69 73 74 29 20 30 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 4e 6f 20 76 | y-alist).0).......(message."No.v |
| 12b60 | 69 72 74 75 61 6c 20 6c 69 62 72 61 72 69 65 73 2e 20 53 65 74 20 60 63 61 6c 69 62 72 65 64 62 | irtual.libraries..Set.`calibredb |
| 12b80 | 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 27 20 77 69 74 68 20 27 28 28 | -virtual-library-alist'.with.'(( |
| 12ba0 | 6e 61 6d 65 20 2e 20 6b 65 79 77 6f 72 64 73 29 29 2e 22 20 29 0a 20 20 20 20 20 20 28 6c 65 74 | name...keywords)).".).......(let |
| 12bc0 | 2a 20 28 28 69 6e 64 65 78 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 | *.((index.(setq.calibredb-virtua |
| 12be0 | 6c 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | l-library-index................. |
| 12c00 | 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 3e 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 | ..........(if.(>.calibredb-virtu |
| 12c20 | 61 6c 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | al-library-index.0)............. |
| 12c40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 31 2d 20 63 61 6c 69 62 72 65 64 62 2d | ..................(1-.calibredb- |
| 12c60 | 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 69 6e 64 65 78 29 0a 20 20 20 20 20 20 20 20 20 | virtual-library-index).......... |
| 12c80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 31 2d 20 28 6c 65 6e 67 74 68 20 63 | ...................(1-.(length.c |
| 12ca0 | 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 29 | alibredb-virtual-library-alist)) |
| 12cc0 | 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6b 65 79 77 6f 72 64 20 28 63 61 72 20 28 | )))..............(keyword.(car.( |
| 12ce0 | 6e 74 68 20 69 6e 64 65 78 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 | nth.index.calibredb-virtual-libr |
| 12d00 | 61 72 79 2d 61 6c 69 73 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 | ary-alist)))).........(calibredb |
| 12d20 | 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 66 69 6c 74 65 72 20 6b 65 79 77 6f 72 64 29 | -virtual-library-filter.keyword) |
| 12d40 | 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 6b 65 79 77 6f 72 64 29 29 29 29 0a 0a 28 | .........(message.keyword))))..( |
| 12d60 | 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 29 0a 0a 3b 3b 3b | provide.'calibredb-library)..;;; |
| 12d80 | 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a | .calibredb-library.el.ends.here. |
| 12da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12e00 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 12e20 | 2d 6f 70 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 | -opds.el........................ |
| 12e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12e60 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| 12e80 | 30 30 32 33 31 33 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 30 33 35 00 20 30 00 00 00 | 0023137.00000000000.016035..0... |
| 12ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12f00 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 12f20 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 12f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 12fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 13000 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2e 65 6c 20 2d 2d 2d 20 6f 70 64 73 20 66 | ;;;.calibredb-opds.el.---.opds.f |
| 13020 | 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 | or.calibredb.-*-.lexical-binding |
| 13040 | 3a 20 74 3b 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 32 30 20 | :.t;.-*-..;;.Copyright.(C).2020. |
| 13060 | 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 44 61 6d 6f 6e 20 43 68 61 | Damon.Chan..;;.Author:.Damon.Cha |
| 13080 | 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 55 52 4c 3a 20 68 | n.<elecming@gmail.com>.;;.URL:.h |
| 130a0 | 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 65 6e 79 61 6e 6d 69 6e 67 2f 63 61 | ttps://github.com/chenyanming/ca |
| 130c0 | 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 74 6f 6f 6c 73 0a 3b 3b | libredb.el.;;.Keywords:.tools.;; |
| 130e0 | 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 | .Version:.2.12.0..;;.This.file.i |
| 13100 | 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 73 2e 0a 0a 3b 3b 20 54 68 69 | s.NOT.part.of.GNU.Emacs...;;.Thi |
| 13120 | 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 | s.program.is.free.software;.you. |
| 13140 | 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 |
| 13160 | 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 |
| 13180 | 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 |
| 131a0 | 6c 69 73 68 65 64 20 62 79 0a 3b 3b 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 |
| 131c0 | 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 |
| 131e0 | 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f | he.License,.or.;;.(at.your.optio |
| 13200 | 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 | n).any.later.version...;;.This.p |
| 13220 | 72 6f 67 72 61 6d 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 | rogram.is.distributed.in.the.hop |
| 13240 | 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 | e.that.it.will.be.useful,.;;.but |
| 13260 | 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 | .WITHOUT.ANY.WARRANTY;.without.e |
| 13280 | 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d | ven.the.implied.warranty.of.;;.M |
| 132a0 | 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 | ERCHANTABILITY.or.FITNESS.FOR.A. |
| 132c0 | 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 | PARTICULAR.PURPOSE...See.the.;;. |
| 132e0 | 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d | GNU.General.Public.License.for.m |
| 13300 | 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 | ore.details...;;.You.should.have |
| 13320 | 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 |
| 13340 | 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 |
| 13360 | 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 | .this.program...If.not,.see.<htt |
| 13380 | 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 3b | ps://www.gnu.org/licenses/>...;; |
| 133a0 | 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 | ;.Commentary:..;;;.Code:..(requi |
| 133c0 | 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 29 0a 28 72 65 71 75 69 72 65 20 27 65 73 | re.'calibredb-core).(require.'es |
| 133e0 | 78 6d 6c 2d 71 75 65 72 79 29 0a 28 72 65 71 75 69 72 65 20 27 65 73 78 6d 6c 29 0a 28 72 65 71 | xml-query).(require.'esxml).(req |
| 13400 | 75 69 72 65 20 27 64 6f 6d 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 | uire.'dom)..(defvar.calibredb-op |
| 13420 | 64 73 2d 72 6f 6f 74 2d 75 72 6c 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 | ds-root-url.nil).(defvar.calibre |
| 13440 | 64 62 2d 6f 70 64 73 2d 64 6f 77 6e 6c 6f 61 64 2d 64 69 72 20 22 7e 2f 44 6f 77 6e 6c 6f 61 64 | db-opds-download-dir."~/Download |
| 13460 | 73 22 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 | s")..(declare-function.calibredb |
| 13480 | 20 22 63 61 6c 69 62 72 65 64 62 2e 65 6c 22 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 | ."calibredb.el")..(defun.calibre |
| 134a0 | 64 62 2d 6f 70 64 73 2d 6d 61 69 6c 63 61 70 2d 6d 69 6d 65 2d 74 6f 2d 65 78 74 6e 20 28 6d 69 | db-opds-mailcap-mime-to-extn.(mi |
| 134c0 | 6d 65 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 66 69 6c 65 20 65 78 74 65 6e 73 69 6f 6e | me)..."Return.the.file.extension |
| 134e0 | 73 20 45 58 54 4e 20 62 61 73 65 64 20 6f 6e 20 74 68 65 20 4d 49 4d 45 20 63 6f 6e 74 65 6e 74 | s.EXTN.based.on.the.MIME.content |
| 13500 | 20 74 79 70 65 2e 22 0a 20 20 28 6d 61 69 6c 63 61 70 2d 70 61 72 73 65 2d 6d 69 6d 65 74 79 70 | .type."...(mailcap-parse-mimetyp |
| 13520 | 65 73 29 0a 20 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 6d 69 6d 65 29 0a 20 20 20 20 20 20 28 | es)...(if.(stringp.mime).......( |
| 13540 | 63 61 72 20 28 72 61 73 73 6f 63 20 28 64 6f 77 6e 63 61 73 65 20 6d 69 6d 65 29 20 6d 61 69 6c | car.(rassoc.(downcase.mime).mail |
| 13560 | 63 61 70 2d 6d 69 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 | cap-mime-extensions))))..(defun. |
| 13580 | 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 68 6f 73 74 20 28 29 0a 20 20 22 4d 6f 64 69 66 79 | calibredb-opds-host.()..."Modify |
| 135a0 | 20 60 75 72 6c 2d 72 65 63 72 65 61 74 65 2d 75 72 6c 27 20 74 6f 20 66 69 74 20 74 68 65 20 6e | .`url-recreate-url'.to.fit.the.n |
| 135c0 | 65 65 64 73 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 75 72 6c 6f 62 6a 20 28 75 72 6c 2d 67 65 6e | eeds."...(let*.((urlobj.(url-gen |
| 135e0 | 65 72 69 63 2d 70 61 72 73 65 2d 75 72 6c 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 72 6f | eric-parse-url.calibredb-opds-ro |
| 13600 | 6f 74 2d 75 72 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 79 70 65 20 28 75 72 6c 2d 74 79 70 | ot-url))..........(type.(url-typ |
| 13620 | 65 20 75 72 6c 6f 62 6a 29 29 0a 20 20 20 20 20 20 20 20 20 28 75 73 65 72 20 28 75 72 6c 2d 75 | e.urlobj))..........(user.(url-u |
| 13640 | 73 65 72 20 75 72 6c 6f 62 6a 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 61 73 73 20 28 75 72 6c | ser.urlobj))..........(pass.(url |
| 13660 | 2d 70 61 73 73 77 6f 72 64 20 75 72 6c 6f 62 6a 29 29 0a 20 20 20 20 20 20 20 20 20 28 68 6f 73 | -password.urlobj))..........(hos |
| 13680 | 74 20 28 75 72 6c 2d 68 6f 73 74 20 75 72 6c 6f 62 6a 29 29 0a 20 20 20 20 20 20 20 20 20 3b 3b | t.(url-host.urlobj))..........;; |
| 136a0 | 20 52 46 43 20 33 39 38 36 3a 20 22 6f 6d 69 74 20 74 68 65 20 70 6f 72 74 20 63 6f 6d 70 6f 6e | .RFC.3986:."omit.the.port.compon |
| 136c0 | 65 6e 74 20 61 6e 64 20 69 74 73 20 3a 20 64 65 6c 69 6d 69 74 65 72 20 69 66 0a 20 20 20 20 20 | ent.and.its.:.delimiter.if...... |
| 136e0 | 20 20 20 20 3b 3b 20 70 6f 72 74 20 69 73 20 65 6d 70 74 79 20 6f 72 20 69 66 20 69 74 73 20 76 | ....;;.port.is.empty.or.if.its.v |
| 13700 | 61 6c 75 65 20 77 6f 75 6c 64 20 62 65 20 74 68 65 20 73 61 6d 65 20 61 73 20 74 68 61 74 20 6f | alue.would.be.the.same.as.that.o |
| 13720 | 66 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 65 20 73 63 68 65 6d 65 27 73 20 64 65 66 61 75 | f..........;;.the.scheme's.defau |
| 13740 | 6c 74 2e 22 0a 20 20 20 20 20 20 20 20 20 28 70 6f 72 74 20 28 75 72 6c 2d 70 6f 72 74 2d 69 66 | lt."..........(port.(url-port-if |
| 13760 | 2d 6e 6f 6e 2d 64 65 66 61 75 6c 74 20 75 72 6c 6f 62 6a 29 29 0a 20 20 20 20 20 20 20 20 20 3b | -non-default.urlobj))..........; |
| 13780 | 3b 20 28 66 69 6c 65 20 28 75 72 6c 2d 66 69 6c 65 6e 61 6d 65 20 75 72 6c 6f 62 6a 29 29 0a 20 | ;.(file.(url-filename.urlobj)).. |
| 137a0 | 20 20 20 20 20 20 20 20 3b 3b 20 28 66 72 61 67 20 28 75 72 6c 2d 74 61 72 67 65 74 20 75 72 6c | ........;;.(frag.(url-target.url |
| 137c0 | 6f 62 6a 29 29 0a 20 20 20 20 20 20 20 20 20 29 0a 20 20 20 20 28 63 6f 6e 63 61 74 20 28 69 66 | obj))..........).....(concat.(if |
| 137e0 | 20 74 79 70 65 20 28 63 6f 6e 63 61 74 20 74 79 70 65 20 22 3a 22 29 29 0a 20 20 20 20 20 20 20 | .type.(concat.type.":"))........ |
| 13800 | 20 20 20 20 20 28 69 66 20 28 75 72 6c 2d 66 75 6c 6c 6e 65 73 73 20 75 72 6c 6f 62 6a 29 20 22 | .....(if.(url-fullness.urlobj)." |
| 13820 | 2f 2f 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6f 72 20 75 73 65 72 20 70 61 | //").............(if.(or.user.pa |
| 13840 | 73 73 29 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 75 73 65 72 | ss).................(concat.user |
| 13860 | 0a 20 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 70 61 73 | .........................(if.pas |
| 13880 | 73 20 28 63 6f 6e 63 61 74 20 22 3a 22 20 70 61 73 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | s.(concat.":".pass))............ |
| 138a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 22 40 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 68 | ............."@")).............h |
| 138c0 | 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 70 6f 72 74 20 28 66 6f 72 6d 61 74 | ost.............(if.port.(format |
| 138e0 | 20 22 3a 25 64 22 20 28 75 72 6c 2d 70 6f 72 74 20 75 72 6c 6f 62 6a 29 29 29 0a 20 20 20 20 20 | .":%d".(url-port.urlobj)))...... |
| 13900 | 20 20 20 20 20 20 20 3b 3b 20 28 6f 72 20 66 69 6c 65 20 22 2f 22 29 0a 20 20 20 20 20 20 20 20 | .......;;.(or.file."/")......... |
| 13920 | 20 20 20 20 3b 3b 20 28 69 66 20 66 72 61 67 20 28 63 6f 6e 63 61 74 20 22 23 22 20 66 72 61 67 | ....;;.(if.frag.(concat."#".frag |
| 13940 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 | )).............)))..(defun.calib |
| 13960 | 72 65 64 62 2d 6f 70 64 73 2d 72 65 71 75 65 73 74 2d 70 61 67 65 20 28 75 72 6c 20 26 6f 70 74 | redb-opds-request-page.(url.&opt |
| 13980 | 69 6f 6e 61 6c 20 61 63 63 6f 75 6e 74 20 70 61 73 73 77 6f 72 64 29 0a 20 20 22 52 65 71 75 65 | ional.account.password)..."Reque |
| 139a0 | 73 74 20 55 52 4c 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 41 43 43 4f 55 4e | st.URL..Optional.argument.ACCOUN |
| 139c0 | 54 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 50 41 53 53 57 4f 52 44 2e 22 0a | T..Optional.argument.PASSWORD.". |
| 139e0 | 20 20 28 72 65 71 75 69 72 65 20 27 72 65 71 75 65 73 74 29 0a 20 20 28 6d 65 73 73 61 67 65 20 | ..(require.'request)...(message. |
| 13a00 | 22 4c 6f 61 64 69 6e 67 20 25 73 2e 2e 2e 22 20 75 72 6c 29 0a 20 20 28 6c 65 74 20 28 6f 75 74 | "Loading.%s...".url)...(let.(out |
| 13a20 | 70 75 74 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 72 6f | put).....(setq.calibredb-opds-ro |
| 13a40 | 6f 74 2d 75 72 6c 20 75 72 6c 29 0a 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 72 65 | ot-url.url).....(if.(fboundp.'re |
| 13a60 | 71 75 65 73 74 29 0a 20 20 20 20 20 20 20 20 28 72 65 71 75 65 73 74 20 75 72 6c 0a 20 20 20 20 | quest).........(request.url..... |
| 13a80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 61 72 73 65 72 20 27 62 75 66 66 65 72 2d 73 74 72 | .............:parser.'buffer-str |
| 13aa0 | 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 65 61 64 65 72 73 20 60 28 | ing..................:headers.`( |
| 13ac0 | 28 22 55 73 65 72 2d 41 67 65 6e 74 22 20 2e 20 22 4d 6f 7a 69 6c 6c 61 2f 35 2e 30 20 28 57 69 | ("User-Agent"..."Mozilla/5.0.(Wi |
| 13ae0 | 6e 64 6f 77 73 20 4e 54 20 36 2e 31 3b 20 57 4f 57 36 34 29 20 41 70 70 6c 65 57 65 62 4b 69 74 | ndows.NT.6.1;.WOW64).AppleWebKit |
| 13b00 | 2f 35 33 37 2e 33 36 20 28 4b 48 54 4d 4c 2c 20 6c 69 6b 65 20 47 65 63 6b 6f 29 20 43 68 72 6f | /537.36.(KHTML,.like.Gecko).Chro |
| 13b20 | 6d 65 2f 34 31 2e 30 2e 32 32 37 32 2e 31 30 31 20 53 61 66 61 72 69 2f 35 33 37 2e 33 36 22 29 | me/41.0.2272.101.Safari/537.36") |
| 13b40 | 0a 20 20 20 20 20 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 43 | .............................("C |
| 13b60 | 6f 6e 74 65 6e 74 2d 54 79 70 65 22 20 2e 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 6d 6c 22 | ontent-Type"..."application/xml" |
| 13b80 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 | ).............................,( |
| 13ba0 | 69 66 20 28 61 6e 64 20 61 63 63 6f 75 6e 74 20 70 61 73 73 77 6f 72 64 29 0a 20 20 20 20 20 20 | if.(and.account.password)....... |
| 13bc0 | 20 20 20 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 22 41 75 | ...........................`("Au |
| 13be0 | 74 68 6f 72 69 7a 61 74 69 6f 6e 22 20 2e 20 2c 28 63 6f 6e 63 61 74 20 22 42 61 73 69 63 20 22 | thorization"...,(concat."Basic." |
| 13c00 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 13c20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ...............................( |
| 13c40 | 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 20 20 20 20 | base64-encode-string............ |
| 13c60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 13c80 | 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 61 63 63 6f | ....................(concat.acco |
| 13ca0 | 75 6e 74 20 22 3a 22 20 70 61 73 73 77 6f 72 64 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 | unt.":".password)))))).......... |
| 13cc0 | 20 20 20 20 20 20 20 20 3a 73 79 6e 63 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ........:sync.nil............... |
| 13ce0 | 20 20 20 3a 73 75 63 63 65 73 73 20 28 63 6c 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 | ...:success.(cl-function........ |
| 13d00 | 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 28 26 6b 65 | ....................(lambda.(&ke |
| 13d20 | 79 20 64 61 74 61 20 26 61 6c 6c 6f 77 2d 6f 74 68 65 72 2d 6b 65 79 73 29 0a 20 20 20 20 20 20 | y.data.&allow-other-keys)....... |
| 13d40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 64 | .......................(let*.((d |
| 13d60 | 6f 6d 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 | om.(with-temp-buffer............ |
| 13d80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 13da0 | 28 69 6e 73 65 72 74 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 | (insert.data)................... |
| 13dc0 | 20 20 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 62 78 6d 6c | .........................(libxml |
| 13de0 | 2d 70 61 72 73 65 2d 78 6d 6c 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 | -parse-xml-region.(point-min).(p |
| 13e00 | 6f 69 6e 74 2d 6d 61 78 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | oint-max)))))................... |
| 13e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | .............(setq.calibredb-sea |
| 13e40 | 72 63 68 2d 65 6e 74 72 69 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 64 6f 6d 20 | rch-entries.(calibredb-opds-dom. |
| 13e60 | 64 6f 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | dom))........................... |
| 13e80 | 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 | .....(setq.calibredb-full-entrie |
| 13ea0 | 73 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 29 0a 20 20 20 20 | s.calibredb-search-entries)..... |
| 13ec0 | 20 20 20 20 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 6c 69 | ...........................(cali |
| 13ee0 | 62 72 65 64 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | bredb).......................... |
| 13f00 | 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 66 69 6c 74 65 72 | ......(setq.calibredb-tag-filter |
| 13f20 | 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -p.nil)......................... |
| 13f40 | 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d | .......(setq.calibredb-favorite- |
| 13f60 | 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | filter-p.nil)................... |
| 13f80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 61 75 74 | .............(setq.calibredb-aut |
| 13fa0 | 68 6f 72 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | hor-filter-p.nil)............... |
| 13fc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 | .................(setq.calibredb |
| 13fe0 | 2d 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | -date-filter-p.nil)............. |
| 14000 | 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 63 61 6c 69 62 72 65 | ...................(setq.calibre |
| 14020 | 64 62 2d 66 6f 72 6d 61 74 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 | db-format-filter-p.nil)......... |
| 14040 | 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 6c 69 62 72 65 64 | .......................(calibred |
| 14060 | 62 2d 73 65 61 72 63 68 2d 6b 65 79 77 6f 72 64 2d 66 69 6c 74 65 72 20 22 22 29 0a 20 20 20 20 | b-search-keyword-filter."")..... |
| 14080 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 | ...........................(mess |
| 140a0 | 61 67 65 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | age."")......................... |
| 140c0 | 20 20 20 20 20 20 20 3b 3b 20 28 73 65 74 71 20 6f 75 74 70 75 74 20 28 6f 70 64 73 2d 70 61 67 | .......;;.(setq.output.(opds-pag |
| 140e0 | 65 20 64 6f 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e.dom))......................... |
| 14100 | 20 20 20 20 20 20 20 29 29 29 29 29 0a 20 20 20 20 6f 75 74 70 75 74 29 29 0a 0a 28 64 65 66 75 | .......))))).....output))..(defu |
| 14120 | 6e 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 64 6f 77 6e 6c 6f 61 64 20 28 74 69 74 6c 65 | n.calibredb-opds-download.(title |
| 14140 | 20 75 72 6c 20 66 6f 72 6d 61 74 20 26 6f 70 74 69 6f 6e 61 6c 20 61 63 63 6f 75 6e 74 20 70 61 | .url.format.&optional.account.pa |
| 14160 | 73 73 77 6f 72 64 29 0a 20 20 22 44 6f 77 6e 6c 6f 61 64 20 66 69 6c 65 20 6f 66 20 54 49 54 4c | ssword)..."Download.file.of.TITL |
| 14180 | 45 20 55 52 4c 20 46 4f 52 4d 41 54 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 | E.URL.FORMAT..Optional.argument. |
| 141a0 | 41 43 43 4f 55 4e 54 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 50 41 53 53 57 | ACCOUNT..Optional.argument.PASSW |
| 141c0 | 4f 52 44 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69 6c | ORD."...(let*.((file.(expand-fil |
| 141e0 | 65 2d 6e 61 6d 65 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 22 20 74 69 74 6c 65 20 66 6f 72 6d | e-name.(format."%s%s".title.form |
| 14200 | 61 74 29 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 64 6f 77 6e 6c 6f 61 64 2d 64 69 72 29 | at).calibredb-opds-download-dir) |
| 14220 | 29 0a 20 20 20 20 20 20 20 20 20 28 63 6d 64 20 28 69 66 20 28 61 6e 64 20 61 63 63 6f 75 6e 74 | )..........(cmd.(if.(and.account |
| 14240 | 20 70 61 73 73 77 6f 72 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f | .password)...................(fo |
| 14260 | 72 6d 61 74 20 22 63 75 72 6c 20 2d 75 20 25 73 3a 5c 22 25 73 5c 22 20 2d 4c 20 25 73 20 2d 6f | rmat."curl.-u.%s:\"%s\".-L.%s.-o |
| 14280 | 20 25 73 22 20 61 63 63 6f 75 6e 74 20 70 61 73 73 77 6f 72 64 20 28 73 68 65 6c 6c 2d 71 75 6f | .%s".account.password.(shell-quo |
| 142a0 | 74 65 2d 61 72 67 75 6d 65 6e 74 20 75 72 6c 29 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 | te-argument.url).(shell-quote-ar |
| 142c0 | 67 75 6d 65 6e 74 20 66 69 6c 65 20 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | gument.file.)).................( |
| 142e0 | 66 6f 72 6d 61 74 20 22 63 75 72 6c 20 2d 4c 20 25 73 20 2d 6f 20 25 73 22 20 28 73 68 65 6c 6c | format."curl.-L.%s.-o.%s".(shell |
| 14300 | 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 75 72 6c 29 20 28 73 68 65 6c 6c 2d 71 75 6f 74 | -quote-argument.url).(shell-quot |
| 14320 | 65 2d 61 72 67 75 6d 65 6e 74 20 66 69 6c 65 29 29 29 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 | e-argument.file))))).....(messag |
| 14340 | 65 20 63 6d 64 29 0a 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 66 69 | e.cmd).....(if.(file-exists-p.fi |
| 14360 | 6c 65 29 0a 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 66 69 6c 65 29 0a 20 20 20 | le).........(find-file.file).... |
| 14380 | 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c 0a 20 20 20 20 20 20 20 | ...(set-process-sentinel........ |
| 143a0 | 28 73 74 61 72 74 2d 70 72 6f 63 65 73 73 2d 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 20 22 63 61 | (start-process-shell-command."ca |
| 143c0 | 6c 69 62 72 65 64 62 2d 6f 70 64 73 22 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2a 22 | libredb-opds"."*calibredb-opds*" |
| 143e0 | 20 63 6d 64 29 0a 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 70 20 5f 65 29 0a 20 20 20 20 | .cmd)........(lambda.(p._e)..... |
| 14400 | 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 30 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 | .....(when.(=.0.(process-exit-st |
| 14420 | 61 74 75 73 20 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 65 78 | atus.p))............(if.(file-ex |
| 14440 | 69 73 74 73 2d 70 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6e | ists-p.file)................(fin |
| 14460 | 64 2d 66 69 6c 65 20 66 69 6c 65 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 | d-file.file))))))))..(defun.cali |
| 14480 | 62 72 65 64 62 2d 6f 70 64 73 2d 64 6f 6d 20 28 64 6f 6d 29 0a 20 20 22 50 61 72 73 65 20 44 4f | bredb-opds-dom.(dom)..."Parse.DO |
| 144a0 | 4d 2e 22 0a 20 20 28 6c 65 74 20 28 28 65 6e 74 72 69 65 73 20 28 2d 63 6f 6e 63 61 74 0a 20 20 | M."...(let.((entries.(-concat... |
| 144c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 6d 61 70 20 28 6c 61 6d 62 64 61 20 28 6c | ................(-map.(lambda.(l |
| 144e0 | 69 6e 6b 29 0a 20 20 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 | ink)...........................` |
| 14500 | 28 65 6e 74 72 79 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (entry.nil...................... |
| 14520 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 6e 69 6c 20 2c 28 65 73 78 6d 6c 2d | .............(title.nil.,(esxml- |
| 14540 | 6e 6f 64 65 2d 61 74 74 72 69 62 75 74 65 20 27 72 65 6c 20 6c 69 6e 6b 29 29 0a 20 20 20 20 20 | node-attribute.'rel.link))...... |
| 14560 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 6c 69 | .............................,li |
| 14580 | 6e 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 20 20 20 28 65 73 | nk)).........................(es |
| 145a0 | 78 6d 6c 2d 71 75 65 72 79 2d 61 6c 6c 20 22 66 65 65 64 3e 6c 69 6e 6b 22 20 64 6f 6d 29 29 0a | xml-query-all."feed>link".dom)). |
| 145c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 2d 61 | ..................(esxml-query-a |
| 145e0 | 6c 6c 20 22 66 65 65 64 3e 65 6e 74 72 79 22 20 64 6f 6d 29 29 29 29 0a 20 20 20 20 28 6e 72 65 | ll."feed>entry".dom)))).....(nre |
| 14600 | 76 65 72 73 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 62 6f 6f 6b 6c 69 73 74 0a 20 20 20 | verse.(calibredb-getbooklist.... |
| 14620 | 20 20 28 6c 65 74 20 28 28 6e 6f 20 30 29 29 0a 20 20 20 20 20 20 20 28 2d 6d 61 70 63 61 74 0a | ..(let.((no.0))........(-mapcat. |
| 14640 | 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 | ........(lambda.(entry)......... |
| 14660 | 20 20 28 73 65 74 71 20 6e 6f 20 28 31 2b 20 6e 6f 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c | ..(setq.no.(1+.no))...........(l |
| 14680 | 69 73 74 20 60 28 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 3a 69 64 | ist.`(...................;;.(:id |
| 146a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 64 6f 6d 2d 74 65 78 74 20 | .....................,(dom-text. |
| 146c0 | 28 65 73 78 6d 6c 2d 71 75 65 72 79 20 22 69 64 22 20 65 6e 74 72 79 29 29 29 0a 20 20 20 20 20 | (esxml-query."id".entry)))...... |
| 146e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 69 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .............(:id............... |
| 14700 | 20 20 20 20 20 20 2c 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 6e 6f 29 29 0a 20 20 | ......,(number-to-string.no))... |
| 14720 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 61 75 74 68 6f 72 2d 73 6f 72 74 20 20 20 | ................(:author-sort... |
| 14740 | 20 20 20 20 20 20 20 20 20 2c 28 64 6f 6d 2d 74 65 78 74 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 | .........,(dom-text.(esxml-query |
| 14760 | 20 22 61 75 74 68 6f 72 3e 6e 61 6d 65 22 20 65 6e 74 72 79 29 29 29 20 3b 20 54 4f 44 4f 3a 20 | ."author>name".entry))).;.TODO:. |
| 14780 | 73 75 70 70 6f 72 74 20 6d 75 74 69 74 70 6c 65 20 61 75 74 68 6f 72 73 0a 20 20 20 20 20 20 20 | support.mutitple.authors........ |
| 147a0 | 20 20 20 20 20 20 20 20 20 20 20 28 3a 62 6f 6f 6b 2d 64 69 72 20 20 20 20 20 20 20 20 20 20 20 | ...........(:book-dir........... |
| 147c0 | 20 20 20 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 62 6f 6f 6b | ...."")...................(:book |
| 147e0 | 2d 63 6f 76 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 6c 65 74 20 28 28 75 72 6c 20 28 | -cover.............,(let.((url.( |
| 14800 | 6f 72 20 28 64 6f 6d 2d 61 74 74 72 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 20 22 5b 74 79 70 65 | or.(dom-attr.(esxml-query."[type |
| 14820 | 5e 3d 69 6d 61 67 65 5d 22 20 65 6e 74 72 79 29 20 27 68 72 65 66 29 20 22 22 29 29 29 0a 20 20 | ^=image]".entry).'href)."")))... |
| 14840 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 14860 | 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 73 74 72 69 6e 67 70 20 75 72 | ............(if.(and.(stringp.ur |
| 14880 | 6c 29 20 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 22 68 74 74 70 22 20 75 72 6c 29 29 0a 20 20 20 | l).(s-contains?."http".url)).... |
| 148a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 148c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 72 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...............url.............. |
| 148e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 14900 | 20 20 20 28 63 6f 6e 64 20 28 28 73 2d 65 71 75 61 6c 73 2d 70 20 22 22 20 75 72 6c 29 20 6e 69 | ...(cond.((s-equals-p."".url).ni |
| 14920 | 6c 29 20 3b 20 6e 6f 20 69 6d 61 67 65 20 75 72 6c 2c 20 72 65 74 75 72 6e 20 6e 69 6c 0a 20 20 | l).;.no.image.url,.return.nil... |
| 14940 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 14960 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 2d 63 6f 6e 74 61 69 6e 73 | ....................((s-contains |
| 14980 | 3f 20 22 62 61 73 65 36 34 22 20 75 72 6c 29 20 75 72 6c 29 20 3b 20 62 61 73 65 36 34 20 69 6d | ?."base64".url).url).;.base64.im |
| 149a0 | 61 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 20 20 20 20 20 | age............................. |
| 149c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 28 66 6f | ..........................(t.(fo |
| 149e0 | 72 6d 61 74 20 22 25 73 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 68 6f 73 74 | rmat."%s%s".(calibredb-opds-host |
| 14a00 | 29 20 75 72 6c 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a | ).url))))))...................(: |
| 14a20 | 62 6f 6f 6b 2d 6e 61 6d 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 22 29 0a 20 20 20 20 20 | book-name.............."")...... |
| 14a40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 | .............(:book-format...... |
| 14a60 | 20 20 20 20 20 20 2c 28 6f 72 20 28 64 6f 6d 2d 61 74 74 72 20 28 65 73 78 6d 6c 2d 71 75 65 72 | ......,(or.(dom-attr.(esxml-quer |
| 14a80 | 79 20 22 5b 74 79 70 65 5e 3d 61 70 70 6c 69 63 61 74 69 6f 6e 5d 22 20 65 6e 74 72 79 29 20 27 | y."[type^=application]".entry).' |
| 14aa0 | 74 79 70 65 29 20 22 22 29 29 20 3b 20 54 4f 44 4f 3a 20 73 75 70 70 6f 72 74 20 6d 6f 72 65 20 | type)."")).;.TODO:.support.more. |
| 14ac0 | 66 6f 72 6d 61 74 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 62 6f 6f 6b | formats...................(:book |
| 14ae0 | 2d 70 75 62 64 61 74 65 20 20 20 20 20 20 20 20 20 20 20 2c 28 64 6f 6d 2d 74 65 78 74 20 28 6f | -pubdate...........,(dom-text.(o |
| 14b00 | 72 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 20 22 69 73 73 75 65 64 22 20 65 6e 74 72 79 29 0a 20 | r.(esxml-query."issued".entry).. |
| 14b20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 14b40 | 20 20 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 73 78 6d 6c 2d | .........................(esxml- |
| 14b60 | 71 75 65 72 79 20 22 70 75 62 6c 69 73 68 65 64 22 20 65 6e 74 72 79 29 29 29 29 0a 20 20 20 20 | query."published".entry))))..... |
| 14b80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 62 6f 6f 6b 2d 74 69 74 6c 65 20 20 20 20 20 20 | ..............(:book-title...... |
| 14ba0 | 20 20 20 20 20 20 20 2c 28 64 6f 6d 2d 74 65 78 74 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 20 22 | .......,(dom-text.(esxml-query." |
| 14bc0 | 74 69 74 6c 65 22 20 65 6e 74 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | title".entry)))................. |
| 14be0 | 20 20 28 3a 66 69 6c 65 2d 70 61 74 68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 6c 65 74 | ..(:file-path..............,(let |
| 14c00 | 20 28 28 75 72 6c 20 28 6f 72 20 28 64 6f 6d 2d 61 74 74 72 20 28 65 73 78 6d 6c 2d 71 75 65 72 | .((url.(or.(dom-attr.(esxml-quer |
| 14c20 | 79 20 22 5b 74 79 70 65 5e 3d 61 70 70 6c 69 63 61 74 69 6f 6e 5d 22 20 65 6e 74 72 79 29 20 27 | y."[type^=application]".entry).' |
| 14c40 | 68 72 65 66 29 20 22 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 | href)."")))..................... |
| 14c60 | 20 20 20 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 61 | ..........................(if.(a |
| 14c80 | 6e 64 20 28 73 74 72 69 6e 67 70 20 75 72 6c 29 20 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 22 68 | nd.(stringp.url).(s-contains?."h |
| 14ca0 | 74 74 70 22 20 75 72 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ttp".url))...................... |
| 14cc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 72 6c | .............................url |
| 14ce0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 14d00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 73 2d 65 71 75 61 6c | .................(cond.((s-equal |
| 14d20 | 73 2d 70 20 22 22 20 75 72 6c 29 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | s-p."".url)."")................. |
| 14d40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 14d60 | 20 20 20 20 20 20 28 28 73 2d 65 71 75 61 6c 73 2d 70 20 28 73 2d 6c 65 66 74 20 31 20 75 72 6c | ......((s-equals-p.(s-left.1.url |
| 14d80 | 29 20 22 2f 22 29 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 | )."/").(format."%s%s".(calibredb |
| 14da0 | 2d 6f 70 64 73 2d 68 6f 73 74 29 20 75 72 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -opds-host).url))............... |
| 14dc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 14de0 | 20 20 20 20 20 20 20 20 28 74 20 28 66 6f 72 6d 61 74 20 22 25 73 2f 25 73 22 20 28 63 61 6c 69 | ........(t.(format."%s/%s".(cali |
| 14e00 | 62 72 65 64 62 2d 6f 70 64 73 2d 68 6f 73 74 29 20 75 72 6c 29 29 29 29 29 29 0a 20 20 20 20 20 | bredb-opds-host).url))))))...... |
| 14e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 74 61 67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .............(:tag.............. |
| 14e40 | 20 20 20 20 20 20 2c 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 79 0a 20 20 20 | ......,(mapconcat.#'identity.... |
| 14e60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 14e80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 6d 61 70 20 28 6c 61 6d 62 64 | ....................(-map.(lambd |
| 14ea0 | 61 20 28 63 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 20 20 | a.(cat)......................... |
| 14ec0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 14ee0 | 20 20 20 20 20 20 20 28 6f 72 20 28 65 73 78 6d 6c 2d 6e 6f 64 65 2d 61 74 74 72 69 62 75 74 65 | .......(or.(esxml-node-attribute |
| 14f00 | 20 27 6c 61 62 65 6c 20 63 61 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .'label.cat).................... |
| 14f20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 14f40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 73 78 6d 6c 2d 6e 6f 64 65 2d 61 74 74 72 | ................(esxml-node-attr |
| 14f60 | 69 62 75 74 65 20 27 74 65 72 6d 20 63 61 74 29 29 29 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 2d | ibute.'term.cat))).(esxml-query- |
| 14f80 | 61 6c 6c 20 22 63 61 74 65 67 6f 72 79 22 20 65 6e 74 72 79 29 29 20 22 2c 20 22 29 29 0a 20 20 | all."category".entry)).",."))... |
| 14fa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 73 69 7a 65 20 20 20 20 20 20 20 20 20 20 | ................(:size.......... |
| 14fc0 | 20 20 20 20 20 20 20 20 20 2c 28 66 6f 72 6d 61 74 20 22 25 2e 32 66 22 20 28 2f 20 28 73 74 72 | .........,(format."%.2f".(/.(str |
| 14fe0 | 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 28 6f 72 20 28 64 6f 6d 2d 61 74 74 72 20 28 65 73 78 | ing-to-number.(or.(dom-attr.(esx |
| 15000 | 6d 6c 2d 71 75 65 72 79 20 22 5b 74 79 70 65 5e 3d 61 70 70 6c 69 63 61 74 69 6f 6e 5d 22 20 65 | ml-query."[type^=application]".e |
| 15020 | 6e 74 72 79 29 20 27 6c 65 6e 67 74 68 20 29 20 22 30 22 20 29 20 29 20 31 30 34 38 35 37 36 2e | ntry).'length.)."0".).).1048576. |
| 15040 | 30 29 20 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 63 6f 6d 6d 65 6e | 0).))...................(:commen |
| 15060 | 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 63 6f 6e 64 20 28 28 65 73 78 6d 6c 2d | t................,(cond.((esxml- |
| 15080 | 71 75 65 72 79 20 22 73 75 6d 6d 61 72 79 22 20 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 | query."summary".entry).......... |
| 150a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 150c0 | 20 20 20 20 20 20 20 20 20 20 28 64 6f 6d 2d 74 65 78 74 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 | ..........(dom-text.(esxml-query |
| 150e0 | 20 22 73 75 6d 6d 61 72 79 22 20 65 6e 74 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ."summary".entry)))............. |
| 15100 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 15120 | 20 20 20 20 20 20 28 28 65 73 78 6d 6c 2d 71 75 65 72 79 20 22 63 6f 6e 74 65 6e 74 22 20 65 6e | ......((esxml-query."content".en |
| 15140 | 74 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 | try)............................ |
| 15160 | 20 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 73 78 6d 6c 2d 74 | ........................(esxml-t |
| 15180 | 6f 2d 78 6d 6c 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 20 22 63 6f 6e 74 65 6e 74 22 20 65 6e 74 | o-xml.(esxml-query."content".ent |
| 151a0 | 72 79 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 | ry)))........................... |
| 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 28 74 20 22 22 20 29 29 | ........................(t."".)) |
| 151e0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 69 64 73 20 20 20 20 20 20 20 | )...................(:ids....... |
| 15200 | 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 64 6f 6d 2d 74 65 78 74 20 28 6f 72 20 28 65 73 78 | .............,(dom-text.(or.(esx |
| 15220 | 6d 6c 2d 71 75 65 72 79 20 22 69 64 65 6e 74 69 66 69 65 72 22 20 65 6e 74 72 79 29 0a 20 20 20 | ml-query."identifier".entry).... |
| 15240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 15260 | 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 73 78 6d 6c 2d 71 75 | .......................(esxml-qu |
| 15280 | 65 72 79 20 22 69 64 22 20 65 6e 74 72 79 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ery."id".entry)))).............. |
| 152a0 | 20 20 20 20 20 28 3a 70 75 62 6c 69 73 68 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 | .....(:publisher..............,( |
| 152c0 | 64 6f 6d 2d 74 65 78 74 20 28 6f 72 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 20 22 70 75 62 6c 69 | dom-text.(or.(esxml-query."publi |
| 152e0 | 73 68 65 72 3e 6e 61 6d 65 22 20 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | sher>name".entry)............... |
| 15300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 15320 | 20 20 20 20 20 20 20 20 20 20 20 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 20 22 70 75 62 6c 69 73 | ............(esxml-query."publis |
| 15340 | 68 65 72 22 20 65 6e 74 72 79 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | her".entry)))).................. |
| 15360 | 20 28 3a 73 65 72 69 65 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 22 29 0a 20 20 | .(:series................."")... |
| 15380 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 6c 61 6e 67 5f 63 6f 64 65 20 20 20 20 20 | ................(:lang_code..... |
| 153a0 | 20 20 20 20 20 20 20 20 20 2c 28 64 6f 6d 2d 74 65 78 74 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 | .........,(dom-text.(esxml-query |
| 153c0 | 20 22 6c 61 6e 67 75 61 67 65 22 20 65 6e 74 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ."language".entry)))............ |
| 153e0 | 20 20 20 20 20 20 20 28 3a 6c 61 73 74 5f 6d 6f 64 69 66 69 65 64 20 20 20 20 20 20 20 20 20 20 | .......(:last_modified.......... |
| 15400 | 2c 28 64 6f 6d 2d 74 65 78 74 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 20 22 75 70 64 61 74 65 64 | ,(dom-text.(esxml-query."updated |
| 15420 | 22 20 65 6e 74 72 79 29 29 29 29 29 20 29 0a 20 20 20 20 20 20 20 20 65 6e 74 72 69 65 73 29 29 | ".entry))))).).........entries)) |
| 15440 | 29 20 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 73 65 61 | ).)))..(defun.calibredb-opds-sea |
| 15460 | 72 63 68 20 28 26 6f 70 74 69 6f 6e 61 6c 20 75 72 6c 29 0a 20 20 22 53 65 61 72 63 68 20 6c 69 | rch.(&optional.url)..."Search.li |
| 15480 | 62 72 61 72 79 20 66 72 6f 6d 20 55 52 4c 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 | brary.from.URL."...(interactive) |
| 154a0 | 0a 20 20 28 6c 65 74 2a 20 28 28 75 72 6c 20 28 6f 72 20 75 72 6c 20 28 63 6f 6d 70 6c 65 74 69 | ...(let*.((url.(or.url.(completi |
| 154c0 | 6e 67 2d 72 65 61 64 20 22 53 65 61 72 63 68 20 6c 69 62 72 61 72 79 3a 20 22 20 63 61 6c 69 62 | ng-read."Search.library:.".calib |
| 154e0 | 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 | redb-library-alist)))..........( |
| 15500 | 6c 69 62 72 61 72 79 20 28 2d 66 69 72 73 74 20 28 6c 61 6d 62 64 61 20 28 6c 69 62 29 0a 20 20 | library.(-first.(lambda.(lib)... |
| 15520 | 20 20 20 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 2d 63 6f 6e | ..........................(s-con |
| 15540 | 74 61 69 6e 73 3f 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 28 63 61 72 | tains?.(file-name-directory.(car |
| 15560 | 20 6c 69 62 29 29 20 75 72 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .lib)).url)).................... |
| 15580 | 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 29 | .......calibredb-library-alist)) |
| 155a0 | 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 72 65 71 75 65 73 74 2d 70 61 | ).....(calibredb-opds-request-pa |
| 155c0 | 67 65 20 28 66 6f 72 6d 61 74 20 22 25 73 2f 73 65 61 72 63 68 5c 3f 71 75 65 72 79 3d 25 73 22 | ge.(format."%s/search\?query=%s" |
| 155e0 | 20 75 72 6c 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 53 65 61 72 63 68 3a 20 22 29 29 20 | .url..(read-string."Search:.")). |
| 15600 | 28 6e 74 68 20 31 20 6c 69 62 72 61 72 79 29 20 28 6e 74 68 20 32 20 6c 69 62 72 61 72 79 29 29 | (nth.1.library).(nth.2.library)) |
| 15620 | 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 29 0a 0a 3b | ))..(provide.'calibredb-opds)..; |
| 15640 | 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 | ;;.calibredb-opds.el.ends.here.. |
| 15660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 156a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 156c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 156e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 15780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 15820 | 2d 6f 72 67 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 | -org.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 31 30 34 35 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 36 35 34 00 20 30 00 00 00 | 0010453.00000000000.015654..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 63 61 6c 69 62 72 65 64 62 2d 6f 72 67 2e 65 6c 20 2d 2d 2d 20 4f 72 67 20 6d 6f 64 | ;;;.calibredb-org.el.---.Org.mod |
| 15a20 | 65 20 73 75 70 70 6f 72 74 65 64 20 66 65 61 74 75 72 65 73 20 66 6f 72 20 63 61 6c 69 62 72 65 | e.supported.features.for.calibre |
| 15a40 | 64 62 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a 2d 0a 0a | db.-*-.lexical-binding:.t;.-*-.. |
| 15a60 | 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 32 30 20 44 61 6d 6f 6e 20 43 68 61 6e | ;;.Copyright.(C).2020.Damon.Chan |
| 15a80 | 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 44 61 6d 6f 6e 20 43 68 61 6e 20 3c 65 6c 65 63 6d 69 6e | ..;;.Author:.Damon.Chan.<elecmin |
| 15aa0 | 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 | g@gmail.com>.;;.URL:.https://git |
| 15ac0 | 68 75 62 2e 63 6f 6d 2f 63 68 65 6e 79 61 6e 6d 69 6e 67 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c | hub.com/chenyanming/calibredb.el |
| 15ae0 | 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 74 6f 6f 6c 73 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 | .;;.Keywords:.tools.;;.Version:. |
| 15b00 | 32 2e 31 32 2e 30 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 4e 4f 54 20 70 61 72 74 | 2.12.0..;;.This.file.is.NOT.part |
| 15b20 | 20 6f 66 20 47 4e 55 20 45 6d 61 63 73 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 | .of.GNU.Emacs...;;.This.program. |
| 15b40 | 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 | is.free.software;.you.can.redist |
| 15b60 | 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e | ribute.it.and/or.modify.;;.it.un |
| 15b80 | 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c | der.the.terms.of.the.GNU.General |
| 15ba0 | 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a | .Public.License.as.published.by. |
| 15bc0 | 3b 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c | ;;.the.Free.Software.Foundation, |
| 15be0 | 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 | .either.version.3.of.the.License |
| 15c00 | 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 | ,.or.;;.(at.your.option).any.lat |
| 15c20 | 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 | er.version...;;.This.program.is. |
| 15c40 | 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. |
| 15c60 | 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 | will.be.useful,.;;.but.WITHOUT.A |
| 15c80 | 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 69 6d | NY.WARRANTY;.without.even.the.im |
| 15ca0 | 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 | plied.warranty.of.;;.MERCHANTABI |
| 15cc0 | 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 55 4c 41 52 | LITY.or.FITNESS.FOR.A.PARTICULAR |
| 15ce0 | 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 | .PURPOSE...See.the.;;.GNU.Genera |
| 15d00 | 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c | l.Public.License.for.more.detail |
| 15d20 | 73 2e 0a 0a 3b 3b 20 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 | s...;;.You.should.have.received. |
| 15d40 | 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 | a.copy.of.the.GNU.General.Public |
| 15d60 | 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 | .License.;;.along.with.this.prog |
| 15d80 | 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 | ram...If.not,.see.<https://www.g |
| 15da0 | 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 6d 6d 65 6e 74 61 | nu.org/licenses/>...;;;.Commenta |
| 15dc0 | 72 79 3a 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 | ry:..;;;.Code:...(require.'calib |
| 15de0 | 72 65 64 62 2d 63 6f 72 65 29 0a 28 72 65 71 75 69 72 65 20 27 6f 6c 29 0a 0a 28 64 65 63 6c 61 | redb-core).(require.'ol)..(decla |
| 15e00 | 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 | re-function.calibredb-show-entry |
| 15e20 | 20 22 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 | ."calibredb-search.el").(declare |
| 15e40 | 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 6d 61 72 6b 65 64 2d | -function.calibredb-find-marked- |
| 15e60 | 63 61 6e 64 69 64 61 74 65 73 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 | candidates."calibredb-utils.el") |
| 15e80 | 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e | .(declare-function.calibredb-fin |
| 15ea0 | 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 20 22 63 61 6c 69 62 72 65 64 62 2d | d-candidate-at-point."calibredb- |
| 15ec0 | 75 74 69 6c 73 2e 65 6c 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 | utils.el")..;;;###autoload.(defu |
| 15ee0 | 6e 20 63 61 6c 69 62 72 65 64 62 2d 6f 72 67 2d 6c 69 6e 6b 2d 76 69 65 77 20 28 69 64 20 5f 29 | n.calibredb-org-link-view.(id._) |
| 15f00 | 0a 20 20 22 46 6f 6c 6c 6f 77 20 63 61 6c 69 62 72 65 64 62 20 6f 72 67 20 6c 69 6e 6b 73 20 62 | ..."Follow.calibredb.org.links.b |
| 15f20 | 79 20 49 44 2e 22 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 20 28 | y.ID."...(calibredb-show-entry.( |
| 15f40 | 63 64 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 64 61 74 65 20 69 64 29 29 29 29 | cdar.(calibredb-candidate.id)))) |
| 15f60 | 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 | ..;;;###autoload.(defun.calibred |
| 15f80 | 62 2d 6f 72 67 2d 63 6f 6d 70 6c 65 74 65 2d 6c 69 6e 6b 20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 | b-org-complete-link.(&optional.p |
| 15fa0 | 72 65 66 69 78 29 0a 20 20 22 44 65 66 69 6e 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 66 6f 72 20 | refix)..."Define.completion.for. |
| 15fc0 | 4f 72 67 20 5c 22 63 61 6c 69 62 72 65 64 62 3a 5c 22 20 6c 69 6e 6b 73 2e 0a 54 68 65 20 6f 70 | Org.\"calibredb:\".links..The.op |
| 15fe0 | 74 69 6f 6e 61 6c 20 50 52 45 46 49 58 20 61 72 67 75 6d 65 6e 74 20 69 73 20 69 67 6e 6f 72 65 | tional.PREFIX.argument.is.ignore |
| 16000 | 64 2e 0a 50 6c 65 61 73 65 20 6e 6f 74 69 63 65 3a 20 60 63 61 6c 69 62 72 65 64 62 2d 69 64 2d | d..Please.notice:.`calibredb-id- |
| 16020 | 77 69 64 74 68 27 20 6d 75 73 74 20 3e 3d 20 74 68 65 20 72 65 61 6c 20 69 64 20 6c 65 6e 74 68 | width'.must.>=.the.real.id.lenth |
| 16040 | 2e 22 0a 20 20 28 69 67 6e 6f 72 65 20 70 72 65 66 69 78 29 0a 20 20 28 6c 65 74 2a 20 28 28 63 | ."...(ignore.prefix)...(let*.((c |
| 16060 | 61 6e 64 69 64 61 74 65 73 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 | andidates.(if.calibredb-search-e |
| 16080 | 6e 74 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 | ntries....................calibr |
| 160a0 | 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | edb-search-entries.............. |
| 160c0 | 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 28 73 | ....(progn....................(s |
| 160e0 | 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 20 28 63 61 | etq.calibredb-search-entries.(ca |
| 16100 | 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 64 61 74 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | libredb-candidates))............ |
| 16120 | 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 | ........(setq.calibredb-full-ent |
| 16140 | 72 69 65 73 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 29 29 29 | ries.calibredb-search-entries))) |
| 16160 | 29 29 0a 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 63 6f 6e 73 75 6c 74 2d 2d 72 65 | )).....(if.(fboundp.'consult--re |
| 16180 | 61 64 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 | ad).........(if.candidates...... |
| 161a0 | 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 63 61 6e 64 20 28 63 6f 6e 73 75 6c 74 2d 2d 72 65 | .......(let*.((cand.(consult--re |
| 161c0 | 61 64 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ad.candidates................... |
| 161e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 6f 6d 70 74 20 22 50 | ......................:prompt."P |
| 16200 | 69 63 6b 20 61 20 62 6f 6f 6b 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ick.a.book:."................... |
| 16220 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 6f 6f 6b 75 70 20 23 27 | ......................:lookup.#' |
| 16240 | 63 6f 6e 73 75 6c 74 2d 2d 6c 6f 6f 6b 75 70 2d 63 64 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 | consult--lookup-cdr............. |
| 16260 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 6f 72 | ............................:sor |
| 16280 | 74 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 64 20 28 | t.nil))....................(id.( |
| 162a0 | 63 61 64 72 20 28 61 73 73 6f 63 20 3a 69 64 20 28 63 61 72 20 63 61 6e 64 20 29 29 20 29 29 29 | cadr.(assoc.:id.(car.cand.)).))) |
| 162c0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 66 6f 72 6d 61 74 20 22 | ...............(concat.(format." |
| 162e0 | 63 61 6c 69 62 72 65 64 62 3a 25 73 22 20 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 22 63 | calibredb:%s".id)))..........."c |
| 16300 | 61 6c 69 62 72 65 64 62 3a 22 29 0a 20 20 20 20 20 20 28 69 66 20 63 61 6e 64 69 64 61 74 65 73 | alibredb:").......(if.candidates |
| 16320 | 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 63 61 6e 64 20 28 63 6f 6d 70 6c 65 74 | ...........(let*.((cand.(complet |
| 16340 | 69 6e 67 2d 72 65 61 64 20 22 50 69 63 6b 20 61 20 62 6f 6f 6b 3a 20 22 20 63 61 6e 64 69 64 61 | ing-read."Pick.a.book:.".candida |
| 16360 | 74 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 64 2d 70 6f 69 6e 74 | tes))..................(id-point |
| 16380 | 20 28 74 65 78 74 2d 70 72 6f 70 65 72 74 79 2d 6e 6f 74 2d 61 6c 6c 20 30 20 28 6c 65 6e 67 74 | .(text-property-not-all.0.(lengt |
| 163a0 | 68 20 63 61 6e 64 29 20 27 69 64 20 6e 69 6c 20 63 61 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 | h.cand).'id.nil.cand)).......... |
| 163c0 | 20 20 20 20 20 20 20 20 28 69 64 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 69 | ........(id.(get-text-property.i |
| 163e0 | 64 2d 70 6f 69 6e 74 20 27 69 64 20 63 61 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | d-point.'id.cand)))............. |
| 16400 | 28 63 6f 6e 63 61 74 20 28 66 6f 72 6d 61 74 20 22 63 61 6c 69 62 72 65 64 62 3a 25 73 22 20 69 | (concat.(format."calibredb:%s".i |
| 16420 | 64 29 29 29 0a 20 20 20 20 20 20 20 20 22 63 61 6c 69 62 72 65 64 62 3a 22 29 29 29 29 0a 0a 0a | d)))........."calibredb:"))))... |
| 16440 | 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 6f 72 67 2d 69 6d 61 67 65 2d 64 61 74 61 2d | (defun.calibredb-org-image-data- |
| 16460 | 66 75 6e 20 28 5f 70 72 6f 74 6f 63 6f 6c 20 69 64 20 5f 64 65 73 63 72 69 70 74 69 6f 6e 29 0a | fun.(_protocol.id._description). |
| 16480 | 20 20 22 47 65 74 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 62 6f 6f 6b 20 49 44 20 63 6f 76 | .."Get.corresponding.book.ID.cov |
| 164a0 | 65 72 20 70 61 67 65 20 64 61 74 61 2e 0a 44 69 73 70 6c 61 79 20 63 6f 76 65 72 20 70 61 67 65 | er.page.data..Display.cover.page |
| 164c0 | 20 69 6e 6c 69 6e 65 20 69 6e 20 6f 72 67 20 62 75 66 66 65 72 2e 20 55 73 65 20 74 68 69 73 20 | .inline.in.org.buffer..Use.this. |
| 164e0 | 61 73 0a 3a 69 6d 61 67 65 2d 64 61 74 61 2d 66 75 6e 20 70 72 6f 70 65 72 74 79 20 69 6e 20 60 | as.:image-data-fun.property.in.` |
| 16500 | 6f 72 67 2d 6c 69 6e 6b 2d 70 72 6f 70 65 72 74 69 65 73 27 2e 20 53 65 65 0a 60 6f 72 67 2d 64 | org-link-properties'..See.`org-d |
| 16520 | 69 73 70 6c 61 79 2d 75 73 65 72 2d 69 6e 6c 69 6e 65 2d 69 6d 61 67 65 73 27 20 66 6f 72 20 61 | isplay-user-inline-images'.for.a |
| 16540 | 20 64 65 73 63 72 69 70 74 69 6f 6e 20 6f 66 0a 3a 69 6d 61 67 65 2d 64 61 74 61 2d 66 75 6e 2e | .description.of.:image-data-fun. |
| 16560 | 22 0a 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5b 30 2d 39 5d 2b 22 20 69 | "...(if.(string-match."[0-9]+".i |
| 16580 | 64 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 28 66 | d).......(with-current-buffer.(f |
| 165a0 | 69 6e 64 2d 66 69 6c 65 2d 6e 6f 73 65 6c 65 63 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 | ind-file-noselect.(calibredb-get |
| 165c0 | 2d 63 6f 76 65 72 20 28 63 64 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 64 61 74 | -cover.(cdar.(calibredb-candidat |
| 165e0 | 65 20 69 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 | e.id)))).........(buffer-substri |
| 16600 | 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e 74 2d | ng-no-properties.(point).(point- |
| 16620 | 6d 61 78 29 29 29 29 29 0a 0a 0a 3b 3b 20 60 6f 72 67 2d 64 69 73 70 6c 61 79 2d 75 73 65 72 2d | max)))))...;;.`org-display-user- |
| 16640 | 69 6e 6c 69 6e 65 2d 69 6d 61 67 65 73 27 20 69 73 20 66 72 6f 6d 20 70 61 63 6b 61 67 65 20 60 | inline-images'.is.from.package.` |
| 16660 | 6f 72 67 2d 79 74 27 0a 28 69 66 20 28 72 65 71 75 69 72 65 20 27 6f 72 67 2d 79 74 20 6e 69 6c | org-yt'.(if.(require.'org-yt.nil |
| 16680 | 20 27 6e 6f 65 72 72 6f 72 29 0a 20 20 20 20 28 6f 72 67 2d 6c 69 6e 6b 2d 73 65 74 2d 70 61 72 | .'noerror).....(org-link-set-par |
| 166a0 | 61 6d 65 74 65 72 73 0a 20 20 20 20 20 22 63 61 6c 69 62 72 65 64 62 22 0a 20 20 20 20 20 3a 66 | ameters......"calibredb"......:f |
| 166c0 | 6f 6c 6c 6f 77 20 23 27 63 61 6c 69 62 72 65 64 62 2d 6f 72 67 2d 6c 69 6e 6b 2d 76 69 65 77 0a | ollow.#'calibredb-org-link-view. |
| 166e0 | 20 20 20 20 20 3a 63 6f 6d 70 6c 65 74 65 20 23 27 63 61 6c 69 62 72 65 64 62 2d 6f 72 67 2d 63 | .....:complete.#'calibredb-org-c |
| 16700 | 6f 6d 70 6c 65 74 65 2d 6c 69 6e 6b 0a 20 20 20 20 20 3a 69 6d 61 67 65 2d 64 61 74 61 2d 66 75 | omplete-link......:image-data-fu |
| 16720 | 6e 20 23 27 63 61 6c 69 62 72 65 64 62 2d 6f 72 67 2d 69 6d 61 67 65 2d 64 61 74 61 2d 66 75 6e | n.#'calibredb-org-image-data-fun |
| 16740 | 29 0a 20 20 28 6f 72 67 2d 6c 69 6e 6b 2d 73 65 74 2d 70 61 72 61 6d 65 74 65 72 73 0a 20 20 20 | )...(org-link-set-parameters.... |
| 16760 | 22 63 61 6c 69 62 72 65 64 62 22 0a 20 20 20 3a 66 6f 6c 6c 6f 77 20 23 27 63 61 6c 69 62 72 65 | "calibredb"....:follow.#'calibre |
| 16780 | 64 62 2d 6f 72 67 2d 6c 69 6e 6b 2d 76 69 65 77 0a 20 20 20 3a 63 6f 6d 70 6c 65 74 65 20 23 27 | db-org-link-view....:complete.#' |
| 167a0 | 63 61 6c 69 62 72 65 64 62 2d 6f 72 67 2d 63 6f 6d 70 6c 65 74 65 2d 6c 69 6e 6b 29 29 0a 0a 0a | calibredb-org-complete-link))... |
| 167c0 | 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 6f 72 67 2d 6c 69 6e 6b 2d 63 6f 70 79 20 28 | (defun.calibredb-org-link-copy.( |
| 167e0 | 29 0a 20 20 22 43 6f 70 79 20 74 68 65 20 6d 61 72 6b 65 64 20 69 74 65 6d 73 20 61 73 20 63 61 | )..."Copy.the.marked.items.as.ca |
| 16800 | 6c 69 62 72 65 64 62 20 6f 72 67 20 6c 69 6e 6b 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 | libredb.org.links."...(interacti |
| 16820 | 76 65 29 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 | ve)...(let.((candidates.(calibre |
| 16840 | 64 62 2d 66 69 6e 64 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 73 29 29 29 0a 20 20 20 | db-find-marked-candidates))).... |
| 16860 | 20 28 75 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 28 73 65 74 71 20 | .(unless.candidates.......(setq. |
| 16880 | 63 61 6e 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 | candidates.(calibredb-find-candi |
| 168a0 | 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 6b 69 6c 6c 2d 6e 65 77 0a 20 | date-at-point))).....(kill-new.. |
| 168c0 | 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 28 64 6f | ....(with-temp-buffer........(do |
| 168e0 | 6c 69 73 74 20 28 63 61 6e 64 20 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 | list.(cand.candidates).......... |
| 16900 | 28 6c 65 74 20 28 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e | (let.((id.(calibredb-getattr.can |
| 16920 | 64 20 3a 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 28 63 | d.:id))................(title.(c |
| 16940 | 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 3a 62 6f 6f 6b 2d 74 69 74 6c | alibredb-getattr.cand.:book-titl |
| 16960 | 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 | e)))............(insert.(format. |
| 16980 | 22 5b 5b 63 61 6c 69 62 72 65 64 62 3a 25 73 5d 5b 25 73 5d 5d 5c 6e 22 20 69 64 20 74 69 74 6c | "[[calibredb:%s][%s]]\n".id.titl |
| 169a0 | 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 43 6f 70 69 65 64 3a | e))............(message."Copied: |
| 169c0 | 20 25 73 20 2d 20 5c 22 25 73 5c 22 20 61 73 20 63 61 6c 69 62 72 65 64 62 20 6f 72 67 20 6c 69 | .%s.-.\"%s\".as.calibredb.org.li |
| 169e0 | 6e 6b 2e 22 20 69 64 20 74 69 74 6c 65 29 29 29 0a 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d | nk.".id.title)))........(buffer- |
| 16a00 | 73 74 72 69 6e 67 29 29 29 0a 20 20 20 20 3b 3b 20 72 65 6d 6f 76 65 20 6f 76 65 72 6c 61 79 73 | string))).....;;.remove.overlays |
| 16a20 | 20 61 6e 64 20 74 65 78 74 20 70 72 6f 70 65 72 74 69 65 73 0a 20 20 20 20 28 6c 65 74 2a 20 28 | .and.text.properties.....(let*.( |
| 16a40 | 28 62 65 67 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 65 6e | (beg.(point-min))............(en |
| 16a60 | 64 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 28 69 6e 68 69 62 | d.(point-max))............(inhib |
| 16a80 | 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 20 20 28 72 65 6d 6f 76 65 2d 6f | it-read-only.t)).......(remove-o |
| 16aa0 | 76 65 72 6c 61 79 73 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20 20 20 28 72 65 6d 6f 76 65 2d 74 | verlays.beg.end).......(remove-t |
| 16ac0 | 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 62 65 67 20 65 6e 64 20 27 28 63 61 6c 69 62 72 65 | ext-properties.beg.end.'(calibre |
| 16ae0 | 64 62 2d 6d 61 72 6b 20 6e 69 6c 29 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 | db-mark.nil)))))..(provide.'cali |
| 16b00 | 62 72 65 64 62 2d 6f 72 67 29 0a 0a 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 6f 72 67 2e 65 6c | bredb-org)..;;;.calibredb-org.el |
| 16b20 | 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...................... |
| 16b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16c00 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 16c20 | 2d 70 6b 67 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 | -pkg.el......................... |
| 16c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16c60 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| 16c80 | 30 30 30 31 30 35 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 36 34 35 00 20 30 00 00 00 | 0001056.00000000000.015645..0... |
| 16ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16d00 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 16d20 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 16d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 16e00 | 28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 22 63 61 6c 69 62 72 65 64 62 22 20 22 32 30 32 | (define-package."calibredb"."202 |
| 16e20 | 34 30 33 33 31 2e 34 30 39 22 20 22 59 65 74 20 61 6e 6f 74 68 65 72 20 63 61 6c 69 62 72 65 20 | 40331.409"."Yet.another.calibre. |
| 16e40 | 63 6c 69 65 6e 74 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 | client"...'((emacs."25.1").....( |
| 16e60 | 6f 72 67 20 22 39 2e 33 22 29 0a 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 20 22 30 2e 31 2e 30 | org."9.3").....(transient."0.1.0 |
| 16e80 | 22 29 0a 20 20 20 20 28 73 20 22 31 2e 31 32 2e 30 22 29 0a 20 20 20 20 28 64 61 73 68 20 22 32 | ").....(s."1.12.0").....(dash."2 |
| 16ea0 | 2e 31 37 2e 30 22 29 0a 20 20 20 20 28 72 65 71 75 65 73 74 20 22 30 2e 33 2e 33 22 29 0a 20 20 | .17.0").....(request."0.3.3")... |
| 16ec0 | 20 20 28 65 73 78 6d 6c 20 22 30 2e 33 2e 37 22 29 29 0a 20 20 3a 63 6f 6d 6d 69 74 20 22 62 35 | ..(esxml."0.3.7"))...:commit."b5 |
| 16ee0 | 32 36 30 39 35 65 34 62 31 63 37 38 36 36 39 35 38 66 65 35 33 35 31 38 65 62 38 39 37 61 38 63 | 26095e4b1c7866958fe53518eb897a8c |
| 16f00 | 38 37 61 31 39 62 22 20 3a 61 75 74 68 6f 72 73 0a 20 20 27 28 28 22 44 61 6d 6f 6e 20 43 68 61 | 87a19b".:authors...'(("Damon.Cha |
| 16f20 | 6e 22 20 2e 20 22 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 0a 20 20 3a 6d | n"..."elecming@gmail.com"))...:m |
| 16f40 | 61 69 6e 74 61 69 6e 65 72 73 0a 20 20 27 28 28 22 44 61 6d 6f 6e 20 43 68 61 6e 22 20 2e 20 22 | aintainers...'(("Damon.Chan"..." |
| 16f60 | 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 | elecming@gmail.com"))...:maintai |
| 16f80 | 6e 65 72 0a 20 20 27 28 22 44 61 6d 6f 6e 20 43 68 61 6e 22 20 2e 20 22 65 6c 65 63 6d 69 6e 67 | ner...'("Damon.Chan"..."elecming |
| 16fa0 | 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 0a 20 20 3a 6b 65 79 77 6f 72 64 73 0a 20 20 27 28 22 74 6f | @gmail.com")...:keywords...'("to |
| 16fc0 | 6f 6c 73 22 29 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 | ols")...:url."https://github.com |
| 16fe0 | 2f 63 68 65 6e 79 61 6e 6d 69 6e 67 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c 22 29 0a 3b 3b 20 4c | /chenyanming/calibredb.el").;;.L |
| 17000 | 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 | ocal.Variables:.;;.no-byte-compi |
| 17020 | 6c 65 3a 20 74 0a 3b 3b 20 45 6e 64 3a 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | le:.t.;;.End:................... |
| 17040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17060 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 170a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 170c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 170e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 171a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 171c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 171e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17200 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 17220 | 2d 73 65 61 72 63 68 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 | -search.el...................... |
| 17240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17260 | 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 |
| 17280 | 30 31 34 30 33 30 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 33 33 34 00 20 30 00 00 00 | 0140307.00000000000.016334..0... |
| 172a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 172c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 172e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17300 | 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................... |
| 17320 | 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................... |
| 17340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 173a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 173c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 173e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 17400 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2e 65 6c 20 2d 2d 2d 20 42 6f 6f 6b | ;;;.calibredb-search.el.---.Book |
| 17420 | 73 20 73 65 61 72 63 68 20 62 75 66 66 65 72 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a | s.search.buffer.for.calibredb.-* |
| 17440 | 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f | -.lexical-binding:.t;.-*-..;;.Co |
| 17460 | 70 79 72 69 67 68 74 20 28 43 29 20 32 30 32 30 20 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 | pyright.(C).2020.Damon.Chan..;;. |
| 17480 | 41 75 74 68 6f 72 3a 20 44 61 6d 6f 6e 20 43 68 61 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 | Author:.Damon.Chan.<elecming@gma |
| 174a0 | 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 | il.com>.;;.URL:.https://github.c |
| 174c0 | 6f 6d 2f 63 68 65 6e 79 61 6e 6d 69 6e 67 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b | om/chenyanming/calibredb.el.;;.K |
| 174e0 | 65 79 77 6f 72 64 73 3a 20 74 6f 6f 6c 73 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e | eywords:.tools.;;.Version:.2.12. |
| 17500 | 30 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 | 0..;;.This.file.is.NOT.part.of.G |
| 17520 | 4e 55 20 45 6d 61 63 73 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 | NU.Emacs...;;.This.program.is.fr |
| 17540 | 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 | ee.software;.you.can.redistribut |
| 17560 | 65 20 69 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 | e.it.and/or.modify.;;.it.under.t |
| 17580 | 68 65 20 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 | he.terms.of.the.GNU.General.Publ |
| 175a0 | 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 | ic.License.as.published.by.;;.th |
| 175c0 | 65 20 46 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 | e.Free.Software.Foundation,.eith |
| 175e0 | 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 0a | er.version.3.of.the.License,.or. |
| 17600 | 3b 3b 20 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 | ;;.(at.your.option).any.later.ve |
| 17620 | 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 | rsion...;;.This.program.is.distr |
| 17640 | 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 77 69 6c 6c 20 | ibuted.in.the.hope.that.it.will. |
| 17660 | 62 65 20 75 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 | be.useful,.;;.but.WITHOUT.ANY.WA |
| 17680 | 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 69 6d 70 6c 69 65 64 | RRANTY;.without.even.the.implied |
| 176a0 | 20 77 61 72 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 | .warranty.of.;;.MERCHANTABILITY. |
| 176c0 | 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 | or.FITNESS.FOR.A.PARTICULAR.PURP |
| 176e0 | 4f 53 45 2e 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 | OSE...See.the.;;.GNU.General.Pub |
| 17700 | 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b | lic.License.for.more.details...; |
| 17720 | 3b 20 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 | ;.You.should.have.received.a.cop |
| 17740 | 79 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 | y.of.the.GNU.General.Public.Lice |
| 17760 | 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 | nse.;;.along.with.this.program.. |
| 17780 | 20 49 66 20 6e 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 | .If.not,.see.<https://www.gnu.or |
| 177a0 | 67 2f 6c 69 63 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 | g/licenses/>...;;;.Commentary:.. |
| 177c0 | 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 | ;;;.Code:..(require.'calibredb-c |
| 177e0 | 6f 72 65 29 0a 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 | ore)..(eval-when-compile.(defvar |
| 17800 | 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 29 29 0a 28 65 76 61 6c 2d 77 68 | .calibredb-show-entry)).(eval-wh |
| 17820 | 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f | en-compile.(defvar.calibredb-sho |
| 17840 | 77 2d 65 6e 74 72 79 2d 73 77 69 74 63 68 29 29 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 | w-entry-switch)).(eval-when-comp |
| 17860 | 69 6c 65 20 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 | ile.(defvar.calibredb-virtual-li |
| 17880 | 62 72 61 72 79 2d 61 6c 69 73 74 29 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e | brary-alist))..(declare-function |
| 178a0 | 20 63 61 6c 69 62 72 65 64 62 20 22 63 61 6c 69 62 72 65 64 62 2e 65 6c 22 29 0a 28 64 65 63 6c | .calibredb."calibredb.el").(decl |
| 178c0 | 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 | are-function.calibredb-find-file |
| 178e0 | 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d | ."calibredb-utils.el").(declare- |
| 17900 | 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 61 64 64 20 22 63 61 6c 69 62 72 65 64 | function.calibredb-add."calibred |
| 17920 | 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 | b-utils.el").(declare-function.c |
| 17940 | 61 6c 69 62 72 65 64 62 2d 61 64 64 2d 64 69 72 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c | alibredb-add-dir."calibredb-util |
| 17960 | 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 | s.el").(declare-function.calibre |
| 17980 | 64 62 2d 63 6c 6f 6e 65 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 | db-clone."calibredb-utils.el").( |
| 179a0 | 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 72 65 6d 6f 76 | declare-function.calibredb-remov |
| 179c0 | 65 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 | e."calibredb-utils.el").(declare |
| 179e0 | 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 72 65 6d 6f 76 65 2d 6d 61 72 6b 65 | -function.calibredb-remove-marke |
| 17a00 | 64 2d 69 74 65 6d 73 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 | d-items."calibredb-utils.el").(d |
| 17a20 | 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 77 69 74 63 68 | eclare-function.calibredb-switch |
| 17a40 | 2d 6c 69 62 72 61 72 79 20 22 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2e 65 6c 22 29 | -library."calibredb-library.el") |
| 17a60 | 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 | .(declare-function.calibredb-lib |
| 17a80 | 72 61 72 79 2d 6c 69 73 74 20 22 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2e 65 6c 22 | rary-list."calibredb-library.el" |
| 17aa0 | 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 | ).(declare-function.calibredb-li |
| 17ac0 | 62 72 61 72 79 2d 6e 65 78 74 20 22 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2e 65 6c | brary-next."calibredb-library.el |
| 17ae0 | 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 6c | ").(declare-function.calibredb-l |
| 17b00 | 69 62 72 61 72 79 2d 70 72 65 76 69 6f 75 73 20 22 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 | ibrary-previous."calibredb-libra |
| 17b20 | 72 79 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 | ry.el").(declare-function.calibr |
| 17b40 | 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 64 69 73 70 61 74 63 68 20 22 63 61 6c 69 62 | edb-set-metadata-dispatch."calib |
| 17b60 | 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e | redb-transient.el").(declare-fun |
| 17b80 | 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d | ction.calibredb-find-file-other- |
| 17ba0 | 66 72 61 6d 65 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 | frame."calibredb-utils.el").(dec |
| 17bc0 | 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 66 69 6c | lare-function.calibredb-open-fil |
| 17be0 | 65 2d 77 69 74 68 2d 64 65 66 61 75 6c 74 2d 74 6f 6f 6c 20 22 63 61 6c 69 62 72 65 64 62 2d 75 | e-with-default-tool."calibredb-u |
| 17c00 | 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 | tils.el").(declare-function.cali |
| 17c20 | 62 72 65 64 62 2d 6f 70 65 6e 2d 64 69 72 65 64 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c | bredb-open-dired."calibredb-util |
| 17c40 | 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 | s.el").(declare-function.calibre |
| 17c60 | 64 62 2d 63 61 74 61 6c 6f 67 2d 62 69 62 2d 64 69 73 70 61 74 63 68 20 22 63 61 6c 69 62 72 65 | db-catalog-bib-dispatch."calibre |
| 17c80 | 64 62 2d 74 72 61 6e 73 69 65 6e 74 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 | db-transient.el").(declare-funct |
| 17ca0 | 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f 72 74 2d 64 69 73 70 61 74 63 68 20 22 63 | ion.calibredb-export-dispatch."c |
| 17cc0 | 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 | alibredb-transient.el").(declare |
| 17ce0 | 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 | -function.calibredb-edit-annotat |
| 17d00 | 69 6f 6e 20 22 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2e 65 6c 22 29 0a 28 | ion."calibredb-annotation.el").( |
| 17d20 | 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d | declare-function.calibredb-set-m |
| 17d40 | 65 74 61 64 61 74 61 2d 2d 74 61 67 73 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 | etadata--tags."calibredb-utils.e |
| 17d60 | 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d | l").(declare-function.calibredb- |
| 17d80 | 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 61 75 74 68 6f 72 5f 73 6f 72 74 20 22 63 61 6c 69 62 | set-metadata--author_sort."calib |
| 17da0 | 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f | redb-utils.el").(declare-functio |
| 17dc0 | 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 61 75 74 68 6f 72 | n.calibredb-set-metadata--author |
| 17de0 | 73 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 | s."calibredb-utils.el").(declare |
| 17e00 | 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 | -function.calibredb-set-metadata |
| 17e20 | 2d 2d 74 69 74 6c 65 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 | --title."calibredb-utils.el").(d |
| 17e40 | 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 | eclare-function.calibredb-set-me |
| 17e60 | 74 61 64 61 74 61 2d 2d 63 6f 6d 6d 65 6e 74 73 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c | tadata--comments."calibredb-util |
| 17e80 | 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 | s.el").(declare-function.calibre |
| 17ea0 | 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 68 65 61 64 65 72 20 22 63 61 6c 69 62 | db-edit-annotation-header."calib |
| 17ec0 | 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 | redb-annotation.el").(declare-fu |
| 17ee0 | 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 65 72 2d 6e 61 | nction.calibredb-show--buffer-na |
| 17f00 | 6d 65 20 22 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 | me."calibredb-show.el").(declare |
| 17f20 | 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 | -function.calibredb-insert-image |
| 17f40 | 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d | ."calibredb-utils.el").(declare- |
| 17f60 | 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 6f 64 65 20 22 63 61 | function.calibredb-show-mode."ca |
| 17f80 | 6c 69 62 72 65 64 62 2d 73 68 6f 77 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 | libredb-show.el").(declare-funct |
| 17fa0 | 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 | ion.calibredb-find-marked-candid |
| 17fc0 | 61 74 65 73 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c | ates."calibredb-utils.el").(decl |
| 17fe0 | 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 72 65 61 64 2d 6d 65 74 61 | are-function.calibredb-read-meta |
| 18000 | 64 61 74 61 73 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 | datas."calibredb-utils.el").(dec |
| 18020 | 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e | lare-function.calibredb-find-can |
| 18040 | 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 | didate-at-point."calibredb-utils |
| 18060 | 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 | .el").(declare-function.calibred |
| 18080 | 62 2d 73 68 6f 77 2d 72 65 66 72 65 73 68 20 22 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2e 65 | b-show-refresh."calibredb-show.e |
| 180a0 | 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d | l").(declare-function.calibredb- |
| 180c0 | 67 65 74 2d 69 6e 69 74 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 | get-init."calibredb-utils.el").( |
| 180e0 | 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 | declare-function.calibredb-virtu |
| 18100 | 61 6c 2d 6c 69 62 72 61 72 79 2d 6c 69 73 74 20 22 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 | al-library-list."calibredb-libra |
| 18120 | 72 79 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 | ry.el").(declare-function.calibr |
| 18140 | 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 6e 65 78 74 20 22 63 61 6c 69 62 72 | edb-virtual-library-next."calibr |
| 18160 | 65 64 62 2d 6c 69 62 72 61 72 79 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 | edb-library.el").(declare-functi |
| 18180 | 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 70 72 65 | on.calibredb-virtual-library-pre |
| 181a0 | 76 69 6f 75 73 20 22 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2e 65 6c 22 29 0a 0a 28 | vious."calibredb-library.el")..( |
| 181c0 | 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 | defcustom.calibredb-search-filte |
| 181e0 | 72 20 22 22 0a 20 20 22 51 75 65 72 79 20 73 74 72 69 6e 67 20 66 69 6c 74 65 72 69 6e 67 20 73 | r.""..."Query.string.filtering.s |
| 18200 | 68 6f 77 6e 20 65 6e 74 72 69 65 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 | hown.entries."...:group.'calibre |
| 18220 | 64 62 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c | db...:type.'string)..(defvar.cal |
| 18240 | 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 20 6e 69 6c 0a 20 20 22 4c 69 73 74 20 | ibredb-full-entries.nil..."List. |
| 18260 | 6f 66 20 74 68 65 20 61 6c 6c 20 65 6e 74 72 69 65 73 20 63 75 72 72 65 6e 74 6c 79 20 6f 6e 20 | of.the.all.entries.currently.on. |
| 18280 | 6c 69 62 72 61 72 79 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 73 65 | library.")..(defvar.calibredb-se |
| 182a0 | 61 72 63 68 2d 65 6e 74 72 69 65 73 20 6e 69 6c 0a 20 20 22 4c 69 73 74 20 6f 66 20 74 68 65 20 | arch-entries.nil..."List.of.the. |
| 182c0 | 65 6e 74 72 69 65 73 20 63 75 72 72 65 6e 74 6c 79 20 6f 6e 20 64 69 73 70 6c 61 79 2e 22 29 0a | entries.currently.on.display."). |
| 182e0 | 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 72 | .(defvar.calibredb-search-filter |
| 18300 | 2d 61 63 74 69 76 65 20 6e 69 6c 0a 20 20 22 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 63 61 6c | -active.nil..."When.non-nil,.cal |
| 18320 | 69 62 72 65 64 62 20 69 73 20 63 75 72 72 65 6e 74 6c 79 20 72 65 61 64 69 6e 67 20 61 20 66 69 | ibredb.is.currently.reading.a.fi |
| 18340 | 6c 74 65 72 20 66 72 6f 6d 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 2e 0a 57 68 65 6e 20 6c | lter.from.the.minibuffer..When.l |
| 18360 | 69 76 65 20 65 64 69 74 69 6e 67 20 74 68 65 20 66 69 6c 74 65 72 2c 20 69 74 20 69 73 20 62 6f | ive.editing.the.filter,.it.is.bo |
| 18380 | 75 6e 64 20 74 6f 20 3a 6c 69 76 65 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 | und.to.:live.")..(defvar.calibre |
| 183a0 | 64 62 2d 73 65 61 72 63 68 2d 6c 61 73 74 2d 75 70 64 61 74 65 20 30 0a 20 20 22 54 68 65 20 6c | db-search-last-update.0..."The.l |
| 183c0 | 61 73 74 20 74 69 6d 65 20 74 68 65 20 62 75 66 66 65 72 20 77 61 73 20 72 65 64 72 61 77 6e 20 | ast.time.the.buffer.was.redrawn. |
| 183e0 | 69 6e 20 65 70 6f 63 68 20 73 65 63 6f 6e 64 73 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c | in.epoch.seconds.")..(defvar.cal |
| 18400 | 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 70 72 69 6e 74 2d 65 6e 74 72 79 2d 66 75 6e 63 74 69 | ibredb-search-print-entry-functi |
| 18420 | 6f 6e 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 70 72 69 6e 74 2d 65 6e 74 72 | on.#'calibredb-search-print-entr |
| 18440 | 79 2d 2d 64 65 66 61 75 6c 74 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 74 6f 20 70 72 69 6e 74 20 | y--default..."Function.to.print. |
| 18460 | 65 6e 74 72 69 65 73 20 69 6e 74 6f 20 74 68 65 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 | entries.into.the.*calibredb-sear |
| 18480 | 63 68 2a 20 62 75 66 66 65 72 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 | ch*.buffer.")..(defvar.calibredb |
| 184a0 | 2d 74 61 67 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 | -tag-filter-p.nil).(defvar.calib |
| 184c0 | 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 28 64 65 66 | redb-favorite-filter-p.nil).(def |
| 184e0 | 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 20 6e 69 | var.calibredb-author-filter-p.ni |
| 18500 | 6c 29 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 69 6c 74 65 72 | l).(defvar.calibredb-date-filter |
| 18520 | 2d 70 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 | -p.nil).(defvar.calibredb-format |
| 18540 | 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 | -filter-p.nil)..(defvar.calibred |
| 18560 | 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 28 6c 65 74 20 28 28 6d 61 70 20 28 | b-search-mode-map...(let.((map.( |
| 18580 | 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 29 0a 20 20 20 20 28 64 65 66 69 6e | make-sparse-keymap))).....(defin |
| 185a0 | 65 2d 6b 65 79 20 6d 61 70 20 5b 6d 6f 75 73 65 2d 33 5d 20 23 27 63 61 6c 69 62 72 65 64 62 2d | e-key.map.[mouse-3].#'calibredb- |
| 185c0 | 73 65 61 72 63 68 2d 6d 6f 75 73 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 | search-mouse).....(define-key.ma |
| 185e0 | 70 20 28 6b 62 64 20 22 3c 52 45 54 3e 22 29 20 23 27 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 | p.(kbd."<RET>").#'calibredb-find |
| 18600 | 2d 66 69 6c 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 3f 22 20 23 | -file).....(define-key.map."?".# |
| 18620 | 27 63 61 6c 69 62 72 65 64 62 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 64 65 66 69 6e 65 | 'calibredb-dispatch).....(define |
| 18640 | 2d 6b 65 79 20 6d 61 70 20 22 61 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 61 64 64 29 0a 20 20 | -key.map."a".#'calibredb-add)... |
| 18660 | 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 41 22 20 23 27 63 61 6c 69 62 72 65 64 | ..(define-key.map."A".#'calibred |
| 18680 | 62 2d 61 64 64 2d 64 69 72 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 | b-add-dir).....(define-key.map." |
| 186a0 | 63 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 63 6c 6f 6e 65 29 0a 20 20 20 20 28 64 65 66 69 6e | c".#'calibredb-clone).....(defin |
| 186c0 | 65 2d 6b 65 79 20 6d 61 70 20 22 64 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 72 65 6d 6f 76 65 | e-key.map."d".#'calibredb-remove |
| 186e0 | 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 44 22 20 23 27 63 61 6c 69 | ).....(define-key.map."D".#'cali |
| 18700 | 62 72 65 64 62 2d 72 65 6d 6f 76 65 2d 6d 61 72 6b 65 64 2d 69 74 65 6d 73 29 0a 20 20 20 20 28 | bredb-remove-marked-items).....( |
| 18720 | 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 6a 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 6e | define-key.map."j".#'calibredb-n |
| 18740 | 65 78 74 2d 65 6e 74 72 79 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 | ext-entry).....(define-key.map." |
| 18760 | 6b 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 70 72 65 76 69 6f 75 73 2d 65 6e 74 72 79 29 0a 20 | k".#'calibredb-previous-entry).. |
| 18780 | 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 6c 22 20 23 27 63 61 6c 69 62 72 65 | ...(define-key.map."l".#'calibre |
| 187a0 | 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 6c 69 73 74 29 0a 20 20 20 20 28 64 65 | db-virtual-library-list).....(de |
| 187c0 | 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 4c 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 | fine-key.map."L".#'calibredb-lib |
| 187e0 | 72 61 72 79 2d 6c 69 73 74 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 | rary-list).....(define-key.map." |
| 18800 | 6e 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 6e | n".#'calibredb-virtual-library-n |
| 18820 | 65 78 74 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 4e 22 20 23 27 63 | ext).....(define-key.map."N".#'c |
| 18840 | 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 6e 65 78 74 29 0a 20 20 20 20 28 64 65 66 69 | alibredb-library-next).....(defi |
| 18860 | 6e 65 2d 6b 65 79 20 6d 61 70 20 22 70 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 | ne-key.map."p".#'calibredb-virtu |
| 18880 | 61 6c 2d 6c 69 62 72 61 72 79 2d 70 72 65 76 69 6f 75 73 29 0a 20 20 20 20 28 64 65 66 69 6e 65 | al-library-previous).....(define |
| 188a0 | 2d 6b 65 79 20 6d 61 70 20 22 50 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 | -key.map."P".#'calibredb-library |
| 188c0 | 2d 70 72 65 76 69 6f 75 73 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 | -previous).....(define-key.map." |
| 188e0 | 73 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 64 69 73 70 | s".#'calibredb-set-metadata-disp |
| 18900 | 61 74 63 68 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 53 22 20 23 27 | atch).....(define-key.map."S".#' |
| 18920 | 63 61 6c 69 62 72 65 64 62 2d 73 77 69 74 63 68 2d 6c 69 62 72 61 72 79 29 0a 20 20 20 20 28 64 | calibredb-switch-library).....(d |
| 18940 | 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 67 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 66 69 | efine-key.map."g".#'calibredb-fi |
| 18960 | 6c 74 65 72 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d | lter-dispatch).....(define-key.m |
| 18980 | 61 70 20 22 6f 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 64 69 73 70 61 74 63 68 | ap."o".#'calibredb-sort-dispatch |
| 189a0 | 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 4f 22 20 23 27 63 61 6c 69 | ).....(define-key.map."O".#'cali |
| 189c0 | 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 66 72 61 6d 65 29 0a 20 20 20 | bredb-find-file-other-frame).... |
| 189e0 | 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 76 22 20 23 27 63 61 6c 69 62 72 65 64 62 | .(define-key.map."v".#'calibredb |
| 18a00 | 2d 76 69 65 77 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 56 22 20 23 | -view).....(define-key.map."V".# |
| 18a20 | 27 63 61 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 66 69 6c 65 2d 77 69 74 68 2d 64 65 66 61 75 6c | 'calibredb-open-file-with-defaul |
| 18a40 | 74 2d 74 6f 6f 6c 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 2c 22 20 | t-tool).....(define-key.map.",". |
| 18a60 | 23 27 63 61 6c 69 62 72 65 64 62 2d 71 75 69 63 6b 2d 6c 6f 6f 6b 29 0a 20 20 20 20 28 64 65 66 | #'calibredb-quick-look).....(def |
| 18a80 | 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 2e 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 64 69 72 65 | ine-key.map.".".#'calibredb-dire |
| 18aa0 | 64 2d 6f 70 65 6e 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 79 22 20 | d-open).....(define-key.map."y". |
| 18ac0 | 23 27 63 61 6c 69 62 72 65 64 62 2d 79 61 6e 6b 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 | #'calibredb-yank-dispatch).....( |
| 18ae0 | 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 62 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 63 | define-key.map."b".#'calibredb-c |
| 18b00 | 61 74 61 6c 6f 67 2d 62 69 62 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 64 65 66 69 6e 65 | atalog-bib-dispatch).....(define |
| 18b20 | 2d 6b 65 79 20 6d 61 70 20 22 65 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f 72 74 2d | -key.map."e".#'calibredb-export- |
| 18b40 | 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 72 | dispatch).....(define-key.map."r |
| 18b60 | 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 61 6e 64 | ".#'calibredb-search-refresh-and |
| 18b80 | 2d 63 6c 65 61 72 2d 66 69 6c 74 65 72 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d | -clear-filter).....(define-key.m |
| 18ba0 | 61 70 20 22 52 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 63 6c 65 61 72 2d | ap."R".#'calibredb-search-clear- |
| 18bc0 | 66 69 6c 74 65 72 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 71 22 20 | filter).....(define-key.map."q". |
| 18be0 | 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 71 75 69 74 29 0a 20 20 20 20 28 64 65 | #'calibredb-search-quit).....(de |
| 18c00 | 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 6d 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 6d 61 72 | fine-key.map."m".#'calibredb-mar |
| 18c20 | 6b 2d 61 6e 64 2d 66 6f 72 77 61 72 64 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d | k-and-forward).....(define-key.m |
| 18c40 | 61 70 20 22 2a 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 66 61 76 6f 72 69 | ap."*".#'calibredb-toggle-favori |
| 18c60 | 74 65 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 | te-at-point).....(define-key.map |
| 18c80 | 20 22 78 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 61 72 63 68 69 76 65 2d | ."x".#'calibredb-toggle-archive- |
| 18ca0 | 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 68 | at-point).....(define-key.map."h |
| 18cc0 | 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 68 69 67 68 6c 69 67 68 74 2d 61 | ".#'calibredb-toggle-highlight-a |
| 18ce0 | 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 75 22 | t-point).....(define-key.map."u" |
| 18d00 | 20 23 27 63 61 6c 69 62 72 65 64 62 2d 75 6e 6d 61 72 6b 2d 61 6e 64 2d 66 6f 72 77 61 72 64 29 | .#'calibredb-unmark-and-forward) |
| 18d20 | 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 69 22 20 23 27 63 61 6c 69 62 | .....(define-key.map."i".#'calib |
| 18d40 | 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 29 0a 20 20 20 20 28 64 65 66 69 6e | redb-edit-annotation).....(defin |
| 18d60 | 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 3c 44 45 4c 3e 22 29 20 23 27 63 61 6c 69 62 72 | e-key.map.(kbd."<DEL>").#'calibr |
| 18d80 | 65 64 62 2d 75 6e 6d 61 72 6b 2d 61 6e 64 2d 62 61 63 6b 77 61 72 64 29 0a 20 20 20 20 28 64 65 | edb-unmark-and-backward).....(de |
| 18da0 | 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 3c 62 61 63 6b 74 61 62 3e 22 29 20 23 | fine-key.map.(kbd."<backtab>").# |
| 18dc0 | 27 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 76 69 65 77 29 0a 20 20 20 20 28 64 65 66 | 'calibredb-toggle-view).....(def |
| 18de0 | 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 54 41 42 22 29 20 23 27 63 61 6c 69 62 72 | ine-key.map.(kbd."TAB").#'calibr |
| 18e00 | 65 64 62 2d 74 6f 67 67 6c 65 2d 76 69 65 77 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 28 64 | edb-toggle-view-at-point).....(d |
| 18e20 | 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5c 4d 2d 6e 22 20 23 27 63 61 6c 69 62 72 65 64 62 | efine-key.map."\M-n".#'calibredb |
| 18e40 | 2d 73 68 6f 77 2d 6e 65 78 74 2d 65 6e 74 72 79 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 | -show-next-entry).....(define-ke |
| 18e60 | 79 20 6d 61 70 20 22 5c 4d 2d 70 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 70 72 | y.map."\M-p".#'calibredb-show-pr |
| 18e80 | 65 76 69 6f 75 73 2d 65 6e 74 72 79 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 | evious-entry).....(define-key.ma |
| 18ea0 | 70 20 22 2f 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6c 69 76 65 2d 66 69 | p."/".#'calibredb-search-live-fi |
| 18ec0 | 6c 74 65 72 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5c 4d 2d 74 22 | lter).....(define-key.map."\M-t" |
| 18ee0 | 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 61 67 73 29 | .#'calibredb-set-metadata--tags) |
| 18f00 | 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5c 4d 2d 61 22 20 23 27 63 61 | .....(define-key.map."\M-a".#'ca |
| 18f20 | 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 61 75 74 68 6f 72 5f 73 6f 72 | libredb-set-metadata--author_sor |
| 18f40 | 74 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5c 4d 2d 41 22 20 23 27 | t).....(define-key.map."\M-A".#' |
| 18f60 | 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 61 75 74 68 6f 72 73 29 | calibredb-set-metadata--authors) |
| 18f80 | 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5c 4d 2d 54 22 20 23 27 63 61 | .....(define-key.map."\M-T".#'ca |
| 18fa0 | 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 69 74 6c 65 29 0a 20 20 20 | libredb-set-metadata--title).... |
| 18fc0 | 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5c 4d 2d 63 22 20 23 27 63 61 6c 69 62 72 | .(define-key.map."\M-c".#'calibr |
| 18fe0 | 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 63 6f 6d 6d 65 6e 74 73 29 0a 20 20 20 20 | edb-set-metadata--comments)..... |
| 19000 | 6d 61 70 29 0a 20 20 22 4b 65 79 6d 61 70 20 66 6f 72 20 60 63 61 6c 69 62 72 65 64 62 2d 73 65 | map)..."Keymap.for.`calibredb-se |
| 19020 | 61 72 63 68 2d 6d 6f 64 65 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 | arch-mode'.")..(defvar.calibredb |
| 19040 | 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 28 6c 65 74 | -edit-annotation-mode-map...(let |
| 19060 | 20 28 28 6d 61 70 20 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 29 0a 20 20 | .((map.(make-sparse-keymap)))... |
| 19080 | 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5c 43 2d 63 5c 43 2d 63 22 20 27 63 61 | ..(define-key.map."\C-c\C-c".'ca |
| 190a0 | 6c 69 62 72 65 64 62 2d 73 65 6e 64 2d 65 64 69 74 65 64 2d 61 6e 6e 6f 74 61 74 69 6f 6e 29 0a | libredb-send-edited-annotation). |
| 190c0 | 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5c 43 2d 63 5c 43 2d 6b 22 20 27 | ....(define-key.map."\C-c\C-k".' |
| 190e0 | 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 71 75 69 74 29 0a 20 20 20 20 6d | calibredb-annotation-quit).....m |
| 19100 | 61 70 29 0a 20 20 22 4b 65 79 6d 61 70 20 66 6f 72 20 60 63 61 6c 69 62 72 65 64 62 2d 65 64 69 | ap)..."Keymap.for.`calibredb-edi |
| 19120 | 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 6d 6f 64 65 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 | t-annotation-mode'.")..(defvar.c |
| 19140 | 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 2d 66 75 6e 63 74 69 6f 6e 20 | alibredb-search-header-function. |
| 19160 | 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 0a 20 20 22 46 75 6e | #'calibredb-search-header..."Fun |
| 19180 | 63 74 69 6f 6e 20 74 68 61 74 20 72 65 74 75 72 6e 73 20 74 68 65 20 73 74 72 69 6e 67 20 74 6f | ction.that.returns.the.string.to |
| 191a0 | 20 62 65 20 75 73 65 64 20 66 6f 72 20 74 68 65 20 43 61 6c 69 62 72 65 64 62 20 73 65 61 72 63 | .be.used.for.the.Calibredb.searc |
| 191c0 | 68 20 68 65 61 64 65 72 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 69 | h.header.")..(defvar.calibredb-i |
| 191e0 | 6d 61 67 65 73 2d 70 61 74 68 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 | mages-path.(concat.(file-name-di |
| 19200 | 72 65 63 74 6f 72 79 20 6c 6f 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 29 20 22 69 6d 67 22 29 0a 20 | rectory.load-file-name)."img").. |
| 19220 | 20 22 52 65 6c 61 74 69 76 65 20 70 61 74 68 20 74 6f 20 69 6d 61 67 65 73 2e 22 29 0a 0a 28 64 | ."Relative.path.to.images.")..(d |
| 19240 | 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 75 6e 69 71 75 65 | efcustom.calibredb-search-unique |
| 19260 | 2d 62 75 66 66 65 72 73 20 6e 69 6c 0a 20 20 22 54 4f 44 4f 3a 20 57 68 65 6e 20 6e 6f 6e 2d 6e | -buffers.nil..."TODO:.When.non-n |
| 19280 | 69 6c 2c 20 65 76 65 72 79 20 65 6e 74 72 79 20 62 75 66 66 65 72 20 67 65 74 73 20 61 20 75 6e | il,.every.entry.buffer.gets.a.un |
| 192a0 | 69 71 75 65 20 6e 61 6d 65 2e 0a 54 68 69 73 20 61 6c 6c 6f 77 73 20 66 6f 72 20 64 69 73 70 6c | ique.name..This.allows.for.displ |
| 192c0 | 61 79 69 6e 67 20 6d 75 6c 74 69 70 6c 65 20 73 65 72 63 68 20 62 75 66 66 65 72 73 20 61 74 20 | aying.multiple.serch.buffers.at. |
| 192e0 | 74 68 65 20 73 61 6d 65 0a 74 69 6d 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 | the.same.time."...:group.'calibr |
| 19300 | 65 64 62 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 69 6e 65 2d 6f | edb...:type.'boolean)..(define-o |
| 19320 | 62 73 6f 6c 65 74 65 2d 66 75 6e 63 74 69 6f 6e 2d 61 6c 69 61 73 20 23 27 63 61 6c 69 62 72 65 | bsolete-function-alias.#'calibre |
| 19340 | 64 62 2d 73 65 61 72 63 68 2d 72 65 74 0a 20 20 27 63 61 6c 69 62 72 65 64 62 2d 76 69 65 77 20 | db-search-ret...'calibredb-view. |
| 19360 | 22 63 61 6c 69 62 72 65 64 62 20 32 2e 30 2e 30 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 | "calibredb.2.0.0")..(defcustom.c |
| 19380 | 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 20 6e 69 6c 0a 20 20 22 53 65 | alibredb-detailed-view.nil..."Se |
| 193a0 | 74 20 4e 6f 6e 2d 6e 69 6c 20 74 6f 20 63 68 61 6e 67 65 20 64 65 74 61 69 6c 20 76 69 65 77 2c | t.Non-nil.to.change.detail.view, |
| 193c0 | 20 6e 69 6c 20 74 6f 20 63 6f 6d 70 61 63 74 20 76 69 65 77 20 2d 20 2a 63 61 6c 69 62 72 65 64 | .nil.to.compact.view.-.*calibred |
| 193e0 | 62 2d 73 65 61 72 63 68 2a 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a | b-search*."...:group.'calibredb. |
| 19400 | 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c | ..:type.'boolean)..(define-obsol |
| 19420 | 65 74 65 2d 76 61 72 69 61 62 6c 65 2d 61 6c 69 61 73 20 27 63 61 6c 69 62 72 65 64 62 2d 64 65 | ete-variable-alias.'calibredb-de |
| 19440 | 74 69 61 6c 2d 76 69 65 77 20 27 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 | tial-view.'calibredb-detailed-vi |
| 19460 | 65 77 0a 20 20 22 53 65 65 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 65 | ew..."See.https://github.com/che |
| 19480 | 6e 79 61 6e 6d 69 6e 67 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c 2f 70 75 6c 6c 2f 34 35 22 20 22 | nyanming/calibredb.el/pull/45"." |
| 194a0 | 46 69 78 69 6e 67 20 74 79 70 6f 73 2e 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 | Fixing.typos.")..(defcustom.cali |
| 194c0 | 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 69 6d 61 67 65 2d 73 68 6f 77 20 74 | bredb-detailed-view-image-show.t |
| 194e0 | 0a 20 20 22 53 65 74 20 4e 6f 6e 2d 6e 69 6c 20 74 6f 20 73 68 6f 77 20 69 6d 61 67 65 73 20 69 | ..."Set.Non-nil.to.show.images.i |
| 19500 | 6e 20 64 65 74 61 69 6c 65 64 20 76 69 65 77 20 2d 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | n.detailed.view.-.*calibredb-sea |
| 19520 | 72 63 68 2a 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 | rch*."...:group.'calibredb...:ty |
| 19540 | 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 | pe.'boolean)..(defcustom.calibre |
| 19560 | 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 77 69 64 74 68 | db-detailed-view-image-max-width |
| 19580 | 20 32 35 30 0a 20 20 22 4d 61 78 20 57 69 64 74 68 20 66 6f 72 20 69 6d 61 67 65 73 20 69 6e 20 | .250..."Max.Width.for.images.in. |
| 195a0 | 64 65 74 61 69 6c 65 64 20 76 69 65 77 20 2d 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 | detailed.view.-.*calibredb-searc |
| 195c0 | 68 2a 2e 0a 46 6f 72 20 45 6d 61 63 73 20 32 37 2e 31 2b 2c 20 69 66 20 69 6d 61 67 65 6d 61 67 | h*..For.Emacs.27.1+,.if.imagemag |
| 195e0 | 69 63 6b 20 69 73 20 64 69 73 61 62 6c 65 64 2c 20 69 74 20 77 6f 75 6c 64 20 74 68 65 20 69 6d | ick.is.disabled,.it.would.the.im |
| 19600 | 61 67 65 20 77 69 64 74 68 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 0a | age.width."...:group.'calibredb. |
| 19620 | 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 61 | ..:type.'integer)..(defcustom.ca |
| 19640 | 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d | libredb-detailed-view-image-max- |
| 19660 | 68 65 69 67 68 74 20 32 35 30 0a 20 20 22 4d 61 78 20 68 65 69 67 68 74 20 66 6f 72 20 69 6d 61 | height.250..."Max.height.for.ima |
| 19680 | 67 65 73 20 69 6e 20 64 65 74 61 69 6c 65 64 20 76 69 65 77 20 2d 20 2a 63 61 6c 69 62 72 65 64 | ges.in.detailed.view.-.*calibred |
| 196a0 | 62 2d 73 65 61 72 63 68 2a 2e 0a 46 6f 72 20 45 6d 61 63 73 20 32 37 2e 31 2b 2c 20 69 66 20 69 | b-search*..For.Emacs.27.1+,.if.i |
| 196c0 | 6d 61 67 65 6d 61 67 69 63 6b 20 69 73 20 64 69 73 61 62 6c 65 64 2c 20 74 68 65 20 69 6d 61 67 | magemagick.is.disabled,.the.imag |
| 196e0 | 65 20 68 65 69 67 68 74 20 69 73 20 69 67 6e 6f 72 65 64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 | e.height.is.ignored."...:group.' |
| 19700 | 63 61 6c 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 | calibredb...:type.'integer)..(de |
| 19720 | 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d 76 69 65 77 2d 69 6d 61 67 | fcustom.calibredb-list-view-imag |
| 19740 | 65 2d 6d 61 78 2d 77 69 64 74 68 20 35 30 30 0a 20 20 22 4d 61 78 20 57 69 64 74 68 20 66 6f 72 | e-max-width.500..."Max.Width.for |
| 19760 | 20 69 6d 61 67 65 73 20 69 6e 20 6c 69 73 74 20 76 69 65 77 20 2d 20 2a 63 61 6c 69 62 72 65 64 | .images.in.list.view.-.*calibred |
| 19780 | 62 2d 6c 69 73 74 2a 2e 0a 46 6f 72 20 45 6d 61 63 73 20 32 37 2e 31 2b 2c 20 69 66 20 69 6d 61 | b-list*..For.Emacs.27.1+,.if.ima |
| 197a0 | 67 65 6d 61 67 69 63 6b 20 69 73 20 64 69 73 61 62 6c 65 64 2c 20 69 74 20 69 73 20 74 68 65 20 | gemagick.is.disabled,.it.is.the. |
| 197c0 | 69 6d 61 67 65 20 77 69 64 74 68 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 | image.width."...:group.'calibred |
| 197e0 | 62 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 | b...:type.'integer)..(defcustom. |
| 19800 | 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 68 65 | calibredb-list-view-image-max-he |
| 19820 | 69 67 68 74 20 35 30 30 0a 20 20 22 4d 61 78 20 68 65 69 67 68 74 20 66 6f 72 20 69 6d 61 67 65 | ight.500..."Max.height.for.image |
| 19840 | 73 20 69 6e 20 6c 69 73 74 20 76 69 65 77 20 2d 20 2a 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 | s.in.list.view.-.*calibredb-list |
| 19860 | 2a 2e 0a 46 6f 72 20 45 6d 61 63 73 20 32 37 2e 31 2b 2c 20 69 66 20 69 6d 61 67 65 6d 61 67 69 | *..For.Emacs.27.1+,.if.imagemagi |
| 19880 | 63 6b 20 69 73 20 64 69 73 61 62 6c 65 64 2c 20 74 68 65 20 69 6d 61 67 65 20 68 65 69 67 68 74 | ck.is.disabled,.the.image.height |
| 198a0 | 20 69 73 20 69 67 6e 6f 72 65 64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 | .is.ignored."...:group.'calibred |
| 198c0 | 62 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 | b...:type.'integer)..(defun.cali |
| 198e0 | 62 72 65 64 62 2d 73 65 61 72 63 68 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 28 29 0a 20 20 22 | bredb-search--buffer-name.()..." |
| 19900 | 52 65 74 75 72 6e 20 74 68 65 20 61 70 70 72 6f 70 72 69 61 74 65 20 62 75 66 66 65 72 20 6e 61 | Return.the.appropriate.buffer.na |
| 19920 | 6d 65 20 66 6f 72 20 45 4e 54 52 59 2e 0a 54 68 65 20 72 65 73 75 6c 74 20 64 65 70 65 6e 64 73 | me.for.ENTRY..The.result.depends |
| 19940 | 20 6f 6e 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 60 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 | .on.the.value.of.`calibredb-sear |
| 19960 | 63 68 2d 75 6e 69 71 75 65 2d 62 75 66 66 65 72 73 27 2e 22 0a 20 20 28 69 66 20 63 61 6c 69 62 | ch-unique-buffers'."...(if.calib |
| 19980 | 72 65 64 62 2d 73 65 61 72 63 68 2d 75 6e 69 71 75 65 2d 62 75 66 66 65 72 73 0a 20 20 20 20 20 | redb-search-unique-buffers...... |
| 199a0 | 20 28 66 6f 72 6d 61 74 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 3c 25 73 3e | .(format."*calibredb-search-<%s> |
| 199c0 | 2a 22 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 29 0a 20 20 20 20 22 2a 63 61 6c | *".calibredb-root-dir)....."*cal |
| 199e0 | 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 22 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 | ibredb-search*"))..(defun.calibr |
| 19a00 | 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 20 28 65 6e 74 72 79 20 26 6f 70 74 69 6f 6e 61 6c 20 | edb-show-entry.(entry.&optional. |
| 19a20 | 73 77 69 74 63 68 29 0a 20 20 22 44 69 73 70 6c 61 79 20 45 4e 54 52 59 20 69 6e 20 74 68 65 20 | switch)..."Display.ENTRY.in.the. |
| 19a40 | 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e | current.buffer..Optional.argumen |
| 19a60 | 74 20 53 57 49 54 43 48 20 74 6f 20 73 77 69 74 63 68 20 74 6f 20 2a 63 61 6c 69 62 72 65 64 62 | t.SWITCH.to.switch.to.*calibredb |
| 19a80 | 2d 73 65 61 72 63 68 2a 20 62 75 66 66 65 72 20 74 6f 20 6f 74 68 65 72 20 77 69 6e 64 6f 77 2e | -search*.buffer.to.other.window. |
| 19aa0 | 22 0a 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 | "...(unless.(eq.major-mode.'cali |
| 19ac0 | 62 72 65 64 62 2d 73 68 6f 77 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 67 65 | bredb-show-mode).......(when.(ge |
| 19ae0 | 74 2d 62 75 66 66 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 65 72 | t-buffer.(calibredb-show--buffer |
| 19b00 | 2d 6e 61 6d 65 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 | -name.entry)).........(kill-buff |
| 19b20 | 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 | er.(calibredb-show--buffer-name. |
| 19b40 | 65 6e 74 72 79 29 29 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 62 75 66 66 20 28 67 65 74 2d 62 75 | entry))))...(let*.((buff.(get-bu |
| 19b60 | 66 66 65 72 2d 63 72 65 61 74 65 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 | ffer-create.(calibredb-show--buf |
| 19b80 | 66 65 72 2d 6e 61 6d 65 20 65 6e 74 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 64 20 28 | fer-name.entry)))..........(id.( |
| 19ba0 | 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 69 64 29 29 20 3b 20 | calibredb-getattr.entry.:id)).;. |
| 19bc0 | 6f 6e 6c 79 20 67 65 74 20 74 68 65 20 69 64 0a 20 20 20 20 20 20 20 20 20 28 74 61 67 20 28 63 | only.get.the.id..........(tag.(c |
| 19be0 | 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 74 61 67 29 29 0a 20 20 | alibredb-getattr.entry.:tag))... |
| 19c00 | 20 20 20 20 20 20 20 28 63 6f 6d 6d 65 6e 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 | .......(comment.(calibredb-getat |
| 19c20 | 74 72 20 65 6e 74 72 79 20 3a 63 6f 6d 6d 65 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 75 | tr.entry.:comment))..........(au |
| 19c40 | 74 68 6f 72 2d 73 6f 72 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 | thor-sort.(calibredb-getattr.ent |
| 19c60 | 72 79 20 3a 61 75 74 68 6f 72 2d 73 6f 72 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 69 74 6c | ry.:author-sort))..........(titl |
| 19c80 | 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 62 6f 6f 6b | e.(calibredb-getattr.entry.:book |
| 19ca0 | 2d 74 69 74 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 75 62 64 61 74 65 20 28 63 61 6c 69 | -title))..........(pubdate.(cali |
| 19cc0 | 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 62 6f 6f 6b 2d 70 75 62 64 61 74 | bredb-getattr.entry.:book-pubdat |
| 19ce0 | 65 29 29 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 28 71 75 65 72 79 2d 72 65 73 75 6c 74 20 28 63 | e))..........;;.(query-result.(c |
| 19d00 | 64 72 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 64 61 74 65 20 69 64 29 | dr.(car.(calibredb-candidate.id) |
| 19d20 | 29 29 29 20 3b 20 67 65 74 20 74 68 65 20 6e 65 77 20 65 6e 74 72 79 20 74 68 72 6f 75 67 68 20 | ))).;.get.the.new.entry.through. |
| 19d40 | 53 51 4c 20 71 75 65 72 79 0a 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 28 63 61 6c 69 62 72 | SQL.query..........(file.(calibr |
| 19d60 | 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 66 69 6c 65 2d 70 61 74 68 29 29 0a 20 | edb-getattr.entry.:file-path)).. |
| 19d80 | 20 20 20 20 20 20 20 20 28 63 6f 76 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 63 6f | ........(cover.(calibredb-get-co |
| 19da0 | 76 65 72 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 28 63 61 | ver.entry))..........(format.(ca |
| 19dc0 | 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 62 6f 6f 6b 2d 66 6f 72 6d | libredb-getattr.entry.:book-form |
| 19de0 | 61 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 69 7a 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 | at))..........(size.(calibredb-g |
| 19e00 | 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 73 69 7a 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 | etattr.entry.:size))..........(i |
| 19e20 | 64 73 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 69 64 73 | ds.(calibredb-getattr.entry.:ids |
| 19e40 | 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 75 62 6c 69 73 68 65 72 20 28 63 61 6c 69 62 72 65 64 | ))..........(publisher.(calibred |
| 19e60 | 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 70 75 62 6c 69 73 68 65 72 29 29 0a 20 20 20 | b-getattr.entry.:publisher)).... |
| 19e80 | 20 20 20 20 20 20 28 73 65 72 69 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 | ......(series.(calibredb-getattr |
| 19ea0 | 20 65 6e 74 72 79 20 3a 73 65 72 69 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6e 67 5f | .entry.:series))..........(lang_ |
| 19ec0 | 63 6f 64 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 6c | code.(calibredb-getattr.entry.:l |
| 19ee0 | 61 6e 67 5f 63 6f 64 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 61 73 74 5f 6d 6f 64 69 66 69 | ang_code))..........(last_modifi |
| 19f00 | 65 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 6c 61 73 | ed.(calibredb-getattr.entry.:las |
| 19f20 | 74 5f 6d 6f 64 69 66 69 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 28 6f 72 69 67 69 6e 61 6c 20 | t_modified))..........(original. |
| 19f40 | 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6d 61 70 20 28 6d 61 6b | (point))..........(file-map.(mak |
| 19f60 | 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 0a 20 20 20 20 20 20 20 20 20 62 65 67 20 65 | e-sparse-keymap))..........beg.e |
| 19f80 | 6e 64 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 | nd).....(let.((inhibit-read-only |
| 19fa0 | 20 74 29 20 63 2d 62 65 67 20 63 2d 65 6e 64 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 | .t).c-beg.c-end).......(with-cur |
| 19fc0 | 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 0a 20 20 20 20 20 20 20 20 28 64 65 66 69 6e 65 | rent-buffer.buff.........(define |
| 19fe0 | 2d 6b 65 79 20 66 69 6c 65 2d 6d 61 70 20 5b 6d 6f 75 73 65 2d 31 5d 20 27 63 61 6c 69 62 72 65 | -key.file-map.[mouse-1].'calibre |
| 1a000 | 64 62 2d 66 69 6c 65 2d 6d 6f 75 73 65 2d 31 29 0a 20 20 20 20 20 20 20 20 28 64 65 66 69 6e 65 | db-file-mouse-1).........(define |
| 1a020 | 2d 6b 65 79 20 66 69 6c 65 2d 6d 61 70 20 5b 6d 6f 75 73 65 2d 33 5d 20 27 63 61 6c 69 62 72 65 | -key.file-map.[mouse-3].'calibre |
| 1a040 | 64 62 2d 66 69 6c 65 2d 6d 6f 75 73 65 2d 33 29 0a 20 20 20 20 20 20 20 20 28 65 72 61 73 65 2d | db-file-mouse-3).........(erase- |
| 1a060 | 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 65 67 20 28 70 6f 69 6e 74 | buffer).........(setq.beg.(point |
| 1a080 | 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 28 69 6e 73 65 72 74 20 28 70 72 6f 70 65 72 74 69 7a | )).........;;.(insert.(propertiz |
| 1a0a0 | 65 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 65 74 61 64 61 74 61 20 65 6e 74 72 79 | e.(calibredb-show-metadata.entry |
| 1a0c0 | 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 | ).'calibredb-entry.entry))...... |
| 1a0e0 | 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 49 44 20 20 20 20 20 20 20 20 20 20 | ...(insert.(format."ID.......... |
| 1a100 | 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 69 64 20 27 66 61 63 65 20 27 63 61 6c 69 | %s\n".(propertize.id.'face.'cali |
| 1a120 | 62 72 65 64 62 2d 69 64 2d 66 61 63 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 | bredb-id-face))).........(setq.e |
| 1a140 | 6e 64 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 | nd.(point)).........(put-text-pr |
| 1a160 | 6f 70 65 72 74 79 20 62 65 67 20 65 6e 64 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 | operty.beg.end.'calibredb-entry. |
| 1a180 | 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 | entry).........(insert.(format." |
| 1a1a0 | 54 69 74 6c 65 20 20 20 20 20 20 20 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 74 69 | Title.......%s\n".(propertize.ti |
| 1a1c0 | 74 6c 65 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 74 69 74 6c 65 2d 66 61 63 65 29 | tle.'face.'calibredb-title-face) |
| 1a1e0 | 29 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 41 75 74 68 | )).........(insert.(format."Auth |
| 1a200 | 6f 72 5f 73 6f 72 74 20 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 61 75 74 68 6f 72 | or_sort.%s\n".(propertize.author |
| 1a220 | 2d 73 6f 72 74 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 61 | -sort.'face.'calibredb-author-fa |
| 1a240 | 63 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 54 | ce))).........(insert.(format."T |
| 1a260 | 61 67 73 20 20 20 20 20 20 20 20 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 74 61 67 | ags........%s\n".(propertize.tag |
| 1a280 | 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 66 61 63 65 29 29 29 0a 20 20 | .'face.'calibredb-tag-face)))... |
| 1a2a0 | 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 49 64 73 20 20 20 20 20 20 | ......(insert.(format."Ids...... |
| 1a2c0 | 20 20 20 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 69 64 73 20 27 66 61 63 65 20 27 | ...%s\n".(propertize.ids.'face.' |
| 1a2e0 | 63 61 6c 69 62 72 65 64 62 2d 69 64 73 2d 66 61 63 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 | calibredb-ids-face))).........(i |
| 1a300 | 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 44 61 74 65 20 20 20 20 20 20 20 20 25 73 5c 6e 22 | nsert.(format."Date........%s\n" |
| 1a320 | 20 28 70 72 6f 70 65 72 74 69 7a 65 20 6c 61 73 74 5f 6d 6f 64 69 66 69 65 64 20 27 66 61 63 65 | .(propertize.last_modified.'face |
| 1a340 | 20 27 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 61 63 65 29 29 29 0a 20 20 20 20 20 20 20 | .'calibredb-date-face)))........ |
| 1a360 | 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 50 75 62 6c 69 73 68 65 64 20 20 20 25 73 | .(insert.(format."Published...%s |
| 1a380 | 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 70 75 62 64 61 74 65 20 27 66 61 63 65 20 27 63 | \n".(propertize.pubdate.'face.'c |
| 1a3a0 | 61 6c 69 62 72 65 64 62 2d 70 75 62 64 61 74 65 2d 66 61 63 65 29 29 29 0a 20 20 20 20 20 20 20 | alibredb-pubdate-face)))........ |
| 1a3c0 | 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 50 75 62 6c 69 73 68 65 72 20 20 20 25 73 | .(insert.(format."Publisher...%s |
| 1a3e0 | 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 70 75 62 6c 69 73 68 65 72 20 27 66 61 63 65 20 | \n".(propertize.publisher.'face. |
| 1a400 | 27 63 61 6c 69 62 72 65 64 62 2d 70 75 62 6c 69 73 68 65 72 2d 66 61 63 65 29 29 29 0a 20 20 20 | 'calibredb-publisher-face))).... |
| 1a420 | 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 53 65 72 69 65 73 20 20 20 20 | .....(insert.(format."Series.... |
| 1a440 | 20 20 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 73 65 72 69 65 73 20 27 66 61 63 65 | ..%s\n".(propertize.series.'face |
| 1a460 | 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 72 69 65 73 2d 66 61 63 65 29 29 29 0a 20 20 20 20 20 | .'calibredb-series-face)))...... |
| 1a480 | 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 4c 61 6e 67 75 61 67 65 20 20 20 20 | ...(insert.(format."Language.... |
| 1a4a0 | 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 6c 61 6e 67 5f 63 6f 64 65 20 27 66 61 63 | %s\n".(propertize.lang_code.'fac |
| 1a4c0 | 65 20 27 63 61 6c 69 62 72 65 64 62 2d 6c 61 6e 67 75 61 67 65 2d 66 61 63 65 29 29 29 0a 20 20 | e.'calibredb-language-face)))... |
| 1a4e0 | 20 20 20 20 20 20 3b 3b 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 46 69 6c 65 20 20 | ......;;.(insert.(format."File.. |
| 1a500 | 20 20 20 20 20 20 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 66 69 6c 65 20 27 66 61 | ......%s\n".(propertize.file.'fa |
| 1a520 | 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 66 69 6c 65 2d 66 61 63 65 29 29 29 0a 20 20 20 20 20 | ce.'calibredb-file-face)))...... |
| 1a540 | 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 46 6f 72 6d 61 74 20 20 20 20 20 20 | ...(insert.(format."Format...... |
| 1a560 | 25 73 5c 6e 22 20 28 6d 61 70 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | %s\n".(mapconcat................ |
| 1a580 | 20 20 20 20 20 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 69 | .............................#'i |
| 1a5a0 | 64 65 6e 74 69 74 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 | dentity......................... |
| 1a5c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 6d 61 70 20 28 6c 61 6d 62 64 | ....................(-map.(lambd |
| 1a5e0 | 61 20 28 65 78 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 | a.(ext)......................... |
| 1a600 | 20 20 20 20 20 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 | ............................(pro |
| 1a620 | 70 65 72 74 69 7a 65 20 65 78 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | pertize.ext..................... |
| 1a640 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1a660 | 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 | ............'face.'calibredb-for |
| 1a680 | 6d 61 74 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mat-face........................ |
| 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 20 20 20 20 | ................................ |
| 1a6c0 | 20 20 20 20 20 20 20 20 20 27 6d 6f 75 73 65 2d 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d | .........'mouse-face.'calibredb- |
| 1a6e0 | 6d 6f 75 73 65 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mouse-face...................... |
| 1a700 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1a720 | 20 20 20 20 20 20 20 20 20 20 20 27 68 65 6c 70 2d 65 63 68 6f 20 28 69 66 20 28 73 2d 63 6f 6e | ...........'help-echo.(if.(s-con |
| 1a740 | 74 61 69 6e 73 3f 20 22 68 74 74 70 22 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | tains?."http".file)............. |
| 1a760 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1a780 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1a7a0 | 20 20 20 66 69 6c 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 | ...file......................... |
| 1a7c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1a7e0 | 20 20 20 20 20 20 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 | .....................(expand-fil |
| 1a800 | 65 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e-name.......................... |
| 1a820 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1a840 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 66 69 | .....................(concat.(fi |
| 1a860 | 6c 65 2d 6e 61 6d 65 2d 62 61 73 65 20 66 69 6c 65 29 20 22 2e 22 20 65 78 74 29 0a 20 20 20 20 | le-name-base.file).".".ext)..... |
| 1a880 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1a8a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1a8c0 | 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 66 | ..........(file-name-directory.f |
| 1a8e0 | 69 6c 65 29 29 20 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ile)).)......................... |
| 1a900 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1a920 | 20 20 20 20 20 20 20 20 27 6b 65 79 6d 61 70 20 66 69 6c 65 2d 6d 61 70 29 29 20 28 73 2d 73 70 | ........'keymap.file-map)).(s-sp |
| 1a940 | 6c 69 74 20 22 2c 22 20 66 6f 72 6d 61 74 29 29 20 22 2c 20 22 29 29 29 0a 20 20 20 20 20 20 20 | lit.",".format)).",.")))........ |
| 1a960 | 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 53 69 7a 65 20 20 20 20 20 20 20 20 25 73 | .(insert.(format."Size........%s |
| 1a980 | 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 63 6f 6e 63 61 74 20 73 69 7a 65 20 22 4d 62 | \n".(propertize.(concat.size."Mb |
| 1a9a0 | 22 29 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 69 7a 65 2d 66 61 63 65 29 29 29 | ").'face.'calibredb-size-face))) |
| 1a9c0 | 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 65 71 75 61 6c 20 63 61 6c 69 62 72 65 64 62 | .........(cond.((equal.calibredb |
| 1a9e0 | 2d 65 6e 74 72 79 2d 72 65 6e 64 65 72 2d 63 6f 6d 6d 65 6e 74 73 20 22 66 61 63 65 22 29 0a 20 | -entry-render-comments."face").. |
| 1aa00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 43 | ..............(insert.(format."C |
| 1aa20 | 6f 6d 6d 65 6e 74 73 20 20 20 20 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 63 6f 6d | omments....%s\n".(propertize.com |
| 1aa40 | 6d 65 6e 74 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 65 6e 74 2d 66 61 | ment.'face.'calibredb-comment-fa |
| 1aa60 | 63 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 75 61 6c 20 63 61 6c | ce))))...............((equal.cal |
| 1aa80 | 69 62 72 65 64 62 2d 65 6e 74 72 79 2d 72 65 6e 64 65 72 2d 63 6f 6d 6d 65 6e 74 73 20 22 73 68 | ibredb-entry-render-comments."sh |
| 1aaa0 | 72 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 73 68 72 | r")................(require.'shr |
| 1aac0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 43 6f 6d 6d 65 6e | )................(insert."Commen |
| 1aae0 | 74 73 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 2d 62 65 | ts\n")................(setq.c-be |
| 1ab00 | 67 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 | g.(point))................(inser |
| 1ab20 | 74 20 63 6f 6d 6d 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 | t.comment)................(setq. |
| 1ab40 | 63 2d 65 6e 64 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 | c-end.(point))................(i |
| 1ab60 | 66 20 28 66 62 6f 75 6e 64 70 20 27 73 68 72 2d 72 65 6e 64 65 72 2d 72 65 67 69 6f 6e 29 0a 20 | f.(fboundp.'shr-render-region).. |
| 1ab80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 68 72 2d 72 65 6e 64 65 72 2d 72 65 | ..................(shr-render-re |
| 1aba0 | 67 69 6f 6e 20 63 2d 62 65 67 20 63 2d 65 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | gion.c-beg.c-end)).............. |
| 1abc0 | 20 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 28 | ..(insert."\n"))...............( |
| 1abe0 | 28 65 71 75 61 6c 20 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2d 72 65 6e 64 65 72 2d 63 6f | (equal.calibredb-entry-render-co |
| 1ac00 | 6d 6d 65 6e 74 73 20 22 61 6e 6e 6f 74 61 74 69 6f 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 | mments."annotation")............ |
| 1ac20 | 20 20 20 20 28 69 6e 73 65 72 74 20 22 43 6f 6d 6d 65 6e 74 73 5c 6e 5c 6e 22 29 0a 20 20 20 20 | ....(insert."Comments\n\n")..... |
| 1ac40 | 20 20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 29 0a | ...........(require.'font-lock). |
| 1ac60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 63 61 6c 69 62 72 65 64 | ...............(insert.(calibred |
| 1ac80 | 62 2d 66 6f 6e 74 69 66 79 20 63 6f 6d 6d 65 6e 74 20 27 63 61 6c 69 62 72 65 64 62 2d 65 64 69 | b-fontify.comment.'calibredb-edi |
| 1aca0 | 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | t-annotation-mode))............. |
| 1acc0 | 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ...(insert."\n\n"))............. |
| 1ace0 | 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 | ..(t................(insert.(for |
| 1ad00 | 6d 61 74 20 22 43 6f 6d 6d 65 6e 74 73 20 20 20 20 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 | mat."Comments....%s\n".(properti |
| 1ad20 | 7a 65 20 63 6f 6d 6d 65 6e 74 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d | ze.comment.'face.'calibredb-comm |
| 1ad40 | 65 6e 74 2d 66 61 63 65 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c | ent-face))))).........(insert."\ |
| 1ad60 | 6e 22 29 0a 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 69 6e 73 65 72 74 2d 69 6d | n").........(calibredb-insert-im |
| 1ad80 | 61 67 65 20 63 6f 76 65 72 20 22 22 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d 76 69 65 77 | age.cover."".calibredb-list-view |
| 1ada0 | 2d 69 6d 61 67 65 2d 6d 61 78 2d 77 69 64 74 68 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d | -image-max-width.calibredb-list- |
| 1adc0 | 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 68 65 69 67 68 74 29 0a 20 20 20 20 20 20 20 20 3b | view-image-max-height).........; |
| 1ade0 | 3b 20 28 73 65 74 71 20 65 6e 64 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 28 63 61 | ;.(setq.end.(point)).........(ca |
| 1ae00 | 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 | libredb-show-mode).........(setq |
| 1ae20 | 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 20 65 6e 74 72 79 29 0a 20 20 20 | .calibredb-show-entry.entry).... |
| 1ae40 | 20 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 29 29 29 29 0a 20 | .....(goto-char.(point-min)))).. |
| 1ae60 | 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 | ...(unless.(eq.major-mode.'calib |
| 1ae80 | 72 65 64 62 2d 73 68 6f 77 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 | redb-show-mode).......(funcall.c |
| 1aea0 | 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 2d 73 77 69 74 63 68 20 62 75 66 66 29 | alibredb-show-entry-switch.buff) |
| 1aec0 | 0a 20 20 20 20 20 20 28 77 68 65 6e 20 73 77 69 74 63 68 0a 20 20 20 20 20 20 20 20 28 73 77 69 | .......(when.switch.........(swi |
| 1aee0 | 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 28 73 65 74 2d | tch-to-buffer-other-window.(set- |
| 1af00 | 62 75 66 66 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 2d 62 75 66 66 65 72 | buffer.(calibredb-search--buffer |
| 1af20 | 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 6f 72 69 67 | -name))).........(goto-char.orig |
| 1af40 | 69 6e 61 6c 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 6e 65 78 74 | inal)))))..(defun.calibredb-next |
| 1af60 | 2d 65 6e 74 72 79 20 28 29 0a 20 20 22 4d 6f 76 65 20 74 6f 20 6e 65 78 74 20 65 6e 74 72 79 2e | -entry.()..."Move.to.next.entry. |
| 1af80 | 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 6f 72 69 20 22 | "...(interactive)...(let.((ori." |
| 1afa0 | 22 29 20 28 6e 65 77 20 22 22 29 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 65 71 | ").(new."")).....(while.(and.(eq |
| 1afc0 | 75 61 6c 20 6e 65 77 20 6f 72 69 29 20 6e 65 77 20 6f 72 69 29 0a 20 20 20 20 20 20 28 73 65 74 | ual.new.ori).new.ori).......(set |
| 1afe0 | 71 20 6f 72 69 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 61 72 20 28 63 | q.ori.(calibredb-getattr.(car.(c |
| 1b000 | 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 | alibredb-find-candidate-at-point |
| 1b020 | 29 29 20 3a 69 64 29 29 0a 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 29 0a | )).:id)).......(forward-line.1). |
| 1b040 | 20 20 20 20 20 20 28 73 65 74 71 20 6e 65 77 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 | ......(setq.new.(calibredb-getat |
| 1b060 | 74 72 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 | tr.(car.(calibredb-find-candidat |
| 1b080 | 65 2d 61 74 2d 70 6f 69 6e 74 29 29 20 3a 69 64 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 | e-at-point)).:id)))))..(defun.ca |
| 1b0a0 | 6c 69 62 72 65 64 62 2d 70 72 65 76 69 6f 75 73 2d 65 6e 74 72 79 20 28 29 0a 20 20 22 4d 6f 76 | libredb-previous-entry.()..."Mov |
| 1b0c0 | 65 20 74 6f 20 70 72 65 76 69 6f 75 73 20 65 6e 74 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 | e.to.previous.entry."...(interac |
| 1b0e0 | 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 6f 72 69 20 22 22 29 20 28 6e 65 77 20 22 22 29 29 | tive)...(let.((ori."").(new."")) |
| 1b100 | 0a 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 65 71 75 61 6c 20 6e 65 77 20 6f 72 69 29 | .....(while.(and.(equal.new.ori) |
| 1b120 | 20 6e 65 77 20 6f 72 69 20 28 3e 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73 29 | .new.ori.(>.(line-number-at-pos) |
| 1b140 | 20 31 29 29 0a 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 2d 31 29 0a 20 20 20 | .1)).......(forward-line.-1).... |
| 1b160 | 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 20 20 28 73 65 74 71 | ...(save-excursion.........(setq |
| 1b180 | 20 6f 72 69 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 61 72 20 28 63 61 | .ori.(calibredb-getattr.(car.(ca |
| 1b1a0 | 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 | libredb-find-candidate-at-point) |
| 1b1c0 | 29 20 3a 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 2d 31 | ).:id)).........(forward-line.-1 |
| 1b1e0 | 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6e 65 77 20 28 63 61 6c 69 62 72 65 64 62 2d 67 | ).........(setq.new.(calibredb-g |
| 1b200 | 65 74 61 74 74 72 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 | etattr.(car.(calibredb-find-cand |
| 1b220 | 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 20 3a 69 64 29 29 29 29 29 29 0a 0a 28 64 65 66 | idate-at-point)).:id))))))..(def |
| 1b240 | 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6e 65 78 74 2d 65 6e 74 72 79 20 28 29 0a | un.calibredb-show-next-entry.(). |
| 1b260 | 20 20 22 53 68 6f 77 20 6e 65 78 74 20 65 6e 74 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 | .."Show.next.entry."...(interact |
| 1b280 | 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6e 65 78 74 2d 65 6e 74 72 79 29 0a 20 20 | ive)...(calibredb-next-entry)... |
| 1b2a0 | 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 20 28 63 61 72 20 28 63 61 6c 69 | (calibredb-show-entry.(car.(cali |
| 1b2c0 | 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 20 | bredb-find-candidate-at-point)). |
| 1b2e0 | 3a 73 77 69 74 63 68 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 | :switch))..(defun.calibredb-show |
| 1b300 | 2d 70 72 65 76 69 6f 75 73 2d 65 6e 74 72 79 20 28 29 0a 20 20 22 53 68 6f 77 20 70 72 65 76 69 | -previous-entry.()..."Show.previ |
| 1b320 | 6f 75 73 20 65 6e 74 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 | ous.entry."...(interactive)...(c |
| 1b340 | 61 6c 69 62 72 65 64 62 2d 70 72 65 76 69 6f 75 73 2d 65 6e 74 72 79 29 0a 20 20 28 63 61 6c 69 | alibredb-previous-entry)...(cali |
| 1b360 | 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 | bredb-show-entry.(car.(calibredb |
| 1b380 | 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 20 3a 73 77 69 74 | -find-candidate-at-point)).:swit |
| 1b3a0 | 63 68 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 62 75 | ch))..(defun.calibredb-search-bu |
| 1b3c0 | 66 66 65 72 20 28 29 0a 20 20 22 43 72 65 61 74 65 20 62 75 66 66 65 72 20 63 61 6c 69 62 72 65 | ffer.()..."Create.buffer.calibre |
| 1b3e0 | 64 62 2d 73 65 61 72 63 68 2e 22 0a 20 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 | db-search."...(get-buffer-create |
| 1b400 | 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 22 29 29 0a 0a 28 64 65 66 75 6e 20 | ."*calibredb-search*"))..(defun. |
| 1b420 | 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 20 28 29 0a 20 20 22 54 4f | calibredb-search-header.()..."TO |
| 1b440 | 44 4f 3a 20 52 65 74 75 72 6e 20 74 68 65 20 73 74 72 69 6e 67 20 74 6f 20 62 65 20 75 73 65 64 | DO:.Return.the.string.to.be.used |
| 1b460 | 20 61 73 20 74 68 65 20 43 61 6c 69 62 72 65 64 62 20 68 65 61 64 65 72 2e 0a 49 6e 64 69 63 61 | .as.the.Calibredb.header..Indica |
| 1b480 | 74 69 6e 67 20 74 68 65 20 6c 69 62 72 61 72 79 20 79 6f 75 20 75 73 65 2e 22 0a 20 20 28 66 6f | ting.the.library.you.use."...(fo |
| 1b4a0 | 72 6d 61 74 20 22 25 73 3a 20 25 73 20 20 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 | rmat."%s:.%s...%s"...........(pr |
| 1b4c0 | 6f 70 65 72 74 69 7a 65 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 | opertize.calibredb-virtual-libra |
| 1b4e0 | 72 79 2d 6e 61 6d 65 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d | ry-name.'face.'calibredb-search- |
| 1b500 | 68 65 61 64 65 72 2d 6c 69 62 72 61 72 79 2d 6e 61 6d 65 2d 66 61 63 65 29 0a 20 20 20 20 20 20 | header-library-name-face)....... |
| 1b520 | 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 | ....(propertize.calibredb-root-d |
| 1b540 | 69 72 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 | ir.'face.'calibredb-search-heade |
| 1b560 | 72 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 | r-library-path-face)...........( |
| 1b580 | 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 66 | concat............(propertize.(f |
| 1b5a0 | 6f 72 6d 61 74 20 22 54 6f 74 61 6c 3a 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ormat."Total:.%s"............... |
| 1b5c0 | 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 63 61 6c 69 | .................(if.(equal.cali |
| 1b5e0 | 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 20 27 28 22 22 29 29 0a 20 20 20 20 | bredb-search-entries.'(""))..... |
| 1b600 | 20 20 20 20 20 20 20 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 | ..............................." |
| 1b620 | 30 20 20 20 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 | 0..."........................... |
| 1b640 | 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 | .......(concat.(number-to-string |
| 1b660 | 20 28 6c 65 6e 67 74 68 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 | .(length.calibredb-search-entrie |
| 1b680 | 73 29 29 20 22 20 20 22 29 29 29 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | s)).".."))).'face.'calibredb-sea |
| 1b6a0 | 72 63 68 2d 68 65 61 64 65 72 2d 74 6f 74 61 6c 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 | rch-header-total-face).......... |
| 1b6c0 | 20 20 28 63 6f 6e 64 20 28 28 65 71 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 27 | ..(cond.((eq.calibredb-sort-by.' |
| 1b6e0 | 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 6f 72 74 3a 20 69 64 20 | id)..................."Sort:.id. |
| 1b700 | 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 63 61 6c 69 62 72 65 | ")..................((eq.calibre |
| 1b720 | 64 62 2d 73 6f 72 74 2d 62 79 20 27 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | db-sort-by.'title).............. |
| 1b740 | 20 20 20 20 20 22 53 6f 72 74 3a 20 74 69 74 6c 65 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ....."Sort:.title.")............ |
| 1b760 | 20 20 20 20 20 20 28 28 65 71 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 27 61 75 | ......((eq.calibredb-sort-by.'au |
| 1b780 | 74 68 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 6f 72 74 3a 20 61 | thor)..................."Sort:.a |
| 1b7a0 | 75 74 68 6f 72 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 63 | uthor.")..................((eq.c |
| 1b7c0 | 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 27 66 6f 72 6d 61 74 29 0a 20 20 20 20 20 20 | alibredb-sort-by.'format)....... |
| 1b7e0 | 20 20 20 20 20 20 20 20 20 20 20 20 22 53 6f 72 74 3a 20 66 6f 72 6d 61 74 20 22 29 0a 20 20 20 | ............"Sort:.format.").... |
| 1b800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 | ..............((eq.calibredb-sor |
| 1b820 | 74 2d 62 79 20 27 64 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 | t-by.'date)..................."S |
| 1b840 | 6f 72 74 3a 20 64 61 74 65 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 | ort:.date.")..................(( |
| 1b860 | 65 71 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 27 70 75 62 64 61 74 65 29 0a 20 | eq.calibredb-sort-by.'pubdate).. |
| 1b880 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 6f 72 74 3a 20 70 75 62 64 61 74 65 20 | ................."Sort:.pubdate. |
| 1b8a0 | 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 63 61 6c 69 62 72 65 | ")..................((eq.calibre |
| 1b8c0 | 64 62 2d 73 6f 72 74 2d 62 79 20 27 74 61 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | db-sort-by.'tag)................ |
| 1b8e0 | 20 20 20 22 53 6f 72 74 3a 20 74 61 67 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..."Sort:.tag.")................ |
| 1b900 | 20 20 28 28 65 71 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 27 73 69 7a 65 29 0a | ..((eq.calibredb-sort-by.'size). |
| 1b920 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 6f 72 74 3a 20 73 69 7a 65 20 22 29 | .................."Sort:.size.") |
| 1b940 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 63 61 6c 69 62 72 65 64 62 | ..................((eq.calibredb |
| 1b960 | 2d 73 6f 72 74 2d 62 79 20 27 6c 61 6e 67 75 61 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | -sort-by.'language)............. |
| 1b980 | 20 20 20 20 20 20 22 53 6f 72 74 3a 20 6c 61 6e 67 75 61 67 65 20 22 29 0a 20 20 20 20 20 20 20 | ......"Sort:.language.")........ |
| 1b9a0 | 20 20 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | ..........(t..................." |
| 1b9c0 | 53 6f 72 74 3a 20 69 64 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 | Sort:.id."))............(cond.(( |
| 1b9e0 | 65 71 20 63 61 6c 69 62 72 65 64 62 2d 6f 72 64 65 72 20 27 64 65 73 63 29 0a 20 20 20 20 20 20 | eq.calibredb-order.'desc)....... |
| 1ba00 | 20 20 20 20 20 20 20 20 20 20 20 20 22 e2 86 93 20 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ............".....")............ |
| 1ba20 | 20 20 20 20 20 20 28 28 65 71 20 63 61 6c 69 62 72 65 64 62 2d 6f 72 64 65 72 20 27 61 73 63 29 | ......((eq.calibredb-order.'asc) |
| 1ba40 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 e2 86 91 20 20 22 29 0a 20 20 20 20 | ...................".....")..... |
| 1ba60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 22 e2 86 93 20 20 22 29 29 0a 20 20 20 20 20 20 | .............(t."....."))....... |
| 1ba80 | 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 22 0a | .....(propertize.(format."%s%s". |
| 1baa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ...............................( |
| 1bac0 | 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 20 20 20 20 | cond............................ |
| 1bae0 | 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 66 69 6c 74 65 72 2d 70 20 22 54 61 | .....(calibredb-tag-filter-p."Ta |
| 1bb00 | 67 3a 20 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 | g:.")........................... |
| 1bb20 | 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d 66 69 6c 74 65 72 | ......(calibredb-favorite-filter |
| 1bb40 | 2d 70 20 22 46 61 76 6f 72 69 74 65 3a 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -p."Favorite:.")................ |
| 1bb60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 | .................(calibredb-auth |
| 1bb80 | 6f 72 2d 66 69 6c 74 65 72 2d 70 20 22 41 75 74 68 6f 72 3a 20 22 29 0a 20 20 20 20 20 20 20 20 | or-filter-p."Author:.")......... |
| 1bba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 | ........................(calibre |
| 1bbc0 | 64 62 2d 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 22 44 61 74 65 3a 20 22 29 0a 20 20 20 20 20 | db-date-filter-p."Date:.")...... |
| 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 63 61 6c 69 | ...........................(cali |
| 1bc00 | 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 69 6c 74 65 72 2d 70 20 22 46 6f 72 6d 61 74 3a 20 22 | bredb-format-filter-p."Format:." |
| 1bc20 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | )............................... |
| 1bc40 | 20 20 28 74 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..(t.""))....................... |
| 1bc60 | 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 75 61 6c 20 63 61 6c 69 62 72 65 64 62 2d 73 65 | .........(if.(equal.calibredb-se |
| 1bc80 | 61 72 63 68 2d 66 69 6c 74 65 72 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | arch-filter."")................. |
| 1bca0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 22 0a 20 20 20 20 20 20 20 20 20 20 | ...................""........... |
| 1bcc0 | 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 74 20 63 | .......................(concat.c |
| 1bce0 | 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 72 20 22 20 20 20 22 29 29 29 20 | alibredb-search-filter."..."))). |
| 1bd00 | 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 2d 73 | 'face.'calibredb-search-header-s |
| 1bd20 | 6f 72 74 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 | ort-face)............(propertize |
| 1bd40 | 20 28 6c 65 74 20 28 28 6c 65 6e 20 28 6c 65 6e 67 74 68 20 28 63 61 6c 69 62 72 65 64 62 2d 66 | .(let.((len.(length.(calibredb-f |
| 1bd60 | 69 6e 64 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 73 29 29 29 29 0a 20 20 20 20 20 20 | ind-marked-candidates))))....... |
| 1bd80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 3e 20 6c 65 6e 20 30 29 | ...................(if.(>.len.0) |
| 1bda0 | 0a 20 20 20 20 20 20 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 | ..............................(c |
| 1bdc0 | 6f 6e 63 61 74 20 22 4d 61 72 6b 65 64 3a 20 22 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 | oncat."Marked:.".(number-to-stri |
| 1bde0 | 6e 67 20 6c 65 6e 29 29 20 22 22 29 29 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 | ng.len))."")).'face.'calibredb-s |
| 1be00 | 65 61 72 63 68 2d 68 65 61 64 65 72 2d 66 69 6c 74 65 72 2d 66 61 63 65 29 29 29 29 0a 0a 28 64 | earch-header-filter-face))))..(d |
| 1be20 | 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | efine-derived-mode.calibredb-sea |
| 1be40 | 72 63 68 2d 6d 6f 64 65 20 66 75 6e 64 61 6d 65 6e 74 61 6c 2d 6d 6f 64 65 20 22 63 61 6c 69 62 | rch-mode.fundamental-mode."calib |
| 1be60 | 72 65 64 62 2d 73 65 61 72 63 68 22 0a 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 6c | redb-search"..."Major.mode.for.l |
| 1be80 | 69 73 74 69 6e 67 20 63 61 6c 69 62 72 65 20 65 6e 74 72 69 65 73 2e 0a 5c 5c 7b 63 61 6c 69 62 | isting.calibre.entries..\\{calib |
| 1bea0 | 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 2d 6d 61 70 7d 22 0a 20 20 28 73 65 74 71 20 74 | redb-search-mode-map}"...(setq.t |
| 1bec0 | 72 75 6e 63 61 74 65 2d 6c 69 6e 65 73 20 74 0a 20 20 20 20 20 20 20 20 62 75 66 66 65 72 2d 72 | runcate-lines.t.........buffer-r |
| 1bee0 | 65 61 64 2d 6f 6e 6c 79 20 74 0a 20 20 20 20 20 20 20 20 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 | ead-only.t.........header-line-f |
| 1bf00 | 6f 72 6d 61 74 20 27 28 3a 65 76 61 6c 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 69 62 72 65 64 62 | ormat.'(:eval.(funcall.calibredb |
| 1bf20 | 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 2d 66 75 6e 63 74 69 6f 6e 29 29 29 0a 20 20 28 62 75 | -search-header-function)))...(bu |
| 1bf40 | 66 66 65 72 2d 64 69 73 61 62 6c 65 2d 75 6e 64 6f 29 0a 20 20 28 73 65 74 20 28 6d 61 6b 65 2d | ffer-disable-undo)...(set.(make- |
| 1bf60 | 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 68 6c 2d 6c 69 6e 65 2d 66 61 63 65 29 20 27 63 | local-variable.'hl-line-face).'c |
| 1bf80 | 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 68 65 61 64 65 72 2d 68 69 67 68 6c 69 67 68 74 | alibredb-search-header-highlight |
| 1bfa0 | 2d 66 61 63 65 29 0a 20 20 28 68 6c 2d 6c 69 6e 65 2d 6d 6f 64 65 29 0a 20 20 28 69 66 20 28 62 | -face)...(hl-line-mode)...(if.(b |
| 1bfc0 | 6f 75 6e 64 70 20 27 69 76 79 2d 73 6f 72 74 2d 6d 61 74 63 68 65 73 2d 66 75 6e 63 74 69 6f 6e | oundp.'ivy-sort-matches-function |
| 1bfe0 | 73 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 28 61 64 64 2d 74 6f 2d 6c 69 73 74 20 27 69 76 79 | s-alist).......(add-to-list.'ivy |
| 1c000 | 2d 73 6f 72 74 2d 6d 61 74 63 68 65 73 2d 66 75 6e 63 74 69 6f 6e 73 2d 61 6c 69 73 74 20 27 28 | -sort-matches-functions-alist.'( |
| 1c020 | 63 61 6c 69 62 72 65 64 62 2d 61 64 64 20 2e 20 69 76 79 2d 2d 73 6f 72 74 2d 66 69 6c 65 73 2d | calibredb-add...ivy--sort-files- |
| 1c040 | 62 79 2d 64 61 74 65 29 29 29 0a 20 20 28 69 66 20 28 62 6f 75 6e 64 70 20 27 69 76 79 2d 61 6c | by-date)))...(if.(boundp.'ivy-al |
| 1c060 | 74 2d 64 6f 6e 65 2d 66 75 6e 63 74 69 6f 6e 73 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 28 61 | t-done-functions-alist).......(a |
| 1c080 | 64 64 2d 74 6f 2d 6c 69 73 74 20 27 69 76 79 2d 61 6c 74 2d 64 6f 6e 65 2d 66 75 6e 63 74 69 6f | dd-to-list.'ivy-alt-done-functio |
| 1c0a0 | 6e 73 2d 61 6c 69 73 74 20 27 28 63 61 6c 69 62 72 65 64 62 2d 61 64 64 20 2e 20 69 76 79 2d 2d | ns-alist.'(calibredb-add...ivy-- |
| 1c0c0 | 64 69 72 65 63 74 6f 72 79 2d 64 6f 6e 65 29 29 29 0a 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 6d | directory-done)))...(add-hook.'m |
| 1c0e0 | 69 6e 69 62 75 66 66 65 72 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 23 27 63 61 6c 69 62 72 65 64 62 | inibuffer-setup-hook.#'calibredb |
| 1c100 | 2d 73 65 61 72 63 68 2d 2d 6d 69 6e 69 62 75 66 66 65 72 2d 73 65 74 75 70 29 0a 20 20 28 61 64 | -search--minibuffer-setup)...(ad |
| 1c120 | 64 2d 74 6f 2d 6c 69 73 74 20 27 6d 61 69 6c 63 61 70 2d 6d 69 6d 65 2d 65 78 74 65 6e 73 69 6f | d-to-list.'mailcap-mime-extensio |
| 1c140 | 6e 73 20 27 28 22 2e 65 70 75 62 22 20 2e 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 65 70 75 62 | ns.'(".epub"..."application/epub |
| 1c160 | 2b 7a 69 70 22 29 29 0a 20 20 28 61 64 64 2d 74 6f 2d 6c 69 73 74 20 27 6d 61 69 6c 63 61 70 2d | +zip"))...(add-to-list.'mailcap- |
| 1c180 | 6d 69 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 73 20 27 28 22 2e 6d 6f 62 69 22 20 2e 20 22 61 70 70 | mime-extensions.'(".mobi"..."app |
| 1c1a0 | 6c 69 63 61 74 69 6f 6e 2f 78 2d 6d 6f 62 69 70 6f 63 6b 65 74 2d 65 62 6f 6f 6b 22 29 29 29 0a | lication/x-mobipocket-ebook"))). |
| 1c1c0 | 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 75 73 65 20 28 | .(defun.calibredb-search-mouse.( |
| 1c1e0 | 65 76 65 6e 74 29 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 63 61 6c 69 62 72 65 64 62 2d 65 6e | event)..."Visit.the.calibredb-en |
| 1c200 | 74 72 79 20 63 6c 69 63 6b 20 6f 6e 2e 0a 41 72 67 75 6d 65 6e 74 20 45 56 45 4e 54 20 6d 6f 75 | try.click.on..Argument.EVENT.mou |
| 1c220 | 73 65 20 65 76 65 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 65 22 29 0a 20 | se.event."...(interactive."e").. |
| 1c240 | 20 28 6c 65 74 20 28 28 77 69 6e 64 6f 77 20 28 70 6f 73 6e 2d 77 69 6e 64 6f 77 20 28 65 76 65 | .(let.((window.(posn-window.(eve |
| 1c260 | 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 6f 73 20 28 70 6f | nt-end.event))).........(pos.(po |
| 1c280 | 73 6e 2d 70 6f 69 6e 74 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 29 29 0a 20 20 | sn-point.(event-end.event))))... |
| 1c2a0 | 20 20 28 69 66 20 28 6e 6f 74 20 28 77 69 6e 64 6f 77 70 20 77 69 6e 64 6f 77 29 29 0a 20 20 20 | ..(if.(not.(windowp.window)).... |
| 1c2c0 | 20 20 20 20 20 28 65 72 72 6f 72 20 22 4e 6f 20 65 62 6f 6f 6b 20 63 68 6f 73 65 6e 22 29 29 0a | .....(error."No.ebook.chosen")). |
| 1c2e0 | 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 20 28 63 61 72 20 28 | ....(calibredb-show-entry.(car.( |
| 1c300 | 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e | calibredb-find-candidate-at-poin |
| 1c320 | 74 29 29 29 0a 20 20 20 20 28 73 65 6c 65 63 74 2d 77 69 6e 64 6f 77 20 77 69 6e 64 6f 77 29 0a | t))).....(select-window.window). |
| 1c340 | 20 20 20 20 28 73 65 74 2d 62 75 66 66 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 | ....(set-buffer.(calibredb-searc |
| 1c360 | 68 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 29 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 | h--buffer-name)).....(goto-char. |
| 1c380 | 70 6f 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 76 69 65 77 20 28 29 | pos)))..(defun.calibredb-view.() |
| 1c3a0 | 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2e 22 0a | ..."Visit.the.calibredb-entry.". |
| 1c3c0 | 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f | ..(interactive)...(calibredb-sho |
| 1c3e0 | 77 2d 65 6e 74 72 79 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e | w-entry.(car.(calibredb-find-can |
| 1c400 | 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 20 3a 73 77 69 74 63 68 29 29 0a 0a 28 64 65 | didate-at-point)).:switch))..(de |
| 1c420 | 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 20 28 29 0a | fun.calibredb-search-refresh.(). |
| 1c440 | 20 20 22 52 65 66 72 65 73 68 20 63 61 6c 69 62 72 65 64 62 2e 22 0a 20 20 28 69 6e 74 65 72 61 | .."Refresh.calibredb."...(intera |
| 1c460 | 63 74 69 76 65 29 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d | ctive)...(setq.calibredb-search- |
| 1c480 | 65 6e 74 72 69 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 64 61 74 65 73 29 29 0a | entries.(calibredb-candidates)). |
| 1c4a0 | 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 20 63 | ..(setq.calibredb-full-entries.c |
| 1c4c0 | 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 29 0a 20 20 28 63 61 6c 69 | alibredb-search-entries)...(cali |
| 1c4e0 | 62 72 65 64 62 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 | bredb))..(defun.calibredb-search |
| 1c500 | 2d 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 62 65 | -refresh-or-resume.(&optional.be |
| 1c520 | 67 69 6e 20 70 6f 73 69 74 69 6f 6e 29 0a 20 20 22 52 65 66 72 65 73 68 20 63 61 6c 69 62 72 65 | gin.position)..."Refresh.calibre |
| 1c540 | 64 62 20 6f 72 20 72 65 73 75 6d 65 20 74 68 65 20 42 45 47 49 4e 20 70 6f 69 6e 74 20 61 6e 64 | db.or.resume.the.BEGIN.point.and |
| 1c560 | 20 77 69 6e 64 6f 77 73 20 50 4f 53 49 54 49 4f 4e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 | .windows.POSITION."...(interacti |
| 1c580 | 76 65 29 0a 20 20 28 6c 65 74 20 28 62 65 67 20 70 6f 73 29 0a 20 20 20 20 28 73 65 74 71 20 62 | ve)...(let.(beg.pos).....(setq.b |
| 1c5a0 | 65 67 20 28 6f 72 20 62 65 67 69 6e 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 73 65 74 71 | eg.(or.begin.(point))).....(setq |
| 1c5c0 | 20 70 6f 73 20 28 6f 72 20 70 6f 73 69 74 69 6f 6e 20 28 77 69 6e 64 6f 77 2d 73 74 61 72 74 29 | .pos.(or.position.(window-start) |
| 1c5e0 | 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 63 61 6c 69 62 72 65 64 62 | )).....(if.(not.(equal.calibredb |
| 1c600 | 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 72 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f | -search-filter."")).........(pro |
| 1c620 | 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 | gn...........(calibredb-search-r |
| 1c640 | 65 66 72 65 73 68 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | efresh)...........(calibredb-sea |
| 1c660 | 72 63 68 2d 75 70 64 61 74 65 20 3a 66 6f 72 63 65 29 29 0a 20 20 20 20 20 20 28 63 61 6c 69 62 | rch-update.:force)).......(calib |
| 1c680 | 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 29 29 0a 20 20 20 20 28 73 65 74 2d 77 | redb-search-refresh)).....(set-w |
| 1c6a0 | 69 6e 64 6f 77 2d 73 74 61 72 74 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 20 70 6f | indow-start.(selected-window).po |
| 1c6c0 | 73 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 62 65 67 29 0a 20 20 20 20 28 68 6c 2d 6c | s).....(goto-char.beg).....(hl-l |
| 1c6e0 | 69 6e 65 2d 6d 6f 64 65 20 31 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d | ine-mode.1)))..(defun.calibredb- |
| 1c700 | 73 65 61 72 63 68 2d 74 6f 67 67 6c 65 2d 76 69 65 77 2d 72 65 66 72 65 73 68 20 28 29 0a 20 20 | search-toggle-view-refresh.()... |
| 1c720 | 22 54 4f 44 4f 20 52 65 66 72 65 73 68 20 63 61 6c 69 62 72 65 64 62 20 77 68 65 6e 20 74 6f 67 | "TODO.Refresh.calibredb.when.tog |
| 1c740 | 67 6c 65 20 76 69 65 77 20 67 6f 74 6f 20 74 68 65 20 74 68 65 20 73 61 6d 65 20 69 64 20 65 62 | gle.view.goto.the.the.same.id.eb |
| 1c760 | 6f 6f 6b 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 69 | ook."...(interactive)...(let.((i |
| 1c780 | 64 20 28 63 61 6c 69 62 72 65 64 62 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 73 20 22 69 64 22 | d.(calibredb-read-metadatas."id" |
| 1c7a0 | 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 63 61 6c 69 62 72 65 64 | ))).....(if.(not.(equal.calibred |
| 1c7c0 | 62 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 72 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 | b-search-filter."")).........(pr |
| 1c7e0 | 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d | ogn...........(calibredb-search- |
| 1c800 | 72 65 66 72 65 73 68 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 | refresh)...........(calibredb-se |
| 1c820 | 61 72 63 68 2d 75 70 64 61 74 65 20 3a 66 6f 72 63 65 29 29 0a 20 20 20 20 20 20 28 63 61 6c 69 | arch-update.:force)).......(cali |
| 1c840 | 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 29 29 0a 20 20 20 20 28 77 68 69 6c | bredb-search-refresh)).....(whil |
| 1c860 | 65 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 72 65 61 64 | e.(not.(equal.id.(calibredb-read |
| 1c880 | 2d 6d 65 74 61 64 61 74 61 73 20 22 69 64 22 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 77 61 72 | -metadatas."id"))).......(forwar |
| 1c8a0 | 64 2d 6c 69 6e 65 20 31 29 29 0a 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e | d-line.1)).....(beginning-of-lin |
| 1c8c0 | 65 29 0a 20 20 20 20 28 72 65 63 65 6e 74 65 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 | e).....(recenter)))..(defun.cali |
| 1c8e0 | 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 61 6e 64 2d 63 6c 65 61 72 2d 66 | bredb-search-refresh-and-clear-f |
| 1c900 | 69 6c 74 65 72 20 28 29 0a 20 20 22 52 65 66 72 65 73 68 20 63 61 6c 69 62 72 65 64 62 20 61 6e | ilter.()..."Refresh.calibredb.an |
| 1c920 | 64 20 63 6c 65 61 72 20 74 68 65 20 66 69 74 6c 65 72 20 6b 65 79 77 6f 72 64 2e 22 0a 20 20 28 | d.clear.the.fitler.keyword."...( |
| 1c940 | 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 | interactive)...(calibredb-search |
| 1c960 | 2d 72 65 66 72 65 73 68 29 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d | -refresh)...(setq.calibredb-tag- |
| 1c980 | 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d | filter-p.nil)...(setq.calibredb- |
| 1c9a0 | 66 61 76 6f 72 69 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 20 63 | favorite-filter-p.nil)...(setq.c |
| 1c9c0 | 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 | alibredb-author-filter-p.nil)... |
| 1c9e0 | 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 | (setq.calibredb-date-filter-p.ni |
| 1ca00 | 6c 29 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 69 6c 74 | l)...(setq.calibredb-format-filt |
| 1ca20 | 65 72 2d 70 20 6e 69 6c 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6b 65 | er-p.nil)...(calibredb-search-ke |
| 1ca40 | 79 77 6f 72 64 2d 66 69 6c 74 65 72 20 22 22 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 | yword-filter.""))..(defun.calibr |
| 1ca60 | 65 64 62 2d 73 65 61 72 63 68 2d 63 6c 65 61 72 2d 66 69 6c 74 65 72 20 28 29 0a 20 20 22 43 6c | edb-search-clear-filter.()..."Cl |
| 1ca80 | 65 61 72 20 74 68 65 20 66 69 74 6c 65 72 20 6b 65 79 77 6f 72 64 2e 22 0a 20 20 28 69 6e 74 65 | ear.the.fitler.keyword."...(inte |
| 1caa0 | 72 61 63 74 69 76 65 29 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 66 | ractive)...(setq.calibredb-tag-f |
| 1cac0 | 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 | ilter-p.nil)...(setq.calibredb-f |
| 1cae0 | 61 76 6f 72 69 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 20 63 61 | avorite-filter-p.nil)...(setq.ca |
| 1cb00 | 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 28 | libredb-author-filter-p.nil)...( |
| 1cb20 | 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c | setq.calibredb-date-filter-p.nil |
| 1cb40 | 29 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 69 6c 74 65 | )...(setq.calibredb-format-filte |
| 1cb60 | 72 2d 70 20 6e 69 6c 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6b 65 79 | r-p.nil)...(calibredb-search-key |
| 1cb80 | 77 6f 72 64 2d 66 69 6c 74 65 72 20 22 22 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 | word-filter.""))..(defun.calibre |
| 1cba0 | 64 62 2d 73 65 61 72 63 68 2d 71 75 69 74 20 28 29 0a 20 20 22 51 75 69 74 20 2a 63 61 6c 69 62 | db-search-quit.()..."Quit.*calib |
| 1cbc0 | 72 65 64 62 2d 65 6e 74 72 79 2a 20 6f 72 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 | redb-entry*.or.*calibredb-search |
| 1cbe0 | 2a 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 65 71 20 | *."...(interactive)...(when.(eq. |
| 1cc00 | 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 | major-mode.'calibredb-search-mod |
| 1cc20 | 65 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 67 65 74 2d 62 75 66 66 65 72 20 22 2a 63 61 6c 69 | e).....(cond.((get-buffer."*cali |
| 1cc40 | 62 72 65 64 62 2d 65 6e 74 72 79 2a 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 70 2d 74 | bredb-entry*")............(pop-t |
| 1cc60 | 6f 2d 62 75 66 66 65 72 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2a 22 29 0a 20 20 | o-buffer."*calibredb-entry*")... |
| 1cc80 | 20 20 20 20 20 20 20 20 20 28 69 66 20 28 3c 20 28 6c 65 6e 67 74 68 20 28 77 69 6e 64 6f 77 2d | .........(if.(<.(length.(window- |
| 1cca0 | 70 72 65 76 2d 62 75 66 66 65 72 73 29 29 20 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | prev-buffers)).2)............... |
| 1ccc0 | 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 28 71 75 69 74 2d 77 | .(progn..................(quit-w |
| 1cce0 | 69 6e 64 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 | indow)..................(kill-bu |
| 1cd00 | 66 66 65 72 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2a 22 29 29 0a 20 20 20 20 20 | ffer."*calibredb-entry*"))...... |
| 1cd20 | 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 22 2a 63 61 6c 69 62 72 65 64 62 | ........(kill-buffer."*calibredb |
| 1cd40 | 2d 65 6e 74 72 79 2a 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 67 65 74 2d 62 75 66 66 | -entry*")))...........((get-buff |
| 1cd60 | 65 72 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 22 29 0a 20 20 20 20 20 20 20 | er."*calibredb-search*")........ |
| 1cd80 | 20 20 20 20 28 71 75 69 74 2d 77 69 6e 64 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6b 69 | ....(quit-window)............(ki |
| 1cda0 | 6c 6c 2d 62 75 66 66 65 72 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 22 29 29 | ll-buffer."*calibredb-search*")) |
| 1cdc0 | 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 6d 61 72 6b 2d 61 74 2d 70 6f | )))..(defun.calibredb-mark-at-po |
| 1cde0 | 69 6e 74 20 28 29 0a 20 20 22 4d 61 72 6b 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 2e | int.()..."Mark.the.current.line. |
| 1ce00 | 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 72 65 6d 6f 76 65 2d 6f 76 65 72 | "...(interactive)...(remove-over |
| 1ce20 | 6c 61 79 73 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 20 28 | lays.(line-beginning-position).( |
| 1ce40 | 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 62 65 | line-end-position))...(let*.((be |
| 1ce60 | 67 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 | g.(line-beginning-position)).... |
| 1ce80 | 20 20 20 20 20 20 28 65 6e 64 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 0a | ......(end.(line-end-position)). |
| 1cea0 | 20 20 20 20 20 20 20 20 20 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 0a 20 | .........(inhibit-read-only.t).. |
| 1cec0 | 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 62 | ........(overlay.(make-overlay.b |
| 1cee0 | 65 67 20 65 6e 64 29 29 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 65 72 6c | eg.end))).....(overlay-put.overl |
| 1cf00 | 61 79 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 6d 61 72 6b 2d 66 61 63 65 29 0a 20 | ay.'face.'calibredb-mark-face).. |
| 1cf20 | 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 62 65 67 20 65 6e 64 20 27 63 | ...(put-text-property.beg.end.'c |
| 1cf40 | 61 6c 69 62 72 65 64 62 2d 6d 61 72 6b 20 3f 3e 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 | alibredb-mark.?>)))..(defun.cali |
| 1cf60 | 62 72 65 64 62 2d 6d 61 72 6b 2d 61 6e 64 2d 66 6f 72 77 61 72 64 20 28 29 0a 20 20 22 4d 61 72 | bredb-mark-and-forward.()..."Mar |
| 1cf80 | 6b 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 61 6e 64 20 66 6f 72 77 61 72 64 2e 22 | k.the.current.line.and.forward." |
| 1cfa0 | 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6d 61 | ...(interactive)...(calibredb-ma |
| 1cfc0 | 72 6b 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6e 65 78 74 2d 65 | rk-at-point)...(calibredb-next-e |
| 1cfe0 | 6e 74 72 79 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 75 6e 6d 61 72 6b 2d | ntry))..(defun.calibredb-unmark- |
| 1d000 | 61 6e 64 2d 66 6f 72 77 61 72 64 20 28 29 0a 20 20 22 55 6e 6d 61 72 6b 20 74 68 65 20 63 75 72 | and-forward.()..."Unmark.the.cur |
| 1d020 | 72 65 6e 74 20 6c 69 6e 65 20 61 6e 64 20 66 6f 72 77 61 72 64 2e 22 0a 20 20 28 69 6e 74 65 72 | rent.line.and.forward."...(inter |
| 1d040 | 61 63 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 75 6e 6d 61 72 6b 2d 61 74 2d 70 | active)...(calibredb-unmark-at-p |
| 1d060 | 6f 69 6e 74 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6e 65 78 74 2d 65 6e 74 72 79 29 29 0a | oint)...(calibredb-next-entry)). |
| 1d080 | 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 75 6e 6d 61 72 6b 2d 61 6e 64 2d 62 61 63 | .(defun.calibredb-unmark-and-bac |
| 1d0a0 | 6b 77 61 72 64 20 28 29 0a 20 20 22 55 6e 6d 61 72 6b 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c | kward.()..."Unmark.the.current.l |
| 1d0c0 | 69 6e 65 20 61 6e 64 20 62 61 63 6b 77 61 72 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 | ine.and.backward."...(interactiv |
| 1d0e0 | 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 70 72 65 76 69 6f 75 73 2d 65 6e 74 72 79 29 0a | e)...(calibredb-previous-entry). |
| 1d100 | 20 20 28 63 61 6c 69 62 72 65 64 62 2d 75 6e 6d 61 72 6b 2d 61 74 2d 70 6f 69 6e 74 29 29 0a 0a | ..(calibredb-unmark-at-point)).. |
| 1d120 | 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 75 6e 6d 61 72 6b 2d 61 74 2d 70 6f 69 6e 74 | (defun.calibredb-unmark-at-point |
| 1d140 | 20 28 29 0a 20 20 22 55 6e 6d 61 72 6b 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 2e 22 | .()..."Unmark.the.current.line." |
| 1d160 | 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 62 65 67 20 28 | ...(interactive)...(let*.((beg.( |
| 1d180 | 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 | line-beginning-position))....... |
| 1d1a0 | 20 20 20 28 65 6e 64 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 | ...(end.(line-end-position)).... |
| 1d1c0 | 20 20 20 20 20 20 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 | ......(inhibit-read-only.t)).... |
| 1d1e0 | 20 28 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 73 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e | .(remove-overlays.(line-beginnin |
| 1d200 | 67 2d 70 6f 73 69 74 69 6f 6e 29 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 | g-position).(line-end-position)) |
| 1d220 | 0a 20 20 20 20 28 72 65 6d 6f 76 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 62 65 67 | .....(remove-text-properties.beg |
| 1d240 | 20 65 6e 64 20 27 28 63 61 6c 69 62 72 65 64 62 2d 6d 61 72 6b 20 6e 69 6c 29 29 29 29 0a 0a 28 | .end.'(calibredb-mark.nil))))..( |
| 1d260 | 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 64 65 6e 73 65 2d 63 6f 6d 6d 65 6e 74 | defun.calibredb-condense-comment |
| 1d280 | 73 20 28 73 74 72 29 0a 20 20 22 43 6f 6e 64 65 6e 73 65 20 77 68 69 74 65 73 70 61 63 65 20 69 | s.(str)..."Condense.whitespace.i |
| 1d2a0 | 6e 20 53 54 52 20 69 6e 74 6f 20 61 20 73 69 6e 67 6c 65 20 73 70 61 63 65 2e 22 0a 20 20 28 72 | n.STR.into.a.single.space."...(r |
| 1d2c0 | 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 5b 5b 3a 73 70 61 63 | eplace-regexp-in-string."[[:spac |
| 1d2e0 | 65 3a 5d 5c 6e 5c 72 5d 2b 22 20 22 20 22 20 73 74 72 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c | e:]\n\r]+".".".str))..(defun.cal |
| 1d300 | 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d 6d 6f 75 73 65 2d 31 20 28 65 76 65 6e 74 29 0a | ibredb-favorite-mouse-1.(event). |
| 1d320 | 20 20 22 56 69 73 69 74 20 74 68 65 20 6c 6f 63 61 74 69 6f 6e 20 63 6c 69 63 6b 20 6f 6e 2e 0a | .."Visit.the.location.click.on.. |
| 1d340 | 41 72 67 75 6d 65 6e 74 20 45 56 45 4e 54 20 6d 6f 75 73 65 20 65 76 65 6e 74 2e 22 0a 20 20 28 | Argument.EVENT.mouse.event."...( |
| 1d360 | 69 6e 74 65 72 61 63 74 69 76 65 20 22 65 22 29 0a 20 20 28 6c 65 74 20 28 28 77 69 6e 64 6f 77 | interactive."e")...(let.((window |
| 1d380 | 20 28 70 6f 73 6e 2d 77 69 6e 64 6f 77 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 | .(posn-window.(event-end.event)) |
| 1d3a0 | 29 0a 20 20 20 20 20 20 20 20 28 70 6f 73 20 28 70 6f 73 6e 2d 70 6f 69 6e 74 20 28 65 76 65 6e | ).........(pos.(posn-point.(even |
| 1d3c0 | 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 77 69 | t-end.event)))).....(if.(not.(wi |
| 1d3e0 | 6e 64 6f 77 70 20 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 4e | ndowp.window)).........(error."N |
| 1d400 | 6f 20 66 61 76 6f 72 69 74 65 20 63 68 6f 73 65 6e 22 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 | o.favorite.chosen")).....(with-c |
| 1d420 | 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 77 69 6e | urrent-buffer.(window-buffer.win |
| 1d440 | 64 6f 77 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 70 6f 73 29 0a 20 20 20 20 20 | dow).......(goto-char.pos)...... |
| 1d460 | 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 66 69 6c 74 65 72 2d 70 20 6e 69 | .(setq.calibredb-tag-filter-p.ni |
| 1d480 | 6c 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 | l).......(setq.calibredb-favorit |
| 1d4a0 | 65 2d 66 69 6c 74 65 72 2d 70 20 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 | e-filter-p.t).......(setq.calibr |
| 1d4c0 | 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 | edb-author-filter-p.nil).......( |
| 1d4e0 | 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c | setq.calibredb-date-filter-p.nil |
| 1d500 | 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 | ).......(setq.calibredb-format-f |
| 1d520 | 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 | ilter-p.nil).......(calibredb-se |
| 1d540 | 61 72 63 68 2d 6b 65 79 77 6f 72 64 2d 66 69 6c 74 65 72 20 63 61 6c 69 62 72 65 64 62 2d 66 61 | arch-keyword-filter.calibredb-fa |
| 1d560 | 76 6f 72 69 74 65 2d 6b 65 79 77 6f 72 64 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 | vorite-keyword))))..(defun.calib |
| 1d580 | 72 65 64 62 2d 74 61 67 2d 6d 6f 75 73 65 2d 31 20 28 65 76 65 6e 74 29 0a 20 20 22 56 69 73 69 | redb-tag-mouse-1.(event)..."Visi |
| 1d5a0 | 74 20 74 68 65 20 6c 6f 63 61 74 69 6f 6e 20 63 6c 69 63 6b 20 6f 6e 2e 0a 41 72 67 75 6d 65 6e | t.the.location.click.on..Argumen |
| 1d5c0 | 74 20 45 56 45 4e 54 20 6d 6f 75 73 65 20 65 76 65 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 | t.EVENT.mouse.event."...(interac |
| 1d5e0 | 74 69 76 65 20 22 65 22 29 0a 20 20 28 6c 65 74 20 28 28 77 69 6e 64 6f 77 20 28 70 6f 73 6e 2d | tive."e")...(let.((window.(posn- |
| 1d600 | 77 69 6e 64 6f 77 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 29 0a 20 20 20 20 20 | window.(event-end.event)))...... |
| 1d620 | 20 20 20 28 70 6f 73 20 28 70 6f 73 6e 2d 70 6f 69 6e 74 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 | ...(pos.(posn-point.(event-end.e |
| 1d640 | 76 65 6e 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 77 69 6e 64 6f 77 70 20 77 | vent)))).....(if.(not.(windowp.w |
| 1d660 | 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 4e 6f 20 74 61 67 20 63 | indow)).........(error."No.tag.c |
| 1d680 | 68 6f 73 65 6e 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 | hosen")).....(with-current-buffe |
| 1d6a0 | 72 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 77 69 6e 64 6f 77 29 0a 20 20 20 20 20 20 28 | r.(window-buffer.window).......( |
| 1d6c0 | 67 6f 74 6f 2d 63 68 61 72 20 70 6f 73 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 | goto-char.pos).......(setq.calib |
| 1d6e0 | 72 65 64 62 2d 74 61 67 2d 66 69 6c 74 65 72 2d 70 20 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 | redb-tag-filter-p.t).......(setq |
| 1d700 | 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c | .calibredb-favorite-filter-p.nil |
| 1d720 | 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 | ).......(setq.calibredb-author-f |
| 1d740 | 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 | ilter-p.nil).......(setq.calibre |
| 1d760 | 64 62 2d 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 73 65 74 | db-date-filter-p.nil).......(set |
| 1d780 | 71 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 | q.calibredb-format-filter-p.nil) |
| 1d7a0 | 0a 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6b 65 79 77 6f 72 64 | .......(calibredb-search-keyword |
| 1d7c0 | 2d 66 69 6c 74 65 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e | -filter.(get-text-property.(poin |
| 1d7e0 | 74 29 20 27 74 61 67 20 6e 69 6c 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 | t).'tag.nil)))))..(defun.calibre |
| 1d800 | 64 62 2d 61 75 74 68 6f 72 2d 6d 6f 75 73 65 2d 31 20 28 65 76 65 6e 74 29 0a 20 20 22 56 69 73 | db-author-mouse-1.(event)..."Vis |
| 1d820 | 69 74 20 74 68 65 20 6c 6f 63 61 74 69 6f 6e 20 63 6c 69 63 6b 20 6f 6e 2e 0a 41 72 67 75 6d 65 | it.the.location.click.on..Argume |
| 1d840 | 6e 74 20 45 56 45 4e 54 20 6d 6f 75 73 65 20 65 76 65 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 | nt.EVENT.mouse.event."...(intera |
| 1d860 | 63 74 69 76 65 20 22 65 22 29 0a 20 20 28 6c 65 74 20 28 28 77 69 6e 64 6f 77 20 28 70 6f 73 6e | ctive."e")...(let.((window.(posn |
| 1d880 | 2d 77 69 6e 64 6f 77 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 29 0a 20 20 20 20 | -window.(event-end.event)))..... |
| 1d8a0 | 20 20 20 20 28 70 6f 73 20 28 70 6f 73 6e 2d 70 6f 69 6e 74 20 28 65 76 65 6e 74 2d 65 6e 64 20 | ....(pos.(posn-point.(event-end. |
| 1d8c0 | 65 76 65 6e 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 77 69 6e 64 6f 77 70 20 | event)))).....(if.(not.(windowp. |
| 1d8e0 | 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 4e 6f 20 61 75 74 68 | window)).........(error."No.auth |
| 1d900 | 6f 72 20 63 68 6f 73 65 6e 22 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 | or.chosen")).....(with-current-b |
| 1d920 | 75 66 66 65 72 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 77 69 6e 64 6f 77 29 0a 20 20 20 | uffer.(window-buffer.window).... |
| 1d940 | 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 70 6f 73 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 | ...(goto-char.pos).......(setq.c |
| 1d960 | 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 | alibredb-tag-filter-p.nil)...... |
| 1d980 | 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d 66 69 6c 74 65 72 | .(setq.calibredb-favorite-filter |
| 1d9a0 | 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 61 75 | -p.nil).......(setq.calibredb-au |
| 1d9c0 | 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 20 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c | thor-filter-p.t).......(setq.cal |
| 1d9e0 | 69 62 72 65 64 62 2d 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 | ibredb-date-filter-p.nil)....... |
| 1da00 | 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 69 6c 74 65 72 2d 70 20 | (setq.calibredb-format-filter-p. |
| 1da20 | 6e 69 6c 29 0a 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6b 65 79 | nil).......(calibredb-search-key |
| 1da40 | 77 6f 72 64 2d 66 69 6c 74 65 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 | word-filter.(get-text-property.( |
| 1da60 | 70 6f 69 6e 74 29 20 27 61 75 74 68 6f 72 20 6e 69 6c 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 | point).'author.nil)))))..(defun. |
| 1da80 | 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 6d 6f 75 73 65 2d 31 20 28 65 76 65 6e 74 29 | calibredb-format-mouse-1.(event) |
| 1daa0 | 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 6c 6f 63 61 74 69 6f 6e 20 63 6c 69 63 6b 20 6f 6e 2e | ..."Visit.the.location.click.on. |
| 1dac0 | 0a 41 72 67 75 6d 65 6e 74 20 45 56 45 4e 54 20 6d 6f 75 73 65 20 65 76 65 6e 74 2e 22 0a 20 20 | .Argument.EVENT.mouse.event."... |
| 1dae0 | 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 65 22 29 0a 20 20 28 6c 65 74 20 28 28 77 69 6e 64 6f | (interactive."e")...(let.((windo |
| 1db00 | 77 20 28 70 6f 73 6e 2d 77 69 6e 64 6f 77 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 | w.(posn-window.(event-end.event) |
| 1db20 | 29 29 0a 20 20 20 20 20 20 20 20 28 70 6f 73 20 28 70 6f 73 6e 2d 70 6f 69 6e 74 20 28 65 76 65 | )).........(pos.(posn-point.(eve |
| 1db40 | 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 77 | nt-end.event)))).....(if.(not.(w |
| 1db60 | 69 6e 64 6f 77 70 20 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 | indowp.window)).........(error." |
| 1db80 | 4e 6f 20 66 6f 72 6d 61 74 20 63 68 6f 73 65 6e 22 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 | No.format.chosen")).....(with-cu |
| 1dba0 | 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 77 69 6e 64 | rrent-buffer.(window-buffer.wind |
| 1dbc0 | 6f 77 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 70 6f 73 29 0a 20 20 20 20 20 20 | ow).......(goto-char.pos)....... |
| 1dbe0 | 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c | (setq.calibredb-tag-filter-p.nil |
| 1dc00 | 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 | ).......(setq.calibredb-favorite |
| 1dc20 | 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 | -filter-p.nil).......(setq.calib |
| 1dc40 | 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 | redb-author-filter-p.nil)....... |
| 1dc60 | 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 | (setq.calibredb-date-filter-p.ni |
| 1dc80 | 6c 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d | l).......(setq.calibredb-format- |
| 1dca0 | 66 69 6c 74 65 72 2d 70 20 74 29 0a 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | filter-p.t).......(calibredb-sea |
| 1dcc0 | 72 63 68 2d 6b 65 79 77 6f 72 64 2d 66 69 6c 74 65 72 20 28 77 6f 72 64 2d 61 74 2d 70 6f 69 6e | rch-keyword-filter.(word-at-poin |
| 1dce0 | 74 20 74 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d | t.t)))))..(defun.calibredb-date- |
| 1dd00 | 6d 6f 75 73 65 2d 31 20 28 65 76 65 6e 74 29 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 6c 6f 63 | mouse-1.(event)..."Visit.the.loc |
| 1dd20 | 61 74 69 6f 6e 20 63 6c 69 63 6b 20 6f 6e 2e 0a 41 72 67 75 6d 65 6e 74 20 45 56 45 4e 54 20 6d | ation.click.on..Argument.EVENT.m |
| 1dd40 | 6f 75 73 65 20 65 76 65 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 65 22 29 | ouse.event."...(interactive."e") |
| 1dd60 | 0a 20 20 28 6c 65 74 20 28 28 77 69 6e 64 6f 77 20 28 70 6f 73 6e 2d 77 69 6e 64 6f 77 20 28 65 | ...(let.((window.(posn-window.(e |
| 1dd80 | 76 65 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 6f 73 20 28 | vent-end.event))).........(pos.( |
| 1dda0 | 70 6f 73 6e 2d 70 6f 69 6e 74 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 29 29 0a | posn-point.(event-end.event)))). |
| 1ddc0 | 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 77 69 6e 64 6f 77 70 20 77 69 6e 64 6f 77 29 29 0a 20 | ....(if.(not.(windowp.window)).. |
| 1dde0 | 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 4e 6f 20 61 75 74 68 6f 72 20 63 68 6f 73 65 6e 22 | .......(error."No.author.chosen" |
| 1de00 | 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 28 77 69 6e | )).....(with-current-buffer.(win |
| 1de20 | 64 6f 77 2d 62 75 66 66 65 72 20 77 69 6e 64 6f 77 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 | dow-buffer.window).......(goto-c |
| 1de40 | 68 61 72 20 70 6f 73 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 74 | har.pos).......(setq.calibredb-t |
| 1de60 | 61 67 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c | ag-filter-p.nil).......(setq.cal |
| 1de80 | 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 | ibredb-favorite-filter-p.nil)... |
| 1dea0 | 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 | ....(setq.calibredb-author-filte |
| 1dec0 | 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 | r-p.nil).......(setq.calibredb-d |
| 1dee0 | 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 | ate-filter-p.t).......(setq.cali |
| 1df00 | 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 | bredb-format-filter-p.nil)...... |
| 1df20 | 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6b 65 79 77 6f 72 64 2d 66 69 6c 74 65 | .(calibredb-search-keyword-filte |
| 1df40 | 72 20 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 27 73 79 6d 62 6f 6c 20 74 29 29 29 29 29 | r.(thing-at-point.'symbol.t))))) |
| 1df60 | 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6c 65 2d 6d 6f 75 73 65 2d 31 20 | ..(defun.calibredb-file-mouse-1. |
| 1df80 | 28 65 76 65 6e 74 29 0a 20 20 22 56 69 73 69 74 20 74 68 65 20 66 69 6c 65 20 63 6c 69 63 6b 20 | (event)..."Visit.the.file.click. |
| 1dfa0 | 6f 6e 2e 0a 41 72 67 75 6d 65 6e 74 20 45 56 45 4e 54 20 6d 6f 75 73 65 20 65 76 65 6e 74 2e 22 | on..Argument.EVENT.mouse.event." |
| 1dfc0 | 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 65 22 29 0a 20 20 28 6c 65 74 20 28 28 77 69 | ...(interactive."e")...(let.((wi |
| 1dfe0 | 6e 64 6f 77 20 28 70 6f 73 6e 2d 77 69 6e 64 6f 77 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 76 65 | ndow.(posn-window.(event-end.eve |
| 1e000 | 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 6f 73 20 28 70 6f 73 6e 2d 70 6f 69 6e 74 20 28 | nt))).........(pos.(posn-point.( |
| 1e020 | 65 76 65 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 | event-end.event)))).....(if.(not |
| 1e040 | 20 28 77 69 6e 64 6f 77 70 20 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f | .(windowp.window)).........(erro |
| 1e060 | 72 20 22 4e 6f 20 65 62 6f 6f 6b 20 63 68 6f 73 65 6e 22 29 29 0a 20 20 20 20 28 77 69 74 68 2d | r."No.ebook.chosen")).....(with- |
| 1e080 | 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 77 69 | current-buffer.(window-buffer.wi |
| 1e0a0 | 6e 64 6f 77 29 0a 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 77 69 6e | ndow).......(find-file-other-win |
| 1e0c0 | 64 6f 77 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 70 6f 73 20 27 68 65 6c 70 | dow.(get-text-property.pos.'help |
| 1e0e0 | 2d 65 63 68 6f 20 6e 69 6c 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 | -echo.nil)))))..(defun.calibredb |
| 1e100 | 2d 66 69 6c 65 2d 6d 6f 75 73 65 2d 33 20 28 65 76 65 6e 74 29 0a 20 20 22 56 69 73 69 74 20 74 | -file-mouse-3.(event)..."Visit.t |
| 1e120 | 68 65 20 66 69 6c 65 20 63 6c 69 63 6b 20 6f 6e 20 69 6e 20 64 65 66 61 75 6c 74 20 74 6f 6f 6c | he.file.click.on.in.default.tool |
| 1e140 | 2e 0a 41 72 67 75 6d 65 6e 74 20 45 56 45 4e 54 20 6d 6f 75 73 65 20 65 76 65 6e 74 2e 22 0a 20 | ..Argument.EVENT.mouse.event.".. |
| 1e160 | 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 65 22 29 0a 20 20 28 6c 65 74 20 28 28 77 69 6e 64 | .(interactive."e")...(let.((wind |
| 1e180 | 6f 77 20 28 70 6f 73 6e 2d 77 69 6e 64 6f 77 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 76 65 6e 74 | ow.(posn-window.(event-end.event |
| 1e1a0 | 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 6f 73 20 28 70 6f 73 6e 2d 70 6f 69 6e 74 20 28 65 76 | ))).........(pos.(posn-point.(ev |
| 1e1c0 | 65 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 | ent-end.event)))).....(if.(not.( |
| 1e1e0 | 77 69 6e 64 6f 77 70 20 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 | windowp.window)).........(error. |
| 1e200 | 22 4e 6f 20 65 62 6f 6f 6b 20 63 68 6f 73 65 6e 22 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 | "No.ebook.chosen")).....(with-cu |
| 1e220 | 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 77 69 6e 64 | rrent-buffer.(window-buffer.wind |
| 1e240 | 6f 77 29 0a 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 77 69 74 68 2d 64 | ow).......(calibredb-open-with-d |
| 1e260 | 65 66 61 75 6c 74 2d 74 6f 6f 6c 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 70 | efault-tool.(get-text-property.p |
| 1e280 | 6f 73 20 27 68 65 6c 70 2d 65 63 68 6f 20 6e 69 6c 29 29 29 29 29 0a 0a 3b 3b 20 66 61 76 6f 72 | os.'help-echo.nil)))))..;;.favor |
| 1e2a0 | 69 74 65 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 66 61 76 | ite..(defun.calibredb-toggle-fav |
| 1e2c0 | 6f 72 69 74 65 2d 61 74 2d 70 6f 69 6e 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6b 65 79 77 6f 72 | orite-at-point.(&optional.keywor |
| 1e2e0 | 64 29 0a 20 20 22 54 6f 67 67 6c 65 20 66 61 76 6f 72 69 74 65 20 74 68 65 20 63 75 72 72 65 6e | d)..."Toggle.favorite.the.curren |
| 1e300 | 74 20 69 74 65 6d 2e 0a 41 72 67 75 6d 65 6e 74 20 4b 45 59 57 4f 52 44 20 69 73 20 74 68 65 20 | t.item..Argument.KEYWORD.is.the. |
| 1e320 | 74 61 67 20 6b 65 79 77 6f 72 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 | tag.keyword."...(interactive)... |
| 1e340 | 28 6c 65 74 20 28 28 63 61 6e 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e | (let.((candidates.(calibredb-fin |
| 1e360 | 64 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 73 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 | d-marked-candidates))).....(unle |
| 1e380 | 73 73 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 | ss.candidates.......(setq.candid |
| 1e3a0 | 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 | ates.(calibredb-find-candidate-a |
| 1e3c0 | 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 | t-point))).....(calibredb-toggle |
| 1e3e0 | 2d 6d 65 74 61 64 61 74 61 2d 70 72 6f 63 65 73 73 20 63 61 6e 64 69 64 61 74 65 73 20 28 6f 72 | -metadata-process.candidates.(or |
| 1e400 | 20 6b 65 79 77 6f 72 64 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d 6b 65 79 77 | .keyword.calibredb-favorite-keyw |
| 1e420 | 6f 72 64 20 29 29 29 29 0a 0a 3b 3b 20 68 69 67 68 6c 69 67 68 74 0a 28 64 65 66 75 6e 20 63 61 | ord.))))..;;.highlight.(defun.ca |
| 1e440 | 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 68 69 67 68 6c 69 67 68 74 2d 61 74 2d 70 6f 69 6e | libredb-toggle-highlight-at-poin |
| 1e460 | 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6b 65 79 77 6f 72 64 29 0a 20 20 22 54 6f 67 67 6c 65 20 | t.(&optional.keyword)..."Toggle. |
| 1e480 | 68 69 67 68 6c 69 67 68 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 69 74 65 6d 2e 0a 41 72 67 75 | highlight.the.current.item..Argu |
| 1e4a0 | 6d 65 6e 74 20 4b 45 59 57 4f 52 44 20 69 73 20 74 68 65 20 74 61 67 20 6b 65 79 77 6f 72 64 2e | ment.KEYWORD.is.the.tag.keyword. |
| 1e4c0 | 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 69 | "...(interactive)...(let.((candi |
| 1e4e0 | 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 6d 61 72 6b 65 64 2d 63 61 6e | dates.(calibredb-find-marked-can |
| 1e500 | 64 69 64 61 74 65 73 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 | didates))).....(unless.candidate |
| 1e520 | 73 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 | s.......(setq.candidates.(calibr |
| 1e540 | 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 | edb-find-candidate-at-point))).. |
| 1e560 | 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 6d 65 74 61 64 61 74 61 2d 70 72 | ...(calibredb-toggle-metadata-pr |
| 1e580 | 6f 63 65 73 73 20 63 61 6e 64 69 64 61 74 65 73 20 28 6f 72 20 6b 65 79 77 6f 72 64 20 63 61 6c | ocess.candidates.(or.keyword.cal |
| 1e5a0 | 69 62 72 65 64 62 2d 68 69 67 68 6c 69 67 68 74 2d 6b 65 79 77 6f 72 64 20 29 29 29 29 0a 0a 3b | ibredb-highlight-keyword.))))..; |
| 1e5c0 | 3b 20 61 72 63 68 69 76 65 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c | ;.archive.(defun.calibredb-toggl |
| 1e5e0 | 65 2d 61 72 63 68 69 76 65 2d 61 74 2d 70 6f 69 6e 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6b 65 | e-archive-at-point.(&optional.ke |
| 1e600 | 79 77 6f 72 64 29 0a 20 20 22 54 6f 67 67 6c 65 20 61 72 63 68 69 76 65 20 74 68 65 20 63 75 72 | yword)..."Toggle.archive.the.cur |
| 1e620 | 72 65 6e 74 20 69 74 65 6d 2e 0a 41 72 67 75 6d 65 6e 74 20 4b 45 59 57 4f 52 44 20 69 73 20 74 | rent.item..Argument.KEYWORD.is.t |
| 1e640 | 68 65 20 74 61 67 20 6b 65 79 77 6f 72 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 | he.tag.keyword."...(interactive) |
| 1e660 | 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d | ...(let.((candidates.(calibredb- |
| 1e680 | 66 69 6e 64 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 73 29 29 29 0a 20 20 20 20 28 75 | find-marked-candidates))).....(u |
| 1e6a0 | 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e | nless.candidates.......(setq.can |
| 1e6c0 | 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 | didates.(calibredb-find-candidat |
| 1e6e0 | 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 | e-at-point))).....(calibredb-tog |
| 1e700 | 67 6c 65 2d 6d 65 74 61 64 61 74 61 2d 70 72 6f 63 65 73 73 20 63 61 6e 64 69 64 61 74 65 73 20 | gle-metadata-process.candidates. |
| 1e720 | 28 6f 72 20 6b 65 79 77 6f 72 64 20 63 61 6c 69 62 72 65 64 62 2d 61 72 63 68 69 76 65 2d 6b 65 | (or.keyword.calibredb-archive-ke |
| 1e740 | 79 77 6f 72 64 20 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 | yword.))))..(defun.calibredb-tog |
| 1e760 | 67 6c 65 2d 6d 65 74 61 64 61 74 61 2d 70 72 6f 63 65 73 73 20 28 63 61 6e 64 73 20 6b 65 79 77 | gle-metadata-process.(cands.keyw |
| 1e780 | 6f 72 64 29 0a 20 20 22 52 75 6e 20 73 65 71 75 65 6e 74 69 61 6c 20 70 72 6f 63 65 73 73 65 73 | ord)..."Run.sequential.processes |
| 1e7a0 | 20 74 6f 20 74 6f 67 67 6c 65 20 6d 65 74 61 64 61 74 61 2e 0a 41 72 67 75 6d 65 6e 74 20 43 41 | .to.toggle.metadata..Argument.CA |
| 1e7c0 | 4e 44 53 20 69 73 20 74 68 65 20 6c 69 73 74 20 6f 66 20 63 61 6e 64 69 61 74 65 73 2e 0a 41 72 | NDS.is.the.list.of.candiates..Ar |
| 1e7e0 | 67 75 6d 65 6e 74 20 4b 45 59 57 4f 52 44 20 69 73 20 74 68 65 20 6d 65 74 61 64 61 74 61 20 6b | gument.KEYWORD.is.the.metadata.k |
| 1e800 | 65 79 77 6f 72 64 20 74 6f 20 62 65 20 74 6f 67 67 6c 65 64 2e 22 0a 20 20 28 6c 65 74 2a 20 28 | eyword.to.be.toggled."...(let*.( |
| 1e820 | 28 63 61 6e 64 20 28 70 6f 70 20 63 61 6e 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 61 67 | (cand.(pop.cands))..........(tag |
| 1e840 | 73 20 28 63 61 6c 69 62 72 65 64 62 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 73 20 22 74 61 67 | s.(calibredb-read-metadatas."tag |
| 1e860 | 73 22 20 63 61 6e 64 29 29 29 0a 20 20 20 20 3b 3b 20 28 70 70 20 63 61 6e 64 29 0a 20 20 20 20 | s".cand))).....;;.(pp.cand)..... |
| 1e880 | 28 69 66 20 63 61 6e 64 0a 20 20 20 20 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 73 65 | (if.cand.........(set-process-se |
| 1e8a0 | 6e 74 69 6e 65 6c 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 69 64 20 28 63 61 6c 69 | ntinel..........(let*.((id.(cali |
| 1e8c0 | 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 3a 69 64 29 29 29 0a 20 20 20 20 20 20 | bredb-getattr.cand.:id)))....... |
| 1e8e0 | 20 20 20 20 20 28 69 66 20 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 6b 65 79 77 6f 72 64 20 74 61 | .....(if.(s-contains?.keyword.ta |
| 1e900 | 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 70 72 | gs)................(calibredb-pr |
| 1e920 | 6f 63 65 73 73 20 3a 63 6f 6d 6d 61 6e 64 20 22 73 65 74 5f 6d 65 74 61 64 61 74 61 22 0a 20 20 | ocess.:command."set_metadata"... |
| 1e940 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1e960 | 3a 6f 70 74 69 6f 6e 20 28 66 6f 72 6d 61 74 20 22 2d 2d 66 69 65 6c 64 20 74 61 67 73 3a 5c 22 | :option.(format."--field.tags:\" |
| 1e980 | 25 73 5c 22 22 20 28 73 2d 72 65 70 6c 61 63 65 20 6b 65 79 77 6f 72 64 20 22 22 20 74 61 67 73 | %s\"".(s-replace.keyword."".tags |
| 1e9a0 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | )).............................. |
| 1e9c0 | 20 20 20 20 20 3a 69 64 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .....:id.id..................... |
| 1e9e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 | ..............:library.(format." |
| 1ea00 | 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 20 5c 22 25 73 5c 22 22 20 63 61 6c 69 62 72 65 64 62 | --library-path.\"%s\"".calibredb |
| 1ea20 | 2d 72 6f 6f 74 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 | -root-dir))..............(calibr |
| 1ea40 | 65 64 62 2d 70 72 6f 63 65 73 73 20 3a 63 6f 6d 6d 61 6e 64 20 22 73 65 74 5f 6d 65 74 61 64 61 | edb-process.:command."set_metada |
| 1ea60 | 74 61 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 | ta"............................. |
| 1ea80 | 20 20 20 20 3a 6f 70 74 69 6f 6e 20 28 66 6f 72 6d 61 74 20 22 2d 2d 66 69 65 6c 64 20 74 61 67 | ....:option.(format."--field.tag |
| 1eaa0 | 73 3a 5c 22 25 73 2c 25 73 5c 22 22 20 74 61 67 73 20 6b 65 79 77 6f 72 64 29 0a 20 20 20 20 20 | s:\"%s,%s\"".tags.keyword)...... |
| 1eac0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 69 | ...........................:id.i |
| 1eae0 | 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d............................... |
| 1eb00 | 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 | ..:library.(format."--library-pa |
| 1eb20 | 74 68 20 5c 22 25 73 5c 22 22 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 29 29 29 | th.\"%s\"".calibredb-root-dir))) |
| 1eb40 | 29 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 70 20 5f 65 29 0a 20 20 20 20 20 20 | )..........(lambda.(p._e)....... |
| 1eb60 | 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 30 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 | .....(when.(=.0.(process-exit-st |
| 1eb80 | 61 74 75 73 20 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 | atus.p))..............(calibredb |
| 1eba0 | 2d 74 6f 67 67 6c 65 2d 6d 65 74 61 64 61 74 61 2d 70 72 6f 63 65 73 73 20 63 61 6e 64 73 20 6b | -toggle-metadata-process.cands.k |
| 1ebc0 | 65 79 77 6f 72 64 29 29 29 29 0a 20 20 20 20 20 20 3b 3b 20 69 66 20 6e 6f 20 63 61 6e 64 69 64 | eyword)))).......;;.if.no.candid |
| 1ebe0 | 61 74 65 20 6c 65 66 74 20 74 6f 20 62 65 20 70 72 6f 63 65 73 73 65 64 2c 20 72 65 66 72 65 73 | ate.left.to.be.processed,.refres |
| 1ec00 | 68 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 0a 20 20 20 20 20 20 28 63 6f 6e 64 | h.*calibredb-search*.......(cond |
| 1ec20 | 20 28 28 65 71 75 61 6c 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 | .((equal.major-mode.'calibredb-s |
| 1ec40 | 68 6f 77 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 | how-mode)..............(calibred |
| 1ec60 | 62 2d 73 68 6f 77 2d 72 65 66 72 65 73 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 | b-show-refresh)).............((e |
| 1ec80 | 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d | q.major-mode.'calibredb-search-m |
| 1eca0 | 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | ode)..............(calibredb-sea |
| 1ecc0 | 72 63 68 2d 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 29 0a 20 20 20 20 20 20 20 20 | rch-refresh-or-resume))......... |
| 1ece0 | 20 20 20 20 28 74 20 6e 69 6c 29 29 29 29 29 0a 3b 3b 20 6c 69 76 65 20 66 69 6c 74 65 72 69 6e | ....(t.nil))))).;;.live.filterin |
| 1ed00 | 67 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 2d 75 70 64 61 | g..(defun.calibredb-search--upda |
| 1ed20 | 74 65 2d 6c 69 73 74 20 28 29 0a 20 20 22 55 70 64 61 74 65 20 60 63 61 6c 69 62 72 65 64 62 2d | te-list.()..."Update.`calibredb- |
| 1ed40 | 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 27 20 6c 69 73 74 2e 22 0a 20 20 3b 3b 20 72 65 70 6c | search-entries'.list."...;;.repl |
| 1ed60 | 61 63 65 20 73 70 61 63 65 20 77 69 74 68 20 5f 20 28 53 51 4c 29 20 54 68 65 20 75 6e 64 65 72 | ace.space.with._.(SQL).The.under |
| 1ed80 | 73 63 6f 72 65 20 72 65 70 72 65 73 65 6e 74 73 20 61 20 73 69 6e 67 6c 65 20 63 68 61 72 61 63 | score.represents.a.single.charac |
| 1eda0 | 74 65 72 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 74 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d | ter...(let*.((filter.(calibredb- |
| 1edc0 | 73 65 61 72 63 68 2d 70 61 72 73 65 2d 66 69 6c 74 65 72 20 63 61 6c 69 62 72 65 64 62 2d 73 65 | search-parse-filter.calibredb-se |
| 1ede0 | 61 72 63 68 2d 66 69 6c 74 65 72 29 29 20 3b 3b 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 | arch-filter)).;;.(replace-regexp |
| 1ee00 | 2d 69 6e 2d 73 74 72 69 6e 67 20 22 20 22 20 22 5f 22 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | -in-string."."."_".calibredb-sea |
| 1ee20 | 72 63 68 2d 66 69 6c 74 65 72 29 0a 20 20 20 20 20 20 20 20 20 28 68 65 61 64 20 28 63 61 6c 69 | rch-filter)..........(head.(cali |
| 1ee40 | 62 72 65 64 62 2d 63 61 6e 64 69 64 61 74 65 2d 66 69 6c 74 65 72 20 66 69 6c 74 65 72 29 29 29 | bredb-candidate-filter.filter))) |
| 1ee60 | 0a 20 20 20 20 3b 3b 20 44 65 74 65 72 6d 69 6e 65 20 74 68 65 20 66 69 6e 61 6c 20 6c 69 73 74 | .....;;.Determine.the.final.list |
| 1ee80 | 20 6f 72 64 65 72 0a 20 20 20 20 28 6c 65 74 20 28 28 65 6e 74 72 69 65 73 20 68 65 61 64 29 29 | .order.....(let.((entries.head)) |
| 1eea0 | 0a 20 20 20 20 20 20 28 73 65 74 66 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e | .......(setf.calibredb-search-en |
| 1eec0 | 74 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 74 72 69 65 73 29 29 29 29 0a 0a 28 | tries.............entries))))..( |
| 1eee0 | 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 70 72 69 6e 74 2d 65 6e 74 | defun.calibredb-search-print-ent |
| 1ef00 | 72 79 2d 2d 64 65 66 61 75 6c 74 20 28 65 6e 74 72 79 29 0a 20 20 22 50 72 69 6e 74 20 45 4e 54 | ry--default.(entry)..."Print.ENT |
| 1ef20 | 52 59 20 74 6f 20 74 68 65 20 62 75 66 66 65 72 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 28 65 71 | RY.to.the.buffer."...(unless.(eq |
| 1ef40 | 75 61 6c 20 65 6e 74 72 79 20 22 22 29 0a 20 20 20 20 28 6c 65 74 20 28 28 63 6f 6e 74 65 6e 74 | ual.entry."").....(let.((content |
| 1ef60 | 20 28 63 61 72 20 65 6e 74 72 79 29 29 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20 20 20 28 73 65 | .(car.entry)).beg.end).......(se |
| 1ef80 | 74 71 20 62 65 67 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 63 6f | tq.beg.(point)).......(insert.co |
| 1efa0 | 6e 74 65 6e 74 29 0a 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 | ntent).......(calibredb-detailed |
| 1efc0 | 2d 76 69 65 77 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 65 6e 74 72 79 29 0a 20 20 20 20 20 20 | -view-insert-image.entry)....... |
| 1efe0 | 28 73 65 74 71 20 65 6e 64 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 28 70 75 74 2d 74 65 | (setq.end.(point)).......(put-te |
| 1f000 | 78 74 2d 70 72 6f 70 65 72 74 79 20 62 65 67 20 65 6e 64 20 27 63 61 6c 69 62 72 65 64 62 2d 65 | xt-property.beg.end.'calibredb-e |
| 1f020 | 6e 74 72 79 20 65 6e 74 72 79 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 | ntry.entry))))..(defun.calibredb |
| 1f040 | 2d 73 65 61 72 63 68 2d 2d 6d 69 6e 69 62 75 66 66 65 72 2d 73 65 74 75 70 20 28 29 0a 20 20 22 | -search--minibuffer-setup.()..." |
| 1f060 | 53 65 74 20 75 70 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 20 66 6f 72 20 6c 69 76 65 20 66 | Set.up.the.minibuffer.for.live.f |
| 1f080 | 69 6c 74 65 72 69 6e 67 2e 22 0a 20 20 28 77 68 65 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | iltering."...(when.calibredb-sea |
| 1f0a0 | 72 63 68 2d 66 69 6c 74 65 72 2d 61 63 74 69 76 65 0a 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 | rch-filter-active.....(when.(eq. |
| 1f0c0 | 3a 6c 69 76 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 72 2d 61 63 | :live.calibredb-search-filter-ac |
| 1f0e0 | 74 69 76 65 29 0a 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 70 6f 73 74 2d 63 6f 6d 6d | tive).......(add-hook.'post-comm |
| 1f100 | 61 6e 64 2d 68 6f 6f 6b 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 2d 6c 69 76 | and-hook.#'calibredb-search--liv |
| 1f120 | 65 2d 75 70 64 61 74 65 20 6e 69 6c 20 3a 6c 6f 63 61 6c 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 | e-update.nil.:local))))..(defun. |
| 1f140 | 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 2d 6c 69 76 65 2d 75 70 64 61 74 65 20 28 29 | calibredb-search--live-update.() |
| 1f160 | 0a 20 20 22 55 70 64 61 74 65 20 74 68 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 20 | ..."Update.the.calibredb-search. |
| 1f180 | 62 75 66 66 65 72 20 62 61 73 65 64 20 6f 6e 20 74 68 65 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 | buffer.based.on.the.contents.of. |
| 1f1a0 | 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 2e 22 0a 20 20 28 77 68 65 6e 20 28 65 71 20 3a 6c 69 | the.minibuffer."...(when.(eq.:li |
| 1f1c0 | 76 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 72 2d 61 63 74 69 76 | ve.calibredb-search-filter-activ |
| 1f1e0 | 65 29 0a 20 20 20 20 3b 3b 20 28 6d 65 73 73 61 67 65 20 22 48 45 4c 4c 4f 22 29 0a 20 20 20 20 | e).....;;.(message."HELLO")..... |
| 1f200 | 28 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d | (let.((buffer.(calibredb-search- |
| 1f220 | 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 65 6e 74 2d 66 69 6c 74 | buffer))...........(current-filt |
| 1f240 | 65 72 20 28 6d 69 6e 69 62 75 66 66 65 72 2d 63 6f 6e 74 65 6e 74 73 2d 6e 6f 2d 70 72 6f 70 65 | er.(minibuffer-contents-no-prope |
| 1f260 | 72 74 69 65 73 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 62 75 66 66 65 72 0a 20 20 20 20 | rties))).......(when.buffer..... |
| 1f280 | 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 0a | ....(with-current-buffer.buffer. |
| 1f2a0 | 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 | ..........(let.((calibredb-searc |
| 1f2c0 | 68 2d 66 69 6c 74 65 72 20 63 75 72 72 65 6e 74 2d 66 69 6c 74 65 72 29 29 0a 20 20 20 20 20 20 | h-filter.current-filter))....... |
| 1f2e0 | 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 75 70 64 61 74 65 20 3a | ......(calibredb-search-update.: |
| 1f300 | 66 6f 72 63 65 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 | force)))))))..(defun.calibredb-s |
| 1f320 | 65 61 72 63 68 2d 6c 69 76 65 2d 66 69 6c 74 65 72 20 28 29 0a 20 20 22 46 69 6c 74 65 72 20 74 | earch-live-filter.()..."Filter.t |
| 1f340 | 68 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 20 62 75 66 66 65 72 20 61 73 20 74 68 | he.calibredb-search.buffer.as.th |
| 1f360 | 65 20 66 69 6c 74 65 72 20 69 73 20 77 72 69 74 74 65 6e 2e 0a 43 75 72 72 65 6e 74 6c 79 2c 20 | e.filter.is.written..Currently,. |
| 1f380 | 74 68 65 20 66 69 6c 74 65 72 69 6e 67 20 69 73 20 63 6f 6c 75 6d 6e 2d 6f 72 69 65 6e 74 65 64 | the.filtering.is.column-oriented |
| 1f3a0 | 2c 20 6e 6f 74 20 62 75 66 66 65 72 20 6f 72 69 65 6e 74 65 64 2e 0a 54 68 65 20 66 6f 6c 6c 6f | ,.not.buffer.oriented..The.follo |
| 1f3c0 | 77 69 6e 67 20 63 6f 6c 75 6d 6e 73 20 77 69 6c 6c 20 62 65 20 73 65 61 72 63 68 65 64 3a 0a 0a | wing.columns.will.be.searched:.. |
| 1f3e0 | 2d 20 69 64 0a 2d 20 74 65 78 74 0a 2d 20 74 61 67 0a 2d 20 74 69 74 6c 65 0a 2d 20 66 6f 72 6d | -.id.-.text.-.tag.-.title.-.form |
| 1f400 | 61 74 0a 2d 20 61 75 74 68 6f 72 5f 73 6f 72 74 0a 0a 49 66 20 74 68 65 20 6b 65 79 77 6f 72 64 | at.-.author_sort..If.the.keyword |
| 1f420 | 20 6f 63 63 75 72 73 20 69 6e 20 61 6e 79 20 6f 66 20 74 68 65 20 63 6f 6c 75 6d 6e 73 20 61 62 | .occurs.in.any.of.the.columns.ab |
| 1f440 | 6f 76 65 2c 20 74 68 65 20 6d 61 74 63 68 65 64 0a 65 62 6f 6f 6b 20 72 65 63 6f 72 64 20 77 69 | ove,.the.matched.ebook.record.wi |
| 1f460 | 6c 6c 20 62 65 20 73 68 6f 77 6e 2e 0a 0a 31 2e 20 4c 69 76 65 20 66 69 6c 74 65 72 20 69 73 20 | ll.be.shown...1..Live.filter.is. |
| 1f480 | 66 61 73 74 65 72 20 74 68 61 6e 20 62 65 66 6f 72 65 20 73 69 6e 63 65 20 69 74 20 73 65 61 72 | faster.than.before.since.it.sear |
| 1f4a0 | 63 68 20 74 68 65 20 72 65 73 75 6c 74 73 0a 20 20 20 69 6e 20 3d 63 61 6c 69 62 72 65 64 62 2d | ch.the.results....in.=calibredb- |
| 1f4c0 | 66 75 6c 6c 2d 65 6e 74 72 69 65 73 3d 20 72 61 74 68 65 72 20 74 68 61 6e 20 71 75 65 72 79 20 | full-entries=.rather.than.query. |
| 1f4e0 | 74 68 65 20 64 61 74 61 62 61 73 65 2e 0a 0a 32 2e 20 54 68 65 20 6b 65 79 77 6f 72 64 20 73 75 | the.database...2..The.keyword.su |
| 1f500 | 70 70 6f 72 74 73 20 52 45 47 45 58 2e 0a 0a 33 2e 20 49 6e 73 65 72 74 69 6e 67 20 53 70 61 63 | pports.REGEX...3..Inserting.Spac |
| 1f520 | 65 73 20 62 65 74 77 65 65 6e 0a 20 20 20 6b 65 79 77 6f 72 64 73 20 63 61 6e 20 6e 61 72 72 6f | es.between....keywords.can.narro |
| 1f540 | 77 20 64 6f 77 6e 20 74 68 65 20 73 65 61 72 63 68 20 72 65 73 75 6c 74 73 2e 22 0a 0a 20 20 28 | w.down.the.search.results."....( |
| 1f560 | 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 | interactive)...(unwind-protect.. |
| 1f580 | 20 20 20 20 20 28 6c 65 74 20 28 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 66 69 6c | .....(let.((calibredb-search-fil |
| 1f5a0 | 74 65 72 2d 61 63 74 69 76 65 20 3a 6c 69 76 65 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 | ter-active.:live)).........(setq |
| 1f5c0 | 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 72 0a 20 20 20 20 20 20 20 | .calibredb-search-filter........ |
| 1f5e0 | 20 20 20 20 20 20 20 28 72 65 61 64 2d 66 72 6f 6d 2d 6d 69 6e 69 62 75 66 66 65 72 20 28 66 6f | .......(read-from-minibuffer.(fo |
| 1f600 | 72 6d 61 74 20 22 46 69 6c 74 65 72 20 25 73 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | rmat."Filter.%s:.".............. |
| 1f620 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ...............................( |
| 1f640 | 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 20 20 20 20 | cond............................ |
| 1f660 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 74 61 67 | ..................(calibredb-tag |
| 1f680 | 2d 66 69 6c 74 65 72 2d 70 20 22 28 74 61 67 29 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | -filter-p."(tag)").............. |
| 1f6a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1f6c0 | 28 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d 66 69 6c 74 65 72 2d 70 20 22 28 66 | (calibredb-favorite-filter-p."(f |
| 1f6e0 | 61 76 6f 72 69 74 65 29 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | avorite)")...................... |
| 1f700 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 | ........................(calibre |
| 1f720 | 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 20 22 28 61 75 74 68 6f 72 29 22 29 0a 20 | db-author-filter-p."(author)").. |
| 1f740 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 1f760 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 69 6c 74 | ............(calibredb-date-filt |
| 1f780 | 65 72 2d 70 20 22 28 64 61 74 65 29 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | er-p."(date)").................. |
| 1f7a0 | 20 20 20 20 20 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 6c | ............................(cal |
| 1f7c0 | 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 69 6c 74 65 72 2d 70 20 22 28 66 6f 72 6d 61 74 29 | ibredb-format-filter-p."(format) |
| 1f7e0 | 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ").............................. |
| 1f800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 22 28 6c 69 76 65 29 22 29 29 29 20 63 | ................(t."(live)"))).c |
| 1f820 | 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 72 29 29 0a 20 20 20 20 20 20 20 | alibredb-search-filter))........ |
| 1f840 | 20 28 6d 65 73 73 61 67 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 | .(message.calibredb-search-filte |
| 1f860 | 72 29 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 75 70 64 61 74 65 | r)).....(calibredb-search-update |
| 1f880 | 20 3a 66 6f 72 63 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | .:force)))..(defun.calibredb-sea |
| 1f8a0 | 72 63 68 2d 6b 65 79 77 6f 72 64 2d 66 69 6c 74 65 72 20 28 6b 65 79 77 6f 72 64 29 0a 20 20 22 | rch-keyword-filter.(keyword)..." |
| 1f8c0 | 46 69 6c 74 65 72 20 74 68 65 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 20 62 75 66 66 | Filter.the.calibredb-search.buff |
| 1f8e0 | 65 72 20 77 69 74 68 20 4b 45 59 57 4f 52 44 2e 22 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 | er.with.KEYWORD."...(setq.calibr |
| 1f900 | 65 64 62 2d 73 65 61 72 63 68 2d 66 69 6c 74 65 72 20 6b 65 79 77 6f 72 64 29 0a 20 20 28 63 61 | edb-search-filter.keyword)...(ca |
| 1f920 | 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 75 70 64 61 74 65 20 3a 66 6f 72 63 65 29 29 0a 0a | libredb-search-update.:force)).. |
| 1f940 | 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 75 70 64 61 74 65 20 28 | (defun.calibredb-search-update.( |
| 1f960 | 26 6f 70 74 69 6f 6e 61 6c 20 66 6f 72 63 65 29 0a 20 20 22 55 70 64 61 74 65 20 74 68 65 20 63 | &optional.force)..."Update.the.c |
| 1f980 | 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 20 62 75 66 66 65 72 20 6c 69 73 74 69 6e 67 20 74 | alibredb-search.buffer.listing.t |
| 1f9a0 | 6f 20 6d 61 74 63 68 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 0a 57 68 65 6e 20 46 4f 52 43 45 | o.match.the.database..When.FORCE |
| 1f9c0 | 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 72 65 64 72 61 77 20 65 76 65 6e 20 77 68 65 6e 20 74 68 | .is.non-nil,.redraw.even.when.th |
| 1f9e0 | 65 20 64 61 74 61 62 61 73 65 20 68 61 73 6e 27 74 20 63 68 61 6e 67 65 64 2e 22 0a 20 20 28 69 | e.database.hasn't.changed."...(i |
| 1fa00 | 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 | nteractive)...(with-current-buff |
| 1fa20 | 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 62 75 66 66 65 72 29 0a 20 20 20 | er.(calibredb-search-buffer).... |
| 1fa40 | 20 28 77 68 65 6e 20 66 6f 72 63 65 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 | .(when.force.......(let.((inhibi |
| 1fa60 | 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 61 6e | t-read-only.t).............(stan |
| 1fa80 | 64 61 72 64 2d 6f 75 74 70 75 74 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 | dard-output.(current-buffer))).. |
| 1faa0 | 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 3b 3b | .......(erase-buffer).........;; |
| 1fac0 | 20 72 65 73 65 74 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 | .reset.calibredb-virtual-library |
| 1fae0 | 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 2d 63 6f 6e 74 61 69 6e 73 | -name.........(unless.(-contains |
| 1fb00 | 3f 20 28 6d 61 70 63 61 72 20 23 27 63 64 72 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 | ?.(mapcar.#'cdr.calibredb-virtua |
| 1fb20 | 6c 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 | l-library-alist).calibredb-searc |
| 1fb40 | 68 2d 66 69 6c 74 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 | h-filter)...........(setq.calibr |
| 1fb60 | 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 6e 61 6d 65 20 63 61 6c 69 62 72 65 | edb-virtual-library-name.calibre |
| 1fb80 | 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 64 65 66 61 75 6c 74 2d 6e 61 6d 65 29 | db-virtual-library-default-name) |
| 1fba0 | 29 0a 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 2d 75 70 64 | ).........(calibredb-search--upd |
| 1fbc0 | 61 74 65 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 28 73 65 74 71 20 63 61 6c 69 62 | ate-list).........;;.(setq.calib |
| 1fbe0 | 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 63 | redb-search-entries.(calibredb-c |
| 1fc00 | 61 6e 64 69 64 61 74 65 73 29 29 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 65 6e 74 | andidates)).........(dolist.(ent |
| 1fc20 | 72 79 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 29 0a 20 20 20 | ry.calibredb-search-entries).... |
| 1fc40 | 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 | .......(funcall.calibredb-search |
| 1fc60 | 2d 70 72 69 6e 74 2d 65 6e 74 72 79 2d 66 75 6e 63 74 69 6f 6e 20 65 6e 74 72 79 29 0a 20 20 20 | -print-entry-function.entry).... |
| 1fc80 | 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 20 3b 3b | .......(insert."\n")).........;; |
| 1fca0 | 20 28 69 6e 73 65 72 74 20 22 45 6e 64 20 6f 66 20 65 6e 74 72 69 65 73 2e 5c 6e 22 29 0a 20 20 | .(insert."End.of.entries.\n")... |
| 1fcc0 | 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 69 6e 29 29 20 20 20 | ......(goto-char.(point-min))... |
| 1fce0 | 20 20 20 20 20 20 3b 20 62 61 63 6b 20 74 6f 20 70 6f 69 6e 74 2d 6d 69 6e 20 61 66 74 65 72 20 | ......;.back.to.point-min.after. |
| 1fd00 | 66 69 6c 74 65 72 69 6e 67 0a 20 20 20 20 20 20 20 20 28 73 65 74 66 20 63 61 6c 69 62 72 65 64 | filtering.........(setf.calibred |
| 1fd20 | 62 2d 73 65 61 72 63 68 2d 6c 61 73 74 2d 75 70 64 61 74 65 20 28 66 6c 6f 61 74 2d 74 69 6d 65 | b-search-last-update.(float-time |
| 1fd40 | 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d | ))))))..(defun.calibredb-search- |
| 1fd60 | 70 61 72 73 65 2d 66 69 6c 74 65 72 20 28 66 69 6c 74 65 72 29 0a 20 20 22 50 61 72 73 65 20 74 | parse-filter.(filter)..."Parse.t |
| 1fd80 | 68 65 20 65 6c 65 6d 65 6e 74 73 20 6f 66 20 61 20 73 65 61 72 63 68 20 46 49 4c 54 45 52 20 69 | he.elements.of.a.search.FILTER.i |
| 1fda0 | 6e 74 6f 20 61 20 70 6c 69 73 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 6d 61 74 63 68 65 73 20 28 | nto.a.plist."...(let.((matches.( |
| 1fdc0 | 29 29 29 0a 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 65 6c 65 6d 65 6e 74 20 69 6e 20 | ))).....(cl-loop.for.element.in. |
| 1fde0 | 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 66 69 6c 74 65 72 29 20 63 6f 6c 6c 65 63 74 0a 20 20 | (split-string.filter).collect... |
| 1fe00 | 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 63 61 6c 69 62 72 65 64 62 2d 76 61 6c 69 | ...........(when.(calibredb-vali |
| 1fe20 | 64 2d 72 65 67 65 78 70 2d 70 20 65 6c 65 6d 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | d-regexp-p.element)............. |
| 1fe40 | 20 20 20 28 70 75 73 68 20 65 6c 65 6d 65 6e 74 20 6d 61 74 63 68 65 73 29 29 29 0a 20 20 20 20 | ...(push.element.matches)))..... |
| 1fe60 | 60 28 2c 40 28 69 66 20 6d 61 74 63 68 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 | `(,@(if.matches.............(lis |
| 1fe80 | 74 20 3a 6d 61 74 63 68 65 73 20 6d 61 74 63 68 65 73 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 | t.:matches.matches)))))..(defun. |
| 1fea0 | 63 61 6c 69 62 72 65 64 62 2d 76 61 6c 69 64 2d 72 65 67 65 78 70 2d 70 20 28 72 65 67 65 78 70 | calibredb-valid-regexp-p.(regexp |
| 1fec0 | 29 0a 20 20 22 52 65 74 75 72 6e 20 74 20 69 66 20 52 45 47 45 58 50 20 69 73 20 61 20 76 61 6c | )..."Return.t.if.REGEXP.is.a.val |
| 1fee0 | 69 64 20 52 45 47 45 58 50 2e 22 0a 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 0a 20 20 20 | id.REGEXP."...(ignore-errors.... |
| 1ff00 | 20 28 70 72 6f 67 31 20 74 0a 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 | .(prog1.t.......(string-match-p. |
| 1ff20 | 72 65 67 65 78 70 20 22 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d | regexp.""))))..(defun.calibredb- |
| 1ff40 | 63 61 6e 64 69 64 61 74 65 2d 66 69 6c 74 65 72 20 28 66 69 6c 74 65 72 29 0a 20 20 22 47 65 6e | candidate-filter.(filter)..."Gen |
| 1ff60 | 65 72 61 74 65 20 65 62 6f 6f 6b 20 63 61 6e 64 69 64 61 74 65 20 61 6c 69 73 74 2e 0a 41 52 47 | erate.ebook.candidate.alist..ARG |
| 1ff80 | 55 4d 45 4e 54 20 46 49 4c 54 45 52 20 69 73 20 74 68 65 20 66 69 6c 74 65 72 20 73 74 72 69 6e | UMENT.FILTER.is.the.filter.strin |
| 1ffa0 | 67 2e 22 0a 20 20 28 6c 65 74 20 28 28 6d 61 74 63 68 65 73 20 28 70 6c 69 73 74 2d 67 65 74 20 | g."...(let.((matches.(plist-get. |
| 1ffc0 | 66 69 6c 74 65 72 20 3a 6d 61 74 63 68 65 73 29 29 0a 20 20 20 20 20 20 20 20 72 65 73 2d 6c 69 | filter.:matches)).........res-li |
| 1ffe0 | 73 74 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 66 69 6c | st).....(cond.(calibredb-tag-fil |
| 20000 | 74 65 72 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 6c 69 | ter-p............(cl-loop.for.li |
| 20020 | 6e 65 20 69 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 20 64 6f 0a | ne.in.calibredb-full-entries.do. |
| 20040 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 76 61 6c 20 60 28 61 6e 64 20 2c 40 28 | .............(if.(eval.`(and.,@( |
| 20060 | 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 72 65 67 65 78 20 69 6e 20 6d 61 74 63 68 65 73 20 63 6f 6c | cl-loop.for.regex.in.matches.col |
| 20080 | 6c 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | lect............................ |
| 200a0 | 20 20 20 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 63 61 6c | .............(unless.(equal.(cal |
| 200c0 | 69 62 72 65 64 62 2d 74 61 67 2d 77 69 64 74 68 29 20 30 29 20 28 73 2d 63 6f 6e 74 61 69 6e 73 | ibredb-tag-width).0).(s-contains |
| 200e0 | 3f 20 72 65 67 65 78 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 | ?.regex.(calibredb-getattr.(cdr. |
| 20100 | 6c 69 6e 65 29 20 3a 74 61 67 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | line).:tag))))))................ |
| 20120 | 20 20 28 70 75 73 68 20 6c 69 6e 65 20 72 65 73 2d 6c 69 73 74 29 29 29 29 0a 20 20 20 20 20 20 | ..(push.line.res-list))))....... |
| 20140 | 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 69 6c 74 65 72 2d 70 0a 20 | ....(calibredb-format-filter-p.. |
| 20160 | 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 6c 69 6e 65 20 69 6e 20 63 | ..........(cl-loop.for.line.in.c |
| 20180 | 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 20 64 6f 0a 20 20 20 20 20 20 20 | alibredb-full-entries.do........ |
| 201a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 76 61 6c 20 60 28 61 6e 64 20 2c 40 28 | .............(if.(eval.`(and.,@( |
| 201c0 | 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 72 65 67 65 78 20 69 6e 20 6d 61 74 63 68 65 73 20 63 6f 6c | cl-loop.for.regex.in.matches.col |
| 201e0 | 6c 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | lect............................ |
| 20200 | 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 65 71 75 | ....................(unless.(equ |
| 20220 | 61 6c 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 77 69 64 74 68 29 20 30 29 20 28 | al.(calibredb-format-width).0).( |
| 20240 | 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 72 65 67 65 78 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 | s-contains?.regex.(calibredb-get |
| 20260 | 61 74 74 72 20 28 63 64 72 20 6c 69 6e 65 29 20 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 29 29 | attr.(cdr.line).:book-format)))) |
| 20280 | 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 70 75 73 68 | )).........................(push |
| 202a0 | 20 6c 69 6e 65 20 72 65 73 2d 6c 69 73 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 | .line.res-list))))...........(ca |
| 202c0 | 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 0a 20 20 20 20 20 20 20 20 | libredb-author-filter-p......... |
| 202e0 | 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 6c 69 6e 65 20 69 6e 20 63 61 6c 69 62 72 65 64 | ...(cl-loop.for.line.in.calibred |
| 20300 | 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 20 64 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | b-full-entries.do............... |
| 20320 | 20 20 20 20 20 20 28 69 66 20 28 65 76 61 6c 20 60 28 61 6e 64 20 2c 40 28 63 6c 2d 6c 6f 6f 70 | ......(if.(eval.`(and.,@(cl-loop |
| 20340 | 20 66 6f 72 20 72 65 67 65 78 20 69 6e 20 6d 61 74 63 68 65 73 20 63 6f 6c 6c 65 63 74 0a 20 20 | .for.regex.in.matches.collect... |
| 20360 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 20380 | 20 20 20 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 63 61 6c | .............(unless.(equal.(cal |
| 203a0 | 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 77 69 64 74 68 29 20 30 29 20 28 73 2d 63 6f 6e 74 61 | ibredb-author-width).0).(s-conta |
| 203c0 | 69 6e 73 3f 20 72 65 67 65 78 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 | ins?.regex.(calibredb-getattr.(c |
| 203e0 | 64 72 20 6c 69 6e 65 29 20 3a 61 75 74 68 6f 72 2d 73 6f 72 74 29 29 29 29 29 29 0a 20 20 20 20 | dr.line).:author-sort))))))..... |
| 20400 | 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 6c 69 6e 65 20 72 | ....................(push.line.r |
| 20420 | 65 73 2d 6c 69 73 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 | es-list))))...........(calibredb |
| 20440 | 2d 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f | -date-filter-p............(cl-lo |
| 20460 | 6f 70 20 66 6f 72 20 6c 69 6e 65 20 69 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e | op.for.line.in.calibredb-full-en |
| 20480 | 74 72 69 65 73 20 64 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 | tries.do.....................(if |
| 204a0 | 20 28 65 76 61 6c 20 60 28 61 6e 64 20 2c 40 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 72 65 67 65 | .(eval.`(and.,@(cl-loop.for.rege |
| 204c0 | 78 20 69 6e 20 6d 61 74 63 68 65 73 20 63 6f 6c 6c 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 | x.in.matches.collect............ |
| 204e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 20500 | 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 75 61 6c 20 28 63 61 6c 69 62 72 65 64 62 2d 64 61 | ....(unless.(equal.(calibredb-da |
| 20520 | 74 65 2d 77 69 64 74 68 29 20 30 29 20 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 72 65 67 65 78 20 | te-width).0).(s-contains?.regex. |
| 20540 | 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 6c 69 6e 65 29 20 3a 6c | (calibredb-getattr.(cdr.line).:l |
| 20560 | 61 73 74 5f 6d 6f 64 69 66 69 65 64 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ast_modified)))))).............. |
| 20580 | 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 6c 69 6e 65 20 72 65 73 2d 6c 69 73 74 29 29 | ...........(push.line.res-list)) |
| 205a0 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 6c 69 6e | ))...........(t.(cl-loop.for.lin |
| 205c0 | 65 20 69 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 20 64 6f 0a 20 | e.in.calibredb-full-entries.do.. |
| 205e0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 76 61 6c 20 60 28 61 6e 64 20 2c 40 28 63 | ............(if.(eval.`(and.,@(c |
| 20600 | 6c 2d 6c 6f 6f 70 20 66 6f 72 20 72 65 67 65 78 20 69 6e 20 6d 61 74 63 68 65 73 20 63 6f 6c 6c | l-loop.for.regex.in.matches.coll |
| 20620 | 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ect............................. |
| 20640 | 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ............(or................. |
| 20660 | 20 20 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 6e 6c 65 73 73 | .........................(unless |
| 20680 | 20 28 65 71 75 61 6c 20 63 61 6c 69 62 72 65 64 62 2d 69 64 2d 77 69 64 74 68 20 30 29 20 28 73 | .(equal.calibredb-id-width.0).(s |
| 206a0 | 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 72 65 67 65 78 20 28 63 61 6c 69 62 72 65 64 62 2d 67 | tring-match-p.regex.(calibredb-g |
| 206c0 | 65 74 61 74 74 72 20 28 63 64 72 20 6c 69 6e 65 29 20 3a 69 64 29 29 29 0a 20 20 20 20 20 20 20 | etattr.(cdr.line).:id)))........ |
| 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 20 20 20 20 20 20 | ................................ |
| 20700 | 20 20 28 75 6e 6c 65 73 73 20 28 65 71 75 61 6c 20 28 63 61 6c 69 62 72 65 64 62 2d 74 69 74 6c | ..(unless.(equal.(calibredb-titl |
| 20720 | 65 2d 77 69 64 74 68 29 20 30 29 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 72 65 67 65 | e-width).0).(string-match-p.rege |
| 20740 | 78 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 6c 69 6e 65 29 20 | x.(calibredb-getattr.(cdr.line). |
| 20760 | 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | :book-title))).................. |
| 20780 | 20 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 6e 6c 65 73 73 20 | ........................(unless. |
| 207a0 | 28 65 71 75 61 6c 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 77 69 64 74 68 29 20 | (equal.(calibredb-format-width). |
| 207c0 | 30 29 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 72 65 67 65 78 20 28 63 61 6c 69 62 72 | 0).(string-match-p.regex.(calibr |
| 207e0 | 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 6c 69 6e 65 29 20 3a 62 6f 6f 6b 2d 66 6f 72 | edb-getattr.(cdr.line).:book-for |
| 20800 | 6d 61 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mat))).......................... |
| 20820 | 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 65 71 75 61 6c 20 28 | ................(unless.(equal.( |
| 20840 | 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 77 69 64 74 68 29 20 30 29 20 28 73 74 72 69 6e 67 2d | calibredb-tag-width).0).(string- |
| 20860 | 6d 61 74 63 68 2d 70 20 72 65 67 65 78 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 | match-p.regex.(calibredb-getattr |
| 20880 | 20 28 63 64 72 20 6c 69 6e 65 29 20 3a 74 61 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .(cdr.line).:tag)))............. |
| 208a0 | 20 20 20 20 20 20 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 6e | .............................(un |
| 208c0 | 6c 65 73 73 20 28 65 71 75 61 6c 20 28 63 61 6c 69 62 72 65 64 62 2d 69 64 73 2d 77 69 64 74 68 | less.(equal.(calibredb-ids-width |
| 208e0 | 29 20 30 29 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 72 65 67 65 78 20 28 63 61 6c 69 | ).0).(string-match-p.regex.(cali |
| 20900 | 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 6c 69 6e 65 29 20 3a 69 64 73 29 29 29 | bredb-getattr.(cdr.line).:ids))) |
| 20920 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 20940 | 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 63 61 6c 69 62 72 | ..........(unless.(equal.(calibr |
| 20960 | 65 64 62 2d 61 75 74 68 6f 72 2d 77 69 64 74 68 29 20 30 29 20 28 73 74 72 69 6e 67 2d 6d 61 74 | edb-author-width).0).(string-mat |
| 20980 | 63 68 2d 70 20 72 65 67 65 78 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 | ch-p.regex.(calibredb-getattr.(c |
| 209a0 | 64 72 20 6c 69 6e 65 29 20 3a 61 75 74 68 6f 72 2d 73 6f 72 74 29 29 29 0a 20 20 20 20 20 20 20 | dr.line).:author-sort)))........ |
| 209c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 209e0 | 20 20 28 75 6e 6c 65 73 73 20 28 65 71 75 61 6c 20 28 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 | ..(unless.(equal.(calibredb-date |
| 20a00 | 2d 77 69 64 74 68 29 20 30 29 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 72 65 67 65 78 | -width).0).(string-match-p.regex |
| 20a20 | 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 6c 69 6e 65 29 20 3a | .(calibredb-getattr.(cdr.line).: |
| 20a40 | 6c 61 73 74 5f 6d 6f 64 69 66 69 65 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | last_modified)))................ |
| 20a60 | 20 20 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 4e 6f 72 | ..........................;;.Nor |
| 20a80 | 6d 61 6c 6c 79 2c 20 63 6f 6d 6d 65 6e 74 73 20 61 72 65 20 6c 6f 6e 67 2c 20 69 74 20 69 73 20 | mally,.comments.are.long,.it.is. |
| 20aa0 | 6e 65 63 65 73 73 61 72 79 20 74 6f 20 74 72 61 6e 63 61 74 65 20 74 68 65 20 63 6f 6d 6d 65 6e | necessary.to.trancate.the.commen |
| 20ac0 | 74 73 20 74 6f 20 73 70 65 65 64 20 75 70 20 74 68 65 20 73 65 61 72 63 68 69 6e 67 0a 20 20 20 | ts.to.speed.up.the.searching.... |
| 20ae0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 20b00 | 20 20 20 20 20 20 3b 3b 20 65 78 63 65 70 74 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 65 6e | ......;;.except.calibredb-commen |
| 20b20 | 74 2d 77 69 64 74 68 20 69 73 20 2d 31 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | t-width.is.-1................... |
| 20b40 | 20 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 6e 6c 65 73 73 20 | ........................(unless. |
| 20b60 | 28 65 71 75 61 6c 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 65 6e 74 2d 77 69 64 74 68 29 | (equal.(calibredb-comment-width) |
| 20b80 | 20 30 29 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 72 65 67 65 78 20 28 6c 65 74 20 28 | .0).(string-match-p.regex.(let.( |
| 20ba0 | 28 63 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 6c 69 6e 65 29 | (c.(calibredb-getattr.(cdr.line) |
| 20bc0 | 20 3a 63 6f 6d 6d 65 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .:comment))..................... |
| 20be0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 20c00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 20c20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 20 | .............................(w. |
| 20c40 | 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 65 6e 74 2d 77 69 64 74 68 29 29 0a 20 20 20 20 20 20 | calibredb-comment-width))....... |
| 20c60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 20c80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 20ca0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 20cc0 | 20 20 20 20 20 20 20 28 69 66 20 28 3e 20 77 20 30 29 20 28 73 2d 74 72 75 6e 63 61 74 65 20 77 | .......(if.(>.w.0).(s-truncate.w |
| 20ce0 | 20 63 29 20 63 29 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 28 | .c).c))))))))..................( |
| 20d00 | 70 75 73 68 20 6c 69 6e 65 20 72 65 73 2d 6c 69 73 74 29 29 29 29 29 0a 20 20 20 20 28 6e 72 65 | push.line.res-list))))).....(nre |
| 20d20 | 76 65 72 73 65 20 72 65 73 2d 6c 69 73 74 29 29 29 0a 0a 3b 3b 3b 20 64 65 74 61 69 6c 65 64 20 | verse.res-list)))..;;;.detailed. |
| 20d40 | 76 69 65 77 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 76 69 | view..(defun.calibredb-toggle-vi |
| 20d60 | 65 77 20 28 29 0a 20 20 22 54 6f 67 67 6c 65 20 62 65 74 77 65 65 6e 20 64 65 74 61 69 6c 65 64 | ew.()..."Toggle.between.detailed |
| 20d80 | 20 76 69 65 77 20 6f 72 20 63 6f 6d 70 61 63 74 20 76 69 65 77 20 69 6e 20 2a 63 61 6c 69 62 72 | .view.or.compact.view.in.*calibr |
| 20da0 | 65 64 62 2d 73 65 61 72 63 68 2a 20 62 75 66 66 65 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 | edb-search*.buffer."...(interact |
| 20dc0 | 69 76 65 29 0a 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d | ive)...(setq.calibredb-detailed- |
| 20de0 | 76 69 65 77 20 28 6e 6f 74 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 | view.(not.calibredb-detailed-vie |
| 20e00 | 77 29 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 74 6f 67 67 6c 65 2d 76 | w))...(calibredb-search-toggle-v |
| 20e20 | 69 65 77 2d 72 65 66 72 65 73 68 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d | iew-refresh))..(defun.calibredb- |
| 20e40 | 64 65 74 61 69 6c 2d 76 69 65 77 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 28 65 6e 74 72 79 29 | detail-view-insert-image.(entry) |
| 20e60 | 0a 20 20 22 49 6e 73 65 72 74 20 69 6d 61 67 65 20 69 6e 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 | ..."Insert.image.in.*calibredb-s |
| 20e80 | 65 61 72 63 68 2a 20 75 6e 64 65 72 20 64 65 74 61 69 6c 20 76 69 65 77 20 62 61 73 65 64 20 6f | earch*.under.detail.view.based.o |
| 20ea0 | 6e 20 45 4e 54 52 59 2e 22 0a 20 20 28 69 66 20 28 61 6e 64 20 63 61 6c 69 62 72 65 64 62 2d 64 | n.ENTRY."...(if.(and.calibredb-d |
| 20ec0 | 65 74 69 61 6c 2d 76 69 65 77 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 | etial-view.calibredb-detailed-vi |
| 20ee0 | 65 77 2d 69 6d 61 67 65 2d 73 68 6f 77 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 6e 75 6d 20 | ew-image-show).......(let.((num. |
| 20f00 | 28 63 6f 6e 64 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 61 6c 6c 2d 74 68 65 2d | (cond.(calibredb-format-all-the- |
| 20f20 | 69 63 6f 6e 73 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | icons.3)........................ |
| 20f40 | 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 69 63 6f 6e 73 2d 69 6e 2d 74 65 72 6d 69 | (calibredb-format-icons-in-termi |
| 20f60 | 6e 61 6c 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 | nal.3)........................(( |
| 20f80 | 3e 3d 20 63 61 6c 69 62 72 65 64 62 2d 69 64 2d 77 69 64 74 68 20 30 29 20 63 61 6c 69 62 72 65 | >=.calibredb-id-width.0).calibre |
| 20fa0 | 64 62 2d 69 64 2d 77 69 64 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | db-id-width).................... |
| 20fc0 | 20 20 20 20 28 74 20 30 20 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c | ....(t.0.)))).........(insert."\ |
| 20fe0 | 6e 22 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 | n").........(insert.(make-string |
| 21000 | 20 6e 75 6d 20 3f 20 29 29 0a 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 69 6e 73 | .num.?.)).........(calibredb-ins |
| 21020 | 65 72 74 2d 69 6d 61 67 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 63 6f 76 65 72 20 28 | ert-image.(calibredb-get-cover.( |
| 21040 | 63 64 72 20 65 6e 74 72 79 29 29 20 22 22 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 | cdr.entry))."".calibredb-detaile |
| 21060 | 64 2d 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 77 69 64 74 68 20 63 61 6c 69 62 72 65 64 62 | d-view-image-max-width.calibredb |
| 21080 | 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 68 65 69 67 68 74 29 | -detailed-view-image-max-height) |
| 210a0 | 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 | )))..(defun.calibredb-detailed-v |
| 210c0 | 69 65 77 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 28 65 6e 74 72 79 29 0a 20 20 22 49 6e 73 65 | iew-insert-image.(entry)..."Inse |
| 210e0 | 72 74 20 69 6d 61 67 65 20 69 6e 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 20 75 | rt.image.in.*calibredb-search*.u |
| 21100 | 6e 64 65 72 20 64 65 74 61 69 6c 65 64 20 76 69 65 77 20 62 61 73 65 64 20 6f 6e 20 45 4e 54 52 | nder.detailed.view.based.on.ENTR |
| 21120 | 59 2e 22 0a 20 20 28 69 66 20 28 61 6e 64 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 | Y."...(if.(and.calibredb-detaile |
| 21140 | 64 2d 76 69 65 77 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 69 | d-view.calibredb-detailed-view-i |
| 21160 | 6d 61 67 65 2d 73 68 6f 77 29 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 6e 75 6d 20 28 63 6f | mage-show).......(let*.((num.(co |
| 21180 | 6e 64 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f | nd.(calibredb-format-all-the-ico |
| 211a0 | 6e 73 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 | ns.3).........................(c |
| 211c0 | 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 69 63 6f 6e 73 2d 69 6e 2d 74 65 72 6d 69 6e 61 | alibredb-format-icons-in-termina |
| 211e0 | 6c 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 3e | l.3).........................((> |
| 21200 | 3d 20 63 61 6c 69 62 72 65 64 62 2d 69 64 2d 77 69 64 74 68 20 30 29 20 63 61 6c 69 62 72 65 64 | =.calibredb-id-width.0).calibred |
| 21220 | 62 2d 69 64 2d 77 69 64 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | b-id-width)..................... |
| 21240 | 20 20 20 20 28 74 20 30 20 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 | ....(t.0.)))..............(file. |
| 21260 | 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 65 6e 74 72 79 29 20 3a | (calibredb-getattr.(cdr.entry).: |
| 21280 | 66 69 6c 65 2d 70 61 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 | file-path))..............(format |
| 212a0 | 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 65 6e 74 72 79 29 20 | .(calibredb-getattr.(cdr.entry). |
| 212c0 | 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 76 | :book-format))..............(cov |
| 212e0 | 65 72 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 | er.(concat.(file-name-directory. |
| 21300 | 66 69 6c 65 29 20 22 63 6f 76 65 72 2e 6a 70 67 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 | file)."cover.jpg")))...........( |
| 21320 | 69 66 20 28 69 6d 61 67 65 2d 74 79 70 65 2d 61 76 61 69 6c 61 62 6c 65 2d 70 20 28 69 6e 74 65 | if.(image-type-available-p.(inte |
| 21340 | 72 6e 20 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e | rn.format))...............(progn |
| 21360 | 0a 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 5c 6e 22 29 0a 20 | .................(insert."\n").. |
| 21380 | 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 6b 65 2d 73 74 72 | ...............(insert.(make-str |
| 213a0 | 69 6e 67 20 6e 75 6d 20 3f 20 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 | ing.num.?.)).................(ca |
| 213c0 | 6c 69 62 72 65 64 62 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 66 69 6c 65 20 22 22 20 63 61 6c | libredb-insert-image.file."".cal |
| 213e0 | 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 77 | ibredb-detailed-view-image-max-w |
| 21400 | 69 64 74 68 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 69 6d 61 | idth.calibredb-detailed-view-ima |
| 21420 | 67 65 2d 6d 61 78 2d 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f | ge-max-height)).............(pro |
| 21440 | 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 22 29 0a 20 | gn...............(insert."\n").. |
| 21460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 6d 61 6b 65 2d 73 74 72 69 6e | .............(insert.(make-strin |
| 21480 | 67 20 6e 75 6d 20 3f 20 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 | g.num.?.))...............(calibr |
| 214a0 | 65 64 62 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 63 6f 76 65 72 20 22 22 20 63 61 6c 69 62 72 | edb-insert-image.cover."".calibr |
| 214c0 | 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 77 69 64 74 | edb-detailed-view-image-max-widt |
| 214e0 | 68 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 69 6d 61 67 65 2d | h.calibredb-detailed-view-image- |
| 21500 | 6d 61 78 2d 68 65 69 67 68 74 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 | max-height))))))..(defun.calibre |
| 21520 | 64 62 2d 74 6f 67 67 6c 65 2d 76 69 65 77 2d 61 74 2d 70 6f 69 6e 74 20 28 29 0a 20 20 22 54 6f | db-toggle-view-at-point.()..."To |
| 21540 | 67 67 6c 65 20 62 65 74 77 65 65 6e 20 64 65 74 61 69 6c 65 64 20 76 69 65 77 20 6f 72 20 63 6f | ggle.between.detailed.view.or.co |
| 21560 | 6d 70 61 63 74 20 76 69 65 77 20 69 6e 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a | mpact.view.in.*calibredb-search* |
| 21580 | 20 62 75 66 66 65 72 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 | .buffer.at.point."...(interactiv |
| 215a0 | 65 29 0a 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 74 29 | e)...(let.((inhibit-read-only.t) |
| 215c0 | 0a 20 20 20 20 20 20 20 20 28 73 74 61 74 75 73 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 | .........(status.calibredb-detai |
| 215e0 | 6c 65 64 2d 76 69 65 77 29 29 0a 20 20 20 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 | led-view)).....(if.calibredb-det |
| 21600 | 61 69 6c 65 64 2d 76 69 65 77 0a 20 20 20 20 20 20 20 20 3b 3b 20 64 65 74 61 69 6c 65 64 20 76 | ailed-view.........;;.detailed.v |
| 21620 | 69 65 77 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 73 61 | iew.........(cond..........;;.sa |
| 21640 | 76 65 20 74 6f 20 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 0a 20 20 20 20 20 20 20 20 20 28 | ve.to.calibredb-entry..........( |
| 21660 | 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 | (get-text-property.(point).'cali |
| 21680 | 62 72 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 | bredb-entry.nil)...........(setq |
| 216a0 | 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 20 6e 69 6c 29 0a 20 20 | .calibredb-detailed-view.nil)... |
| 216c0 | 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 6f 72 69 67 69 6e 61 6c 20 28 67 65 74 2d 74 65 | ........(let*.((original.(get-te |
| 216e0 | 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 | xt-property.(point).'calibredb-e |
| 21700 | 6e 74 72 79 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 74 | ntry.nil))..................(ent |
| 21720 | 72 79 20 28 63 61 64 72 20 6f 72 69 67 69 6e 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ry.(cadr.original))............. |
| 21740 | 20 20 20 20 20 28 66 6f 72 6d 61 74 20 28 6c 69 73 74 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f | .....(format.(list.(calibredb-fo |
| 21760 | 72 6d 61 74 2d 69 74 65 6d 20 65 6e 74 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | rmat-item.entry))).............. |
| 21780 | 20 20 20 20 3b 3b 20 28 70 6f 73 69 74 69 6f 6e 20 28 73 65 71 2d 70 6f 73 69 74 69 6f 6e 20 63 | ....;;.(position.(seq-position.c |
| 217a0 | 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 20 6f 72 69 67 69 6e 61 6c | alibredb-search-entries.original |
| 217c0 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 64 20 28 63 61 6c 69 62 72 65 | ))..................(id.(calibre |
| 217e0 | 64 62 2d 67 65 74 2d 69 6e 69 74 20 22 69 64 22 20 28 63 64 72 20 28 67 65 74 2d 74 65 78 74 2d | db-get-init."id".(cdr.(get-text- |
| 21800 | 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 | property.(point).'calibredb-entr |
| 21820 | 79 20 6e 69 6c 29 29 29 29 20 3b 20 74 68 65 20 22 69 64 22 20 6f 66 20 63 75 72 72 65 6e 74 20 | y.nil)))).;.the."id".of.current. |
| 21840 | 70 6f 69 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 2d 62 65 67 20 64 2d 65 | point..................d-beg.d-e |
| 21860 | 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 75 61 6c 20 69 64 20 28 63 | nd).............(if.(equal.id.(c |
| 21880 | 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 69 6e 69 74 20 22 69 64 22 20 28 63 64 72 20 28 67 65 74 | alibredb-get-init."id".(cdr.(get |
| 218a0 | 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 27 63 61 6c 69 | -text-property.(point-min).'cali |
| 218c0 | 62 72 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | bredb-entry.nil))))............. |
| 218e0 | 20 20 20 20 28 73 65 74 71 20 64 2d 62 65 67 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 | ....(setq.d-beg.(point-min)).... |
| 21900 | 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 77 68 69 6c | ...........(save-excursion.(whil |
| 21920 | 65 20 28 65 71 75 61 6c 20 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 69 6e 69 74 20 | e.(equal.id.(calibredb-get-init. |
| 21940 | 22 69 64 22 20 28 63 64 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f | "id".(cdr.(get-text-property.(po |
| 21960 | 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 29 29 29 0a 20 20 | int).'calibredb-entry.nil))))... |
| 21980 | 20 20 20 20 20 20 20 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 | ..............................(f |
| 219a0 | 6f 72 77 61 72 64 2d 6c 69 6e 65 20 2d 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | orward-line.-1))................ |
| 219c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 29 0a | ...............(forward-line.1). |
| 219e0 | 20 20 20 20 20 20 20 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 | ..............................(s |
| 21a00 | 65 74 71 20 64 2d 62 65 67 20 28 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | etq.d-beg.(point))))............ |
| 21a20 | 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 77 68 69 6c 65 20 28 65 71 75 61 6c 20 69 | .(save-excursion.(while.(equal.i |
| 21a40 | 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 69 6e 69 74 20 22 69 64 22 20 28 63 64 72 20 | d.(calibredb-get-init."id".(cdr. |
| 21a60 | 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 | (get-text-property.(point).'cali |
| 21a80 | 62 72 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | bredb-entry.nil))))............. |
| 21aa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 | ..................(forward-line. |
| 21ac0 | 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 1))............................. |
| 21ae0 | 28 67 6f 74 6f 2d 63 68 61 72 20 28 31 2d 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 | (goto-char.(1-.(point)))........ |
| 21b00 | 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 64 2d 65 6e 64 | .....................(setq.d-end |
| 21b20 | 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72 | .(point))).............(delete-r |
| 21b40 | 65 67 69 6f 6e 20 64 2d 62 65 67 20 64 2d 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 | egion.d-beg.d-end).............( |
| 21b60 | 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e | save-excursion...............(un |
| 21b80 | 6c 65 73 73 20 28 65 71 75 61 6c 20 66 6f 72 6d 61 74 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 | less.(equal.format."").......... |
| 21ba0 | 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 6f 6e 74 65 6e 74 20 28 63 61 72 20 66 6f 72 6d 61 | .......(let.((content.(car.forma |
| 21bc0 | 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 | t)).......................(list. |
| 21be0 | 28 63 6f 6e 73 20 28 63 61 72 20 66 6f 72 6d 61 74 29 20 28 6c 69 73 74 20 65 6e 74 72 79 29 29 | (cons.(car.format).(list.entry)) |
| 21c00 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 20 65 6e 64 29 | ).......................beg.end) |
| 21c20 | 0a 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 65 67 20 28 70 6f | ...................(setq.beg.(po |
| 21c40 | 69 6e 74 29 29 0a 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 | int))...................(insert. |
| 21c60 | 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 28 73 65 74 71 | content)...................(setq |
| 21c80 | 20 65 6e 64 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .end.(point))................... |
| 21ca0 | 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 62 65 67 20 65 6e 64 20 27 63 61 6c 69 | (put-text-property.beg.end.'cali |
| 21cc0 | 62 72 65 64 62 2d 63 6f 6d 70 61 63 74 20 6c 69 73 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 | bredb-compact.list)))))......... |
| 21ce0 | 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 20 | ..(setq.calibredb-detailed-view. |
| 21d00 | 73 74 61 74 75 73 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 73 61 76 65 20 74 6f 20 63 61 | status))...........;;.save.to.ca |
| 21d20 | 6c 69 62 72 65 64 62 2d 63 6f 6d 70 61 63 74 0a 20 20 20 20 20 20 20 20 20 28 28 67 65 74 2d 74 | libredb-compact..........((get-t |
| 21d40 | 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d | ext-property.(point).'calibredb- |
| 21d60 | 63 6f 6d 70 61 63 74 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c | compact.nil)...........(setq.cal |
| 21d80 | 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 20 74 29 0a 20 20 20 20 20 20 20 20 | ibredb-detailed-view.t)......... |
| 21da0 | 20 20 28 6c 65 74 2a 20 28 28 6f 72 69 67 69 6e 61 6c 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f | ..(let*.((original.(get-text-pro |
| 21dc0 | 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 70 61 63 74 | perty.(point).'calibredb-compact |
| 21de0 | 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 74 72 79 20 28 | .nil))..................(entry.( |
| 21e00 | 63 61 64 72 20 6f 72 69 67 69 6e 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | cadr.original))................. |
| 21e20 | 20 28 66 6f 72 6d 61 74 20 28 6c 69 73 74 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 | .(format.(list.(calibredb-format |
| 21e40 | 2d 69 74 65 6d 20 65 6e 74 72 79 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c | -item.entry)))).............(del |
| 21e60 | 65 74 65 2d 72 65 67 69 6f 6e 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 | ete-region.(line-beginning-posit |
| 21e80 | 69 6f 6e 29 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 | ion).(line-end-position))....... |
| 21ea0 | 20 20 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 20 20 20 20 | ......(save-excursion........... |
| 21ec0 | 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 75 61 6c 20 66 6f 72 6d 61 74 20 22 22 29 0a 20 20 | ....(unless.(equal.format."")... |
| 21ee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 6f 6e 74 65 6e 74 20 28 63 61 | ..............(let.((content.(ca |
| 21f00 | 72 20 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | r.format))...................... |
| 21f20 | 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 28 63 61 72 20 66 6f 72 6d 61 74 29 20 28 6c 69 73 74 20 | .(list.(cons.(car.format).(list. |
| 21f40 | 65 6e 74 72 79 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 62 | entry))).......................b |
| 21f60 | 65 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 28 73 65 74 71 20 | eg.end)...................(setq. |
| 21f80 | 62 65 67 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | beg.(point))...................( |
| 21fa0 | 69 6e 73 65 72 74 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 | insert.content)................. |
| 21fc0 | 20 20 28 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 69 6e 73 65 72 | ..(calibredb-detailed-view-inser |
| 21fe0 | 74 2d 69 6d 61 67 65 20 6f 72 69 67 69 6e 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | t-image.original)............... |
| 22000 | 20 20 20 20 28 73 65 74 71 20 65 6e 64 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 | ....(setq.end.(point)).......... |
| 22020 | 20 20 20 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 62 65 67 20 | .........(put-text-property.beg. |
| 22040 | 65 6e 64 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 6c 69 73 74 29 29 29 29 29 0a 20 | end.'calibredb-entry.list))))).. |
| 22060 | 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 | .........(setq.calibredb-detaile |
| 22080 | 64 2d 76 69 65 77 20 73 74 61 74 75 73 29 29 29 0a 0a 20 20 20 20 20 20 3b 3b 20 63 6f 6d 70 61 | d-view.status)))........;;.compa |
| 220a0 | 63 74 20 76 69 65 77 0a 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 3b 3b 20 73 61 | ct.view.......(cond........;;.sa |
| 220c0 | 76 65 20 74 6f 20 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 0a 20 20 20 20 20 20 20 28 28 67 | ve.to.calibredb-entry........((g |
| 220e0 | 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 | et-text-property.(point).'calibr |
| 22100 | 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c | edb-entry.nil).........(setq.cal |
| 22120 | 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 20 74 29 0a 20 20 20 20 20 20 20 20 | ibredb-detailed-view.t)......... |
| 22140 | 28 6c 65 74 2a 20 28 28 6f 72 69 67 69 6e 61 6c 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 | (let*.((original.(get-text-prope |
| 22160 | 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c | rty.(point).'calibredb-entry.nil |
| 22180 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 74 72 79 20 28 63 61 64 72 20 6f | ))................(entry.(cadr.o |
| 221a0 | 72 69 67 69 6e 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 | riginal))................(format |
| 221c0 | 20 28 6c 69 73 74 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 69 74 65 6d 20 65 6e | .(list.(calibredb-format-item.en |
| 221e0 | 74 72 79 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e | try))))...........(delete-region |
| 22200 | 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 20 28 6c 69 6e 65 | .(line-beginning-position).(line |
| 22220 | 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d | -end-position))...........(save- |
| 22240 | 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 | excursion.............(unless.(e |
| 22260 | 71 75 61 6c 20 66 6f 72 6d 61 74 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c | qual.format."")...............(l |
| 22280 | 65 74 20 28 28 63 6f 6e 74 65 6e 74 20 28 63 61 72 20 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 | et.((content.(car.format))...... |
| 222a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 28 63 61 72 20 | ...............(list.(cons.(car. |
| 222c0 | 66 6f 72 6d 61 74 29 20 28 6c 69 73 74 20 65 6e 74 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 | format).(list.entry))).......... |
| 222e0 | 20 20 20 20 20 20 20 20 20 20 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ...........beg.end)............. |
| 22300 | 20 20 20 20 28 73 65 74 71 20 62 65 67 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 | ....(setq.beg.(point)).......... |
| 22320 | 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 63 6f 6e 74 65 6e 74 29 0a 20 20 20 20 20 20 20 20 | .......(insert.content)......... |
| 22340 | 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 | ........(calibredb-detailed-view |
| 22360 | 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 6f 72 69 67 69 6e 61 6c 29 0a 20 20 20 20 20 20 20 20 | -insert-image.original)......... |
| 22380 | 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 6e 64 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 | ........(setq.end.(point))...... |
| 223a0 | 20 20 20 20 20 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 62 65 | ...........(put-text-property.be |
| 223c0 | 67 20 65 6e 64 20 27 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 20 6c 69 73 74 29 29 | g.end.'calibredb-detailed.list)) |
| 223e0 | 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 | ))).........(setq.calibredb-deta |
| 22400 | 69 6c 65 64 2d 76 69 65 77 20 73 74 61 74 75 73 29 29 0a 0a 20 20 20 20 20 20 20 3b 3b 20 73 61 | iled-view.status)).........;;.sa |
| 22420 | 76 65 20 74 6f 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 0a 20 20 20 20 20 20 20 | ve.to.calibredb-detailed........ |
| 22440 | 28 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c | ((get-text-property.(point).'cal |
| 22460 | 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 28 73 65 | ibredb-detailed.nil).........(se |
| 22480 | 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 20 6e 69 6c 29 0a | tq.calibredb-detailed-view.nil). |
| 224a0 | 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 6f 72 69 67 69 6e 61 6c 20 28 67 65 74 2d 74 65 | ........(let*.((original.(get-te |
| 224c0 | 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 64 | xt-property.(point).'calibredb-d |
| 224e0 | 65 74 61 69 6c 65 64 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6e | etailed.nil))................(en |
| 22500 | 74 72 79 20 28 63 61 64 72 20 6f 72 69 67 69 6e 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | try.(cadr.original))............ |
| 22520 | 20 20 20 20 28 66 6f 72 6d 61 74 20 28 6c 69 73 74 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 | ....(format.(list.(calibredb-for |
| 22540 | 6d 61 74 2d 69 74 65 6d 20 65 6e 74 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mat-item.entry)))............... |
| 22560 | 20 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 69 6e 69 74 20 22 69 64 22 20 28 63 | .(id.(calibredb-get-init."id".(c |
| 22580 | 64 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 | dr.(get-text-property.(point).'c |
| 225a0 | 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 20 6e 69 6c 29 29 29 29 20 3b 20 74 68 65 20 | alibredb-detailed.nil)))).;.the. |
| 225c0 | 22 69 64 22 20 6f 66 20 63 75 72 72 65 6e 74 20 70 6f 69 6e 74 0a 20 20 20 20 20 20 20 20 20 20 | "id".of.current.point........... |
| 225e0 | 20 20 20 20 20 64 2d 62 65 67 20 64 2d 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 | .....d-beg.d-end)...........(if. |
| 22600 | 28 65 71 75 61 6c 20 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 69 6e 69 74 20 22 69 | (equal.id.(calibredb-get-init."i |
| 22620 | 64 22 20 28 63 64 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e | d".(cdr.(get-text-property.(poin |
| 22640 | 74 2d 6d 69 6e 29 20 27 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 20 6e 69 6c 29 29 | t-min).'calibredb-detailed.nil)) |
| 22660 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 64 2d 62 65 67 20 28 70 6f | ))...............(setq.d-beg.(po |
| 22680 | 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 | int-min)).............(save-excu |
| 226a0 | 72 73 69 6f 6e 20 28 77 68 69 6c 65 20 28 65 71 75 61 6c 20 69 64 20 28 63 61 6c 69 62 72 65 64 | rsion.(while.(equal.id.(calibred |
| 226c0 | 62 2d 67 65 74 2d 69 6e 69 74 20 22 69 64 22 20 28 63 64 72 20 28 67 65 74 2d 74 65 78 74 2d 70 | b-get-init."id".(cdr.(get-text-p |
| 226e0 | 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 | roperty.(point).'calibredb-detai |
| 22700 | 6c 65 64 20 6e 69 6c 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 | led.nil))))..................... |
| 22720 | 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 2d 31 29 29 0a 20 20 20 | ..........(forward-line.-1)).... |
| 22740 | 20 20 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 77 61 72 | .........................(forwar |
| 22760 | 64 2d 6c 69 6e 65 20 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 | d-line.1)....................... |
| 22780 | 20 20 20 20 20 20 28 73 65 74 71 20 64 2d 62 65 67 20 28 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 | ......(setq.d-beg.(point)))).... |
| 227a0 | 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 77 68 69 6c 65 20 28 65 | .......(save-excursion.(while.(e |
| 227c0 | 71 75 61 6c 20 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 69 6e 69 74 20 22 69 64 22 | qual.id.(calibredb-get-init."id" |
| 227e0 | 20 28 63 64 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 | .(cdr.(get-text-property.(point) |
| 22800 | 20 27 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 20 6e 69 6c 29 29 29 29 0a 20 20 20 | .'calibredb-detailed.nil)))).... |
| 22820 | 20 20 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 77 61 72 | .........................(forwar |
| 22840 | 64 2d 6c 69 6e 65 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d-line.1))...................... |
| 22860 | 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 31 2d 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 | .....(goto-char.(1-.(point)))... |
| 22880 | 20 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 64 2d | ........................(setq.d- |
| 228a0 | 65 6e 64 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d | end.(point)))...........(delete- |
| 228c0 | 72 65 67 69 6f 6e 20 64 2d 62 65 67 20 64 2d 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 | region.d-beg.d-end)...........(s |
| 228e0 | 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 | ave-excursion.............(unles |
| 22900 | 73 20 28 65 71 75 61 6c 20 66 6f 72 6d 61 74 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | s.(equal.format."")............. |
| 22920 | 20 20 28 6c 65 74 20 28 28 63 6f 6e 74 65 6e 74 20 28 63 61 72 20 66 6f 72 6d 61 74 29 29 0a 20 | ..(let.((content.(car.format)).. |
| 22940 | 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 63 6f 6e 73 20 28 | ...................(list.(cons.( |
| 22960 | 63 61 72 20 66 6f 72 6d 61 74 29 20 28 6c 69 73 74 20 65 6e 74 72 79 29 29 29 0a 20 20 20 20 20 | car.format).(list.entry)))...... |
| 22980 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20 20 20 20 20 | ...............beg.end)......... |
| 229a0 | 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 65 67 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 | ........(setq.beg.(point))...... |
| 229c0 | 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 63 6f 6e 74 65 6e 74 29 0a 20 20 20 20 | ...........(insert.content)..... |
| 229e0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 6e 64 20 28 70 6f 69 6e 74 29 29 0a 20 | ............(setq.end.(point)).. |
| 22a00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 | ...............(put-text-propert |
| 22a20 | 79 20 62 65 67 20 65 6e 64 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 6c 69 73 74 29 | y.beg.end.'calibredb-entry.list) |
| 22a40 | 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 | )))).........(setq.calibredb-det |
| 22a60 | 61 69 6c 65 64 2d 76 69 65 77 20 73 74 61 74 75 73 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 | ailed-view.status))))))..(defun. |
| 22a80 | 63 61 6c 69 62 72 65 64 62 2d 66 6f 6e 74 69 66 79 20 28 73 74 72 69 6e 67 20 6d 6f 64 65 29 0a | calibredb-fontify.(string.mode). |
| 22aa0 | 20 20 22 46 6f 6e 74 69 66 79 20 53 54 52 49 4e 47 20 77 69 74 68 20 4d 61 6a 6f 72 20 4d 4f 44 | .."Fontify.STRING.with.Major.MOD |
| 22ac0 | 45 2e 22 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 69 6e 73 | E."...(with-temp-buffer.....(ins |
| 22ae0 | 65 72 74 20 73 74 72 69 6e 67 29 0a 20 20 20 20 28 64 65 6c 61 79 2d 6d 6f 64 65 2d 68 6f 6f 6b | ert.string).....(delay-mode-hook |
| 22b00 | 73 20 28 66 75 6e 63 61 6c 6c 20 6d 6f 64 65 29 29 0a 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e | s.(funcall.mode)).....(if.(fboun |
| 22b20 | 64 70 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 6e 73 75 72 65 29 0a 20 20 20 20 20 20 20 20 28 66 | dp.'font-lock-ensure).........(f |
| 22b40 | 6f 6e 74 2d 6c 6f 63 6b 2d 65 6e 73 75 72 65 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 6e 6f 2d | ont-lock-ensure).......(with-no- |
| 22b60 | 77 61 72 6e 69 6e 67 73 0a 20 20 20 20 20 20 20 20 28 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 6f 6e 74 | warnings.........(font-lock-font |
| 22b80 | 69 66 79 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 | ify-buffer))).....(buffer-string |
| 22ba0 | 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 70 79 2d 61 73 2d 6f 72 | )))..(defun.calibredb-copy-as-or |
| 22bc0 | 67 2d 6c 69 6e 6b 20 28 29 0a 20 20 22 43 6f 70 79 20 74 68 65 20 6d 61 72 6b 65 64 20 69 74 65 | g-link.()..."Copy.the.marked.ite |
| 22be0 | 6d 73 20 61 73 20 6f 72 67 20 6c 69 6e 6b 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 | ms.as.org.links."...(interactive |
| 22c00 | 29 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 | )...(let.((candidates.(calibredb |
| 22c20 | 2d 66 69 6e 64 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 73 29 29 29 0a 20 20 20 20 28 | -find-marked-candidates))).....( |
| 22c40 | 75 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 | unless.candidates.......(setq.ca |
| 22c60 | 6e 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 | ndidates.(calibredb-find-candida |
| 22c80 | 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 6b 69 6c 6c 2d 6e 65 77 0a 20 20 20 | te-at-point))).....(kill-new.... |
| 22ca0 | 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 28 64 6f 6c 69 | ..(with-temp-buffer........(doli |
| 22cc0 | 73 74 20 28 63 61 6e 64 20 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 28 6c | st.(cand.candidates)..........(l |
| 22ce0 | 65 74 20 28 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 | et.((id.(calibredb-getattr.cand. |
| 22d00 | 3a 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 74 68 20 28 63 61 6c 69 | :id))................(path.(cali |
| 22d20 | 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 63 61 6e 64 20 74 29 29 0a 20 20 20 | bredb-get-file-path.cand.t)).... |
| 22d40 | 20 20 20 20 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 | ............(title.(calibredb-ge |
| 22d60 | 74 61 74 74 72 20 63 61 6e 64 20 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 29 29 0a 20 20 20 20 20 20 | tattr.cand.:book-title)))....... |
| 22d80 | 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 5b 5b 66 69 6c 65 3a 25 73 5d | .....(insert.(format."[[file:%s] |
| 22da0 | 5b 25 73 20 25 73 20 2d 20 25 73 5d 5d 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | [%s.%s.-.%s]]\n"................ |
| 22dc0 | 20 20 20 20 20 20 20 20 20 20 20 20 70 61 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ............path................ |
| 22de0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 | ............(cond.(calibredb-for |
| 22e00 | 6d 61 74 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mat-all-the-icons............... |
| 22e20 | 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 62 6f 75 6e 64 70 | ....................(if.(fboundp |
| 22e40 | 20 27 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 6c 65 29 0a 20 | .'all-the-icons-icon-for-file).. |
| 22e60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 22e80 | 20 20 20 20 20 28 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 6c | .....(all-the-icons-icon-for-fil |
| 22ea0 | 65 20 70 61 74 68 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 | e.path)."")).................... |
| 22ec0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d | ..............(calibredb-format- |
| 22ee0 | 69 63 6f 6e 73 2d 69 6e 2d 74 65 72 6d 69 6e 61 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | icons-in-terminal............... |
| 22f00 | 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 62 6f 75 6e 64 70 | ....................(if.(fboundp |
| 22f20 | 20 27 69 63 6f 6e 73 2d 69 6e 2d 74 65 72 6d 69 6e 61 6c 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 6c | .'icons-in-terminal-icon-for-fil |
| 22f40 | 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 20 | e).............................. |
| 22f60 | 20 20 20 20 20 20 20 20 20 28 69 63 6f 6e 73 2d 69 6e 2d 74 65 72 6d 69 6e 61 6c 2d 69 63 6f 6e | .........(icons-in-terminal-icon |
| 22f80 | 2d 66 6f 72 2d 66 69 6c 65 20 70 61 74 68 20 3a 76 2d 61 64 6a 75 73 74 20 30 20 3a 68 65 69 67 | -for-file.path.:v-adjust.0.:heig |
| 22fa0 | 68 74 20 31 29 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ht.1).""))...................... |
| 22fc0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 22 22 29 29 20 69 64 20 74 69 74 6c 65 29 29 0a 20 | ............(t."")).id.title)).. |
| 22fe0 | 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 43 6f 70 69 65 64 3a 20 25 73 20 2d | ..........(message."Copied:.%s.- |
| 23000 | 20 5c 22 25 73 5c 22 20 61 73 20 6f 72 67 20 6c 69 6e 6b 2e 22 20 69 64 20 74 69 74 6c 65 29 29 | .\"%s\".as.org.link.".id.title)) |
| 23020 | 29 0a 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 0a 20 20 20 20 3b | )........(buffer-string))).....; |
| 23040 | 3b 20 72 65 6d 6f 76 65 20 6f 76 65 72 6c 61 79 73 20 61 6e 64 20 74 65 78 74 20 70 72 6f 70 65 | ;.remove.overlays.and.text.prope |
| 23060 | 72 74 69 65 73 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 62 65 67 20 28 70 6f 69 6e 74 2d 6d 69 6e | rties.....(let*.((beg.(point-min |
| 23080 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 64 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a | ))............(end.(point-max)). |
| 230a0 | 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 | ...........(inhibit-read-only.t) |
| 230c0 | 29 0a 20 20 20 20 20 20 28 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 73 20 62 65 67 20 65 6e 64 | ).......(remove-overlays.beg.end |
| 230e0 | 29 0a 20 20 20 20 20 20 28 72 65 6d 6f 76 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 | ).......(remove-text-properties. |
| 23100 | 62 65 67 20 65 6e 64 20 27 28 63 61 6c 69 62 72 65 64 62 2d 6d 61 72 6b 20 6e 69 6c 29 29 29 29 | beg.end.'(calibredb-mark.nil)))) |
| 23120 | 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 28 | )..(defmacro.calibredb-sort-by.( |
| 23140 | 66 69 65 6c 64 29 0a 20 20 22 4d 61 63 72 6f 20 6f 66 20 66 75 6e 63 74 69 6f 6e 73 20 63 61 6c | field)..."Macro.of.functions.cal |
| 23160 | 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 2d 2a 2e 0a 41 72 67 75 6d 65 6e 74 20 46 49 45 4c 44 | ibredb-sort-by-*..Argument.FIELD |
| 23180 | 2e 22 0a 20 20 60 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 63 | ."...`(defun.,(intern.(format."c |
| 231a0 | 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 2d 25 73 22 20 66 69 65 6c 64 29 29 20 28 29 0a | alibredb-sort-by-%s".field)).(). |
| 231c0 | 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 2c 28 66 6f 72 6d 61 74 | .....(interactive)......,(format |
| 231e0 | 20 22 53 6f 72 74 20 62 79 20 25 73 2c 20 72 65 66 72 65 73 68 20 2a 63 61 6c 69 62 72 65 64 62 | ."Sort.by.%s,.refresh.*calibredb |
| 23200 | 2d 73 65 61 72 63 68 2a 2c 20 61 6e 64 20 63 6c 65 61 72 20 66 69 6c 74 65 72 2e 22 20 66 69 65 | -search*,.and.clear.filter.".fie |
| 23220 | 6c 64 29 0a 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 | ld)......(setq.calibredb-sort-by |
| 23240 | 20 28 71 75 6f 74 65 20 2c 28 69 6e 74 65 72 6e 20 66 69 65 6c 64 29 29 29 0a 20 20 20 20 20 28 | .(quote.,(intern.field)))......( |
| 23260 | 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 61 6e 64 2d 63 6c 65 | calibredb-search-refresh-and-cle |
| 23280 | 61 72 2d 66 69 6c 74 65 72 29 29 29 0a 0a 28 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 | ar-filter)))..(calibredb-sort-by |
| 232a0 | 20 22 69 64 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 22 74 69 74 6c 65 | ."id").(calibredb-sort-by."title |
| 232c0 | 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 22 66 6f 72 6d 61 74 22 29 0a | ").(calibredb-sort-by."format"). |
| 232e0 | 28 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 22 61 75 74 68 6f 72 22 29 0a 28 63 61 | (calibredb-sort-by."author").(ca |
| 23300 | 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 22 64 61 74 65 22 29 0a 28 63 61 6c 69 62 72 65 | libredb-sort-by."date").(calibre |
| 23320 | 64 62 2d 73 6f 72 74 2d 62 79 20 22 70 75 62 64 61 74 65 22 29 0a 28 63 61 6c 69 62 72 65 64 62 | db-sort-by."pubdate").(calibredb |
| 23340 | 2d 73 6f 72 74 2d 62 79 20 22 74 61 67 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d | -sort-by."tag").(calibredb-sort- |
| 23360 | 62 79 20 22 73 69 7a 65 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 20 22 6c | by."size").(calibredb-sort-by."l |
| 23380 | 61 6e 67 75 61 67 65 22 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 | anguage")..(defun.calibredb-togg |
| 233a0 | 6c 65 2d 6f 72 64 65 72 20 28 29 0a 20 20 22 54 6f 67 67 6c 65 20 74 68 65 20 6f 72 64 65 72 20 | le-order.()..."Toggle.the.order. |
| 233c0 | 62 65 74 77 65 65 6e 20 64 65 73 63 65 6e 64 69 6e 67 20 6f 72 20 61 73 63 65 6e 64 69 6e 67 2e | between.descending.or.ascending. |
| 233e0 | 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 66 20 28 65 71 20 63 61 6c 69 | "...(interactive)...(if.(eq.cali |
| 23400 | 62 72 65 64 62 2d 6f 72 64 65 72 20 27 64 65 73 63 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 | bredb-order.'desc).......(setq.c |
| 23420 | 61 6c 69 62 72 65 64 62 2d 6f 72 64 65 72 20 27 61 73 63 29 0a 20 20 20 20 28 73 65 74 71 20 63 | alibredb-order.'asc).....(setq.c |
| 23440 | 61 6c 69 62 72 65 64 62 2d 6f 72 64 65 72 20 27 64 65 73 63 29 29 0a 20 20 28 63 61 6c 69 62 72 | alibredb-order.'desc))...(calibr |
| 23460 | 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 61 6e 64 2d 63 6c 65 61 72 2d 66 69 6c | edb-search-refresh-and-clear-fil |
| 23480 | 74 65 72 29 29 0a 0a 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 | ter))...(provide.'calibredb-sear |
| 234a0 | 63 68 29 0a 0a 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2e 65 6c 20 65 6e 64 | ch)..;;;.calibredb-search.el.end |
| 234c0 | 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.......................... |
| 234e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 235a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 235c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 235e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23600 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 23620 | 2d 73 68 6f 77 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 | -show.el........................ |
| 23640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23660 | 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 |
| 23680 | 30 30 31 31 35 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 30 33 37 00 20 30 00 00 00 | 0011500.00000000000.016037..0... |
| 236a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 236c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 236e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23700 | 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................... |
| 23720 | 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................... |
| 23740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 237a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 237c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 237e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23800 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2e 65 6c 20 2d 2d 2d 20 42 6f 6f 6b 20 64 | ;;;.calibredb-show.el.---.Book.d |
| 23820 | 65 74 61 69 6c 20 62 75 66 66 65 72 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c | etail.buffer.for.calibredb.-*-.l |
| 23840 | 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 | exical-binding:.t;.-*-..;;.Copyr |
| 23860 | 69 67 68 74 20 28 43 29 20 32 30 32 30 20 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 | ight.(C).2020.Damon.Chan..;;.Aut |
| 23880 | 68 6f 72 3a 20 44 61 6d 6f 6e 20 43 68 61 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e | hor:.Damon.Chan.<elecming@gmail. |
| 238a0 | 63 6f 6d 3e 0a 3b 3b 20 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f | com>.;;.URL:.https://github.com/ |
| 238c0 | 63 68 65 6e 79 61 6e 6d 69 6e 67 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 | chenyanming/calibredb.el.;;.Keyw |
| 238e0 | 6f 72 64 73 3a 20 74 6f 6f 6c 73 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a | ords:.tools.;;.Version:.2.12.0.. |
| 23900 | 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 | ;;.This.file.is.NOT.part.of.GNU. |
| 23920 | 45 6d 61 63 73 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 | Emacs...;;.This.program.is.free. |
| 23940 | 73 6f 66 74 77 61 72 65 3b 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 |
| 23960 | 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. |
| 23980 | 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. |
| 239a0 | 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 | License.as.published.by.;;.the.F |
| 239c0 | 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. |
| 239e0 | 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 0a 3b 3b 20 | version.3.of.the.License,.or.;;. |
| 23a00 | 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 |
| 23a20 | 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 | on...;;.This.program.is.distribu |
| 23a40 | 74 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 | ted.in.the.hope.that.it.will.be. |
| 23a60 | 75 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 | useful,.;;.but.WITHOUT.ANY.WARRA |
| 23a80 | 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 | NTY;.without.even.the.implied.wa |
| 23aa0 | 72 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 | rranty.of.;;.MERCHANTABILITY.or. |
| 23ac0 | 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 | FITNESS.FOR.A.PARTICULAR.PURPOSE |
| 23ae0 | 2e 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 | ...See.the.;;.GNU.General.Public |
| 23b00 | 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 | .License.for.more.details...;;.Y |
| 23b20 | 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 6f | ou.should.have.received.a.copy.o |
| 23b40 | 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 |
| 23b60 | 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 | .;;.along.with.this.program...If |
| 23b80 | 20 6e 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 | .not,.see.<https://www.gnu.org/l |
| 23ba0 | 69 63 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 3b | icenses/>...;;;.Commentary:..;;; |
| 23bc0 | 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 | .Code:..(require.'calibredb-core |
| 23be0 | 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 65 | )..(declare-function.calibredb-e |
| 23c00 | 6e 74 72 79 2d 64 69 73 70 61 74 63 68 20 22 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 | ntry-dispatch."calibredb-transie |
| 23c20 | 6e 74 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 | nt.el").(declare-function.calibr |
| 23c40 | 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 | edb-find-file."calibredb-utils.e |
| 23c60 | 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d | l").(declare-function.calibredb- |
| 23c80 | 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 66 72 61 6d 65 20 22 63 61 6c 69 62 72 65 64 62 | find-file-other-frame."calibredb |
| 23ca0 | 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 | -utils.el").(declare-function.ca |
| 23cc0 | 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 66 69 6c 65 2d 77 69 74 68 2d 64 65 66 61 75 6c 74 2d 74 | libredb-open-file-with-default-t |
| 23ce0 | 6f 6f 6c 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 | ool."calibredb-utils.el").(decla |
| 23d00 | 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 | re-function.calibredb-set-metada |
| 23d20 | 74 61 2d 64 69 73 70 61 74 63 68 20 22 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 | ta-dispatch."calibredb-transient |
| 23d40 | 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 | .el").(declare-function.calibred |
| 23d60 | 62 2d 65 78 70 6f 72 74 2d 64 69 73 70 61 74 63 68 20 22 63 61 6c 69 62 72 65 64 62 2d 74 72 61 | b-export-dispatch."calibredb-tra |
| 23d80 | 6e 73 69 65 6e 74 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 | nsient.el").(declare-function.ca |
| 23da0 | 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 64 69 72 65 64 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 | libredb-open-dired."calibredb-ut |
| 23dc0 | 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 | ils.el").(declare-function.calib |
| 23de0 | 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 61 67 73 20 22 63 61 6c 69 62 72 65 | redb-set-metadata--tags."calibre |
| 23e00 | 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 | db-utils.el").(declare-function. |
| 23e20 | 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 61 75 74 68 6f 72 5f 73 | calibredb-set-metadata--author_s |
| 23e40 | 6f 72 74 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 | ort."calibredb-utils.el").(decla |
| 23e60 | 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 | re-function.calibredb-set-metada |
| 23e80 | 74 61 2d 2d 61 75 74 68 6f 72 73 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 | ta--authors."calibredb-utils.el" |
| 23ea0 | 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 | ).(declare-function.calibredb-se |
| 23ec0 | 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 69 74 6c 65 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 | t-metadata--title."calibredb-uti |
| 23ee0 | 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 | ls.el").(declare-function.calibr |
| 23f00 | 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 63 6f 6d 6d 65 6e 74 73 20 22 63 61 6c 69 | edb-set-metadata--comments."cali |
| 23f20 | 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 | bredb-utils.el").(declare-functi |
| 23f40 | 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 20 22 63 61 6c 69 62 72 65 | on.calibredb-show-entry."calibre |
| 23f60 | 64 62 2d 73 65 61 72 63 68 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e | db-search.el").(declare-function |
| 23f80 | 20 63 61 6c 69 62 72 65 64 62 2d 72 67 61 20 22 63 61 6c 69 62 72 65 64 62 2d 69 76 79 2e 65 6c | .calibredb-rga."calibredb-ivy.el |
| 23fa0 | 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 | ")..(defvar.calibredb-show-entry |
| 23fc0 | 20 6e 69 6c 0a 20 20 22 54 68 65 20 65 6e 74 72 79 20 62 65 69 6e 67 20 64 69 73 70 6c 61 79 65 | .nil..."The.entry.being.displaye |
| 23fe0 | 64 20 69 6e 20 74 68 69 73 20 62 75 66 66 65 72 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 61 6c | d.in.this.buffer.")..(defvar.cal |
| 24000 | 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 28 6c 65 74 20 28 28 6d 61 | ibredb-show-mode-map...(let.((ma |
| 24020 | 70 20 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 29 0a 20 20 20 20 28 64 65 | p.(make-sparse-keymap))).....(de |
| 24040 | 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 3f 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 | fine-key.map."?".#'calibredb-ent |
| 24060 | 72 79 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 | ry-dispatch).....(define-key.map |
| 24080 | 20 22 6f 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 29 0a 20 20 20 20 | ."o".#'calibredb-find-file)..... |
| 240a0 | 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 4f 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d | (define-key.map."O".#'calibredb- |
| 240c0 | 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 66 72 61 6d 65 29 0a 20 20 20 20 28 64 65 66 69 | find-file-other-frame).....(defi |
| 240e0 | 6e 65 2d 6b 65 79 20 6d 61 70 20 22 56 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d | ne-key.map."V".#'calibredb-open- |
| 24100 | 66 69 6c 65 2d 77 69 74 68 2d 64 65 66 61 75 6c 74 2d 74 6f 6f 6c 29 0a 20 20 20 20 28 64 65 66 | file-with-default-tool).....(def |
| 24120 | 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 73 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d | ine-key.map."s".#'calibredb-set- |
| 24140 | 6d 65 74 61 64 61 74 61 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b | metadata-dispatch).....(define-k |
| 24160 | 65 79 20 6d 61 70 20 22 65 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f 72 74 2d 64 69 | ey.map."e".#'calibredb-export-di |
| 24180 | 73 70 61 74 63 68 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 71 22 20 | spatch).....(define-key.map."q". |
| 241a0 | 23 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2d 71 75 69 74 29 0a 20 20 20 20 28 64 65 66 | #'calibredb-entry-quit).....(def |
| 241c0 | 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 79 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 79 61 6e 6b | ine-key.map."y".#'calibredb-yank |
| 241e0 | 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 | -dispatch).....(define-key.map." |
| 24200 | 2c 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 71 75 69 63 6b 2d 6c 6f 6f 6b 29 0a 20 20 20 20 28 | ,".#'calibredb-quick-look).....( |
| 24220 | 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 2e 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 6f | define-key.map.".".#'calibredb-o |
| 24240 | 70 65 6e 2d 64 69 72 65 64 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 | pen-dired).....(define-key.map." |
| 24260 | 5c 4d 2d 2f 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 72 67 61 29 0a 20 20 20 20 28 64 65 66 69 | \M-/".#'calibredb-rga).....(defi |
| 24280 | 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5c 4d 2d 74 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 | ne-key.map."\M-t".#'calibredb-se |
| 242a0 | 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 61 67 73 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 | t-metadata--tags).....(define-ke |
| 242c0 | 79 20 6d 61 70 20 22 5c 4d 2d 61 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 | y.map."\M-a".#'calibredb-set-met |
| 242e0 | 61 64 61 74 61 2d 2d 61 75 74 68 6f 72 5f 73 6f 72 74 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d | adata--author_sort).....(define- |
| 24300 | 6b 65 79 20 6d 61 70 20 22 5c 4d 2d 41 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d | key.map."\M-A".#'calibredb-set-m |
| 24320 | 65 74 61 64 61 74 61 2d 2d 61 75 74 68 6f 72 73 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 | etadata--authors).....(define-ke |
| 24340 | 79 20 6d 61 70 20 22 5c 4d 2d 54 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 | y.map."\M-T".#'calibredb-set-met |
| 24360 | 61 64 61 74 61 2d 2d 74 69 74 6c 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 | adata--title).....(define-key.ma |
| 24380 | 70 20 22 5c 4d 2d 63 22 20 23 27 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 | p."\M-c".#'calibredb-set-metadat |
| 243a0 | 61 2d 2d 63 6f 6d 6d 65 6e 74 73 29 0a 20 20 20 20 6d 61 70 29 0a 20 20 22 4b 65 79 6d 61 70 20 | a--comments).....map)..."Keymap. |
| 243c0 | 66 6f 72 20 60 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 6f 64 65 27 2e 22 29 0a 0a 28 64 | for.`calibredb-show-mode'.")..(d |
| 243e0 | 65 66 63 75 73 74 6f 6d 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 75 6e 69 71 75 65 2d 62 | efcustom.calibredb-show-unique-b |
| 24400 | 75 66 66 65 72 73 20 6e 69 6c 0a 20 20 22 54 4f 44 4f 3a 20 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c | uffers.nil..."TODO:.When.non-nil |
| 24420 | 2c 20 65 76 65 72 79 20 65 6e 74 72 79 20 62 75 66 66 65 72 20 67 65 74 73 20 61 20 75 6e 69 71 | ,.every.entry.buffer.gets.a.uniq |
| 24440 | 75 65 20 6e 61 6d 65 2e 0a 54 68 69 73 20 61 6c 6c 6f 77 73 20 66 6f 72 20 64 69 73 70 6c 61 79 | ue.name..This.allows.for.display |
| 24460 | 69 6e 67 20 6d 75 6c 74 69 70 6c 65 20 73 68 6f 77 20 62 75 66 66 65 72 73 20 61 74 20 74 68 65 | ing.multiple.show.buffers.at.the |
| 24480 | 20 73 61 6d 65 0a 74 69 6d 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c 69 62 72 65 64 62 | .same.time."...:group.'calibredb |
| 244a0 | 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 | ...:type.'boolean)...(defcustom. |
| 244c0 | 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 2d 73 77 69 74 63 68 20 23 27 73 77 | calibredb-show-entry-switch.#'sw |
| 244e0 | 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 0a 20 20 22 46 | itch-to-buffer-other-window..."F |
| 24500 | 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 6f 20 64 69 73 70 6c 61 79 20 74 68 65 20 63 61 6c 69 | unction.used.to.display.the.cali |
| 24520 | 62 72 65 20 65 6e 74 72 79 20 62 75 66 66 65 72 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 63 61 6c | bre.entry.buffer."...:group.'cal |
| 24540 | 69 62 72 65 64 62 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 66 75 6e 63 74 69 6f | ibredb...:type.'(choice.(functio |
| 24560 | 6e 2d 69 74 65 6d 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 | n-item.switch-to-buffer-other-wi |
| 24580 | 6e 64 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e | ndow)..................(function |
| 245a0 | 2d 69 74 65 6d 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 | -item.switch-to-buffer)......... |
| 245c0 | 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 2d 69 74 65 6d 20 70 6f 70 2d 74 6f 2d 62 | .........(function-item.pop-to-b |
| 245e0 | 75 66 66 65 72 29 0a 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 | uffer)..................function |
| 24600 | 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 63 61 6c 69 62 72 65 | ))..(define-derived-mode.calibre |
| 24620 | 64 62 2d 73 68 6f 77 2d 6d 6f 64 65 20 66 75 6e 64 61 6d 65 6e 74 61 6c 2d 6d 6f 64 65 20 22 63 | db-show-mode.fundamental-mode."c |
| 24640 | 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 22 0a 20 20 22 4d 6f 64 65 20 66 6f 72 20 64 69 73 70 6c | alibredb-show"..."Mode.for.displ |
| 24660 | 61 79 69 6e 67 20 62 6f 6f 6b 20 65 6e 74 72 79 20 64 65 74 61 69 6c 73 2e 0a 5c 5c 7b 63 61 6c | aying.book.entry.details..\\{cal |
| 24680 | 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 6f 64 65 2d 6d 61 70 7d 22 0a 20 20 28 73 65 74 71 20 62 | ibredb-show-mode-map}"...(setq.b |
| 246a0 | 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 0a 20 20 28 62 75 66 66 65 72 2d 64 69 73 | uffer-read-only.t)...(buffer-dis |
| 246c0 | 61 62 6c 65 2d 75 6e 64 6f 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 68 | able-undo))..(defun.calibredb-sh |
| 246e0 | 6f 77 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 28 65 6e 74 72 79 29 0a 20 20 22 52 65 74 75 72 | ow--buffer-name.(entry)..."Retur |
| 24700 | 6e 20 74 68 65 20 61 70 70 72 6f 70 72 69 61 74 65 20 62 75 66 66 65 72 20 6e 61 6d 65 20 66 6f | n.the.appropriate.buffer.name.fo |
| 24720 | 72 20 45 4e 54 52 59 2e 0a 54 68 65 20 72 65 73 75 6c 74 20 64 65 70 65 6e 64 73 20 6f 6e 20 74 | r.ENTRY..The.result.depends.on.t |
| 24740 | 68 65 20 76 61 6c 75 65 20 6f 66 20 60 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 75 6e 69 71 | he.value.of.`calibredb-show-uniq |
| 24760 | 75 65 2d 62 75 66 66 65 72 73 27 2e 22 0a 20 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 73 68 | ue-buffers'."...(if.calibredb-sh |
| 24780 | 6f 77 2d 75 6e 69 71 75 65 2d 62 75 66 66 65 72 73 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 | ow-unique-buffers.......(format. |
| 247a0 | 22 2a 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2d 3c 25 73 3e 2a 22 0a 20 20 20 20 20 20 20 | "*calibredb-entry-<%s>*"........ |
| 247c0 | 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 | .......(calibredb-getattr.entry. |
| 247e0 | 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 29 0a 20 20 20 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 65 6e | :book-title))....."*calibredb-en |
| 24800 | 74 72 79 2a 22 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 72 | try*"))..(defun.calibredb-show-r |
| 24820 | 65 66 72 65 73 68 20 28 29 0a 20 20 22 52 65 66 72 65 73 68 20 45 4e 54 52 59 20 69 6e 20 74 68 | efresh.()..."Refresh.ENTRY.in.th |
| 24840 | 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 | e.current.buffer."...(interactiv |
| 24860 | 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 65 6e 74 72 79 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f | e)...(let*.((entry.(get-text-pro |
| 24880 | 70 65 72 74 79 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 | perty.(point-min).'calibredb-ent |
| 248a0 | 72 79 20 6e 69 6c 29 29 20 3b 20 6f 6c 64 20 65 6e 74 72 79 0a 20 20 20 20 20 20 20 20 20 28 69 | ry.nil)).;.old.entry..........(i |
| 248c0 | 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 69 64 29 29 | d.(calibredb-getattr.entry.:id)) |
| 248e0 | 20 3b 20 6f 6e 6c 79 20 67 65 74 20 74 68 65 20 69 64 0a 20 20 20 20 20 20 20 20 20 28 71 75 65 | .;.only.get.the.id..........(que |
| 24900 | 72 79 2d 72 65 73 75 6c 74 20 28 63 64 72 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 63 | ry-result.(cdr.(car.(calibredb-c |
| 24920 | 61 6e 64 69 64 61 74 65 20 69 64 29 29 29 29 29 20 3b 20 67 65 74 20 74 68 65 20 6e 65 77 20 65 | andidate.id))))).;.get.the.new.e |
| 24940 | 6e 74 72 79 20 74 68 72 6f 75 67 68 20 53 51 4c 20 71 75 65 72 79 0a 20 20 20 20 28 63 61 6c 69 | ntry.through.SQL.query.....(cali |
| 24960 | 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 20 71 75 65 72 79 2d 72 65 73 75 6c 74 29 29 29 | bredb-show-entry.query-result))) |
| 24980 | 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2d 71 75 69 74 20 28 29 | ..(defun.calibredb-entry-quit.() |
| 249a0 | 0a 20 20 22 51 75 69 74 20 74 68 65 20 2a 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2a 2e 22 | ..."Quit.the.*calibredb-entry*." |
| 249c0 | 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 65 71 20 6d 61 6a | ...(interactive)...(when.(eq.maj |
| 249e0 | 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 6f 64 65 29 0a 20 20 | or-mode.'calibredb-show-mode)... |
| 24a00 | 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 72 20 22 2a 63 61 6c 69 62 72 65 64 62 2d | ..(when.(get-buffer."*calibredb- |
| 24a20 | 65 6e 74 72 79 2a 22 29 0a 20 20 20 20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 22 2a | entry*").......(pop-to-buffer."* |
| 24a40 | 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2a 22 29 0a 20 20 20 20 20 20 28 69 66 20 28 3c 20 | calibredb-entry*").......(if.(<. |
| 24a60 | 28 6c 65 6e 67 74 68 20 28 77 69 6e 64 6f 77 2d 70 72 65 76 2d 62 75 66 66 65 72 73 29 29 20 32 | (length.(window-prev-buffers)).2 |
| 24a80 | 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 71 75 69 74 | ).........(progn...........(quit |
| 24aa0 | 2d 77 69 6e 64 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 | -window)...........(kill-buffer. |
| 24ac0 | 22 2a 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2a 22 29 29 0a 20 20 20 20 20 20 20 20 28 6b | "*calibredb-entry*")).........(k |
| 24ae0 | 69 6c 6c 2d 62 75 66 66 65 72 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2a 22 29 29 | ill-buffer."*calibredb-entry*")) |
| 24b00 | 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 29 0a 0a | )))..(provide.'calibredb-show).. |
| 24b20 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a | ;;;.calibredb-show.el.ends.here. |
| 24b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24c00 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 24c20 | 2d 74 72 61 6e 73 69 65 6e 74 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | -transient.el................... |
| 24c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24c60 | 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 |
| 24c80 | 30 30 34 35 33 35 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 31 30 32 00 20 30 00 00 00 | 0045352.00000000000.017102..0... |
| 24ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24d00 | 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................... |
| 24d20 | 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................... |
| 24d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24e00 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2e 65 6c 20 2d 2d 2d 20 54 | ;;;.calibredb-transient.el.---.T |
| 24e20 | 72 61 6e 73 69 65 6e 74 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c 65 78 69 63 | ransient.for.calibredb.-*-.lexic |
| 24e40 | 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 | al-binding:.t;.-*-..;;.Copyright |
| 24e60 | 20 28 43 29 20 32 30 32 30 20 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a | .(C).2020.Damon.Chan..;;.Author: |
| 24e80 | 20 44 61 6d 6f 6e 20 43 68 61 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e | .Damon.Chan.<elecming@gmail.com> |
| 24ea0 | 0a 3b 3b 20 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 65 6e | .;;.URL:.https://github.com/chen |
| 24ec0 | 79 61 6e 6d 69 6e 67 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 | yanming/calibredb.el.;;.Keywords |
| 24ee0 | 3a 20 74 6f 6f 6c 73 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a 3b 3b 20 54 | :.tools.;;.Version:.2.12.0..;;.T |
| 24f00 | 68 69 73 20 66 69 6c 65 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 | his.file.is.NOT.part.of.GNU.Emac |
| 24f20 | 73 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 | s...;;.This.program.is.free.soft |
| 24f40 | 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e | ware;.you.can.redistribute.it.an |
| 24f60 | 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d | d/or.modify.;;.it.under.the.term |
| 24f80 | 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 | s.of.the.GNU.General.Public.Lice |
| 24fa0 | 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 | nse.as.published.by.;;.the.Free. |
| 24fc0 | 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 | Software.Foundation,.either.vers |
| 24fe0 | 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 | ion.3.of.the.License,.or.;;.(at. |
| 25000 | 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a | your.option).any.later.version.. |
| 25020 | 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 | .;;.This.program.is.distributed. |
| 25040 | 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 73 65 66 | in.the.hope.that.it.will.be.usef |
| 25060 | 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 54 59 3b | ul,.;;.but.WITHOUT.ANY.WARRANTY; |
| 25080 | 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 72 61 6e | .without.even.the.implied.warran |
| 250a0 | 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 49 54 4e | ty.of.;;.MERCHANTABILITY.or.FITN |
| 250c0 | 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 20 20 53 | ESS.FOR.A.PARTICULAR.PURPOSE...S |
| 250e0 | 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 4c 69 63 | ee.the.;;.GNU.General.Public.Lic |
| 25100 | 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 | ense.for.more.details...;;.You.s |
| 25120 | 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 |
| 25140 | 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.;;. |
| 25160 | 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 | along.with.this.program...If.not |
| 25180 | 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 65 6e | ,.see.<https://www.gnu.org/licen |
| 251a0 | 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 3b 20 43 6f 64 | ses/>...;;;.Commentary:..;;;.Cod |
| 251c0 | 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 29 0a 0a 28 | e:..(require.'calibredb-core)..( |
| 251e0 | 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 69 | declare-function.calibredb-get-i |
| 25200 | 6e 69 74 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 | nit."calibredb-utils.el").(decla |
| 25220 | 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 6d 61 72 6b 65 | re-function.calibredb-find-marke |
| 25240 | 64 2d 63 61 6e 64 69 64 61 74 65 73 20 22 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c | d-candidates."calibredb-utils.el |
| 25260 | 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 72 | ").(declare-function.calibredb-r |
| 25280 | 67 61 20 22 63 61 6c 69 62 72 65 64 62 2d 69 76 79 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d | ga."calibredb-ivy.el").(declare- |
| 252a0 | 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 | function.calibredb-virtual-libra |
| 252c0 | 72 79 2d 6c 69 73 74 20 22 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2e 65 6c 22 29 0a | ry-list."calibredb-library.el"). |
| 252e0 | 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 | (declare-function.calibredb-virt |
| 25300 | 75 61 6c 2d 6c 69 62 72 61 72 79 2d 6e 65 78 74 20 22 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 | ual-library-next."calibredb-libr |
| 25320 | 61 72 79 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 | ary.el").(declare-function.calib |
| 25340 | 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 70 72 65 76 69 6f 75 73 20 22 63 | redb-virtual-library-previous."c |
| 25360 | 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2e 65 6c 22 29 0a 0a 3b 3b 20 54 72 61 6e 73 69 | alibredb-library.el")..;;.Transi |
| 25380 | 65 6e 74 20 64 69 73 70 61 74 63 68 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d | ent.dispatch..(transient-define- |
| 253a0 | 70 72 65 66 69 78 20 63 61 6c 69 62 72 65 64 62 2d 64 69 73 70 61 74 63 68 20 28 29 0a 20 20 22 | prefix.calibredb-dispatch.()..." |
| 253c0 | 49 6e 76 6f 6b 65 20 61 20 63 61 6c 69 62 72 65 64 62 20 63 6f 6d 6d 61 6e 64 20 66 72 6f 6d 20 | Invoke.a.calibredb.command.from. |
| 253e0 | 61 20 6c 69 73 74 20 6f 66 20 61 76 61 69 6c 61 62 6c 65 20 63 6f 6d 6d 61 6e 64 73 20 69 6e 20 | a.list.of.available.commands.in. |
| 25400 | 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 2e 22 0a 20 20 3a 6d 61 6e 2d 70 61 67 65 | *calibredb-search*."...:man-page |
| 25420 | 20 22 63 61 6c 69 62 72 65 64 62 22 0a 20 20 5b 22 46 69 6c 65 20 6f 70 65 72 61 74 69 6f 6e 22 | ."calibredb"...["File.operation" |
| 25440 | 0a 20 20 20 5b 28 22 61 22 20 22 41 64 64 20 61 20 66 69 6c 65 22 20 20 20 63 61 6c 69 62 72 65 | ....[("a"."Add.a.file"...calibre |
| 25460 | 64 62 2d 61 64 64 29 0a 20 20 20 20 28 22 41 22 20 22 41 64 64 20 61 20 64 69 72 65 63 74 6f 72 | db-add).....("A"."Add.a.director |
| 25480 | 79 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 61 64 64 2d 64 69 72 29 0a 20 20 20 20 28 22 64 22 | y"...calibredb-add-dir).....("d" |
| 254a0 | 20 22 52 65 6d 6f 76 65 20 61 20 66 69 6c 65 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 72 65 6d | ."Remove.a.file"...calibredb-rem |
| 254c0 | 6f 76 65 29 0a 20 20 20 20 28 22 65 22 20 22 45 78 70 6f 72 74 22 20 63 61 6c 69 62 72 65 64 62 | ove).....("e"."Export".calibredb |
| 254e0 | 2d 65 78 70 6f 72 74 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 22 73 22 20 22 73 65 74 5f | -export-dispatch).....("s"."set_ |
| 25500 | 6d 65 74 61 64 61 74 61 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 | metadata"...calibredb-set-metada |
| 25520 | 74 61 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 22 67 22 20 22 66 69 6c 74 65 72 22 20 20 | ta-dispatch).....("g"."filter".. |
| 25540 | 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6c 74 65 72 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 | .calibredb-filter-dispatch)..... |
| 25560 | 28 22 6f 22 20 22 73 6f 72 74 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 64 69 73 | ("o"."sort"...calibredb-sort-dis |
| 25580 | 70 61 74 63 68 29 5d 0a 20 20 20 5b 28 22 52 45 54 22 20 22 4f 70 65 6e 20 66 69 6c 65 22 20 20 | patch)]....[("RET"."Open.file".. |
| 255a0 | 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 29 0a 20 20 20 20 | .......calibredb-find-file)..... |
| 255c0 | 28 22 4f 22 20 22 4f 70 65 6e 20 66 69 6c 65 20 6f 74 68 65 72 20 66 72 61 6d 65 22 20 20 20 20 | ("O"."Open.file.other.frame".... |
| 255e0 | 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 | ........calibredb-find-file-othe |
| 25600 | 72 2d 66 72 61 6d 65 29 0a 20 20 20 20 28 22 76 22 20 22 56 69 65 77 20 64 65 74 61 69 6c 73 22 | r-frame).....("v"."View.details" |
| 25620 | 20 20 63 61 6c 69 62 72 65 64 62 2d 76 69 65 77 29 0a 20 20 20 20 28 22 56 22 20 22 4f 70 65 6e | ..calibredb-view).....("V"."Open |
| 25640 | 20 66 69 6c 65 20 77 69 74 68 20 64 65 66 61 75 6c 74 20 74 6f 6f 6c 22 20 20 63 61 6c 69 62 72 | .file.with.default.tool"..calibr |
| 25660 | 65 64 62 2d 6f 70 65 6e 2d 66 69 6c 65 2d 77 69 74 68 2d 64 65 66 61 75 6c 74 2d 74 6f 6f 6c 29 | edb-open-file-with-default-tool) |
| 25680 | 0a 20 20 20 20 28 22 2c 22 20 22 51 75 69 63 6b 20 4c 6f 6f 6b 22 20 20 63 61 6c 69 62 72 65 64 | .....(","."Quick.Look"..calibred |
| 256a0 | 62 2d 71 75 69 63 6b 2d 6c 6f 6f 6b 29 0a 20 20 20 20 28 22 2e 22 20 22 4f 70 65 6e 20 64 69 72 | b-quick-look).....("."."Open.dir |
| 256c0 | 65 64 22 20 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 64 69 72 65 64 29 5d 0a 20 20 20 5b | ed"..calibredb-open-dired)]....[ |
| 256e0 | 28 22 6d 22 20 22 4d 61 72 6b 22 20 63 61 6c 69 62 72 65 64 62 2d 6d 61 72 6b 2d 61 6e 64 2d 66 | ("m"."Mark".calibredb-mark-and-f |
| 25700 | 6f 72 77 61 72 64 29 0a 20 20 20 20 28 22 75 22 20 22 55 6e 6d 61 72 6b 20 61 6e 64 20 66 6f 72 | orward).....("u"."Unmark.and.for |
| 25720 | 77 61 72 64 22 20 63 61 6c 69 62 72 65 64 62 2d 75 6e 6d 61 72 6b 2d 61 6e 64 2d 66 6f 72 77 61 | ward".calibredb-unmark-and-forwa |
| 25740 | 72 64 29 0a 20 20 20 20 28 22 44 45 4c 22 20 22 55 6e 6d 61 72 6b 20 61 6e 64 20 62 61 63 6b 77 | rd).....("DEL"."Unmark.and.backw |
| 25760 | 61 72 64 22 20 63 61 6c 69 62 72 65 64 62 2d 75 6e 6d 61 72 6b 2d 61 6e 64 2d 62 61 63 6b 77 61 | ard".calibredb-unmark-and-backwa |
| 25780 | 72 64 29 0a 20 20 20 20 28 22 2a 22 20 22 46 61 76 6f 72 69 74 65 22 20 63 61 6c 69 62 72 65 64 | rd).....("*"."Favorite".calibred |
| 257a0 | 62 2d 74 6f 67 67 6c 65 2d 66 61 76 6f 72 69 74 65 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 | b-toggle-favorite-at-point)..... |
| 257c0 | 28 22 68 22 20 22 48 69 67 68 6c 69 67 68 74 22 20 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c | ("h"."Highlight".calibredb-toggl |
| 257e0 | 65 2d 68 69 67 68 6c 69 67 68 74 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 28 22 78 22 20 22 | e-highlight-at-point).....("x"." |
| 25800 | 41 72 63 68 69 76 65 22 20 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 61 72 63 68 69 76 | Archive".calibredb-toggle-archiv |
| 25820 | 65 2d 61 74 2d 70 6f 69 6e 74 29 5d 5d 0a 20 20 5b 22 4c 69 62 72 61 72 79 20 6f 70 65 72 61 74 | e-at-point)]]...["Library.operat |
| 25840 | 69 6f 6e 22 0a 20 20 20 5b 28 22 6c 22 20 22 4c 69 73 74 20 56 69 72 74 75 61 6c 20 4c 69 62 72 | ion"....[("l"."List.Virtual.Libr |
| 25860 | 61 72 69 65 73 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 | aries"...calibredb-virtual-libra |
| 25880 | 72 79 2d 6c 69 73 74 29 0a 20 20 20 20 28 22 6e 22 20 22 4e 65 78 74 20 56 69 72 74 75 61 6c 20 | ry-list).....("n"."Next.Virtual. |
| 258a0 | 4c 69 62 72 61 72 79 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 | Library"...calibredb-virtual-lib |
| 258c0 | 72 61 72 79 2d 6e 65 78 74 29 0a 20 20 20 20 28 22 70 22 20 22 50 72 65 76 69 6f 75 73 20 56 69 | rary-next).....("p"."Previous.Vi |
| 258e0 | 72 74 75 61 6c 20 4c 69 62 72 61 72 79 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 | rtual.Library"...calibredb-virtu |
| 25900 | 61 6c 2d 6c 69 62 72 61 72 79 2d 70 72 65 76 69 6f 75 73 29 5d 0a 20 20 20 5b 28 22 4c 22 20 22 | al-library-previous)]....[("L"." |
| 25920 | 4c 69 73 74 20 4c 69 62 72 61 72 69 65 73 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 | List.Libraries"...calibredb-libr |
| 25940 | 61 72 79 2d 6c 69 73 74 29 0a 20 20 20 20 28 22 4e 22 20 22 4e 65 78 74 20 4c 69 62 72 61 72 79 | ary-list).....("N"."Next.Library |
| 25960 | 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 6e 65 78 74 29 0a 20 20 20 20 | "...calibredb-library-next)..... |
| 25980 | 28 22 50 22 20 22 50 72 65 76 69 6f 75 73 20 4c 69 62 72 61 72 79 22 20 20 20 63 61 6c 69 62 72 | ("P"."Previous.Library"...calibr |
| 259a0 | 65 64 62 2d 6c 69 62 72 61 72 79 2d 70 72 65 76 69 6f 75 73 29 0a 20 20 20 20 28 22 53 22 20 22 | edb-library-previous).....("S"." |
| 259c0 | 53 77 69 74 63 68 20 4c 69 62 72 61 72 79 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 77 69 74 | Switch.Library"...calibredb-swit |
| 259e0 | 63 68 2d 6c 69 62 72 61 72 79 29 5d 0a 20 20 20 5b 28 22 63 22 20 22 43 6c 6f 6e 65 20 4c 69 62 | ch-library)]....[("c"."Clone.Lib |
| 25a00 | 72 61 72 79 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6c 6f 6e 65 29 0a 20 20 20 20 28 22 72 | rary"...calibredb-clone).....("r |
| 25a20 | 22 20 22 52 65 66 72 65 73 68 20 4c 69 62 72 61 72 79 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d | "."Refresh.Library"...calibredb- |
| 25a40 | 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 61 6e 64 2d 63 6c 65 61 72 2d 66 69 6c 74 65 72 29 | search-refresh-and-clear-filter) |
| 25a60 | 0a 20 20 20 20 28 22 52 22 20 22 43 6c 65 61 72 20 46 69 6c 74 65 72 22 20 20 20 63 61 6c 69 62 | .....("R"."Clear.Filter"...calib |
| 25a80 | 72 65 64 62 2d 73 65 61 72 63 68 2d 63 6c 65 61 72 2d 66 69 6c 74 65 72 29 0a 20 20 20 20 28 22 | redb-search-clear-filter).....(" |
| 25aa0 | 74 22 20 22 54 6f 67 67 6c 65 20 76 69 65 77 20 28 43 6f 6d 70 61 63 74 2f 44 65 74 61 69 6c 29 | t"."Toggle.view.(Compact/Detail) |
| 25ac0 | 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 76 69 65 77 29 5d 5d 0a 20 20 5b | "...calibredb-toggle-view)]]...[ |
| 25ae0 | 22 4f 74 68 65 72 20 6f 70 65 72 61 74 69 6f 6e 22 0a 20 20 20 5b 28 22 62 22 20 22 42 69 62 54 | "Other.operation"....[("b"."BibT |
| 25b00 | 65 78 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 61 74 61 6c 6f 67 2d 62 69 62 2d 64 69 73 70 | ex"...calibredb-catalog-bib-disp |
| 25b20 | 61 74 63 68 29 0a 20 20 20 20 28 22 69 22 20 22 45 64 69 74 20 41 6e 6e 6f 74 61 74 69 6f 6e 22 | atch).....("i"."Edit.Annotation" |
| 25b40 | 20 63 61 6c 69 62 72 65 64 62 2d 65 64 69 74 2d 61 6e 6e 6f 74 61 74 69 6f 6e 29 5d 0a 20 20 20 | .calibredb-edit-annotation)].... |
| 25b60 | 5b 28 22 27 22 20 22 53 65 61 72 63 68 20 77 69 74 68 20 72 67 61 22 20 63 61 6c 69 62 72 65 64 | [("'"."Search.with.rga".calibred |
| 25b80 | 62 2d 72 67 61 29 0a 20 20 20 20 28 22 2f 22 20 22 4c 69 76 65 20 46 69 6c 74 65 72 22 20 63 61 | b-rga).....("/"."Live.Filter".ca |
| 25ba0 | 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6c 69 76 65 2d 66 69 6c 74 65 72 29 5d 0a 20 20 20 | libredb-search-live-filter)].... |
| 25bc0 | 5b 28 22 79 22 20 22 59 61 6e 6b 22 20 63 61 6c 69 62 72 65 64 62 2d 79 61 6e 6b 2d 64 69 73 70 | [("y"."Yank".calibredb-yank-disp |
| 25be0 | 61 74 63 68 29 5d 5d 0a 20 20 5b 28 22 71 22 20 22 51 75 69 74 22 20 20 20 74 72 61 6e 73 69 65 | atch)]]...[("q"."Quit"...transie |
| 25c00 | 6e 74 2d 71 75 69 74 2d 6f 6e 65 29 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e | nt-quit-one)])..(transient-defin |
| 25c20 | 65 2d 70 72 65 66 69 78 20 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2d 64 69 73 70 61 74 63 | e-prefix.calibredb-entry-dispatc |
| 25c40 | 68 20 28 29 0a 20 20 22 49 6e 76 6f 6b 65 20 61 20 63 61 6c 69 62 72 65 64 62 20 63 6f 6d 6d 61 | h.()..."Invoke.a.calibredb.comma |
| 25c60 | 6e 64 20 66 72 6f 6d 20 61 20 6c 69 73 74 20 6f 66 20 61 76 61 69 6c 61 62 6c 65 20 63 6f 6d 6d | nd.from.a.list.of.available.comm |
| 25c80 | 61 6e 64 73 20 69 6e 20 2a 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 2a 2e 22 0a 20 20 3a 6d | ands.in.*calibredb-entry*."...:m |
| 25ca0 | 61 6e 2d 70 61 67 65 20 22 63 61 6c 69 62 72 65 64 62 22 0a 20 20 5b 22 46 69 6c 65 20 6f 70 65 | an-page."calibredb"...["File.ope |
| 25cc0 | 72 61 74 69 6f 6e 22 0a 20 20 20 5b 28 22 6f 22 20 22 4f 70 65 6e 20 66 69 6c 65 22 20 20 20 20 | ration"....[("o"."Open.file".... |
| 25ce0 | 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 29 0a 20 20 20 20 28 22 | .....calibredb-find-file).....(" |
| 25d00 | 4f 22 20 22 4f 70 65 6e 20 66 69 6c 65 20 6f 74 68 65 72 20 66 72 61 6d 65 22 20 20 20 20 20 20 | O"."Open.file.other.frame"...... |
| 25d20 | 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d | ......calibredb-find-file-other- |
| 25d40 | 66 72 61 6d 65 29 0a 20 20 20 20 28 22 56 22 20 22 4f 70 65 6e 20 66 69 6c 65 20 77 69 74 68 20 | frame).....("V"."Open.file.with. |
| 25d60 | 64 65 66 61 75 6c 74 20 74 6f 6f 6c 22 20 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 66 69 | default.tool"..calibredb-open-fi |
| 25d80 | 6c 65 2d 77 69 74 68 2d 64 65 66 61 75 6c 74 2d 74 6f 6f 6c 29 0a 20 20 20 20 28 22 2e 22 20 22 | le-with-default-tool).....("."." |
| 25da0 | 51 75 69 63 6b 20 4c 6f 6f 6b 22 20 20 63 61 6c 69 62 72 65 64 62 2d 71 75 69 63 6b 2d 6c 6f 6f | Quick.Look"..calibredb-quick-loo |
| 25dc0 | 6b 29 0a 20 20 20 20 28 22 2e 22 20 22 4f 70 65 6e 20 64 69 72 65 64 22 20 20 63 61 6c 69 62 72 | k).....("."."Open.dired"..calibr |
| 25de0 | 65 64 62 2d 6f 70 65 6e 2d 64 69 72 65 64 29 5d 0a 20 20 20 5b 28 22 65 22 20 22 45 78 70 6f 72 | edb-open-dired)]....[("e"."Expor |
| 25e00 | 74 22 20 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f 72 74 2d 64 69 73 70 61 74 63 68 29 0a 20 20 | t".calibredb-export-dispatch)... |
| 25e20 | 20 20 28 22 73 22 20 22 73 65 74 5f 6d 65 74 61 64 61 74 61 22 20 20 20 63 61 6c 69 62 72 65 64 | ..("s"."set_metadata"...calibred |
| 25e40 | 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 22 79 | b-set-metadata-dispatch).....("y |
| 25e60 | 22 20 22 59 61 6e 6b 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 79 61 6e 6b 2d 64 69 73 70 61 74 | "."Yank"...calibredb-yank-dispat |
| 25e80 | 63 68 29 0a 20 20 20 20 28 22 27 22 20 22 53 65 61 72 63 68 20 77 69 74 68 20 72 67 61 22 20 63 | ch).....("'"."Search.with.rga".c |
| 25ea0 | 61 6c 69 62 72 65 64 62 2d 72 67 61 29 5d 5d 0a 20 20 5b 28 22 71 22 20 22 51 75 69 74 22 20 20 | alibredb-rga)]]...[("q"."Quit".. |
| 25ec0 | 20 74 72 61 6e 73 69 65 6e 74 2d 71 75 69 74 2d 6f 6e 65 29 5d 29 0a 0a 28 74 72 61 6e 73 69 65 | .transient-quit-one)])..(transie |
| 25ee0 | 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d | nt-define-prefix.calibredb-set-m |
| 25f00 | 65 74 61 64 61 74 61 2d 64 69 73 70 61 74 63 68 20 28 29 0a 20 20 22 44 69 73 70 61 74 63 68 20 | etadata-dispatch.()..."Dispatch. |
| 25f20 | 66 6f 72 20 73 65 74 2d 6d 65 74 61 64 61 74 61 2e 22 0a 20 20 5b 22 41 72 67 75 6d 65 6e 74 73 | for.set-metadata."...["Arguments |
| 25f40 | 22 0a 20 20 20 28 22 2d 61 22 20 22 61 75 74 68 6f 72 5f 73 6f 72 74 22 20 20 22 61 75 74 68 6f | "....("-a"."author_sort".."autho |
| 25f60 | 72 5f 73 6f 72 74 3a 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 | r_sort:".calibredb-transient-rea |
| 25f80 | 64 2d 6d 65 74 61 64 61 74 61 2d 61 75 74 68 6f 72 2d 73 6f 72 74 29 0a 20 20 20 28 22 2d 41 22 | d-metadata-author-sort)....("-A" |
| 25fa0 | 20 22 61 75 74 68 6f 72 73 22 20 20 22 61 75 74 68 6f 72 73 3a 22 20 63 61 6c 69 62 72 65 64 62 | ."authors".."authors:".calibredb |
| 25fc0 | 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 2d 61 75 74 68 6f 72 73 | -transient-read-metadata-authors |
| 25fe0 | 29 0a 20 20 20 28 22 2d 63 22 20 22 63 6f 6d 6d 65 6e 74 73 22 20 20 22 63 6f 6d 6d 65 6e 74 73 | )....("-c"."comments".."comments |
| 26000 | 3a 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 65 74 61 | :".calibredb-transient-read-meta |
| 26020 | 64 61 74 61 2d 63 6f 6d 6d 65 6e 74 73 29 0a 20 20 20 28 22 2d 43 22 20 22 63 6f 76 65 72 22 20 | data-comments)....("-C"."cover". |
| 26040 | 22 63 6f 76 65 72 3a 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 | "cover:".calibredb-transient-rea |
| 26060 | 64 2d 66 69 6c 65 29 0a 20 20 20 28 22 2d 69 22 20 22 69 64 65 6e 74 69 66 69 65 72 73 22 20 20 | d-file)....("-i"."identifiers".. |
| 26080 | 22 69 64 65 6e 74 69 66 69 65 72 73 3a 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 | "identifiers:".calibredb-transie |
| 260a0 | 6e 74 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 2d 69 64 73 29 0a 20 20 20 28 22 2d 6c 22 20 22 | nt-read-metadata-ids)....("-l"." |
| 260c0 | 6c 61 6e 67 75 61 67 65 73 22 20 20 22 6c 61 6e 67 75 61 67 65 73 3a 22 20 72 65 61 64 2d 73 74 | languages".."languages:".read-st |
| 260e0 | 72 69 6e 67 29 0a 20 20 20 28 22 2d 70 22 20 22 70 75 62 64 61 74 65 22 20 22 70 75 62 64 61 74 | ring)....("-p"."pubdate"."pubdat |
| 26100 | 65 3a 22 20 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 64 61 74 65 29 0a 20 20 20 28 22 2d 50 | e:".transient-read-date)....("-P |
| 26120 | 22 20 22 70 75 62 6c 69 73 68 65 72 22 20 22 70 75 62 6c 69 73 68 65 72 3a 22 20 72 65 61 64 2d | "."publisher"."publisher:".read- |
| 26140 | 73 74 72 69 6e 67 29 0a 20 20 20 28 22 2d 72 22 20 22 72 61 74 69 6e 67 22 20 20 22 72 61 74 69 | string)....("-r"."rating".."rati |
| 26160 | 6e 67 3a 22 20 72 65 61 64 2d 73 74 72 69 6e 67 29 0a 20 20 20 28 22 2d 73 22 20 22 73 65 72 69 | ng:".read-string)....("-s"."seri |
| 26180 | 65 73 22 20 22 73 65 72 69 65 73 3a 22 20 72 65 61 64 2d 73 74 72 69 6e 67 29 0a 20 20 20 28 22 | es"."series:".read-string)....(" |
| 261a0 | 2d 53 22 20 22 73 65 72 69 65 73 5f 69 6e 64 65 78 22 20 22 73 65 72 69 65 73 5f 69 6e 64 65 78 | -S"."series_index"."series_index |
| 261c0 | 3a 22 20 72 65 61 64 2d 73 74 72 69 6e 67 29 0a 20 20 20 28 22 2d 68 22 20 22 73 69 7a 65 22 20 | :".read-string)....("-h"."size". |
| 261e0 | 22 73 69 7a 65 3a 22 20 72 65 61 64 2d 73 74 72 69 6e 67 29 0a 20 20 20 28 22 2d 48 22 20 22 73 | "size:".read-string)....("-H"."s |
| 26200 | 6f 72 74 22 20 22 73 6f 72 74 3a 22 20 72 65 61 64 2d 73 74 72 69 6e 67 29 0a 20 20 20 28 22 2d | ort"."sort:".read-string)....("- |
| 26220 | 74 22 20 22 74 61 67 73 22 20 22 74 61 67 73 3a 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e | t"."tags"."tags:".calibredb-tran |
| 26240 | 73 69 65 6e 74 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 2d 74 61 67 73 29 0a 20 20 20 28 22 2d | sient-read-metadata-tags)....("- |
| 26260 | 54 22 20 22 74 69 74 6c 65 22 20 22 74 69 74 6c 65 3a 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 | T"."title"."title:".calibredb-tr |
| 26280 | 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 2d 74 69 74 6c 65 29 0a 20 20 20 | ansient-read-metadata-title).... |
| 262a0 | 28 22 2d 64 22 20 22 74 69 6d 65 73 74 61 6d 70 22 20 22 74 69 6d 65 73 74 61 6d 70 3a 22 20 74 | ("-d"."timestamp"."timestamp:".t |
| 262c0 | 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 64 61 74 65 29 5d 0a 20 20 5b 5b 22 53 69 6e 67 6c 65 | ransient-read-date)]...[["Single |
| 262e0 | 20 46 69 65 6c 64 22 0a 20 20 20 20 28 22 74 22 20 22 74 61 67 73 22 20 20 20 20 20 20 20 20 20 | .Field".....("t"."tags"......... |
| 26300 | 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 61 67 73 29 0a 20 20 | calibredb-set-metadata--tags)... |
| 26320 | 20 20 28 22 54 22 20 22 74 69 74 6c 65 22 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 | ..("T"."title".........calibredb |
| 26340 | 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 69 74 6c 65 29 0a 20 20 20 20 28 22 61 22 20 22 | -set-metadata--title).....("a"." |
| 26360 | 61 75 74 68 6f 72 5f 73 6f 72 74 22 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 | author_sort".........calibredb-s |
| 26380 | 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 61 75 74 68 6f 72 5f 73 6f 72 74 29 0a 20 20 20 20 28 22 | et-metadata--author_sort).....(" |
| 263a0 | 63 22 20 22 63 6f 6d 6d 65 6e 74 73 22 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d | c"."comments".........calibredb- |
| 263c0 | 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 63 6f 6d 6d 65 6e 74 73 29 5d 0a 20 20 20 5b 22 54 6f | set-metadata--comments)]....["To |
| 263e0 | 67 67 6c 65 20 66 69 65 6c 64 22 0a 20 20 20 20 28 22 2a 22 20 22 66 61 76 6f 72 69 74 65 22 20 | ggle.field".....("*"."favorite". |
| 26400 | 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 66 61 76 6f 72 69 74 65 2d 61 74 2d 70 6f 69 | calibredb-toggle-favorite-at-poi |
| 26420 | 6e 74 29 0a 20 20 20 20 28 22 78 22 20 22 61 72 63 68 69 76 65 22 20 63 61 6c 69 62 72 65 64 62 | nt).....("x"."archive".calibredb |
| 26440 | 2d 74 6f 67 67 6c 65 2d 61 72 63 68 69 76 65 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 28 22 | -toggle-archive-at-point).....(" |
| 26460 | 68 22 20 22 68 69 67 68 6c 69 67 68 74 22 20 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d | h"."highlight".calibredb-toggle- |
| 26480 | 68 69 67 68 6c 69 67 68 74 2d 61 74 2d 70 6f 69 6e 74 29 5d 0a 20 20 20 5b 22 53 65 74 20 6d 65 | highlight-at-point)]....["Set.me |
| 264a0 | 74 61 64 61 74 61 22 0a 20 20 20 20 28 22 73 22 20 22 53 65 74 20 6d 65 74 61 64 61 74 61 20 57 | tadata".....("s"."Set.metadata.W |
| 264c0 | 69 74 68 20 41 72 67 75 6d 65 6e 74 73 22 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 | ith.Arguments".........calibredb |
| 264e0 | 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 72 61 6e 73 69 65 6e 74 29 0a 20 20 20 20 28 22 | -set-metadata--transient).....(" |
| 26500 | 66 22 20 22 46 65 74 63 68 20 61 6e 64 20 73 65 74 20 6d 65 74 61 64 61 74 61 20 62 79 20 61 75 | f"."Fetch.and.set.metadata.by.au |
| 26520 | 74 68 6f 72 20 61 6e 64 20 74 69 74 6c 65 22 20 20 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 | thor.and.title"..calibredb-fetch |
| 26540 | 2d 61 6e 64 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 62 79 2d 61 75 74 68 6f 72 2d 61 6e 64 2d | -and-set-metadata-by-author-and- |
| 26560 | 74 69 74 6c 65 29 0a 20 20 20 20 28 22 69 22 20 22 46 65 74 63 68 20 61 6e 64 20 73 65 74 20 6d | title).....("i"."Fetch.and.set.m |
| 26580 | 65 74 61 64 61 74 61 20 62 79 20 49 53 42 4e 22 20 20 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 | etadata.by.ISBN"..calibredb-fetc |
| 265a0 | 68 2d 61 6e 64 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 62 79 2d 69 73 62 6e 29 0a 20 20 20 20 | h-and-set-metadata-by-isbn)..... |
| 265c0 | 28 22 64 22 20 22 46 65 74 63 68 20 61 6e 64 20 73 65 74 20 6d 65 74 61 64 61 74 61 20 62 79 20 | ("d"."Fetch.and.set.metadata.by. |
| 265e0 | 69 64 65 6e 74 69 66 69 65 72 22 20 20 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 61 6e 64 | identifier"..calibredb-fetch-and |
| 26600 | 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 62 79 2d 69 64 29 5d 5d 0a 20 20 5b 28 22 71 22 20 22 | -set-metadata-by-id)]]...[("q"." |
| 26620 | 51 75 69 74 22 20 20 20 74 72 61 6e 73 69 65 6e 74 2d 71 75 69 74 2d 6f 6e 65 29 5d 29 0a 0a 28 | Quit"...transient-quit-one)])..( |
| 26640 | 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 63 61 6c 69 62 72 65 64 | transient-define-prefix.calibred |
| 26660 | 62 2d 66 69 6c 74 65 72 2d 64 69 73 70 61 74 63 68 20 28 29 0a 20 20 22 44 69 73 70 61 74 63 68 | b-filter-dispatch.()..."Dispatch |
| 26680 | 20 66 6f 72 20 66 69 6c 74 65 72 69 6e 67 20 74 68 65 20 72 65 73 75 6c 74 73 2e 22 0a 20 20 5b | .for.filtering.the.results."...[ |
| 266a0 | 5b 22 46 69 6c 74 65 72 20 62 79 22 0a 20 20 20 20 28 22 74 22 20 22 74 61 67 22 20 20 20 20 20 | ["Filter.by".....("t"."tag"..... |
| 266c0 | 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6c 74 65 72 2d 62 79 2d 74 61 67 29 0a 20 20 20 | ....calibredb-filter-by-tag).... |
| 266e0 | 20 28 22 66 22 20 22 66 6f 72 6d 61 74 22 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 | .("f"."format".........calibredb |
| 26700 | 2d 66 69 6c 74 65 72 2d 62 79 2d 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 0a 20 20 20 20 28 22 61 22 | -filter-by-book-format).....("a" |
| 26720 | 20 22 61 75 74 68 6f 72 22 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6c 74 | ."author".........calibredb-filt |
| 26740 | 65 72 2d 62 79 2d 61 75 74 68 6f 72 2d 73 6f 72 74 29 0a 20 20 20 20 28 22 64 22 20 22 64 61 74 | er-by-author-sort).....("d"."dat |
| 26760 | 65 22 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6c 74 65 72 2d 62 79 2d 6c | e".........calibredb-filter-by-l |
| 26780 | 61 73 74 5f 6d 6f 64 69 66 69 65 64 29 0a 20 20 20 20 28 22 6c 22 20 22 6c 69 62 72 61 72 79 20 | ast_modified).....("l"."library. |
| 267a0 | 28 76 69 72 74 75 61 6c 29 22 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 | (virtual)"......calibredb-virtua |
| 267c0 | 6c 2d 6c 69 62 72 61 72 79 2d 6c 69 73 74 29 0a 20 20 20 20 28 22 4c 22 20 22 4c 69 62 72 61 72 | l-library-list).....("L"."Librar |
| 267e0 | 79 22 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 6c 69 73 74 29 0a | y"......calibredb-library-list). |
| 26800 | 20 20 20 20 28 22 72 22 20 22 72 65 73 65 74 22 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 | ....("r"."reset".calibredb-searc |
| 26820 | 68 2d 63 6c 65 61 72 2d 66 69 6c 74 65 72 29 5d 5d 0a 20 20 5b 28 22 71 22 20 22 51 75 69 74 22 | h-clear-filter)]]...[("q"."Quit" |
| 26840 | 20 20 20 74 72 61 6e 73 69 65 6e 74 2d 71 75 69 74 2d 6f 6e 65 29 5d 29 0a 0a 28 74 72 61 6e 73 | ...transient-quit-one)])..(trans |
| 26860 | 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 | ient-define-prefix.calibredb-sor |
| 26880 | 74 2d 64 69 73 70 61 74 63 68 20 28 29 0a 20 20 22 44 69 73 70 61 74 63 68 20 66 6f 72 20 73 6f | t-dispatch.()..."Dispatch.for.so |
| 268a0 | 72 74 69 6e 67 20 74 68 65 20 72 65 73 75 6c 74 73 2e 22 0a 20 20 5b 5b 22 53 6f 72 74 20 62 79 | rting.the.results."...[["Sort.by |
| 268c0 | 22 0a 20 20 20 20 28 22 6f 22 20 22 6f 72 64 65 72 20 28 74 6f 67 67 6c 65 29 22 20 20 20 20 20 | ".....("o"."order.(toggle)"..... |
| 268e0 | 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 74 6f 67 67 6c 65 2d 6f 72 64 65 72 29 0a 20 20 20 20 | ....calibredb-toggle-order)..... |
| 26900 | 28 22 69 22 20 22 69 64 22 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 | ("i"."id".........calibredb-sort |
| 26920 | 2d 62 79 2d 69 64 29 0a 20 20 20 20 28 22 74 22 20 22 74 69 74 6c 65 22 20 20 20 20 20 20 63 61 | -by-id).....("t"."title"......ca |
| 26940 | 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 2d 74 69 74 6c 65 29 0a 20 20 20 20 28 22 66 22 20 | libredb-sort-by-title).....("f". |
| 26960 | 22 66 6f 72 6d 61 74 22 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d | "format".........calibredb-sort- |
| 26980 | 62 79 2d 66 6f 72 6d 61 74 29 0a 20 20 20 20 28 22 61 22 20 22 61 75 74 68 6f 72 22 20 20 20 20 | by-format).....("a"."author".... |
| 269a0 | 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 2d 61 75 74 68 6f 72 29 0a 20 | .....calibredb-sort-by-author).. |
| 269c0 | 20 20 20 28 22 64 22 20 22 64 61 74 65 22 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 6f | ...("d"."date"......calibredb-so |
| 269e0 | 72 74 2d 62 79 2d 64 61 74 65 29 0a 20 20 20 20 28 22 70 22 20 22 70 75 62 64 61 74 65 22 20 20 | rt-by-date).....("p"."pubdate".. |
| 26a00 | 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 2d 70 75 62 64 61 74 65 | .......calibredb-sort-by-pubdate |
| 26a20 | 29 0a 20 20 20 20 28 22 54 22 20 22 54 61 67 22 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d | ).....("T"."Tag"......calibredb- |
| 26a40 | 73 6f 72 74 2d 62 79 2d 74 61 67 29 0a 20 20 20 20 28 22 73 22 20 22 73 69 7a 65 22 20 20 20 20 | sort-by-tag).....("s"."size".... |
| 26a60 | 20 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 74 2d 62 79 2d 73 69 7a 65 29 0a 20 20 20 20 28 22 | ..calibredb-sort-by-size).....(" |
| 26a80 | 6c 22 20 22 6c 61 6e 67 75 61 67 65 22 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 6f 72 | l"."language"......calibredb-sor |
| 26aa0 | 74 2d 62 79 2d 6c 61 6e 67 75 61 67 65 29 5d 5d 0a 20 20 5b 28 22 71 22 20 22 51 75 69 74 22 20 | t-by-language)]]...[("q"."Quit". |
| 26ac0 | 20 20 74 72 61 6e 73 69 65 6e 74 2d 71 75 69 74 2d 6f 6e 65 29 5d 29 0a 0a 28 74 72 61 6e 73 69 | ..transient-quit-one)])..(transi |
| 26ae0 | 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f | ent-define-prefix.calibredb-expo |
| 26b00 | 72 74 2d 64 69 73 70 61 74 63 68 20 28 29 0a 20 20 22 44 69 73 70 61 74 63 68 20 66 6f 72 20 65 | rt-dispatch.()..."Dispatch.for.e |
| 26b20 | 78 70 6f 72 74 20 66 69 6c 65 73 2e 22 0a 20 20 5b 5b 22 45 78 70 6f 72 74 22 0a 20 20 20 20 28 | xport.files."...[["Export".....( |
| 26b40 | 22 45 22 20 22 45 78 70 6f 72 74 20 28 4e 6f 20 63 6f 6e 76 65 72 73 69 6f 6e 29 22 20 20 20 20 | "E"."Export.(No.conversion)".... |
| 26b60 | 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f 72 74 2d 77 69 74 68 6f 75 74 2d 63 6f | .....calibredb-export-without-co |
| 26b80 | 6e 76 65 72 73 69 6f 6e 2d 64 69 73 70 61 74 63 68 29 0a 20 20 20 20 28 22 61 22 20 22 61 7a 77 | nversion-dispatch).....("a"."azw |
| 26ba0 | 33 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 61 7a 77 33 29 0a | 3"...calibredb-convert-to-azw3). |
| 26bc0 | 20 20 20 20 28 22 64 22 20 22 64 6f 63 78 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 | ....("d"."docx"...calibredb-conv |
| 26be0 | 65 72 74 2d 74 6f 2d 64 6f 63 78 29 0a 20 20 20 20 28 22 65 22 20 22 65 70 75 62 22 20 20 20 63 | ert-to-docx).....("e"."epub"...c |
| 26c00 | 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 65 70 75 62 29 0a 20 20 20 20 28 22 | alibredb-convert-to-epub).....(" |
| 26c20 | 66 22 20 22 66 62 32 22 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f | f"."fb2"....calibredb-convert-to |
| 26c40 | 2d 66 62 32 29 0a 20 20 20 20 28 22 68 22 20 22 68 74 6d 6c 22 20 20 20 63 61 6c 69 62 72 65 64 | -fb2).....("h"."html"...calibred |
| 26c60 | 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 68 74 6d 6c 29 0a 20 20 20 20 28 22 48 22 20 22 68 74 6d | b-convert-to-html).....("H"."htm |
| 26c80 | 6c 7a 22 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 68 74 6d 6c 7a 29 | lz"..calibredb-convert-to-htmlz) |
| 26ca0 | 0a 20 20 20 20 28 22 6c 22 20 22 6c 69 74 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 | .....("l"."lit"...calibredb-conv |
| 26cc0 | 65 72 74 2d 74 6f 2d 6c 69 74 29 0a 20 20 20 20 28 22 4c 22 20 22 6c 72 66 22 20 20 20 63 61 6c | ert-to-lit).....("L"."lrf"...cal |
| 26ce0 | 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 6c 72 66 29 0a 20 20 20 20 28 22 6d 22 20 | ibredb-convert-to-lrf).....("m". |
| 26d00 | 22 6d 6f 62 69 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 6d 6f | "mobi"...calibredb-convert-to-mo |
| 26d20 | 62 69 29 0a 20 20 20 20 28 22 6f 22 20 22 6f 65 62 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 | bi).....("o"."oeb"...calibredb-c |
| 26d40 | 6f 6e 76 65 72 74 2d 74 6f 2d 6f 65 62 29 0a 20 20 20 20 28 22 50 22 20 22 70 64 62 22 20 20 20 | onvert-to-oeb).....("P"."pdb"... |
| 26d60 | 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 70 64 62 29 0a 20 20 20 20 28 22 | calibredb-convert-to-pdb).....(" |
| 26d80 | 70 22 20 22 70 64 66 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d | p"."pdf"...calibredb-convert-to- |
| 26da0 | 70 64 66 29 0a 20 20 20 20 28 22 4d 22 20 22 70 6d 6c 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d | pdf).....("M"."pml"...calibredb- |
| 26dc0 | 63 6f 6e 76 65 72 74 2d 74 6f 2d 70 6d 6c 29 0a 20 20 20 20 28 22 72 22 20 22 72 62 22 20 20 20 | convert-to-pml).....("r"."rb"... |
| 26de0 | 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 72 62 29 0a 20 20 20 20 28 22 52 | calibredb-convert-to-rb).....("R |
| 26e00 | 22 20 22 72 74 66 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 72 | "."rtf"...calibredb-convert-to-r |
| 26e20 | 74 66 29 0a 20 20 20 20 28 22 73 22 20 22 73 6e 62 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 | tf).....("s"."snb"...calibredb-c |
| 26e40 | 6f 6e 76 65 72 74 2d 74 6f 2d 73 6e 62 29 0a 20 20 20 20 28 22 54 22 20 22 74 63 72 22 20 20 20 | onvert-to-snb).....("T"."tcr"... |
| 26e60 | 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 74 63 72 29 0a 20 20 20 20 28 22 | calibredb-convert-to-tcr).....(" |
| 26e80 | 74 22 20 22 74 78 74 22 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d | t"."txt"...calibredb-convert-to- |
| 26ea0 | 74 78 74 29 0a 20 20 20 20 28 22 7a 22 20 22 74 78 74 7a 22 20 20 20 63 61 6c 69 62 72 65 64 62 | txt).....("z"."txtz"...calibredb |
| 26ec0 | 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 74 78 74 7a 29 5d 5d 0a 20 20 5b 28 22 71 22 20 22 51 75 69 | -convert-to-txtz)]]...[("q"."Qui |
| 26ee0 | 74 22 20 20 20 74 72 61 6e 73 69 65 6e 74 2d 71 75 69 74 2d 6f 6e 65 29 5d 29 0a 0a 28 74 72 61 | t"...transient-quit-one)])..(tra |
| 26f00 | 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 63 61 6c 69 62 72 65 64 62 2d 65 | nsient-define-prefix.calibredb-e |
| 26f20 | 78 70 6f 72 74 2d 77 69 74 68 6f 75 74 2d 63 6f 6e 76 65 72 73 69 6f 6e 2d 64 69 73 70 61 74 63 | xport-without-conversion-dispatc |
| 26f40 | 68 20 28 29 0a 20 20 22 44 69 73 70 61 74 63 68 20 66 6f 72 20 65 78 70 6f 72 74 20 66 69 6c 65 | h.()..."Dispatch.for.export.file |
| 26f60 | 73 20 77 69 74 68 6f 75 74 20 63 6f 6e 76 65 72 73 69 6f 6e 2e 22 0a 20 20 5b 22 41 72 67 75 6d | s.without.conversion."...["Argum |
| 26f80 | 65 6e 74 73 22 0a 20 20 20 28 22 2d 61 22 20 22 44 6f 20 6e 6f 74 20 63 6f 6e 76 65 72 74 20 6e | ents"....("-a"."Do.not.convert.n |
| 26fa0 | 6f 6e 20 45 6e 67 6c 69 73 68 20 63 68 61 72 61 63 74 65 72 73 20 66 6f 72 20 74 68 65 20 66 69 | on.English.characters.for.the.fi |
| 26fc0 | 6c 65 20 6e 61 6d 65 73 22 20 20 22 2d 2d 64 6f 6e 74 2d 61 73 63 69 69 69 7a 65 22 29 0a 20 20 | le.names".."--dont-asciiize")... |
| 26fe0 | 20 28 22 2d 63 22 20 22 44 6f 20 6e 6f 74 20 73 61 76 65 20 63 6f 76 65 72 22 20 20 22 2d 2d 64 | .("-c"."Do.not.save.cover".."--d |
| 27000 | 6f 6e 74 2d 73 61 76 65 2d 63 6f 76 65 72 22 29 0a 20 20 20 28 22 2d 6d 22 20 22 44 6f 20 6e 6f | ont-save-cover")....("-m"."Do.no |
| 27020 | 74 20 75 70 64 61 74 65 20 6d 65 74 61 64 61 74 61 22 20 20 22 2d 2d 64 6f 6e 74 2d 75 70 64 61 | t.update.metadata".."--dont-upda |
| 27040 | 74 65 2d 6d 65 74 61 64 61 74 61 22 29 0a 20 20 20 28 22 2d 6f 22 20 22 44 6f 20 6e 6f 74 20 77 | te-metadata")....("-o"."Do.not.w |
| 27060 | 72 69 74 65 20 6f 70 66 22 20 22 2d 2d 64 6f 6e 74 2d 77 72 69 74 65 2d 6f 70 66 22 29 0a 20 20 | rite.opf"."--dont-write-opf")... |
| 27080 | 20 28 22 2d 66 22 20 22 46 6f 72 6d 61 74 73 20 74 6f 20 73 61 76 65 20 66 6f 72 20 65 61 63 68 | .("-f"."Formats.to.save.for.each |
| 270a0 | 20 62 6f 6f 6b 2c 20 63 6f 6d 6d 61 20 73 65 70 61 72 61 74 65 64 2e 22 20 20 22 2d 2d 66 6f 72 | .book,.comma.separated.".."--for |
| 270c0 | 6d 61 74 73 20 22 20 72 65 61 64 2d 73 74 72 69 6e 67 29 0a 20 20 20 28 22 2d 70 22 20 22 50 72 | mats.".read-string)....("-p"."Pr |
| 270e0 | 6f 67 72 65 73 73 20 52 65 70 6f 72 74 69 6e 67 22 20 20 22 20 2d 2d 70 72 6f 67 72 65 73 73 22 | ogress.Reporting"..".--progress" |
| 27100 | 29 0a 20 20 20 28 22 2d 72 22 20 22 52 65 70 6c 61 63 65 20 77 68 69 74 65 73 70 61 63 65 20 77 | )....("-r"."Replace.whitespace.w |
| 27120 | 69 74 68 20 75 6e 64 65 72 73 63 6f 72 65 73 2e 22 20 22 2d 2d 72 65 70 6c 61 63 65 2d 77 68 69 | ith.underscores."."--replace-whi |
| 27140 | 74 65 73 70 61 63 65 22 29 0a 20 20 20 28 22 2d 73 22 20 22 53 69 6e 67 6c 65 20 64 69 72 65 63 | tespace")....("-s"."Single.direc |
| 27160 | 74 6f 72 79 20 74 6f 20 65 78 70 6f 72 74 20 61 6c 6c 20 66 69 6c 65 73 2e 22 20 22 2d 2d 73 69 | tory.to.export.all.files."."--si |
| 27180 | 6e 67 6c 65 2d 64 69 72 22 29 0a 20 20 20 28 22 2d 74 22 20 22 54 65 6d 70 6c 61 74 65 20 74 6f | ngle-dir")....("-t"."Template.to |
| 271a0 | 20 63 6f 6e 74 72 6f 6c 20 74 68 65 20 66 69 6c 65 6e 61 6d 65 20 61 6e 64 20 64 69 72 65 63 74 | .control.the.filename.and.direct |
| 271c0 | 6f 72 79 20 73 74 72 75 63 74 75 72 65 2e 22 20 20 22 2d 2d 74 65 6d 70 6c 61 74 65 22 20 72 65 | ory.structure.".."--template".re |
| 271e0 | 61 64 2d 73 74 72 69 6e 67 29 0a 20 20 20 28 22 2d 64 22 20 22 44 61 74 65 73 20 66 6f 72 6d 61 | ad-string)....("-d"."Dates.forma |
| 27200 | 74 2e 20 25 64 20 2d 20 64 61 79 2c 20 25 62 20 2d 20 6d 6f 6e 74 68 2c 20 25 6d 20 2d 20 6d 6f | t..%d.-.day,.%b.-.month,.%m.-.mo |
| 27220 | 6e 74 68 20 6e 75 6d 62 65 72 2c 20 25 59 20 2d 20 79 65 61 72 2e 20 44 65 66 61 75 6c 74 20 69 | nth.number,.%Y.-.year..Default.i |
| 27240 | 73 3a 20 25 62 2c 20 25 59 22 20 22 2d 2d 74 69 6d 65 66 6d 74 22 20 72 65 61 64 2d 73 74 72 69 | s:.%b,.%Y"."--timefmt".read-stri |
| 27260 | 6e 67 29 0a 20 20 20 3b 3b 20 28 22 2d 6d 22 20 22 45 78 70 6f 72 74 20 62 6f 6f 6b 73 20 74 6f | ng)....;;.("-m"."Export.books.to |
| 27280 | 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 64 69 72 65 63 74 6f 72 79 2e 20 44 65 66 61 75 6c | .the.specified.directory..Defaul |
| 272a0 | 74 20 69 73 20 2e 22 20 20 22 2d 2d 74 6f 2d 64 69 72 22 29 0a 20 20 20 28 22 2d 6c 22 20 22 43 | t.is..".."--to-dir")....("-l"."C |
| 272c0 | 6f 6e 76 65 72 74 20 70 61 74 68 73 20 74 6f 20 6c 6f 77 65 72 63 61 73 65 2e 22 20 22 2d 2d 74 | onvert.paths.to.lowercase."."--t |
| 272e0 | 6f 2d 6c 6f 77 65 72 63 61 73 65 22 29 0a 20 20 20 28 22 2d 41 22 20 22 45 78 70 6f 72 74 20 61 | o-lowercase")....("-A"."Export.a |
| 27300 | 6c 6c 20 62 6f 6f 6b 73 20 69 6e 20 64 61 74 61 62 61 73 65 2c 20 69 67 6e 6f 72 69 6e 67 20 74 | ll.books.in.database,.ignoring.t |
| 27320 | 68 65 20 6c 69 73 74 20 6f 66 20 69 64 73 22 20 22 2d 2d 61 6c 6c 22 29 5d 0a 20 20 5b 5b 22 45 | he.list.of.ids"."--all")]...[["E |
| 27340 | 78 70 6f 72 74 22 0a 20 20 20 20 28 22 65 22 20 22 45 78 70 6f 72 74 22 20 20 20 20 20 20 20 20 | xport".....("e"."Export"........ |
| 27360 | 20 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f 72 74 29 5d 5d 0a 20 20 5b 28 22 71 22 20 22 51 75 | .calibredb-export)]]...[("q"."Qu |
| 27380 | 69 74 22 20 20 20 74 72 61 6e 73 69 65 6e 74 2d 71 75 69 74 2d 6f 6e 65 29 5d 29 0a 0a 28 74 72 | it"...transient-quit-one)])..(tr |
| 273a0 | 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 63 61 6c 69 62 72 65 64 62 2d | ansient-define-prefix.calibredb- |
| 273c0 | 63 6f 6e 76 65 72 74 2d 74 6f 2d 65 70 75 62 2d 64 69 73 70 61 74 63 68 20 28 29 0a 20 20 22 54 | convert-to-epub-dispatch.()..."T |
| 273e0 | 4f 44 4f 3a 20 44 69 73 70 61 74 63 68 20 66 6f 72 20 63 6f 6e 76 65 72 74 20 74 6f 20 65 70 75 | ODO:.Dispatch.for.convert.to.epu |
| 27400 | 62 2e 22 0a 20 20 5b 22 41 72 67 75 6d 65 6e 74 73 22 0a 20 20 20 28 22 2d 61 22 20 22 54 75 72 | b."...["Arguments"....("-a"."Tur |
| 27420 | 6e 20 6f 66 66 20 73 70 6c 69 74 74 69 6e 67 20 61 74 20 70 61 67 65 20 62 72 65 61 6b 73 2e 22 | n.off.splitting.at.page.breaks." |
| 27440 | 20 20 22 2d 2d 64 6f 6e 74 2d 73 70 6c 69 74 2d 6f 6e 2d 70 61 67 65 2d 62 72 65 61 6b 73 22 29 | .."--dont-split-on-page-breaks") |
| 27460 | 0a 20 20 20 28 22 2d 63 22 20 22 54 68 69 73 20 6f 70 74 69 6f 6e 20 69 73 20 6e 65 65 64 65 64 | ....("-c"."This.option.is.needed |
| 27480 | 20 6f 6e 6c 79 20 69 66 20 79 6f 75 20 69 6e 74 65 6e 64 20 74 6f 20 75 73 65 20 74 68 65 20 45 | .only.if.you.intend.to.use.the.E |
| 274a0 | 50 55 42 20 77 69 74 68 20 46 42 52 65 61 64 65 72 4a 2e 22 20 20 22 2d 2d 65 70 75 62 2d 66 6c | PUB.with.FBReaderJ.".."--epub-fl |
| 274c0 | 61 74 74 65 6e 22 29 0a 20 20 20 28 22 2d 6d 22 20 22 49 6e 73 65 72 74 20 61 6e 20 69 6e 6c 69 | atten")....("-m"."Insert.an.inli |
| 274e0 | 6e 65 20 54 61 62 6c 65 20 6f 66 20 43 6f 6e 74 65 6e 74 73 20 74 68 61 74 20 77 69 6c 6c 20 61 | ne.Table.of.Contents.that.will.a |
| 27500 | 70 70 65 61 72 20 61 73 20 70 61 72 74 20 6f 66 20 74 68 65 20 6d 61 69 6e 20 62 6f 6f 6b 20 63 | ppear.as.part.of.the.main.book.c |
| 27520 | 6f 6e 74 65 6e 74 2e 22 20 20 22 2d 2d 65 70 75 62 2d 69 6e 6c 69 6e 65 2d 74 6f 63 22 29 0a 20 | ontent.".."--epub-inline-toc").. |
| 27540 | 20 20 28 22 2d 6f 22 20 22 50 75 74 20 74 68 65 20 69 6e 73 65 72 74 65 64 20 69 6e 6c 69 6e 65 | ..("-o"."Put.the.inserted.inline |
| 27560 | 20 54 61 62 6c 65 20 6f 66 20 43 6f 6e 74 65 6e 74 73 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 | .Table.of.Contents.at.the.end.of |
| 27580 | 20 74 68 65 20 62 6f 6f 6b 20 69 6e 73 74 65 61 64 20 6f 66 20 74 68 65 20 73 74 61 72 74 2e 22 | .the.book.instead.of.the.start." |
| 275a0 | 20 22 2d 2d 65 70 75 62 2d 74 6f 63 2d 61 74 2d 65 6e 64 22 29 0a 20 20 20 28 22 2d 66 22 20 22 | ."--epub-toc-at-end")....("-f"." |
| 275c0 | 54 68 65 20 76 65 72 73 69 6f 6e 20 6f 66 20 74 68 65 20 45 50 55 42 20 66 69 6c 65 20 74 6f 20 | The.version.of.the.EPUB.file.to. |
| 275e0 | 67 65 6e 65 72 61 74 65 2e 22 20 20 22 2d 2d 65 70 75 62 2d 76 65 72 73 69 6f 6e 22 29 0a 20 20 | generate.".."--epub-version")... |
| 27600 | 20 28 22 2d 70 22 20 22 45 78 74 72 61 63 74 20 74 68 65 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 | .("-p"."Extract.the.contents.of. |
| 27620 | 74 68 65 20 67 65 6e 65 72 61 74 65 64 20 45 50 55 42 20 66 69 6c 65 20 74 6f 20 74 68 65 20 73 | the.generated.EPUB.file.to.the.s |
| 27640 | 70 65 63 69 66 69 65 64 20 64 69 72 65 63 74 6f 72 79 2e 20 22 20 20 22 2d 2d 65 78 74 72 61 63 | pecified.directory..".."--extrac |
| 27660 | 74 2d 74 6f 22 29 0a 20 20 20 28 22 2d 72 22 20 22 53 70 6c 69 74 20 61 6c 6c 20 48 54 4d 4c 20 | t-to")....("-r"."Split.all.HTML. |
| 27680 | 66 69 6c 65 73 20 6c 61 72 67 65 72 20 74 68 61 6e 20 74 68 69 73 20 73 69 7a 65 20 28 69 6e 20 | files.larger.than.this.size.(in. |
| 276a0 | 4b 42 29 2e 20 22 20 22 2d 2d 66 6c 6f 77 2d 73 69 7a 65 22 29 0a 20 20 20 28 22 2d 73 22 20 22 | KB).."."--flow-size")....("-s"." |
| 276c0 | 54 68 69 73 20 6f 70 74 69 6f 6e 20 64 69 73 61 62 6c 65 73 20 74 68 65 20 67 65 6e 65 72 61 74 | This.option.disables.the.generat |
| 276e0 | 69 6f 6e 20 6f 66 20 74 68 69 73 20 63 6f 76 65 72 2e 22 20 22 2d 2d 6e 6f 2d 64 65 66 61 75 6c | ion.of.this.cover."."--no-defaul |
| 27700 | 74 2d 65 70 75 62 2d 63 6f 76 65 72 22 29 0a 20 20 20 28 22 2d 74 22 20 22 44 6f 20 6e 6f 74 20 | t-epub-cover")....("-t"."Do.not. |
| 27720 | 75 73 65 20 53 56 47 20 66 6f 72 20 74 68 65 20 62 6f 6f 6b 20 63 6f 76 65 72 2e 22 20 20 22 2d | use.SVG.for.the.book.cover.".."- |
| 27740 | 2d 6e 6f 2d 73 76 67 2d 63 6f 76 65 72 22 29 0a 20 20 20 28 22 2d 64 22 20 22 57 68 65 6e 20 75 | -no-svg-cover")....("-d"."When.u |
| 27760 | 73 69 6e 67 20 61 6e 20 53 56 47 20 63 6f 76 65 72 2c 20 74 68 69 73 20 6f 70 74 69 6f 6e 20 77 | sing.an.SVG.cover,.this.option.w |
| 27780 | 69 6c 6c 20 63 61 75 73 65 20 74 68 65 20 63 6f 76 65 72 20 74 6f 20 73 63 61 6c 65 20 74 6f 20 | ill.cause.the.cover.to.scale.to. |
| 277a0 | 63 6f 76 65 72 20 74 68 65 20 61 76 61 69 6c 61 62 6c 65 20 73 63 72 65 65 6e 20 61 72 65 61 2c | cover.the.available.screen.area, |
| 277c0 | 20 62 75 74 20 73 74 69 6c 6c 20 70 72 65 73 65 72 76 65 20 69 74 73 20 61 73 70 65 63 74 20 72 | .but.still.preserve.its.aspect.r |
| 277e0 | 61 74 69 6f 20 28 72 61 74 69 6f 20 6f 66 20 77 69 64 74 68 20 74 6f 20 68 65 69 67 68 74 29 22 | atio.(ratio.of.width.to.height)" |
| 27800 | 20 22 2d 2d 70 72 65 73 65 72 76 65 2d 63 6f 76 65 72 2d 61 73 70 65 63 74 2d 72 61 74 69 6f 22 | ."--preserve-cover-aspect-ratio" |
| 27820 | 29 0a 20 20 20 28 22 2d 6c 22 20 22 49 66 20 73 70 65 63 69 66 69 65 64 2c 20 74 68 65 20 6f 75 | )....("-l"."If.specified,.the.ou |
| 27840 | 74 70 75 74 20 70 6c 75 67 69 6e 20 77 69 6c 6c 20 74 72 79 20 74 6f 20 63 72 65 61 74 65 20 6f | tput.plugin.will.try.to.create.o |
| 27860 | 75 74 70 75 74 20 74 68 61 74 20 69 73 20 61 73 20 68 75 6d 61 6e 20 72 65 61 64 61 62 6c 65 20 | utput.that.is.as.human.readable. |
| 27880 | 61 73 20 70 6f 73 73 69 62 6c 65 2e 22 20 22 2d 2d 70 72 65 74 74 79 2d 70 72 69 6e 74 22 29 0a | as.possible."."--pretty-print"). |
| 278a0 | 20 20 20 28 22 2d 41 22 20 22 54 69 74 6c 65 20 66 6f 72 20 61 6e 79 20 67 65 6e 65 72 61 74 65 | ...("-A"."Title.for.any.generate |
| 278c0 | 64 20 69 6e 2d 6c 69 6e 65 20 74 61 62 6c 65 20 6f 66 20 63 6f 6e 74 65 6e 74 73 2e 22 20 22 2d | d.in-line.table.of.contents."."- |
| 278e0 | 2d 74 6f 63 2d 74 69 74 6c 65 22 29 5d 0a 20 20 5b 5b 22 45 78 70 6f 72 74 22 0a 20 20 20 20 28 | -toc-title")]...[["Export".....( |
| 27900 | 22 65 22 20 22 45 78 70 6f 72 74 22 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 | "e"."Export".calibredb-convert-t |
| 27920 | 6f 2d 65 70 75 62 29 5d 5d 0a 20 20 5b 28 22 71 22 20 22 51 75 69 74 22 20 20 20 74 72 61 6e 73 | o-epub)]]...[("q"."Quit"...trans |
| 27940 | 69 65 6e 74 2d 71 75 69 74 2d 6f 6e 65 29 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 | ient-quit-one)])..(transient-def |
| 27960 | 69 6e 65 2d 70 72 65 66 69 78 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d | ine-prefix.calibredb-convert-to- |
| 27980 | 6d 6f 62 69 2d 64 69 73 70 61 74 63 68 20 28 29 0a 20 20 22 54 4f 44 4f 3a 20 44 69 73 70 61 74 | mobi-dispatch.()..."TODO:.Dispat |
| 279a0 | 63 68 20 66 6f 72 20 63 6f 6e 76 65 72 74 20 74 6f 20 6d 6f 62 69 2e 22 0a 20 20 5b 22 41 72 67 | ch.for.convert.to.mobi."...["Arg |
| 279c0 | 75 6d 65 6e 74 73 22 0a 20 20 20 28 22 2d 64 22 20 22 44 69 73 61 62 6c 65 20 63 6f 6d 70 72 65 | uments"....("-d"."Disable.compre |
| 279e0 | 73 73 69 6f 6e 20 6f 66 20 74 68 65 20 66 69 6c 65 20 63 6f 6e 74 65 6e 74 73 2e 22 20 20 22 20 | ssion.of.the.file.contents."..". |
| 27a00 | 2d 2d 64 6f 6e 74 2d 63 6f 6d 70 72 65 73 73 22 29 0a 20 20 20 28 22 2d 65 22 20 22 45 78 74 72 | --dont-compress")....("-e"."Extr |
| 27a20 | 61 63 74 20 74 68 65 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 74 68 65 20 67 65 6e 65 72 61 74 65 | act.the.contents.of.the.generate |
| 27a40 | 64 20 4d 4f 42 49 20 66 69 6c 65 20 74 6f 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 66 6f 6c | d.MOBI.file.to.the.specified.fol |
| 27a60 | 64 65 72 2e 22 20 20 22 2d 65 78 74 72 61 63 74 2d 74 6f 22 29 0a 20 20 20 28 22 2d 66 22 20 22 | der.".."-extract-to")....("-f"." |
| 27a80 | 42 79 20 64 65 66 61 75 6c 74 20 63 61 6c 69 62 72 65 20 67 65 6e 65 72 61 74 65 73 20 4d 4f 42 | By.default.calibre.generates.MOB |
| 27aa0 | 49 20 66 69 6c 65 73 20 74 68 61 74 20 63 6f 6e 74 61 69 6e 20 74 68 65 20 6f 6c 64 20 4d 4f 42 | I.files.that.contain.the.old.MOB |
| 27ac0 | 49 20 36 20 66 6f 72 6d 61 74 2e 22 20 20 22 20 2d 2d 6d 6f 62 69 2d 66 69 6c 65 2d 74 79 70 65 | I.6.format."..".--mobi-file-type |
| 27ae0 | 22 29 0a 20 20 20 28 22 2d 69 22 20 22 49 67 6e 6f 72 65 20 6d 61 72 67 69 6e 73 20 69 6e 20 74 | ")....("-i"."Ignore.margins.in.t |
| 27b00 | 68 65 20 69 6e 70 75 74 20 64 6f 63 75 6d 65 6e 74 2e 20 22 20 22 20 2d 2d 6d 6f 62 69 2d 69 67 | he.input.document..".".--mobi-ig |
| 27b20 | 6e 6f 72 65 2d 6d 61 72 67 69 6e 73 22 29 0a 20 20 20 28 22 2d 6b 22 20 22 42 79 20 64 65 66 61 | nore-margins")....("-k"."By.defa |
| 27b40 | 75 6c 74 20 63 61 6c 69 62 72 65 20 63 6f 6e 76 65 72 74 73 20 61 6c 6c 20 69 6d 61 67 65 73 20 | ult.calibre.converts.all.images. |
| 27b60 | 74 6f 20 4a 50 45 47 20 66 6f 72 6d 61 74 20 69 6e 20 74 68 65 20 6f 75 74 70 75 74 20 4d 4f 42 | to.JPEG.format.in.the.output.MOB |
| 27b80 | 49 20 66 69 6c 65 2e 22 20 20 22 20 2d 2d 6d 6f 62 69 2d 6b 65 65 70 2d 6f 72 69 67 69 6e 61 6c | I.file."..".--mobi-keep-original |
| 27ba0 | 2d 69 6d 61 67 65 73 22 29 0a 20 20 20 28 22 2d 74 22 20 22 57 68 65 6e 20 61 64 64 69 6e 67 20 | -images")....("-t"."When.adding. |
| 27bc0 | 74 68 65 20 54 61 62 6c 65 20 6f 66 20 43 6f 6e 74 65 6e 74 73 20 74 6f 20 74 68 65 20 62 6f 6f | the.Table.of.Contents.to.the.boo |
| 27be0 | 6b 2c 20 61 64 64 20 69 74 20 61 74 20 74 68 65 20 73 74 61 72 74 20 6f 66 20 74 68 65 20 62 6f | k,.add.it.at.the.start.of.the.bo |
| 27c00 | 6f 6b 20 69 6e 73 74 65 61 64 20 6f 66 20 74 68 65 20 65 6e 64 2e 22 20 20 22 2d 2d 6d 6f 62 69 | ok.instead.of.the.end.".."--mobi |
| 27c20 | 2d 74 6f 63 2d 61 74 2d 73 74 61 72 74 22 29 0a 20 20 20 28 22 2d 6e 22 20 22 44 6f 6e 27 74 20 | -toc-at-start")....("-n"."Don't. |
| 27c40 | 61 64 64 20 54 61 62 6c 65 20 6f 66 20 43 6f 6e 74 65 6e 74 73 20 74 6f 20 74 68 65 20 62 6f 6f | add.Table.of.Contents.to.the.boo |
| 27c60 | 6b 2e 20 55 73 65 66 75 6c 20 69 66 20 74 68 65 20 62 6f 6f 6b 20 68 61 73 20 69 74 73 20 6f 77 | k..Useful.if.the.book.has.its.ow |
| 27c80 | 6e 20 74 61 62 6c 65 20 6f 66 20 63 6f 6e 74 65 6e 74 73 2e 22 20 22 2d 2d 6e 6f 2d 69 6e 6c 69 | n.table.of.contents."."--no-inli |
| 27ca0 | 6e 65 2d 74 6f 63 22 29 0a 20 20 20 28 22 2d 70 22 20 22 54 61 67 20 66 6f 72 20 4d 4f 42 49 20 | ne-toc")....("-p"."Tag.for.MOBI. |
| 27cc0 | 66 69 6c 65 73 20 74 6f 20 62 65 20 6d 61 72 6b 65 64 20 61 73 20 70 65 72 73 6f 6e 61 6c 20 64 | files.to.be.marked.as.personal.d |
| 27ce0 | 6f 63 75 6d 65 6e 74 73 2e 22 20 22 2d 2d 70 65 72 73 6f 6e 61 6c 2d 64 6f 63 22 29 0a 20 20 20 | ocuments."."--personal-doc").... |
| 27d00 | 28 22 2d 61 22 20 22 57 68 65 6e 20 70 72 65 73 65 6e 74 2c 20 75 73 65 20 61 75 74 68 6f 72 20 | ("-a"."When.present,.use.author. |
| 27d20 | 73 6f 72 74 20 66 69 65 6c 64 20 61 73 20 61 75 74 68 6f 72 2e 22 20 20 22 2d 2d 70 72 65 66 65 | sort.field.as.author.".."--prefe |
| 27d40 | 72 2d 61 75 74 68 6f 72 2d 73 6f 72 74 22 29 0a 20 20 20 28 22 2d 50 22 20 22 49 66 20 73 70 65 | r-author-sort")....("-P"."If.spe |
| 27d60 | 63 69 66 69 65 64 2c 20 74 68 65 20 6f 75 74 70 75 74 20 70 6c 75 67 69 6e 20 77 69 6c 6c 20 74 | cified,.the.output.plugin.will.t |
| 27d80 | 72 79 20 74 6f 20 63 72 65 61 74 65 20 6f 75 74 70 75 74 20 74 68 61 74 20 69 73 20 61 73 20 68 | ry.to.create.output.that.is.as.h |
| 27da0 | 75 6d 61 6e 20 72 65 61 64 61 62 6c 65 20 61 73 20 70 6f 73 73 69 62 6c 65 2e 22 20 22 2d 2d 70 | uman.readable.as.possible."."--p |
| 27dc0 | 72 65 74 74 79 2d 70 72 69 6e 74 22 29 0a 20 20 20 28 22 2d 73 22 20 22 45 6e 61 62 6c 65 20 73 | retty-print")....("-s"."Enable.s |
| 27de0 | 68 61 72 69 6e 67 20 6f 66 20 62 6f 6f 6b 20 63 6f 6e 74 65 6e 74 20 76 69 61 20 46 61 63 65 62 | haring.of.book.content.via.Faceb |
| 27e00 | 6f 6f 6b 20 65 74 63 2e 22 20 22 2d 2d 73 68 61 72 65 2d 6e 6f 74 2d 73 79 6e 63 22 29 0a 20 20 | ook.etc."."--share-not-sync")... |
| 27e20 | 20 28 22 2d 54 22 20 22 54 69 74 6c 65 20 66 6f 72 20 61 6e 79 20 67 65 6e 65 72 61 74 65 64 20 | .("-T"."Title.for.any.generated. |
| 27e40 | 69 6e 2d 6c 69 6e 65 20 74 61 62 6c 65 20 6f 66 20 63 6f 6e 74 65 6e 74 73 2e 22 20 22 2d 2d 74 | in-line.table.of.contents."."--t |
| 27e60 | 6f 63 2d 74 69 74 6c 65 22 29 5d 0a 20 20 5b 5b 22 45 78 70 6f 72 74 22 0a 20 20 20 20 28 22 65 | oc-title")]...[["Export".....("e |
| 27e80 | 22 20 22 45 78 70 6f 72 74 22 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d | "."Export".calibredb-convert-to- |
| 27ea0 | 6d 6f 62 69 29 5d 5d 0a 20 20 5b 28 22 71 22 20 22 51 75 69 74 22 20 20 20 74 72 61 6e 73 69 65 | mobi)]]...[("q"."Quit"...transie |
| 27ec0 | 6e 74 2d 71 75 69 74 2d 6f 6e 65 29 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e | nt-quit-one)])..(transient-defin |
| 27ee0 | 65 2d 70 72 65 66 69 78 20 63 61 6c 69 62 72 65 64 62 2d 63 61 74 61 6c 6f 67 2d 62 69 62 2d 64 | e-prefix.calibredb-catalog-bib-d |
| 27f00 | 69 73 70 61 74 63 68 20 28 29 0a 20 20 22 44 69 73 70 61 74 63 68 20 66 6f 72 20 63 61 74 61 6c | ispatch.()..."Dispatch.for.catal |
| 27f20 | 6f 67 20 42 69 62 54 65 78 2e 22 0a 20 20 5b 22 41 72 67 75 6d 65 6e 74 73 22 0a 20 20 20 28 22 | og.BibTex."...["Arguments"....(" |
| 27f40 | 2d 66 22 20 22 54 68 65 20 66 69 65 6c 64 73 20 28 63 6f 6d 6d 61 2d 73 65 70 61 72 61 74 65 64 | -f"."The.fields.(comma-separated |
| 27f60 | 29 20 74 6f 20 6f 75 74 70 75 74 2e 20 44 65 66 61 75 6c 74 3a 20 61 6c 6c 22 20 22 2d 2d 66 69 | ).to.output..Default:.all"."--fi |
| 27f80 | 65 6c 64 73 20 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d | elds.".calibredb-transient-read- |
| 27fa0 | 62 69 62 2d 66 69 65 6c 64 73 29 0a 20 20 20 28 22 2d 74 22 20 22 45 6e 74 72 79 20 74 79 70 65 | bib-fields)....("-t"."Entry.type |
| 27fc0 | 20 66 6f 72 20 42 69 62 54 65 58 20 63 61 74 61 6c 6f 67 2e 20 44 65 66 61 75 6c 74 3a 20 62 6f | .for.BibTeX.catalog..Default:.bo |
| 27fe0 | 6f 6b 22 20 20 22 2d 2d 65 6e 74 72 79 2d 74 79 70 65 20 22 20 63 61 6c 69 62 72 65 64 62 2d 74 | ok".."--entry-type.".calibredb-t |
| 28000 | 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 65 6e 74 72 79 2d 74 79 70 65 29 0a 20 20 20 28 22 2d | ransient-read-entry-type)....("- |
| 28020 | 73 22 20 22 4f 75 74 70 75 74 20 66 69 65 6c 64 20 74 6f 20 73 6f 72 74 20 6f 6e 2e 20 44 65 66 | s"."Output.field.to.sort.on..Def |
| 28040 | 61 75 6c 74 3a 20 69 64 22 20 22 2d 2d 73 6f 72 74 2d 62 79 20 22 20 63 61 6c 69 62 72 65 64 62 | ault:.id"."--sort-by.".calibredb |
| 28060 | 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 62 69 62 2d 73 6f 72 74 2d 62 79 29 0a 20 20 20 | -transient-read-bib-sort-by).... |
| 28080 | 28 22 2d 63 22 20 22 43 72 65 61 74 65 20 61 20 63 69 74 61 74 69 6f 6e 20 66 6f 72 20 42 69 62 | ("-c"."Create.a.citation.for.Bib |
| 280a0 | 54 65 58 20 65 6e 74 72 69 65 73 2e 20 44 65 66 61 75 6c 74 3a 20 54 72 75 65 22 20 20 22 20 2d | TeX.entries..Default:.True"..".- |
| 280c0 | 2d 63 72 65 61 74 65 2d 63 69 74 61 74 69 6f 6e 20 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 | -create-citation.".calibredb-tra |
| 280e0 | 6e 73 69 65 6e 74 2d 72 65 61 64 2d 62 69 62 2d 63 72 65 61 74 65 2d 63 69 74 61 74 69 6f 6e 29 | nsient-read-bib-create-citation) |
| 28100 | 0a 20 20 20 28 22 2d 70 22 20 22 43 72 65 61 74 65 20 61 20 66 69 6c 65 20 65 6e 74 72 79 20 69 | ....("-p"."Create.a.file.entry.i |
| 28120 | 66 20 66 6f 72 6d 61 74 73 20 69 73 20 73 65 6c 65 63 74 65 64 20 66 6f 72 20 42 69 62 54 65 58 | f.formats.is.selected.for.BibTeX |
| 28140 | 20 65 6e 74 72 69 65 73 2e 20 44 65 66 61 75 6c 74 3a 20 54 72 75 65 22 20 20 22 2d 2d 61 64 64 | .entries..Default:.True".."--add |
| 28160 | 2d 66 69 6c 65 73 2d 70 61 74 68 20 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e | -files-path.".calibredb-transien |
| 28180 | 74 2d 72 65 61 64 2d 62 69 62 2d 61 64 64 2d 66 69 6c 65 73 2d 70 61 74 68 29 0a 20 20 20 28 22 | t-read-bib-add-files-path)....(" |
| 281a0 | 2d 54 22 20 22 54 68 65 20 74 65 6d 70 6c 61 74 65 20 66 6f 72 20 63 69 74 61 74 69 6f 6e 20 63 | -T"."The.template.for.citation.c |
| 281c0 | 72 65 61 74 69 6f 6e 20 66 72 6f 6d 20 64 61 74 61 62 61 73 65 20 66 69 65 6c 64 73 2e 20 44 65 | reation.from.database.fields..De |
| 281e0 | 66 61 75 6c 74 3a 20 7b 61 75 74 68 6f 72 73 7d 7b 69 64 7d 22 20 22 2d 2d 63 69 74 61 74 69 6f | fault:.{authors}{id}"."--citatio |
| 28200 | 6e 2d 74 65 6d 70 6c 61 74 65 20 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 | n-template.".calibredb-transient |
| 28220 | 2d 72 65 61 64 2d 62 69 62 2d 63 69 74 61 74 69 6f 6e 2d 74 65 6d 70 6c 61 74 65 29 0a 20 20 20 | -read-bib-citation-template).... |
| 28240 | 28 22 2d 65 22 20 22 42 69 62 54 65 58 20 66 69 6c 65 20 65 6e 63 6f 64 69 6e 67 20 6f 75 74 70 | ("-e"."BibTeX.file.encoding.outp |
| 28260 | 75 74 2e 20 44 65 66 61 75 6c 74 3a 20 75 74 66 38 22 20 20 22 2d 2d 63 68 6f 6f 73 65 2d 65 6e | ut..Default:.utf8".."--choose-en |
| 28280 | 63 6f 64 69 6e 67 20 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 | coding.".calibredb-transient-rea |
| 282a0 | 64 2d 63 68 6f 6f 73 65 2d 65 6e 63 6f 64 69 6e 67 29 0a 20 20 20 28 22 2d 45 22 20 22 42 69 62 | d-choose-encoding)....("-E"."Bib |
| 282c0 | 54 65 58 20 66 69 6c 65 20 65 6e 63 6f 64 69 6e 67 20 66 6c 61 67 2e 20 44 65 66 61 75 6c 74 3a | TeX.file.encoding.flag..Default: |
| 282e0 | 20 73 74 72 69 63 74 22 20 20 22 2d 2d 63 68 6f 6f 73 65 2d 65 6e 63 6f 64 69 6e 67 2d 63 6f 6e | .strict".."--choose-encoding-con |
| 28300 | 66 69 67 75 72 61 74 69 6f 6e 20 22 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 | figuration.".calibredb-transient |
| 28320 | 2d 72 65 61 64 2d 63 68 6f 6f 73 65 2d 65 6e 63 6f 64 69 6e 67 2d 63 6f 6e 66 69 67 75 72 61 74 | -read-choose-encoding-configurat |
| 28340 | 69 6f 6e 29 5d 0a 20 20 5b 5b 22 42 69 62 74 65 78 22 0a 20 20 20 20 28 22 6f 22 20 22 46 69 6e | ion)]...[["Bibtex".....("o"."Fin |
| 28360 | 64 20 42 69 62 54 65 78 20 66 69 6c 65 22 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 | d.BibTex.file".........calibredb |
| 28380 | 2d 66 69 6e 64 2d 62 69 62 29 0a 20 20 20 20 28 22 62 22 20 22 55 70 64 61 74 65 20 42 69 62 54 | -find-bib).....("b"."Update.BibT |
| 283a0 | 65 78 20 66 69 6c 65 22 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 61 74 61 6c | ex.file".........calibredb-catal |
| 283c0 | 6f 67 2d 62 69 62 2d 2d 74 72 61 6e 73 69 65 6e 74 29 5d 5d 0a 20 20 5b 28 22 71 22 20 22 51 75 | og-bib--transient)]]...[("q"."Qu |
| 283e0 | 69 74 22 20 20 20 74 72 61 6e 73 69 65 6e 74 2d 71 75 69 74 2d 6f 6e 65 29 5d 29 0a 0a 28 74 72 | it"...transient-quit-one)])..(tr |
| 28400 | 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 63 61 6c 69 62 72 65 64 62 2d | ansient-define-prefix.calibredb- |
| 28420 | 79 61 6e 6b 2d 64 69 73 70 61 74 63 68 20 28 29 0a 20 20 22 49 6e 76 6f 6b 65 20 61 20 59 61 6e | yank-dispatch.()..."Invoke.a.Yan |
| 28440 | 6b 20 6f 70 65 72 61 74 69 6f 6e 2e 22 0a 20 20 3a 6d 61 6e 2d 70 61 67 65 20 22 63 61 6c 69 62 | k.operation."...:man-page."calib |
| 28460 | 72 65 64 62 22 0a 20 20 5b 22 59 61 6e 6b 20 6f 70 65 72 61 69 6f 6e 22 0a 20 20 20 5b 28 22 79 | redb"...["Yank.operaion"....[("y |
| 28480 | 22 20 22 43 6f 70 79 20 61 73 20 63 61 6c 69 62 72 65 64 62 20 6f 72 67 20 6c 69 6e 6b 73 22 20 | "."Copy.as.calibredb.org.links". |
| 284a0 | 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 6f 72 67 2d 6c 69 6e 6b 2d 63 6f 70 79 29 | ........calibredb-org-link-copy) |
| 284c0 | 0a 20 20 20 20 28 22 66 22 20 22 43 6f 70 79 20 61 73 20 66 69 6c 65 20 6f 72 67 20 6c 69 6e 6b | .....("f"."Copy.as.file.org.link |
| 284e0 | 73 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 70 79 2d 61 | s"..............calibredb-copy-a |
| 28500 | 73 2d 6f 72 67 2d 6c 69 6e 6b 29 5d 5d 0a 20 20 5b 28 22 71 22 20 22 51 75 69 74 22 20 20 20 74 | s-org-link)]]...[("q"."Quit"...t |
| 28520 | 72 61 6e 73 69 65 6e 74 2d 71 75 69 74 2d 6f 6e 65 29 5d 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c | ransient-quit-one)])..(defun.cal |
| 28540 | 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 62 69 62 2d 66 69 65 6c 64 73 | ibredb-transient-read-bib-fields |
| 28560 | 20 28 70 72 6f 6d 70 74 20 5f 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 5f 68 69 73 74 6f 72 79 | .(prompt._initial-input._history |
| 28580 | 29 0a 20 20 22 54 4f 44 4f 3a 20 52 65 61 64 20 61 20 42 69 62 54 65 78 20 2d 2d 66 69 65 6c 64 | )..."TODO:.Read.a.BibTex.--field |
| 285a0 | 73 20 76 61 6c 75 65 2e 0a 41 72 67 75 6d 65 6e 74 20 50 52 4f 4d 50 54 20 70 72 6f 6d 70 74 20 | s.value..Argument.PROMPT.prompt. |
| 285c0 | 74 6f 20 73 68 6f 77 2e 22 0a 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 70 72 6f 6d 70 74 20 | to.show."...(read-string.prompt. |
| 285e0 | 22 74 69 74 6c 65 2c 74 69 74 6c 65 5f 73 6f 72 74 2c 61 75 74 68 6f 72 5f 73 6f 72 74 2c 61 75 | "title,title_sort,author_sort,au |
| 28600 | 74 68 6f 72 73 2c 63 6f 6d 6d 65 6e 74 73 2c 63 6f 76 65 72 2c 66 6f 72 6d 61 74 73 2c 69 64 2c | thors,comments,cover,formats,id, |
| 28620 | 69 73 62 6e 2c 6c 69 62 72 61 72 79 5f 6e 61 6d 65 2c 6f 6e 64 65 76 69 63 65 2c 70 75 62 64 61 | isbn,library_name,ondevice,pubda |
| 28640 | 74 65 2c 70 75 62 6c 69 73 68 65 72 2c 72 61 74 69 6e 67 2c 73 65 72 69 65 73 5f 69 6e 64 65 78 | te,publisher,rating,series_index |
| 28660 | 2c 73 65 72 69 65 73 2c 73 69 7a 65 2c 74 61 67 73 2c 74 69 6d 65 73 74 61 6d 70 2c 75 75 69 64 | ,series,size,tags,timestamp,uuid |
| 28680 | 2c 6c 61 6e 67 75 61 67 65 73 2c 69 64 65 6e 74 69 66 69 65 72 73 22 29 29 0a 0a 28 64 65 66 75 | ,languages,identifiers"))..(defu |
| 286a0 | 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 62 69 62 2d 73 | n.calibredb-transient-read-bib-s |
| 286c0 | 6f 72 74 2d 62 79 20 28 70 72 6f 6d 70 74 20 5f 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 5f 68 | ort-by.(prompt._initial-input._h |
| 286e0 | 69 73 74 6f 72 79 29 0a 20 20 22 52 65 61 64 20 61 20 42 69 62 54 65 78 20 2d 2d 73 6f 72 74 2d | istory)..."Read.a.BibTex.--sort- |
| 28700 | 62 79 20 76 61 6c 75 65 2e 0a 41 72 67 75 6d 65 6e 74 20 50 52 4f 4d 50 54 20 70 72 6f 6d 70 74 | by.value..Argument.PROMPT.prompt |
| 28720 | 20 74 6f 20 73 68 6f 77 2e 22 0a 20 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 70 72 | .to.show."...(completing-read.pr |
| 28740 | 6f 6d 70 74 20 27 28 22 61 75 74 68 6f 72 5f 73 6f 72 74 22 20 22 69 64 22 20 22 72 61 74 69 6e | ompt.'("author_sort"."id"."ratin |
| 28760 | 67 22 20 22 73 69 7a 65 22 20 22 74 69 6d 65 73 74 61 6d 70 22 20 22 74 69 74 6c 65 22 29 29 29 | g"."size"."timestamp"."title"))) |
| 28780 | 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 | ..(defun.calibredb-transient-rea |
| 287a0 | 64 2d 62 69 62 2d 63 72 65 61 74 65 2d 63 69 74 61 74 69 6f 6e 20 28 70 72 6f 6d 70 74 20 5f 69 | d-bib-create-citation.(prompt._i |
| 287c0 | 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 5f 68 69 73 74 6f 72 79 29 0a 20 20 22 52 65 61 64 20 61 | nitial-input._history)..."Read.a |
| 287e0 | 20 42 69 62 54 65 78 20 2d 2d 63 72 65 61 74 65 2d 63 69 74 61 74 69 6f 6e 20 76 61 6c 75 65 2e | .BibTex.--create-citation.value. |
| 28800 | 0a 41 72 67 75 6d 65 6e 74 20 50 52 4f 4d 50 54 20 70 72 6f 6d 70 74 20 74 6f 20 73 68 6f 77 2e | .Argument.PROMPT.prompt.to.show. |
| 28820 | 22 0a 20 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 70 72 6f 6d 70 74 20 27 28 22 54 | "...(completing-read.prompt.'("T |
| 28840 | 72 75 65 22 20 22 46 61 6c 73 65 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 | rue"."False")))..(defun.calibred |
| 28860 | 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 62 69 62 2d 61 64 64 2d 66 69 6c 65 73 2d 70 | b-transient-read-bib-add-files-p |
| 28880 | 61 74 68 20 28 70 72 6f 6d 70 74 20 5f 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 5f 68 69 73 74 | ath.(prompt._initial-input._hist |
| 288a0 | 6f 72 79 29 0a 20 20 22 52 65 61 64 20 61 20 42 69 62 54 65 78 20 2d 2d 61 64 64 2d 66 69 6c 65 | ory)..."Read.a.BibTex.--add-file |
| 288c0 | 73 2d 70 61 74 68 20 76 61 6c 75 65 2e 0a 41 72 67 75 6d 65 6e 74 20 50 52 4f 4d 50 54 20 70 72 | s-path.value..Argument.PROMPT.pr |
| 288e0 | 6f 6d 70 74 20 74 6f 20 73 68 6f 77 2e 22 0a 20 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 | ompt.to.show."...(completing-rea |
| 28900 | 64 20 70 72 6f 6d 70 74 20 27 28 22 54 72 75 65 22 20 22 46 61 6c 73 65 22 29 29 29 0a 0a 28 64 | d.prompt.'("True"."False")))..(d |
| 28920 | 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 62 69 | efun.calibredb-transient-read-bi |
| 28940 | 62 2d 63 69 74 61 74 69 6f 6e 2d 74 65 6d 70 6c 61 74 65 20 28 70 72 6f 6d 70 74 20 5f 69 6e 69 | b-citation-template.(prompt._ini |
| 28960 | 74 69 61 6c 2d 69 6e 70 75 74 20 5f 68 69 73 74 6f 72 79 29 0a 20 20 22 54 4f 44 4f 3a 20 52 65 | tial-input._history)..."TODO:.Re |
| 28980 | 61 64 20 61 20 42 69 62 54 65 78 20 2d 2d 63 69 74 61 74 69 6f 6e 2d 74 65 6d 70 6c 61 74 65 20 | ad.a.BibTex.--citation-template. |
| 289a0 | 76 61 6c 75 65 2e 0a 41 72 67 75 6d 65 6e 74 20 50 52 4f 4d 50 54 20 70 72 6f 6d 70 74 20 74 6f | value..Argument.PROMPT.prompt.to |
| 289c0 | 20 73 68 6f 77 2e 22 0a 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 70 72 6f 6d 70 74 20 22 7b | .show."...(read-string.prompt."{ |
| 289e0 | 61 75 74 68 6f 72 5f 73 6f 72 74 7d 7b 61 75 74 68 6f 72 73 7d 7b 69 64 7d 7b 69 73 62 6e 7d 7b | author_sort}{authors}{id}{isbn}{ |
| 28a00 | 70 75 62 64 61 74 65 7d 7b 74 69 74 6c 65 5f 73 6f 72 74 7d 7b 70 75 62 6c 69 73 68 65 72 7d 7b | pubdate}{title_sort}{publisher}{ |
| 28a20 | 73 65 72 69 65 73 5f 69 6e 64 65 78 7d 7b 73 65 72 69 65 73 7d 7b 74 61 67 73 7d 7b 74 69 6d 65 | series_index}{series}{tags}{time |
| 28a40 | 73 74 61 6d 70 7d 7b 74 69 74 6c 65 7d 7b 75 75 69 64 7d 22 29 29 0a 0a 28 64 65 66 75 6e 20 63 | stamp}{title}{uuid}"))..(defun.c |
| 28a60 | 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 63 68 6f 6f 73 65 2d 65 | alibredb-transient-read-choose-e |
| 28a80 | 6e 63 6f 64 69 6e 67 20 28 70 72 6f 6d 70 74 20 5f 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 5f | ncoding.(prompt._initial-input._ |
| 28aa0 | 68 69 73 74 6f 72 79 29 0a 20 20 22 52 65 61 64 20 61 20 42 69 62 54 65 78 20 2d 2d 63 68 6f 6f | history)..."Read.a.BibTex.--choo |
| 28ac0 | 73 65 2d 65 6e 63 6f 64 69 6e 67 20 76 61 6c 75 65 2e 0a 41 72 67 75 6d 65 6e 74 20 50 52 4f 4d | se-encoding.value..Argument.PROM |
| 28ae0 | 50 54 20 70 72 6f 6d 70 74 20 74 6f 20 73 68 6f 77 2e 22 0a 20 20 28 63 6f 6d 70 6c 65 74 69 6e | PT.prompt.to.show."...(completin |
| 28b00 | 67 2d 72 65 61 64 20 70 72 6f 6d 70 74 20 27 28 22 75 74 66 38 22 20 22 63 70 31 32 35 32 22 20 | g-read.prompt.'("utf8"."cp1252". |
| 28b20 | 22 61 73 63 69 69 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 | "ascii")))..(defun.calibredb-tra |
| 28b40 | 6e 73 69 65 6e 74 2d 72 65 61 64 2d 63 68 6f 6f 73 65 2d 65 6e 63 6f 64 69 6e 67 2d 63 6f 6e 66 | nsient-read-choose-encoding-conf |
| 28b60 | 69 67 75 72 61 74 69 6f 6e 20 28 70 72 6f 6d 70 74 20 5f 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 | iguration.(prompt._initial-input |
| 28b80 | 20 5f 68 69 73 74 6f 72 79 29 0a 20 20 22 52 65 61 64 20 61 20 42 69 62 54 65 78 20 2d 2d 63 68 | ._history)..."Read.a.BibTex.--ch |
| 28ba0 | 6f 6f 73 65 2d 65 6e 63 6f 64 69 6e 67 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 76 61 6c 75 | oose-encoding-configuration.valu |
| 28bc0 | 65 2e 0a 41 72 67 75 6d 65 6e 74 20 50 52 4f 4d 50 54 20 70 72 6f 6d 70 74 20 74 6f 20 73 68 6f | e..Argument.PROMPT.prompt.to.sho |
| 28be0 | 77 2e 22 0a 20 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 70 72 6f 6d 70 74 20 27 28 | w."...(completing-read.prompt.'( |
| 28c00 | 22 73 74 72 69 63 74 22 20 22 72 65 70 6c 61 63 65 22 20 22 69 67 6e 6f 72 65 22 20 22 62 61 63 | "strict"."replace"."ignore"."bac |
| 28c20 | 6b 73 6c 61 73 68 72 65 70 6c 61 63 65 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 | kslashreplace")))..(defun.calibr |
| 28c40 | 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 65 6e 74 72 79 2d 74 79 70 65 20 28 70 | edb-transient-read-entry-type.(p |
| 28c60 | 72 6f 6d 70 74 20 5f 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 5f 68 69 73 74 6f 72 79 29 0a 20 | rompt._initial-input._history).. |
| 28c80 | 20 22 52 65 61 64 20 61 20 42 69 62 54 65 78 20 2d 2d 65 6e 74 72 79 2d 74 79 70 65 20 76 61 6c | ."Read.a.BibTex.--entry-type.val |
| 28ca0 | 75 65 2e 0a 41 72 67 75 6d 65 6e 74 20 50 52 4f 4d 50 54 20 70 72 6f 6d 70 74 20 74 6f 20 73 68 | ue..Argument.PROMPT.prompt.to.sh |
| 28cc0 | 6f 77 2e 22 0a 20 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 70 72 6f 6d 70 74 20 27 | ow."...(completing-read.prompt.' |
| 28ce0 | 28 22 62 6f 6f 6b 22 20 22 6d 69 73 63 22 20 22 6d 69 78 65 64 22 29 29 29 0a 0a 3b 3b 20 52 65 | ("book"."misc"."mixed")))..;;.Re |
| 28d00 | 61 64 65 72 73 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e | aders..(defun.calibredb-transien |
| 28d20 | 74 2d 72 65 61 64 2d 66 69 6c 65 20 28 70 72 6f 6d 70 74 20 5f 69 6e 69 74 69 61 6c 2d 69 6e 70 | t-read-file.(prompt._initial-inp |
| 28d40 | 75 74 20 5f 68 69 73 74 6f 72 79 29 0a 20 20 22 52 65 61 64 20 61 20 66 69 6c 65 20 70 61 74 68 | ut._history)..."Read.a.file.path |
| 28d60 | 2e 0a 41 72 67 75 6d 65 6e 74 20 50 52 4f 4d 50 54 20 70 72 6f 6d 70 74 20 74 6f 20 73 68 6f 77 | ..Argument.PROMPT.prompt.to.show |
| 28d80 | 2e 22 0a 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 72 65 61 64 2d 66 69 6c | ."...(expand-file-name.(read-fil |
| 28da0 | 65 2d 6e 61 6d 65 20 70 72 6f 6d 70 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 | e-name.prompt)))..(defun.calibre |
| 28dc0 | 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 20 28 70 72 6f 6d | db-transient-read-metadata.(prom |
| 28de0 | 70 74 20 5f 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 5f 68 69 73 74 6f 72 79 20 26 6f 70 74 69 | pt._initial-input._history.&opti |
| 28e00 | 6f 6e 61 6c 20 74 79 70 65 29 0a 20 20 22 52 65 61 64 20 6d 65 74 61 64 61 74 61 20 2d 20 74 69 | onal.type)..."Read.metadata.-.ti |
| 28e20 | 74 6c 65 2e 0a 41 72 67 75 6d 65 6e 74 20 50 52 4f 4d 50 54 20 70 72 6f 6d 70 74 20 74 6f 20 73 | tle..Argument.PROMPT.prompt.to.s |
| 28e40 | 68 6f 77 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 54 59 50 45 2e 22 0a 20 20 | how..Optional.argument.TYPE."... |
| 28e60 | 28 6c 65 74 20 28 28 63 61 6e 64 29 29 0a 20 20 20 20 28 69 66 20 28 65 71 20 6d 61 6a 6f 72 2d | (let.((cand)).....(if.(eq.major- |
| 28e80 | 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 29 0a 20 20 20 | mode.'calibredb-search-mode).... |
| 28ea0 | 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 20 28 63 64 72 20 28 67 65 74 2d 74 65 78 74 2d 70 | .....(setq.cand.(cdr.(get-text-p |
| 28ec0 | 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 | roperty.(point).'calibredb-entry |
| 28ee0 | 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 20 28 67 65 74 2d 74 65 | .nil))).......(setq.cand.(get-te |
| 28f00 | 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 27 63 61 6c 69 62 72 65 | xt-property.(point-min).'calibre |
| 28f20 | 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 6c 61 73 74 2d | db-entry.nil))).....(let.((last- |
| 28f40 | 69 6e 70 75 74 29 29 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 74 69 74 6c 65 20 28 63 61 6c | input)).......(let*.((title.(cal |
| 28f60 | 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 | ibredb-getattr.cand.:book-title) |
| 28f80 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 | )..............(id.(calibredb-ge |
| 28fa0 | 74 61 74 74 72 20 63 61 6e 64 20 3a 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 | tattr.cand.:id))..............(i |
| 28fc0 | 6e 69 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 69 6e 69 74 20 74 79 70 65 20 63 61 6e | nit.(calibredb-get-init.type.can |
| 28fe0 | 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 20 28 6c 65 6e 67 74 68 20 28 63 | d))..............(num.(length.(c |
| 29000 | 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 73 29 | alibredb-find-marked-candidates) |
| 29020 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 70 75 74 20 28 6f 72 20 6c 61 73 74 2d | ))..............(input.(or.last- |
| 29040 | 69 6e 70 75 74 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 28 69 66 20 28 3e 20 6e 75 6d 20 30 29 | input.(read-string.(if.(>.num.0) |
| 29060 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 29080 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 53 65 | .....................(concat."Se |
| 290a0 | 74 20 22 20 74 79 70 65 20 22 20 66 6f 72 20 22 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 | t.".type.".for.".(number-to-stri |
| 290c0 | 6e 67 20 6e 75 6d 29 20 22 20 69 74 65 6d 73 3a 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ng.num).".items:.")............. |
| 290e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 29100 | 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 70 72 6f 6d 70 74 20 69 64 20 22 20 22 20 74 69 74 6c | ......(concat.prompt.id.".".titl |
| 29120 | 65 20 22 3a 20 22 29 20 29 20 69 6e 69 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 73 65 | e.":.").).init)))).........;;.se |
| 29140 | 74 20 74 68 65 20 69 6e 70 75 74 20 61 73 20 6c 61 73 74 20 69 6e 70 75 74 2c 20 73 6f 20 74 68 | t.the.input.as.last.input,.so.th |
| 29160 | 61 74 20 61 6c 6c 20 69 74 65 6d 73 20 75 73 65 20 74 68 65 20 73 61 6d 65 20 69 6e 70 75 74 0a | at.all.items.use.the.same.input. |
| 29180 | 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6c 61 73 74 2d 69 6e 70 75 74 20 69 6e 70 75 74 29 29 | ........(setq.last-input.input)) |
| 291a0 | 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d | )))..(defun.calibredb-transient- |
| 291c0 | 72 65 61 64 2d 6d 65 74 61 64 61 74 61 2d 74 61 67 73 20 28 70 72 6f 6d 70 74 20 69 6e 69 74 69 | read-metadata-tags.(prompt.initi |
| 291e0 | 61 6c 2d 69 6e 70 75 74 20 68 69 73 74 6f 72 79 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 74 | al-input.history)...(calibredb-t |
| 29200 | 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 20 70 72 6f 6d 70 74 20 69 6e | ransient-read-metadata.prompt.in |
| 29220 | 69 74 69 61 6c 2d 69 6e 70 75 74 20 68 69 73 74 6f 72 79 20 22 74 61 67 73 22 29 29 0a 0a 28 64 | itial-input.history."tags"))..(d |
| 29240 | 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 65 | efun.calibredb-transient-read-me |
| 29260 | 74 61 64 61 74 61 2d 69 64 73 20 28 70 72 6f 6d 70 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 | tadata-ids.(prompt.initial-input |
| 29280 | 20 68 69 73 74 6f 72 79 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 | .history)...(calibredb-transient |
| 292a0 | 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 20 70 72 6f 6d 70 74 20 69 6e 69 74 69 61 6c 2d 69 6e | -read-metadata.prompt.initial-in |
| 292c0 | 70 75 74 20 68 69 73 74 6f 72 79 20 22 69 64 73 22 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 | put.history."ids"))..(defun.cali |
| 292e0 | 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 2d 63 6f | bredb-transient-read-metadata-co |
| 29300 | 6d 6d 65 6e 74 73 20 28 70 72 6f 6d 70 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 68 69 73 | mments.(prompt.initial-input.his |
| 29320 | 74 6f 72 79 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 | tory)...(calibredb-transient-rea |
| 29340 | 64 2d 6d 65 74 61 64 61 74 61 20 70 72 6f 6d 70 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 | d-metadata.prompt.initial-input. |
| 29360 | 68 69 73 74 6f 72 79 20 22 63 6f 6d 6d 65 6e 74 73 22 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c | history."comments"))..(defun.cal |
| 29380 | 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 2d 61 | ibredb-transient-read-metadata-a |
| 293a0 | 75 74 68 6f 72 2d 73 6f 72 74 20 28 70 72 6f 6d 70 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 | uthor-sort.(prompt.initial-input |
| 293c0 | 20 68 69 73 74 6f 72 79 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 | .history)...(calibredb-transient |
| 293e0 | 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 20 70 72 6f 6d 70 74 20 69 6e 69 74 69 61 6c 2d 69 6e | -read-metadata.prompt.initial-in |
| 29400 | 70 75 74 20 68 69 73 74 6f 72 79 20 22 61 75 74 68 6f 72 5f 73 6f 72 74 22 29 29 0a 0a 28 64 65 | put.history."author_sort"))..(de |
| 29420 | 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 65 74 | fun.calibredb-transient-read-met |
| 29440 | 61 64 61 74 61 2d 61 75 74 68 6f 72 73 20 28 70 72 6f 6d 70 74 20 69 6e 69 74 69 61 6c 2d 69 6e | adata-authors.(prompt.initial-in |
| 29460 | 70 75 74 20 68 69 73 74 6f 72 79 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 | put.history)...(calibredb-transi |
| 29480 | 65 6e 74 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 20 70 72 6f 6d 70 74 20 69 6e 69 74 69 61 6c | ent-read-metadata.prompt.initial |
| 294a0 | 2d 69 6e 70 75 74 20 68 69 73 74 6f 72 79 20 22 61 75 74 68 6f 72 73 22 29 29 0a 0a 28 64 65 66 | -input.history."authors"))..(def |
| 294c0 | 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 65 74 61 | un.calibredb-transient-read-meta |
| 294e0 | 64 61 74 61 2d 74 69 74 6c 65 20 28 70 72 6f 6d 70 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 | data-title.(prompt.initial-input |
| 29500 | 20 68 69 73 74 6f 72 79 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 | .history)...(calibredb-transient |
| 29520 | 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 20 70 72 6f 6d 70 74 20 69 6e 69 74 69 61 6c 2d 69 6e | -read-metadata.prompt.initial-in |
| 29540 | 70 75 74 20 68 69 73 74 6f 72 79 20 22 74 69 74 6c 65 22 29 29 0a 0a 3b 3b 20 47 65 74 0a 0a 28 | put.history."title"))..;;.Get..( |
| 29560 | 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 61 72 67 | defun.calibredb-set-metadata-arg |
| 29580 | 75 6d 65 6e 74 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6c 61 74 65 73 74 20 75 | uments.()..."Return.the.latest.u |
| 295a0 | 73 65 64 20 61 72 67 75 6d 65 6e 74 73 20 69 6e 20 74 68 65 20 60 63 61 6c 69 62 72 65 64 62 2d | sed.arguments.in.the.`calibredb- |
| 295c0 | 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 64 69 73 70 61 74 63 68 27 20 74 72 61 6e 73 69 65 6e 74 | set-metadata-dispatch'.transient |
| 295e0 | 2e 22 0a 20 20 28 63 61 72 20 28 61 6c 69 73 74 2d 67 65 74 20 27 63 61 6c 69 62 72 65 64 62 2d | ."...(car.(alist-get.'calibredb- |
| 29600 | 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 64 69 73 70 61 74 63 68 20 74 72 61 6e 73 69 65 6e 74 2d | set-metadata-dispatch.transient- |
| 29620 | 68 69 73 74 6f 72 79 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 65 78 70 | history)))..(defun.calibredb-exp |
| 29640 | 6f 72 74 2d 61 72 67 75 6d 65 6e 74 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6c | ort-arguments.()..."Return.the.l |
| 29660 | 61 74 65 73 74 20 75 73 65 64 20 61 72 67 75 6d 65 6e 74 73 20 69 6e 20 74 68 65 20 60 63 61 6c | atest.used.arguments.in.the.`cal |
| 29680 | 69 62 72 65 64 62 2d 65 78 70 6f 72 74 2d 77 69 74 68 6f 75 74 2d 63 6f 6e 76 65 72 73 69 6f 6e | ibredb-export-without-conversion |
| 296a0 | 2d 64 69 73 70 61 74 63 68 27 20 74 72 61 6e 73 69 65 6e 74 2e 22 0a 20 20 28 63 61 72 20 28 61 | -dispatch'.transient."...(car.(a |
| 296c0 | 6c 69 73 74 2d 67 65 74 20 27 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f 72 74 2d 77 69 74 68 6f | list-get.'calibredb-export-witho |
| 296e0 | 75 74 2d 63 6f 6e 76 65 72 73 69 6f 6e 2d 64 69 73 70 61 74 63 68 20 74 72 61 6e 73 69 65 6e 74 | ut-conversion-dispatch.transient |
| 29700 | 2d 68 69 73 74 6f 72 79 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 6f | -history)))..(defun.calibredb-co |
| 29720 | 6e 76 65 72 74 2d 61 72 67 75 6d 65 6e 74 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 | nvert-arguments.()..."Return.the |
| 29740 | 20 6c 61 74 65 73 74 20 75 73 65 64 20 61 72 67 75 6d 65 6e 74 73 20 69 6e 20 74 68 65 20 60 63 | .latest.used.arguments.in.the.`c |
| 29760 | 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 65 70 75 62 2d 64 69 73 70 61 74 63 | alibredb-convert-to-epub-dispatc |
| 29780 | 68 27 20 74 72 61 6e 73 69 65 6e 74 2e 22 0a 20 20 28 63 61 72 20 28 61 6c 69 73 74 2d 67 65 74 | h'.transient."...(car.(alist-get |
| 297a0 | 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d 65 70 75 62 2d 64 69 73 70 | .'calibredb-convert-to-epub-disp |
| 297c0 | 61 74 63 68 20 74 72 61 6e 73 69 65 6e 74 2d 68 69 73 74 6f 72 79 29 29 29 0a 0a 28 64 65 66 75 | atch.transient-history)))..(defu |
| 297e0 | 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 61 74 61 6c 6f 67 2d 62 69 62 2d 61 72 67 75 6d 65 6e 74 | n.calibredb-catalog-bib-argument |
| 29800 | 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6c 61 74 65 73 74 20 75 73 65 64 20 61 | s.()..."Return.the.latest.used.a |
| 29820 | 72 67 75 6d 65 6e 74 73 20 69 6e 20 74 68 65 20 60 63 61 6c 69 62 72 65 64 62 2d 63 61 74 61 6c | rguments.in.the.`calibredb-catal |
| 29840 | 6f 67 2d 62 69 62 2d 64 69 73 70 61 74 63 68 27 20 74 72 61 6e 73 69 65 6e 74 2e 22 0a 20 20 28 | og-bib-dispatch'.transient."...( |
| 29860 | 63 61 72 20 28 61 6c 69 73 74 2d 67 65 74 20 27 63 61 6c 69 62 72 65 64 62 2d 63 61 74 61 6c 6f | car.(alist-get.'calibredb-catalo |
| 29880 | 67 2d 62 69 62 2d 64 69 73 70 61 74 63 68 20 74 72 61 6e 73 69 65 6e 74 2d 68 69 73 74 6f 72 79 | g-bib-dispatch.transient-history |
| 298a0 | 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 | )))..(provide.'calibredb-transie |
| 298c0 | 6e 74 29 0a 0a 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2e 65 6c 20 | nt)..;;;.calibredb-transient.el. |
| 298e0 | 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....................... |
| 29900 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29920 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 299a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 299c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 299e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29a00 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 29a20 | 2d 75 74 69 6c 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 | -utils.el....................... |
| 29a40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29a60 | 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 |
| 29a80 | 30 31 35 34 31 37 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 32 33 37 00 20 30 00 00 00 | 0154175.00000000000.016237..0... |
| 29aa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29ae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29b00 | 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................... |
| 29b20 | 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................... |
| 29b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 29c00 | 3b 3b 3b 20 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 20 2d 2d 2d 20 55 74 69 6c 73 | ;;;.calibredb-utils.el.---.Utils |
| 29c20 | 20 66 6f 72 20 63 61 6c 69 62 72 65 64 62 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 | .for.calibredb.-*-.lexical-bindi |
| 29c40 | 6e 67 3a 20 74 3b 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 32 | ng:.t;.-*-..;;.Copyright.(C).202 |
| 29c60 | 30 20 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 44 61 6d 6f 6e 20 43 | 0.Damon.Chan..;;.Author:.Damon.C |
| 29c80 | 68 61 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 55 52 4c 3a | han.<elecming@gmail.com>.;;.URL: |
| 29ca0 | 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 65 6e 79 61 6e 6d 69 6e 67 2f | .https://github.com/chenyanming/ |
| 29cc0 | 63 61 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 74 6f 6f 6c 73 0a | calibredb.el.;;.Keywords:.tools. |
| 29ce0 | 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 31 32 2e 30 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 | ;;.Version:.2.12.0..;;.This.file |
| 29d00 | 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 73 2e 0a 0a 3b 3b 20 54 | .is.NOT.part.of.GNU.Emacs...;;.T |
| 29d20 | 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f | his.program.is.free.software;.yo |
| 29d40 | 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 64 | u.can.redistribute.it.and/or.mod |
| 29d60 | 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 65 | ify.;;.it.under.the.terms.of.the |
| 29d80 | 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 70 | .GNU.General.Public.License.as.p |
| 29da0 | 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 | ublished.by.;;.the.Free.Software |
| 29dc0 | 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 66 | .Foundation,.either.version.3.of |
| 29de0 | 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 | .the.License,.or.;;.(at.your.opt |
| 29e00 | 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 | ion).any.later.version...;;.This |
| 29e20 | 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 | .program.is.distributed.in.the.h |
| 29e40 | 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 |
| 29e60 | 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 |
| 29e80 | 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.;; |
| 29ea0 | 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. |
| 29ec0 | 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.; |
| 29ee0 | 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 |
| 29f00 | 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 | .more.details...;;.You.should.ha |
| 29f20 | 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 |
| 29f40 | 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 |
| 29f60 | 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 | th.this.program...If.not,.see.<h |
| 29f80 | 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a | ttps://www.gnu.org/licenses/>... |
| 29fa0 | 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 | ;;;.Commentary:..;;;.Code:..(req |
| 29fc0 | 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 72 65 29 0a 28 72 65 71 75 69 72 65 20 27 | uire.'calibredb-core).(require.' |
| 29fe0 | 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 | calibredb-search).(require.'cali |
| 2a000 | 62 72 65 64 62 2d 66 61 63 65 73 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 | bredb-faces).(require.'calibredb |
| 2a020 | 2d 73 68 6f 77 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 | -show).(require.'calibredb-trans |
| 2a040 | 69 65 6e 74 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e 6f 74 61 | ient).(require.'calibredb-annota |
| 2a060 | 74 69 6f 6e 29 0a 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 | tion)..(eval-when-compile.(defva |
| 2a080 | 72 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 29 29 0a 28 65 76 | r.calibredb-search-entries)).(ev |
| 2a0a0 | 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 | al-when-compile.(defvar.calibred |
| 2a0c0 | 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 29 29 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 | b-full-entries)).(eval-when-comp |
| 2a0e0 | 69 6c 65 20 28 64 65 66 76 61 72 20 63 61 6c 69 62 72 65 64 62 2d 69 6d 61 67 65 73 2d 70 61 74 | ile.(defvar.calibredb-images-pat |
| 2a100 | 68 29 29 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 20 28 64 65 66 76 61 72 20 63 | h)).(eval-when-compile.(defvar.c |
| 2a120 | 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 64 6f 77 6e 6c 6f 61 64 2d 64 69 72 29 29 0a 0a 0a 28 | alibredb-opds-download-dir))...( |
| 2a140 | 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 | declare-function.calibredb-searc |
| 2a160 | 68 2d 62 75 66 66 65 72 20 22 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2e 65 6c 22 29 0a | h-buffer."calibredb-search.el"). |
| 2a180 | 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 | (declare-function.calibredb-deta |
| 2a1a0 | 69 6c 65 64 2d 76 69 65 77 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 22 63 61 6c 69 62 72 65 64 | iled-view-insert-image."calibred |
| 2a1c0 | 62 2d 75 74 69 6c 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 | b-utils.el").(declare-function.c |
| 2a1e0 | 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 20 22 63 61 6c 69 62 72 65 64 62 2d | alibredb-search-mode."calibredb- |
| 2a200 | 73 65 61 72 63 68 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 | search.el").(declare-function.ca |
| 2a220 | 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 22 63 61 6c | libredb-search--buffer-name."cal |
| 2a240 | 69 62 72 65 64 62 2d 73 65 61 72 63 68 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 | ibredb-search.el").(declare-func |
| 2a260 | 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 75 6e 73 65 6c 2d 61 64 64 2d 66 69 6c 65 2d | tion.calibredb-counsel-add-file- |
| 2a280 | 61 63 74 69 6f 6e 20 22 63 61 6c 69 62 72 65 64 62 2d 69 76 79 2e 65 6c 22 29 0a 28 64 65 63 6c | action."calibredb-ivy.el").(decl |
| 2a2a0 | 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 | are-function.calibredb-search-re |
| 2a2c0 | 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 20 22 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 | fresh-or-resume."calibredb-searc |
| 2a2e0 | 68 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 | h.el").(declare-function.calibre |
| 2a300 | 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 22 63 61 6c 69 62 72 65 64 62 2d | db-show--buffer-name."calibredb- |
| 2a320 | 73 68 6f 77 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 | show.el").(declare-function.cali |
| 2a340 | 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 20 22 63 61 6c 69 62 72 65 64 62 2d | bredb-search-refresh."calibredb- |
| 2a360 | 73 65 61 72 63 68 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 | search.el").(declare-function.ca |
| 2a380 | 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 72 65 66 72 65 73 68 20 22 63 61 6c 69 62 72 65 64 62 2d | libredb-show-refresh."calibredb- |
| 2a3a0 | 73 68 6f 77 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 | show.el").(declare-function.cali |
| 2a3c0 | 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 61 72 67 75 6d 65 6e 74 73 20 22 63 61 | bredb-set-metadata-arguments."ca |
| 2a3e0 | 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d | libredb-transient.el").(declare- |
| 2a400 | 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f 72 74 2d 61 72 67 75 6d 65 | function.calibredb-export-argume |
| 2a420 | 6e 74 73 20 22 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 69 65 6e 74 2e 65 6c 22 29 0a 28 64 | nts."calibredb-transient.el").(d |
| 2a440 | 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 61 74 61 6c 6f | eclare-function.calibredb-catalo |
| 2a460 | 67 2d 62 69 62 2d 61 72 67 75 6d 65 6e 74 73 20 22 63 61 6c 69 62 72 65 64 62 2d 74 72 61 6e 73 | g-bib-arguments."calibredb-trans |
| 2a480 | 69 65 6e 74 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 | ient.el").(declare-function.cali |
| 2a4a0 | 62 72 65 64 62 2d 6f 70 64 73 2d 64 6f 77 6e 6c 6f 61 64 20 22 63 61 6c 69 62 72 65 64 62 2d 6f | bredb-opds-download."calibredb-o |
| 2a4c0 | 70 64 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 | pds.el").(declare-function.calib |
| 2a4e0 | 72 65 64 62 2d 6f 70 64 73 2d 72 65 71 75 65 73 74 2d 70 61 67 65 20 22 63 61 6c 69 62 72 65 64 | redb-opds-request-page."calibred |
| 2a500 | 62 2d 6f 70 64 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 | b-opds.el").(declare-function.ca |
| 2a520 | 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 73 65 61 72 63 68 20 22 63 61 6c 69 62 72 65 64 62 2d 6f | libredb-opds-search."calibredb-o |
| 2a540 | 70 64 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 | pds.el").(declare-function.calib |
| 2a560 | 72 65 64 62 2d 6f 70 64 73 2d 6d 61 69 6c 63 61 70 2d 6d 69 6d 65 2d 74 6f 2d 65 78 74 6e 20 22 | redb-opds-mailcap-mime-to-extn." |
| 2a580 | 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2e 65 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e | calibredb-opds.el").(declare-fun |
| 2a5a0 | 63 74 69 6f 6e 20 70 64 66 2d 69 6e 66 6f 2d 73 65 61 72 63 68 2d 73 74 72 69 6e 67 20 22 70 64 | ction.pdf-info-search-string."pd |
| 2a5c0 | 66 2d 69 6e 66 6f 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 70 64 66 2d 69 | f-info").(declare-function.pdf-i |
| 2a5e0 | 6e 66 6f 2d 67 65 74 74 65 78 74 20 22 70 64 66 2d 69 6e 66 6f 22 29 0a 28 64 65 63 6c 61 72 65 | nfo-gettext."pdf-info").(declare |
| 2a600 | 2d 66 75 6e 63 74 69 6f 6e 20 64 6a 76 75 2d 66 69 6e 64 2d 66 69 6c 65 20 22 64 6a 76 75 22 29 | -function.djvu-find-file."djvu") |
| 2a620 | 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 64 6a 76 75 2d 67 6f 74 6f 2d 70 61 67 | .(declare-function.djvu-goto-pag |
| 2a640 | 65 20 22 64 6a 76 75 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 64 6a 76 75 | e."djvu").(declare-function.djvu |
| 2a660 | 2d 6e 65 78 74 2d 70 61 67 65 20 22 64 6a 76 75 22 29 0a 0a 28 64 65 66 76 61 72 20 64 6a 76 75 | -next-page."djvu")..(defvar.djvu |
| 2a680 | 2d 64 6f 63 2d 70 61 67 65 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 | -doc-page)..;;;###autoload.(defu |
| 2a6a0 | 6e 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 20 28 29 0a 20 20 22 47 65 6e 65 72 61 74 65 20 | n.calibredb-list.()..."Generate. |
| 2a6c0 | 61 6e 20 6f 72 67 20 62 75 66 66 65 72 20 77 68 69 63 68 20 63 6f 6e 74 61 69 6e 20 61 6c 6c 20 | an.org.buffer.which.contain.all. |
| 2a6e0 | 65 62 6f 6f 6b 73 27 20 63 6f 76 65 72 20 69 6d 61 67 65 2c 20 74 69 74 6c 65 20 61 6e 64 20 74 | ebooks'.cover.image,.title.and.t |
| 2a700 | 68 65 20 66 69 6c 65 20 6c 69 6e 6b 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 | he.file.link."...(interactive).. |
| 2a720 | 20 28 6c 65 74 2a 20 28 28 62 75 66 2d 6e 61 6d 65 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 6c 69 | .(let*.((buf-name."*calibredb-li |
| 2a740 | 73 74 2a 22 29 0a 20 20 20 20 20 20 20 20 20 6f 63 63 75 72 2d 62 75 66 29 0a 20 20 20 20 28 77 | st*")..........occur-buf).....(w |
| 2a760 | 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 75 66 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 | hen.(get-buffer.buf-name)....... |
| 2a780 | 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 75 66 2d 6e 61 6d 65 29 29 0a 20 20 20 20 28 73 65 74 | (kill-buffer.buf-name)).....(set |
| 2a7a0 | 71 20 6f 63 63 75 72 2d 62 75 66 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 62 | q.occur-buf.(get-buffer-create.b |
| 2a7c0 | 75 66 2d 6e 61 6d 65 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 72 65 73 2d 6c 69 73 74 20 28 69 | uf-name)).....(let.((res-list.(i |
| 2a7e0 | 66 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 0a 20 20 20 20 20 | f.calibredb-search-entries...... |
| 2a800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 | ...................calibredb-sea |
| 2a820 | 72 63 68 2d 65 6e 74 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | rch-entries..................... |
| 2a840 | 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..(progn........................ |
| 2a860 | 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 20 | .(setq.calibredb-search-entries. |
| 2a880 | 28 63 61 6c 69 62 72 65 64 62 2d 63 61 6e 64 69 64 61 74 65 73 29 29 0a 20 20 20 20 20 20 20 20 | (calibredb-candidates))......... |
| 2a8a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d | ................(setq.calibredb- |
| 2a8c0 | 66 75 6c 6c 2d 65 6e 74 72 69 65 73 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e | full-entries.calibredb-search-en |
| 2a8e0 | 74 72 69 65 73 29 29 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 | tries))))).......(with-current-b |
| 2a900 | 75 66 66 65 72 20 6f 63 63 75 72 2d 62 75 66 0a 20 20 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 | uffer.occur-buf.........(erase-b |
| 2a920 | 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 23 2b 53 54 41 52 54 55 | uffer).........(insert."#+STARTU |
| 2a940 | 50 3a 20 69 6e 6c 69 6e 65 69 6d 61 67 65 73 20 6e 6f 66 6f 6c 64 22 29 29 0a 20 20 20 20 20 20 | P:.inlineimages.nofold"))....... |
| 2a960 | 28 64 6f 6c 69 73 74 20 28 72 65 73 20 72 65 73 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 28 | (dolist.(res.res-list).........( |
| 2a980 | 6c 65 74 20 28 28 63 6f 76 65 72 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 | let.((cover.(concat.(file-name-d |
| 2a9a0 | 69 72 65 63 74 6f 72 79 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 | irectory.(calibredb-getattr.(cdr |
| 2a9c0 | 20 72 65 73 29 20 3a 66 69 6c 65 2d 70 61 74 68 29 29 20 22 63 6f 76 65 72 2e 6a 70 67 22 29 29 | .res).:file-path))."cover.jpg")) |
| 2a9e0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 28 63 61 6c 69 62 72 65 64 62 | ...............(title.(calibredb |
| 2aa00 | 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 72 65 73 29 20 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 29 | -getattr.(cdr.res).:book-title)) |
| 2aa20 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 28 63 61 6c 69 62 72 65 64 | ...............(format.(calibred |
| 2aa40 | 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 72 65 73 29 20 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 | b-getattr.(cdr.res).:book-format |
| 2aa60 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 6f 6b 20 28 63 61 6c 69 62 72 65 64 | ))...............(book.(calibred |
| 2aa80 | 62 2d 67 65 74 61 74 74 72 20 28 63 64 72 20 72 65 73 29 20 3a 66 69 6c 65 2d 70 61 74 68 29 29 | b-getattr.(cdr.res).:file-path)) |
| 2aaa0 | 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 69 6d 61 67 65 2d 74 79 70 65 2d 61 76 61 69 | )...........(if.(image-type-avai |
| 2aac0 | 6c 61 62 6c 65 2d 70 20 28 69 6e 74 65 72 6e 20 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 20 20 | lable-p.(intern.format))........ |
| 2aae0 | 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 76 65 72 20 62 6f 6f 6b 29 29 0a 20 20 20 20 20 20 | .......(setq.cover.book))....... |
| 2ab00 | 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 6f 63 63 75 72 2d 62 | ....(with-current-buffer.occur-b |
| 2ab20 | 75 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 69 6c 65 2d 65 78 69 73 74 | uf.............(when.(file-exist |
| 2ab40 | 73 2d 70 20 63 6f 76 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 | s-p.cover)...............(insert |
| 2ab60 | 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 23 2b | ."\n")...............(insert."#+ |
| 2ab80 | 61 74 74 72 5f 6f 72 67 3a 20 3a 77 69 64 74 68 20 32 30 30 70 78 5c 6e 22 29 0a 20 20 20 20 20 | attr_org:.:width.200px\n")...... |
| 2aba0 | 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5b 5b 66 69 6c 65 3a 22 20 63 6f 76 65 72 | .........(insert."[[file:".cover |
| 2abc0 | 20 22 5d 5d 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 22 | ."]]")).............(insert."\n" |
| 2abe0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 5b | ).............(insert.(format."[ |
| 2ac00 | 5b 66 69 6c 65 3a 25 73 5d 5b 25 73 5d 5d 22 20 62 6f 6f 6b 20 74 69 74 6c 65 29 29 0a 20 20 20 | [file:%s][%s]]".book.title)).... |
| 2ac20 | 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 22 29 29 29 29 29 0a 20 20 20 20 28 | .........(insert."\n"))))).....( |
| 2ac40 | 77 68 65 6e 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 6f 63 63 75 72 2d 62 75 66 29 0a 20 | when.(buffer-live-p.occur-buf).. |
| 2ac60 | 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e | .....(switch-to-buffer-other-win |
| 2ac80 | 64 6f 77 20 6f 63 63 75 72 2d 62 75 66 29 0a 20 20 20 20 20 20 28 72 65 61 64 2d 6f 6e 6c 79 2d | dow.occur-buf).......(read-only- |
| 2aca0 | 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 66 65 61 74 75 72 65 70 20 27 6f | mode).......(unless.(featurep.'o |
| 2acc0 | 72 67 29 0a 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 6f 72 67 29 29 0a 20 20 20 20 | rg).........(require.'org))..... |
| 2ace0 | 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6f 72 67 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 | ..(if.(fboundp.'org-mode)....... |
| 2ad00 | 20 20 20 20 28 6f 72 67 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 | ....(org-mode)).......(goto-char |
| 2ad20 | 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 | .(point-min)))))..(defun.calibre |
| 2ad40 | 64 62 2d 6f 70 65 6e 2d 77 69 74 68 2d 64 65 66 61 75 6c 74 2d 74 6f 6f 6c 20 28 66 69 6c 65 70 | db-open-with-default-tool.(filep |
| 2ad60 | 61 74 68 29 0a 20 20 22 54 4f 44 4f 3a 20 63 6f 6e 73 6f 6c 69 64 61 74 65 20 64 65 66 61 75 6c | ath)..."TODO:.consolidate.defaul |
| 2ad80 | 74 2d 6f 70 65 6e 65 72 20 77 69 74 68 20 64 69 73 70 61 74 63 68 65 72 2e 0a 41 72 67 75 6d 65 | t-opener.with.dispatcher..Argume |
| 2ada0 | 6e 74 20 46 49 4c 45 50 41 54 48 20 69 73 20 74 68 65 20 66 69 6c 65 20 70 61 74 68 2e 22 0a 20 | nt.FILEPATH.is.the.file.path.".. |
| 2adc0 | 20 28 63 6f 6e 64 20 28 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 67 6e 75 2f 6c 69 6e | .(cond.((eq.system-type.'gnu/lin |
| 2ade0 | 75 78 29 0a 20 20 20 20 20 20 20 20 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 22 78 64 67 2d | ux)..........(call-process."xdg- |
| 2ae00 | 6f 70 65 6e 22 20 6e 69 6c 20 30 20 6e 69 6c 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d | open".nil.0.nil.(expand-file-nam |
| 2ae20 | 65 20 66 69 6c 65 70 61 74 68 29 29 29 0a 20 20 20 20 20 20 20 20 28 28 65 71 20 73 79 73 74 65 | e.filepath))).........((eq.syste |
| 2ae40 | 6d 2d 74 79 70 65 20 27 77 69 6e 64 6f 77 73 2d 6e 74 29 0a 20 20 20 20 20 20 20 20 20 28 77 33 | m-type.'windows-nt)..........(w3 |
| 2ae60 | 32 2d 73 68 65 6c 6c 2d 65 78 65 63 75 74 65 20 22 6f 70 65 6e 22 20 28 65 78 70 61 6e 64 2d 66 | 2-shell-execute."open".(expand-f |
| 2ae80 | 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 70 61 74 68 29 29 29 0a 20 20 20 20 20 20 20 20 28 28 65 | ile-name.filepath))).........((e |
| 2aea0 | 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 64 61 72 77 69 6e 29 0a 20 20 20 20 20 20 20 20 20 | q.system-type.'darwin).......... |
| 2aec0 | 28 73 74 61 72 74 2d 70 72 6f 63 65 73 73 20 22 73 68 65 6c 6c 2d 70 72 6f 63 65 73 73 22 20 22 | (start-process."shell-process"." |
| 2aee0 | 2a 4d 65 73 73 61 67 65 73 2a 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | *Messages*"..................... |
| 2af00 | 20 20 20 20 22 6f 70 65 6e 22 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c | ...."open".(expand-file-name.fil |
| 2af20 | 65 70 61 74 68 29 29 29 0a 20 20 20 20 20 20 20 20 28 74 20 28 6d 65 73 73 61 67 65 20 22 75 6e | epath))).........(t.(message."un |
| 2af40 | 6b 6e 6f 77 6e 20 73 79 73 74 65 6d 21 3f 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 | known.system!?"))))..(defun.cali |
| 2af60 | 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 28 65 6e 74 72 79 20 26 6f 70 74 69 | bredb-get-file-path.(entry.&opti |
| 2af80 | 6f 6e 61 6c 20 70 72 6f 6d 70 74 29 0a 20 20 22 47 65 74 20 66 69 6c 65 20 70 61 74 68 20 66 72 | onal.prompt)..."Get.file.path.fr |
| 2afa0 | 6f 6d 20 61 20 76 61 6c 69 64 20 63 61 6e 64 69 64 61 74 65 20 45 4e 54 52 59 2e 0a 4f 70 74 69 | om.a.valid.candidate.ENTRY..Opti |
| 2afc0 | 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 50 52 4f 4d 50 54 20 74 6f 20 53 65 6c 65 63 74 20 61 | onal.argument.PROMPT.to.Select.a |
| 2afe0 | 20 66 6f 72 6d 61 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 66 69 6c 65 2d 70 61 74 68 20 28 63 61 | .format."...(let.((file-path.(ca |
| 2b000 | 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 66 69 6c 65 2d 70 61 74 68 | libredb-getattr.entry.:file-path |
| 2b020 | 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 73 2d 65 71 75 61 6c 73 3f 20 22 22 20 66 69 6c | ))).....(cond.((s-equals?."".fil |
| 2b040 | 65 2d 70 61 74 68 29 20 22 22 29 20 20 20 20 20 20 20 20 20 3b 20 6e 6f 20 66 69 6c 65 2d 70 61 | e-path)."").........;.no.file-pa |
| 2b060 | 74 68 20 66 69 65 6c 64 0a 20 20 20 20 20 20 20 20 20 20 28 28 66 69 6c 65 2d 65 78 69 73 74 73 | th.field...........((file-exists |
| 2b080 | 2d 70 20 66 69 6c 65 2d 70 61 74 68 29 20 66 69 6c 65 2d 70 61 74 68 29 20 3b 20 64 65 66 61 75 | -p.file-path).file-path).;.defau |
| 2b0a0 | 6c 74 20 66 69 6c 65 2d 70 61 74 68 20 69 73 20 61 20 76 61 6c 69 64 20 66 69 6c 65 0a 20 20 20 | lt.file-path.is.a.valid.file.... |
| 2b0c0 | 20 20 20 20 20 20 20 28 28 63 61 6c 69 62 72 65 64 62 2d 6c 6f 63 61 6c 2d 66 69 6c 65 2d 65 78 | .......((calibredb-local-file-ex |
| 2b0e0 | 69 73 74 73 2d 70 20 65 6e 74 72 79 29 20 28 63 61 6c 69 62 72 65 64 62 2d 6c 6f 63 61 6c 2d 66 | ists-p.entry).(calibredb-local-f |
| 2b100 | 69 6c 65 20 65 6e 74 72 79 29 29 20 3b 20 76 61 6c 69 64 20 6c 6f 63 61 6c 20 66 69 6c 65 20 69 | ile.entry)).;.valid.local.file.i |
| 2b120 | 73 20 66 6f 75 6e 64 0a 20 20 20 20 20 20 20 20 20 20 28 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 | s.found...........((s-contains?. |
| 2b140 | 22 68 74 74 70 22 20 66 69 6c 65 2d 70 61 74 68 29 20 66 69 6c 65 2d 70 61 74 68 29 20 3b 20 66 | "http".file-path).file-path).;.f |
| 2b160 | 6f 72 20 68 74 74 70 20 6c 69 6e 6b 2c 20 6a 75 73 74 20 72 65 74 75 72 6e 0a 20 20 20 20 20 20 | or.http.link,.just.return....... |
| 2b180 | 20 20 20 20 28 74 20 28 69 66 20 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 22 2c 22 20 28 66 69 6c | ....(t.(if.(s-contains?.",".(fil |
| 2b1a0 | 65 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 66 69 6c 65 2d 70 61 74 68 29 29 20 3b 20 74 | e-name-extension.file-path)).;.t |
| 2b1c0 | 72 79 20 74 6f 20 73 70 6c 69 74 20 74 68 65 20 65 78 74 65 6e 73 69 6f 6e 20 28 66 6f 72 20 65 | ry.to.split.the.extension.(for.e |
| 2b1e0 | 78 61 6d 70 6c 65 2c 20 69 74 20 6d 61 79 20 62 65 20 65 70 75 62 2c 70 64 66 29 20 61 6e 64 20 | xample,.it.may.be.epub,pdf).and. |
| 2b200 | 72 65 74 75 72 6e 20 74 68 65 20 66 69 72 73 74 20 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 | return.the.first.format......... |
| 2b220 | 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 70 61 72 65 6e 74 20 28 66 69 6c 65 2d 6e 61 | .........(let*.((parent.(file-na |
| 2b240 | 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 2d 70 61 74 68 29 29 0a 20 20 20 20 20 20 20 | me-directory.file-path))........ |
| 2b260 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 6e 61 6d 65 20 28 66 69 6c 65 | .................(filename.(file |
| 2b280 | 2d 6e 61 6d 65 2d 62 61 73 65 20 66 69 6c 65 2d 70 61 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 | -name-base.file-path)).......... |
| 2b2a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 74 20 28 73 2d 73 70 6c 69 74 20 22 2c 22 | ...............(ext.(s-split."," |
| 2b2c0 | 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 66 69 6c 65 2d 70 61 74 68 29 | .(file-name-extension.file-path) |
| 2b2e0 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 | )).........................(file |
| 2b300 | 73 20 28 2d 6d 61 70 20 28 6c 61 6d 62 64 61 20 28 65 29 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 | s.(-map.(lambda.(e).(expand-file |
| 2b320 | 2d 6e 61 6d 65 20 28 63 6f 6e 63 61 74 20 66 69 6c 65 6e 61 6d 65 20 22 2e 22 20 65 29 20 70 61 | -name.(concat.filename.".".e).pa |
| 2b340 | 72 65 6e 74 29 29 20 65 78 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | rent)).ext)))................... |
| 2b360 | 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 70 72 65 66 65 72 72 65 64 2d 66 6f 72 6d 61 74 0a | .(if.calibredb-preferred-format. |
| 2b380 | 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 2d 66 69 72 | .......................(or.(-fir |
| 2b3a0 | 73 74 20 28 6c 61 6d 62 64 61 20 28 66 29 20 28 73 74 72 69 6e 67 3d 20 28 66 69 6c 65 2d 6e 61 | st.(lambda.(f).(string=.(file-na |
| 2b3c0 | 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 66 29 20 63 61 6c 69 62 72 65 64 62 2d 70 72 65 66 65 72 | me-extension.f).calibredb-prefer |
| 2b3e0 | 72 65 64 2d 66 6f 72 6d 61 74 29 29 20 66 69 6c 65 73 29 20 28 63 61 72 20 66 69 6c 65 73 29 29 | red-format)).files).(car.files)) |
| 2b400 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 70 72 6f 6d 70 74 | ......................(if.prompt |
| 2b420 | 0a 20 20 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 6d 70 6c | ..........................(compl |
| 2b440 | 65 74 69 6e 67 2d 72 65 61 64 20 22 53 65 6c 65 63 74 20 61 20 66 6f 72 6d 61 74 3a 20 22 20 66 | eting-read."Select.a.format:.".f |
| 2b460 | 69 6c 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 | iles)........................(ca |
| 2b480 | 72 20 66 69 6c 65 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 2d | r.files))))................file- |
| 2b4a0 | 70 61 74 68 29 29 29 29 29 20 20 20 20 20 20 20 20 20 20 20 3b 20 69 66 20 65 78 74 65 6e 73 69 | path)))))...........;.if.extensi |
| 2b4c0 | 6f 6e 20 64 6f 65 73 20 6e 6f 74 20 68 61 76 65 20 63 6f 6d 6d 61 2c 20 61 74 20 6c 61 73 74 20 | on.does.not.have.comma,.at.last. |
| 2b4e0 | 6a 75 73 74 20 72 65 74 72 75 6e 20 69 74 2e 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 | just.retrun.it...(defun.calibred |
| 2b500 | 62 2d 6c 6f 63 61 6c 2d 66 69 6c 65 20 28 65 6e 74 72 79 29 0a 20 20 22 47 65 74 20 74 68 65 20 | b-local-file.(entry)..."Get.the. |
| 2b520 | 6c 6f 63 61 6c 20 62 6f 6f 6b 20 66 69 6c 65 20 62 61 73 65 64 20 6f 6e 20 45 4e 54 52 59 2e 22 | local.book.file.based.on.ENTRY." |
| 2b540 | 0a 20 20 28 6c 65 74 2a 20 28 28 62 6f 6f 6b 2d 74 69 74 6c 65 20 28 63 61 6c 69 62 72 65 64 62 | ...(let*.((book-title.(calibredb |
| 2b560 | 2d 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 29 0a 20 20 20 | -getattr.entry.:book-title)).... |
| 2b580 | 20 20 20 20 20 20 28 62 6f 6f 6b 2d 66 6f 72 6d 61 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 | ......(book-format.(calibredb-ge |
| 2b5a0 | 74 61 74 74 72 20 65 6e 74 72 79 20 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 | tattr.entry.:book-format))...... |
| 2b5c0 | 20 20 20 20 28 6c 6f 63 61 6c 2d 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d | ....(local-file.(expand-file-nam |
| 2b5e0 | 65 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 22 20 62 6f 6f 6b 2d 74 69 74 6c 65 20 28 63 61 6c | e.(format."%s%s".book-title.(cal |
| 2b600 | 69 62 72 65 64 62 2d 6f 70 64 73 2d 6d 61 69 6c 63 61 70 2d 6d 69 6d 65 2d 74 6f 2d 65 78 74 6e | ibredb-opds-mailcap-mime-to-extn |
| 2b620 | 20 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 20 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 64 6f | .book-format)).calibredb-opds-do |
| 2b640 | 77 6e 6c 6f 61 64 2d 64 69 72 29 29 29 0a 20 20 20 20 6c 6f 63 61 6c 2d 66 69 6c 65 29 29 0a 0a | wnload-dir))).....local-file)).. |
| 2b660 | 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 6c 6f 63 61 6c 2d 66 69 6c 65 2d 65 78 69 73 | (defun.calibredb-local-file-exis |
| 2b680 | 74 73 2d 70 20 28 65 6e 74 72 79 29 0a 20 20 22 43 68 65 63 6b 20 6c 6f 63 61 6c 20 62 6f 6f 6b | ts-p.(entry)..."Check.local.book |
| 2b6a0 | 20 66 69 6c 65 20 65 78 69 73 74 73 20 6f 72 20 6e 6f 74 20 62 61 73 65 64 20 6f 6e 20 45 4e 54 | .file.exists.or.not.based.on.ENT |
| 2b6c0 | 52 59 2e 22 0a 20 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 28 63 61 6c 69 62 72 65 64 62 | RY."...(file-exists-p.(calibredb |
| 2b6e0 | 2d 6c 6f 63 61 6c 2d 66 69 6c 65 20 65 6e 74 72 79 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c | -local-file.entry)))..(defun.cal |
| 2b700 | 69 62 72 65 64 62 2d 67 65 74 2d 63 6f 76 65 72 20 28 65 6e 74 72 79 29 0a 20 20 22 47 65 74 20 | ibredb-get-cover.(entry)..."Get. |
| 2b720 | 63 6f 76 65 72 20 70 61 74 68 20 62 61 73 65 64 20 6f 6e 20 45 4e 54 52 59 2e 0a 44 6f 77 6e 6c | cover.path.based.on.ENTRY..Downl |
| 2b740 | 6f 61 64 20 69 74 20 69 66 20 62 6f 6f 6b 2d 63 6f 76 65 72 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e | oad.it.if.book-cover.is.non-nil. |
| 2b760 | 22 0a 20 20 28 6c 65 74 20 28 28 66 69 6c 65 2d 70 61 74 68 20 28 63 61 6c 69 62 72 65 64 62 2d | "...(let.((file-path.(calibredb- |
| 2b780 | 67 65 74 61 74 74 72 20 65 6e 74 72 79 20 3a 66 69 6c 65 2d 70 61 74 68 29 29 0a 20 20 20 20 20 | getattr.entry.:file-path))...... |
| 2b7a0 | 20 20 20 28 62 6f 6f 6b 2d 66 6f 72 6d 61 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 | ...(book-format.(calibredb-getat |
| 2b7c0 | 74 72 20 65 6e 74 72 79 20 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 20 20 20 | tr.entry.:book-format))......... |
| 2b7e0 | 28 62 6f 6f 6b 2d 63 6f 76 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 65 | (book-cover.(calibredb-getattr.e |
| 2b800 | 6e 74 72 79 20 3a 62 6f 6f 6b 2d 63 6f 76 65 72 29 29 29 0a 20 20 20 20 28 70 70 20 62 6f 6f 6b | ntry.:book-cover))).....(pp.book |
| 2b820 | 2d 63 6f 76 65 72 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 69 6d 61 67 65 2d 74 79 70 65 2d 61 | -cover).....(cond.((image-type-a |
| 2b840 | 76 61 69 6c 61 62 6c 65 2d 70 20 28 69 6e 74 65 72 6e 20 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 | vailable-p.(intern.book-format)) |
| 2b860 | 20 66 69 6c 65 2d 70 61 74 68 29 20 3b 20 74 68 65 20 66 69 6c 65 20 69 73 20 61 6e 20 69 6d 61 | .file-path).;.the.file.is.an.ima |
| 2b880 | 67 65 0a 20 20 20 20 20 20 20 20 20 20 28 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 28 63 6f | ge...........((file-exists-p.(co |
| 2b8a0 | 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 2d 70 | ncat.(file-name-directory.file-p |
| 2b8c0 | 61 74 68 29 20 22 63 6f 76 65 72 2e 6a 70 67 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 | ath)."cover.jpg"))............(c |
| 2b8e0 | 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 2d | oncat.(file-name-directory.file- |
| 2b900 | 70 61 74 68 29 20 22 63 6f 76 65 72 2e 6a 70 67 22 29 29 20 3b 20 63 6f 76 65 72 2e 6a 70 67 20 | path)."cover.jpg")).;.cover.jpg. |
| 2b920 | 65 78 69 73 74 73 0a 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 62 6f 6f 6b 2d 63 6f 76 65 | exists...........((not.book-cove |
| 2b940 | 72 29 20 20 20 20 20 20 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).............................. |
| 2b960 | 20 20 20 20 20 20 20 20 3b 20 62 6f 6f 6b 2d 63 6f 76 65 72 20 69 73 20 6e 69 6c 2c 20 75 73 65 | ........;.book-cover.is.nil,.use |
| 2b980 | 20 64 65 66 61 75 6c 74 20 63 6f 76 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 28 65 78 70 61 6e | .default.cover............(expan |
| 2b9a0 | 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 65 72 2e 6a 70 67 22 20 63 61 6c 69 62 72 65 64 | d-file-name."cover.jpg".calibred |
| 2b9c0 | 62 2d 69 6d 61 67 65 73 2d 70 61 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 73 2d 63 6f | b-images-path))...........((s-co |
| 2b9e0 | 6e 74 61 69 6e 73 3f 20 22 62 61 73 65 36 34 22 20 62 6f 6f 6b 2d 63 6f 76 65 72 29 0a 20 20 20 | ntains?."base64".book-cover).... |
| 2ba00 | 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 64 61 74 61 3a | ........(if.(string-match."data: |
| 2ba20 | 69 6d 61 67 65 2f 5c 5c 28 2e 2a 5c 5c 29 3b 62 61 73 65 36 34 2c 5c 5c 28 2e 2a 5c 5c 29 22 20 | image/\\(.*\\);base64,\\(.*\\)". |
| 2ba40 | 62 6f 6f 6b 2d 63 6f 76 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 | book-cover)................(let. |
| 2ba60 | 28 28 63 6f 76 65 72 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 66 6f 72 6d 61 | ((cover.(expand-file-name.(forma |
| 2ba80 | 74 20 22 63 6f 76 65 72 2e 25 73 22 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 62 6f 6f | t."cover.%s".(match-string.1.boo |
| 2baa0 | 6b 2d 63 6f 76 65 72 29 29 20 74 65 6d 70 6f 72 61 72 79 2d 66 69 6c 65 2d 64 69 72 65 63 74 6f | k-cover)).temporary-file-directo |
| 2bac0 | 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 | ry)))..................(with-cur |
| 2bae0 | 72 65 6e 74 2d 62 75 66 66 65 72 20 28 67 65 6e 65 72 61 74 65 2d 6e 65 77 2d 62 75 66 66 65 72 | rent-buffer.(generate-new-buffer |
| 2bb00 | 20 22 20 2a 74 65 6d 70 2a 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | .".*temp*")....................( |
| 2bb20 | 69 6e 73 65 72 74 20 28 62 61 73 65 36 34 2d 64 65 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 6d 61 | insert.(base64-decode-string.(ma |
| 2bb40 | 74 63 68 2d 73 74 72 69 6e 67 20 32 20 62 6f 6f 6b 2d 63 6f 76 65 72 29 29 29 0a 20 20 20 20 20 | tch-string.2.book-cover)))...... |
| 2bb60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 72 69 74 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 | ..............(write-region.(poi |
| 2bb80 | 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 63 6f 76 65 72 29 29 0a 20 20 20 20 | nt-min).(point-max).cover))..... |
| 2bba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 76 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .............cover)............. |
| 2bbc0 | 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 65 72 2e 6a 70 67 22 20 63 | .(expand-file-name."cover.jpg".c |
| 2bbe0 | 61 6c 69 62 72 65 64 62 2d 69 6d 61 67 65 73 2d 70 61 74 68 29 29 29 20 3b 20 54 4f 44 4f 3a 20 | alibredb-images-path))).;.TODO:. |
| 2bc00 | 68 61 6e 64 6c 65 20 62 61 73 65 36 34 20 63 6f 76 65 72 20 69 6d 61 67 65 73 0a 20 20 20 20 20 | handle.base64.cover.images...... |
| 2bc20 | 20 20 20 20 20 28 28 6e 6f 74 20 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 22 62 61 73 65 36 34 22 | .....((not.(s-contains?."base64" |
| 2bc40 | 20 62 6f 6f 6b 2d 63 6f 76 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 | .book-cover))............(let*.( |
| 2bc60 | 28 6c 69 62 72 61 72 79 20 28 2d 66 69 72 73 74 20 28 6c 61 6d 62 64 61 20 28 6c 69 62 29 0a 20 | (library.(-first.(lambda.(lib).. |
| 2bc80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2bca0 | 20 20 20 20 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 | ....(s-contains?.(file-name-dire |
| 2bcc0 | 63 74 6f 72 79 20 28 63 61 72 20 6c 69 62 29 29 20 62 6f 6f 6b 2d 63 6f 76 65 72 29 29 0a 20 20 | ctory.(car.lib)).book-cover))... |
| 2bce0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2bd00 | 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 61 6c 69 73 74 29 29 0a 20 20 20 20 20 | .calibredb-library-alist))...... |
| 2bd20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 72 6c 2d 72 65 71 75 65 73 74 2d 6d 65 74 68 6f 64 | .............(url-request-method |
| 2bd40 | 20 22 47 45 54 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 72 6c 2d 75 | ."GET")...................(url-u |
| 2bd60 | 73 65 72 2d 61 67 65 6e 74 20 22 4d 6f 7a 69 6c 6c 61 2f 35 2e 30 20 28 57 69 6e 64 6f 77 73 20 | ser-agent."Mozilla/5.0.(Windows. |
| 2bd80 | 4e 54 20 36 2e 31 3b 20 57 4f 57 36 34 29 20 41 70 70 6c 65 57 65 62 4b 69 74 2f 35 33 37 2e 33 | NT.6.1;.WOW64).AppleWebKit/537.3 |
| 2bda0 | 36 20 28 4b 48 54 4d 4c 2c 20 6c 69 6b 65 20 47 65 63 6b 6f 29 20 43 68 72 6f 6d 65 2f 34 31 2e | 6.(KHTML,.like.Gecko).Chrome/41. |
| 2bdc0 | 30 2e 32 32 37 32 2e 31 30 31 20 53 61 66 61 72 69 2f 35 33 37 2e 33 36 22 29 0a 20 20 20 20 20 | 0.2272.101.Safari/537.36")...... |
| 2bde0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 72 6c 2d 72 65 71 75 65 73 74 2d 65 78 74 72 61 2d | .............(url-request-extra- |
| 2be00 | 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 60 2c 28 69 66 | headers....................`,(if |
| 2be20 | 20 28 61 6e 64 20 28 6e 74 68 20 31 20 6c 69 62 72 61 72 79 29 20 28 6e 74 68 20 32 20 6c 69 62 | .(and.(nth.1.library).(nth.2.lib |
| 2be40 | 72 61 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | rary)).......................... |
| 2be60 | 60 28 28 22 43 6f 6e 74 65 6e 74 2d 54 79 70 65 22 20 2e 20 22 61 70 70 6c 69 63 61 74 69 6f 6e | `(("Content-Type"..."application |
| 2be80 | 2f 78 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 20 20 20 20 20 | /xml").......................... |
| 2bea0 | 20 20 28 22 41 75 74 68 6f 72 69 7a 61 74 69 6f 6e 22 20 2e 20 2c 28 63 6f 6e 63 61 74 20 22 42 | ..("Authorization"...,(concat."B |
| 2bec0 | 61 73 69 63 20 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 | asic.".......................... |
| 2bee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 | ..............................(b |
| 2bf00 | 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 20 20 20 20 20 | ase64-encode-string............. |
| 2bf20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2bf40 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 6e 74 68 20 31 20 6c 69 62 72 61 | ............(concat.(nth.1.libra |
| 2bf60 | 72 79 29 20 22 3a 22 20 28 6e 74 68 20 32 20 6c 69 62 72 61 72 79 29 29 29 29 29 29 0a 20 20 20 | ry).":".(nth.2.library)))))).... |
| 2bf80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 28 22 43 6f 6e 74 65 6e 74 2d 54 | ...................'(("Content-T |
| 2bfa0 | 79 70 65 22 20 2e 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 6d 6c 22 29 29 29 29 0a 20 20 20 | ype"..."application/xml")))).... |
| 2bfc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 72 6c 2d 61 75 74 6f 6d 61 74 69 63 2d 63 61 | ...............(url-automatic-ca |
| 2bfe0 | 63 68 69 6e 67 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 | ching.t)...................(file |
| 2c000 | 6e 61 6d 65 20 28 75 72 6c 2d 63 61 63 68 65 2d 63 72 65 61 74 65 2d 66 69 6c 65 6e 61 6d 65 20 | name.(url-cache-create-filename. |
| 2c020 | 62 6f 6f 6b 2d 63 6f 76 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 | book-cover)))..............(if.( |
| 2c040 | 6e 6f 74 20 28 75 72 6c 2d 69 73 2d 63 61 63 68 65 64 20 62 6f 6f 6b 2d 63 6f 76 65 72 29 29 0a | not.(url-is-cached.book-cover)). |
| 2c060 | 20 20 20 20 20 20 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 | .................(with-current-b |
| 2c080 | 75 66 66 65 72 20 28 75 72 6c 2d 72 65 74 72 69 65 76 65 2d 73 79 6e 63 68 72 6f 6e 6f 75 73 6c | uffer.(url-retrieve-synchronousl |
| 2c0a0 | 79 20 62 6f 6f 6b 2d 63 6f 76 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | y.book-cover)................... |
| 2c0c0 | 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 20 | .(goto-char.(point-min))........ |
| 2c0e0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5c 6e 5c | ............(search-forward."\n\ |
| 2c100 | 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 72 69 74 65 2d 72 65 | n")....................(write-re |
| 2c120 | 67 69 6f 6e 20 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 66 69 6c 65 6e 61 6d | gion.(point).(point-max).filenam |
| 2c140 | 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 6e 61 6d 65 29 29 0a 20 20 20 | e)))..............filename)).... |
| 2c160 | 20 20 20 20 20 20 20 28 74 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 | .......(t.(expand-file-name."cov |
| 2c180 | 65 72 2e 6a 70 67 22 20 63 61 6c 69 62 72 65 64 62 2d 69 6d 61 67 65 73 2d 70 61 74 68 29 29 29 | er.jpg".calibredb-images-path))) |
| 2c1a0 | 29 29 20 3b 72 65 74 75 72 6e 20 74 68 65 20 64 65 66 61 75 6c 74 20 69 6d 61 67 65 0a 0a 28 64 | )).;return.the.default.image..(d |
| 2c1c0 | 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 28 70 61 74 | efun.calibredb-insert-image.(pat |
| 2c1e0 | 68 20 61 6c 74 20 77 69 64 74 68 20 68 65 69 67 68 74 29 0a 20 20 22 49 6e 73 65 72 74 20 61 6e | h.alt.width.height)..."Insert.an |
| 2c200 | 20 69 6d 61 67 65 20 66 6f 72 20 50 41 54 48 20 61 74 20 70 6f 69 6e 74 20 77 69 74 68 20 6d 61 | .image.for.PATH.at.point.with.ma |
| 2c220 | 78 20 57 49 44 54 48 20 61 6e 64 20 6d 61 78 20 48 45 49 47 54 48 2c 20 66 61 6c 6c 69 6e 67 20 | x.WIDTH.and.max.HEIGTH,.falling. |
| 2c240 | 62 61 63 6b 20 74 6f 20 41 4c 54 2e 22 0a 20 20 28 63 6f 6e 64 0a 20 20 20 28 28 6e 6f 74 20 28 | back.to.ALT."...(cond....((not.( |
| 2c260 | 64 69 73 70 6c 61 79 2d 67 72 61 70 68 69 63 2d 70 29 29 0a 20 20 20 20 28 69 6e 73 65 72 74 20 | display-graphic-p)).....(insert. |
| 2c280 | 61 6c 74 29 29 0a 20 20 20 28 28 66 62 6f 75 6e 64 70 20 27 69 6d 61 67 65 6d 61 67 69 63 6b 2d | alt))....((fboundp.'imagemagick- |
| 2c2a0 | 74 79 70 65 73 29 0a 20 20 20 20 28 69 6e 73 65 72 74 2d 69 6d 61 67 65 0a 20 20 20 20 20 28 63 | types).....(insert-image......(c |
| 2c2c0 | 72 65 61 74 65 2d 69 6d 61 67 65 20 70 61 74 68 20 27 69 6d 61 67 65 6d 61 67 69 63 6b 20 6e 69 | reate-image.path.'imagemagick.ni |
| 2c2e0 | 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 73 63 65 6e 74 20 31 30 30 | l....................:ascent.100 |
| 2c300 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6d 61 78 2d 77 69 64 74 68 20 77 | ....................:max-width.w |
| 2c320 | 69 64 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6d 61 78 2d 68 65 69 | idth....................:max-hei |
| 2c340 | 67 68 74 20 68 65 69 67 68 74 29 29 29 0a 20 20 20 28 74 0a 20 20 20 20 3b 3b 20 65 6d 61 63 73 | ght.height)))....(t.....;;.emacs |
| 2c360 | 20 32 37 2e 31 0a 20 20 20 20 28 6c 65 74 20 28 28 69 6d 61 67 65 20 28 69 67 6e 6f 72 65 2d 65 | .27.1.....(let.((image.(ignore-e |
| 2c380 | 72 72 6f 72 73 20 28 63 72 65 61 74 65 2d 69 6d 61 67 65 20 70 61 74 68 20 6e 69 6c 20 6e 69 6c | rrors.(create-image.path.nil.nil |
| 2c3a0 | 20 3a 77 69 64 74 68 20 77 69 64 74 68 20 3a 68 65 69 67 68 74 20 6e 69 6c 29 29 29 29 0a 20 20 | .:width.width.:height.nil))))... |
| 2c3c0 | 20 20 20 20 28 69 66 20 69 6d 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d | ....(if.image...........(insert- |
| 2c3e0 | 69 6d 61 67 65 20 69 6d 61 67 65 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 61 6c 74 | image.image).........(insert.alt |
| 2c400 | 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 | ))))))..(defun.calibredb-find-fi |
| 2c420 | 6c 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 20 61 72 67 29 0a 20 20 22 | le.(&optional.candidate.arg)..." |
| 2c440 | 4f 70 65 6e 20 66 69 6c 65 20 6f 66 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 69 74 65 6d 2e 0a | Open.file.of.the.selected.item.. |
| 2c460 | 49 66 20 74 68 65 20 75 6e 69 76 65 72 73 61 6c 20 70 72 65 66 69 78 20 41 52 47 20 69 73 20 75 | If.the.universal.prefix.ARG.is.u |
| 2c480 | 73 65 64 2c 20 69 67 6e 6f 72 65 20 60 63 61 6c 69 62 72 65 64 62 2d 70 72 65 66 65 72 72 65 64 | sed,.ignore.`calibredb-preferred |
| 2c4a0 | 2d 66 6f 72 6d 61 74 27 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 43 41 4e 44 | -format'..Optional.argument.CAND |
| 2c4c0 | 49 44 41 54 45 20 69 73 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 69 74 65 6d 2e 22 0a 20 20 28 | IDATE.is.the.selected.item."...( |
| 2c4e0 | 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c 69 73 74 20 28 63 61 72 20 28 63 61 6c 69 62 | interactive....(list.(car.(calib |
| 2c500 | 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 0a 20 | redb-find-candidate-at-point)).. |
| 2c520 | 20 20 20 20 20 20 20 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 | ........current-prefix-arg))...( |
| 2c540 | 6c 65 74 20 28 28 66 69 6c 65 20 28 69 66 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 | let.((file.(if.current-prefix-ar |
| 2c560 | 67 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 28 63 61 6c 69 62 | g...................(let.((calib |
| 2c580 | 72 65 64 62 2d 70 72 65 66 65 72 72 65 64 2d 66 6f 72 6d 61 74 20 6e 69 6c 29 29 0a 20 20 20 20 | redb-preferred-format.nil))..... |
| 2c5a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 | ................(calibredb-get-f |
| 2c5c0 | 69 6c 65 2d 70 61 74 68 20 63 61 6e 64 69 64 61 74 65 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 | ile-path.candidate.t)).......... |
| 2c5e0 | 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 | .......(calibredb-get-file-path. |
| 2c600 | 63 61 6e 64 69 64 61 74 65 20 74 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 73 2d 63 6f | candidate.t)))).....(cond.((s-co |
| 2c620 | 6e 74 61 69 6e 73 3f 20 22 68 74 74 70 22 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ntains?."http".file)............ |
| 2c640 | 28 6c 65 74 20 28 28 75 72 6c 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 | (let.((url.(calibredb-getattr.ca |
| 2c660 | 6e 64 69 64 61 74 65 20 3a 66 69 6c 65 2d 70 61 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ndidate.:file-path))............ |
| 2c680 | 20 20 20 20 20 20 28 74 69 74 6c 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 | ......(title.(calibredb-getattr. |
| 2c6a0 | 63 61 6e 64 69 64 61 74 65 20 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 29 0a 20 20 20 20 20 20 20 20 | candidate.:book-title))......... |
| 2c6c0 | 20 20 20 20 20 20 20 20 20 28 74 79 70 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 | .........(type.(calibredb-getatt |
| 2c6e0 | 72 20 63 61 6e 64 69 64 61 74 65 20 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 29 0a 20 20 20 20 | r.candidate.:book-format)))..... |
| 2c700 | 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 2d 65 71 75 61 6c 73 2d 70 20 74 69 74 6c 65 20 22 | .........(if.(s-equals-p.title." |
| 2c720 | 73 65 61 72 63 68 22 29 20 3b 20 54 4f 44 4f 3a 20 57 6f 72 6b 61 72 6f 75 6e 64 2c 20 6e 6f 77 | search").;.TODO:.Workaround,.now |
| 2c740 | 20 69 74 20 6f 6e 6c 79 20 77 6f 72 6b 73 20 77 69 74 68 20 63 61 6c 69 62 72 65 2d 77 65 62 0a | .it.only.works.with.calibre-web. |
| 2c760 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 | .................(calibredb-opds |
| 2c780 | 2d 73 65 61 72 63 68 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 29 0a 20 20 20 20 | -search.calibredb-root-dir)..... |
| 2c7a0 | 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 75 72 6c 29 0a 20 20 20 20 20 20 20 | ...........(message.url)........ |
| 2c7c0 | 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 74 79 70 65 29 0a 20 20 20 20 20 20 20 20 20 | ........(message.type).......... |
| 2c7e0 | 20 20 20 20 20 20 28 6c 65 74 20 28 28 6c 69 62 72 61 72 79 20 28 2d 66 69 72 73 74 20 28 6c 61 | ......(let.((library.(-first.(la |
| 2c800 | 6d 62 64 61 20 28 6c 69 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mbda.(lib)...................... |
| 2c820 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 2d 63 6f 6e 74 61 69 6e 73 3f 20 | ...................(s-contains?. |
| 2c840 | 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 28 63 61 72 20 6c 69 62 29 29 20 | (file-name-directory.(car.lib)). |
| 2c860 | 75 72 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | url))........................... |
| 2c880 | 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 61 72 79 2d 61 6c | ............calibredb-library-al |
| 2c8a0 | 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 63 61 6c | ist)))..................(if.(cal |
| 2c8c0 | 69 62 72 65 64 62 2d 6f 70 64 73 2d 6d 61 69 6c 63 61 70 2d 6d 69 6d 65 2d 74 6f 2d 65 78 74 6e | ibredb-opds-mailcap-mime-to-extn |
| 2c8e0 | 20 74 79 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c | .type)......................(cal |
| 2c900 | 69 62 72 65 64 62 2d 6f 70 64 73 2d 64 6f 77 6e 6c 6f 61 64 20 74 69 74 6c 65 20 75 72 6c 20 28 | ibredb-opds-download.title.url.( |
| 2c920 | 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 6d 61 69 6c 63 61 70 2d 6d 69 6d 65 2d 74 6f 2d 65 | calibredb-opds-mailcap-mime-to-e |
| 2c940 | 78 74 6e 20 74 79 70 65 29 20 28 6e 74 68 20 31 20 6c 69 62 72 61 72 79 29 20 28 6e 74 68 20 32 | xtn.type).(nth.1.library).(nth.2 |
| 2c960 | 20 6c 69 62 72 61 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 | .library))....................(c |
| 2c980 | 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 2d 72 65 71 75 65 73 74 2d 70 61 67 65 20 75 72 6c 20 28 | alibredb-opds-request-page.url.( |
| 2c9a0 | 6e 74 68 20 31 20 6c 69 62 72 61 72 79 29 20 28 6e 74 68 20 32 20 6c 69 62 72 61 72 79 29 29 29 | nth.1.library).(nth.2.library))) |
| 2c9c0 | 29 29 29 20 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 73 2d 65 71 75 61 6c 73 3f 20 22 22 20 66 | ))).)...........((s-equals?."".f |
| 2c9e0 | 69 6c 65 29 20 28 6d 65 73 73 61 67 65 20 22 4e 6f 20 66 69 6c 65 73 2e 22 29 29 0a 20 20 20 20 | ile).(message."No.files."))..... |
| 2ca00 | 20 20 20 20 20 20 28 74 20 28 66 69 6e 64 2d 66 69 6c 65 20 66 69 6c 65 29 29 29 29 29 0a 0a 28 | ......(t.(find-file.file)))))..( |
| 2ca20 | 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d | defun.calibredb-find-file-other- |
| 2ca40 | 66 72 61 6d 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 20 61 72 67 29 0a | frame.(&optional.candidate.arg). |
| 2ca60 | 20 20 22 4f 70 65 6e 20 66 69 6c 65 20 69 6e 20 6f 74 68 65 72 20 66 72 61 6d 65 20 6f 66 20 74 | .."Open.file.in.other.frame.of.t |
| 2ca80 | 68 65 20 73 65 6c 65 63 74 65 64 20 69 74 65 6d 2e 0a 49 66 20 74 68 65 20 75 6e 69 76 65 72 73 | he.selected.item..If.the.univers |
| 2caa0 | 61 6c 20 70 72 65 66 69 78 20 41 52 47 20 69 73 20 75 73 65 64 2c 20 69 67 6e 6f 72 65 20 60 63 | al.prefix.ARG.is.used,.ignore.`c |
| 2cac0 | 61 6c 69 62 72 65 64 62 2d 70 72 65 66 65 72 72 65 64 2d 66 6f 72 6d 61 74 27 2e 0a 4f 70 74 69 | alibredb-preferred-format'..Opti |
| 2cae0 | 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 43 41 4e 44 49 44 41 54 45 20 69 73 20 74 68 65 20 73 | onal.argument.CANDIDATE.is.the.s |
| 2cb00 | 65 6c 65 63 74 65 64 20 69 74 65 6d 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 | elected.item."...(interactive... |
| 2cb20 | 20 28 6c 69 73 74 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 | .(list.(car.(calibredb-find-cand |
| 2cb40 | 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 63 75 72 72 65 6e | idate-at-point))..........curren |
| 2cb60 | 74 2d 70 72 65 66 69 78 2d 61 72 67 29 29 0a 20 20 28 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 | t-prefix-arg))...(find-file-othe |
| 2cb80 | 72 2d 66 72 61 6d 65 20 28 69 66 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 0a 20 | r-frame.(if.current-prefix-arg.. |
| 2cba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 | ............................(let |
| 2cbc0 | 20 28 28 63 61 6c 69 62 72 65 64 62 2d 70 72 65 66 65 72 72 65 64 2d 66 6f 72 6d 61 74 20 6e 69 | .((calibredb-preferred-format.ni |
| 2cbe0 | 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | l))............................. |
| 2cc00 | 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 63 61 6e 64 | ...(calibredb-get-file-path.cand |
| 2cc20 | 69 64 61 74 65 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | idate.t))....................... |
| 2cc40 | 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 | .......(calibredb-get-file-path. |
| 2cc60 | 63 61 6e 64 69 64 61 74 65 20 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 | candidate.t))))..(defun.calibred |
| 2cc80 | 62 2d 6f 70 65 6e 2d 66 69 6c 65 2d 77 69 74 68 2d 64 65 66 61 75 6c 74 2d 74 6f 6f 6c 20 28 26 | b-open-file-with-default-tool.(& |
| 2cca0 | 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 20 61 72 67 29 0a 20 20 22 4f 70 65 6e 20 | optional.candidate.arg)..."Open. |
| 2ccc0 | 66 69 6c 65 20 77 69 74 68 20 74 68 65 20 73 79 73 74 65 6d 20 64 65 66 61 75 6c 74 20 74 6f 6f | file.with.the.system.default.too |
| 2cce0 | 6c 2e 0a 49 66 20 74 68 65 20 75 6e 69 76 65 72 73 61 6c 20 70 72 65 66 69 78 20 41 52 47 20 69 | l..If.the.universal.prefix.ARG.i |
| 2cd00 | 73 20 75 73 65 64 2c 20 69 67 6e 6f 72 65 20 60 63 61 6c 69 62 72 65 64 62 2d 70 72 65 66 65 72 | s.used,.ignore.`calibredb-prefer |
| 2cd20 | 72 65 64 2d 66 6f 72 6d 61 74 27 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 43 | red-format'..Optional.argument.C |
| 2cd40 | 41 4e 44 49 44 41 54 45 20 69 73 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 69 74 65 6d 2e 22 0a | ANDIDATE.is.the.selected.item.". |
| 2cd60 | 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 63 61 72 20 28 63 61 | ..(interactive....(list.(car.(ca |
| 2cd80 | 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 | libredb-find-candidate-at-point) |
| 2cda0 | 29 0a 20 20 20 20 20 20 20 20 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 29 29 0a | )..........current-prefix-arg)). |
| 2cdc0 | 20 20 28 69 66 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 0a 20 20 20 20 20 20 28 | ..(if.current-prefix-arg.......( |
| 2cde0 | 6c 65 74 20 28 28 63 61 6c 69 62 72 65 64 62 2d 70 72 65 66 65 72 72 65 64 2d 66 6f 72 6d 61 74 | let.((calibredb-preferred-format |
| 2ce00 | 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 77 | .nil)).........(calibredb-open-w |
| 2ce20 | 69 74 68 2d 64 65 66 61 75 6c 74 2d 74 6f 6f 6c 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d | ith-default-tool.(calibredb-get- |
| 2ce40 | 66 69 6c 65 2d 70 61 74 68 20 63 61 6e 64 69 64 61 74 65 20 74 29 29 29 0a 20 20 20 20 28 63 61 | file-path.candidate.t))).....(ca |
| 2ce60 | 6c 69 62 72 65 64 62 2d 6f 70 65 6e 2d 77 69 74 68 2d 64 65 66 61 75 6c 74 2d 74 6f 6f 6c 20 28 | libredb-open-with-default-tool.( |
| 2ce80 | 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 63 61 6e 64 69 64 61 74 | calibredb-get-file-path.candidat |
| 2cea0 | 65 20 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 71 75 69 63 6b 2d | e.t))))..(defun.calibredb-quick- |
| 2cec0 | 6c 6f 6f 6b 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 20 61 72 67 29 0a 20 | look.(&optional.candidate.arg).. |
| 2cee0 | 20 22 51 75 69 63 6b 20 74 68 65 20 66 69 6c 65 20 77 69 74 68 20 74 68 65 20 71 6c 6d 61 6e 61 | ."Quick.the.file.with.the.qlmana |
| 2cf00 | 67 65 2c 20 62 75 74 20 69 74 20 6f 6e 6c 79 20 53 75 70 70 6f 72 74 20 6d 61 63 4f 53 2e 0a 49 | ge,.but.it.only.Support.macOS..I |
| 2cf20 | 66 20 74 68 65 20 75 6e 69 76 65 72 73 61 6c 20 70 72 65 66 69 78 20 41 52 47 20 69 73 20 75 73 | f.the.universal.prefix.ARG.is.us |
| 2cf40 | 65 64 2c 20 69 67 6e 6f 72 65 20 60 63 61 6c 69 62 72 65 64 62 2d 70 72 65 66 65 72 72 65 64 2d | ed,.ignore.`calibredb-preferred- |
| 2cf60 | 66 6f 72 6d 61 74 27 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 43 41 4e 44 49 | format'..Optional.argument.CANDI |
| 2cf80 | 44 41 54 45 20 69 73 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 69 74 65 6d 2e 22 0a 20 20 28 69 | DATE.is.the.selected.item."...(i |
| 2cfa0 | 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c 69 73 74 20 28 63 61 72 20 28 63 61 6c 69 62 72 | nteractive....(list.(car.(calibr |
| 2cfc0 | 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 0a 20 20 | edb-find-candidate-at-point))... |
| 2cfe0 | 20 20 20 20 20 20 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 6c | .......current-prefix-arg))...(l |
| 2d000 | 65 74 20 28 28 66 69 6c 65 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 0a | et.((file.(shell-quote-argument. |
| 2d020 | 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 6e 61 6d 65 | ...............(expand-file-name |
| 2d040 | 20 28 69 66 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 0a 20 20 20 20 20 20 20 20 | .(if.current-prefix-arg......... |
| 2d060 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 | .............................(le |
| 2d080 | 74 20 28 28 63 61 6c 69 62 72 65 64 62 2d 70 72 65 66 65 72 72 65 64 2d 66 6f 72 6d 61 74 20 6e | t.((calibredb-preferred-format.n |
| 2d0a0 | 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | il))............................ |
| 2d0c0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d | ............(calibredb-get-file- |
| 2d0e0 | 70 61 74 68 20 63 61 6e 64 69 64 61 74 65 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | path.candidate.t)).............. |
| 2d100 | 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 6c 69 62 72 65 64 62 | ......................(calibredb |
| 2d120 | 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 63 61 6e 64 69 64 61 74 65 20 74 29 29 29 29 29 29 | -get-file-path.candidate.t)))))) |
| 2d140 | 0a 20 20 20 20 28 69 66 20 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 64 61 72 77 69 6e | .....(if.(eq.system-type.'darwin |
| 2d160 | 29 0a 20 20 20 20 20 20 20 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 2d 73 68 65 6c 6c 2d 63 6f | ).........(call-process-shell-co |
| 2d180 | 6d 6d 61 6e 64 20 28 63 6f 6e 63 61 74 20 22 71 6c 6d 61 6e 61 67 65 20 2d 70 20 22 20 66 69 6c | mmand.(concat."qlmanage.-p.".fil |
| 2d1a0 | 65 29 20 6e 69 6c 20 30 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 54 68 69 73 20 66 | e).nil.0).......(message."This.f |
| 2d1c0 | 65 61 74 75 72 65 20 6f 6e 6c 79 20 73 75 70 70 6f 72 74 73 20 6d 61 63 4f 53 2e 22 29 29 29 29 | eature.only.supports.macOS.")))) |
| 2d1e0 | 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 72 65 61 64 2d 6d 65 74 61 64 61 74 61 | ..(defun.calibredb-read-metadata |
| 2d200 | 73 20 28 66 69 65 6c 64 20 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 | s.(field.&optional.candidate)... |
| 2d220 | 22 52 65 61 64 20 6d 65 74 61 64 61 74 61 2e 0a 41 72 67 75 6d 65 6e 74 20 46 49 45 4c 44 20 69 | "Read.metadata..Argument.FIELD.i |
| 2d240 | 73 20 74 68 65 20 66 69 65 6c 64 20 74 6f 20 72 65 61 64 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 | s.the.field.to.read..Optional.ar |
| 2d260 | 67 75 6d 65 6e 74 20 43 41 4e 44 49 44 41 54 45 20 69 73 20 63 61 6e 64 69 64 61 74 65 20 74 6f | gument.CANDIDATE.is.candidate.to |
| 2d280 | 20 72 65 61 64 2e 22 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 29 29 0a 20 20 20 20 28 69 66 20 | .read."...(let.((cand)).....(if. |
| 2d2a0 | 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 | (eq.major-mode.'calibredb-search |
| 2d2c0 | 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 63 61 6e 64 69 64 61 74 65 0a 20 20 20 | -mode).........(if.candidate.... |
| 2d2e0 | 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 20 63 61 6e 64 69 64 61 74 65 29 0a 20 | .........(setq.cand.candidate).. |
| 2d300 | 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 20 28 63 64 72 20 28 67 65 74 2d 74 65 | .........(setq.cand.(cdr.(get-te |
| 2d320 | 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 | xt-property.(point).'calibredb-e |
| 2d340 | 6e 74 72 79 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 63 61 6e 64 69 64 61 74 65 | ntry.nil)))).......(if.candidate |
| 2d360 | 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 20 63 61 6e 64 69 64 61 74 65 29 | ...........(setq.cand.candidate) |
| 2d380 | 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 20 28 67 65 74 2d 74 65 78 74 2d 70 72 | .........(setq.cand.(get-text-pr |
| 2d3a0 | 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e | operty.(point-min).'calibredb-en |
| 2d3c0 | 74 72 79 20 6e 69 6c 29 29 20 29 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d | try.nil)).)).....(calibredb-get- |
| 2d3e0 | 69 6e 69 74 20 66 69 65 6c 64 20 63 61 6e 64 29 29 29 0a 0a 3b 3b 20 6f 72 67 2d 63 61 70 74 75 | init.field.cand)))..;;.org-captu |
| 2d400 | 72 65 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 61 70 74 75 72 65 2d 61 74 2d | re..(defun.calibredb-capture-at- |
| 2d420 | 70 6f 69 6e 74 20 28 29 0a 20 20 22 54 4f 44 4f 3a 20 6f 72 67 20 63 61 70 74 75 72 65 20 74 68 | point.()..."TODO:.org.capture.th |
| 2d440 | 65 20 63 75 72 72 65 6e 74 20 69 74 65 6d 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 | e.current.item."...(interactive) |
| 2d460 | 0a 20 20 28 6c 65 74 20 28 63 61 70 74 75 72 65 2d 70 61 74 68 20 63 61 70 74 75 72 65 2d 74 69 | ...(let.(capture-path.capture-ti |
| 2d480 | 74 6c 65 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 28 63 | tle).....(with-current-buffer.(c |
| 2d4a0 | 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 29 0a 20 20 | alibredb-search--buffer-name)... |
| 2d4c0 | 20 20 20 20 28 6c 65 74 20 28 28 63 61 6e 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 | ....(let.((candidates.(calibredb |
| 2d4e0 | 2d 66 69 6e 64 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 73 29 29 29 0a 20 20 20 20 20 | -find-marked-candidates)))...... |
| 2d500 | 20 20 20 28 75 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 20 | ...(unless.candidates........... |
| 2d520 | 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 | (setq.candidates.(calibredb-find |
| 2d540 | 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 | -candidate-at-point))).........( |
| 2d560 | 64 6f 6c 69 73 74 20 28 63 61 6e 64 20 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 | dolist.(cand.candidates)........ |
| 2d580 | 20 20 20 28 6c 65 74 20 28 28 70 61 74 68 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 | ...(let.((path.(calibredb-get-fi |
| 2d5a0 | 6c 65 2d 70 61 74 68 20 63 61 6e 64 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | le-path.cand.t))................ |
| 2d5c0 | 20 28 74 69 74 6c 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 | .(title.(calibredb-getattr.cand. |
| 2d5e0 | 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 | :book-title))).............(setq |
| 2d600 | 20 63 61 70 74 75 72 65 2d 70 61 74 68 20 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .capture-path.path)............. |
| 2d620 | 28 73 65 74 71 20 63 61 70 74 75 72 65 2d 74 69 74 6c 65 20 74 69 74 6c 65 29 29 29 29 29 0a 20 | (setq.capture-title.title))))).. |
| 2d640 | 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 20 28 69 6e 73 65 72 74 20 22 2a 20 | ...(with-temp-buffer.(insert."*. |
| 2d660 | 54 4f 44 4f 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 | TODO.").......................(i |
| 2d680 | 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 5b 5b 66 69 6c 65 3a 25 73 5d 5b 25 73 5d 5d 22 20 | nsert.(format."[[file:%s][%s]]". |
| 2d6a0 | 63 61 70 74 75 72 65 2d 70 61 74 68 20 63 61 70 74 75 72 65 2d 74 69 74 6c 65 29 29 0a 20 20 20 | capture-path.capture-title)).... |
| 2d6c0 | 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 74 72 69 6e | ...................(buffer-strin |
| 2d6e0 | 67 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 61 64 64 20 28 61 72 67 | g))))..(defun.calibredb-add.(arg |
| 2d700 | 29 0a 20 20 22 41 64 64 20 66 69 6c 65 28 73 29 20 69 6e 74 6f 20 63 61 6c 69 62 72 65 64 62 2e | )..."Add.file(s).into.calibredb. |
| 2d720 | 0a 57 69 74 68 20 69 76 79 2d 6d 6f 64 65 3a 20 41 64 64 20 6d 61 72 6b 65 64 20 69 74 65 6d 73 | .With.ivy-mode:.Add.marked.items |
| 2d740 | 2e 0a 4f 74 68 65 72 73 3a 20 41 64 64 20 6f 6e 6c 79 20 6f 6e 65 20 69 74 65 6d 2e 0a 49 66 20 | ..Others:.Add.only.one.item..If. |
| 2d760 | 70 72 65 66 69 78 20 41 52 47 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 6b 65 65 70 20 74 68 65 20 | prefix.ARG.is.non-nil,.keep.the. |
| 2d780 | 66 69 6c 65 73 20 61 66 74 65 72 20 61 64 64 69 6e 67 20 77 69 74 68 6f 75 74 20 70 72 6f 6d 70 | files.after.adding.without.promp |
| 2d7a0 | 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 63 6f 6e 64 20 | t."...(interactive."P")...(cond. |
| 2d7c0 | 28 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 27 69 76 79 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 | ((and.(boundp.'ivy-mode)........ |
| 2d7e0 | 20 20 20 20 20 20 20 69 76 79 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 | .......ivy-mode...............(f |
| 2d800 | 62 6f 75 6e 64 70 20 27 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 31 29 29 0a 20 | boundp.'counsel--find-file-1)).. |
| 2d820 | 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 31 0a 20 20 | ........(counsel--find-file-1... |
| 2d840 | 20 20 20 20 20 20 20 20 22 41 64 64 20 66 69 6c 65 28 73 29 20 74 6f 20 63 61 6c 69 62 72 65 3a | ........"Add.file(s).to.calibre: |
| 2d860 | 20 22 20 63 61 6c 69 62 72 65 64 62 2d 64 6f 77 6e 6c 6f 61 64 2d 64 69 72 0a 20 20 20 20 20 20 | .".calibredb-download-dir....... |
| 2d880 | 20 20 20 20 28 6c 61 6d 62 64 61 20 28 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 | ....(lambda.(file).............( |
| 2d8a0 | 63 61 6c 69 62 72 65 64 62 2d 63 6f 75 6e 73 65 6c 2d 61 64 64 2d 66 69 6c 65 2d 61 63 74 69 6f | calibredb-counsel-add-file-actio |
| 2d8c0 | 6e 20 61 72 67 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 27 63 61 6c 69 62 72 65 64 | n.arg.file))...........'calibred |
| 2d8e0 | 62 2d 61 64 64 29 29 0a 20 20 20 20 20 20 20 20 28 74 20 28 6c 65 74 20 28 28 66 69 6c 65 20 28 | b-add)).........(t.(let.((file.( |
| 2d900 | 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 41 64 64 20 61 20 66 69 6c 65 20 74 6f 20 43 61 | read-file-name."Add.a.file.to.Ca |
| 2d920 | 6c 69 62 72 65 3a 20 22 20 63 61 6c 69 62 72 65 64 62 2d 64 6f 77 6e 6c 6f 61 64 2d 64 69 72 29 | libre:.".calibredb-download-dir) |
| 2d940 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 75 6e 73 | ))..............(calibredb-couns |
| 2d960 | 65 6c 2d 61 64 64 2d 66 69 6c 65 2d 61 63 74 69 6f 6e 20 61 72 67 20 66 69 6c 65 29 29 29 29 0a | el-add-file-action.arg.file)))). |
| 2d980 | 20 20 28 69 66 20 28 65 71 75 61 6c 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 | ..(if.(equal.major-mode.'calibre |
| 2d9a0 | 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 | db-search-mode).......(calibredb |
| 2d9c0 | 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 29 29 0a 0a 28 64 | -search-refresh-or-resume)))..(d |
| 2d9e0 | 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 61 64 64 2d 66 6f 72 6d 61 74 20 28 26 6f 70 74 69 | efun.calibredb-add-format.(&opti |
| 2da00 | 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 41 64 64 20 66 6f 72 6d 61 74 20 74 6f | onal.candidate)..."Add.format.to |
| 2da20 | 20 73 65 6c 65 63 74 65 64 20 69 74 65 6d 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e | .selected.item..Optional.argumen |
| 2da40 | 74 20 43 41 4e 44 49 44 41 54 45 20 69 73 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 69 74 65 6d | t.CANDIDATE.is.the.selected.item |
| 2da60 | 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 63 61 6e | ."...(interactive)...(unless.can |
| 2da80 | 64 69 64 61 74 65 0a 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 20 28 63 61 72 20 | didate.....(setq.candidate.(car. |
| 2daa0 | 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 | (calibredb-find-candidate-at-poi |
| 2dac0 | 6e 74 29 29 29 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 61 6e 64 20 3a 63 6f 6d | nt))))...(calibredb-command.:com |
| 2dae0 | 6d 61 6e 64 20 22 61 64 64 5f 66 6f 72 6d 61 74 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mand."add_format"............... |
| 2db00 | 20 20 20 20 20 20 20 3a 69 6e 70 75 74 20 28 63 6f 6e 63 61 74 20 28 63 61 6c 69 62 72 65 64 62 | .......:input.(concat.(calibredb |
| 2db20 | 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 3a 69 64 29 20 22 20 22 20 28 63 61 6c | -getattr.candidate.:id).".".(cal |
| 2db40 | 69 62 72 65 64 62 2d 63 6f 6d 70 6c 65 74 65 2d 66 69 6c 65 2d 71 75 6f 74 65 20 22 41 64 64 20 | ibredb-complete-file-quote."Add. |
| 2db60 | 66 6f 72 6d 61 74 20 74 6f 20 73 65 6c 65 63 74 65 64 20 69 74 65 6d 22 29 20 29 0a 20 20 20 20 | format.to.selected.item").)..... |
| 2db80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d 61 | .................:library.(forma |
| 2dba0 | 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 20 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 | t."--library-path.%s".(calibredb |
| 2dbc0 | 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 29 29 0a 20 20 28 69 66 20 28 65 71 75 61 6c 20 | -root-dir-quote)))...(if.(equal. |
| 2dbe0 | 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 | major-mode.'calibredb-search-mod |
| 2dc00 | 65 29 0a 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 | e).......(calibredb-search-refre |
| 2dc20 | 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 | sh-or-resume)))..(defun.calibred |
| 2dc40 | 62 2d 61 64 64 2d 64 69 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6f 70 74 69 6f 6e 29 0a 20 20 22 | b-add-dir.(&optional.option)..." |
| 2dc60 | 41 64 64 20 61 6c 6c 20 66 69 6c 65 73 20 69 6e 20 61 20 64 69 72 65 63 74 6f 72 79 20 69 6e 74 | Add.all.files.in.a.directory.int |
| 2dc80 | 6f 20 63 61 6c 69 62 72 65 20 64 61 74 61 62 61 73 65 2e 0a 42 79 20 64 65 66 61 75 6c 74 20 6f | o.calibre.database..By.default.o |
| 2dca0 | 6e 6c 79 20 66 69 6c 65 73 20 74 68 61 74 20 68 61 76 65 20 65 78 74 65 6e 73 69 6f 6e 73 20 6f | nly.files.that.have.extensions.o |
| 2dcc0 | 66 20 6b 6e 6f 77 6e 20 65 2d 62 6f 6f 6b 20 66 69 6c 65 0a 74 79 70 65 73 20 61 72 65 20 61 64 | f.known.e-book.file.types.are.ad |
| 2dce0 | 64 65 64 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 4f 50 54 49 4f 4e 20 69 73 | ded..Optional.argument.OPTION.is |
| 2dd00 | 20 61 64 64 69 74 69 6f 6e 61 6c 20 6f 70 74 69 6f 6e 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 | .additional.options."...(interac |
| 2dd20 | 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 61 6e 64 20 3a 63 6f 6d 6d | tive)...(calibredb-command.:comm |
| 2dd40 | 61 6e 64 20 22 61 64 64 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a | and."add"......................: |
| 2dd60 | 69 6e 70 75 74 20 28 66 6f 72 6d 61 74 20 22 2d 2d 61 64 64 20 25 73 22 20 28 63 6f 6e 63 61 74 | input.(format."--add.%s".(concat |
| 2dd80 | 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 28 63 61 6c 69 62 72 | .(file-name-as-directory.(calibr |
| 2dda0 | 65 64 62 2d 63 6f 6d 70 6c 65 74 65 2d 64 69 72 65 63 74 6f 72 79 2d 71 75 6f 74 65 20 22 41 64 | edb-complete-directory-quote."Ad |
| 2ddc0 | 64 20 61 20 64 69 72 65 63 74 6f 72 79 20 74 6f 20 43 61 6c 69 62 72 65 22 29 29 20 22 2a 22 29 | d.a.directory.to.Calibre"))."*") |
| 2dde0 | 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 70 74 69 6f 6e 20 28 | )......................:option.( |
| 2de00 | 6f 72 20 6f 70 74 69 6f 6e 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | or.option."")................... |
| 2de20 | 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 | ...:library.(format."--library-p |
| 2de40 | 61 74 68 20 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 | ath.%s".(calibredb-root-dir-quot |
| 2de60 | 65 29 29 29 0a 20 20 28 69 66 20 28 65 71 75 61 6c 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 | e)))...(if.(equal.major-mode.'ca |
| 2de80 | 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 63 61 6c 69 | libredb-search-mode).......(cali |
| 2dea0 | 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 29 | bredb-search-refresh-or-resume)) |
| 2dec0 | 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 6c 6f 6e 65 20 28 29 0a 20 20 22 | )..(defun.calibredb-clone.()..." |
| 2dee0 | 43 72 65 61 74 65 20 61 20 63 6c 6f 6e 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 | Create.a.clone.of.the.current.li |
| 2df00 | 62 72 61 72 79 2e 0a 54 68 69 73 20 63 72 65 61 74 65 73 20 61 20 6e 65 77 2c 20 65 6d 70 74 79 | brary..This.creates.a.new,.empty |
| 2df20 | 20 6c 69 62 72 61 72 79 20 74 68 61 74 20 68 61 73 20 61 6c 6c 20 74 68 65 20 73 61 6d 65 20 63 | .library.that.has.all.the.same.c |
| 2df40 | 75 73 74 6f 6d 0a 63 6f 6c 75 6d 6e 73 2c 20 56 69 72 74 75 61 6c 20 6c 69 62 72 61 72 69 65 73 | ustom.columns,.Virtual.libraries |
| 2df60 | 20 61 6e 64 20 6f 74 68 65 72 20 73 65 74 74 69 6e 67 73 20 61 73 20 74 68 65 20 63 75 72 72 65 | .and.other.settings.as.the.curre |
| 2df80 | 6e 74 0a 6c 69 62 72 61 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 | nt.library."...(interactive)...( |
| 2dfa0 | 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 61 6e 64 20 3a 63 6f 6d 6d 61 6e 64 20 22 63 6c 6f 6e | calibredb-command.:command."clon |
| 2dfc0 | 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 70 75 74 20 28 | e"......................:input.( |
| 2dfe0 | 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 70 6c 65 74 65 2d 66 69 6c 65 2d 71 75 6f 74 65 20 22 43 | calibredb-complete-file-quote."C |
| 2e000 | 6c 6f 6e 65 20 6c 69 62 61 72 79 20 74 6f 20 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 | lone.libary.to.")))..(defun.cali |
| 2e020 | 62 72 65 64 62 2d 63 6f 6d 70 6c 65 74 65 2d 66 69 6c 65 2d 71 75 6f 74 65 20 28 26 6f 70 74 69 | bredb-complete-file-quote.(&opti |
| 2e040 | 6f 6e 61 6c 20 61 72 67 20 26 72 65 73 74 20 72 65 73 74 29 0a 20 20 22 47 65 74 20 71 75 6f 74 | onal.arg.&rest.rest)..."Get.quot |
| 2e060 | 65 64 20 66 69 6c 65 20 6e 61 6d 65 20 75 73 69 6e 67 20 63 6f 6d 70 6c 65 74 69 6f 6e 2e 0a 4f | ed.file.name.using.completion..O |
| 2e080 | 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 41 52 47 20 69 73 20 74 68 65 20 70 72 6f 6d | ptional.argument.ARG.is.the.prom |
| 2e0a0 | 70 74 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 52 45 53 54 20 69 73 20 74 68 | pt..Optional.argument.REST.is.th |
| 2e0c0 | 65 20 72 65 73 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 66 69 6c 65 20 28 72 65 61 64 2d 66 69 6c | e.rest."...(let.((file.(read-fil |
| 2e0e0 | 65 2d 6e 61 6d 65 20 28 66 6f 72 6d 61 74 20 22 25 73 3a 20 22 20 61 72 67 29 20 28 70 6f 70 20 | e-name.(format."%s:.".arg).(pop. |
| 2e100 | 72 65 73 74 29 29 29 29 0a 20 20 20 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 | rest)))).....(shell-quote-argume |
| 2e120 | 6e 74 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 29 29 29 29 0a 0a 28 | nt.(expand-file-name.file))))..( |
| 2e140 | 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 70 6c 65 74 65 2d 64 69 72 65 63 74 6f | defun.calibredb-complete-directo |
| 2e160 | 72 79 2d 71 75 6f 74 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 20 26 72 65 73 74 20 72 65 | ry-quote.(&optional.arg.&rest.re |
| 2e180 | 73 74 29 0a 20 20 22 47 65 74 20 71 75 6f 74 65 64 20 64 69 72 65 63 74 6f 72 79 20 6e 61 6d 65 | st)..."Get.quoted.directory.name |
| 2e1a0 | 20 75 73 69 6e 67 20 63 6f 6d 70 6c 65 74 69 6f 6e 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 | .using.completion..Optional.argu |
| 2e1c0 | 6d 65 6e 74 20 41 52 47 20 69 73 20 74 68 65 20 70 72 6f 6d 70 74 2e 0a 4f 70 74 69 6f 6e 61 6c | ment.ARG.is.the.prompt..Optional |
| 2e1e0 | 20 61 72 67 75 6d 65 6e 74 20 52 45 53 54 20 69 73 20 74 68 65 20 72 65 73 74 2e 22 0a 20 20 28 | .argument.REST.is.the.rest."...( |
| 2e200 | 6c 65 74 20 28 28 66 69 6c 65 20 28 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 20 | let.((file.(read-directory-name. |
| 2e220 | 28 66 6f 72 6d 61 74 20 22 25 73 3a 20 22 20 61 72 67 29 20 28 70 6f 70 20 72 65 73 74 29 29 29 | (format."%s:.".arg).(pop.rest))) |
| 2e240 | 29 0a 20 20 20 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 28 65 78 70 | ).....(shell-quote-argument.(exp |
| 2e260 | 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 29 29 29 29 0a 0a 3b 3b 20 72 65 6d 6f 76 | and-file-name.file))))..;;.remov |
| 2e280 | 65 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 72 65 6d 6f 76 65 20 28 26 6f 70 74 | e..(defun.calibredb-remove.(&opt |
| 2e2a0 | 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 52 65 6d 6f 76 65 20 74 68 65 20 69 | ional.candidate)..."Remove.the.i |
| 2e2c0 | 74 65 6d 20 61 74 20 70 6f 69 6e 74 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 | tem.at.point..Optional.argument. |
| 2e2e0 | 43 41 4e 44 49 44 41 54 45 20 69 73 20 74 68 65 20 69 74 65 6d 20 61 74 20 70 6f 69 6e 74 2e 22 | CANDIDATE.is.the.item.at.point." |
| 2e300 | 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 63 61 6e 64 69 | ...(interactive)...(unless.candi |
| 2e320 | 64 61 74 65 0a 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 20 28 63 61 72 20 28 63 | date.....(setq.candidate.(car.(c |
| 2e340 | 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 | alibredb-find-candidate-at-point |
| 2e360 | 29 29 29 29 0a 20 20 28 6c 65 74 20 28 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 | ))))...(let.((id.(calibredb-geta |
| 2e380 | 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 3a 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 74 69 74 | ttr.candidate.:id)).........(tit |
| 2e3a0 | 6c 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 | le.(calibredb-getattr.candidate. |
| 2e3c0 | 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 29 29 0a 20 20 20 20 28 69 66 20 28 79 65 73 2d 6f 72 2d 6e | :book-title))).....(if.(yes-or-n |
| 2e3e0 | 6f 2d 70 20 28 63 6f 6e 63 61 74 20 22 41 72 65 20 79 6f 75 20 73 75 72 65 20 74 6f 20 6d 6f 76 | o-p.(concat."Are.you.sure.to.mov |
| 2e400 | 65 3a 20 22 20 69 64 20 22 20 2d 20 22 20 74 69 74 6c 65 20 22 20 74 6f 20 72 65 63 79 63 6c 65 | e:.".id.".-.".title.".to.recycle |
| 2e420 | 20 62 69 6e 3f 22 29 29 0a 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d | .bin?")).........(calibredb-comm |
| 2e440 | 61 6e 64 20 3a 63 6f 6d 6d 61 6e 64 20 22 72 65 6d 6f 76 65 22 0a 20 20 20 20 20 20 20 20 20 20 | and.:command."remove"........... |
| 2e460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 69 64 0a 20 20 20 20 20 20 20 20 | .................:id.id......... |
| 2e480 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 | ...................:library.(for |
| 2e4a0 | 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 20 25 73 22 20 28 63 61 6c 69 62 72 65 | mat."--library-path.%s".(calibre |
| 2e4c0 | 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 | db-root-dir-quote)))).....(cond. |
| 2e4e0 | 28 28 65 71 75 61 6c 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 68 | ((equal.major-mode.'calibredb-sh |
| 2e500 | 6f 77 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 | ow-mode)............(kill-buffer |
| 2e520 | 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 63 61 | .(calibredb-show--buffer-name.ca |
| 2e540 | 6e 64 69 64 61 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d | ndidate))............(calibredb- |
| 2e560 | 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 | search-refresh))...........((eq. |
| 2e580 | 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 | major-mode.'calibredb-search-mod |
| 2e5a0 | 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d | e)............(calibredb-search- |
| 2e5c0 | 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 | refresh-or-resume)))))..(defun.c |
| 2e5e0 | 61 6c 69 62 72 65 64 62 2d 72 65 6d 6f 76 65 2d 6d 61 72 6b 65 64 2d 69 74 65 6d 73 20 28 61 72 | alibredb-remove-marked-items.(ar |
| 2e600 | 67 29 0a 20 20 22 52 65 6d 6f 76 65 20 74 68 65 20 6d 61 72 6b 65 64 20 69 74 65 6d 28 73 29 2e | g)..."Remove.the.marked.item(s). |
| 2e620 | 0a 49 66 20 70 72 65 66 69 78 20 41 52 47 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 64 65 6c 65 74 | .If.prefix.ARG.is.non-nil,.delet |
| 2e640 | 65 20 74 68 65 20 66 69 6c 65 73 20 77 69 74 68 6f 75 74 20 70 72 6f 6d 70 74 2e 22 0a 20 20 28 | e.the.files.without.prompt."...( |
| 2e660 | 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 69 64 | interactive."P")...(let.((candid |
| 2e680 | 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 | ates.(calibredb-find-marked-cand |
| 2e6a0 | 69 64 61 74 65 73 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 73 | idates))).....(unless.candidates |
| 2e6c0 | 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 | .......(setq.candidates.(calibre |
| 2e6e0 | 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 | db-find-candidate-at-point)))... |
| 2e700 | 20 20 28 6c 65 74 20 28 28 69 64 73 20 28 6d 61 70 63 6f 6e 63 61 74 20 28 6c 61 6d 62 64 61 20 | ..(let.((ids.(mapconcat.(lambda. |
| 2e720 | 28 63 61 6e 64 29 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 3a | (cand).(calibredb-getattr.cand.: |
| 2e740 | 69 64 29 29 20 20 63 61 6e 64 69 64 61 74 65 73 20 22 2c 22 20 29 29 29 0a 20 20 20 20 20 20 3b | id))..candidates.",".))).......; |
| 2e760 | 3b 20 49 66 20 77 69 74 68 20 70 72 65 66 69 78 2c 20 64 65 6c 65 74 65 20 77 69 74 68 6f 75 74 | ;.If.with.prefix,.delete.without |
| 2e780 | 20 70 72 6f 6d 70 74 0a 20 20 20 20 20 20 28 69 66 20 61 72 67 0a 20 20 20 20 20 20 20 20 20 20 | .prompt.......(if.arg........... |
| 2e7a0 | 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f | (progn.............(calibredb-co |
| 2e7c0 | 6d 6d 61 6e 64 20 3a 63 6f 6d 6d 61 6e 64 20 22 72 65 6d 6f 76 65 22 0a 20 20 20 20 20 20 20 20 | mmand.:command."remove"......... |
| 2e7e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 69 64 73 0a 20 | .......................:id.ids.. |
| 2e800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c | ..............................:l |
| 2e820 | 69 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 20 25 | ibrary.(format."--library-path.% |
| 2e840 | 73 22 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 29 29 0a | s".(calibredb-root-dir-quote))). |
| 2e860 | 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 44 65 6c 65 74 65 64 20 25 73 | ............(message."Deleted.%s |
| 2e880 | 22 20 69 64 73 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 79 65 73 2d 6f 72 2d 6e 6f 2d 70 | ".ids)).........(if.(yes-or-no-p |
| 2e8a0 | 20 28 63 6f 6e 63 61 74 20 22 41 72 65 20 79 6f 75 20 73 75 72 65 20 74 6f 20 6d 6f 76 65 3a 20 | .(concat."Are.you.sure.to.move:. |
| 2e8c0 | 22 20 69 64 73 20 22 20 74 6f 20 72 65 63 79 63 6c 65 20 62 69 6e 3f 22 29 29 0a 20 20 20 20 20 | ".ids.".to.recycle.bin?"))...... |
| 2e8e0 | 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 61 6e 64 20 3a 63 6f 6d 6d 61 | .......(calibredb-command.:comma |
| 2e900 | 6e 64 20 22 72 65 6d 6f 76 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | nd."remove"..................... |
| 2e920 | 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 69 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...........:id.ids.............. |
| 2e940 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d | ..................:library.(form |
| 2e960 | 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 20 25 73 22 20 28 63 61 6c 69 62 72 65 64 | at."--library-path.%s".(calibred |
| 2e980 | 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 | b-root-dir-quote)))))).....(if.( |
| 2e9a0 | 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d | eq.major-mode.'calibredb-search- |
| 2e9c0 | 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d | mode).........(calibredb-search- |
| 2e9e0 | 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 | refresh-or-resume))))..(defun.ca |
| 2ea00 | 6c 69 62 72 65 64 62 2d 72 65 6d 6f 76 65 2d 66 6f 72 6d 61 74 20 28 26 6f 70 74 69 6f 6e 61 6c | libredb-remove-format.(&optional |
| 2ea20 | 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 52 65 6d 6f 76 65 20 74 68 65 20 73 6c 65 63 74 65 | .candidate)..."Remove.the.slecte |
| 2ea40 | 64 20 66 6f 72 6d 61 74 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 43 41 4e 44 | d.format..Optional.argument.CAND |
| 2ea60 | 49 44 41 54 45 20 69 73 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 69 74 65 6d 2e 22 0a 20 20 28 | IDATE.is.the.selected.item."...( |
| 2ea80 | 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 | interactive)...(unless.candidate |
| 2eaa0 | 0a 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 20 28 63 61 72 20 28 63 61 6c 69 62 | .....(setq.candidate.(car.(calib |
| 2eac0 | 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 | redb-find-candidate-at-point)))) |
| 2eae0 | 0a 20 20 28 6c 65 74 20 28 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 | ...(let.((id.(calibredb-getattr. |
| 2eb00 | 63 61 6e 64 69 64 61 74 65 20 3a 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 | candidate.:id)).........(format. |
| 2eb20 | 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 3a 62 6f | (calibredb-getattr.candidate.:bo |
| 2eb40 | 6f 6b 2d 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 28 63 61 6c 69 | ok-format)).........(title.(cali |
| 2eb60 | 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 3a 62 6f 6f 6b 2d 74 69 | bredb-getattr.candidate.:book-ti |
| 2eb80 | 74 6c 65 29 29 29 0a 20 20 20 20 28 69 66 20 28 79 65 73 2d 6f 72 2d 6e 6f 2d 70 20 28 63 6f 6e | tle))).....(if.(yes-or-no-p.(con |
| 2eba0 | 63 61 74 20 22 43 6f 6e 66 69 72 6d 20 44 65 6c 65 74 65 3a 20 69 64 20 2d 20 22 20 69 64 20 22 | cat."Confirm.Delete:.id.-.".id." |
| 2ebc0 | 2c 20 74 69 74 6c 65 20 2d 20 22 20 74 69 74 6c 65 20 22 2c 20 66 6f 72 6d 61 74 20 2d 20 22 20 | ,.title.-.".title.",.format.-.". |
| 2ebe0 | 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d | format)).........(calibredb-comm |
| 2ec00 | 61 6e 64 20 3a 63 6f 6d 6d 61 6e 64 20 22 72 65 6d 6f 76 65 5f 66 6f 72 6d 61 74 22 0a 20 20 20 | and.:command."remove_format".... |
| 2ec20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 28 63 6f 6e | ........................:id.(con |
| 2ec40 | 63 61 74 20 69 64 20 22 20 22 20 66 6f 72 6d 61 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | cat.id.".".format).............. |
| 2ec60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 | ..............:library.(format." |
| 2ec80 | 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 20 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f | --library-path.%s".(calibredb-ro |
| 2eca0 | 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 65 71 75 | ot-dir-quote)))).....(cond.((equ |
| 2ecc0 | 61 6c 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 6f | al.major-mode.'calibredb-show-mo |
| 2ece0 | 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 63 61 6c | de)............(kill-buffer.(cal |
| 2ed00 | 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 63 61 6e 64 69 64 61 | ibredb-show--buffer-name.candida |
| 2ed20 | 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 | te))............(calibredb-searc |
| 2ed40 | 68 2d 72 65 66 72 65 73 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 6d 61 6a 6f 72 | h-refresh))...........((eq.major |
| 2ed60 | 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 29 0a 20 20 | -mode.'calibredb-search-mode)... |
| 2ed80 | 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 | .........(calibredb-search-refre |
| 2eda0 | 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 29 29 29 29 0a 0a 3b 3b 20 73 65 74 5f 6d 65 74 61 64 61 | sh-or-resume)))))..;;.set_metada |
| 2edc0 | 74 61 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 69 6e 69 74 20 28 6e | ta..(defun.calibredb-get-init.(n |
| 2ede0 | 61 6d 65 20 63 61 6e 64 29 0a 20 20 22 47 65 74 20 74 68 65 20 69 6e 69 74 69 61 6c 20 76 61 6c | ame.cand)..."Get.the.initial.val |
| 2ee00 | 75 65 20 69 6e 20 63 6f 6d 70 6c 65 74 69 6e 67 20 70 72 6f 6d 70 74 2e 0a 41 72 67 75 6d 65 6e | ue.in.completing.prompt..Argumen |
| 2ee20 | 74 20 4e 41 4d 45 20 69 73 20 74 68 65 20 6d 65 74 61 64 61 74 61 20 66 69 65 6c 64 20 6e 61 6d | t.NAME.is.the.metadata.field.nam |
| 2ee40 | 65 20 73 74 72 69 6e 67 2e 0a 41 72 67 75 6d 65 6e 74 20 43 41 4e 44 20 69 73 20 74 68 65 20 63 | e.string..Argument.CAND.is.the.c |
| 2ee60 | 61 6e 64 69 64 61 74 65 2e 22 0a 20 20 28 63 6f 6e 64 20 28 28 65 71 75 61 6c 20 6e 61 6d 65 20 | andidate."...(cond.((equal.name. |
| 2ee80 | 22 74 61 67 73 22 29 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 | "tags").(calibredb-getattr.cand. |
| 2eea0 | 3a 74 61 67 29 29 0a 20 20 20 20 20 20 20 20 28 28 65 71 75 61 6c 20 6e 61 6d 65 20 22 63 6f 6d | :tag)).........((equal.name."com |
| 2eec0 | 6d 65 6e 74 73 22 29 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 | ments").(calibredb-getattr.cand. |
| 2eee0 | 3a 63 6f 6d 6d 65 6e 74 29 29 0a 20 20 20 20 20 20 20 20 28 28 65 71 75 61 6c 20 6e 61 6d 65 20 | :comment)).........((equal.name. |
| 2ef00 | 22 61 75 74 68 6f 72 5f 73 6f 72 74 22 29 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 | "author_sort").(calibredb-getatt |
| 2ef20 | 72 20 63 61 6e 64 20 3a 61 75 74 68 6f 72 2d 73 6f 72 74 29 29 0a 20 20 20 20 20 20 20 20 28 28 | r.cand.:author-sort)).........(( |
| 2ef40 | 65 71 75 61 6c 20 6e 61 6d 65 20 22 61 75 74 68 6f 72 73 22 29 20 28 63 61 6c 69 62 72 65 64 62 | equal.name."authors").(calibredb |
| 2ef60 | 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 3a 61 75 74 68 6f 72 2d 73 6f 72 74 29 29 0a 20 20 20 | -getattr.cand.:author-sort)).... |
| 2ef80 | 20 20 20 20 20 28 28 65 71 75 61 6c 20 6e 61 6d 65 20 22 74 69 74 6c 65 22 29 20 28 63 61 6c 69 | .....((equal.name."title").(cali |
| 2efa0 | 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 3a 62 6f 6f 6b 2d 74 69 74 6c 65 29 29 | bredb-getattr.cand.:book-title)) |
| 2efc0 | 0a 20 20 20 20 20 20 20 20 28 28 65 71 75 61 6c 20 6e 61 6d 65 20 22 69 64 22 29 20 28 63 61 6c | .........((equal.name."id").(cal |
| 2efe0 | 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 3a 69 64 29 29 0a 20 20 20 20 20 20 | ibredb-getattr.cand.:id))....... |
| 2f000 | 20 20 28 28 65 71 75 61 6c 20 6e 61 6d 65 20 22 69 64 73 22 29 20 28 63 61 6c 69 62 72 65 64 62 | ..((equal.name."ids").(calibredb |
| 2f020 | 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 3a 69 64 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 | -getattr.cand.:ids))))..(defun.c |
| 2f040 | 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 20 28 6e 61 6d 65 20 26 72 65 73 | alibredb-set-metadata.(name.&res |
| 2f060 | 74 20 70 72 6f 70 73 29 0a 20 20 22 53 65 74 20 6d 65 74 61 64 61 74 61 20 6f 6e 20 66 69 6c 65 | t.props)..."Set.metadata.on.file |
| 2f080 | 20 4e 41 4d 45 20 6f 6e 20 6d 61 72 6b 65 64 20 63 61 6e 64 69 64 61 74 65 73 2e 0a 41 72 67 75 | .NAME.on.marked.candidates..Argu |
| 2f0a0 | 6d 65 6e 74 20 50 52 4f 50 53 20 61 72 65 20 74 68 65 20 61 64 64 69 74 69 6f 6e 61 6c 20 70 61 | ment.PROPS.are.the.additional.pa |
| 2f0c0 | 72 61 6d 65 74 65 72 73 2e 22 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 69 64 61 74 65 73 20 28 | rameters."...(let.((candidates.( |
| 2f0e0 | 70 6c 69 73 74 2d 67 65 74 20 70 72 6f 70 73 20 3a 63 61 6e 64 69 64 61 74 65 29 29 29 0a 20 20 | plist-get.props.:candidate)))... |
| 2f100 | 20 20 28 75 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 28 73 65 74 71 | ..(unless.candidates.......(setq |
| 2f120 | 20 63 61 6e 64 69 64 61 74 65 73 20 28 6f 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d | .candidates.(or.(calibredb-find- |
| 2f140 | 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 73 29 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 | marked-candidates).(calibredb-fi |
| 2f160 | 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 28 6c | nd-candidate-at-point)))).....(l |
| 2f180 | 65 74 2a 20 28 28 63 61 6e 64 73 20 28 63 6f 6e 64 20 28 28 6d 65 6d 71 20 74 68 69 73 2d 63 6f | et*.((cands.(cond.((memq.this-co |
| 2f1a0 | 6d 6d 61 6e 64 20 27 28 69 76 79 2d 64 69 73 70 61 74 63 68 69 6e 67 2d 64 6f 6e 65 29 29 20 28 | mmand.'(ivy-dispatching-done)).( |
| 2f1c0 | 6c 69 73 74 20 63 61 6e 64 69 64 61 74 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | list.candidates))............... |
| 2f1e0 | 20 20 20 20 20 20 20 20 20 20 28 28 6d 65 6d 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 28 | ..........((memq.this-command.'( |
| 2f200 | 68 65 6c 6d 2d 6d 61 79 62 65 2d 65 78 69 74 2d 6d 69 6e 69 62 75 66 66 65 72 29 29 20 28 69 66 | helm-maybe-exit-minibuffer)).(if |
| 2f220 | 20 28 66 62 6f 75 6e 64 70 20 27 68 65 6c 6d 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 | .(fboundp.'helm-marked-candidate |
| 2f240 | 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | s).............................. |
| 2f260 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2f280 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 65 6c 6d 2d 6d 61 72 6b 65 64 2d 63 | ..................(helm-marked-c |
| 2f2a0 | 61 6e 64 69 64 61 74 65 73 29 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | andidates).nil))................ |
| 2f2c0 | 20 20 20 20 20 20 20 20 20 28 74 20 63 61 6e 64 69 64 61 74 65 73 29 29 29 0a 20 20 20 20 20 20 | .........(t.candidates)))....... |
| 2f2e0 | 20 20 20 20 20 28 63 61 6e 64 20 28 63 61 72 20 63 61 6e 64 73 29 29 20 20 20 20 20 20 20 20 20 | .....(cand.(car.cands))......... |
| 2f300 | 20 20 3b 20 77 65 20 75 73 65 20 63 61 72 20 6f 66 20 63 61 6e 64 73 20 74 6f 20 67 65 74 20 74 | ..;.we.use.car.of.cands.to.get.t |
| 2f320 | 68 65 20 70 72 6f 6d 70 74 20 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 | he.prompt.data............(title |
| 2f340 | 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 3a 62 6f 6f 6b 2d 74 | .(calibredb-getattr.cand.:book-t |
| 2f360 | 69 74 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 | itle))............(id.(calibredb |
| 2f380 | 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 3a 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 | -getattr.cand.:id))............( |
| 2f3a0 | 70 72 6f 6d 70 74 20 28 70 6c 69 73 74 2d 67 65 74 20 70 72 6f 70 73 20 3a 70 72 6f 6d 70 74 29 | prompt.(plist-get.props.:prompt) |
| 2f3c0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 69 65 6c 64 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 | )............(field.name)....... |
| 2f3e0 | 20 20 20 20 20 28 69 6e 69 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 69 6e 69 74 20 66 | .....(init.(calibredb-get-init.f |
| 2f400 | 69 65 6c 64 20 63 61 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 20 28 6c 65 6e | ield.cand))............(num.(len |
| 2f420 | 67 74 68 20 63 61 6e 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 70 75 74 20 28 72 | gth.cands))............(input.(r |
| 2f440 | 65 61 64 2d 73 74 72 69 6e 67 20 28 69 66 20 28 3e 20 6e 75 6d 20 30 29 0a 20 20 20 20 20 20 20 | ead-string.(if.(>.num.0)........ |
| 2f460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e | ............................(con |
| 2f480 | 63 61 74 20 22 53 65 74 20 22 20 66 69 65 6c 64 20 22 20 66 6f 72 20 22 20 28 6e 75 6d 62 65 72 | cat."Set.".field.".for.".(number |
| 2f4a0 | 2d 74 6f 2d 73 74 72 69 6e 67 20 6e 75 6d 29 20 22 20 69 74 65 6d 73 3a 20 22 29 0a 20 20 20 20 | -to-string.num).".items:.")..... |
| 2f4c0 | 20 20 20 20 20 20 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 |
| 2f4e0 | 6e 63 61 74 20 70 72 6f 6d 70 74 20 69 64 20 22 20 22 20 74 69 74 6c 65 20 22 3a 20 22 29 20 29 | ncat.prompt.id.".".title.":.").) |
| 2f500 | 20 69 6e 69 74 29 29 29 0a 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 | .init))).......(calibredb-set-me |
| 2f520 | 74 61 64 61 74 61 2d 70 72 6f 63 65 73 73 20 63 61 6e 64 73 20 66 69 65 6c 64 20 69 6e 70 75 74 | tadata-process.cands.field.input |
| 2f540 | 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 | ))))..(defun.calibredb-set-metad |
| 2f560 | 61 74 61 2d 70 72 6f 63 65 73 73 20 28 63 61 6e 64 73 20 66 69 65 6c 64 20 69 6e 70 75 74 29 0a | ata-process.(cands.field.input). |
| 2f580 | 20 20 22 52 75 6e 20 73 65 71 75 65 6e 74 69 61 6c 20 70 72 6f 63 65 73 73 65 73 20 74 6f 20 73 | .."Run.sequential.processes.to.s |
| 2f5a0 | 65 74 20 6d 65 74 61 64 61 74 61 2e 0a 41 72 67 75 6d 65 6e 74 20 43 41 4e 44 53 20 69 73 20 74 | et.metadata..Argument.CANDS.is.t |
| 2f5c0 | 68 65 20 6c 69 73 74 20 6f 66 20 63 61 6e 64 69 61 74 65 73 2e 0a 41 72 67 75 6d 65 6e 74 20 46 | he.list.of.candiates..Argument.F |
| 2f5e0 | 49 45 4c 44 20 69 73 20 74 68 65 20 6d 65 74 61 64 61 74 61 20 66 69 65 6c 64 2c 20 65 2e 67 2e | IELD.is.the.metadata.field,.e.g. |
| 2f600 | 20 74 61 67 73 2c 20 61 75 74 68 6f 72 2e 0a 41 72 67 75 6d 65 6e 74 20 49 4e 50 55 54 20 69 73 | .tags,.author..Argument.INPUT.is |
| 2f620 | 20 74 68 65 20 6d 65 74 61 64 61 74 61 20 63 6f 6e 74 65 6e 74 73 20 74 6f 20 62 65 20 73 65 74 | .the.metadata.contents.to.be.set |
| 2f640 | 2e 22 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 20 28 70 6f 70 20 63 61 6e 64 73 29 29 29 0a 20 | ."...(let.((cand.(pop.cands))).. |
| 2f660 | 20 20 20 3b 3b 20 28 70 70 20 63 61 6e 64 29 0a 20 20 20 20 28 69 66 20 63 61 6e 64 0a 20 20 20 | ...;;.(pp.cand).....(if.cand.... |
| 2f680 | 20 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c 0a 20 20 20 20 20 | .....(set-process-sentinel...... |
| 2f6a0 | 20 20 20 20 28 6c 65 74 2a 20 28 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 | ....(let*.((id.(calibredb-getatt |
| 2f6c0 | 72 20 63 61 6e 64 20 3a 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 | r.cand.:id)))............(calibr |
| 2f6e0 | 65 64 62 2d 70 72 6f 63 65 73 73 20 3a 63 6f 6d 6d 61 6e 64 20 22 73 65 74 5f 6d 65 74 61 64 61 | edb-process.:command."set_metada |
| 2f700 | 74 61 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 | ta"............................. |
| 2f720 | 20 20 3a 6f 70 74 69 6f 6e 20 22 2d 2d 66 69 65 6c 64 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ..:option."--field"............. |
| 2f740 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 70 75 74 20 28 66 6f 72 6d 61 74 | ..................:input.(format |
| 2f760 | 20 22 25 73 3a 5c 22 25 73 5c 22 22 20 66 69 65 6c 64 20 69 6e 70 75 74 29 0a 20 20 20 20 20 20 | ."%s:\"%s\"".field.input)....... |
| 2f780 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 69 64 0a 20 | ........................:id.id.. |
| 2f7a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 | .............................:li |
| 2f7c0 | 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 20 5c 22 | brary.(format."--library-path.\" |
| 2f7e0 | 25 73 5c 22 22 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 29 29 29 0a 20 20 20 20 | %s\"".calibredb-root-dir)))..... |
| 2f800 | 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 70 20 5f 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 | .....(lambda.(p._e)............( |
| 2f820 | 77 68 65 6e 20 28 3d 20 30 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 74 75 73 20 70 | when.(=.0.(process-exit-status.p |
| 2f840 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d | ))..............(calibredb-set-m |
| 2f860 | 65 74 61 64 61 74 61 2d 70 72 6f 63 65 73 73 20 63 61 6e 64 73 20 66 69 65 6c 64 20 69 6e 70 75 | etadata-process.cands.field.inpu |
| 2f880 | 74 29 29 29 29 0a 20 20 20 20 20 20 3b 3b 20 69 66 20 6e 6f 20 63 61 6e 64 69 64 61 74 65 20 6c | t)))).......;;.if.no.candidate.l |
| 2f8a0 | 65 66 74 20 74 6f 20 62 65 20 70 72 6f 63 65 73 73 65 64 2c 20 72 65 66 72 65 73 68 20 2a 63 61 | eft.to.be.processed,.refresh.*ca |
| 2f8c0 | 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 0a 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 65 71 | libredb-search*.......(cond.((eq |
| 2f8e0 | 75 61 6c 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d | ual.major-mode.'calibredb-show-m |
| 2f900 | 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f | ode)..............(calibredb-sho |
| 2f920 | 77 2d 72 65 66 72 65 73 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 6d 61 6a | w-refresh)).............((eq.maj |
| 2f940 | 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 29 0a | or-mode.'calibredb-search-mode). |
| 2f960 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 | .............(calibredb-search-r |
| 2f980 | 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 | efresh-or-resume)).............( |
| 2f9a0 | 74 20 6e 69 6c 29 29 29 29 29 0a 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 | t.nil)))))...(defun.calibredb-se |
| 2f9c0 | 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 61 67 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 | t-metadata--tags.(&optional.cand |
| 2f9e0 | 69 64 61 74 65 29 0a 20 20 22 41 64 64 20 74 61 67 73 2c 20 64 69 76 69 64 65 64 20 62 79 20 63 | idate)..."Add.tags,.divided.by.c |
| 2fa00 | 6f 6d 6d 61 2c 20 6f 6e 20 6d 61 72 6b 65 64 20 43 41 4e 44 49 44 41 54 45 73 2e 22 0a 20 20 28 | omma,.on.marked.CANDIDATEs."...( |
| 2fa20 | 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 | interactive)...(calibredb-set-me |
| 2fa40 | 74 61 64 61 74 61 20 22 74 61 67 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | tadata."tags"................... |
| 2fa60 | 20 20 20 20 20 20 20 20 3a 70 72 6f 6d 70 74 20 22 41 64 64 20 74 61 67 73 20 66 6f 72 20 22 0a | ........:prompt."Add.tags.for.". |
| 2fa80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6e 64 69 | ..........................:candi |
| 2faa0 | 64 61 74 65 20 63 61 6e 64 69 64 61 74 65 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 | date.candidate))..(defun.calibre |
| 2fac0 | 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 63 6f 6d 6d 65 6e 74 73 20 28 26 6f 70 74 69 | db-set-metadata--comments.(&opti |
| 2fae0 | 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 41 64 64 20 63 6f 6d 6d 65 6e 74 73 20 | onal.candidate)..."Add.comments. |
| 2fb00 | 6f 6e 20 6d 61 72 6b 65 64 20 43 41 4e 44 49 44 41 54 45 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 | on.marked.CANDIDATEs."...(intera |
| 2fb20 | 63 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 | ctive)...(calibredb-set-metadata |
| 2fb40 | 20 22 63 6f 6d 6d 65 6e 74 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ."comments"..................... |
| 2fb60 | 20 20 20 20 20 20 3a 70 72 6f 6d 70 74 20 22 41 64 64 20 63 6f 6d 6d 65 6e 74 73 20 66 6f 72 20 | ......:prompt."Add.comments.for. |
| 2fb80 | 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 3a 63 61 6e | "...........................:can |
| 2fba0 | 64 69 64 61 74 65 20 63 61 6e 64 69 64 61 74 65 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 | didate.candidate))..(defun.calib |
| 2fbc0 | 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 69 74 6c 65 20 28 26 6f 70 74 69 6f | redb-set-metadata--title.(&optio |
| 2fbe0 | 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 43 68 61 6e 67 65 20 74 69 74 6c 65 20 6f | nal.candidate)..."Change.title.o |
| 2fc00 | 6e 20 6d 61 72 6b 65 64 20 43 41 4e 44 49 44 41 54 45 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 | n.marked.CANDIDATEs."...(interac |
| 2fc20 | 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 20 | tive)...(calibredb-set-metadata. |
| 2fc40 | 22 74 69 74 6c 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 | "title"......................... |
| 2fc60 | 20 20 3a 70 72 6f 6d 70 74 20 22 43 68 61 6e 67 65 20 74 69 74 6c 65 20 66 6f 72 20 22 0a 20 20 | ..:prompt."Change.title.for."... |
| 2fc80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6e 64 69 64 61 | ........................:candida |
| 2fca0 | 74 65 20 63 61 6e 64 69 64 61 74 65 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 | te.candidate))..(defun.calibredb |
| 2fcc0 | 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 61 75 74 68 6f 72 5f 73 6f 72 74 20 28 26 6f 70 74 | -set-metadata--author_sort.(&opt |
| 2fce0 | 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 43 68 61 6e 67 65 20 61 75 74 68 6f | ional.candidate)..."Change.autho |
| 2fd00 | 72 5f 73 6f 72 74 20 6f 6e 20 6d 61 72 6b 65 64 20 43 41 4e 44 49 44 41 54 45 73 2e 22 0a 20 20 | r_sort.on.marked.CANDIDATEs."... |
| 2fd20 | 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d | (interactive)...(calibredb-set-m |
| 2fd40 | 65 74 61 64 61 74 61 20 22 61 75 74 68 6f 72 5f 73 6f 72 74 22 0a 20 20 20 20 20 20 20 20 20 20 | etadata."author_sort"........... |
| 2fd60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 6f 6d 70 74 20 22 43 68 61 6e 67 65 20 | ................:prompt."Change. |
| 2fd80 | 61 75 74 68 6f 72 20 66 6f 72 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | author.for.".................... |
| 2fda0 | 20 20 20 20 20 20 20 3a 63 61 6e 64 69 64 61 74 65 20 63 61 6e 64 69 64 61 74 65 29 29 0a 0a 28 | .......:candidate.candidate))..( |
| 2fdc0 | 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 61 75 | defun.calibredb-set-metadata--au |
| 2fde0 | 74 68 6f 72 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 43 | thors.(&optional.candidate)..."C |
| 2fe00 | 68 61 6e 67 65 20 61 75 74 68 6f 72 73 20 6f 6e 20 6d 61 72 6b 65 64 20 43 41 4e 44 49 44 41 54 | hange.authors.on.marked.CANDIDAT |
| 2fe20 | 45 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 | Es."...(interactive)...(calibred |
| 2fe40 | 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 20 22 61 75 74 68 6f 72 73 22 0a 20 20 20 20 20 20 20 | b-set-metadata."authors"........ |
| 2fe60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 6f 6d 70 74 20 22 43 68 61 6e | ...................:prompt."Chan |
| 2fe80 | 67 65 20 61 75 74 68 6f 72 20 66 6f 72 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ge.author.for."................. |
| 2fea0 | 20 20 20 20 20 20 20 20 20 20 3a 63 61 6e 64 69 64 61 74 65 20 63 61 6e 64 69 64 61 74 65 29 29 | ..........:candidate.candidate)) |
| 2fec0 | 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d | ..(defun.calibredb-set-metadata- |
| 2fee0 | 2d 6c 69 73 74 2d 66 69 65 6c 64 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 | -list-fields.(&optional.candidat |
| 2ff00 | 65 29 0a 20 20 22 4c 69 73 74 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 43 41 4e 44 49 44 41 54 | e)..."List.the.selected.CANDIDAT |
| 2ff20 | 45 20 73 75 70 70 6f 72 74 65 64 20 66 69 6c 65 64 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 | E.supported.fileds."...(interact |
| 2ff40 | 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 0a 20 20 20 20 28 73 65 | ive)...(unless.candidate.....(se |
| 2ff60 | 74 71 20 63 61 6e 64 69 64 61 74 65 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e | tq.candidate.(car.(calibredb-fin |
| 2ff80 | 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 0a 20 20 28 6c 65 74 2a | d-candidate-at-point))))...(let* |
| 2ffa0 | 20 28 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 | .((id.(calibredb-getattr.candida |
| 2ffc0 | 74 65 20 3a 69 64 29 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 28 63 61 6c 69 62 72 65 64 | te.:id))).....(message.(calibred |
| 2ffe0 | 62 2d 63 6f 6d 6d 61 6e 64 20 3a 63 6f 6d 6d 61 6e 64 20 22 73 65 74 5f 6d 65 74 61 64 61 74 61 | b-command.:command."set_metadata |
| 30000 | 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | "............................... |
| 30020 | 20 20 3a 6f 70 74 69 6f 6e 20 22 2d 2d 6c 69 73 74 2d 66 69 65 6c 64 73 22 0a 20 20 20 20 20 20 | ..:option."--list-fields"....... |
| 30040 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 69 64 | ..........................:id.id |
| 30060 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 30080 | 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 | .:library.(format."--library-pat |
| 300a0 | 68 20 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 | h.%s".(calibredb-root-dir-quote) |
| 300c0 | 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 | )))))..(defun.calibredb-set-meta |
| 300e0 | 64 61 74 61 2d 2d 74 72 61 6e 73 69 65 6e 74 20 28 29 0a 20 20 22 53 65 74 20 6d 65 74 61 64 61 | data--transient.()..."Set.metada |
| 30100 | 74 61 20 66 6f 72 20 63 61 6e 64 69 64 61 74 65 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 6d 61 72 | ta.for.candidate.at.point.or.mar |
| 30120 | 6b 65 64 20 63 61 6e 64 69 64 61 74 65 73 20 77 69 74 68 20 74 72 61 6e 73 69 65 6e 74 20 61 72 | ked.candidates.with.transient.ar |
| 30140 | 67 75 6d 65 6e 74 73 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 | guments."...(interactive)...(let |
| 30160 | 20 28 28 63 61 6e 64 69 64 61 74 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 6d 61 | .((candidates.(calibredb-find-ma |
| 30180 | 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 73 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 63 | rked-candidates))).....(unless.c |
| 301a0 | 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 73 | andidates.......(setq.candidates |
| 301c0 | 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f | .(calibredb-find-candidate-at-po |
| 301e0 | 69 6e 74 29 29 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 | int))).....(calibredb-set-metada |
| 30200 | 74 61 2d 2d 74 72 61 6e 73 69 65 6e 74 2d 70 72 6f 63 65 73 73 20 63 61 6e 64 69 64 61 74 65 73 | ta--transient-process.candidates |
| 30220 | 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 | )))..(defun.calibredb-set-metada |
| 30240 | 74 61 2d 2d 74 72 61 6e 73 69 65 6e 74 2d 70 72 6f 63 65 73 73 20 28 63 61 6e 64 73 29 0a 20 20 | ta--transient-process.(cands)... |
| 30260 | 22 52 75 6e 20 73 65 71 75 65 6e 74 69 61 6c 20 70 72 6f 63 65 73 73 65 73 20 74 6f 20 73 65 74 | "Run.sequential.processes.to.set |
| 30280 | 20 6d 65 74 61 64 61 74 61 20 77 69 74 68 20 74 72 61 6e 73 69 65 6e 74 20 63 6f 6d 6d 61 6e 64 | .metadata.with.transient.command |
| 302a0 | 73 2e 0a 41 72 67 75 6d 65 6e 74 20 43 41 4e 44 53 20 69 73 20 74 68 65 20 6c 69 73 74 20 6f 66 | s..Argument.CANDS.is.the.list.of |
| 302c0 | 20 63 61 6e 64 69 61 74 65 73 2e 22 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 20 28 70 6f 70 20 | .candiates."...(let.((cand.(pop. |
| 302e0 | 63 61 6e 64 73 29 29 29 0a 20 20 20 20 3b 3b 20 28 70 70 20 63 61 6e 64 29 0a 20 20 20 20 28 69 | cands))).....;;.(pp.cand).....(i |
| 30300 | 66 20 63 61 6e 64 0a 20 20 20 20 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 | f.cand.........(set-process-sent |
| 30320 | 69 6e 65 6c 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 69 64 20 28 63 61 6c 69 62 72 | inel..........(let*.((id.(calibr |
| 30340 | 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 20 3a 69 64 29 29 29 0a 20 20 20 20 20 20 20 20 | edb-getattr.cand.:id)))......... |
| 30360 | 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 70 72 6f 63 65 73 73 20 3a 63 6f 6d 6d 61 6e 64 20 22 | ...(calibredb-process.:command." |
| 30380 | 73 65 74 5f 6d 65 74 61 64 61 74 61 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | set_metadata"................... |
| 303a0 | 20 20 20 20 20 20 20 20 20 20 20 20 3a 6f 70 74 69 6f 6e 20 28 66 6f 72 6d 61 74 20 22 2d 2d 66 | ............:option.(format."--f |
| 303c0 | 69 65 6c 64 20 5c 22 25 73 5c 22 22 20 28 73 2d 6a 6f 69 6e 20 22 5c 22 20 2d 2d 66 69 65 6c 64 | ield.\"%s\"".(s-join."\".--field |
| 303e0 | 20 5c 22 22 20 28 2d 72 65 6d 6f 76 65 20 27 73 2d 62 6c 61 6e 6b 3f 20 28 2d 66 6c 61 74 74 65 | .\"".(-remove.'s-blank?.(-flatte |
| 30400 | 6e 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 61 72 67 75 6d 65 | n.(calibredb-set-metadata-argume |
| 30420 | 6e 74 73 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | nts)))))........................ |
| 30440 | 20 20 20 20 20 20 20 3a 69 64 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .......:id.id................... |
| 30460 | 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 2d 2d | ............:library.(format."-- |
| 30480 | 6c 69 62 72 61 72 79 2d 70 61 74 68 20 5c 22 25 73 5c 22 22 20 63 61 6c 69 62 72 65 64 62 2d 72 | library-path.\"%s\"".calibredb-r |
| 304a0 | 6f 6f 74 2d 64 69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 70 20 5f | oot-dir)))..........(lambda.(p._ |
| 304c0 | 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 30 20 28 70 72 6f 63 65 73 | e)............(when.(=.0.(proces |
| 304e0 | 73 2d 65 78 69 74 2d 73 74 61 74 75 73 20 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | s-exit-status.p))..............( |
| 30500 | 63 61 6c 69 62 72 65 64 62 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 2d 74 72 61 6e 73 69 65 6e | calibredb-set-metadata--transien |
| 30520 | 74 2d 70 72 6f 63 65 73 73 20 63 61 6e 64 73 29 29 29 29 0a 20 20 20 20 20 20 3b 3b 20 69 66 20 | t-process.cands)))).......;;.if. |
| 30540 | 6e 6f 20 63 61 6e 64 69 64 61 74 65 20 6c 65 66 74 20 74 6f 20 62 65 20 70 72 6f 63 65 73 73 65 | no.candidate.left.to.be.processe |
| 30560 | 64 2c 20 72 65 66 72 65 73 68 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 0a 20 20 | d,.refresh.*calibredb-search*... |
| 30580 | 20 20 20 20 28 63 6f 6e 64 20 28 28 65 71 75 61 6c 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 | ....(cond.((equal.major-mode.'ca |
| 305a0 | 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | libredb-show-mode).............. |
| 305c0 | 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 72 65 66 72 65 73 68 29 29 0a 20 20 20 20 20 20 | (calibredb-show-refresh))....... |
| 305e0 | 20 20 20 20 20 20 28 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 | ......((eq.major-mode.'calibredb |
| 30600 | 2d 73 65 61 72 63 68 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 | -search-mode)..............(cali |
| 30620 | 62 72 65 64 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 29 | bredb-search-refresh-or-resume)) |
| 30640 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 6e 69 6c 29 29 29 29 29 0a 0a 28 64 65 66 75 6e | .............(t.nil)))))..(defun |
| 30660 | 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 | .calibredb-find-candidate-at-poi |
| 30680 | 6e 74 20 28 29 0a 20 20 22 46 69 6e 64 20 63 61 6e 64 69 64 61 74 65 20 61 74 20 70 6f 69 6e 74 | nt.()..."Find.candidate.at.point |
| 306a0 | 20 61 6e 64 20 72 65 74 75 72 6e 20 74 68 65 20 6c 69 73 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 | .and.return.the.list."...(intera |
| 306c0 | 63 74 69 76 65 29 0a 20 20 28 69 66 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c | ctive)...(if.(eq.major-mode.'cal |
| 306e0 | 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 6c 69 73 74 20 | ibredb-search-mode).......(list. |
| 30700 | 28 63 64 72 20 28 6f 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 | (cdr.(or.(get-text-property.(poi |
| 30720 | 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 0a 20 20 20 20 20 20 | nt).'calibredb-entry.nil)....... |
| 30740 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 | ...............(get-text-propert |
| 30760 | 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 20 6e 69 | y.(point).'calibredb-detailed.ni |
| 30780 | 6c 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 65 74 2d 74 65 78 | l)......................(get-tex |
| 307a0 | 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f | t-property.(point).'calibredb-co |
| 307c0 | 6d 70 61 63 74 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 28 6c 69 73 74 20 28 67 65 74 2d 74 65 78 | mpact.nil)))).....(list.(get-tex |
| 307e0 | 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 27 63 61 6c 69 62 72 65 64 | t-property.(point-min).'calibred |
| 30800 | 62 2d 65 6e 74 72 79 20 6e 69 6c 29 20 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 | b-entry.nil).)))..(defun.calibre |
| 30820 | 64 62 2d 66 69 6e 64 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 73 20 28 29 0a 20 20 22 | db-find-marked-candidates.()..." |
| 30840 | 46 69 6e 64 20 6d 61 72 6b 65 64 20 63 61 6e 64 69 64 61 74 65 73 20 61 6e 64 20 72 65 74 75 72 | Find.marked.candidates.and.retur |
| 30860 | 6e 20 74 68 65 20 61 6c 69 73 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 | n.the.alist."...(interactive)... |
| 30880 | 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 6c 65 74 20 28 63 61 6e 64 69 64 | (save-excursion.....(let.(candid |
| 308a0 | 61 74 65 20 62 65 67 20 65 6e 64 20 63 61 6e 64 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 28 77 68 | ate.beg.end.cand-list).......(wh |
| 308c0 | 65 6e 20 28 74 65 78 74 2d 70 72 6f 70 65 72 74 79 2d 6e 6f 74 2d 61 6c 6c 20 28 70 6f 69 6e 74 | en.(text-property-not-all.(point |
| 308e0 | 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 27 63 61 6c 69 62 72 65 64 62 2d 6d 61 72 | -min).(point-max).'calibredb-mar |
| 30900 | 6b 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 6e 64 20 28 74 65 78 74 2d 70 | k.nil).........(setq.end.(text-p |
| 30920 | 72 6f 70 65 72 74 79 2d 61 6e 79 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d | roperty-any.(point-min).(point-m |
| 30940 | 61 78 29 20 27 63 61 6c 69 62 72 65 64 62 2d 6d 61 72 6b 20 3f 3e 29 29 0a 20 20 20 20 20 20 20 | ax).'calibredb-mark.?>))........ |
| 30960 | 20 28 77 68 69 6c 65 20 28 73 65 74 71 20 62 65 67 20 28 74 65 78 74 2d 70 72 6f 70 65 72 74 79 | .(while.(setq.beg.(text-property |
| 30980 | 2d 61 6e 79 20 65 6e 64 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 27 63 61 6c 69 62 72 65 64 62 2d | -any.end.(point-max).'calibredb- |
| 309a0 | 6d 61 72 6b 20 3f 3e 29 20 29 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 | mark.?>).)...........(goto-char. |
| 309c0 | 62 65 67 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 20 28 | beg)...........(setq.candidate.( |
| 309e0 | 63 64 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 | cdr.(get-text-property.(point).' |
| 30a00 | 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 | calibredb-entry.nil))).......... |
| 30a20 | 20 28 70 75 73 68 20 63 61 6e 64 69 64 61 74 65 20 63 61 6e 64 2d 6c 69 73 74 29 0a 20 20 20 20 | .(push.candidate.cand-list)..... |
| 30a40 | 20 20 20 20 20 20 3b 3b 20 28 6d 65 73 73 61 67 65 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 | ......;;.(message.(number-to-str |
| 30a60 | 69 6e 67 20 62 65 67 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 | ing.beg))...........(forward-lin |
| 30a80 | 65 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 6e 64 20 28 70 6f 69 6e 74 29 | e.1)...........(setq.end.(point) |
| 30aa0 | 29 29 0a 20 20 20 20 20 20 20 20 63 61 6e 64 2d 6c 69 73 74 29 29 29 29 0a 0a 3b 3b 20 66 65 74 | )).........cand-list))))..;;.fet |
| 30ac0 | 63 68 5f 6d 65 74 61 64 61 74 61 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 70 64 | ch_metadata..(defun.calibredb-pd |
| 30ae0 | 66 2d 61 75 74 6f 2d 64 65 74 65 63 74 2d 69 73 62 6e 20 28 26 6f 70 74 69 6f 6e 61 6c 20 65 6e | f-auto-detect-isbn.(&optional.en |
| 30b00 | 64 2d 70 61 67 65 29 0a 20 20 22 49 6e 76 6f 6b 65 20 66 72 6f 6d 20 63 61 6c 69 62 72 65 2d 73 | d-page)..."Invoke.from.calibre-s |
| 30b20 | 65 61 72 63 68 20 62 75 66 66 65 72 2e 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 72 65 71 75 | earch.buffer..This.function.requ |
| 30b40 | 69 72 65 73 20 74 68 65 20 70 64 66 2d 74 6f 6f 6c 73 20 28 70 64 66 2d 74 6f 6f 6c 73 2e 65 6c | ires.the.pdf-tools.(pdf-tools.el |
| 30b60 | 29 20 74 6f 20 62 65 20 69 6e 73 74 61 6c 6c 65 64 2e 0a 53 63 61 6e 20 66 6f 72 20 69 73 62 6e | ).to.be.installed..Scan.for.isbn |
| 30b80 | 20 66 72 6f 6d 20 70 61 67 65 20 31 20 75 70 74 6f 20 28 6e 6f 74 20 69 6e 63 6c 75 64 69 6e 67 | .from.page.1.upto.(not.including |
| 30ba0 | 29 20 45 4e 44 2d 50 41 47 45 20 28 64 65 66 61 75 6c 74 20 31 30 29 20 66 6f 72 20 70 64 66 20 | ).END-PAGE.(default.10).for.pdf. |
| 30bc0 | 66 69 6c 65 2e 22 0a 20 20 28 72 65 71 75 69 72 65 20 27 70 64 66 2d 74 6f 6f 6c 73 20 6e 69 6c | file."...(require.'pdf-tools.nil |
| 30be0 | 20 74 29 0a 20 20 28 69 66 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 | .t)...(if.(eq.major-mode.'calibr |
| 30c00 | 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 69 73 62 | edb-search-mode).......(let.(isb |
| 30c20 | 6e 2d 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 69 73 62 6e 20 22 22 29 0a | n-line.............;;.(isbn.""). |
| 30c40 | 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 67 65 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ............(page.1)............ |
| 30c60 | 20 28 66 69 6c 65 2d 70 61 74 68 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 | .(file-path.(calibredb-getattr.( |
| 30c80 | 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 | car.(calibredb-find-candidate-at |
| 30ca0 | 2d 70 6f 69 6e 74 29 29 20 3a 66 69 6c 65 2d 70 61 74 68 29 29 29 0a 20 20 20 20 20 20 20 20 28 | -point)).:file-path))).........( |
| 30cc0 | 75 6e 6c 65 73 73 20 65 6e 64 2d 70 61 67 65 20 28 73 65 74 71 20 65 6e 64 2d 70 61 67 65 20 31 | unless.end-page.(setq.end-page.1 |
| 30ce0 | 30 29 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 3d 20 28 75 72 6c | 0)).........(cond.((string=.(url |
| 30d00 | 2d 66 69 6c 65 2d 65 78 74 65 6e 73 69 6f 6e 20 66 69 6c 65 2d 70 61 74 68 29 20 22 2e 70 64 66 | -file-extension.file-path).".pdf |
| 30d20 | 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 3c 20 70 61 67 65 | ")................(while.(<.page |
| 30d40 | 20 65 6e 64 2d 70 61 67 65 29 20 3b 20 73 63 61 6e 6e 69 6e 67 20 66 72 6f 6d 20 62 65 6c 6f 77 | .end-page).;.scanning.from.below |
| 30d60 | 20 62 65 63 61 75 73 65 20 77 65 20 77 61 6e 74 20 74 6f 20 66 69 6e 64 20 66 69 72 73 74 20 69 | .because.we.want.to.find.first.i |
| 30d80 | 6e 73 74 61 6e 63 65 20 6f 66 20 49 53 42 4e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | nstance.of.ISBN................. |
| 30da0 | 20 28 6c 65 74 20 28 28 6d 61 74 63 68 20 28 63 64 72 20 28 61 73 73 6f 63 20 27 65 64 67 65 73 | .(let.((match.(cdr.(assoc.'edges |
| 30dc0 | 20 28 63 61 72 20 28 6f 72 20 28 70 64 66 2d 69 6e 66 6f 2d 73 65 61 72 63 68 2d 73 74 72 69 6e | .(car.(or.(pdf-info-search-strin |
| 30de0 | 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | g............................... |
| 30e00 | 20 20 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 69 73 62 6e 22 | .........................."isbn" |
| 30e20 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 30e40 | 20 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 0a 20 20 | .........................page... |
| 30e60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 30e80 | 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 2d 70 61 74 68 29 | ......................file-path) |
| 30ea0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 30ec0 | 20 20 20 20 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 64 66 2d | ...........................(pdf- |
| 30ee0 | 69 6e 66 6f 2d 73 65 61 72 63 68 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | info-search-string.............. |
| 30f00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 30f20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 6e 75 6d 62 65 72 2d 22 0a 20 20 20 20 20 20 20 20 | .............."number-"......... |
| 30f40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 30f60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 67 65 0a 20 20 20 20 20 20 20 20 | ...................page......... |
| 30f80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 30fa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 2d 70 61 74 68 29 29 29 29 | ...................file-path)))) |
| 30fc0 | 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 63 75 72 72 65 | )))....................;;.(curre |
| 30fe0 | 6e 74 2d 62 75 66 66 65 72 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | nt-buffer)))))))................ |
| 31000 | 20 20 20 20 28 73 65 74 71 20 70 61 67 65 20 28 31 2b 20 70 61 67 65 29 29 0a 20 20 20 20 20 20 | ....(setq.page.(1+.page))....... |
| 31020 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 6d 61 74 63 68 20 28 73 65 74 71 20 | .............(cond.(match.(setq. |
| 31040 | 69 73 62 6e 2d 6c 69 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 | isbn-line....................... |
| 31060 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 64 66 2d 69 6e 66 6f 2d 67 65 74 74 65 78 | ................(pdf-info-gettex |
| 31080 | 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............................... |
| 310a0 | 20 20 20 20 20 20 20 20 20 28 31 2d 20 70 61 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | .........(1-.page).............. |
| 310c0 | 20 20 20 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 6d | ..........................(car.m |
| 310e0 | 61 74 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | atch)........................... |
| 31100 | 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6c 69 6e 65 20 66 69 6c 65 2d 70 61 74 68 29 29 0a 20 | .............'line.file-path)).. |
| 31120 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ...............................( |
| 31140 | 73 65 74 71 20 70 61 67 65 20 28 31 2b 20 65 6e 64 2d 70 61 67 65 29 29 29 29 29 29 0a 20 20 20 | setq.page.(1+.end-page)))))).... |
| 31160 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 69 73 62 6e 2d 6c 69 6e 65 0a 20 20 20 | ............(cond.(isbn-line.... |
| 31180 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e | ...................(cond.((strin |
| 311a0 | 67 2d 6d 61 74 63 68 20 22 5c 5c 28 49 53 42 4e 5c 5c 29 5b 5e 30 2d 39 5d 2a 5c 5c 28 31 30 5c | g-match."\\(ISBN\\)[^0-9]*\\(10\ |
| 311c0 | 5c 7c 31 33 5c 5c 29 2a 5b 5e 30 2d 39 5d 2a 20 2a 5c 5c 28 5b 30 2d 39 2d 20 78 5d 2a 5c 5c 29 | \|13\\)*[^0-9]*.*\\([0-9-.x]*\\) |
| 311e0 | 20 2a 22 20 69 73 62 6e 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .*".isbn-line).................. |
| 31200 | 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 33 20 69 73 62 6e | ............(match-string.3.isbn |
| 31220 | 2d 6c 69 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -line))......................... |
| 31240 | 20 20 20 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 31 33 3a 20 2a 5c 5c 28 5b 30 2d 39 | ....((string-match."13:.*\\([0-9 |
| 31260 | 2d 20 78 5d 2a 5c 5c 29 20 2a 22 20 69 73 62 6e 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 | -.x]*\\).*".isbn-line).......... |
| 31280 | 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 69 6e | ....................(match-strin |
| 312a0 | 67 20 31 20 69 73 62 6e 2d 6c 69 6e 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | g.1.isbn-line))))............... |
| 312c0 | 20 20 20 20 20 20 20 28 74 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | .......(t.nil)))...............( |
| 312e0 | 74 20 6e 69 6c 29 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 53 68 6f 75 6c 64 20 62 65 | t.nil))).....(message."Should.be |
| 31300 | 20 69 6e 76 6f 6b 65 64 20 66 72 6f 6d 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a | .invoked.from.*calibredb-search* |
| 31320 | 20 62 75 66 66 65 72 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 64 6a | .buffer")))..(defun.calibredb-dj |
| 31340 | 76 75 2d 61 75 74 6f 2d 64 65 74 65 63 74 2d 69 73 62 6e 20 28 29 0a 20 20 22 49 6e 76 6f 6b 65 | vu-auto-detect-isbn.()..."Invoke |
| 31360 | 20 66 72 6f 6d 20 63 61 6c 69 62 72 65 2d 73 65 61 72 63 68 20 62 75 66 66 65 72 2e 0a 54 68 69 | .from.calibre-search.buffer..Thi |
| 31380 | 73 20 66 75 6e 63 74 69 6f 6e 20 72 65 71 75 69 72 65 73 20 74 68 65 20 64 6a 76 75 20 28 64 6a | s.function.requires.the.djvu.(dj |
| 313a0 | 76 75 2e 65 6c 29 20 70 61 63 6b 61 67 65 20 74 6f 20 62 65 20 69 6e 73 74 61 6c 6c 65 64 2e 0a | vu.el).package.to.be.installed.. |
| 313c0 | 53 63 61 6e 20 66 6f 72 20 69 73 62 6e 20 66 72 6f 6d 20 74 68 65 20 66 69 72 73 74 20 39 20 70 | Scan.for.isbn.from.the.first.9.p |
| 313e0 | 61 67 65 73 20 6f 66 20 74 68 65 20 64 6a 76 75 20 66 69 6c 65 2e 22 0a 20 20 28 64 6a 76 75 2d | ages.of.the.djvu.file."...(djvu- |
| 31400 | 66 69 6e 64 2d 66 69 6c 65 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 28 63 61 | find-file.(calibredb-getattr.(ca |
| 31420 | 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 | r.(calibredb-find-candidate-at-p |
| 31440 | 6f 69 6e 74 29 29 20 3a 66 69 6c 65 2d 70 61 74 68 29 29 0a 20 20 28 64 6a 76 75 2d 67 6f 74 6f | oint)).:file-path))...(djvu-goto |
| 31460 | 2d 70 61 67 65 20 31 29 0a 20 20 28 6c 65 74 2a 20 28 28 6d 61 74 63 68 20 28 6c 65 74 20 28 28 | -page.1)...(let*.((match.(let.(( |
| 31480 | 70 61 67 65 20 64 6a 76 75 2d 64 6f 63 2d 70 61 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | page.djvu-doc-page)............. |
| 314a0 | 20 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 | ..........(match.nil)).......... |
| 314c0 | 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 6e 6f 74 20 28 6f 72 20 6d 61 74 63 68 20 28 | .........(while.(not.(or.match.( |
| 314e0 | 3e 20 70 61 67 65 20 31 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | >.page.10))).................... |
| 31500 | 20 28 64 6a 76 75 2d 6e 65 78 74 2d 70 61 67 65 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .(djvu-next-page.1)............. |
| 31520 | 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 61 67 65 20 64 6a 76 75 2d 64 6f 63 2d 70 61 67 65 | ........(setq.page.djvu-doc-page |
| 31540 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 72 65 2d | ).....................(when.(re- |
| 31560 | 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 2e 2a 69 73 62 6e 2e 2a 24 22 20 6e 69 6c 20 | search-forward."^.*isbn.*$".nil. |
| 31580 | 74 29 20 28 73 65 74 71 20 6d 61 74 63 68 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | t).(setq.match.t)))............. |
| 315a0 | 20 20 20 20 20 20 28 70 72 69 6e 74 20 6d 61 74 63 68 29 29 29 29 0a 20 20 20 20 28 6c 65 74 20 | ......(print.match)))).....(let. |
| 315c0 | 28 28 69 73 62 6e 2d 6c 69 6e 65 20 22 22 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 20 28 6d 61 | ((isbn-line."")).......(cond.(ma |
| 315e0 | 74 63 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 70 72 69 6e 74 20 28 66 6f 72 6d | tch..............;;.(print.(form |
| 31600 | 61 74 20 22 48 45 4c 4c 4f 22 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 | at."HELLO".(match-string-no-prop |
| 31620 | 65 72 74 69 65 73 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 69 | erties.0)))..............(setq.i |
| 31640 | 73 62 6e 2d 6c 69 6e 65 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 | sbn-line.(match-string-no-proper |
| 31660 | 74 69 65 73 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 2d 62 75 66 66 65 | ties.0))..............(set-buffe |
| 31680 | 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | r-modified-p.nil)..............( |
| 316a0 | 6b 69 6c 6c 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e | kill-buffer)..............(strin |
| 316c0 | 67 2d 6d 61 74 63 68 20 22 5c 5c 28 69 73 62 6e 5c 5c 29 5b 5e 30 2d 39 5d 2a 5c 5c 28 31 30 5c | g-match."\\(isbn\\)[^0-9]*\\(10\ |
| 316e0 | 5c 7c 31 33 5c 5c 29 2a 5b 5e 30 2d 39 5d 2a 20 2a 5c 5c 28 5b 30 2d 39 2d 20 78 5d 2a 5c 5c 29 | \|13\\)*[^0-9]*.*\\([0-9-.x]*\\) |
| 31700 | 20 2a 22 20 69 73 62 6e 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 74 | .*".isbn-line)..............(mat |
| 31720 | 63 68 2d 73 74 72 69 6e 67 20 33 20 69 73 62 6e 2d 6c 69 6e 65 29 29 0a 20 20 20 20 20 20 20 20 | ch-string.3.isbn-line))......... |
| 31740 | 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 2d 62 75 66 66 65 72 2d | ....(t..............(set-buffer- |
| 31760 | 6d 6f 64 69 66 69 65 64 2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6b 69 | modified-p.nil)..............(ki |
| 31780 | 6c 6c 2d 62 75 66 66 65 72 29 20 6e 69 6c 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 | ll-buffer).nil)))))..(defun.cali |
| 317a0 | 62 72 65 64 62 2d 61 75 74 6f 2d 64 65 74 65 63 74 2d 69 73 62 6e 20 28 29 0a 20 20 22 49 6e 76 | bredb-auto-detect-isbn.()..."Inv |
| 317c0 | 6f 6b 65 20 66 72 6f 6d 20 63 61 6c 69 62 72 65 2d 73 65 61 72 63 68 20 62 75 66 66 65 72 20 61 | oke.from.calibre-search.buffer.a |
| 317e0 | 6e 64 20 73 63 61 6e 20 66 6f 72 20 69 73 62 6e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 | nd.scan.for.isbn."...(interactiv |
| 31800 | 65 29 0a 20 20 28 6c 65 74 20 20 28 28 66 6f 72 6d 61 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 | e)...(let..((format.(calibredb-g |
| 31820 | 65 74 61 74 74 72 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 | etattr.(car.(calibredb-find-cand |
| 31840 | 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 20 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 29 | idate-at-point)).:book-format))) |
| 31860 | 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 3d 20 66 6f 72 6d 61 74 20 22 70 64 66 | .....(cond.((string=.format."pdf |
| 31880 | 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 65 61 74 75 72 65 70 20 27 70 64 66 | ")............(if.(featurep.'pdf |
| 318a0 | 2d 74 6f 6f 6c 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 | -tools)................(calibred |
| 318c0 | 62 2d 70 64 66 2d 61 75 74 6f 2d 64 65 74 65 63 74 2d 69 73 62 6e 29 0a 20 20 20 20 20 20 20 20 | b-pdf-auto-detect-isbn)......... |
| 318e0 | 20 20 20 20 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 3d 20 66 | .....nil))...........((string=.f |
| 31900 | 6f 72 6d 61 74 20 22 64 6a 76 75 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 65 | ormat."djvu")............(if.(fe |
| 31920 | 61 74 75 72 65 70 20 27 64 6a 76 75 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 | aturep.'djvu)................(ca |
| 31940 | 6c 69 62 72 65 64 62 2d 64 6a 76 75 2d 61 75 74 6f 2d 64 65 74 65 63 74 2d 69 73 62 6e 29 0a 20 | libredb-djvu-auto-detect-isbn).. |
| 31960 | 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 6e | ............nil))...........(t.n |
| 31980 | 69 6c 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 72 65 | il))))..(defun.calibredb-show-re |
| 319a0 | 73 75 6c 74 73 20 28 6d 65 74 61 64 61 74 61 20 26 6f 70 74 69 6f 6e 61 6c 20 73 77 69 74 63 68 | sults.(metadata.&optional.switch |
| 319c0 | 29 0a 20 20 22 44 69 73 70 6c 61 79 20 4d 45 54 41 44 41 54 41 20 66 65 74 63 68 20 72 65 73 75 | )..."Display.METADATA.fetch.resu |
| 319e0 | 6c 74 73 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 4f 70 74 69 6f | lts.in.the.current.buffer..Optio |
| 31a00 | 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 53 57 49 54 43 48 20 74 6f 20 73 77 69 74 63 68 20 74 6f | nal.argument.SWITCH.to.switch.to |
| 31a20 | 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 20 62 75 66 66 65 72 20 74 6f 20 6f 74 | .*calibredb-search*.buffer.to.ot |
| 31a40 | 68 65 72 20 77 69 6e 64 6f 77 2e 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61 20 73 | her.window..This.function.is.a.s |
| 31a60 | 6c 69 67 68 6c 79 20 6d 6f 64 69 66 69 65 64 20 76 65 72 73 69 6f 6e 20 66 72 6f 6d 20 66 75 6e | lighly.modified.version.from.fun |
| 31a80 | 63 74 69 6f 6e 20 60 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 65 6e 74 72 79 27 22 0a 20 20 | ction.`calibredb-show-entry'"... |
| 31aa0 | 28 75 6e 6c 65 73 73 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 | (unless.(eq.major-mode.'calibred |
| 31ac0 | 62 2d 73 68 6f 77 2d 6d 6f 64 65 29 0a 20 20 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 | b-show-mode).....(when.(get-buff |
| 31ae0 | 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 | er.(calibredb-show--buffer-name. |
| 31b00 | 6d 65 74 61 64 61 74 61 29 29 0a 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 63 | metadata)).......(kill-buffer.(c |
| 31b20 | 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 6d 65 74 61 64 | alibredb-show--buffer-name.metad |
| 31b40 | 61 74 61 29 29 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 62 75 66 66 20 28 67 65 74 2d 62 75 66 66 | ata))))...(let*.((buff.(get-buff |
| 31b60 | 65 72 2d 63 72 65 61 74 65 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 65 | er-create.(calibredb-show--buffe |
| 31b80 | 72 2d 6e 61 6d 65 20 6d 65 74 61 64 61 74 61 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 61 67 | r-name.metadata)))..........(tag |
| 31ba0 | 20 28 63 64 72 20 28 61 73 73 6f 63 20 22 54 61 67 73 22 20 6d 65 74 61 64 61 74 61 29 29 29 0a | .(cdr.(assoc."Tags".metadata))). |
| 31bc0 | 20 20 20 20 20 20 20 20 20 28 63 6f 6d 6d 65 6e 74 20 28 63 64 72 20 28 61 73 73 6f 63 20 22 43 | .........(comment.(cdr.(assoc."C |
| 31be0 | 6f 6d 6d 65 6e 74 73 22 20 6d 65 74 61 64 61 74 61 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d | omments".metadata)))..........(m |
| 31c00 | 79 61 75 74 68 6f 72 73 20 28 63 64 72 20 28 61 73 73 6f 63 20 22 41 75 74 68 6f 72 73 22 20 6d | yauthors.(cdr.(assoc."Authors".m |
| 31c20 | 65 74 61 64 61 74 61 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 28 63 64 72 20 | etadata)))..........(title.(cdr. |
| 31c40 | 28 61 73 73 6f 63 20 22 54 69 74 6c 65 22 20 6d 65 74 61 64 61 74 61 29 29 29 0a 20 20 20 20 20 | (assoc."Title".metadata)))...... |
| 31c60 | 20 20 20 20 28 70 75 62 64 61 74 65 20 28 63 64 72 20 28 61 73 73 6f 63 20 22 50 75 62 6c 69 73 | ....(pubdate.(cdr.(assoc."Publis |
| 31c80 | 68 65 64 22 20 6d 65 74 61 64 61 74 61 29 29 29 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 28 71 75 | hed".metadata)))..........;;.(qu |
| 31ca0 | 65 72 79 2d 72 65 73 75 6c 74 20 28 63 64 72 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d | ery-result.(cdr.(car.(calibredb- |
| 31cc0 | 63 61 6e 64 69 64 61 74 65 20 69 64 29 29 29 29 20 3b 20 67 65 74 20 74 68 65 20 6e 65 77 20 6d | candidate.id)))).;.get.the.new.m |
| 31ce0 | 65 74 61 64 61 74 61 20 74 68 72 6f 75 67 68 20 53 51 4c 20 71 75 65 72 79 0a 20 20 20 20 20 20 | etadata.through.SQL.query....... |
| 31d00 | 20 20 20 3b 3b 20 28 63 6f 76 65 72 20 28 66 6f 72 6d 61 74 20 22 2f 74 6d 70 2f 25 73 2e 6a 70 | ...;;.(cover.(format."/tmp/%s.jp |
| 31d20 | 67 22 20 73 6f 75 72 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 76 65 72 20 28 63 61 6c | g".source))..........(cover.(cal |
| 31d40 | 69 62 72 65 64 62 2d 67 65 74 2d 63 6f 76 65 72 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 | ibredb-get-cover.(car.(calibredb |
| 31d60 | 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 | -find-candidate-at-point)))).... |
| 31d80 | 20 20 20 20 20 20 3b 3b 20 28 66 6f 72 6d 61 74 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 | ......;;.(format.(calibredb-geta |
| 31da0 | 74 74 72 20 6d 65 74 61 64 61 74 61 20 3a 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 | ttr.metadata.:book-format))..... |
| 31dc0 | 20 20 20 20 20 28 6f 72 69 67 69 6e 61 6c 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 | .....(original.(point))......... |
| 31de0 | 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20 28 63 6c 65 61 72 2d 69 6d 61 67 65 2d 63 61 63 68 65 | .beg.end).....(clear-image-cache |
| 31e00 | 20 63 6f 76 65 72 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 | .cover).....(let.((inhibit-read- |
| 31e20 | 6f 6e 6c 79 20 74 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 | only.t)).......(with-current-buf |
| 31e40 | 66 65 72 20 62 75 66 66 0a 20 20 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 0a | fer.buff.........(erase-buffer). |
| 31e60 | 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 65 67 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 | ........(setq.beg.(point))...... |
| 31e80 | 20 20 20 3b 3b 20 28 69 6e 73 65 72 74 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 63 61 6c 69 62 | ...;;.(insert.(propertize.(calib |
| 31ea0 | 72 65 64 62 2d 73 68 6f 77 2d 6d 65 74 61 64 61 74 61 20 6d 65 74 61 64 61 74 61 29 20 27 63 61 | redb-show-metadata.metadata).'ca |
| 31ec0 | 6c 69 62 72 65 64 62 2d 6d 65 74 61 64 61 74 61 20 6d 65 74 61 64 61 74 61 29 29 0a 20 20 20 20 | libredb-metadata.metadata))..... |
| 31ee0 | 20 20 20 20 28 73 65 74 71 20 65 6e 64 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 28 | ....(setq.end.(point)).........( |
| 31f00 | 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 62 65 67 20 65 6e 64 20 27 63 61 6c 69 62 | put-text-property.beg.end.'calib |
| 31f20 | 72 65 64 62 2d 6d 65 74 61 64 61 74 61 20 6d 65 74 61 64 61 74 61 29 0a 20 20 20 20 20 20 20 20 | redb-metadata.metadata)......... |
| 31f40 | 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 54 69 74 6c 65 20 20 20 20 20 20 20 25 73 5c | (insert.(format."Title.......%s\ |
| 31f60 | 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 74 69 74 6c 65 20 27 66 61 63 65 20 27 63 61 6c 69 | n".(propertize.title.'face.'cali |
| 31f80 | 62 72 65 64 62 2d 74 69 74 6c 65 2d 66 61 63 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 | bredb-title-face))).........(ins |
| 31fa0 | 65 72 74 20 28 66 6f 72 6d 61 74 20 22 41 75 74 68 6f 72 28 73 29 20 20 20 25 73 5c 6e 22 20 28 | ert.(format."Author(s)...%s\n".( |
| 31fc0 | 70 72 6f 70 65 72 74 69 7a 65 20 6d 79 61 75 74 68 6f 72 73 20 27 66 61 63 65 20 27 63 61 6c 69 | propertize.myauthors.'face.'cali |
| 31fe0 | 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 61 63 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 | bredb-author-face))).........(wh |
| 32000 | 65 6e 20 74 61 67 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 54 61 67 73 20 20 20 20 | en.tag.(insert.(format."Tags.... |
| 32020 | 20 20 20 20 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 74 61 67 20 27 66 61 63 65 20 | ....%s\n".(propertize.tag.'face. |
| 32040 | 27 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 66 61 63 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 | 'calibredb-tag-face))))......... |
| 32060 | 28 77 68 65 6e 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 | (when.comment...........(insert. |
| 32080 | 28 66 6f 72 6d 61 74 20 22 43 6f 6d 6d 65 6e 74 73 20 20 20 20 25 73 5c 6e 22 20 28 70 72 6f 70 | (format."Comments....%s\n".(prop |
| 320a0 | 65 72 74 69 7a 65 20 63 6f 6d 6d 65 6e 74 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d | ertize.comment.'face.'calibredb- |
| 320c0 | 63 6f 6d 6d 65 6e 74 2d 66 61 63 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 70 | comment-face)))).........(when.p |
| 320e0 | 75 62 64 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 | ubdate...........(insert.(format |
| 32100 | 20 22 50 75 62 6c 69 73 68 65 64 20 20 20 25 73 5c 6e 22 20 28 70 72 6f 70 65 72 74 69 7a 65 20 | ."Published...%s\n".(propertize. |
| 32120 | 70 75 62 64 61 74 65 20 27 66 61 63 65 20 27 63 61 6c 69 62 72 65 64 62 2d 70 75 62 64 61 74 65 | pubdate.'face.'calibredb-pubdate |
| 32140 | 2d 66 61 63 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 22 29 0a | -face)))).........(insert."\n"). |
| 32160 | 20 20 20 20 20 20 20 20 3b 3b 20 28 69 66 20 28 69 6d 61 67 65 2d 74 79 70 65 2d 61 76 61 69 6c | ........;;.(if.(image-type-avail |
| 32180 | 61 62 6c 65 2d 70 20 28 69 6e 74 65 72 6e 20 66 6f 72 6d 61 74 29 29 0a 20 20 20 20 20 20 20 20 | able-p.(intern.format))......... |
| 321a0 | 3b 3b 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 66 | ;;.....(calibredb-insert-image.f |
| 321c0 | 69 6c 65 20 22 22 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d 76 69 65 77 2d 69 6d 61 67 65 | ile."".calibredb-list-view-image |
| 321e0 | 2d 6d 61 78 2d 77 69 64 74 68 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d 76 69 65 77 2d 69 | -max-width.calibredb-list-view-i |
| 32200 | 6d 61 67 65 2d 6d 61 78 2d 68 65 69 67 68 74 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 20 20 28 63 | mage-max-height).........;;...(c |
| 32220 | 61 6c 69 62 72 65 64 62 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 63 6f 76 65 72 20 22 22 20 63 | alibredb-insert-image.cover."".c |
| 32240 | 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 77 69 64 | alibredb-list-view-image-max-wid |
| 32260 | 74 68 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 | th.calibredb-list-view-image-max |
| 32280 | 2d 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 63 6f 76 65 72 0a 20 20 20 20 | -height)).........(if.cover..... |
| 322a0 | 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 | ........(calibredb-insert-image. |
| 322c0 | 63 6f 76 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | cover........................... |
| 322e0 | 20 20 20 20 20 20 20 20 20 20 22 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .........."".................... |
| 32300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d | .................calibredb-list- |
| 32320 | 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 77 69 64 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 | view-image-max-width............ |
| 32340 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 | .........................calibre |
| 32360 | 64 62 2d 6c 69 73 74 2d 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 68 65 69 67 68 74 29 0a 20 | db-list-view-image-max-height).. |
| 32380 | 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 74 20 22 4e 6f 20 63 6f 76 65 72 20 61 76 61 69 6c 61 | .........(print."No.cover.availa |
| 323a0 | 62 6c 65 22 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 28 73 65 74 71 20 65 6e 64 20 28 70 6f 69 | ble")).........;;.(setq.end.(poi |
| 323c0 | 6e 74 29 29 0a 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 6d 6f 64 | nt)).........(calibredb-show-mod |
| 323e0 | 65 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 73 68 | e).........;;.(setq.calibredb-sh |
| 32400 | 6f 77 2d 6d 65 74 61 64 61 74 61 20 6d 65 74 61 64 61 74 61 29 0a 20 20 20 20 20 20 20 20 28 67 | ow-metadata.metadata).........(g |
| 32420 | 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 29 29 0a 20 20 20 20 28 75 6e 6c | oto-char.(point-min)))).....(unl |
| 32440 | 65 73 73 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 68 | ess.(eq.major-mode.'calibredb-sh |
| 32460 | 6f 77 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 | ow-mode).......(switch-to-buffer |
| 32480 | 20 62 75 66 66 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 73 77 69 74 63 68 0a 20 20 20 20 20 20 | .buff).......(when.switch....... |
| 324a0 | 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 | ..(switch-to-buffer-other-window |
| 324c0 | 20 28 73 65 74 2d 62 75 66 66 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 2d | .(set-buffer.(calibredb-search-- |
| 324e0 | 62 75 66 66 65 72 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 | buffer-name))).........(goto-cha |
| 32500 | 72 20 6f 72 69 67 69 6e 61 6c 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 | r.original)))))..(defun.calibred |
| 32520 | 62 2d 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 2d 66 72 6f 6d 2d 73 6f 75 72 63 65 73 20 28 61 | b-fetch-metadata-from-sources.(a |
| 32540 | 75 74 68 6f 72 20 74 69 74 6c 65 20 26 6f 70 74 69 6f 6e 61 6c 20 69 64 73 20 69 73 62 6e 20 66 | uthor.title.&optional.ids.isbn.f |
| 32560 | 65 74 63 68 2d 63 6f 76 65 72 29 0a 20 20 22 46 65 74 63 68 20 6d 65 74 61 64 61 74 61 20 66 72 | etch-cover)..."Fetch.metadata.fr |
| 32580 | 6f 6d 20 6f 6e 6c 69 6e 65 20 73 6f 75 72 63 65 20 76 69 61 20 61 75 74 68 6f 72 20 61 6e 64 20 | om.online.source.via.author.and. |
| 325a0 | 74 69 74 6c 65 20 6f 72 20 49 53 42 4e 2e 0a 49 6e 76 6f 6b 65 20 66 72 6f 6d 20 2a 63 61 6c 69 | title.or.ISBN..Invoke.from.*cali |
| 325c0 | 62 72 65 64 62 2d 73 65 61 72 63 68 2a 20 62 75 66 66 65 72 2e 0a 41 55 54 48 4f 52 2c 20 54 49 | bredb-search*.buffer..AUTHOR,.TI |
| 325e0 | 54 4c 45 2c 20 49 44 53 20 61 6e 64 20 49 53 42 4e 20 73 68 6f 75 6c 64 20 62 65 20 73 74 72 69 | TLE,.IDS.and.ISBN.should.be.stri |
| 32600 | 6e 67 73 2e 0a 52 65 74 75 72 6e 73 20 61 6e 20 61 6c 69 73 74 20 77 69 74 68 20 65 6c 65 6d 65 | ngs..Returns.an.alist.with.eleme |
| 32620 | 6e 74 73 20 28 53 4f 55 52 43 45 20 52 45 53 55 4c 54 53 29 20 77 68 65 72 65 20 53 4f 55 52 43 | nts.(SOURCE.RESULTS).where.SOURC |
| 32640 | 45 20 69 73 20 61 0a 73 74 72 69 6e 67 20 61 6e 64 20 52 45 53 55 4c 54 53 20 69 73 20 61 6e 20 | E.is.a.string.and.RESULTS.is.an. |
| 32660 | 61 6c 69 73 74 20 77 69 74 68 20 65 6c 65 6d 65 6e 74 73 20 28 50 52 4f 50 20 56 41 4c 55 45 29 | alist.with.elements.(PROP.VALUE) |
| 32680 | 2e 20 49 66 20 6e 6f 0a 6d 65 74 61 64 61 74 61 20 77 61 73 20 66 6f 75 6e 64 20 66 72 6f 6d 20 | ..If.no.metadata.was.found.from. |
| 326a0 | 61 20 73 6f 75 72 63 65 20 74 68 65 6e 20 69 6e 20 74 68 65 6e 20 6e 69 6c 20 69 73 20 72 65 74 | a.source.then.in.then.nil.is.ret |
| 326c0 | 75 72 6e 65 64 20 69 6e 0a 74 68 65 20 6f 75 74 65 72 20 61 6c 69 73 74 20 28 6e 69 6c 20 69 6e | urned.in.the.outer.alist.(nil.in |
| 326e0 | 73 74 65 61 64 20 6f 66 20 28 53 4f 55 52 43 45 20 52 45 53 55 4c 54 53 29 29 2e 22 0a 20 20 28 | stead.of.(SOURCE.RESULTS))."...( |
| 32700 | 6c 65 74 2a 20 28 28 61 75 74 68 6f 72 73 20 28 69 66 20 28 6f 72 20 69 73 62 6e 20 69 64 73 29 | let*.((authors.(if.(or.isbn.ids) |
| 32720 | 20 22 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 73 74 | ."".....................(read-st |
| 32740 | 72 69 6e 67 20 22 41 75 74 68 6f 72 73 3a 20 22 20 61 75 74 68 6f 72 29 29 29 0a 20 20 20 20 20 | ring."Authors:.".author)))...... |
| 32760 | 20 20 20 20 28 74 69 74 6c 65 20 28 69 66 20 28 6f 72 20 69 73 62 6e 20 69 64 73 29 20 22 22 0a | ....(title.(if.(or.isbn.ids)."". |
| 32780 | 20 20 20 20 20 20 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 | ..................(read-string." |
| 327a0 | 54 69 74 6c 65 3a 20 22 20 74 69 74 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 64 20 28 | Title:.".title)))..........(id.( |
| 327c0 | 69 66 20 69 64 73 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 49 44 3a 20 22 20 69 | if.ids.(completing-read."ID:.".i |
| 327e0 | 64 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 | ds)................nil))........ |
| 32800 | 20 20 28 69 73 62 6e 20 28 69 66 20 69 73 62 6e 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 49 | ..(isbn.(if.isbn.(read-string."I |
| 32820 | 53 42 4e 3a 20 22 20 69 73 62 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 | SBN:.".isbn)..................ni |
| 32840 | 6c 29 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 46 65 74 63 68 69 6e 67 20 6d 65 74 61 | l))).....(message."Fetching.meta |
| 32860 | 64 61 74 61 20 66 72 6f 6d 20 73 6f 75 72 63 65 73 2e 2e 2e 20 6d 61 79 20 74 61 6b 65 20 61 20 | data.from.sources....may.take.a. |
| 32880 | 66 65 77 20 73 65 63 6f 6e 64 73 22 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 73 6f 75 72 63 65 | few.seconds").....(let*.((source |
| 328a0 | 73 20 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 2d 73 6f 75 72 63 | s.calibredb-fetch-metadata-sourc |
| 328c0 | 65 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 72 65 73 75 6c 74 73 20 28 6d 61 70 | e-list)............(results.(map |
| 328e0 | 63 61 72 0a 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 | car......................(lambda |
| 32900 | 20 28 73 6f 75 72 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(source)....................... |
| 32920 | 20 28 6c 65 74 2a 20 28 28 63 6d 64 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(let*.((cmd.(cond.............. |
| 32940 | 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 64 0a 20 20 20 20 20 | .......................(id...... |
| 32960 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 32980 | 28 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 20 20 20 20 20 | (format......................... |
| 329a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 66 65 74 63 68 2d 63 6f 76 65 72 0a 20 20 | ..............(if.fetch-cover... |
| 329c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 329e0 | 20 20 20 20 20 20 20 20 60 2c 28 66 6f 72 6d 61 74 20 22 25 25 73 20 2d 70 20 5c 22 25 25 73 5c | ........`,(format."%%s.-p.\"%%s\ |
| 32a00 | 22 20 2d 2d 69 64 65 6e 74 69 66 69 65 72 20 5c 22 25 25 73 5c 22 20 2d 63 20 25 73 20 20 32 3e | ".--identifier.\"%%s\".-c.%s..2> |
| 32a20 | 2f 64 65 76 2f 6e 75 6c 6c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | /dev/null"...................... |
| 32a40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ...............................( |
| 32a60 | 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 65 72 2e 6a 70 67 22 20 74 65 6d | expand-file-name."cover.jpg".tem |
| 32a80 | 70 6f 72 61 72 79 2d 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 | porary-file-directory))......... |
| 32aa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 32ac0 | 22 25 73 20 2d 70 20 5c 22 25 73 5c 22 20 2d 2d 69 64 65 6e 74 69 66 69 65 72 20 5c 22 25 73 5c | "%s.-p.\"%s\".--identifier.\"%s\ |
| 32ae0 | 22 20 32 3e 2f 64 65 76 2f 6e 75 6c 6c 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ".2>/dev/null")................. |
| 32b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d | ......................calibredb- |
| 32b20 | 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 2d 70 72 6f 67 72 61 6d 0a 20 20 20 20 20 20 20 20 20 | fetch-metadata-program.......... |
| 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 73 6f 75 | .............................sou |
| 32b60 | 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 20 20 | rce............................. |
| 32b80 | 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 20 20 20 20 20 20 | ..........id)).................. |
| 32ba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 62 6e 0a 20 20 20 20 20 20 20 | ...................(isbn........ |
| 32bc0 | 20 20 20 20 20 20 20 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 | ..............................(f |
| 32be0 | 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 20 20 20 20 20 20 20 | ormat........................... |
| 32c00 | 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 66 65 74 63 68 2d 63 6f 76 65 72 0a 20 20 20 20 | ............(if.fetch-cover..... |
| 32c20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 32c40 | 20 20 20 20 20 20 60 2c 28 66 6f 72 6d 61 74 20 22 25 25 73 20 2d 70 20 5c 22 25 25 73 5c 22 20 | ......`,(format."%%s.-p.\"%%s\". |
| 32c60 | 2d 2d 69 73 62 6e 20 5c 22 25 25 73 5c 22 20 2d 63 20 25 73 20 20 32 3e 2f 64 65 76 2f 6e 75 6c | --isbn.\"%%s\".-c.%s..2>/dev/nul |
| 32c80 | 6c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | l".............................. |
| 32ca0 | 20 20 20 20 20 20 20 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 | ......................(expand-fi |
| 32cc0 | 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 65 72 2e 6a 70 67 22 20 74 65 6d 70 6f 72 61 72 79 2d 66 69 | le-name."cover.jpg".temporary-fi |
| 32ce0 | 6c 65 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | le-directory)).................. |
| 32d00 | 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 73 20 2d 70 20 5c 22 | ......................."%s.-p.\" |
| 32d20 | 25 73 5c 22 20 2d 2d 69 73 62 6e 20 5c 22 25 73 5c 22 20 32 3e 2f 64 65 76 2f 6e 75 6c 6c 22 29 | %s\".--isbn.\"%s\".2>/dev/null") |
| 32d40 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 32d60 | 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 2d | .......calibredb-fetch-metadata- |
| 32d80 | 70 72 6f 67 72 61 6d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | program......................... |
| 32da0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 6f 75 72 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 | ..............source............ |
| 32dc0 | 20 20 20 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 62 6e 29 | ...........................isbn) |
| 32de0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | )............................... |
| 32e00 | 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ......(t........................ |
| 32e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 | ..............(format........... |
| 32e40 | 20 20 20 20 20 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 | ............................(if. |
| 32e60 | 66 65 74 63 68 2d 63 6f 76 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | fetch-cover..................... |
| 32e80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 2c 28 66 6f 72 6d 61 74 20 | ......................`,(format. |
| 32ea0 | 22 25 25 73 20 2d 70 20 5c 22 25 25 73 5c 22 20 2d 2d 61 75 74 68 6f 72 73 20 5c 22 25 25 73 5c | "%%s.-p.\"%%s\".--authors.\"%%s\ |
| 32ec0 | 22 20 2d 2d 74 69 74 6c 65 20 5c 22 25 25 73 5c 22 20 2d 63 20 25 73 20 20 32 3e 2f 64 65 76 2f | ".--title.\"%%s\".-c.%s..2>/dev/ |
| 32ee0 | 6e 75 6c 6c 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 | null"........................... |
| 32f00 | 20 20 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 78 70 61 6e 64 | .........................(expand |
| 32f20 | 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 65 72 2e 6a 70 67 22 20 74 65 6d 70 6f 72 61 72 79 | -file-name."cover.jpg".temporary |
| 32f40 | 2d 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -file-directory))............... |
| 32f60 | 20 20 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 73 20 2d 70 | .........................."%s.-p |
| 32f80 | 20 5c 22 25 73 5c 22 20 2d 2d 61 75 74 68 6f 72 73 20 5c 22 25 73 5c 22 20 2d 2d 74 69 74 6c 65 | .\"%s\".--authors.\"%s\".--title |
| 32fa0 | 20 5c 22 25 73 5c 22 20 32 3e 2f 64 65 76 2f 6e 75 6c 6c 22 29 0a 20 20 20 20 20 20 20 20 20 20 | .\"%s\".2>/dev/null")........... |
| 32fc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 | ............................cali |
| 32fe0 | 62 72 65 64 62 2d 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 2d 70 72 6f 67 72 61 6d 0a 20 20 20 | bredb-fetch-metadata-program.... |
| 33000 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 33020 | 20 20 20 73 6f 75 72 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...source....................... |
| 33040 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 75 74 68 6f 72 73 0a 20 20 20 20 20 20 20 20 | ................authors......... |
| 33060 | 20 20 20 20 20 20 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 69 | ..............................ti |
| 33080 | 74 6c 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | tle))))......................... |
| 330a0 | 20 20 20 20 20 20 28 6d 64 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74 72 69 | ......(md.(shell-command-to-stri |
| 330c0 | 6e 67 20 63 6d 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ng.cmd))........................ |
| 330e0 | 20 20 20 20 20 20 20 28 6d 64 2d 73 70 6c 69 74 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 | .......(md-split.(if.(string-mat |
| 33100 | 63 68 20 22 4e 6f 20 72 65 73 75 6c 74 73 20 66 6f 75 6e 64 24 22 20 6d 64 29 20 6e 69 6c 0a 20 | ch."No.results.found$".md).nil.. |
| 33120 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 33140 | 20 20 20 20 20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 6d 64 20 22 43 6f 6d 6d 65 | .........(split-string.md."Comme |
| 33160 | 6e 74 73 22 20 6e 69 6c 20 22 20 2a 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | nts".nil.".*")))................ |
| 33180 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 2d 63 6f 6d 6d 65 6e 74 73 20 28 69 66 20 | ...............(no-comments.(if. |
| 331a0 | 6d 64 2d 73 70 6c 69 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 | md-split........................ |
| 331c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 | ........................(mapcar. |
| 331e0 | 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (lambda.(x)..................... |
| 33200 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 33220 | 20 20 20 20 20 28 6c 65 74 20 28 28 73 74 72 69 6e 67 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 | .....(let.((string.x)).......... |
| 33240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 33260 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 | ..................(string-match. |
| 33280 | 22 5c 5c 28 5b 41 2d 7a 5d 2a 5c 5c 29 28 2a 5c 5c 28 73 5c 5c 29 2a 29 2a 20 2a 3a 20 2a 5c 5c | "\\([A-z]*\\)(*\\(s\\)*)*.*:.*\\ |
| 332a0 | 28 2e 2a 5c 5c 29 22 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (.*\\)".string)................. |
| 332c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 332e0 | 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 22 20 | ...........(cons.(format."%s%s". |
| 33300 | 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 73 74 72 69 6e 67 29 20 28 63 6f 6e 64 20 28 28 | (match-string.1.string).(cond.(( |
| 33320 | 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 20 73 74 72 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 | match-string.2.string))......... |
| 33340 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 33360 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 33380 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 333a0 | 20 20 20 20 20 20 28 22 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ......(""))).................... |
| 333c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 333e0 | 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 33 20 73 74 | ..............(match-string.3.st |
| 33400 | 72 69 6e 67 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 | ring))))........................ |
| 33420 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 33440 | 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 63 61 72 20 6d 64 2d 73 70 6c 69 74 29 20 22 5c 6e | (split-string.(car.md-split)."\n |
| 33460 | 22 20 74 20 22 20 2a 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ".t.".*"))...................... |
| 33480 | 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 29 29 0a 20 20 | ........................nil))... |
| 334a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6b 6f 76 | ............................(kov |
| 334c0 | 69 64 73 2d 6d 61 67 69 63 20 22 25 73 20 2d 63 20 20 5c 22 66 72 6f 6d 20 63 61 6c 69 62 72 65 | ids-magic."%s.-c..\"from.calibre |
| 334e0 | 2e 65 62 6f 6f 6b 73 2e 6d 65 74 61 64 61 74 61 20 69 6d 70 6f 72 74 20 2a 3b 20 69 6d 70 6f 72 | .ebooks.metadata.import.*;.impor |
| 33500 | 74 20 73 79 73 3b 20 70 72 69 6e 74 28 61 75 74 68 6f 72 5f 74 6f 5f 61 75 74 68 6f 72 5f 73 6f | t.sys;.print(author_to_author_so |
| 33520 | 72 74 28 27 20 27 2e 6a 6f 69 6e 28 73 79 73 2e 61 72 67 76 5b 31 3a 5d 29 29 29 5c 22 20 5c 22 | rt('.'.join(sys.argv[1:])))\".\" |
| 33540 | 25 73 5c 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | %s\"").......................... |
| 33560 | 20 20 20 20 20 28 61 75 74 68 6f 72 2d 73 6f 72 74 20 28 77 68 65 6e 20 28 63 64 72 20 28 61 73 | .....(author-sort.(when.(cdr.(as |
| 33580 | 73 6f 63 20 22 41 75 74 68 6f 72 73 22 20 6e 6f 2d 63 6f 6d 6d 65 6e 74 73 29 29 0a 20 20 20 20 | soc."Authors".no-comments))..... |
| 335a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 335c0 | 20 20 20 20 20 20 20 20 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74 72 69 6e | .........(shell-command-to-strin |
| 335e0 | 67 20 28 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 20 20 20 | g.(format....................... |
| 33600 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 33620 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6b 6f 76 69 64 73 2d 6d 61 67 69 63 0a 20 20 | .................kovids-magic... |
| 33640 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 33660 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 33680 | 20 20 20 20 20 63 61 6c 69 62 72 65 64 62 2d 64 65 62 75 67 2d 70 72 6f 67 72 61 6d 0a 20 20 20 | .....calibredb-debug-program.... |
| 336a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 336c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 336e0 | 20 20 20 20 28 69 6e 74 65 72 6e 20 28 63 64 72 20 28 61 73 73 6f 63 20 22 41 75 74 68 6f 72 73 | ....(intern.(cdr.(assoc."Authors |
| 33700 | 22 20 6e 6f 2d 63 6f 6d 6d 65 6e 74 73 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ".no-comments)))))))............ |
| 33720 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 65 77 2d 63 6f 6d 6d 65 6e 74 73 | ...................(new-comments |
| 33740 | 20 28 77 68 65 6e 20 61 75 74 68 6f 72 2d 73 6f 72 74 20 28 61 70 70 65 6e 64 20 6e 6f 2d 63 6f | .(when.author-sort.(append.no-co |
| 33760 | 6d 6d 65 6e 74 73 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 22 41 75 74 68 6f 72 5f 73 6f 72 74 22 | mments.(list.(cons."Author_sort" |
| 33780 | 20 61 75 74 68 6f 72 2d 73 6f 72 74 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | .author-sort)))))).............. |
| 337a0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 63 6d 64 29 0a 20 20 20 20 20 20 | ............(message.cmd)....... |
| 337c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6e 74 68 20 31 20 6d 64 | ...................(if.(nth.1.md |
| 337e0 | 2d 73 70 6c 69 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 | -split)......................... |
| 33800 | 20 20 20 20 20 28 77 68 65 6e 20 6e 65 77 2d 63 6f 6d 6d 65 6e 74 73 20 28 63 6f 6e 73 20 73 6f | .....(when.new-comments.(cons.so |
| 33820 | 75 72 63 65 20 28 61 70 70 65 6e 64 20 6e 65 77 2d 63 6f 6d 6d 65 6e 74 73 20 28 6c 69 73 74 20 | urce.(append.new-comments.(list. |
| 33840 | 28 63 6f 6e 73 20 22 43 6f 6d 6d 65 6e 74 73 22 20 28 73 75 62 73 74 72 69 6e 67 20 28 6e 74 68 | (cons."Comments".(substring.(nth |
| 33860 | 20 31 20 6d 64 2d 73 70 6c 69 74 29 20 32 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | .1.md-split).2))))))............ |
| 33880 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 6e 65 77 2d 63 6f 6d 6d 65 6e | ................(when.new-commen |
| 338a0 | 74 73 20 28 63 6f 6e 73 20 73 6f 75 72 63 65 20 6e 65 77 2d 63 6f 6d 6d 65 6e 74 73 29 29 29 29 | ts.(cons.source.new-comments)))) |
| 338c0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 6f 75 72 63 65 73 29 29 | )......................sources)) |
| 338e0 | 29 0a 20 20 20 20 20 20 28 69 66 20 28 72 65 6d 6f 76 65 20 6e 69 6c 20 72 65 73 75 6c 74 73 29 | ).......(if.(remove.nil.results) |
| 33900 | 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 76 65 20 6e 69 6c 20 72 65 73 75 6c 74 73 29 0a | ...........(remove.nil.results). |
| 33920 | 20 20 20 20 20 20 20 20 6e 69 6c 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 | ........nil))))..(defun.calibred |
| 33940 | 62 2d 73 65 6c 65 63 74 2d 61 6e 64 2d 73 65 74 2d 63 6f 76 65 72 20 28 29 0a 20 20 22 53 65 6c | b-select-and-set-cover.()..."Sel |
| 33960 | 65 63 74 20 61 6e 64 20 73 65 74 20 63 6f 76 65 72 2e 22 0a 20 20 28 77 68 65 6e 20 28 67 65 74 | ect.and.set.cover."...(when.(get |
| 33980 | 2d 62 75 66 66 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 65 72 2d | -buffer.(calibredb-show--buffer- |
| 339a0 | 6e 61 6d 65 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 | name.(calibredb-find-candidate-a |
| 339c0 | 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 63 61 6c | t-point))).....(kill-buffer.(cal |
| 339e0 | 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 28 63 61 6c 69 62 72 | ibredb-show--buffer-name.(calibr |
| 33a00 | 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 0a | edb-find-candidate-at-point)))). |
| 33a20 | 20 20 28 6c 65 74 20 28 28 6f 72 69 67 69 6e 61 6c 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 | ..(let.((original.(calibredb-get |
| 33a40 | 2d 63 6f 76 65 72 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 | -cover.(car.(calibredb-find-cand |
| 33a60 | 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 61 6e 64 | idate-at-point))))).....(if.(and |
| 33a80 | 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 6f 72 69 67 69 6e 61 6c 29 20 28 66 69 6c 65 2d | .(file-exists-p.original).(file- |
| 33aa0 | 65 78 69 73 74 73 2d 70 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 65 | exists-p.(expand-file-name."cove |
| 33ac0 | 72 2e 6a 70 67 22 20 74 65 6d 70 6f 72 61 72 79 2d 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 29 | r.jpg".temporary-file-directory) |
| 33ae0 | 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 62 75 66 66 20 28 67 65 74 2d 62 75 66 | )).........(let*.((buff.(get-buf |
| 33b00 | 66 65 72 2d 63 72 65 61 74 65 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 2d 62 75 66 66 | fer-create.(calibredb-show--buff |
| 33b20 | 65 72 2d 6e 61 6d 65 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 61 6e 64 69 64 61 74 | er-name.(calibredb-find-candidat |
| 33b40 | 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 | e-at-point))))................(f |
| 33b60 | 65 74 63 68 65 64 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 65 72 2e | etched.(expand-file-name."cover. |
| 33b80 | 6a 70 67 22 20 74 65 6d 70 6f 72 61 72 79 2d 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 29 29 29 | jpg".temporary-file-directory))) |
| 33ba0 | 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 65 61 72 2d 69 6d 61 67 65 2d 63 61 63 68 65 20 28 65 | ...........(clear-image-cache.(e |
| 33bc0 | 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 65 72 2e 6a 70 67 22 20 74 65 6d 70 | xpand-file-name."cover.jpg".temp |
| 33be0 | 6f 72 61 72 79 2d 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 | orary-file-directory)).......... |
| 33c00 | 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 0a 20 20 20 20 20 | .(with-current-buffer.buff...... |
| 33c20 | 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 20 6f | .......(calibredb-insert-image.o |
| 33c40 | 72 69 67 69 6e 61 6c 20 22 22 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d 76 69 65 77 2d 69 | riginal."".calibredb-list-view-i |
| 33c60 | 6d 61 67 65 2d 6d 61 78 2d 77 69 64 74 68 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d 76 69 | mage-max-width.calibredb-list-vi |
| 33c80 | 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 68 65 69 67 68 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ew-image-max-height)............ |
| 33ca0 | 20 28 69 6e 73 65 72 74 20 22 20 6f 72 69 67 69 6e 61 6c 20 20 66 65 74 63 68 65 64 20 22 29 0a | .(insert.".original..fetched."). |
| 33cc0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 69 6e 73 65 72 74 2d 69 6d | ............(calibredb-insert-im |
| 33ce0 | 61 67 65 20 66 65 74 63 68 65 64 20 22 22 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 74 2d 76 69 | age.fetched."".calibredb-list-vi |
| 33d00 | 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 77 69 64 74 68 20 63 61 6c 69 62 72 65 64 62 2d 6c 69 73 | ew-image-max-width.calibredb-lis |
| 33d20 | 74 2d 76 69 65 77 2d 69 6d 61 67 65 2d 6d 61 78 2d 68 65 69 67 68 74 29 0a 20 20 20 20 20 20 20 | t-view-image-max-height)........ |
| 33d40 | 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 66 29 0a 20 20 20 | .....(switch-to-buffer.buff).... |
| 33d60 | 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 3d 20 28 63 6f 6d 70 6c 65 74 | .........(when.(string=.(complet |
| 33d80 | 69 6e 67 2d 72 65 61 64 20 22 53 65 6c 65 63 74 20 63 6f 76 65 72 3a 20 22 20 27 28 22 6f 72 69 | ing-read."Select.cover:.".'("ori |
| 33da0 | 67 69 6e 61 6c 22 20 22 66 65 74 63 68 65 64 22 29 29 20 22 66 65 74 63 68 65 64 22 29 0a 20 20 | ginal"."fetched"))."fetched")... |
| 33dc0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 6e 61 6d 65 2d 66 69 6c 65 20 28 65 78 70 61 6e 64 | ............(rename-file.(expand |
| 33de0 | 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 65 72 2e 6a 70 67 22 20 74 65 6d 70 6f 72 61 72 79 | -file-name."cover.jpg".temporary |
| 33e00 | 2d 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 29 20 6f 72 69 67 69 6e 61 6c 20 74 29 29 0a 20 20 | -file-directory).original.t))... |
| 33e20 | 20 20 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 | ..........(kill-buffer)))....... |
| 33e40 | 28 63 6f 6e 64 20 28 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 28 65 78 70 61 6e 64 2d 66 69 | (cond.((file-exists-p.(expand-fi |
| 33e60 | 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 65 72 2e 6a 70 67 22 20 74 65 6d 70 6f 72 61 72 79 2d 66 69 | le-name."cover.jpg".temporary-fi |
| 33e80 | 6c 65 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 6e | le-directory))..............(ren |
| 33ea0 | 61 6d 65 2d 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 63 6f 76 65 | ame-file.(expand-file-name."cove |
| 33ec0 | 72 2e 6a 70 67 22 20 74 65 6d 70 6f 72 61 72 79 2d 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 29 | r.jpg".temporary-file-directory) |
| 33ee0 | 20 6f 72 69 67 69 6e 61 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 74 | .original.t)..............(print |
| 33f00 | 20 22 46 65 74 63 68 65 64 20 63 6f 76 65 72 20 61 64 64 65 64 20 74 6f 20 65 6e 74 72 79 22 29 | ."Fetched.cover.added.to.entry") |
| 33f20 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 28 70 72 69 6e 74 20 22 4e 6f 20 63 6f 76 65 | ).............(t.(print."No.cove |
| 33f40 | 72 20 63 6f 75 6c 64 20 62 65 20 66 65 74 63 68 65 64 22 29 29 29 29 29 29 0a 0a 28 64 65 66 75 | r.could.be.fetched"))))))..(defu |
| 33f60 | 6e 20 63 61 6c 69 62 72 65 64 62 2d 73 65 6c 65 63 74 2d 6d 65 74 61 64 61 74 61 2d 73 6f 75 72 | n.calibredb-select-metadata-sour |
| 33f80 | 63 65 20 28 72 65 73 75 6c 74 73 29 0a 20 20 22 53 65 6c 65 63 74 20 6d 65 74 61 64 61 74 61 20 | ce.(results)..."Select.metadata. |
| 33fa0 | 73 6f 75 72 63 65 2e 0a 41 72 67 75 6d 65 6e 74 20 52 45 53 55 4c 54 53 20 69 73 20 74 68 65 20 | source..Argument.RESULTS.is.the. |
| 33fc0 | 73 6f 75 72 63 65 20 6c 69 73 74 2e 22 0a 20 20 28 63 64 72 20 28 61 73 73 6f 63 20 28 69 66 20 | source.list."...(cdr.(assoc.(if. |
| 33fe0 | 28 66 62 6f 75 6e 64 70 20 27 69 76 79 2d 72 65 61 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | (fboundp.'ivy-read)............. |
| 34000 | 20 20 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 53 65 6c 65 63 74 20 6d 65 74 61 64 61 74 61 | ......(ivy-read."Select.metadata |
| 34020 | 20 73 6f 75 72 63 65 20 28 70 72 65 76 69 65 77 20 77 69 74 68 20 43 2d 4d 2d 6e 2f 70 29 3a 20 | .source.(preview.with.C-M-n/p):. |
| 34040 | 22 20 72 65 73 75 6c 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 | ".results....................... |
| 34060 | 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ......:action................... |
| 34080 | 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 69 66 20 63 61 6c 69 62 72 | ..........(lambda.(x).(if.calibr |
| 340a0 | 65 64 62 2d 73 68 6f 77 2d 72 65 73 75 6c 74 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | edb-show-results................ |
| 340c0 | 20 20 20 20 20 20 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 | .............................(ca |
| 340e0 | 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 72 65 73 75 6c 74 73 20 28 63 64 72 20 78 29 29 29 29 29 | libredb-show-results.(cdr.x))))) |
| 34100 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 | .................(completing-rea |
| 34120 | 64 20 22 53 65 6c 65 63 74 20 6d 65 74 61 64 61 74 61 20 73 6f 75 72 63 65 20 3a 20 22 20 72 65 | d."Select.metadata.source.:.".re |
| 34140 | 73 75 6c 74 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 73 75 6c 74 73 29 29 29 | sults))...............results))) |
| 34160 | 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 6d 65 74 61 64 61 74 | ..(defun.calibredb-fetch-metadat |
| 34180 | 61 20 28 61 75 74 68 6f 72 20 74 69 74 6c 65 20 26 6f 70 74 69 6f 6e 61 6c 20 69 64 73 20 69 73 | a.(author.title.&optional.ids.is |
| 341a0 | 62 6e 29 0a 20 20 22 46 65 74 63 68 20 6d 65 74 61 64 61 74 61 2e 0a 41 72 67 75 6d 65 6e 74 20 | bn)..."Fetch.metadata..Argument. |
| 341c0 | 41 55 54 48 4f 52 20 70 72 6f 6d 70 74 73 20 74 6f 20 69 6e 70 75 74 20 74 68 65 20 61 75 74 68 | AUTHOR.prompts.to.input.the.auth |
| 341e0 | 6f 72 2e 0a 41 72 67 75 6d 65 6e 74 20 49 44 53 20 70 72 6f 6d 70 74 73 20 74 6f 20 69 6e 70 75 | or..Argument.IDS.prompts.to.inpu |
| 34200 | 74 20 74 68 65 20 69 64 73 2e 0a 41 72 67 75 6d 65 6e 74 20 54 49 54 4c 45 20 70 72 6f 6d 70 74 | t.the.ids..Argument.TITLE.prompt |
| 34220 | 73 20 74 6f 20 69 6e 70 75 74 20 74 68 65 20 74 69 74 6c 65 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 | s.to.input.the.title..Optional.a |
| 34240 | 72 67 75 6d 65 6e 74 20 49 53 42 4e 20 70 72 6f 6d 70 74 73 20 74 6f 20 69 6e 70 75 74 20 74 68 | rgument.ISBN.prompts.to.input.th |
| 34260 | 65 20 69 73 62 6e 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 66 65 74 63 68 2d 63 6f 76 65 72 20 28 | e.isbn."...(let*.((fetch-cover.( |
| 34280 | 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 3d 20 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 63 | cond.((string=.calibredb-fetch-c |
| 342a0 | 6f 76 65 72 73 20 22 79 65 73 22 29 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | overs."yes").t)................. |
| 342c0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 3d 20 63 61 6c 69 62 72 65 64 62 2d | ............((string=.calibredb- |
| 342e0 | 66 65 74 63 68 2d 63 6f 76 65 72 73 20 22 6e 6f 22 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 | fetch-covers."no").nil)......... |
| 34300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 28 79 65 73 2d 6f 72 2d 6e | ....................(t.(yes-or-n |
| 34320 | 6f 2d 70 20 22 46 65 74 63 68 20 63 6f 76 65 72 3f 3a 20 22 29 29 29 29 0a 20 20 20 20 20 20 20 | o-p."Fetch.cover?:."))))........ |
| 34340 | 20 20 28 72 65 73 75 6c 74 73 20 28 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 6d 65 74 61 | ..(results.(calibredb-fetch-meta |
| 34360 | 64 61 74 61 2d 66 72 6f 6d 2d 73 6f 75 72 63 65 73 20 61 75 74 68 6f 72 20 74 69 74 6c 65 20 69 | data-from-sources.author.title.i |
| 34380 | 64 73 20 69 73 62 6e 20 66 65 74 63 68 2d 63 6f 76 65 72 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 | ds.isbn.fetch-cover))).....(cond |
| 343a0 | 20 28 72 65 73 75 6c 74 73 0a 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 66 65 74 63 68 | .(results............(when.fetch |
| 343c0 | 2d 63 6f 76 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 6c 65 63 74 2d 61 6e 64 2d 73 65 74 | -cover.(calibredb-select-and-set |
| 343e0 | 2d 63 6f 76 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 | -cover))............(calibredb-s |
| 34400 | 65 6c 65 63 74 2d 6d 65 74 61 64 61 74 61 2d 73 6f 75 72 63 65 20 72 65 73 75 6c 74 73 29 29 0a | elect-metadata-source.results)). |
| 34420 | 20 20 20 20 20 20 20 20 20 20 28 74 20 6e 69 6c 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c | ..........(t.nil))))..(defun.cal |
| 34440 | 69 62 72 65 64 62 2d 66 65 74 63 68 2d 61 6e 64 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 20 28 74 | ibredb-fetch-and-set-metadata.(t |
| 34460 | 79 70 65 20 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 41 64 64 20 6d 65 74 61 64 61 | ype.&optional.arg)..."Add.metada |
| 34480 | 74 61 20 66 72 6f 6d 20 60 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 6d 65 74 61 64 61 74 | ta.from.`calibredb-fetch-metadat |
| 344a0 | 61 27 20 74 6f 20 65 6e 74 72 79 20 61 74 20 50 4f 49 4e 54 2e 0a 41 72 67 75 6d 65 6e 74 20 54 | a'.to.entry.at.POINT..Argument.T |
| 344c0 | 59 50 45 20 45 69 74 68 65 72 20 27 61 75 74 68 6f 72 27 20 6f 72 20 27 69 73 62 6e 27 2e 0a 4f | YPE.Either.'author'.or.'isbn'..O |
| 344e0 | 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 41 52 47 2e 22 0a 20 20 28 6c 65 74 2a 20 28 | ptional.argument.ARG."...(let*.( |
| 34500 | 28 63 61 6e 64 69 64 61 74 65 20 28 63 61 72 20 28 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d | (candidate.(car.(calibredb-find- |
| 34520 | 63 61 6e 64 69 64 61 74 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 | candidate-at-point)))..........( |
| 34540 | 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 | id.(calibredb-getattr.candidate. |
| 34560 | 3a 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 64 73 20 28 73 70 6c 69 74 2d 73 74 72 69 6e | :id))..........(ids.(split-strin |
| 34580 | 67 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 3a | g.(calibredb-getattr.candidate.: |
| 345a0 | 69 64 73 29 20 22 2c 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 79 61 75 74 68 6f 72 73 20 28 | ids).","))..........(myauthors.( |
| 345c0 | 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 3a 61 75 74 | calibredb-getattr.candidate.:aut |
| 345e0 | 68 6f 72 2d 73 6f 72 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 28 63 61 6c 69 | hor-sort))..........(title.(cali |
| 34600 | 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 61 74 65 20 3a 62 6f 6f 6b 2d 74 69 | bredb-getattr.candidate.:book-ti |
| 34620 | 74 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 65 74 61 64 61 74 61 0a 20 20 20 20 20 20 20 | tle))..........(metadata........ |
| 34640 | 20 20 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 3d 20 74 79 70 65 20 22 69 64 22 29 20 28 63 | ...(cond.((string=.type."id").(c |
| 34660 | 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 20 74 69 74 6c 65 20 6d 79 | alibredb-fetch-metadata.title.my |
| 34680 | 61 75 74 68 6f 72 73 20 69 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 | authors.ids)).................(( |
| 346a0 | 73 74 72 69 6e 67 3d 20 74 79 70 65 20 22 61 75 74 68 6f 72 22 29 20 28 69 66 20 61 72 67 20 28 | string=.type."author").(if.arg.( |
| 346c0 | 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 20 74 69 74 6c 65 20 6d | calibredb-fetch-metadata.title.m |
| 346e0 | 79 61 75 74 68 6f 72 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 | yauthors)....................... |
| 34700 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d | .....................(calibredb- |
| 34720 | 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 20 6d 79 61 75 74 68 6f 72 73 20 74 69 74 6c 65 29 29 | fetch-metadata.myauthors.title)) |
| 34740 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 3d 20 74 79 70 65 | ).................((string=.type |
| 34760 | 20 22 69 73 62 6e 22 29 20 28 69 66 20 61 72 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ."isbn").(if.arg................ |
| 34780 | 20 20 20 20 20 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 6c | ............................(cal |
| 347a0 | 69 62 72 65 64 62 2d 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 20 6d 79 61 75 74 68 6f 72 73 20 | ibredb-fetch-metadata.myauthors. |
| 347c0 | 74 69 74 6c 65 20 6e 69 6c 20 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | title.nil.title)................ |
| 347e0 | 20 20 20 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 6c 69 62 | ..........................(calib |
| 34800 | 72 65 64 62 2d 66 65 74 63 68 2d 6d 65 74 61 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 | redb-fetch-metadata............. |
| 34820 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 79 | ..............................my |
| 34840 | 61 75 74 68 6f 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 20 20 | authors......................... |
| 34860 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 69 74 6c 65 0a 20 20 20 20 20 20 20 20 | ..................title......... |
| 34880 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 348a0 | 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 20 20 20 20 20 20 20 | ..nil........................... |
| 348c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 63 61 6c 69 62 72 65 64 | ................(cond.((calibred |
| 348e0 | 62 2d 61 75 74 6f 2d 64 65 74 65 63 74 2d 69 73 62 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | b-auto-detect-isbn))............ |
| 34900 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 34920 | 20 20 20 20 20 28 22 22 29 29 29 29 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 6d 65 74 61 | .....("")))))))).....(cond.(meta |
| 34940 | 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 20 28 6c 61 6d 62 64 61 20 28 78 | data............(mapc.(lambda.(x |
| 34960 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d | )....................(calibredb- |
| 34980 | 63 6f 6d 6d 61 6e 64 20 3a 63 6f 6d 6d 61 6e 64 20 22 73 65 74 5f 6d 65 74 61 64 61 74 61 22 0a | command.:command."set_metadata". |
| 349a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 349c0 | 20 20 20 20 20 20 3a 6f 70 74 69 6f 6e 20 28 66 6f 72 6d 61 74 20 22 2d 2d 66 69 65 6c 64 20 25 | ......:option.(format."--field.% |
| 349e0 | 73 3a 25 73 20 22 20 28 64 6f 77 6e 63 61 73 65 20 28 63 61 72 20 78 29 29 20 28 70 72 69 6e 31 | s:%s.".(downcase.(car.x)).(prin1 |
| 34a00 | 2d 74 6f 2d 73 74 72 69 6e 67 20 28 63 64 72 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | -to-string.(cdr.x)))............ |
| 34a20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 69 | ...........................:id.i |
| 34a40 | 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d............................... |
| 34a60 | 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 2d 2d 6c 69 62 72 | ........:library.(format."--libr |
| 34a80 | 61 72 79 2d 70 61 74 68 20 5c 22 25 73 5c 22 22 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d | ary-path.\"%s\"".calibredb-root- |
| 34aa0 | 64 69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 65 74 61 64 61 74 61 | dir)))..................metadata |
| 34ac0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 77 69 6e 64 6f 77 20 28 67 65 74 2d | )............(let.((window.(get- |
| 34ae0 | 62 75 66 66 65 72 2d 77 69 6e 64 6f 77 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 | buffer-window."*calibredb-search |
| 34b00 | 2a 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 77 69 6e 64 6f 77 0a 20 20 | *")))..............(if.window... |
| 34b20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 6c 65 63 74 2d 77 69 6e 64 6f 77 20 77 69 | ...............(select-window.wi |
| 34b40 | 6e 64 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d | ndow)................(switch-to- |
| 34b60 | 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 22 2a 63 61 6c 69 62 72 65 64 62 2d | buffer-other-window."*calibredb- |
| 34b80 | 73 65 61 72 63 68 2a 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 | search*")))............(calibred |
| 34ba0 | 62 2d 73 65 61 72 63 68 2d 72 65 66 72 65 73 68 2d 6f 72 2d 72 65 73 75 6d 65 29 0a 20 20 20 20 | b-search-refresh-or-resume)..... |
| 34bc0 | 20 20 20 20 20 20 20 28 69 66 20 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 72 65 73 75 6c 74 | .......(if.calibredb-show-result |
| 34be0 | 73 20 28 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 2d 72 65 73 75 6c 74 73 20 6d 65 74 61 64 61 | s.(calibredb-show-results.metada |
| 34c00 | 74 61 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 4d 65 74 61 | ta.t))............(message."Meta |
| 34c20 | 64 61 74 61 20 75 70 64 61 74 65 64 3a 20 49 44 20 2d 20 25 73 2c 20 54 69 74 6c 65 20 2d 20 25 | data.updated:.ID.-.%s,.Title.-.% |
| 34c40 | 73 2c 20 41 75 74 68 6f 72 73 20 2d 20 25 73 2e 22 20 69 64 20 74 69 74 6c 65 20 6d 79 61 75 74 | s,.Authors.-.%s.".id.title.myaut |
| 34c60 | 68 6f 72 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 | hors))...........;;.(switch-to-b |
| 34c80 | 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 22 2a 63 61 6c 69 62 72 65 64 62 2d 65 | uffer-other-window."*calibredb-e |
| 34ca0 | 6e 74 72 79 2a 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 28 70 72 69 6e 74 20 22 4e 6f | ntry*"))...........(t.(print."No |
| 34cc0 | 20 6d 65 74 61 64 61 74 61 20 72 65 74 72 69 65 76 65 64 20 66 72 6f 6d 20 73 6f 75 72 63 65 73 | .metadata.retrieved.from.sources |
| 34ce0 | 22 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 61 | ")))))..(defun.calibredb-fetch-a |
| 34d00 | 6e 64 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 62 79 2d 61 75 74 68 6f 72 2d 61 6e 64 2d 74 69 | nd-set-metadata-by-author-and-ti |
| 34d20 | 74 6c 65 20 28 61 72 67 29 0a 20 20 22 49 6e 76 6f 6b 65 20 66 72 6f 6d 20 2a 63 61 6c 69 62 72 | tle.(arg)..."Invoke.from.*calibr |
| 34d40 | 65 64 62 2d 73 65 61 72 63 68 2a 20 62 75 66 66 65 72 2e 0a 46 65 74 63 68 20 6d 65 74 61 64 61 | edb-search*.buffer..Fetch.metada |
| 34d60 | 74 61 20 66 72 6f 6d 20 6f 6e 6c 69 6e 65 20 73 6f 75 72 63 65 20 76 69 61 20 61 75 74 68 6f 72 | ta.from.online.source.via.author |
| 34d80 | 20 61 6e 64 20 74 69 74 6c 65 2e 20 57 69 74 68 20 75 6e 69 76 65 72 73 61 6c 20 41 52 47 20 5c | .and.title..With.universal.ARG.\ |
| 34da0 | 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 5d 20 73 77 69 74 63 68 20 69 6e 69 | \[universal-argument].switch.ini |
| 34dc0 | 74 69 61 6c 20 76 61 6c 75 65 73 20 6f 66 20 61 75 74 68 6f 72 73 20 61 6e 64 20 74 69 74 6c 65 | tial.values.of.authors.and.title |
| 34de0 | 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 63 61 6c 69 62 72 | ."...(interactive."P")...(calibr |
| 34e00 | 65 64 62 2d 66 65 74 63 68 2d 61 6e 64 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 20 22 61 75 74 68 | edb-fetch-and-set-metadata."auth |
| 34e20 | 6f 72 22 20 61 72 67 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 | or".arg))..(defun.calibredb-fetc |
| 34e40 | 68 2d 61 6e 64 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 62 79 2d 69 64 20 28 61 72 67 29 0a 20 | h-and-set-metadata-by-id.(arg).. |
| 34e60 | 20 22 49 6e 76 6f 6b 65 20 66 72 6f 6d 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a | ."Invoke.from.*calibredb-search* |
| 34e80 | 20 62 75 66 66 65 72 2e 0a 46 65 74 63 68 20 6d 65 74 61 64 61 74 61 20 66 72 6f 6d 20 6f 6e 6c | .buffer..Fetch.metadata.from.onl |
| 34ea0 | 69 6e 65 20 73 6f 75 72 63 65 20 76 69 61 20 49 64 65 6e 74 69 66 69 65 72 2e 0a 57 69 74 68 20 | ine.source.via.Identifier..With. |
| 34ec0 | 75 6e 69 76 65 72 73 61 6c 20 41 52 47 20 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d | universal.ARG.\\[universal-argum |
| 34ee0 | 65 6e 74 5d 20 75 73 65 20 74 69 74 6c 65 20 61 73 20 69 6e 69 74 69 61 6c 20 76 61 6c 75 65 2e | ent].use.title.as.initial.value. |
| 34f00 | 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 63 61 6c 69 62 72 65 | "...(interactive."P")...(calibre |
| 34f20 | 64 62 2d 66 65 74 63 68 2d 61 6e 64 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 20 22 69 64 22 20 61 | db-fetch-and-set-metadata."id".a |
| 34f40 | 72 67 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d 61 6e 64 | rg))..(defun.calibredb-fetch-and |
| 34f60 | 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 2d 62 79 2d 69 73 62 6e 20 28 61 72 67 29 0a 20 20 22 49 | -set-metadata-by-isbn.(arg)..."I |
| 34f80 | 6e 76 6f 6b 65 20 66 72 6f 6d 20 2a 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2a 20 62 75 | nvoke.from.*calibredb-search*.bu |
| 34fa0 | 66 66 65 72 2e 0a 46 65 74 63 68 20 6d 65 74 61 64 61 74 61 20 66 72 6f 6d 20 6f 6e 6c 69 6e 65 | ffer..Fetch.metadata.from.online |
| 34fc0 | 20 73 6f 75 72 63 65 20 76 69 61 20 49 53 42 4e 2e 0a 57 69 74 68 20 75 6e 69 76 65 72 73 61 6c | .source.via.ISBN..With.universal |
| 34fe0 | 20 41 52 47 20 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 5d 20 75 73 65 20 | .ARG.\\[universal-argument].use. |
| 35000 | 74 69 74 6c 65 20 61 73 20 69 6e 69 74 69 61 6c 20 76 61 6c 75 65 2e 22 0a 20 20 28 69 6e 74 65 | title.as.initial.value."...(inte |
| 35020 | 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 66 65 74 63 68 2d | ractive."P")...(calibredb-fetch- |
| 35040 | 61 6e 64 2d 73 65 74 2d 6d 65 74 61 64 61 74 61 20 22 69 73 62 6e 22 20 61 72 67 29 29 0a 0a 3b | and-set-metadata."isbn".arg))..; |
| 35060 | 3b 20 73 68 6f 77 5f 6d 65 74 61 64 61 74 61 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 | ;.show_metadata..(defun.calibred |
| 35080 | 62 2d 73 68 6f 77 2d 6d 65 74 61 64 61 74 61 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 69 | b-show-metadata.(&optional.candi |
| 350a0 | 64 61 74 65 29 0a 20 20 22 53 68 6f 77 20 73 65 6c 65 63 74 65 64 20 43 41 4e 44 49 44 41 54 45 | date)..."Show.selected.CANDIDATE |
| 350c0 | 20 6d 65 74 61 64 61 74 61 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 | .metadata."...(interactive)...(u |
| 350e0 | 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 0a 20 20 20 20 28 69 66 20 28 65 71 20 6d 61 6a 6f | nless.candidate.....(if.(eq.majo |
| 35100 | 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 29 0a 20 | r-mode.'calibredb-search-mode).. |
| 35120 | 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 20 28 63 64 72 20 28 67 65 74 | .......(setq.candidate.(cdr.(get |
| 35140 | 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 | -text-property.(point).'calibred |
| 35160 | 62 2d 65 6e 74 72 79 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 | b-entry.nil))).......(setq.candi |
| 35180 | 64 61 74 65 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 2d 6d | date.(get-text-property.(point-m |
| 351a0 | 69 6e 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 29 29 29 0a 20 20 28 | in).'calibredb-entry.nil))))...( |
| 351c0 | 6c 65 74 2a 20 28 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e | let*.((id.(calibredb-getattr.can |
| 351e0 | 64 69 64 61 74 65 20 3a 69 64 29 29 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d | didate.:id))).....(calibredb-com |
| 35200 | 6d 61 6e 64 20 3a 63 6f 6d 6d 61 6e 64 20 22 73 68 6f 77 5f 6d 65 74 61 64 61 74 61 22 0a 20 20 | mand.:command."show_metadata"... |
| 35220 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 64 20 69 64 0a 20 20 20 20 | .....................:id.id..... |
| 35240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 | ...................:library.(for |
| 35260 | 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 20 25 73 22 20 28 63 61 6c 69 62 72 65 | mat."--library-path.%s".(calibre |
| 35280 | 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 29 29 29 29 0a 0a 3b 3b 20 65 78 70 6f 72 | db-root-dir-quote)))))..;;.expor |
| 352a0 | 74 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f 72 74 20 28 26 6f 70 74 | t..(defun.calibredb-export.(&opt |
| 352c0 | 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 45 78 70 6f 72 74 20 74 68 65 20 73 | ional.candidate)..."Export.the.s |
| 352e0 | 6c 65 63 74 65 64 20 43 41 4e 44 49 44 41 54 45 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 | lected.CANDIDATE."...(interactiv |
| 35300 | 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 63 61 6e 64 69 64 61 74 65 0a 20 20 20 20 28 69 66 20 28 | e)...(unless.candidate.....(if.( |
| 35320 | 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d | eq.major-mode.'calibredb-search- |
| 35340 | 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 20 28 63 | mode).........(setq.candidate.(c |
| 35360 | 64 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 | dr.(get-text-property.(point).'c |
| 35380 | 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 | alibredb-entry.nil))).......(set |
| 353a0 | 71 20 63 61 6e 64 69 64 61 74 65 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 | q.candidate.(get-text-property.( |
| 353c0 | 70 6f 69 6e 74 2d 6d 69 6e 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 | point-min).'calibredb-entry.nil) |
| 353e0 | 29 29 29 0a 20 20 28 6c 65 74 20 28 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 | )))...(let.((id.(calibredb-getat |
| 35400 | 74 72 20 63 61 6e 64 69 64 61 74 65 20 3a 69 64 29 29 0a 20 20 20 20 20 20 20 20 28 6f 75 74 70 | tr.candidate.:id)).........(outp |
| 35420 | 75 74 2d 66 6f 6c 64 65 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 28 | ut-folder.(file-name-directory.( |
| 35440 | 69 66 20 28 66 69 6c 65 2d 65 78 65 63 75 74 61 62 6c 65 2d 70 20 63 61 6c 69 62 72 65 64 62 2d | if.(file-executable-p.calibredb- |
| 35460 | 64 65 76 69 63 65 2d 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | device-dir)..................... |
| 35480 | 20 20 20 20 20 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 | ............................(if. |
| 354a0 | 28 79 65 73 2d 6f 72 2d 6e 6f 2d 70 20 22 46 6f 75 6e 64 20 6b 69 6e 64 6c 65 2c 20 64 6f 20 79 | (yes-or-no-p."Found.kindle,.do.y |
| 354c0 | 6f 75 20 77 61 6e 74 20 74 6f 20 63 6f 6e 76 65 72 74 20 61 6e 64 20 65 78 70 6f 72 74 20 74 6f | ou.want.to.convert.and.export.to |
| 354e0 | 20 6b 69 6e 64 6c 65 3f 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .kindle?")...................... |
| 35500 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 | ...............................c |
| 35520 | 61 6c 69 62 72 65 64 62 2d 64 65 76 69 63 65 2d 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 | alibredb-device-dir............. |
| 35540 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 35560 | 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 70 6c 65 74 65 2d 66 69 6c 65 2d 71 | ......(calibredb-complete-file-q |
| 35580 | 75 6f 74 65 20 22 45 78 70 6f 72 74 20 74 6f 20 28 73 65 6c 65 63 74 20 61 20 64 69 72 65 63 74 | uote."Export.to.(select.a.direct |
| 355a0 | 6f 72 79 29 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ory)"))......................... |
| 355c0 | 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 6c 69 62 72 65 64 62 | ......................(calibredb |
| 355e0 | 2d 63 6f 6d 70 6c 65 74 65 2d 66 69 6c 65 2d 71 75 6f 74 65 20 22 45 78 70 6f 72 74 20 74 6f 20 | -complete-file-quote."Export.to. |
| 35600 | 28 73 65 6c 65 63 74 20 61 20 64 69 72 65 63 74 6f 72 79 29 22 29 29 29 29 29 0a 20 20 20 20 28 | (select.a.directory)"))))).....( |
| 35620 | 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 61 6e 64 20 3a 63 6f 6d 6d 61 6e 64 20 22 65 78 70 6f | calibredb-command.:command."expo |
| 35640 | 72 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 3a 6f 70 74 69 | rt"........................:opti |
| 35660 | 6f 6e 20 28 73 2d 6a 6f 69 6e 20 22 20 22 20 28 2d 72 65 6d 6f 76 65 20 27 73 2d 62 6c 61 6e 6b | on.(s-join.".".(-remove.'s-blank |
| 35680 | 3f 20 28 2d 66 6c 61 74 74 65 6e 20 28 63 61 6c 69 62 72 65 64 62 2d 65 78 70 6f 72 74 2d 61 72 | ?.(-flatten.(calibredb-export-ar |
| 356a0 | 67 75 6d 65 6e 74 73 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 | guments))))..................... |
| 356c0 | 20 20 20 3a 69 6e 70 75 74 20 28 66 6f 72 6d 61 74 20 22 2d 2d 74 6f 2d 64 69 72 20 25 73 22 20 | ...:input.(format."--to-dir.%s". |
| 356e0 | 6f 75 74 70 75 74 2d 66 6f 6c 64 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | output-folder).................. |
| 35700 | 20 20 20 20 20 20 3a 69 64 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ......:id.id.................... |
| 35720 | 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d | ....:library.(format."--library- |
| 35740 | 70 61 74 68 20 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f | path.%s".(calibredb-root-dir-quo |
| 35760 | 74 65 29 29 29 29 29 0a 0a 3b 3b 20 63 6f 6e 76 65 72 74 20 65 62 6f 6f 6b 73 0a 28 64 65 66 6d | te)))))..;;.convert.ebooks.(defm |
| 35780 | 61 63 72 6f 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 28 74 79 70 65 29 0a 20 20 | acro.calibredb-convert.(type)... |
| 357a0 | 22 4d 61 63 72 6f 20 6f 66 20 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e | "Macro.of.function.calibredb-con |
| 357c0 | 76 65 72 74 2d 74 6f 2d 54 59 50 45 2e 22 0a 20 20 60 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 | vert-to-TYPE."...`(defun.,(inter |
| 357e0 | 6e 20 28 66 6f 72 6d 61 74 20 22 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 74 6f 2d | n.(format."calibredb-convert-to- |
| 35800 | 25 73 22 20 74 79 70 65 29 29 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 69 64 61 74 65 29 | %s".type)).(&optional.candidate) |
| 35820 | 0a 20 20 20 20 2c 28 66 6f 72 6d 61 74 20 22 54 4f 44 4f 3a 20 43 6f 6e 76 65 72 74 20 74 68 65 | .....,(format."TODO:.Convert.the |
| 35840 | 20 73 6c 65 63 74 65 64 20 43 41 4e 44 49 44 41 54 45 20 74 6f 20 25 73 2e 22 20 74 79 70 65 29 | .slected.CANDIDATE.to.%s.".type) |
| 35860 | 0a 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 63 | .....(interactive).....(unless.c |
| 35880 | 61 6e 64 69 64 61 74 65 0a 20 20 20 20 20 20 28 69 66 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 | andidate.......(if.(eq.major-mod |
| 358a0 | 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 | e.'calibredb-search-mode)....... |
| 358c0 | 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 20 28 63 64 72 20 28 67 65 74 2d 74 65 | ....(setq.candidate.(cdr.(get-te |
| 358e0 | 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 | xt-property.(point).'calibredb-e |
| 35900 | 6e 74 72 79 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 | ntry.nil))).........(setq.candid |
| 35920 | 61 74 65 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 2d 6d 69 | ate.(get-text-property.(point-mi |
| 35940 | 6e 29 20 27 63 61 6c 69 62 72 65 64 62 2d 65 6e 74 72 79 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 | n).'calibredb-entry.nil))))..... |
| 35960 | 28 6c 65 74 20 28 3b 3b 20 28 69 64 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 | (let.(;;.(id.(calibredb-getattr. |
| 35980 | 63 61 6e 64 69 64 61 74 65 20 3a 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 | candidate.:id))...........(file. |
| 359a0 | 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 2d 66 69 6c 65 2d 70 61 74 68 20 63 61 6e 64 69 64 61 | (calibredb-get-file-path.candida |
| 359c0 | 74 65 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6f 75 74 70 75 74 2d 66 6f 6c 64 65 72 20 | te.t))...........(output-folder. |
| 359e0 | 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 28 69 66 20 28 66 69 6c 65 2d 65 | (file-name-directory.(if.(file-e |
| 35a00 | 78 65 63 75 74 61 62 6c 65 2d 70 20 63 61 6c 69 62 72 65 64 62 2d 64 65 76 69 63 65 2d 64 69 72 | xecutable-p.calibredb-device-dir |
| 35a20 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | )............................... |
| 35a40 | 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 79 65 73 2d 6f 72 2d | ....................(if.(yes-or- |
| 35a60 | 6e 6f 2d 70 20 22 46 6f 75 6e 64 20 6b 69 6e 64 6c 65 2c 20 64 6f 20 79 6f 75 20 77 61 6e 74 20 | no-p."Found.kindle,.do.you.want. |
| 35a80 | 74 6f 20 63 6f 6e 76 65 72 74 20 61 6e 64 20 65 78 70 6f 72 74 20 74 6f 20 6b 69 6e 64 6c 65 3f | to.convert.and.export.to.kindle? |
| 35aa0 | 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ").............................. |
| 35ac0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 69 62 72 65 | .........................calibre |
| 35ae0 | 64 62 2d 64 65 76 69 63 65 2d 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | db-device-dir................... |
| 35b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 35b20 | 20 20 28 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 43 6f 6e 76 65 72 74 20 61 6e 64 20 65 | ..(read-file-name."Convert.and.e |
| 35b40 | 78 70 6f 72 74 20 74 6f 20 28 73 65 6c 65 63 74 20 61 20 64 69 72 65 63 74 6f 72 79 29 3a 20 22 | xport.to.(select.a.directory):." |
| 35b60 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | )).............................. |
| 35b80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 66 69 6c 65 2d 6e 61 | ...................(read-file-na |
| 35ba0 | 6d 65 20 22 43 6f 6e 76 65 72 74 20 61 6e 64 20 65 78 70 6f 72 74 20 74 6f 20 28 73 65 6c 65 63 | me."Convert.and.export.to.(selec |
| 35bc0 | 74 20 61 20 64 69 72 65 63 74 6f 72 79 29 3a 20 22 29 29 29 29 29 0a 20 20 20 20 20 20 28 73 65 | t.a.directory):."))))).......(se |
| 35be0 | 74 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c 0a 20 20 20 20 20 20 20 28 63 61 6c 69 62 | t-process-sentinel........(calib |
| 35c00 | 72 65 64 62 2d 63 6f 6e 76 65 72 74 2d 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 3a 69 6e | redb-convert-process.........:in |
| 35c20 | 70 75 74 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 28 65 78 70 61 6e | put.(shell-quote-argument.(expan |
| 35c40 | 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 3a 6f 75 74 70 | d-file-name.file)).........:outp |
| 35c60 | 75 74 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 28 65 78 70 61 6e 64 | ut.(shell-quote-argument.(expand |
| 35c80 | 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -file-name...................... |
| 35ca0 | 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 73 2e 25 73 | ..................(format."%s.%s |
| 35cc0 | 22 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 62 61 73 65 20 66 69 6c 65 29 20 2c 74 79 70 65 29 0a 20 | ".(file-name-base.file).,type).. |
| 35ce0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 35d00 | 20 20 20 20 20 20 6f 75 74 70 75 74 2d 66 6f 6c 64 65 72 29 29 0a 20 20 20 20 20 20 20 20 3a 6f | ......output-folder)).........:o |
| 35d20 | 70 74 69 6f 6e 20 28 73 2d 6a 6f 69 6e 20 22 20 22 20 28 2d 72 65 6d 6f 76 65 20 27 73 2d 62 6c | ption.(s-join.".".(-remove.'s-bl |
| 35d40 | 61 6e 6b 3f 20 28 2d 66 6c 61 74 74 65 6e 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 | ank?.(-flatten.(calibredb-conver |
| 35d60 | 74 2d 61 72 67 75 6d 65 6e 74 73 29 29 29 29 29 0a 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 | t-arguments)))))........(lambda. |
| 35d80 | 28 70 20 5f 65 29 0a 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 30 20 28 70 72 6f 63 | (p._e)..........(when.(=.0.(proc |
| 35da0 | 65 73 73 2d 65 78 69 74 2d 73 74 61 74 75 73 20 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 | ess-exit-status.p))............( |
| 35dc0 | 6d 65 73 73 61 67 65 20 22 43 6f 6e 76 65 72 73 69 6f 6e 20 66 69 6e 69 73 68 65 64 2e 20 50 6c | message."Conversion.finished..Pl |
| 35de0 | 65 61 73 65 20 63 68 65 63 6b 20 6c 6f 67 73 20 69 6e 20 2a 65 62 6f 6f 6b 2d 63 6f 6e 76 65 72 | ease.check.logs.in.*ebook-conver |
| 35e00 | 74 2a 2e 22 29 29 29 29 29 29 20 29 0a 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 | t*.")))))).)..(calibredb-convert |
| 35e20 | 20 22 61 7a 77 33 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 64 6f 63 | ."azw3").(calibredb-convert."doc |
| 35e40 | 78 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 65 70 75 62 22 29 0a 28 | x").(calibredb-convert."epub").( |
| 35e60 | 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 66 62 32 22 29 0a 28 63 61 6c 69 62 72 | calibredb-convert."fb2").(calibr |
| 35e80 | 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 68 74 6d 6c 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 | edb-convert."html").(calibredb-c |
| 35ea0 | 6f 6e 76 65 72 74 20 22 68 74 6d 6c 7a 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 | onvert."htmlz").(calibredb-conve |
| 35ec0 | 72 74 20 22 6c 69 74 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 6c 72 | rt."lit").(calibredb-convert."lr |
| 35ee0 | 66 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 6d 6f 62 69 22 29 0a 28 | f").(calibredb-convert."mobi").( |
| 35f00 | 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 6f 65 62 22 29 0a 28 63 61 6c 69 62 72 | calibredb-convert."oeb").(calibr |
| 35f20 | 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 70 64 62 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 6f | edb-convert."pdb").(calibredb-co |
| 35f40 | 6e 76 65 72 74 20 22 70 64 66 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 | nvert."pdf").(calibredb-convert. |
| 35f60 | 22 70 6d 6c 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 72 62 22 29 0a | "pml").(calibredb-convert."rb"). |
| 35f80 | 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 72 74 66 22 29 0a 28 63 61 6c 69 62 | (calibredb-convert."rtf").(calib |
| 35fa0 | 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 73 6e 62 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 | redb-convert."snb").(calibredb-c |
| 35fc0 | 6f 6e 76 65 72 74 20 22 74 63 72 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 | onvert."tcr").(calibredb-convert |
| 35fe0 | 20 22 74 78 74 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 76 65 72 74 20 22 74 78 74 7a | ."txt").(calibredb-convert."txtz |
| 36000 | 22 29 0a 0a 3b 3b 20 63 61 74 61 6c 6f 67 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 | ")..;;.catalog..(defun.calibredb |
| 36020 | 2d 63 61 74 61 6c 6f 67 20 28 29 0a 20 20 22 54 4f 44 4f 20 45 78 70 6f 72 74 20 74 68 65 20 63 | -catalog.()..."TODO.Export.the.c |
| 36040 | 61 74 61 6c 6f 67 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 61 6c 69 | atalog."...(interactive)...(cali |
| 36060 | 62 72 65 64 62 2d 63 6f 6d 6d 61 6e 64 20 3a 63 6f 6d 6d 61 6e 64 20 22 63 61 74 61 6c 6f 67 22 | bredb-command.:command."catalog" |
| 36080 | 0a 20 20 20 20 3b 3b 20 3a 6f 70 74 69 6f 6e 20 28 73 2d 6a 6f 69 6e 20 22 20 22 20 28 2d 72 65 | .....;;.:option.(s-join.".".(-re |
| 360a0 | 6d 6f 76 65 20 27 73 2d 62 6c 61 6e 6b 3f 20 28 2d 66 6c 61 74 74 65 6e 20 28 63 61 6c 69 62 72 | move.'s-blank?.(-flatten.(calibr |
| 360c0 | 65 64 62 2d 65 78 70 6f 72 74 2d 61 72 67 75 6d 65 6e 74 73 29 29 29 29 0a 20 20 20 20 3a 69 6e | edb-export-arguments)))).....:in |
| 360e0 | 70 75 74 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 70 | put.(format."%s".(calibredb-comp |
| 36100 | 6c 65 74 65 2d 66 69 6c 65 2d 71 75 6f 74 65 20 22 45 78 70 6f 72 74 20 74 6f 20 28 73 65 6c 65 | lete-file-quote."Export.to.(sele |
| 36120 | 63 74 20 61 20 70 61 74 68 29 22 29 29 0a 20 20 20 20 3b 3b 20 3a 69 64 20 69 64 0a 20 20 20 20 | ct.a.path)")).....;;.:id.id..... |
| 36140 | 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 2d 2d 6c 69 62 72 61 72 79 2d 70 61 74 68 | :library.(format."--library-path |
| 36160 | 20 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 2d 71 75 6f 74 65 29 29 | .%s".(calibredb-root-dir-quote)) |
| 36180 | 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 63 61 74 61 6c 6f 67 2d 62 69 62 | ))..(defun.calibredb-catalog-bib |
| 361a0 | 2d 2d 74 72 61 6e 73 69 65 6e 74 20 28 29 0a 20 20 22 45 78 70 6f 72 74 20 74 68 65 20 63 61 74 | --transient.()..."Export.the.cat |
| 361c0 | 61 6c 6f 67 20 77 69 74 68 20 42 69 62 54 65 78 20 66 69 6c 65 2e 22 0a 20 20 28 69 6e 74 65 72 | alog.with.BibTex.file."...(inter |
| 361e0 | 61 63 74 69 76 65 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 63 6f 6d 6d 61 6e 64 20 3a 63 6f | active)...(calibredb-command.:co |
| 36200 | 6d 6d 61 6e 64 20 22 63 61 74 61 6c 6f 67 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mmand."catalog"................. |
| 36220 | 20 20 20 20 20 3a 6f 70 74 69 6f 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 22 0a 20 20 20 20 20 20 | .....:option.(format."%s"....... |
| 36240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ...............................( |
| 36260 | 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 | shell-quote-argument............ |
| 36280 | 20 20 20 20 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 78 70 61 | ...........................(expa |
| 362a0 | 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | nd-file-name.................... |
| 362c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 63 61 6c 69 62 72 65 64 | ....................(or.calibred |
| 362e0 | 62 2d 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 0a 20 20 20 20 20 | b-ref-default-bibliography...... |
| 36300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 36320 | 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 | ......(concat.(file-name-as-dire |
| 36340 | 63 74 6f 72 79 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 72 29 20 22 63 61 74 61 6c | ctory.calibredb-root-dir)."catal |
| 36360 | 6f 67 2e 62 69 62 22 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | og.bib"))))).................... |
| 36380 | 20 20 3a 69 6e 70 75 74 20 28 73 2d 6a 6f 69 6e 20 22 20 22 20 28 2d 72 65 6d 6f 76 65 20 27 73 | ..:input.(s-join.".".(-remove.'s |
| 363a0 | 2d 62 6c 61 6e 6b 3f 20 28 2d 66 6c 61 74 74 65 6e 20 28 63 61 6c 69 62 72 65 64 62 2d 63 61 74 | -blank?.(-flatten.(calibredb-cat |
| 363c0 | 61 6c 6f 67 2d 62 69 62 2d 61 72 67 75 6d 65 6e 74 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 | alog-bib-arguments)))).......... |
| 363e0 | 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 69 62 72 61 72 79 20 28 66 6f 72 6d 61 74 20 22 2d 2d | ............:library.(format."-- |
| 36400 | 6c 69 62 72 61 72 79 2d 70 61 74 68 20 25 73 22 20 28 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 | library-path.%s".(calibredb-root |
| 36420 | 2d 64 69 72 2d 71 75 6f 74 65 29 29 29 0a 20 20 28 63 61 6c 69 62 72 65 64 62 2d 72 65 66 2d 64 | -dir-quote)))...(calibredb-ref-d |
| 36440 | 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 29 0a 20 20 28 6d 65 73 73 61 67 65 20 | efault-bibliography)...(message. |
| 36460 | 22 55 70 64 61 74 65 64 20 42 69 62 54 65 78 20 66 69 6c 65 2e 22 29 29 0a 0a 28 64 65 66 75 6e | "Updated.BibTex.file."))..(defun |
| 36480 | 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 62 69 62 20 28 29 0a 20 20 22 4f 70 65 6e 20 74 | .calibredb-find-bib.()..."Open.t |
| 364a0 | 68 65 20 63 61 74 61 6c 6f 67 20 42 69 62 54 65 78 20 66 69 6c 65 2e 22 0a 20 20 28 69 6e 74 65 | he.catalog.BibTex.file."...(inte |
| 364c0 | 72 61 63 74 69 76 65 29 0a 20 20 28 69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 63 61 | ractive)...(if.(file-exists-p.ca |
| 364e0 | 6c 69 62 72 65 64 62 2d 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 | libredb-ref-default-bibliography |
| 36500 | 29 0a 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 63 61 6c 69 62 72 65 64 62 2d 72 65 66 | ).......(find-file.calibredb-ref |
| 36520 | 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 29 0a 20 20 20 20 28 6d 65 73 73 | -default-bibliography).....(mess |
| 36540 | 61 67 65 20 22 4e 4f 20 42 69 62 54 65 78 20 66 69 6c 65 2e 22 29 29 29 0a 0a 28 64 65 66 75 6e | age."NO.BibTex.file.")))..(defun |
| 36560 | 20 63 61 6c 69 62 72 65 64 62 2d 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 | .calibredb-ref-default-bibliogra |
| 36580 | 70 68 79 20 28 29 0a 20 20 22 55 70 64 61 74 65 20 74 68 65 20 70 61 74 68 20 6f 66 20 42 69 62 | phy.()..."Update.the.path.of.Bib |
| 365a0 | 54 65 78 20 66 69 6c 65 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 63 61 6c 69 62 72 65 64 62 2d 72 | Tex.file."...(unless.calibredb-r |
| 365c0 | 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 0a 20 20 20 20 28 73 65 74 | ef-default-bibliography.....(set |
| 365e0 | 71 20 63 61 6c 69 62 72 65 64 62 2d 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 | q.calibredb-ref-default-bibliogr |
| 36600 | 61 70 68 79 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d | aphy...........(concat.(file-nam |
| 36620 | 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 63 61 6c 69 62 72 65 64 62 2d 72 6f 6f 74 2d 64 69 | e-as-directory.calibredb-root-di |
| 36640 | 72 29 20 22 63 61 74 61 6c 6f 67 2e 62 69 62 22 29 29 29 0a 20 20 28 69 66 20 28 62 6f 75 6e 64 | r)."catalog.bib")))...(if.(bound |
| 36660 | 70 20 27 6f 72 67 2d 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 29 | p.'org-ref-default-bibliography) |
| 36680 | 0a 20 20 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 63 61 6c 69 62 72 | .......(if.(file-exists-p.calibr |
| 366a0 | 65 64 62 2d 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 29 0a 20 20 | edb-ref-default-bibliography)... |
| 366c0 | 20 20 20 20 20 20 20 20 28 61 64 64 2d 74 6f 2d 6c 69 73 74 20 27 6f 72 67 2d 72 65 66 2d 64 65 | ........(add-to-list.'org-ref-de |
| 366e0 | 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 20 63 61 6c 69 62 72 65 64 62 2d 72 65 66 | fault-bibliography.calibredb-ref |
| 36700 | 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 70 68 79 29 29 29 29 0a 0a 28 64 65 66 75 | -default-bibliography))))..(defu |
| 36720 | 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6e 64 2d 63 6f 76 65 72 20 28 63 61 6e 64 69 64 61 74 | n.calibredb-find-cover.(candidat |
| 36740 | 65 29 0a 20 20 22 4f 70 65 6e 20 74 68 65 20 63 6f 76 65 72 20 70 61 67 65 20 69 6d 61 67 65 20 | e)..."Open.the.cover.page.image. |
| 36760 | 6f 66 20 73 65 6c 65 63 74 65 64 20 43 41 4e 44 49 44 41 54 45 2e 22 0a 20 20 28 69 66 20 28 67 | of.selected.CANDIDATE."...(if.(g |
| 36780 | 65 74 2d 62 75 66 66 65 72 20 22 63 6f 76 65 72 2e 6a 70 67 22 29 0a 20 20 20 20 20 20 28 6b 69 | et-buffer."cover.jpg").......(ki |
| 367a0 | 6c 6c 2d 62 75 66 66 65 72 20 22 63 6f 76 65 72 2e 6a 70 67 22 29 29 0a 20 20 28 6c 65 74 2a 20 | ll-buffer."cover.jpg"))...(let*. |
| 367c0 | 28 28 70 61 74 68 20 28 63 61 6c 69 62 72 65 64 62 2d 67 65 74 61 74 74 72 20 63 61 6e 64 69 64 | ((path.(calibredb-getattr.candid |
| 367e0 | 61 74 65 20 3a 66 69 6c 65 2d 70 61 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 76 65 72 | ate.:file-path))..........(cover |
| 36800 | 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 70 61 | .(concat.(file-name-directory.pa |
| 36820 | 74 68 29 20 22 63 6f 76 65 72 2e 6a 70 67 22 29 29 29 0a 20 20 20 20 28 69 66 20 28 66 69 6c 65 | th)."cover.jpg"))).....(if.(file |
| 36840 | 2d 65 78 69 73 74 73 2d 70 20 63 6f 76 65 72 29 0a 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 | -exists-p.cover).........(find-f |
| 36860 | 69 6c 65 20 63 6f 76 65 72 29 0a 20 20 20 20 20 20 3b 3b 20 28 6d 65 73 73 61 67 65 20 22 4e 6f | ile.cover).......;;.(message."No |
| 36880 | 20 63 6f 76 65 72 22 29 0a 20 20 20 20 20 20 29 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 63 61 | .cover").......)))..(defmacro.ca |
| 368a0 | 6c 69 62 72 65 64 62 2d 61 6c 6c 20 28 66 69 65 6c 64 29 0a 20 20 22 4d 61 63 72 6f 20 6f 66 20 | libredb-all.(field)..."Macro.of. |
| 368c0 | 66 75 6e 63 74 69 6f 6e 20 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 2d 46 49 45 4c 44 2e 22 0a 20 | function.calibredb-all-FIELD.".. |
| 368e0 | 20 60 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 63 61 6c 69 62 | .`(defun.,(intern.(format."calib |
| 36900 | 72 65 64 62 2d 61 6c 6c 2d 25 73 22 20 66 69 65 6c 64 29 29 20 28 29 0a 20 20 20 20 20 2c 28 66 | redb-all-%s".field)).()......,(f |
| 36920 | 6f 72 6d 61 74 20 22 47 65 74 20 61 6c 6c 20 25 73 20 61 6e 64 20 72 65 74 75 72 6e 20 61 73 20 | ormat."Get.all.%s.and.return.as. |
| 36940 | 61 20 6c 69 73 74 2e 22 20 66 69 65 6c 64 29 0a 20 20 20 20 20 28 73 65 71 2d 75 6e 69 71 0a 20 | a.list.".field)......(seq-uniq.. |
| 36960 | 20 20 20 20 20 28 6c 65 74 20 28 6c 29 0a 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 | .....(let.(l).........(cl-loop.f |
| 36980 | 6f 72 20 65 6e 74 72 79 20 69 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 | or.entry.in.calibredb-full-entri |
| 369a0 | 65 73 20 64 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6c 20 28 | es.do..................(setq.l.( |
| 369c0 | 61 70 70 65 6e 64 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 63 61 6c 69 62 72 65 64 62 2d | append.(split-string.(calibredb- |
| 369e0 | 67 65 74 61 74 74 72 20 28 63 64 72 20 65 6e 74 72 79 29 20 2c 28 69 6e 74 65 72 6e 20 28 66 6f | getattr.(cdr.entry).,(intern.(fo |
| 36a00 | 72 6d 61 74 20 22 3a 25 73 22 20 66 69 65 6c 64 29 29 29 20 22 2c 22 29 20 6c 29 29 29 20 6c 29 | rmat.":%s".field))).",").l))).l) |
| 36a20 | 29 29 29 0a 0a 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 20 22 74 61 67 22 29 0a 28 63 61 6c 69 | )))..(calibredb-all."tag").(cali |
| 36a40 | 62 72 65 64 62 2d 61 6c 6c 20 22 69 64 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 20 22 | bredb-all."id").(calibredb-all." |
| 36a60 | 61 75 74 68 6f 72 2d 73 6f 72 74 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 20 22 62 6f | author-sort").(calibredb-all."bo |
| 36a80 | 6f 6b 2d 64 69 72 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 20 22 62 6f 6f 6b 2d 6e 61 | ok-dir").(calibredb-all."book-na |
| 36aa0 | 6d 65 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 20 22 62 6f 6f 6b 2d 66 6f 72 6d 61 74 | me").(calibredb-all."book-format |
| 36ac0 | 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 20 22 62 6f 6f 6b 2d 70 75 62 64 61 74 65 22 | ").(calibredb-all."book-pubdate" |
| 36ae0 | 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 20 22 62 6f 6f 6b 2d 74 69 74 6c 65 22 29 0a 28 | ).(calibredb-all."book-title").( |
| 36b00 | 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 20 22 66 69 6c 65 2d 70 61 74 68 22 29 0a 28 63 61 6c 69 | calibredb-all."file-path").(cali |
| 36b20 | 62 72 65 64 62 2d 61 6c 6c 20 22 73 69 7a 65 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c | bredb-all."size").(calibredb-all |
| 36b40 | 20 22 63 6f 6d 6d 65 6e 74 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 20 22 69 64 73 22 | ."comment").(calibredb-all."ids" |
| 36b60 | 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 20 22 70 75 62 6c 69 73 68 65 72 22 29 0a 28 63 | ).(calibredb-all."publisher").(c |
| 36b80 | 61 6c 69 62 72 65 64 62 2d 61 6c 6c 20 22 73 65 72 69 65 73 22 29 0a 28 63 61 6c 69 62 72 65 64 | alibredb-all."series").(calibred |
| 36ba0 | 62 2d 61 6c 6c 20 22 6c 61 6e 67 5f 63 6f 64 65 22 29 0a 28 63 61 6c 69 62 72 65 64 62 2d 61 6c | b-all."lang_code").(calibredb-al |
| 36bc0 | 6c 20 22 6c 61 73 74 5f 6d 6f 64 69 66 69 65 64 22 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 | l."last_modified")..(defun.calib |
| 36be0 | 72 65 64 62 2d 66 69 6c 74 65 72 2d 62 79 2d 74 61 67 20 28 29 0a 20 20 22 46 69 6c 74 65 72 20 | redb-filter-by-tag.()..."Filter. |
| 36c00 | 72 65 73 75 6c 74 73 20 62 79 20 74 61 67 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 | results.by.tag."...(interactive) |
| 36c20 | 0a 20 20 28 6c 65 74 20 28 28 74 61 67 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 | ...(let.((tag.(completing-read." |
| 36c40 | 53 65 6c 65 63 74 20 74 61 67 3a 20 22 20 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 2d 74 61 67 | Select.tag:.".(calibredb-all-tag |
| 36c60 | 29 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 74 61 67 2d 66 69 6c | )))).....(setq.calibredb-tag-fil |
| 36c80 | 74 65 72 2d 70 20 74 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 | ter-p.t).....(setq.calibredb-fav |
| 36ca0 | 6f 72 69 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 | orite-filter-p.nil).....(setq.ca |
| 36cc0 | 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 | libredb-author-filter-p.nil).... |
| 36ce0 | 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e | .(setq.calibredb-date-filter-p.n |
| 36d00 | 69 6c 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 | il).....(setq.calibredb-format-f |
| 36d20 | 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 | ilter-p.nil).....(calibredb-sear |
| 36d40 | 63 68 2d 6b 65 79 77 6f 72 64 2d 66 69 6c 74 65 72 20 74 61 67 29 29 29 0a 0a 28 64 65 66 75 6e | ch-keyword-filter.tag)))..(defun |
| 36d60 | 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6c 74 65 72 2d 62 79 2d 61 75 74 68 6f 72 2d 73 6f 72 74 | .calibredb-filter-by-author-sort |
| 36d80 | 20 28 29 0a 20 20 22 46 69 6c 74 65 72 20 72 65 73 75 6c 74 73 20 62 79 20 61 75 74 68 6f 72 2d | .()..."Filter.results.by.author- |
| 36da0 | 73 6f 72 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 | sort."...(interactive)...(let.(( |
| 36dc0 | 61 75 74 68 6f 72 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 53 65 6c 65 63 74 20 | author.(completing-read."Select. |
| 36de0 | 61 75 74 68 6f 72 3a 20 22 20 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 2d 61 75 74 68 6f 72 2d | author:.".(calibredb-all-author- |
| 36e00 | 73 6f 72 74 29 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 74 61 67 | sort)))).....(setq.calibredb-tag |
| 36e20 | 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 | -filter-p.nil).....(setq.calibre |
| 36e40 | 64 62 2d 66 61 76 6f 72 69 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 28 73 | db-favorite-filter-p.nil).....(s |
| 36e60 | 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 20 74 29 | etq.calibredb-author-filter-p.t) |
| 36e80 | 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 69 6c 74 65 72 | .....(setq.calibredb-date-filter |
| 36ea0 | 2d 70 20 6e 69 6c 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 6f 72 6d | -p.nil).....(setq.calibredb-form |
| 36ec0 | 61 74 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d | at-filter-p.nil).....(calibredb- |
| 36ee0 | 73 65 61 72 63 68 2d 6b 65 79 77 6f 72 64 2d 66 69 6c 74 65 72 20 61 75 74 68 6f 72 29 29 29 0a | search-keyword-filter.author))). |
| 36f00 | 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6c 74 65 72 2d 62 79 2d 6c 61 73 74 | .(defun.calibredb-filter-by-last |
| 36f20 | 5f 6d 6f 64 69 66 69 65 64 20 28 29 0a 20 20 22 46 69 6c 74 65 72 20 72 65 73 75 6c 74 73 20 62 | _modified.()..."Filter.results.b |
| 36f40 | 79 20 6c 61 73 74 5f 6d 6f 64 69 66 69 65 64 20 64 61 74 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 | y.last_modified.date."...(intera |
| 36f60 | 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 64 61 74 65 20 28 63 6f 6d 70 6c 65 74 69 6e 67 | ctive)...(let.((date.(completing |
| 36f80 | 2d 72 65 61 64 20 22 53 65 6c 65 63 74 20 64 61 74 65 3a 20 22 20 28 73 65 71 2d 75 6e 69 71 20 | -read."Select.date:.".(seq-uniq. |
| 36fa0 | 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 64 61 74 65 29 20 28 73 2d 6c 65 66 74 20 31 | (mapcar.(lambda.(date).(s-left.1 |
| 36fc0 | 30 20 64 61 74 65 29 29 20 28 63 61 6c 69 62 72 65 64 62 2d 61 6c 6c 2d 6c 61 73 74 5f 6d 6f 64 | 0.date)).(calibredb-all-last_mod |
| 36fe0 | 69 66 69 65 64 29 29 29 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d | ified)))))).....(setq.calibredb- |
| 37000 | 74 61 67 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 | tag-filter-p.nil).....(setq.cali |
| 37020 | 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 | bredb-favorite-filter-p.nil).... |
| 37040 | 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 6c 74 65 72 2d 70 | .(setq.calibredb-author-filter-p |
| 37060 | 20 6e 69 6c 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 64 61 74 65 2d 66 | .nil).....(setq.calibredb-date-f |
| 37080 | 69 6c 74 65 72 2d 70 20 74 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 | ilter-p.t).....(setq.calibredb-f |
| 370a0 | 6f 72 6d 61 74 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 28 63 61 6c 69 62 72 65 | ormat-filter-p.nil).....(calibre |
| 370c0 | 64 62 2d 73 65 61 72 63 68 2d 6b 65 79 77 6f 72 64 2d 66 69 6c 74 65 72 20 64 61 74 65 29 29 29 | db-search-keyword-filter.date))) |
| 370e0 | 0a 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 66 69 6c 74 65 72 2d 62 79 2d 62 6f | ...(defun.calibredb-filter-by-bo |
| 37100 | 6f 6b 2d 66 6f 72 6d 61 74 20 28 29 0a 20 20 22 46 69 6c 74 65 72 20 72 65 73 75 6c 74 73 20 62 | ok-format.()..."Filter.results.b |
| 37120 | 79 20 62 6f 6f 6b 20 66 6f 72 6d 61 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a | y.book.format."...(interactive). |
| 37140 | 20 20 28 6c 65 74 20 28 28 66 6f 72 6d 61 74 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 | ..(let.((format.(completing-read |
| 37160 | 20 22 53 65 6c 65 63 74 20 66 6f 72 6d 61 74 3a 20 22 20 28 63 61 6c 69 62 72 65 64 62 2d 61 6c | ."Select.format:.".(calibredb-al |
| 37180 | 6c 2d 62 6f 6f 6b 2d 66 6f 72 6d 61 74 29 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 | l-book-format)))).....(setq.cali |
| 371a0 | 62 72 65 64 62 2d 74 61 67 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 28 73 65 74 | bredb-tag-filter-p.nil).....(set |
| 371c0 | 71 20 63 61 6c 69 62 72 65 64 62 2d 66 61 76 6f 72 69 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 | q.calibredb-favorite-filter-p.ni |
| 371e0 | 6c 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 61 75 74 68 6f 72 2d 66 69 | l).....(setq.calibredb-author-fi |
| 37200 | 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d | lter-p.nil).....(setq.calibredb- |
| 37220 | 64 61 74 65 2d 66 69 6c 74 65 72 2d 70 20 6e 69 6c 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6c | date-filter-p.nil).....(setq.cal |
| 37240 | 69 62 72 65 64 62 2d 66 6f 72 6d 61 74 2d 66 69 6c 74 65 72 2d 70 20 74 29 0a 20 20 20 20 28 63 | ibredb-format-filter-p.t).....(c |
| 37260 | 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6b 65 79 77 6f 72 64 2d 66 69 6c 74 65 72 20 66 | alibredb-search-keyword-filter.f |
| 37280 | 6f 72 6d 61 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 2d 61 74 74 61 63 | ormat)))..(defun.calibredb-attac |
| 372a0 | 68 2d 69 63 6f 6e 2d 66 6f 72 20 28 70 61 74 68 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 | h-icon-for.(path)..."Return.the. |
| 372c0 | 69 63 6f 6e 20 62 61 73 65 64 20 6f 6e 20 50 41 54 48 2e 22 0a 20 20 28 63 68 61 72 2d 74 6f 2d | icon.based.on.PATH."...(char-to- |
| 372e0 | 73 74 72 69 6e 67 0a 20 20 20 28 70 63 61 73 65 20 28 64 6f 77 6e 63 61 73 65 20 28 66 69 6c 65 | string....(pcase.(downcase.(file |
| 37300 | 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 70 61 74 68 29 29 0a 20 20 20 20 20 28 28 6f 72 | -name-extension.path))......((or |
| 37320 | 20 22 6a 70 67 22 20 22 6a 70 65 67 22 20 22 70 6e 67 22 20 22 67 69 66 22 29 20 3f ef 87 85 29 | ."jpg"."jpeg"."png"."gif").?...) |
| 37340 | 0a 20 20 20 20 20 28 22 70 64 66 22 20 3f ef 87 81 29 0a 20 20 20 20 20 28 28 6f 72 20 22 70 70 | ......("pdf".?...)......((or."pp |
| 37360 | 74 22 20 22 70 70 74 78 22 29 20 3f ef 87 84 29 0a 20 20 20 20 20 28 28 6f 72 20 22 78 6c 73 22 | t"."pptx").?...)......((or."xls" |
| 37380 | 20 22 78 6c 73 78 22 29 20 3f ef 87 83 29 0a 20 20 20 20 20 28 28 6f 72 20 22 64 6f 63 22 20 22 | ."xlsx").?...)......((or."doc"." |
| 373a0 | 64 6f 63 78 22 29 20 3f ef 87 82 29 0a 20 20 20 20 20 28 28 6f 72 20 22 6f 67 67 22 20 22 6d 70 | docx").?...)......((or."ogg"."mp |
| 373c0 | 33 22 20 22 77 61 76 22 20 22 61 69 66 66 22 20 22 66 6c 61 63 22 29 20 3f ef 87 87 29 0a 20 20 | 3"."wav"."aiff"."flac").?...)... |
| 373e0 | 20 20 20 28 28 6f 72 20 22 6d 70 34 22 20 22 6d 6f 76 22 20 22 61 76 69 22 29 20 3f ef 87 88 29 | ...((or."mp4"."mov"."avi").?...) |
| 37400 | 0a 20 20 20 20 20 28 28 6f 72 20 22 7a 69 70 22 20 22 67 7a 22 20 22 74 61 72 22 20 22 37 7a 22 | ......((or."zip"."gz"."tar"."7z" |
| 37420 | 20 22 72 61 72 22 29 20 3f ef 87 86 29 0a 20 20 20 20 20 28 5f 20 3f ef 80 96 29 29 29 29 0a 0a | ."rar").?...)......(_.?...)))).. |
| 37440 | 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 29 0a 0a 3b 3b 3b 20 | (provide.'calibredb-utils)..;;;. |
| 37460 | 63 61 6c 69 62 72 65 64 62 2d 75 74 69 6c 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 | calibredb-utils.el.ends.here.... |
| 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 | 63 61 6c 69 62 72 65 64 62 2d 32 30 32 34 30 33 33 31 2e 34 30 39 2f 63 61 6c 69 62 72 65 64 62 | calibredb-20240331.409/calibredb |
| 37620 | 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............................. |
| 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 30 37 31 37 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 37 33 00 20 30 00 00 00 | 0007172.00000000000.015073..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 63 61 6c 69 62 72 65 64 62 2e 65 6c 20 2d 2d 2d 20 59 65 74 20 61 6e 6f 74 68 65 72 | ;;;.calibredb.el.---.Yet.another |
| 37820 | 20 63 61 6c 69 62 72 65 20 63 6c 69 65 6e 74 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 | .calibre.client.-*-.lexical-bind |
| 37840 | 69 6e 67 3a 20 74 3b 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 | ing:.t;.-*-..;;.Copyright.(C).20 |
| 37860 | 32 30 20 44 61 6d 6f 6e 20 43 68 61 6e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 44 61 6d 6f 6e 20 | 20.Damon.Chan..;;.Author:.Damon. |
| 37880 | 43 68 61 6e 20 3c 65 6c 65 63 6d 69 6e 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 55 52 4c | Chan.<elecming@gmail.com>.;;.URL |
| 378a0 | 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 68 65 6e 79 61 6e 6d 69 6e 67 | :.https://github.com/chenyanming |
| 378c0 | 2f 63 61 6c 69 62 72 65 64 62 2e 65 6c 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 74 6f 6f 6c 73 | /calibredb.el.;;.Keywords:.tools |
| 378e0 | 0a 3b 3b 20 43 72 65 61 74 65 64 3a 20 39 20 4d 61 79 20 32 30 32 30 0a 3b 3b 20 56 65 72 73 69 | .;;.Created:.9.May.2020.;;.Versi |
| 37900 | 6f 6e 3a 20 32 2e 31 32 2e 30 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 71 75 69 72 65 73 3a 20 | on:.2.12.0.;;.Package-Requires:. |
| 37920 | 28 28 65 6d 61 63 73 20 22 32 35 2e 31 22 29 20 28 6f 72 67 20 22 39 2e 33 22 29 20 28 74 72 61 | ((emacs."25.1").(org."9.3").(tra |
| 37940 | 6e 73 69 65 6e 74 20 22 30 2e 31 2e 30 22 29 20 28 73 20 22 31 2e 31 32 2e 30 22 29 20 28 64 61 | nsient."0.1.0").(s."1.12.0").(da |
| 37960 | 73 68 20 22 32 2e 31 37 2e 30 22 29 20 28 72 65 71 75 65 73 74 20 22 30 2e 33 2e 33 22 29 20 28 | sh."2.17.0").(request."0.3.3").( |
| 37980 | 65 73 78 6d 6c 20 22 30 2e 33 2e 37 22 29 29 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 | esxml."0.3.7"))..;;.This.file.is |
| 379a0 | 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 73 2e 0a 0a 3b 3b 20 54 68 69 73 | .NOT.part.of.GNU.Emacs...;;.This |
| 379c0 | 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 | .program.is.free.software;.you.c |
| 379e0 | 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 |
| 37a00 | 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 |
| 37a20 | 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 |
| 37a40 | 69 73 68 65 64 20 62 79 0a 3b 3b 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 |
| 37a60 | 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 |
| 37a80 | 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e | e.License,.or.;;.(at.your.option |
| 37aa0 | 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 | ).any.later.version...;;.This.pr |
| 37ac0 | 6f 67 72 61 6d 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 | ogram.is.distributed.in.the.hope |
| 37ae0 | 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. |
| 37b00 | 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 |
| 37b20 | 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 |
| 37b40 | 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 |
| 37b60 | 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 |
| 37b80 | 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 |
| 37ba0 | 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 | re.details...;;.You.should.have. |
| 37bc0 | 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 | received.a.copy.of.the.GNU.Gener |
| 37be0 | 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 | al.Public.License.;;.along.with. |
| 37c00 | 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 | this.program...If.not,.see.<http |
| 37c20 | 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/>...;;; |
| 37c40 | 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 59 65 74 20 61 6e 6f 74 68 65 72 20 5b 5b 68 | .Commentary:..;;.Yet.another.[[h |
| 37c60 | 74 74 70 73 3a 2f 2f 63 61 6c 69 62 72 65 2d 65 62 6f 6f 6b 2e 63 6f 6d 2f 5d 5b 63 61 6c 69 62 | ttps://calibre-ebook.com/][calib |
| 37c80 | 72 65 5d 5d 20 45 6d 61 63 73 20 63 6c 69 65 6e 74 2e 0a 3b 3b 20 54 68 69 73 20 70 61 63 6b 61 | re]].Emacs.client..;;.This.packa |
| 37ca0 | 67 65 20 69 6e 74 65 67 72 61 74 65 73 20 63 61 6c 69 62 72 65 20 28 75 73 69 6e 67 20 2a 63 61 | ge.integrates.calibre.(using.*ca |
| 37cc0 | 6c 69 62 72 65 64 62 2a 29 20 69 6e 74 6f 20 45 6d 61 63 73 2e 0a 3b 3b 20 31 2e 20 50 6f 77 65 | libredb*).into.Emacs..;;.1..Powe |
| 37ce0 | 72 66 75 6c 20 65 62 6f 6f 6b 20 64 61 73 68 62 6f 61 72 64 2e 0a 3b 3b 20 32 2e 20 4d 61 6e 61 | rful.ebook.dashboard..;;.2..Mana |
| 37d00 | 67 65 20 65 62 6f 6f 6b 73 2c 20 61 63 74 75 61 6c 6c 79 20 6e 6f 74 20 6f 6e 6c 79 20 65 62 6f | ge.ebooks,.actually.not.only.ebo |
| 37d20 | 6f 6b 73 21 0a 3b 3b 20 33 2e 20 4d 61 6e 61 67 65 20 45 62 6f 6f 6b 20 6c 69 62 72 61 72 69 65 | oks!.;;.3..Manage.Ebook.librarie |
| 37d40 | 73 2e 0a 3b 3b 20 34 2e 20 41 6e 6f 74 68 65 72 20 62 6f 6f 6b 6d 61 72 6b 73 20 73 6f 6c 75 74 | s..;;.4..Another.bookmarks.solut |
| 37d60 | 69 6f 6e 2c 20 62 79 20 73 65 74 74 69 6e 67 20 74 68 65 20 74 61 67 73 20 61 6e 64 20 63 6f 6d | ion,.by.setting.the.tags.and.com |
| 37d80 | 6d 65 6e 74 73 2e 0a 3b 3b 20 35 2e 20 51 75 69 63 6b 20 73 65 61 72 63 68 2c 20 66 69 6c 74 65 | ments..;;.5..Quick.search,.filte |
| 37da0 | 72 2c 20 6d 61 6b 65 20 61 63 74 69 6f 6e 73 20 6f 6e 20 69 74 65 6d 73 20 77 69 74 68 20 69 76 | r,.make.actions.on.items.with.iv |
| 37dc0 | 79 20 61 6e 64 20 68 65 6c 6d 2e 0a 3b 3b 20 36 2e 20 4f 72 67 2d 72 65 66 20 73 75 70 70 6f 72 | y.and.helm..;;.6..Org-ref.suppor |
| 37de0 | 74 2e 0a 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 | t....;;;.Code:..(require.'calibr |
| 37e00 | 65 64 62 2d 63 6f 72 65 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 66 61 | edb-core).(require.'calibredb-fa |
| 37e20 | 63 65 73 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 29 | ces).(require.'calibredb-search) |
| 37e40 | 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 68 6f 77 29 0a 28 72 65 71 75 | .(require.'calibredb-show).(requ |
| 37e60 | 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 68 65 6c 6d 29 0a 28 72 65 71 75 69 72 65 20 27 63 | ire.'calibredb-helm).(require.'c |
| 37e80 | 61 6c 69 62 72 65 64 62 2d 69 76 79 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 | alibredb-ivy).(require.'calibred |
| 37ea0 | 62 2d 75 74 69 6c 73 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 61 6e 6e | b-utils).(require.'calibredb-ann |
| 37ec0 | 6f 74 61 74 69 6f 6e 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 74 72 61 | otation).(require.'calibredb-tra |
| 37ee0 | 6e 73 69 65 6e 74 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 6c 69 62 72 | nsient).(require.'calibredb-libr |
| 37f00 | 61 72 79 29 0a 28 72 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 6f 72 67 29 0a 28 72 | ary).(require.'calibredb-org).(r |
| 37f20 | 65 71 75 69 72 65 20 27 63 61 6c 69 62 72 65 64 62 2d 6f 70 64 73 29 0a 28 72 65 71 75 69 72 65 | equire.'calibredb-opds).(require |
| 37f40 | 20 27 63 61 6c 69 62 72 65 64 62 2d 63 6f 6e 73 75 6c 74 29 0a 28 72 65 71 75 69 72 65 20 27 63 | .'calibredb-consult).(require.'c |
| 37f60 | 61 6c 69 62 72 65 64 62 2d 64 69 72 65 64 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a | alibredb-dired)..;;;###autoload. |
| 37f80 | 28 64 65 66 75 6e 20 63 61 6c 69 62 72 65 64 62 20 28 29 0a 20 20 22 45 6e 74 65 72 20 63 61 6c | (defun.calibredb.()..."Enter.cal |
| 37fa0 | 69 62 72 65 20 53 65 61 72 63 68 20 42 75 66 66 65 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 | ibre.Search.Buffer."...(interact |
| 37fc0 | 69 76 65 29 0a 20 20 28 63 6f 6e 64 20 28 28 6e 75 6c 6c 20 63 61 6c 69 62 72 65 64 62 2d 64 62 | ive)...(cond.((null.calibredb-db |
| 37fe0 | 2d 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 63 61 6c 69 62 72 65 | -dir)..........(message."calibre |
| 38000 | 64 62 3a 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 64 69 72 20 69 73 20 6e 69 6c 21 20 63 61 6c | db:.calibredb-db-dir.is.nil!.cal |
| 38020 | 69 62 72 65 64 62 20 77 6f 6e 27 74 20 77 6f 72 6b 20 77 69 74 68 6f 75 74 20 69 74 2e 22 29 29 | ibredb.won't.work.without.it.")) |
| 38040 | 0a 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 66 69 6c 65 2d 72 65 67 75 6c 61 72 2d 70 20 63 | .........((not.(file-regular-p.c |
| 38060 | 61 6c 69 62 72 65 64 62 2d 64 62 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 | alibredb-db-dir))..........(mess |
| 38080 | 61 67 65 20 22 63 61 6c 69 62 72 65 64 62 3a 20 25 73 20 64 6f 65 73 6e 27 74 20 65 78 69 73 74 | age."calibredb:.%s.doesn't.exist |
| 380a0 | 21 22 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 28 74 | !".calibredb-db-dir)).........(t |
| 380c0 | 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 66 75 6e 63 74 69 6f 6e 70 20 27 73 | ..........(if.(and.(functionp.'s |
| 380e0 | 71 6c 69 74 65 2d 61 76 61 69 6c 61 62 6c 65 2d 70 29 20 28 73 71 6c 69 74 65 2d 61 76 61 69 6c | qlite-available-p).(sqlite-avail |
| 38100 | 61 62 6c 65 2d 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 | able-p))..............(unless.(s |
| 38120 | 71 6c 69 74 65 70 20 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 63 6f 6e 6e 65 63 74 69 6f 6e 29 0a | qlitep.calibredb-db-connection). |
| 38140 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 64 62 2d 63 6f 6e | ...............(calibredb-db-con |
| 38160 | 6e 65 63 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 61 6e 64 20 | nection)))..........(let.((cand. |
| 38180 | 28 6f 72 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 0a 20 20 20 | (or.calibredb-search-entries.... |
| 381a0 | 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 63 61 6c 69 | ......................(setq.cali |
| 381c0 | 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 20 28 63 61 6c 69 62 72 65 64 62 2d | bredb-search-entries.(calibredb- |
| 381e0 | 63 61 6e 64 69 64 61 74 65 73 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 | candidates)))))............(unle |
| 38200 | 73 73 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 69 65 73 0a 20 20 20 20 20 20 | ss.calibredb-full-entries....... |
| 38220 | 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6c 69 62 72 65 64 62 2d 66 75 6c 6c 2d 65 6e 74 72 | .......(setq.calibredb-full-entr |
| 38240 | 69 65 73 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 65 6e 74 72 69 65 73 29 29 0a 20 | ies.calibredb-search-entries)).. |
| 38260 | 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 72 20 28 63 61 6c | ..........(when.(get-buffer.(cal |
| 38280 | 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 | ibredb-search-buffer)).......... |
| 382a0 | 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 | ....(kill-buffer.(calibredb-sear |
| 382c0 | 63 68 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 65 74 20 76 | ch-buffer)))............;;.Set.v |
| 382e0 | 69 72 74 75 61 6c 20 6c 69 62 72 61 72 79 20 6e 61 6d 65 20 77 68 65 6e 20 74 68 65 20 66 69 72 | irtual.library.name.when.the.fir |
| 38300 | 73 74 20 74 69 6d 65 20 74 6f 20 6c 61 75 6e 63 68 20 63 61 6c 69 62 72 65 64 62 0a 20 20 20 20 | st.time.to.launch.calibredb..... |
| 38320 | 20 20 20 20 20 20 20 28 69 66 20 28 65 71 75 61 6c 20 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 | .......(if.(equal.calibredb-sear |
| 38340 | 63 68 2d 66 69 6c 74 65 72 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 | ch-filter."")................(se |
| 38360 | 74 71 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 6e 61 6d | tq.calibredb-virtual-library-nam |
| 38380 | 65 20 63 61 6c 69 62 72 65 64 62 2d 76 69 72 74 75 61 6c 2d 6c 69 62 72 61 72 79 2d 64 65 66 61 | e.calibredb-virtual-library-defa |
| 383a0 | 75 6c 74 2d 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f | ult-name))............(switch-to |
| 383c0 | 2d 62 75 66 66 65 72 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 62 75 66 66 65 72 | -buffer.(calibredb-search-buffer |
| 383e0 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d | ))............(goto-char.(point- |
| 38400 | 6d 69 6e 29 29 0a 20 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 | min))............(unless.(equal. |
| 38420 | 63 61 6e 64 20 27 28 22 22 29 29 20 20 20 3b 20 6e 6f 74 20 65 6d 70 74 79 20 6c 69 62 72 61 72 | cand.'(""))...;.not.empty.librar |
| 38440 | 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 69 74 65 6d 20 63 61 6e | y..............(dolist.(item.can |
| 38460 | 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 62 65 67 20 65 6e 64 29 | d)................(let.(beg.end) |
| 38480 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 65 67 20 28 70 6f 69 | ..................(setq.beg.(poi |
| 384a0 | 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 63 | nt))..................(insert.(c |
| 384c0 | 61 72 20 69 74 65 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 | ar.item))..................(cali |
| 384e0 | 62 72 65 64 62 2d 64 65 74 61 69 6c 65 64 2d 76 69 65 77 2d 69 6e 73 65 72 74 2d 69 6d 61 67 65 | bredb-detailed-view-insert-image |
| 38500 | 20 69 74 65 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 6e | .item)..................(setq.en |
| 38520 | 64 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 74 | d.(point))..................(put |
| 38540 | 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 62 65 67 20 65 6e 64 20 27 63 61 6c 69 62 72 65 64 | -text-property.beg.end.'calibred |
| 38560 | 62 2d 65 6e 74 72 79 20 69 74 65 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | b-entry.item)..................( |
| 38580 | 69 6e 73 65 72 74 20 22 5c 6e 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 | insert."\n")))..............(got |
| 385a0 | 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | o-char.(point-min)))............ |
| 385c0 | 28 63 61 6c 69 62 72 65 64 62 2d 72 65 66 2d 64 65 66 61 75 6c 74 2d 62 69 62 6c 69 6f 67 72 61 | (calibredb-ref-default-bibliogra |
| 385e0 | 70 68 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 6d 61 6a 6f | phy)............(unless.(eq.majo |
| 38600 | 72 2d 6d 6f 64 65 20 27 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f 64 65 29 0a 20 | r-mode.'calibredb-search-mode).. |
| 38620 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 69 62 72 65 64 62 2d 73 65 61 72 63 68 2d 6d 6f | ............(calibredb-search-mo |
| 38640 | 64 65 29 29 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 63 61 6c 69 62 72 65 64 62 29 0a 3b | de))))))..(provide.'calibredb).; |
| 38660 | 3b 3b 20 63 61 6c 69 62 72 65 64 62 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 | ;;.calibredb.el.ends.here....... |
| 38680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 386a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 386c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 386e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 387a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 387c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 387e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38800 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38860 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38880 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 388a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 388c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 388e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38900 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38920 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 389a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 389c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 389e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38a00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38a20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38a40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38a60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38a80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38aa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38ae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38b00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38c00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38c20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38c60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38c80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38d00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38d20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38e00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38e20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38e60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38e80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 38fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39000 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39060 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 390a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 390c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 390e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 391a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 391c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 391e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39200 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39260 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39280 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 392a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 392c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 392e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39300 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 393a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 393c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 393e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39400 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39460 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 394a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 394c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 394e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 395a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 395c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 395e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 396a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 396c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 396e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 39780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 397a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 397c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 397e0 | 00 00 00 00 00 00 00 00 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: 5b25087b14d1cc7e52abfedf5b84ecc48f91d117 (plain)