Show
Ignore:
Timestamp:
07/20/08 04:35:30 (16 years ago)
Author:
baal5084
Message:

websites/scheme-users.jp: update.

Location:
websites/scheme-users.jp
Files:
3 modified

Legend:

Unmodified
Added
Removed
  • websites/scheme-users.jp/index.css

    r51 r56  
    1 body { margin:20px; padding:20px; background-color:white; color:black; } 
    2 h1 { color:#00CCEE; } 
    3 h2 { color:#00AACC; } 
    4 h2 a { color:#00AACC; text-decoration:none; } 
    5 h3 { color:#0088AA; } 
     1body { 
     2        margin:20px; padding:20px; 
     3        background-color:white; color:black; 
     4        background-image:url("./images/background.png"); 
     5        background-repeat:no-repeat; 
     6        background-attachment:scroll; 
     7        background-position:512px 256px; 
     8} 
     9h1 { color:#00AACC; } 
     10h2 { color:#0088AA; } 
     11h2 a { color:#0088AA; text-decoration:none; } 
     12h3 { color:#006688; } 
    613p { margin-left:40px; } 
    714span.date { color:#004488; } 
  • websites/scheme-users.jp/index.scm

    r51 r56  
    1818                                                (title "Scheme-users.jp - 日本の Scheme ユーザのためのハブサイト")) 
    1919                                        (body 
    20                                                 (p (@ (style "margin-left:0;")) "(" (a (@ (href "http://scheme-users.jp/")) "scheme-users.jp") ")") 
     20                                                (p (@ (style "margin-left:0;")) 
     21                                                        (a (@ (href "http://scheme-users.jp/")) 
     22                                                                (img (@ (src "./images/top.png") (alt "scheme-users.jp") (style "border:none;"))))) 
    2123 
    2224                                                (h1 "日本の Scheme ユーザのためのハブサイト") 
     
    2628                                                        " は「SEO に有効な独自ドメインを取って、もっと Perl 初心者が集まりやすい nice な Perl の情報を集めたサイトを作れ!」といったそうです。" 
    2729                                                        "そして「" (a (@ (href "http://perl-users.jp")) "Perl-users.jp - 日本のPerlユーザのためのハブサイト") "」ができました。") 
    28                                                 (p "これは Scheme も同じではないのか?" 
     30                                                (p "これは " (strong "Scheme") " も同じではないのか?" 
    2931                                                        "そう思って scheme-users.jp ドメインを取り、ここに scheme-users.jp を開始します。" 
    3032                                                        "完全に perl-users.jp とか js-users.jp とか as-users.jp とかにインスパイアされています。" 
     
    4648                                                (h2 "Scheme NEWS") 
    4749                                                (ul 
    48                                                         (li (span (@ (class "date")) "2008/06/07(SAT)") " : 本日 6月7日(土) 午後8時より " (a (@ (href "http://www.lingr.com/room/gKpArxPn9wi")) "Lingr: COMMON LISP 部屋") " で " (a (@ (href "http://cadr.g.hatena.ne.jp/g000001/20080531/1212235511")) "第2回 突発性CL勉強会@Lingr 8時だョ!全員集合") " が開催されます。") 
     50                                                        (li (span (@ (class "date")) "2008/07/18(FRI)") " : " (a (@ (href "http://code.google.com/p/mosh-scheme/")) "Mosh") " Version 0.0.5 が " (a (@ (href "http://d.hatena.ne.jp/higepon/20080718/1216365536")) "リリース") " されました。R6RS ライブラリの仕組みや syntax-case, syntax-rules などが利用できるようになりました。") 
     51                                                        (li (span (@ (class "date")) "2008/07/17(THU)") " : " (a (@ (href "http://wassr.jp/")) "Wassr") " に " (a (@ (href "http://wassr.jp/channel/gauche")) "Gauche チャンネル") " ができていました。") 
     52                                                        (li (span (@ (class "date")) "2008/07/17(THU)") " : " (a (@ (href "http://wassr.jp/")) "Wassr") " に " (a (@ (href "http://wassr.jp/channel/lisp")) "Lisp チャンネル") " ができていました。") 
     53                                                        (li (span (@ (class "date")) "2008/07/17(THU)") " : " (a (@ (href "http://www.hatena.ne.jp/")) "はてな") " に " (a (@ (href "http://scheme.g.hatena.ne.jp/")) "Scheme グループ") " ができていました。") 
     54                                                        (li (span (@ (class "date")) "2008/07/15(TUE)") " : " (a (@ (href "http://groups.google.co.jp/group/comp.lang.scheme/browse_thread/thread/10aa800ae5d98d19")) "Final SRFI 96: SLIB Prerequisites")) 
     55                                                        (li (span (@ (class "date")) "2008/07/12(SAT)") " : " (a (@ (href "http://practical-scheme.net/gauche/index-j.html")) "Gauche") " の拡張ライブラリ " (a (@ (href "http://homepage.mac.com/naoki.koguro/prog/dyncomp/index-j.html")) "dyncomp") " Version 0.1.2 がリリースされました。 MinGW でも動作するようになったようです。") 
     56                                                        (li (span (@ (class "date")) "2008/07/07(MON)") " : " (a (@ (href "http://code.google.com/p/ypsilon/")) "Ypsilon") " Version 0.9.5-update1 が " (a (@ (href "http://lwpinball.wordpress.com/2008/07/07/%e3%81%84%e3%82%84%e3%80%9c%e3%82%aa%e3%83%bc%e3%83%97%e3%83%b3%e3%82%bd%e3%83%bc%e3%82%b9%e3%81%a3%e3%81%a6%e3%81%84%e3%81%84%e3%82%82%e3%81%ae%e3%81%a7%e3%81%99%e3%81%ad%e3%80%9c/")) "リリース") " されました。") 
     57                                                        (li (span (@ (class "date")) "2008/07/07(MON)") " : " (a (@ (href "http://www.plt-scheme.org/")) "Plt Scheme") " Version 4.0.2 がリリースされています。") 
     58                                                        (li (span (@ (class "date")) "2008/07/06(SUN)") " : " (a (@ (href "http://ll.jus.or.jp/2008/")) "LL Future") " の " (a (@ (href "http://ll.jus.or.jp/2008/blog/archives/20")) "Tシャツデザイン") " が公開されました。うしろにあの魚が!") 
     59                                                        (li (span (@ (class "date")) "2008/07/06(SUN)") " : " (a (@ (href "http://d.hatena.ne.jp/higepon/")) "higepon") " さんにより " (a (@ (href "http://srfi.schemers.org/")) "SRFI") " に提案された getenv の仕様が " (a (@ (href "http://srfi.schemers.org/srfi-98/srfi-98.html")) "ドラフト(SRFI-98)") " になりました。") 
     60                                                        (li (span (@ (class "date")) "2008/07/06(SUN)") " : " (a (@ (href "http://practical-scheme.net/gauche/index-j.html")) "Gauche") " の拡張ライブラリ " (a (@ (href "http://homepage.mac.com/naoki.koguro/prog/dyncomp/index-j.html")) "dyncomp") " Version 0.1.1 がリリースされました。") 
     61                                                        (li (span (@ (class "date")) "2008/07/04(FRI)") " : CL勉強会の告知を↓のバナー欄に移します。") 
     62                                                        (li (span (@ (class "date")) "2008/06/29(SUN)") " : " (a (@ (href "http://ll.jus.or.jp/2008/")) "LL Future") " にて " (a (@ (href "http://ll.jus.or.jp/2008/lightningtalk")) "Lightning Talk") " の発表者を募集しています。") 
     63                                                        (li (span (@ (class "date")) "2008/06/24(TUE)") " : 6月28日(土) 午後8時より " (a (@ (href "http://www.lingr.com/room/gKpArxPn9wi")) "Lingr: COMMON LISP 部屋") " にて " (a (@ (href "http://cadr.g.hatena.ne.jp/g000001/20080624/1214295121")) "第5回 慢性的CL勉強会@Lingr 8時だョ!全員集合") " が開催されます。") 
     64                                                        (li (span (@ (class "date")) "2008/06/23(MON)") " : " (a (@ (href "http://www.plt-scheme.org/")) "Plt Scheme") " Version 4.0.1 が " (a (@ (href "http://blog.plt-scheme.org/2008/06/plt-scheme-v401.html")) "リリース") " されました。") 
     65                                                        (li (span (@ (class "date")) "2008/06/18(WED)") " : 6月21日(土) 午後8時より " (a (@ (href "http://www.lingr.com/room/gKpArxPn9wi")) "Lingr: COMMON LISP 部屋") " にて " (a (@ (href "http://cadr.g.hatena.ne.jp/g000001/20080618/1213721991")) "第4回 慢性的CL勉強会@Lingr 8時だョ!全員集合") " が開催されます。") 
     66                                                        (li (span (@ (class "date")) "2008/06/16(MON)") " : Gauchebox-0.8.13-box2.exe がリリースされました。 Windows 環境向けに Meadow(Emacs) や OpenGL などをパッケージングしたもののようです。 (詳細はこちら → " (a (@ (href "http://practical-scheme.net/wiliki/wiliki.cgi?Gauche%3aGauchebox")) "WiLiKi") " / " (a (@ (href "http://sourceforge.net/project/showfiles.php?group_id=25227")) "ダウンロード") ")") 
     67                                                        (li (span (@ (class "date")) "2008/06/16(MON)") " : Ypsilon Version 0.9.5 がリリースされました。 (詳細はこちら → " (a (@ (href "http://www.littlewingpinball.com/contents/ja/ypsilon.html")) "プロジェクトホームページ") " / " (a (@ (href "http://code.google.com/p/ypsilon/")) "ダウンロード") " / " (a (@ (href "http://lwpinball.wordpress.com/2008/06/16/%e3%82%8f%e3%81%9f%e3%81%97%e3%81%af%e3%82%b9%e3%83%88%e3%83%a9%e3%83%88%e3%82%b9%e4%b8%96%e4%bb%a3%e3%81%a7%e3%82%82%e3%81%82%e3%82%8b%e3%82%93%e3%81%a0%e3%81%91%e3%81%a9%e3%83%bb%e3%83%bb%e3%83%bb/")) "ブログ記事") " / " (a (@ (href "http://groups.google.com/group/comp.lang.scheme/browse_thread/thread/929af95f9d27ef2c")) "ニュースグループ記事") ")") 
     68                                                        (li (span (@ (class "date")) "2008/06/16(MON)") " : 6月21日(土) 午前9時30分より タイムインターメディア にて Gauche Hacks が開催されます。いよいよ Gauche 本第二弾 の執筆開始です。詳細は Gauche メーリングリストアーカイブを参照してください。") 
     69                                                        (li (span (@ (class "date")) "2008/06/14(SAT)") " : 6月14日(土) 午後8時より " (a (@ (href "http://www.lingr.com/room/gKpArxPn9wi")) "Lingr: COMMON LISP 部屋") " にて " (a (@ (href "http://cadr.g.hatena.ne.jp/g000001/20080611/1213134259")) "第3回 慢性的CL勉強会@Lingr 8時だョ!全員集合") " が開催されます。") 
     70                                                        (li (span (@ (class "date")) "2008/06/12(THU)") " : " (a (@ (href "http://www.plt-scheme.org/")) "Plt Scheme") " Version 4.0 が " (a (@ (href "http://blog.plt-scheme.org/2008/06/plt-scheme-version-4.html")) "リリース") " されました。") 
     71                                                        (li (span (@ (class "date")) "2008/06/12(THU)") " : " (a (@ (href "http://code.google.com/p/mosh-scheme/")) "Mosh") " Version 0.0.4 が " (a (@ (href "http://d.hatena.ne.jp/higepon/20080612/1213241790")) "リリース") " されました。サンプルアプリケーションとして " (a (@ (href "http://www.blue.sky.or.jp/grass/doc_ja.html")) "Grass") " 言語のインタプリタが付属しているそうです。") 
     72                                                        (li (span (@ (class "date")) "2008/06/08(SUN)") " : このサイトのリポジトリを " (a (@ (href "http://lambdarepos.org/")) "LambdaRepos") " に設置しました。") 
     73                                                        (li (span (@ (class "date")) "2008/06/07(SAT)") " : 6月7日(土) 午後8時より " (a (@ (href "http://www.lingr.com/room/gKpArxPn9wi")) "Lingr: COMMON LISP 部屋") " にて " (a (@ (href "http://cadr.g.hatena.ne.jp/g000001/20080531/1212235511")) "第2回 突発性CL勉強会@Lingr 8時だョ!全員集合") " が開催されます。") 
    4974                                                        (li (span (@ (class "date")) "2008/06/04(WED)") " : " (a (@ (href "http://www.plt-scheme.org/")) "Plt Scheme") " の新バージョン 4.0 が " (a (@ (href "http://blog.plt-scheme.org/2008/06/plt-scheme-version-40-is-coming-soon.html")) "まもなくリリース") " されるようです。") 
    5075                                                        (li (span (@ (class "date")) "2008/06/03(TUE)") " : Scheme コミュニティのブログ集 " (a (@ (href "http://scheme-users.jp/planet/")) "Planet Scheme Japan") " を開始しました。" (span (@ (style "color:red;")) "(参加者募集中!)")) 
     
    5378                                                        (li (span (@ (class "date")) "2008/05/27(TUE)") " : " "Open Tech Press に Scheme 関連記事「" (a (@ (href "http://opentechpress.jp/developer/08/05/27/024252.shtml")) "SCSH (Scheme Shell) スクリプト入門") "」が掲載されています。") 
    5479                                                        (li (span (@ (class "date")) "2008/05/25(SUN)") " : " "scheme-users.jp 開設しました。")) 
    55                                                 (p (a (@ (href "http://ll.jus.or.jp/2008/")) (img (@ (src "./images/ll2008.jpg") (alt "LL Future 2008/08/30") (style "border:none;"))))) 
     80 
     81                                                (table 
     82                                                        (tr 
     83                                                                (td (a (@ (href "http://ll.jus.or.jp/2008/")) 
     84                                                                        (img (@ (src "./images/ll2008.jpg") (alt "LL Future : 2008/08/30") (style "border:none;"))))) 
     85                                                                (td (a (@ (href "http://www.lingr.com/room/gKpArxPn9wi")) 
     86                                                                        (img (@ (src "./images/clpm8.png") (alt "慢性的CL勉強会@Lingr8時だョ!全員集合") (style "border:none;")))))) 
     87                                                        (tr 
     88                                                                (td (@ (style "text-align:center;")) "LL Future : 2008/08/30") 
     89                                                                (td (@ (style "text-align:center;")) "CL勉強会@Lingr : 次回 7/26 (土) PM8" (br) "Common Lisp Cookbook"))) 
    5690 
    5791                                                (h2 "Lisp/Scheme チャット") 
    5892                                                (ul 
    59                                                         (li (a (@ (href "irc://irc.freenode.net/#Lisp_Scheme")) "irc.freenode.net#Lisp_Scheme") " (UTF-8)")) 
     93                                                        (li (a (@ (href "irc://irc.freenode.net/Lisp_Scheme")) "irc.freenode.net#Lisp_Scheme") " (UTF-8) : Common Lisp や Arc など他の Lisp の話題もあります。")) 
    6094 
    6195                                                (h2 (a (@ (href "http://scheme-users.jp/planet/")) "Planet Scheme Japan")) 
     
    75109                                                        (li (a (@ (href "http://www.gnu.org/software/guile/")) "GNU Guile")) 
    76110                                                        (li (a (@ (href "http://www.gnu.org/software/mit-scheme/")) "MIT/GNU Scheme")) 
    77                                                         (li (a (@ (href "http://code.google.com/p/mosh-scheme/")) "mosh") " : " (a (@ (href "http://d.hatena.ne.jp/higepon/")) "higepon") " 氏が新しく作りはじめた処理系。期待しましょう :-)")) 
     111                                                        (li (a (@ (href "http://code.google.com/p/mosh-scheme/")) "Mosh") " : " (a (@ (href "http://d.hatena.ne.jp/higepon/")) "higepon") " 氏が新しく作りはじめた処理系。期待しましょう :-)") 
     112                                                        (li (a (@ (href "http://code.google.com/p/ypsilon/")) "Ypsilon") " : !!!?")) 
    78113 
    79114                                                (h2 "初心者向け学習サイト") 
     
    82117                                                        (li (a (@ (href "http://www.unixuser.org/~euske/doc/scm-sd7/")) "Scheme プログラミング入門")) 
    83118                                                        (li (a (@ (href "http://www1.ocn.ne.jp/~scheme/scheme-start.html")) "まったく初めての人のための Scheme")) 
    84                                                         (li (a (@ (href "http://www.sampou.org/scheme/t-y-scheme/t-y-scheme.html")) "独習 Scheme 三週間")) 
    85                                                         (li (a (@ (href "http://www.stdio.h.kyoto-u.ac.jp/~hioki/gairon-enshuu/SchemeNotes/scheme.html")) "Scheme への道"))) 
     119                                                        (li (a (@ (href "http://www.stdio.h.kyoto-u.ac.jp/~hioki/gairon-enshuu/SchemeNotes/scheme.html")) "Scheme への道")) 
     120                                                        (li (a (@ (href "http://karetta.jp/book-cover/gauche-hacks")) "Gaucheプログラミング(立読み版)")) 
     121                                                        (li (a (@ (href "http://www.ccs.neu.edu/home/dorai/t-y-scheme/t-y-scheme.html")) "Teach Yourself Scheme in Fixnum Days") 
     122                                                                " / " (a (@ (href "http://www.sampou.org/scheme/t-y-scheme/t-y-scheme.html")) "独習 Scheme 三週間")) 
     123                                                        (li (a (@ (href "http://www.htdp.org/")) "How to Design Programs")) 
     124                                                        (li "[Think IT] Gauche でプログラミング!") 
     125                                                        (ul 
     126                                                                (li (a (@ (href "http://www.thinkit.co.jp/article/74/1/")) "第 1 回 Gauche をはじめてみませんか?")) 
     127                                                                (li (a (@ (href "http://www.thinkit.co.jp/article/74/2/")) "第 2 回 超! Gauche 入門")) 
     128                                                                (li (a (@ (href "http://www.thinkit.co.jp/article/74/3/")) "第 3 回 簡単 Web プログラミング!")) 
     129                                                                (li (a (@ (href "http://www.thinkit.co.jp/article/74/4/")) "第 4 回 Gauche で超高生産性 Web アプリ!")) 
     130                                                                (li (a (@ (href "http://www.thinkit.co.jp/article/74/5/")) "第 5 回 Gauche で COOL な Web アプリ!")))) 
    86131 
    87132                                                (h2 "定番サイト") 
     
    89134                                                        (li (a (@ (href "http://practical-scheme.net/")) "Practical Scheme")) 
    90135                                                        (li (a (@ (href "http://www.kahua.org/")) "Kahua Project")) 
    91                                                         (li (a (@ (href "http://karetta.jp/book-cover/gauche-hacks")) "Gaucheプログラミング(立読み版)")) 
    92136                                                        (li (a (@ (href "http://schemers.org/")) "schemers.org")) 
    93137                                                        (li (a (@ (href "http://srfi.schemers.org/")) "SRFI - Scheme Requests for Implementation")) 
    94                                                         (li (a (@ (href "http://www.r6rs.org/")) "R6RS.Org")) 
     138                                                        (li (a (@ (href "http://www.r6rs.org/")) "R6RS - Revised 6 Report on the Algorithmic Language Scheme")) 
    95139                                                        (li (a (@ (href "http://swiss.csail.mit.edu/projects/scheme/")) "The Scheme Programming Language")) 
     140                                                        (li (a (@ (href "http://mitpress.mit.edu/sicp/")) "SICP - Structure and Interpretation of Computer Programs")) 
     141                                                        (li (a (@ (href "http://www.scheme.com/tspl3/")) "The Scheme Programming Language Third Edition")) 
    96142                                                        (li (a (@ (href "http://www1.ocn.ne.jp/~scheme/")) "やっぱり Scheme だね")) 
    97143                                                        (li (a (@ (href "http://lambda.bugyo.tk/hatena/")) "はてなようせいとまなぶ Scheme の形式的意味論")) 
    98144                                                        (li (a (@ (href "http://lambda.bugyo.tk/hatena/r5rs.html")) "はてなようせいとまなぶ R5RS の表示的意味論")) 
     145                                                        (li (a (@ (href "http://ja.doukaku.org/lang/scheme/")) "どう書く?org Scheme部")) 
    99146                                                        (li (a (@ (href "http://www.math.u-toyama.ac.jp/~iwao/Scheme/scheme.html")) "Algorithmic Language Scheme"))) 
    100147                                                        ;;(li (a (@ (href "http://t-code.org/scheme-aa.html")) "ポルナレフ")) 
     
    102149                                                (h2 "その他の *-users.jp") 
    103150                                                (ul 
    104                                                         (li (a (@ (href "http://air-users.jp/")) "air-users.jp")) 
    105                                                         (li (a (@ (href "http://arc-users.jp/")) "arc-users.jp")) 
    106                                                         (li (a (@ (href "http://as-users.jp/")) "as-users.jp")) 
    107                                                         (li (a (@ (href "http://awk-users.jp/")) "awk-users.jp")) 
    108                                                         (li (a (@ (href "http://cakephp-users.jp/")) "cakephp-users.jp")) 
    109                                                         (li (a (@ (href "http://emacs-users.jp/")) "emacs-users.jp")) 
    110                                                         (li (a (@ (href "http://hauhau-users.jp/")) "hauhau-users.jp")) 
    111                                                         (li (a (@ (href "http://haxe-users.jp/")) "haxe-users.jp")) 
    112                                                         (li (a (@ (href "http://hsp-users.jp")) "hsp-users.jp")) 
    113                                                         (li (a (@ (href "http://io-users.jp/")) "io-users.jp")) 
    114                                                         (li (a (@ (href "http://js-users.jp/")) "js-users.jp")) 
    115                                                         (li (a (@ (href "http://perl-users.jp/")) "perl-users.jp")) 
    116                                                         (li (a (@ (href "http://php-users.jp/")) "php-users.jp")) 
    117                                                         (li (a (@ (href "http://pyobjc-users.jp/")) "pyobjc-users.jp")) 
    118                                                         (li (a (@ (href "http://python-users.jp/")) "python-users.jp")) 
    119                                                         (li (a (@ (href "http://rails-users.jp/")) "rails-users.jp")) 
    120                                                         (li (a (@ (href "http://ruby-users.jp/")) "ruby-users.jp")) 
    121                                                         (li (a (@ (href "http://vim-users.jp/")) "vim-users.jp"))) 
     151                                                        (li (a (@ (href "http://air-users.jp/")) "air-users.jp") " : 日本の AIR ユーザのためのハブサイト") 
     152                                                        (li (a (@ (href "http://arc-users.jp/")) "arc-users.jp") " : 日本の Arc ユーザのためのハブサイト") 
     153                                                        (li (a (@ (href "http://as-users.jp/")) "as-users.jp") " : 日本の ActionScript ユーザのためのハブサイト") 
     154                                                        (li (a (@ (href "http://awk-users.jp/")) "awk-users.jp") " : 日本の AWK ユーザのためのハブサイト") 
     155                                                        (li (a (@ (href "http://c-users.jp/")) "c-users.jp") " : 日本の C/C++ ユーザのためのハブサイト") 
     156                                                        (li (a (@ (href "http://cakephp-users.jp/")) "cakephp-users.jp") " : 日本の cakePHP ユーザのためのハブサイト") 
     157                                                        (li (a (@ (href "http://emacs-users.jp/")) "emacs-users.jp") " : 日本の Emacs ユーザのためのハブサイト") 
     158                                                        (li (a (@ (href "http://erlang-users.jp/")) "erlang-users.jp") " : 日本の Erlang ユーザのためのハブサイト") 
     159                                                        (li (a (@ (href "http://hauhau-users.jp/")) "hauhau-users.jp") " : 日本の はうはう ユーザのためのハブサイト") 
     160                                                        (li (a (@ (href "http://haxe-users.jp/")) "haxe-users.jp") " : 日本の heXe ユーザのためのハブサイト") 
     161                                                        (li (a (@ (href "http://hsp-users.jp")) "hsp-users.jp") " : 日本の HSP ユーザのためのハブサイト") 
     162                                                        (li (a (@ (href "http://io-users.jp/")) "io-users.jp") " : 日本の Io ユーザのためのハブサイト") 
     163                                                        (li (a (@ (href "http://js-users.jp/")) "js-users.jp") " : 日本の JavaScript ユーザのためのハブサイト") 
     164                                                        (li (a (@ (href "http://perl-users.jp/")) "perl-users.jp") " : 日本の Perl ユーザのためのハブサイト") 
     165                                                        (li (a (@ (href "http://php-users.jp/")) "php-users.jp") " : 日本の PHP ユーザのためのハブサイト") 
     166                                                        (li (a (@ (href "http://php5-users.jp/")) "php5-users.jp") " : 日本の PHP5 ユーザのためのハブサイト") 
     167                                                        (li (a (@ (href "http://pyobjc-users.jp/")) "pyobjc-users.jp") " : 日本の PyObjC ユーザのためのハブサイト") 
     168                                                        (li (a (@ (href "http://python-users.jp/")) "python-users.jp") " : 日本の Python ユーザのためのハブサイト") 
     169                                                        (li (a (@ (href "http://rails-users.jp/")) "rails-users.jp") " : 日本の Rails ユーザのためのハブサイト") 
     170                                                        (li (a (@ (href "http://vim-users.jp/")) "vim-users.jp") " : 日本の Vim ユーザのためのハブサイト")) 
    122171 
    123172                                                (h3 "管理人") 
     173                                                (p "このサイトは " 
     174                                                        (a (@ (href "http://practical-scheme.net/gauche/index-j.html")) "Gauche") " の " 
     175                                                        (a (@ (href "http://practical-scheme.net/gauche/man/gauche-refj_148.html")) "sxml.serializer") " を使って生成しています。" 
     176                                                        (br) 
     177                                                        "コードは " (a (@ (href "http://lambdarepos.org/")) "LambdaRepos") " の Subversion にて管理しています。" 
     178                                                        (a (@ (href "http://lambdarepos.org/")) "LambdaRepos") " の Committer である関数型言語ハッカーならどなたでも書き換える事が出来ます。") 
    124179                                                (p "なにかあれば何らかの手段で " 
    125180                                                        "(string-append \"info\" \"@\" \"scheme-users.jp\")" 
     
    127182                                                (p "文章のライセンスは、特に明記が無い限り全て " 
    128183                                                        (abbr (@ (title "Creative Commons Attribution license")) "CC-by") 
    129                                                         " でお願いします。") 
    130                                                 (p "このページは " 
    131                                                         (a (@ (href "http://practical-scheme.net/gauche/index-j.html")) "Gauche") 
    132                                                         " の " 
    133                                                         (a (@ (href "http://practical-scheme.net/gauche/man/gauche-refj_148.html")) "sxml.serializer") 
    134                                                         " を使って生成しています。" 
    135                                                         "リポジトリはそのうちどこかに置く予定です。") 
    136                                                 )) out))))) 
     184                                                        " でお願いします。"))) out) 
     185                        (newline out))))) 
  • websites/scheme-users.jp/planet/planet.scm

    r51 r56  
    129129                                (html:title "Planet Scheme Japan - The Community Scheme Blog in Japan")) 
    130130                        (html:body 
    131                                 (html:p "(" (html:a :href "http://scheme-users.jp/" "scheme-users.jp") ")") 
     131                                (html:p (html:a :href "http://scheme-users.jp/" 
     132                                        (html:img :src "../images/top.png" :alt "scheme-users.jp" :style "border:none;"))) 
    132133                                (html:h1 "Planet Scheme Japan") 
    133134                                (map