code: Add new command install-deps

Author: jcs090218

cmds/install-deps.js

@@ -0,0 +1,29 @@
+/**
+ * Copyright (C) 2022 Jen-Chieh Shen
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3, or (at your option)
+ * any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Emacs; see the file COPYING.  If not, write to the
+ * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+"use strict";
+
+const util = require("../src/util");
+
+exports.command = ['install-deps', 'install-dependencies'];
+exports.desc = 'automatically install package dependencies';
+
+exports.handler = async (argv) => {
+  await util.e_call(argv, 'install-deps');
+};

lisp/install-deps.el

@@ -0,0 +1,24 @@
+;;; install-deps.el --- Automatically install package dependencies  -*- lexical-binding: t; -*-
+
+;;; Commentary:
+;;
+;; Command use to install package dependencies
+;;
+;;   $ eask install-deps
+;;
+
+;;; Code:
+
+(load (expand-file-name
+       "_prepare.el"
+       (file-name-directory (nth 1 (member "-scriptload" command-line-args))))
+      nil t)
+
+(defun eask--help-install-deps ()
+  "Print help if command failed."
+  )
+
+(eask-start
+  (eask-pkg-init))
+
+;;; install-deps.el ends here

lisp/install.el

@@ -24,7 +24,7 @@
 (eask-load "package")  ; load dist path
 
 (defun eask--help-install ()
-  "Print help if command failed"
+  "Print help if command failed."
   )
 
 (eask-start