diff options
author | William Carroll <wpcarro@gmail.com> | 2019-01-13T19·33-0500 |
---|---|---|
committer | William Carroll <wpcarro@gmail.com> | 2019-01-13T19·45-0500 |
commit | 481df5a3855ccd5ea3bf4d5f41ae780f4773b7b4 (patch) | |
tree | 3aeb7e20eaba176536cb8d10ba531ac39674fc4a /configs/shared/emacs/.emacs.d/elpa/docker-20180820.1130/docker-process.el | |
parent | 18b9930b8604134f087ca61fe94740b31f94327c (diff) |
Remove Emacs spam
My inconsistent git history-keeping is coming to bite me here. At the moment, I can only speculate about what went wrong here. The gist is this: I unintentionally committed files that were supposed to be ignored This commit removes those files which includes: - auto-save-list - elpa packages - quelpa packages - misc
Diffstat (limited to 'configs/shared/emacs/.emacs.d/elpa/docker-20180820.1130/docker-process.el')
-rw-r--r-- | configs/shared/emacs/.emacs.d/elpa/docker-20180820.1130/docker-process.el | 58 |
1 files changed, 0 insertions, 58 deletions
diff --git a/configs/shared/emacs/.emacs.d/elpa/docker-20180820.1130/docker-process.el b/configs/shared/emacs/.emacs.d/elpa/docker-20180820.1130/docker-process.el deleted file mode 100644 index 16bf262594fc..000000000000 --- a/configs/shared/emacs/.emacs.d/elpa/docker-20180820.1130/docker-process.el +++ /dev/null @@ -1,58 +0,0 @@ -;;; docker-process.el --- Emacs interface to Docker -*- lexical-binding: t -*- - -;; Author: Philippe Vaucher <philippe.vaucher@gmail.com> - -;; This file is NOT part of GNU Emacs. - -;; 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. - -;;; Commentary: - -;;; Code: - -(require 's) -(require 'dash) -(require 'docker-group) - -(defcustom docker-command "docker" - "The docker binary." - :group 'docker - :type 'string) - -(defcustom docker-arguments '() - "Default arguments for `docker'." - :group 'docker - :type '(repeat (string :tag "Argument"))) - -(defcustom docker-run-as-root nil - "Run docker as root." - :group 'docker - :type 'boolean) - -(defun docker-run (action &rest args) - "Execute \"docker ACTION\" using ARGS." - (let ((default-directory (if (and docker-run-as-root (not (file-remote-p default-directory))) "/sudo::" default-directory))) - (let ((command (format "%s %s %s %s" - docker-command - (s-join " " docker-arguments) - action - (s-join " " (-flatten (-non-nil args)))))) - (message command) - (shell-command-to-string command)))) - -(provide 'docker-process) - -;;; docker-process.el ends here |