diff options
| author | Craig Jennings <c@cjennings.net> | 2026-06-28 06:54:37 -0400 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2026-06-28 06:54:37 -0400 |
| commit | 0ac588eb45df674049dab835b38ee178f552cef7 (patch) | |
| tree | 5580ced98c28f6e4366967b09b36a4f09d7ad2da /custom/utilities | |
| parent | 9180b25fddc96a4b2cd580b86191fb5686dc20d7 (diff) | |
| download | dotemacs-0ac588eb45df674049dab835b38ee178f552cef7.tar.gz dotemacs-0ac588eb45df674049dab835b38ee178f552cef7.zip | |
docs: finish the commentary/comment audit tail
Condensed early-init's debug-flags note and added a why for the deferred global-font-lock, rewrote three vcf-conversion-helpers comments to name the real intent (keeping the reverse-order-to-preserve-positions rationale), and gave the archived testutil-filesystem a real summary while deleting its line-by-line narration comments.
Diffstat (limited to 'custom/utilities')
| -rw-r--r-- | custom/utilities/vcf-conversion-helpers.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/custom/utilities/vcf-conversion-helpers.el b/custom/utilities/vcf-conversion-helpers.el index d336eac8e..4ea340236 100644 --- a/custom/utilities/vcf-conversion-helpers.el +++ b/custom/utilities/vcf-conversion-helpers.el @@ -15,8 +15,8 @@ (insert-file-contents input-vcf) (goto-char (point-min)) - ;; First, clean up multi-line fields (unfold them) BEFORE processing - ;; This ensures PHOTO and other multi-line fields are on single lines + ;; Unfold continuation lines before field-level parsing; PHOTO and NOTE values + ;; often span multiple physical lines in exported VCF files. (goto-char (point-min)) (while (re-search-forward "\n[ \t]+" nil t) (replace-match " " t t)) @@ -60,7 +60,7 @@ (field-value (match-string 3))) (replace-match (format "%s%s:%s" field-type field-params field-value) t t))) - ;; NOW remove unwanted fields (but not the converted TEL/EMAIL fields) + ;; Remove Apple/Google metadata fields after preserving converted TEL/EMAIL data. (let ((remove-patterns '("^PHOTO:.*$" "^X-ABRELATEDNAMES:.*$" @@ -156,7 +156,7 @@ (widen))))))) - ;; Remove VCARDs with no identifying information (in reverse order to preserve positions) + ;; Drop cards with no displayable name, in reverse order to keep positions valid. (dolist (vcard-range (reverse vcards-to-remove)) (delete-region (car vcard-range) (cdr vcard-range)) (message "Removed VCARD with no identifying information"))) |
