Permalink
Browse files

Tabbar: add high-resolution close and other buttons

nsimage: select smallest full-resolution image representation (2x2 instead of 30x30)
Description for tabbar image conversions
  • Loading branch information...
1 parent d221162 commit 9dab2c8efe2269b340328d500d05a29d3dc702cc @davidswelt committed Jul 11, 2012
@@ -0,0 +1,9 @@
+To produce the tiff images:
+
+convert close-tab12.png close-tab24.png ../../src/site-lisp/tabbar/close-tab.tiff
+
+To set DPI correctly:
+
+convert -units PixelsPerInch close-tab24.png -density 184 close-tab\@2x.png
+convert -units PixelsPerInch close-tab12.png -density 92 close-tab.png
+convert close-tab.png close-tab\@2x.png ../../src/site-lisp/tabbar/close-tab.tiff
@@ -469,27 +469,27 @@ or groups. Call the function `tabbar-button-label' otherwise."
(cons "[-]" tabbar-home-button-disabled-image)))
(setq tabbar-scroll-left-button-enabled-image
- '((:type png :file "left.png")))
+ '((:type tiff :file "left.tiff")))
(setq tabbar-scroll-left-button-disabled-image
- '((:type png :file "left_disabled.png")))
+ '((:type tiff :file "left_disabled.tiff")))
(setq tabbar-scroll-left-button
(cons (cons " <" tabbar-scroll-left-button-enabled-image)
(cons " =" tabbar-scroll-left-button-disabled-image)))
(setq tabbar-scroll-right-button-enabled-image
- '((:type png :file "right.png")))
+ '((:type tiff :file "right.tiff")))
(setq tabbar-scroll-right-button-disabled-image
- '((:type png :file "right_disabled.png")))
+ '((:type tiff :file "right_disabled.tiff")))
(setq tabbar-scroll-right-button
(cons (cons " >" tabbar-scroll-right-button-enabled-image)
(cons " =" tabbar-scroll-right-button-disabled-image)))
(setq tabbar-close-tab-button
- '((:type png :file "close-tab.png")))
+ '((:type tiff :file "close-tab.tiff")))
;; allow fast-clicking through lists of tabs
(defsubst tabbar-click-p (event)
@@ -924,4 +924,4 @@ The following options are available:
(selected-window))) 'append))
-(provide 'aquamacs-tabbar)
+(provide 'aquamacs-tabbar)
Deleted file not rendered
Binary file not shown.
Deleted file not rendered
Binary file not shown.
Deleted file not rendered
Binary file not shown.
Deleted file not rendered
Binary file not shown.
Deleted file not rendered
Binary file not shown.
View
@@ -245,7 +245,8 @@ @implementation EmacsImage
// needed to pick the right representation e.g., when HiDPI image is provided.
if ([image respondsToSelector: @selector (bestRepresentationForRect:context:hints:)])
{
- imgRep = [image bestRepresentationForRect: NSMakeRect(100,100,30,30) context:nil hints: nil];
+ // Choose the smallest (full-resolution) image representation
+ imgRep = [image bestRepresentationForRect: NSMakeRect(100,100,2,2) context:nil hints: nil];
}
else
{

0 comments on commit 9dab2c8

Please sign in to comment.