aboutsummaryrefslogtreecommitdiff
path: root/tests/test-pearl-favorites.el
diff options
context:
space:
mode:
Diffstat (limited to 'tests/test-pearl-favorites.el')
-rw-r--r--tests/test-pearl-favorites.el17
1 files changed, 17 insertions, 0 deletions
diff --git a/tests/test-pearl-favorites.el b/tests/test-pearl-favorites.el
index 55808b3..3f1452f 100644
--- a/tests/test-pearl-favorites.el
+++ b/tests/test-pearl-favorites.el
@@ -56,6 +56,23 @@ For an issue node, IDENTIFIER fills the issue's user-facing key."
(should (string= "Active bugs" (plist-get p :title)))
(should (string= "view-1" (plist-get p :id)))))
+(ert-deftest test-pearl-normalize-favorite-custom-view-blank-title-uses-name ()
+ "A favorited custom view with a blank own title takes the customView's name.
+Linear populates Favorite.title only for favorite folders, so an entity favorite
+arrives with a null/empty title and the entity's own name is the only display
+string -- the favorites query selects customView.name for exactly this."
+ (let* ((node (list (cons 'id "fav-customView")
+ (cons 'type "customView")
+ (cons 'title nil)
+ (cons 'url "https://linear.app/x/view/v1")
+ (cons 'sortOrder 0.1)
+ (cons 'customView (list (cons 'id "view-1")
+ (cons 'name "Pearl Open Issues")))))
+ (p (pearl--normalize-favorite node)))
+ (should (eq 'view (plist-get p :kind)))
+ (should (string= "Pearl Open Issues" (plist-get p :title)))
+ (should (string= "view-1" (plist-get p :id)))))
+
(ert-deftest test-pearl-normalize-favorite-project ()
(let ((p (pearl--normalize-favorite
(test-pearl-fav--node "project" "Platform" "https://linear.app/x/project/p1" 0.2