Lmst

SHIVERED - Chains [FULL ALBUM] 2025 (lyrics in 'pinned' comment)

https://peertube.gravitywell.xyz/w/cD8umbsDjTLMEb5b4Y4tch

ولی فرشته‌های ایرانی در یک لول دیگه‌ای قشنگند!
Persian angels are on a whole other level!
#هنر #هنرى #نگارگری #ایران #فرشته
#art #artist #artwork #angel #angels #AngelArt #persian

اژدهای ایرانی🐉
Persian dragon🐉
#هنر #هنرى #نگارگری #art #artist #artwork #persian

Persian ceremonial blade, gold, Iran, 5th century BCE

If you use the #Persian calendar in #Emacs you may have noticed that it is off by one day this year. Some of you noticed that back in 2005 actually:
https://gnu.emacs.bug.narkive.com/fQYJ1V7H/cal-persia-el-disagrees-with-iranian-calendar-in-a-d-2025

Here is a workaround to fix this until the next time the approximation fails, or someone implements something more accurate:

(with-eval-after-load 'cal-persia
  (define-advice
      calendar-persian-to-absolute
      (:around (orig-fun date) "fix-1403-1404")
    (let ((orig-abs (funcall orig-fun date))
          (first-wrong-abs 739330)  ; Farvardin 1, 1404
          (last-wrong-abs 739695))  ; Esfand 29, 1404
      (if (<= first-wrong-abs orig-abs last-wrong-abs)
          (1+ orig-abs)
        orig-abs)))

  (define-advice
      calendar-persian-from-absolute
      (:around (orig-fun date) "fix-1403-1404")
    ;; NOTE: `calendar-persian-to-absolute' uses
    ;; `calendar-persian-from-absolute', so only one date (as opposed
    ;; to a full year) needs special handling here.
    (if (= date 739330)  ; miscalculted as Farvardin 1, 1404
        '(12 30 1403)    ; Esfand 30, 1403
      (funcall orig-fun date)))

  (define-advice
      calendar-persian-leap-year-p
      (:around (orig-fun year) "fix-1403-1404")
    (if (<= 1403 year 1404)
        (not (funcall orig-fun year))
      (funcall orig-fun year))))