Refactor - Extract token folder + token name to look for.

;; use case 1: the user ardumont sets to default, so this will look for ~/.marmalade/ardumont as the token file
(setq marmalade/default-token-name)
(marmalade/compute-token-filepath "ardumont")

;; use case 2: the user ardumont sets to token, so this will look for ~/.marmalade/token as the token file
(setq marmalade/default-token-name "token")
(marmalade/compute-token-filepath "ardumont")