bug#38918: 26.3; EBDB fails to edit (add) tags

[Jorge P. de Morais Neto <jorge+list@disroot.org>]

[-- Attachment #1: Error when editing tags using the customize interface --]
[-- Type: text/plain, Size: 877 bytes --]

cl-no-applicable-method: No applicable method: ebdb-record-delete-field, #s(ebdb-record-person #s(ebdb-field-uuid "ce30c771-c0e3-4874-ab90-a8e49078e531") #s(ebdb-field-creation-date (24078 20399 443853 624000)) #s(ebdb-field-timestamp (24081 48590 249568 725000)) (#s(ebdb-field-tags ("TODO"))) nil nil t #s(ebdb-cache "John Doe" ("John Doe" "Doe, John") ("ACME") nil ("john@acme.com") "doe, john" (#s(ebdb-db-file "~/.emacs.d/ebdb" "File: ebdb" #s(ebdb-field-uuid "41310d36-e033-4b31-81fa-c1c9421c8cb7") (24081 48578 561310 979000) (#0 #s(ebdb-record-organization #s(ebdb-field-uuid "88bf0c5e-6c6c-4317-899a-8cf19dd4c6a5") #s(ebdb-field-creation-date (24078 20310 981426 250000)) #s(ebdb-field-timestamp (24078 20310 981328 143000)) nil nil nil nil #s(ebdb-cache "ACME" nil nil nil nil "acme" (#3)) 
 nil ...)) nil "0.1" "" nil ...))) nil ...), (#s(ebdb-field-tags ("TODO")))

[-- Attachment #2: ebdb --]
[-- Type: text/plain, Size: 1876 bytes --]

;; Object ebdb-db-file
;; EBDB file-persistent database
(ebdb-db-file "ebdb-db-file"
  :file "ebdb"
  :label "File: ebdb"
  :uuid
  (ebdb-field-uuid "ebdb-field-uuid"
    :uuid "41310d36-e033-4b31-81fa-c1c9421c8cb7")
  :sync-time '(24081 48356 371204 372000)
  :records
  (list
    (ebdb-record-person "ebdb-record-person"
      :uuid
      (ebdb-field-uuid "ebdb-field-uuid"
        :uuid "ce30c771-c0e3-4874-ab90-a8e49078e531")
      :creation-date
      (ebdb-field-creation-date "ebdb-field-creation-date"
        :timestamp '(24078 20399 443853 624000))
      :timestamp
      (ebdb-field-timestamp "ebdb-field-timestamp"
        :timestamp '(24081 48374 24658 809000))
      :fields
      (list
        (ebdb-field-tags "ebdb-field-tags"
          :tags '("TODO" "test")))
      :name
      (ebdb-field-name-complex "ebdb-field-name-complex"
        :surname "Doe"
        :given-names '("John"))
      :organizations
      (list
        (ebdb-field-role "ebdb-field-role"
          :label "CEO"
          :record-uuid "ce30c771-c0e3-4874-ab90-a8e49078e531"
          :org-uuid "88bf0c5e-6c6c-4317-899a-8cf19dd4c6a5"
          :mail
          (ebdb-field-mail "ebdb-field-mail"
            :mail "john@acme.com"
            :priority primary))))
    (ebdb-record-organization "ebdb-record-organization"
      :uuid
      (ebdb-field-uuid "ebdb-field-uuid"
        :uuid "88bf0c5e-6c6c-4317-899a-8cf19dd4c6a5")
      :creation-date
      (ebdb-field-creation-date "ebdb-field-creation-date"
        :timestamp '(24078 20310 981426 250000))
      :timestamp
      (ebdb-field-timestamp "ebdb-field-timestamp"
        :timestamp '(24078 20310 981328 143000))
      :name
      (ebdb-field-name-simple "ebdb-field-name-simple"
        :name "ACME")
      :domain
      (ebdb-field-domain "ebdb-field-domain"
        :domain "acme.com")))
  :record-class ebdb-record-person)

[-- Attachment #3: Type: text/plain, Size: 993 bytes --]

Em [2020-01-04 sáb 16:43:04-0800], Eric Abrahamsen escreveu:

> Okay, I've fixed the first problem.

Thanks!

> For the second, are you getting a 'ebdb-unacceptable-field error, or
> what is it?

I get the error attached.  I also attached the EBDB database I used to
get the error.  And how I got it:

1. Start Emacs
2. Invoke M-x ebdb <RET><RET>
3. Move point to the tags line (it has two tags)
4. Hit "E"
5. Delete the second tag
6. Hit [Apply]
7. Hit [Accept]

Notice that I hit [Accept] after hitting [Apply].  This is how the error
occurs.  Sorry for not mentioning that in the first email.

Regards
-- 
- <https://jorgemorais.gitlab.io/justice-for-rms/>
- I am Brazilian.  I hope my English is correct and I welcome feedback.
- Please adopt free formats like PDF, ODF, Org, LaTeX, Opus, WebM and 7z.
- Free/libre software for Replicant, LineageOS and Android: https://f-droid.org
- [[https://www.gnu.org/philosophy/free-sw.html][What is free software?]]