Kaynağa Gözat

fix when quoted post is a string e.g. "aaaads" rather than alist

Yuchen Pei 10 ay önce
ebeveyn
işleme
7ccd8ff06b
1 değiştirilmiş dosya ile 8 ekleme ve 1 silme
  1. 8 1
      exitter.el

+ 8 - 1
exitter.el

@@ -583,7 +583,14 @@ Including ancestors and descendants, if any."
             (if .quoted
                 (format "\n\n----\n%s----"
                         (replace-regexp-in-string
-                         "^." " \\&" (exitter-format-post .quoted.post 1)))
+                         "^." " \\&"
+                         (if (stringp .quoted)
+                             (message "Quoted post is a plain string: %s\n"
+                                      .quoted)
+                           ;; We can't use .quoted.post here because
+                           ;; for some reason it is evaluated even if
+                           ;; the "if" branch is entered.
+                           (exitter-format-post (alist-get 'post .quoted) 1))))
               "")
             .reply_count
             .quote_count