From a880d5006fca8581d3cf7e55cba2a575eff5328a Mon Sep 17 00:00:00 2001
From: Andreas Gerler <baron@bundesbrandschatzamt.de>
Date: Wed, 21 May 2025 14:49:39 +0200
Subject: [PATCH] update org-mime

---
 bba-orgmode.org                                     |  2 +-
 .../org-mime-autoloads.el                           |  0
 .../org-mime-pkg.el                                 |  8 ++++----
 .../org-mime.el                                     | 13 ++++++++++---
 4 files changed, 15 insertions(+), 8 deletions(-)
 rename elpa/{org-mime-20241001.415 => org-mime-20250318.2155}/org-mime-autoloads.el (100%)
 rename elpa/{org-mime-20241001.415 => org-mime-20250318.2155}/org-mime-pkg.el (56%)
 rename elpa/{org-mime-20241001.415 => org-mime-20250318.2155}/org-mime.el (98%)

diff --git a/bba-orgmode.org b/bba-orgmode.org
index 435a2ab1..a5dc9e13 100644
--- a/bba-orgmode.org
+++ b/bba-orgmode.org
@@ -1864,7 +1864,7 @@ Use =C-c M= to send a multipart email with .org as text and exported
 html.
 
 #+BEGIN_SRC emacs-lisp
-  (load-file "~/.emacs.d/elpa/org-mime-20241001.415/org-mime.el")
+  (load-file "~/.emacs.d/elpa/org-mime-20250318.2155/org-mime.el")
   (add-hook 'org-mode-hook
             (lambda()
               (define-key org-mode-map "\C-c\S-m" 'org-mime-org-buffer-htmlize)))
diff --git a/elpa/org-mime-20241001.415/org-mime-autoloads.el b/elpa/org-mime-20250318.2155/org-mime-autoloads.el
similarity index 100%
rename from elpa/org-mime-20241001.415/org-mime-autoloads.el
rename to elpa/org-mime-20250318.2155/org-mime-autoloads.el
diff --git a/elpa/org-mime-20241001.415/org-mime-pkg.el b/elpa/org-mime-20250318.2155/org-mime-pkg.el
similarity index 56%
rename from elpa/org-mime-20241001.415/org-mime-pkg.el
rename to elpa/org-mime-20250318.2155/org-mime-pkg.el
index f621f052..8b00df24 100644
--- a/elpa/org-mime-20241001.415/org-mime-pkg.el
+++ b/elpa/org-mime-20250318.2155/org-mime-pkg.el
@@ -1,9 +1,9 @@
 ;; -*- no-byte-compile: t; lexical-binding: nil -*-
-(define-package "org-mime" "20241001.415"
+(define-package "org-mime" "20250318.2155"
   "Org html export for text/html MIME emails."
   '((emacs "27.1"))
-  :url "https://github.com/org-mime/org-mime"
-  :commit "90aa9081ec00a1705552434cb45ff223aa9f8711"
-  :revdesc "90aa9081ec00"
+  :url "http://github.com/org-mime/org-mime"
+  :commit "9571c148eed5e86fdd54eb6bf2814947c2c745a6"
+  :revdesc "9571c148eed5"
   :keywords '("mime" "mail" "email" "html")
   :maintainers '(("Chen Bin" . "chenbin.sh@gmail.com")))
diff --git a/elpa/org-mime-20241001.415/org-mime.el b/elpa/org-mime-20250318.2155/org-mime.el
similarity index 98%
rename from elpa/org-mime-20241001.415/org-mime.el
rename to elpa/org-mime-20250318.2155/org-mime.el
index 502ffdf2..84fea29d 100644
--- a/elpa/org-mime-20241001.415/org-mime.el
+++ b/elpa/org-mime-20250318.2155/org-mime.el
@@ -6,8 +6,8 @@
 ;; Maintainer: Chen Bin <chenbin.sh@gmail.com>
 ;; Keywords: mime, mail, email, html
 ;; Homepage: http://github.com/org-mime/org-mime
-;; Package-Version: 20241001.415
-;; Package-Revision: 90aa9081ec00
+;; Package-Version: 20250318.2155
+;; Package-Revision: 9571c148eed5
 ;; Package-Requires: ((emacs "27.1"))
 
 ;; This file is not part of GNU Emacs.
@@ -141,6 +141,11 @@
   :group 'org-mime
   :type 'boolean)
 
+(defcustom org-mime-beautify-quoted-mail-style "margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"
+  "Style for beautifying quoted mail."
+  :type 'string
+  :group 'org-mime)
+
 (defcustom org-mime-use-property-inheritance nil
   "Non-nil means al MAIL_ properties apply also for sub-levels."
   :group 'org-mime
@@ -314,7 +319,9 @@ HTML is the body of the message."
   (let ((quote-depth 0)
         (line-depth 0)
         (in-quote-p nil)
-        (quote-opening "<blockquote class=\"gmail_quote\" style=\"margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex\">\n\n<div>")
+        (quote-opening (concat "<blockquote class=\"gmail_quote\" style=\""
+                               org-mime-beautify-quoted-mail-style
+                               "\">\n\n<div>"))
         (quote-closing "\n</div></blockquote>\n"))
     (with-temp-buffer
       ;; clean title of quoted
-- 
2.47.3