feat(cask): Add option to convert Cask to Eask

[jcs090218]

For #141. Add the options,

$ eask init --from cask [files..]

Another feature, the help instruction now look like this:

''                                                           ''

    Make sure you have a valid Cask-file in your directory

    Or specify Cask-file explicitly, like:

      $ eask init --from=cask /path/to/Cask

''                                                           ''

Expect for improvements.

[Fuco1]

I pulled the latest master and can't get this to work.

[jcs090218]

Do you have Eask file in the directory? It will skip if there is already one presented. ;)

[Fuco1]

No Eask file. I'm trying it in https://github.com/Fuco1/sphinx-mode repo now.

[jcs090218]

It works on my side. 🤔

Running Eask in the development environment
Press Ctrl+C to cancel.

Executing script inside Emacs...

  Checking Emacs version 29.0.60... done!
  Checking system windows-nt... done!

Converting file `Cask` to `Eask`... done

(Total of 1 Cask-file converted)

The logic is here,

cli/lisp/init/cask.el

Lines 27 to 38 in 52bd410

	(cond ((not (string-prefix-p "Cask" file))
	(eask-debug "✗ Invalid Cask filename, the file should start with `Cask`"))
	((file-exists-p new-filename)
	(eask-debug "✗ The file `%s` already presented" new-file))
	(t
	(with-current-buffer (find-file new-filename)
	(insert-file-contents file)
	(goto-char (point-min))
	(while (re-search-forward "(source " nil t)
	(insert "'")) ; make it symbol
	(save-buffer))
	(setq converted t))))

It only checks for (file-exists-p ...) and (string-prefix-p "Cask" ...).

[Fuco1]

Doesn't work for me not even on the master. I'll try to debug it from source.