diff options
author | Ricardo Wurmus <ricardo.wurmus@mdc-berlin.de> | 2014-10-27 12:14:49 +0100 |
---|---|---|
committer | Ricardo Wurmus <ricardo.wurmus@mdc-berlin.de> | 2014-10-27 12:14:49 +0100 |
commit | 3420b177d5d6dfe67e02dedc2bf0e056b6a86f18 (patch) | |
tree | c8c9dcc740d9ecb6ee1e290bdcdb1a477427c6df | |
parent | 8475bf8d28df2a0e73c649a76728e1a8a1886f37 (diff) |
job-details function needs only job object, not field
-rw-r--r-- | grid-engine-mode.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/grid-engine-mode.el b/grid-engine-mode.el index 7c1242d..6162ec1 100644 --- a/grid-engine-mode.el +++ b/grid-engine-mode.el @@ -43,7 +43,7 @@ (job (get-text-property (point) 'grid-engine-job))) (unless (and field job) (error "[Grid Engine] point is not on a field of a job record")) - (grid-engine-job-details field job arg)))) + (grid-engine-job-details job arg))))) (defun grid-engine--init-header () (grid-engine-update-list-format) @@ -148,7 +148,7 @@ (tabulated-list-print) (message nil))) -(defun grid-engine-job-details (field job &optional new-buffer) +(defun grid-engine-job-details (job &optional new-buffer) (let* ((job-id (cdr (assoc 'job-id job))) (cmd (concat grid-engine-qstat " -j " job-id)) (title (if new-buffer |