[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] oauth cce6178734 2/4: Fix some whitespace.
From: |
Thomas Fitzsimmons |
Subject: |
[elpa] oauth cce6178734 2/4: Fix some whitespace. |
Date: |
Sat, 29 Apr 2023 02:06:53 -0400 (EDT) |
branch: oauth
commit cce617873418a0ab35026bbc3f1dd8eede306505
Author: Thomas Fitzsimmons <fitzsim@fitzsim.org>
Commit: Thomas Fitzsimmons <fitzsim@fitzsim.org>
Fix some whitespace.
* excorporate.el (exco-operation-arity-nils): Fix whitespace.
(exco-calendar-item-meeting-create): Likewise.
(exco-calendar-item-appointment-create): Likewise.
---
excorporate.el | 16 ++++++++--------
1 file changed, 8 insertions(+), 8 deletions(-)
diff --git a/excorporate.el b/excorporate.el
index 85857b6091..a79f474af1 100644
--- a/excorporate.el
+++ b/excorporate.el
@@ -782,8 +782,8 @@ Return a structure, or nil, suitable for splicing into
"Return a list of nil arguments for OPERATION.
IDENTIFIER is the connection for which to look up OPERATION."
(let* ((wsdl (exco--with-fsm identifier
- (plist-get (fsm-get-state-data fsm) :service-wsdl)))
- (arity (soap-operation-arity wsdl "ExchangeServicePort" operation)))
+ (plist-get (fsm-get-state-data fsm) :service-wsdl)))
+ (arity (soap-operation-arity wsdl "ExchangeServicePort" operation)))
(make-list arity nil)))
(defun exco-calendar-item-meeting-create (identifier
@@ -814,9 +814,9 @@ creation."
(Subject . ,subject)
(Body (BodyType . "Text") ,body)
(StartTimeZone (Id . ,(exco-time-zone)))
- (Start . ,(exco-format-date-time start))
- (End . ,(exco-format-date-time end))
- (Location . ,location)
+ (Start . ,(exco-format-date-time start))
+ (End . ,(exco-format-date-time end))
+ (Location . ,location)
,@(exco--create-attendee-structure main-invitees t)
,@(exco--create-attendee-structure optional-invitees nil))))
;; Empty arguments.
@@ -890,11 +890,11 @@ appointment creation."
`(((SendMeetingInvitations . "SendToNone")
(Items
(CalendarItem
- (Subject . ,subject)
+ (Subject . ,subject)
(Body (BodyType . "Text") ,body)
(StartTimeZone (Id . ,(exco-time-zone)))
- (Start . ,(exco-format-date-time start))
- (End . ,(exco-format-date-time end)))))
+ (Start . ,(exco-format-date-time start))
+ (End . ,(exco-format-date-time end)))))
nil nil nil nil)
callback))