新旧対応表
by Isoji MIYAGI @ Geological Survey of Japan, AIST
このページは
旧 通産省 工業技術院 地質調査所の研究者用webページのURLと，
独立行政法人 産業技術総合研究所 第七事業所のそれらのページへの対応情報を提供します．
※ご注意：作成当時に筆者が全てのデータを確認しましたが，その後の変化によりリンク切れがいくつか発生しています．
- 作成日：平成１３年９月２０日(木)
- 作成者：宮城磯治
新旧URL対応表
一括変換コマンド
emacsをお使いの方は，.emacsに以下のような記述をするとコマンドで一発(M-x wpgsj)で変換できるので便利です．
(defun wpgsj ()
- (interactive)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~horikawa/" "http://staff.aist.go.jp/h.horikawa/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~hoshizum/" "http://staff.aist.go.jp/h.hoshizumi/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~imani/" "http://staff.aist.go.jp/k.imanishi/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~kaneko/" "http://staff.aist.go.jp/n.kaneko/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~kawakata/" "http://staff.aist.go.jp/h.kawakata/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~yagi/" "http://staff.aist.go.jp/y-kawanabe/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~kig/" "http://staff.aist.go.jp/kiguchi.t/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~koizumi/" "http://staff.aist.go.jp/koizumi-n/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~koma/" "http://staff.aist.go.jp/komazawa-m/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~lei/" "http://staff.aist.go.jp/xinglin-lei/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~marumo/" "http://staff.aist.go.jp/k.marumo/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~masuda/" "http://staff.aist.go.jp/koji.masuda/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~imiyagi/" "http://staff.aist.go.jp/miyagi.iso14000/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~murakami/" "http://staff.aist.go.jp/y.murakami/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~naito/" "http://staff.aist.go.jp/naito-k/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~shun/" "http://staff.aist.go.jp/nakano.shun/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~nawa/" "http://staff.aist.go.jp/k.nawa/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~g0192/" "http://staff.aist.go.jp/osamu-nishizawa/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~anoda/" "http://staff.aist.go.jp/a.noda/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~ohta/" "http://staff.aist.go.jp/ohta-e/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~ohtani/" "http://staff.aist.go.jp/tomo-ohtani/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~okuma/" "http://staff.aist.go.jp/s.okuma/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~keiichi/" "http://staff.aist.go.jp/k-sakaguchi/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~satake/" "http://staff.aist.go.jp/kenji.satake/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~sugar/" "http://staff.aist.go.jp/mr.sato/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~satoh/" "http://staff.aist.go.jp/t.satoh/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~haru/" "http://staff.aist.go.jp/haruko.sekiguchi/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~takarada/" "http://staff.aist.go.jp/s-takarada/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~g0442/" "http://staff.aist.go.jp/n.takeno/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~tana/" "http://staff.aist.go.jp/tanahashi-m/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~tomiya/" "http://staff.aist.go.jp/a.tomiya/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~satoshi/" "http://staff.aist.go.jp/s.tsuchida/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~uch/" "http://staff.aist.go.jp/uchida-toshihiro/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~uto/" "http://staff.aist.go.jp/k.uto/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~yamamuro/" "http://staff.aist.go.jp/m-yamamuro/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~yamazaki/" "http://staff.aist.go.jp/toshi-yamazaki/" nil)
- (beginning-of-buffer)
- (replace-string "http://www.gsj.go.jp/~ynorio/" "http://staff.aist.go.jp/n-yanagisawa/" nil)
)