Skip to content

Commit

Permalink
Updated step JENKINS/WRITE-WIZARD-STATE src/steps/jenkins-install.lisp
Browse files Browse the repository at this point in the history
* src/steps/jenkins-install.lisp (+jenkins-install-util-state-filename+):
  new constant; name of install util state file
  (define-step jenkins/write-wizard-state): write to
  +JENKINS-INSTALL-UTIL-STATE-FILENAME+ in addition to
  +JENKINS-WIZARD-STATE-FILENAME+
  • Loading branch information
scymtym committed Nov 15, 2024
1 parent 504e740 commit 34e6142
Showing 1 changed file with 10 additions and 4 deletions.
14 changes: 10 additions & 4 deletions src/steps/jenkins-install.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -114,12 +114,18 @@
"jenkins.install.UpgradeWizard.state"
:test #'string=)

(define-constant +jenkins-install-util-state-filename+
"jenkins.install.InstallUtil.lastExecVersion"
:test #'string=)

(define-step (jenkins/write-wizard-state)
(destination-directory version)
(let ((wizard-state-filename (merge-pathnames +jenkins-wizard-state-filename+
destination-directory)))
(with-output-to-file (stream wizard-state-filename)
(write-string version stream))))
(flet ((write-one (filename)
(let ((filename (merge-pathnames filename destination-directory)))
(with-output-to-file (stream filename)
(write-string version stream)))))
(write-one +jenkins-wizard-state-filename+)
(write-one +jenkins-install-util-state-filename+)))

;;; `jenkins/install-plugins[-with-dependencies]' steps

Expand Down

0 comments on commit 34e6142

Please sign in to comment.