๐Ÿš€ go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

4 total messages Started by Takashi YOSHIMI Wed, 28 Apr 1999 00:00
changing name of frame
#648
Author: Takashi YOSHIMI
Date: Wed, 28 Apr 1999 00:00
27 lines
2204 bytes
ๅ‰่ฆ‹๏ผ ้›ป็ท็ ”ใงใ™ใ€‚

frame ใฎๅๅ‰ใ‚’ๅค‰ใˆใ‚‹ใ‚ญใƒผใƒœใƒผใƒ‰ใƒžใ‚ฏใƒญใ‚’ไฝœใฃใฆใฟใพใ—ใŸใŒใ€ๅคงๅค‰ ugly ใงไธ
ไพฟใชใฎใงใ€ใ‚‚ใ—ใ‚„ไธ–ใฎไธญใซใกใ‚ƒใ‚“ใจใ—ใŸ lisp code ใงๆ›ธใ‹ใ‚ŒใŸใƒ—ใƒญใ‚ฐใƒฉใƒ ใŒ
ใ‚ใ‚Œใฐไฝฟใ„ใŸใ„ใจๆ€ใ„ใพใ™ใ€‚ใใฎใ‚ˆใ†ใชใ‚‚ใฎใฏใ‚ใ‚‹ใฎใงใ—ใ‚‡ใ†ใ‹ใ€‚

็งใฎๆ›ธใ„ใŸใ‚‚ใฎใ‚’ไธ‹ใซๆ›ธใใพใ™ใ€‚lisp ใฎ็Ÿฅ่ญ˜ใ‚‚ใƒžใ‚ฏใƒญใซๅค‰ๆ•ฐใ‚’ไธŽใˆใ‚‹ๆ–นๆณ•ใ‚‚
็Ÿฅใ‚‰ใชใ„ไบบใŒๆ›ธใใจใ“ใ†ใชใ‚Šใพใ™ใ€‚ใกใชใฟใซใ“ใ‚Œใ ใ‘ใงใฏใ ใ‚ใงใ€ใ“ใฎใ‚ใจๆ‰‹
ไฝœๆฅญใง Make New Frame ใ™ใ‚Œใฐๆ–ฐใ—ใ„ใƒ•ใƒฌใƒผใƒ ใฎๅๅ‰ใŒๅค‰ใ‚ใ‚Šใพใ™ใ€‚ใใฎๅพŒใง
ใ‚‚ใจใฎใƒ•ใƒฌใƒผใƒ ใ‚’ๆถˆใ—ใพใ™ใ€‚๏ผˆใ‚ใ‚ใ€ๆฅใšใ‹ใ—ใ„๏ผ‰

(defalias 'change-frame-name (read-kbd-macro
"C-h v d e f a u l t - f r a m e - a l i s t RET C-x b * H e l p * RET
 ESC < C-s ( C-b C-SPC C-e ESC w C-x b RET C-x b * s c r a t c h * RET
 ESC > RET / * SPC t y p e SPC C - r SPC a n d SPC i n p u t SPC n e w
 SPC f r a m e SPC n a m e RET 3*SPC t y p e SPC M - C - c SPC t o SPC
 E x i t SPC * / RET ( s e t q SPC d e f a u l t - f r a m e - a l i s
 t SPC ' C-y ) C-a C-s ( n a m e SPC . SPC \" C-SPC C-s \" C-b C-w C-x q
 C-a C-SPC C-e ESC x e v a l - r e g i o n RET C-x b RET"))


--------------
โŠ‚ๅทฅใƒปๅ‰่ฆ‹ ้š†(ใ‚ˆใ—ใฟ ใŸใ‹ใ—)0x27ๆญณ ๅฆป๏ผ‘ไบบๅญ๏ผ“ไบบ yoshimi@etl.go.jp
ใ€€ไบบใ€€[ๆ‰€ๅฑž]้›ปๅญๆŠ€่ก“็ทๅˆ็ ”็ฉถๆ‰€[ไป•ไบ‹]ใ‚ณใƒณใƒ”ใƒฅใƒผใ‚ฟใƒ“ใ‚ธใƒงใƒณ  ใ€€ใ€€ใ€€ใ€€ใ€€๏ผ–๏ผ‘๏ผ™
ใ€€ใ€€ใ€€[ๅฅฝ]็พŽๅ’Œใกใ‚ƒใ‚“ใ€ๅ…‰ใกใ‚ƒใ‚“ใ€ๅฎ™ใกใ‚ƒใ‚“ใ€ๆ˜ดใกใ‚ƒใ‚“ใ€SFใ€ๆผซ็”ปใ€ใฐใ‹่ฉฑใ€€๏ฝž  (c)
ใ€€ใ€€ใ€€[ๅซŒ]ๆšด็…™่€…ใ€ๆšด่ตฐๆ—ใ€ใŸใฐใ“ไผš็คพ
       http://www.etl.go.jp/~yoshimi/
Re: changing name of frame
#649
Author: Katsumi Yamaoka
Date: Wed, 28 Apr 1999 00:00
38 lines
2135 bytes
ใ“ใ‚“ใซใกใฏๅฑฑๅฒกใงใ™ใ€‚

>>>>> In <t9gU5.yoshimi@etl.go.jp> 
>>>>>	yoshimi@etl.go.jp (Takashi YOSHIMI) wrote:

ๅ‰่ฆ‹ใ•ใ‚“> frame ใฎๅๅ‰ใ‚’ๅค‰ใˆใ‚‹ใ‚ญใƒผใƒœใƒผใƒ‰ใƒžใ‚ฏใƒญใ‚’ไฝœใฃใฆใฟใพใ—ใŸใŒใ€

[...]

ๅ‰่ฆ‹ใ•ใ‚“> (defalias 'change-frame-name (read-kbd-macro

[...]

ๅ‰่ฆ‹ใ•ใ‚“> RET C-x b RET"))

ใ“ใ‚Œใฏใ™ใ”ใ„ใงใ™ใญใˆใ€‚:-)
ใ“ใฎๅ†…ๅฎนใ ใจ frame-parameters ใฎ `name' ใ‚’ๅค‰ใˆใฆใ„ใพใ™ใŒใ€ๅŒใ˜ frame 
ใซ้•ใ†ใƒใƒƒใƒ•ใ‚กใŒ่กจ็คบใ•ใ‚Œใฆใ‚‚ๅŒใ˜ๅๅ‰ใฎใพใพใง่‰ฏใ„ใฎใงใ—ใ‚‡ใ†ใ‹?
ใ‚‚ใ— OK ใชใ‚‰

(defun change-frame-name (newname)
  "Change the name of the selected frame."
  (interactive "sNew frame name: ")
  (or (string-match "^[\t ]*$" newname)
      (modify-frame-parameters (selected-frame) (list (cons 'name newname)))
      ))

ไธ€ๆ–นใ€็พๅœจ่กจ็คบใ•ใ‚Œใฆใ„ใ‚‹ใƒใƒƒใƒ•ใ‚กใซ้™ๅฎšใ™ใ‚‹ใชใ‚‰

(defun change-frame-title (newname)
  "Change the title name of the selected frame."
  (interactive "sNew frame name: ")
  (or (string-match "^[\t ]*$" newname)
      (set (make-local-variable 'frame-title-format) newname)))

ใจใ„ใฃใŸใจใ“ใ‚ใงใ—ใ‚‡ใ†ใ‹ใ€‚
-- 
Katsumi Yamaoka <yamaoka@ga.sony.co.jp>
Re: changing name of frame
#651
Author: Takashi YOSHIMI
Date: Wed, 28 Apr 1999 00:00
43 lines
2599 bytes
ๅ‰่ฆ‹ใงใ™ใ€‚

On 04/28/99(16:41) Katsumi Yamaoka <yamaoka@ga.sony.co.jp> wrote
in <28zp3t42f0.fsf@kchisa.ga.sony.co.jp> (nntp://news-server/fj.editor.mule/825):
 |ใ“ใ‚Œใฏใ™ใ”ใ„ใงใ™ใญใˆใ€‚:-)
๏ผˆๆฑ—๏ผ‰

 |ใ“ใฎๅ†…ๅฎนใ ใจ frame-parameters ใฎ `name' ใ‚’ๅค‰ใˆใฆใ„ใพใ™ใŒใ€ๅŒใ˜ frame 
 |ใซ้•ใ†ใƒใƒƒใƒ•ใ‚กใŒ่กจ็คบใ•ใ‚Œใฆใ‚‚ๅŒใ˜ๅๅ‰ใฎใพใพใง่‰ฏใ„ใฎใงใ—ใ‚‡ใ†ใ‹?
 |ใ‚‚ใ— OK ใชใ‚‰
 |
 |(defun change-frame-name (newname)
 |  "Change the name of the selected frame."
 |  (interactive "sNew frame name: ")
 |  (or (string-match "^[\t ]*$" newname)
 |      (modify-frame-parameters (selected-frame) (list (cons 'name newname)))
 |      ))

ใ“ใ‚Œใฏใ€ๆฐ—ๆŒ่‰ฏใๅ‹•ไฝœใ™ใ‚‹ใ‚ˆใ†ใงใ™ใ€‚ใ‚ใ‚ŠใŒใจใ†ใ”ใ–ใ„ใพใ™ใ€‚
ใ‚‚ใ†ใ€ใ‚ใ‚“ใชใƒžใ‚ฏใƒญใฏๆจใฆ๏ผ

 |ไธ€ๆ–นใ€็พๅœจ่กจ็คบใ•ใ‚Œใฆใ„ใ‚‹ใƒใƒƒใƒ•ใ‚กใซ้™ๅฎšใ™ใ‚‹ใชใ‚‰
 |
 |(defun change-frame-title (newname)
 |  "Change the title name of the selected frame."
 |  (interactive "sNew frame name: ")
 |  (or (string-match "^[\t ]*$" newname)
 |      (set (make-local-variable 'frame-title-format) newname)))
 |
 |ใจใ„ใฃใŸใจใ“ใ‚ใงใ—ใ‚‡ใ†ใ‹ใ€‚

ใ™ใฟใพใ›ใ‚“ใ€ใ“ใฃใกใฎใปใ†ใฏNew frame name ใ‚’ๆŒ‡ๅฎšใ—ใฆใ‚‚ไฝ•ใŒๅค‰ใ‚ใฃใŸใฎใ‹
ใ‚ใ‹ใ‚Šใพใ›ใ‚“ใ€‚ๆŒ‡ๅฎšใ—ใŸใƒใƒƒใƒ•ใ‚กใซ้™ๅฎšใจใ„ใ†ใ“ใจใชใ‚‰ใ€่กจ็คบใ•ใ‚Œใ‚‹ใƒใƒƒใƒ•ใ‚ก
ใŒๅค‰ใ‚ใ‚‹ใจใใ‚Œใซๅฟœใ˜ใฆ frame ใฎๅๅ‰ใŒๅค‰ใ‚ใ‚‹ใ‚ˆใ†ใชใฎใงใ™ใŒใ€ใฉใ†ใ‚‚ใใ†
ใงใฏใชใ•ใใ†ใงใ™ใ€‚
ใฉใฎใ‚ˆใ†ใชๅ‹•ไฝœไป•ๆง˜ใชใฎใงใ—ใ‚‡ใ†ใ‹ใ€‚

--------------
โŠ‚ๅทฅใƒปๅ‰่ฆ‹ ้š†(ใ‚ˆใ—ใฟ ใŸใ‹ใ—)0x27ๆญณ ๅฆป๏ผ‘ไบบๅญ๏ผ“ไบบ yoshimi@etl.go.jp
ใ€€ไบบใ€€[ๆ‰€ๅฑž]้›ปๅญๆŠ€่ก“็ทๅˆ็ ”็ฉถๆ‰€[ไป•ไบ‹]ใ‚ณใƒณใƒ”ใƒฅใƒผใ‚ฟใƒ“ใ‚ธใƒงใƒณ  ใ€€ใ€€ใ€€ใ€€ใ€€๏ผ–๏ผ‘๏ผ™
ใ€€ใ€€ใ€€[ๅฅฝ]็พŽๅ’Œใกใ‚ƒใ‚“ใ€ๅ…‰ใกใ‚ƒใ‚“ใ€ๅฎ™ใกใ‚ƒใ‚“ใ€ๆ˜ดใกใ‚ƒใ‚“ใ€SFใ€ๆผซ็”ปใ€ใฐใ‹่ฉฑใ€€๏ฝž  (c)
ใ€€ใ€€ใ€€[ๅซŒ]ๆšด็…™่€…ใ€ๆšด่ตฐๆ—ใ€ใŸใฐใ“ไผš็คพ
       http://www.etl.go.jp/~yoshimi/
Re: changing name of frame
#652
Author: Katsumi Yamaoka
Date: Wed, 28 Apr 1999 00:00
26 lines
2135 bytes
>>>>> In <t9lAV.yoshimi@etl.go.jp> 
>>>>>	yoshimi@etl.go.jp (Takashi YOSHIMI) wrote:

ๅฑฑๅฒก> ไธ€ๆ–นใ€็พๅœจ่กจ็คบใ•ใ‚Œใฆใ„ใ‚‹ใƒใƒƒใƒ•ใ‚กใซ้™ๅฎšใ™ใ‚‹ใชใ‚‰
ๅฑฑๅฒก> (defun change-frame-title (newname)

ๅ‰่ฆ‹ใ•ใ‚“> ใ™ใฟใพใ›ใ‚“ใ€ใ“ใฃใกใฎใปใ†ใฏNew frame name ใ‚’ๆŒ‡ๅฎšใ—ใฆใ‚‚ไฝ•ใŒๅค‰
ๅ‰่ฆ‹ใ•ใ‚“> ใ‚ใฃใŸใฎใ‹ใ‚ใ‹ใ‚Šใพใ›ใ‚“ใ€‚ๆŒ‡ๅฎšใ—ใŸใƒใƒƒใƒ•ใ‚กใซ้™ๅฎšใจใ„ใ†ใ“ใจใชใ‚‰ใ€
ๅ‰่ฆ‹ใ•ใ‚“> ่กจ็คบใ•ใ‚Œใ‚‹ใƒใƒƒใƒ•ใ‚กใŒๅค‰ใ‚ใ‚‹ใจใใ‚Œใซๅฟœใ˜ใฆ frame ใฎๅๅ‰ใŒๅค‰ใ‚
ๅ‰่ฆ‹ใ•ใ‚“> ใ‚‹ใ‚ˆใ†ใชใฎใงใ™ใŒใ€ใฉใ†ใ‚‚ใใ†ใงใฏใชใ•ใใ†ใงใ™ใ€‚

ใผใใฏ XEmacs ใงใฏ

(setq frame-title-format
      '(buffer-file-name "XEmacs-21.2:  %f" "XEmacs-21.2:  %b"))

ใฎใ‚ˆใ†ใซใ—ใฆใ„ใพใ™ใŒใ€ใ“ใ‚Œใ ใจ frame ใซ

XEmacs-21.2: ใƒใƒƒใƒ•ใ‚กๅใ‹ใƒ•ใ‚กใ‚คใƒซๅ

ใŒ่กจ็คบใ•ใ‚Œใพใ™ใ€‚ใงใ™ใŒใ€ใ“ใ‚Œใฃใฆ Emacsen ใ‚„ window manager ใฎ็จฎ้กžใซใ‚ˆใฃ
ใฆใฏๅ‹•ไฝœใŒ้•ใ†ใ‹ใ‚‚ใ—ใ‚Œใพใ›ใ‚“ใญใ€‚ใ„ใคใ‚‚ใ€Œใ†ใพใใ„ใฃใŸใ‚‰ใ‚ใฃใ‘ใ‚‚ใ‚“ใ€ใงใ‚„ใฃ
ใฆใ„ใ‚‹ใฎใง (^^;;)ใ€ไป–ไบบใ•ใพใซ่ชฌๆ˜Žใงใใ‚‹ๆƒ…ๅ ฑใ‚’ๆŒใกๅˆใ‚ใ›ใฆใ„ใพใ›ใ‚“ใ€‚
ใ”ใ‚ใ‚“ใชใ•ใ„ใ€‚
-- 
Katsumi Yamaoka <yamaoka@ga.sony.co.jp>
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads