質問編集履歴
3
typo
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -154,7 +154,7 @@
|
|
|
154
154
|
|
|
155
155
|
|
|
156
156
|
|
|
157
|
-
### 下のコードで、とりあえず last copy を clipboard に
|
|
157
|
+
### 下のコードで、とりあえず last copy を clipboard にコピーできるようにできました。 add date:2018/07/10 (火) time:00:58
|
|
158
158
|
|
|
159
159
|
|
|
160
160
|
|
2
xsel option を変えました
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -151,3 +151,65 @@
|
|
|
151
151
|
(shell-command-to-string "xsel --clipboard < ~/__tmp")
|
|
152
152
|
|
|
153
153
|
```
|
|
154
|
+
|
|
155
|
+
|
|
156
|
+
|
|
157
|
+
### 下のコードで、とりあえず last copy を clipboard にこぴーできるうよにできました。 add date:2018/07/10 (火) time:00:58
|
|
158
|
+
|
|
159
|
+
|
|
160
|
+
|
|
161
|
+
``` elsep
|
|
162
|
+
|
|
163
|
+
(defun last-copy-to-clipboard ()
|
|
164
|
+
|
|
165
|
+
"set last copy to x-clipboard."
|
|
166
|
+
|
|
167
|
+
(interactive)
|
|
168
|
+
|
|
169
|
+
(let (bufferAt (buffer-name))
|
|
170
|
+
|
|
171
|
+
|
|
172
|
+
|
|
173
|
+
(switch-to-buffer "__tmp")
|
|
174
|
+
|
|
175
|
+
(insert (car kill-ring-yank-pointer))
|
|
176
|
+
|
|
177
|
+
(write-file "~/__tmp")
|
|
178
|
+
|
|
179
|
+
(sit-for 0.1)
|
|
180
|
+
|
|
181
|
+
(shell-command "xsel -ib < ~/__tmp")
|
|
182
|
+
|
|
183
|
+
(spacemacs/kill-this-buffer)
|
|
184
|
+
|
|
185
|
+
(switch-to-buffer bufferAt)
|
|
186
|
+
|
|
187
|
+
)
|
|
188
|
+
|
|
189
|
+
)
|
|
190
|
+
|
|
191
|
+
~~~
|
|
192
|
+
|
|
193
|
+
|
|
194
|
+
|
|
195
|
+
xsel コマンドのの option が --clipboard だけでは足りないらしく標準入力も指定しなければならないのが誤動作の原因のようです。 terminal ではデフォルトで標準入力になっているようです。
|
|
196
|
+
|
|
197
|
+
|
|
198
|
+
|
|
199
|
+
ただし、このコードだと buffer が別のところに変わってしまいます。下の (switch-to-buffer ...) で元の buffer に戻しているつもりですが、予想外のバッファになってしまいます。
|
|
200
|
+
|
|
201
|
+
``` elsep
|
|
202
|
+
|
|
203
|
+
(let (bufferAt (buffer-name))
|
|
204
|
+
|
|
205
|
+
snipped
|
|
206
|
+
|
|
207
|
+
(switch-to-buffer bufferAt)
|
|
208
|
+
|
|
209
|
+
)
|
|
210
|
+
|
|
211
|
+
```
|
|
212
|
+
|
|
213
|
+
|
|
214
|
+
|
|
215
|
+
何か拙い箇所があったら指摘してやってください。
|
1
(shell-command-to-string ...) を試した
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -133,3 +133,21 @@
|
|
|
133
133
|
|
|
134
134
|
|
|
135
135
|
について、ご意見をいただけますでしょうか
|
|
136
|
+
|
|
137
|
+
|
|
138
|
+
|
|
139
|
+
### 追加で試したこと add at time:15:38
|
|
140
|
+
|
|
141
|
+
|
|
142
|
+
|
|
143
|
+
下のように変更してみましたが、同じ結果でした。
|
|
144
|
+
|
|
145
|
+
``` elisp
|
|
146
|
+
|
|
147
|
+
(shell-command "xsel --clipboard < ~/__tmp")
|
|
148
|
+
|
|
149
|
+
↓
|
|
150
|
+
|
|
151
|
+
(shell-command-to-string "xsel --clipboard < ~/__tmp")
|
|
152
|
+
|
|
153
|
+
```
|