Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
李少辉-开发者
git
提交
f3b8b3ce
G
git
项目概览
李少辉-开发者
/
git
与 Fork 源项目一致
从无法访问的项目Fork
通知
2
Star
1
Fork
0
代码
文件
提交
分支
Tags
贡献者
分支图
Diff
Issue
0
列表
看板
标记
里程碑
合并请求
0
Wiki
0
Wiki
分析
仓库
DevOps
项目成员
Pages
G
git
项目概览
项目概览
详情
发布
仓库
仓库
文件
提交
分支
标签
贡献者
分支图
比较
Issue
0
Issue
0
列表
看板
标记
里程碑
合并请求
0
合并请求
0
Pages
分析
分析
仓库分析
DevOps
Wiki
0
Wiki
成员
成员
收起侧边栏
关闭侧边栏
动态
分支图
创建新Issue
提交
Issue看板
体验新版 GitCode,发现更多精彩内容 >>
提交
f3b8b3ce
编写于
7月 18, 2005
作者:
P
Paul Mackerras
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
Allow short SHA1 IDs in the SHA1 entry field.
上级
4f2c2642
变更
1
隐藏空白更改
内联
并排
Showing
1 changed file
with
18 addition
and
1 deletion
+18
-1
gitk
gitk
+18
-1
未找到文件。
gitk
浏览文件 @
f3b8b3ce
...
...
@@ -1949,18 +1949,35 @@ proc sha1change {n1 n2 op} {
proc gotocommit
{}
{
global sha1string currentid idline tagids
global lineid numcommits
if
{
$sha1string
==
{}
||
([
info exists currentid
]
&& $sha1string == $currentid
)}
return
if
{[
info exists tagids
(
$sha1string
)]}
{
set id $tagids
(
$sha1string
)
}
else
{
set id
[
string tolower $sha1string
]
if
{[
regexp
{
^
[
0-9a-f
]{
4,39
}
$
}
$id
]}
{
set matches
{}
for
{
set l 0
}
{
$l
< $numcommits
}
{
incr l
}
{
if
{[
string match $id* $lineid
(
$l
)]}
{
lappend matches $lineid
(
$l
)
}
}
if
{
$matches
ne
{}}
{
if
{[
llength $matches
]
> 1
}
{
error_popup
"Short SHA1 id
$id
is ambiguous"
return
}
set id
[
lindex $matches 0
]
}
}
}
if
{[
info exists idline
(
$id
)]}
{
selectline $idline
(
$id
)
return
}
if
{[
regexp
{
^
[
0-9a-fA-F
]{
4
0
}
$
}
$sha1string
]}
{
if
{[
regexp
{
^
[
0-9a-fA-F
]{
4
,
}
$
}
$sha1string
]}
{
set type
"SHA1 id"
}
else
{
set type
"Tag"
...
...
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录