-
Notifications
You must be signed in to change notification settings - Fork 4
/
dctrl-android.el
49 lines (35 loc) · 1.67 KB
/
dctrl-android.el
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
;;; dctrl-android.el --- Device control Android meta-backend
;; Copyright (C) 2014-2018 Free Software Foundation, Inc.
;; Author: Jeremy Compostella <jeremy.compostella@gmail.com>
;; Robert Jarzmik <robert.jarzmik@free.fr>
;; Sylvain Chouleur <sylvain.chouleur@gmail.com>
;; Keywords: comm, processes, devices
;; Package: device-control
;; This file is not part of GNU Emacs.
;; GNU Emacs 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 of the License, or
;; (at your option) any later version.
;; GNU Emacs 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. If not, see <http://www.gnu.org/licenses/>.
;;; Commentary:
;; This package is a `device-control' meta-backend aggregating
;; `dctrl-adb' abd `dctrl-fastboot' backends.
(require 'device-control)
(require 'dctrl-adb)
(require 'dctrl-fastboot)
(defun dctrl-android-get-actions ()
(dctrl-agregate-fun-list (dctrl-build-fun-list "dctrl-adb-action-")
(dctrl-build-fun-list "dctrl-fsb-action-")))
(defun dctrl-android-guess-device-names ()
(nconc (dctrl-adb-guess-device-names)
(dctrl-fsb-guess-device-names)))
(dctrl-register-backend
(make-dctrl-backend :name "android"
:get-actions 'dctrl-android-get-actions
:guess-device-names 'dctrl-android-guess-device-names))
(provide 'dctrl-android)