diff --git a/screens/dashboard.el b/screens/dashboard.el
index 3174d81..aed3d1c 100644
--- a/screens/dashboard.el
+++ b/screens/dashboard.el
@@ -102,41 +102,47 @@
       (grid-make-box
        `(:content ,(concat
 		    enlight-calendar "\n\n"
-		    (grid-make-row
-		     (list (grid-make-box `(:content ,(concat
-						       (enlight-menu
-							'(("Exobrain"
-							   ("Agenda" (org-agenda nil "a") "a")
-							   ("Go to Inbox" open-inbox "i")
-							   ("Capture" org-capture "c")))))
-						     :align left
-						     :width 20))
-			   (grid-make-box `(:content ,(concat
-						       (enlight-menu
-							'(("Projects"
-							   ("Switch To" theurgy-open-project "p")
-							   ("Project List" theurgy-edit-projects-list "l")))))
-						     :align center
-						     :width 20))
-			   (grid-make-box `(:content ,(concat
-						       (enlight-menu
-							'(("Userland"
-							   ("Dired" (dired "~") "d")
-							   ("RSS" elfeed "r")
-							   ("Terminal" theurgy-bottom-shell "t")
-							   ("Gomuks" theurgy-gomuks-workspace "G")
-							   ("Weather" theurgy-show-weather "w")))))
-						     :align center
-						     :width 20))
-			   (grid-make-box `(:content ,(concat
-						       (enlight-menu
-							'(("Meta"
-							   ("Elisp Scratch" open-elisp-scratch "s")
-							   ("Org Scratch" open-org-scratch "o")
-							   ("Init Dir" (dired user-emacs-directory) "e")
-							   ("Info" info "h")))))
-						     :align right
-						     :width 20)))))
+		    (funcall (if (equal system-type 'android)
+				 'grid-make-column
+			       'grid-make-row)
+			     (list (grid-make-box `(:content ,(concat
+							       (enlight-menu
+								'(("Exobrain"
+								   ("Agenda" (org-agenda nil "a") "a")
+								   ("Go to Inbox" open-inbox "i")
+								   ("Capture" org-capture "c")))))
+							     :align (if (equal system-type 'android)
+									'center
+								      'left)
+							     :width 20))
+				   (grid-make-box `(:content ,(concat
+							       (enlight-menu
+								'(("Projects"
+								   ("Switch To" theurgy-open-project "p")
+								   ("Project List" theurgy-edit-projects-list "l")))))
+							     :align center
+							     :width 20))
+				   (grid-make-box `(:content ,(concat
+							       (enlight-menu
+								'(("Userland"
+								   ("Dired" (dired "~") "d")
+								   ("RSS" elfeed "r")
+								   ("Terminal" theurgy-bottom-shell "t")
+								   ("Gomuks" theurgy-gomuks-workspace "G")
+								   ("Weather" theurgy-show-weather "w")))))
+							     :align center
+							     :width 20))
+				   (grid-make-box `(:content ,(concat
+							       (enlight-menu
+								'(("Meta"
+								   ("Elisp Scratch" open-elisp-scratch "s")
+								   ("Org Scratch" open-org-scratch "o")
+								   ("Init Dir" (dired user-emacs-directory) "e")
+								   ("Info" info "h")))))
+							     :align (if (equal system-type 'android)
+									'center
+								      'right)
+							     :width 20)))))
 		  ))
       ))
 					;(grid-make-box `(:content ,(enlight-weather) :align center))